amazonka-storagegateway 1.6.1 → 2.0
raw patch · 323 files changed
+36337/−14726 lines, 323 filesdep +case-insensitivedep ~amazonka-coredep ~amazonka-testdep ~basesetup-changedPVP ok
version bump matches the API change (PVP)
Dependencies added: case-insensitive
Dependency ranges changed: amazonka-core, amazonka-test, base
API changes (from Hackage documentation)
- Network.AWS.StorageGateway: AWSExecRead :: ObjectACL
- Network.AWS.StorageGateway: AuthenticatedRead :: ObjectACL
- Network.AWS.StorageGateway: BucketOwnerFullControl :: ObjectACL
- Network.AWS.StorageGateway: BucketOwnerRead :: ObjectACL
- Network.AWS.StorageGateway: Private :: ObjectACL
- Network.AWS.StorageGateway: PublicRead :: ObjectACL
- Network.AWS.StorageGateway: PublicReadWrite :: ObjectACL
- Network.AWS.StorageGateway: _InternalServerError :: AsError a => Getting (First ServiceError) a ServiceError
- Network.AWS.StorageGateway: _InvalidGatewayRequestException :: AsError a => Getting (First ServiceError) a ServiceError
- Network.AWS.StorageGateway: _ServiceUnavailableError :: AsError a => Getting (First ServiceError) a ServiceError
- Network.AWS.StorageGateway: cachediSCSIVolume :: CachediSCSIVolume
- Network.AWS.StorageGateway: chapInfo :: ChapInfo
- Network.AWS.StorageGateway: ciInitiatorName :: Lens' ChapInfo (Maybe Text)
- Network.AWS.StorageGateway: ciSecretToAuthenticateInitiator :: Lens' ChapInfo (Maybe Text)
- Network.AWS.StorageGateway: ciSecretToAuthenticateTarget :: Lens' ChapInfo (Maybe Text)
- Network.AWS.StorageGateway: ciTargetARN :: Lens' ChapInfo (Maybe Text)
- Network.AWS.StorageGateway: cscsivCreatedDate :: Lens' CachediSCSIVolume (Maybe UTCTime)
- Network.AWS.StorageGateway: cscsivSourceSnapshotId :: Lens' CachediSCSIVolume (Maybe Text)
- Network.AWS.StorageGateway: cscsivVolumeARN :: Lens' CachediSCSIVolume (Maybe Text)
- Network.AWS.StorageGateway: cscsivVolumeId :: Lens' CachediSCSIVolume (Maybe Text)
- Network.AWS.StorageGateway: cscsivVolumeProgress :: Lens' CachediSCSIVolume (Maybe Double)
- Network.AWS.StorageGateway: cscsivVolumeSizeInBytes :: Lens' CachediSCSIVolume (Maybe Integer)
- Network.AWS.StorageGateway: cscsivVolumeStatus :: Lens' CachediSCSIVolume (Maybe Text)
- Network.AWS.StorageGateway: cscsivVolumeType :: Lens' CachediSCSIVolume (Maybe Text)
- Network.AWS.StorageGateway: cscsivVolumeUsedInBytes :: Lens' CachediSCSIVolume (Maybe Integer)
- Network.AWS.StorageGateway: cscsivVolumeiSCSIAttributes :: Lens' CachediSCSIVolume (Maybe VolumeiSCSIAttributes)
- Network.AWS.StorageGateway: dDiskAllocationResource :: Lens' Disk (Maybe Text)
- Network.AWS.StorageGateway: dDiskAllocationType :: Lens' Disk (Maybe Text)
- Network.AWS.StorageGateway: dDiskId :: Lens' Disk (Maybe Text)
- Network.AWS.StorageGateway: dDiskNode :: Lens' Disk (Maybe Text)
- Network.AWS.StorageGateway: dDiskPath :: Lens' Disk (Maybe Text)
- Network.AWS.StorageGateway: dDiskSizeInBytes :: Lens' Disk (Maybe Integer)
- Network.AWS.StorageGateway: dDiskStatus :: Lens' Disk (Maybe Text)
- Network.AWS.StorageGateway: data CachediSCSIVolume
- Network.AWS.StorageGateway: data ChapInfo
- Network.AWS.StorageGateway: data DeviceiSCSIAttributes
- Network.AWS.StorageGateway: data Disk
- Network.AWS.StorageGateway: data FileShareInfo
- Network.AWS.StorageGateway: data GatewayInfo
- Network.AWS.StorageGateway: data NFSFileShareDefaults
- Network.AWS.StorageGateway: data NFSFileShareInfo
- Network.AWS.StorageGateway: data NetworkInterface
- Network.AWS.StorageGateway: data ObjectACL
- Network.AWS.StorageGateway: data StorediSCSIVolume
- Network.AWS.StorageGateway: data Tag
- Network.AWS.StorageGateway: data Tape
- Network.AWS.StorageGateway: data TapeArchive
- Network.AWS.StorageGateway: data TapeInfo
- Network.AWS.StorageGateway: data TapeRecoveryPointInfo
- Network.AWS.StorageGateway: data VTLDevice
- Network.AWS.StorageGateway: data VolumeInfo
- Network.AWS.StorageGateway: data VolumeRecoveryPointInfo
- Network.AWS.StorageGateway: data VolumeiSCSIAttributes
- Network.AWS.StorageGateway: deviceiSCSIAttributes :: DeviceiSCSIAttributes
- Network.AWS.StorageGateway: disk :: Disk
- Network.AWS.StorageGateway: dscsiaChapEnabled :: Lens' DeviceiSCSIAttributes (Maybe Bool)
- Network.AWS.StorageGateway: dscsiaNetworkInterfaceId :: Lens' DeviceiSCSIAttributes (Maybe Text)
- Network.AWS.StorageGateway: dscsiaNetworkInterfacePort :: Lens' DeviceiSCSIAttributes (Maybe Int)
- Network.AWS.StorageGateway: dscsiaTargetARN :: Lens' DeviceiSCSIAttributes (Maybe Text)
- Network.AWS.StorageGateway: fileShareInfo :: FileShareInfo
- Network.AWS.StorageGateway: fsiFileShareARN :: Lens' FileShareInfo (Maybe Text)
- Network.AWS.StorageGateway: fsiFileShareId :: Lens' FileShareInfo (Maybe Text)
- Network.AWS.StorageGateway: fsiFileShareStatus :: Lens' FileShareInfo (Maybe Text)
- Network.AWS.StorageGateway: fsiGatewayARN :: Lens' FileShareInfo (Maybe Text)
- Network.AWS.StorageGateway: gatewayInfo :: GatewayInfo
- Network.AWS.StorageGateway: giGatewayARN :: Lens' GatewayInfo (Maybe Text)
- Network.AWS.StorageGateway: giGatewayId :: Lens' GatewayInfo (Maybe Text)
- Network.AWS.StorageGateway: giGatewayName :: Lens' GatewayInfo (Maybe Text)
- Network.AWS.StorageGateway: giGatewayOperationalState :: Lens' GatewayInfo (Maybe Text)
- Network.AWS.StorageGateway: giGatewayType :: Lens' GatewayInfo (Maybe Text)
- Network.AWS.StorageGateway: nFSFileShareDefaults :: NFSFileShareDefaults
- Network.AWS.StorageGateway: nFSFileShareInfo :: NFSFileShareInfo
- Network.AWS.StorageGateway: networkInterface :: NetworkInterface
- Network.AWS.StorageGateway: nfsfsdDirectoryMode :: Lens' NFSFileShareDefaults (Maybe Text)
- Network.AWS.StorageGateway: nfsfsdFileMode :: Lens' NFSFileShareDefaults (Maybe Text)
- Network.AWS.StorageGateway: nfsfsdGroupId :: Lens' NFSFileShareDefaults (Maybe Natural)
- Network.AWS.StorageGateway: nfsfsdOwnerId :: Lens' NFSFileShareDefaults (Maybe Natural)
- Network.AWS.StorageGateway: nfsfsiClientList :: Lens' NFSFileShareInfo (Maybe (NonEmpty Text))
- Network.AWS.StorageGateway: nfsfsiDefaultStorageClass :: Lens' NFSFileShareInfo (Maybe Text)
- Network.AWS.StorageGateway: nfsfsiFileShareARN :: Lens' NFSFileShareInfo (Maybe Text)
- Network.AWS.StorageGateway: nfsfsiFileShareId :: Lens' NFSFileShareInfo (Maybe Text)
- Network.AWS.StorageGateway: nfsfsiFileShareStatus :: Lens' NFSFileShareInfo (Maybe Text)
- Network.AWS.StorageGateway: nfsfsiGatewayARN :: Lens' NFSFileShareInfo (Maybe Text)
- Network.AWS.StorageGateway: nfsfsiGuessMIMETypeEnabled :: Lens' NFSFileShareInfo (Maybe Bool)
- Network.AWS.StorageGateway: nfsfsiKMSEncrypted :: Lens' NFSFileShareInfo (Maybe Bool)
- Network.AWS.StorageGateway: nfsfsiKMSKey :: Lens' NFSFileShareInfo (Maybe Text)
- Network.AWS.StorageGateway: nfsfsiLocationARN :: Lens' NFSFileShareInfo (Maybe Text)
- Network.AWS.StorageGateway: nfsfsiNFSFileShareDefaults :: Lens' NFSFileShareInfo (Maybe NFSFileShareDefaults)
- Network.AWS.StorageGateway: nfsfsiObjectACL :: Lens' NFSFileShareInfo (Maybe ObjectACL)
- Network.AWS.StorageGateway: nfsfsiPath :: Lens' NFSFileShareInfo (Maybe Text)
- Network.AWS.StorageGateway: nfsfsiReadOnly :: Lens' NFSFileShareInfo (Maybe Bool)
- Network.AWS.StorageGateway: nfsfsiRequesterPays :: Lens' NFSFileShareInfo (Maybe Bool)
- Network.AWS.StorageGateway: nfsfsiRole :: Lens' NFSFileShareInfo (Maybe Text)
- Network.AWS.StorageGateway: nfsfsiSquash :: Lens' NFSFileShareInfo (Maybe Text)
- Network.AWS.StorageGateway: niIPv4Address :: Lens' NetworkInterface (Maybe Text)
- Network.AWS.StorageGateway: niIPv6Address :: Lens' NetworkInterface (Maybe Text)
- Network.AWS.StorageGateway: niMACAddress :: Lens' NetworkInterface (Maybe Text)
- Network.AWS.StorageGateway: sscsivCreatedDate :: Lens' StorediSCSIVolume (Maybe UTCTime)
- Network.AWS.StorageGateway: sscsivPreservedExistingData :: Lens' StorediSCSIVolume (Maybe Bool)
- Network.AWS.StorageGateway: sscsivSourceSnapshotId :: Lens' StorediSCSIVolume (Maybe Text)
- Network.AWS.StorageGateway: sscsivVolumeARN :: Lens' StorediSCSIVolume (Maybe Text)
- Network.AWS.StorageGateway: sscsivVolumeDiskId :: Lens' StorediSCSIVolume (Maybe Text)
- Network.AWS.StorageGateway: sscsivVolumeId :: Lens' StorediSCSIVolume (Maybe Text)
- Network.AWS.StorageGateway: sscsivVolumeProgress :: Lens' StorediSCSIVolume (Maybe Double)
- Network.AWS.StorageGateway: sscsivVolumeSizeInBytes :: Lens' StorediSCSIVolume (Maybe Integer)
- Network.AWS.StorageGateway: sscsivVolumeStatus :: Lens' StorediSCSIVolume (Maybe Text)
- Network.AWS.StorageGateway: sscsivVolumeType :: Lens' StorediSCSIVolume (Maybe Text)
- Network.AWS.StorageGateway: sscsivVolumeUsedInBytes :: Lens' StorediSCSIVolume (Maybe Integer)
- Network.AWS.StorageGateway: sscsivVolumeiSCSIAttributes :: Lens' StorediSCSIVolume (Maybe VolumeiSCSIAttributes)
- Network.AWS.StorageGateway: storageGateway :: Service
- Network.AWS.StorageGateway: storediSCSIVolume :: StorediSCSIVolume
- Network.AWS.StorageGateway: tProgress :: Lens' Tape (Maybe Double)
- Network.AWS.StorageGateway: tTapeARN :: Lens' Tape (Maybe Text)
- Network.AWS.StorageGateway: tTapeBarcode :: Lens' Tape (Maybe Text)
- Network.AWS.StorageGateway: tTapeCreatedDate :: Lens' Tape (Maybe UTCTime)
- Network.AWS.StorageGateway: tTapeSizeInBytes :: Lens' Tape (Maybe Integer)
- Network.AWS.StorageGateway: tTapeStatus :: Lens' Tape (Maybe Text)
- Network.AWS.StorageGateway: tTapeUsedInBytes :: Lens' Tape (Maybe Integer)
- Network.AWS.StorageGateway: tVTLDevice :: Lens' Tape (Maybe Text)
- Network.AWS.StorageGateway: taCompletionTime :: Lens' TapeArchive (Maybe UTCTime)
- Network.AWS.StorageGateway: taRetrievedTo :: Lens' TapeArchive (Maybe Text)
- Network.AWS.StorageGateway: taTapeARN :: Lens' TapeArchive (Maybe Text)
- Network.AWS.StorageGateway: taTapeBarcode :: Lens' TapeArchive (Maybe Text)
- Network.AWS.StorageGateway: taTapeCreatedDate :: Lens' TapeArchive (Maybe UTCTime)
- Network.AWS.StorageGateway: taTapeSizeInBytes :: Lens' TapeArchive (Maybe Integer)
- Network.AWS.StorageGateway: taTapeStatus :: Lens' TapeArchive (Maybe Text)
- Network.AWS.StorageGateway: taTapeUsedInBytes :: Lens' TapeArchive (Maybe Integer)
- Network.AWS.StorageGateway: tag :: Text -> Text -> Tag
- Network.AWS.StorageGateway: tagKey :: Lens' Tag Text
- Network.AWS.StorageGateway: tagValue :: Lens' Tag Text
- Network.AWS.StorageGateway: tape :: Tape
- Network.AWS.StorageGateway: tapeArchive :: TapeArchive
- Network.AWS.StorageGateway: tapeInfo :: TapeInfo
- Network.AWS.StorageGateway: tapeRecoveryPointInfo :: TapeRecoveryPointInfo
- Network.AWS.StorageGateway: tiGatewayARN :: Lens' TapeInfo (Maybe Text)
- Network.AWS.StorageGateway: tiTapeARN :: Lens' TapeInfo (Maybe Text)
- Network.AWS.StorageGateway: tiTapeBarcode :: Lens' TapeInfo (Maybe Text)
- Network.AWS.StorageGateway: tiTapeSizeInBytes :: Lens' TapeInfo (Maybe Integer)
- Network.AWS.StorageGateway: tiTapeStatus :: Lens' TapeInfo (Maybe Text)
- Network.AWS.StorageGateway: trpiTapeARN :: Lens' TapeRecoveryPointInfo (Maybe Text)
- Network.AWS.StorageGateway: trpiTapeRecoveryPointTime :: Lens' TapeRecoveryPointInfo (Maybe UTCTime)
- Network.AWS.StorageGateway: trpiTapeSizeInBytes :: Lens' TapeRecoveryPointInfo (Maybe Integer)
- Network.AWS.StorageGateway: trpiTapeStatus :: Lens' TapeRecoveryPointInfo (Maybe Text)
- Network.AWS.StorageGateway: vTLDevice :: VTLDevice
- Network.AWS.StorageGateway: viGatewayARN :: Lens' VolumeInfo (Maybe Text)
- Network.AWS.StorageGateway: viGatewayId :: Lens' VolumeInfo (Maybe Text)
- Network.AWS.StorageGateway: viVolumeARN :: Lens' VolumeInfo (Maybe Text)
- Network.AWS.StorageGateway: viVolumeId :: Lens' VolumeInfo (Maybe Text)
- Network.AWS.StorageGateway: viVolumeSizeInBytes :: Lens' VolumeInfo (Maybe Integer)
- Network.AWS.StorageGateway: viVolumeType :: Lens' VolumeInfo (Maybe Text)
- Network.AWS.StorageGateway: volumeInfo :: VolumeInfo
- Network.AWS.StorageGateway: volumeRecoveryPointInfo :: VolumeRecoveryPointInfo
- Network.AWS.StorageGateway: volumeiSCSIAttributes :: VolumeiSCSIAttributes
- Network.AWS.StorageGateway: vrpiVolumeARN :: Lens' VolumeRecoveryPointInfo (Maybe Text)
- Network.AWS.StorageGateway: vrpiVolumeRecoveryPointTime :: Lens' VolumeRecoveryPointInfo (Maybe Text)
- Network.AWS.StorageGateway: vrpiVolumeSizeInBytes :: Lens' VolumeRecoveryPointInfo (Maybe Integer)
- Network.AWS.StorageGateway: vrpiVolumeUsageInBytes :: Lens' VolumeRecoveryPointInfo (Maybe Integer)
- Network.AWS.StorageGateway: vscsiaChapEnabled :: Lens' VolumeiSCSIAttributes (Maybe Bool)
- Network.AWS.StorageGateway: vscsiaLunNumber :: Lens' VolumeiSCSIAttributes (Maybe Natural)
- Network.AWS.StorageGateway: vscsiaNetworkInterfaceId :: Lens' VolumeiSCSIAttributes (Maybe Text)
- Network.AWS.StorageGateway: vscsiaNetworkInterfacePort :: Lens' VolumeiSCSIAttributes (Maybe Int)
- Network.AWS.StorageGateway: vscsiaTargetARN :: Lens' VolumeiSCSIAttributes (Maybe Text)
- Network.AWS.StorageGateway: vtldDeviceiSCSIAttributes :: Lens' VTLDevice (Maybe DeviceiSCSIAttributes)
- Network.AWS.StorageGateway: vtldVTLDeviceARN :: Lens' VTLDevice (Maybe Text)
- Network.AWS.StorageGateway: vtldVTLDeviceProductIdentifier :: Lens' VTLDevice (Maybe Text)
- Network.AWS.StorageGateway: vtldVTLDeviceType :: Lens' VTLDevice (Maybe Text)
- Network.AWS.StorageGateway: vtldVTLDeviceVendor :: Lens' VTLDevice (Maybe Text)
- Network.AWS.StorageGateway.ActivateGateway: activateGateway :: Text -> Text -> Text -> Text -> ActivateGateway
- Network.AWS.StorageGateway.ActivateGateway: activateGatewayResponse :: Int -> ActivateGatewayResponse
- Network.AWS.StorageGateway.ActivateGateway: agActivationKey :: Lens' ActivateGateway Text
- Network.AWS.StorageGateway.ActivateGateway: agGatewayName :: Lens' ActivateGateway Text
- Network.AWS.StorageGateway.ActivateGateway: agGatewayRegion :: Lens' ActivateGateway Text
- Network.AWS.StorageGateway.ActivateGateway: agGatewayTimezone :: Lens' ActivateGateway Text
- Network.AWS.StorageGateway.ActivateGateway: agGatewayType :: Lens' ActivateGateway (Maybe Text)
- Network.AWS.StorageGateway.ActivateGateway: agMediumChangerType :: Lens' ActivateGateway (Maybe Text)
- Network.AWS.StorageGateway.ActivateGateway: agTapeDriveType :: Lens' ActivateGateway (Maybe Text)
- Network.AWS.StorageGateway.ActivateGateway: agrsGatewayARN :: Lens' ActivateGatewayResponse (Maybe Text)
- Network.AWS.StorageGateway.ActivateGateway: agrsResponseStatus :: Lens' ActivateGatewayResponse Int
- Network.AWS.StorageGateway.ActivateGateway: data ActivateGateway
- Network.AWS.StorageGateway.ActivateGateway: data ActivateGatewayResponse
- Network.AWS.StorageGateway.ActivateGateway: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.ActivateGateway.ActivateGateway
- Network.AWS.StorageGateway.ActivateGateway: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.ActivateGateway.ActivateGatewayResponse
- Network.AWS.StorageGateway.ActivateGateway: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.ActivateGateway.ActivateGateway
- Network.AWS.StorageGateway.ActivateGateway: instance Data.Data.Data Network.AWS.StorageGateway.ActivateGateway.ActivateGateway
- Network.AWS.StorageGateway.ActivateGateway: instance Data.Data.Data Network.AWS.StorageGateway.ActivateGateway.ActivateGatewayResponse
- Network.AWS.StorageGateway.ActivateGateway: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.ActivateGateway.ActivateGateway
- Network.AWS.StorageGateway.ActivateGateway: instance GHC.Classes.Eq Network.AWS.StorageGateway.ActivateGateway.ActivateGateway
- Network.AWS.StorageGateway.ActivateGateway: instance GHC.Classes.Eq Network.AWS.StorageGateway.ActivateGateway.ActivateGatewayResponse
- Network.AWS.StorageGateway.ActivateGateway: instance GHC.Generics.Generic Network.AWS.StorageGateway.ActivateGateway.ActivateGateway
- Network.AWS.StorageGateway.ActivateGateway: instance GHC.Generics.Generic Network.AWS.StorageGateway.ActivateGateway.ActivateGatewayResponse
- Network.AWS.StorageGateway.ActivateGateway: instance GHC.Read.Read Network.AWS.StorageGateway.ActivateGateway.ActivateGateway
- Network.AWS.StorageGateway.ActivateGateway: instance GHC.Read.Read Network.AWS.StorageGateway.ActivateGateway.ActivateGatewayResponse
- Network.AWS.StorageGateway.ActivateGateway: instance GHC.Show.Show Network.AWS.StorageGateway.ActivateGateway.ActivateGateway
- Network.AWS.StorageGateway.ActivateGateway: instance GHC.Show.Show Network.AWS.StorageGateway.ActivateGateway.ActivateGatewayResponse
- Network.AWS.StorageGateway.ActivateGateway: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.ActivateGateway.ActivateGateway
- Network.AWS.StorageGateway.ActivateGateway: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.ActivateGateway.ActivateGateway
- Network.AWS.StorageGateway.ActivateGateway: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.ActivateGateway.ActivateGateway
- Network.AWS.StorageGateway.ActivateGateway: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.ActivateGateway.ActivateGateway
- Network.AWS.StorageGateway.AddCache: acDiskIds :: Lens' AddCache [Text]
- Network.AWS.StorageGateway.AddCache: acGatewayARN :: Lens' AddCache Text
- Network.AWS.StorageGateway.AddCache: acrsGatewayARN :: Lens' AddCacheResponse (Maybe Text)
- Network.AWS.StorageGateway.AddCache: acrsResponseStatus :: Lens' AddCacheResponse Int
- Network.AWS.StorageGateway.AddCache: addCache :: Text -> AddCache
- Network.AWS.StorageGateway.AddCache: addCacheResponse :: Int -> AddCacheResponse
- Network.AWS.StorageGateway.AddCache: data AddCache
- Network.AWS.StorageGateway.AddCache: data AddCacheResponse
- Network.AWS.StorageGateway.AddCache: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.AddCache.AddCache
- Network.AWS.StorageGateway.AddCache: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.AddCache.AddCacheResponse
- Network.AWS.StorageGateway.AddCache: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.AddCache.AddCache
- Network.AWS.StorageGateway.AddCache: instance Data.Data.Data Network.AWS.StorageGateway.AddCache.AddCache
- Network.AWS.StorageGateway.AddCache: instance Data.Data.Data Network.AWS.StorageGateway.AddCache.AddCacheResponse
- Network.AWS.StorageGateway.AddCache: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.AddCache.AddCache
- Network.AWS.StorageGateway.AddCache: instance GHC.Classes.Eq Network.AWS.StorageGateway.AddCache.AddCache
- Network.AWS.StorageGateway.AddCache: instance GHC.Classes.Eq Network.AWS.StorageGateway.AddCache.AddCacheResponse
- Network.AWS.StorageGateway.AddCache: instance GHC.Generics.Generic Network.AWS.StorageGateway.AddCache.AddCache
- Network.AWS.StorageGateway.AddCache: instance GHC.Generics.Generic Network.AWS.StorageGateway.AddCache.AddCacheResponse
- Network.AWS.StorageGateway.AddCache: instance GHC.Read.Read Network.AWS.StorageGateway.AddCache.AddCache
- Network.AWS.StorageGateway.AddCache: instance GHC.Read.Read Network.AWS.StorageGateway.AddCache.AddCacheResponse
- Network.AWS.StorageGateway.AddCache: instance GHC.Show.Show Network.AWS.StorageGateway.AddCache.AddCache
- Network.AWS.StorageGateway.AddCache: instance GHC.Show.Show Network.AWS.StorageGateway.AddCache.AddCacheResponse
- Network.AWS.StorageGateway.AddCache: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.AddCache.AddCache
- Network.AWS.StorageGateway.AddCache: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.AddCache.AddCache
- Network.AWS.StorageGateway.AddCache: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.AddCache.AddCache
- Network.AWS.StorageGateway.AddCache: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.AddCache.AddCache
- Network.AWS.StorageGateway.AddTagsToResource: addTagsToResource :: Text -> AddTagsToResource
- Network.AWS.StorageGateway.AddTagsToResource: addTagsToResourceResponse :: Int -> AddTagsToResourceResponse
- Network.AWS.StorageGateway.AddTagsToResource: attrResourceARN :: Lens' AddTagsToResource Text
- Network.AWS.StorageGateway.AddTagsToResource: attrTags :: Lens' AddTagsToResource [Tag]
- Network.AWS.StorageGateway.AddTagsToResource: attrrsResourceARN :: Lens' AddTagsToResourceResponse (Maybe Text)
- Network.AWS.StorageGateway.AddTagsToResource: attrrsResponseStatus :: Lens' AddTagsToResourceResponse Int
- Network.AWS.StorageGateway.AddTagsToResource: data AddTagsToResource
- Network.AWS.StorageGateway.AddTagsToResource: data AddTagsToResourceResponse
- Network.AWS.StorageGateway.AddTagsToResource: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.AddTagsToResource.AddTagsToResource
- Network.AWS.StorageGateway.AddTagsToResource: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.AddTagsToResource.AddTagsToResourceResponse
- Network.AWS.StorageGateway.AddTagsToResource: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.AddTagsToResource.AddTagsToResource
- Network.AWS.StorageGateway.AddTagsToResource: instance Data.Data.Data Network.AWS.StorageGateway.AddTagsToResource.AddTagsToResource
- Network.AWS.StorageGateway.AddTagsToResource: instance Data.Data.Data Network.AWS.StorageGateway.AddTagsToResource.AddTagsToResourceResponse
- Network.AWS.StorageGateway.AddTagsToResource: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.AddTagsToResource.AddTagsToResource
- Network.AWS.StorageGateway.AddTagsToResource: instance GHC.Classes.Eq Network.AWS.StorageGateway.AddTagsToResource.AddTagsToResource
- Network.AWS.StorageGateway.AddTagsToResource: instance GHC.Classes.Eq Network.AWS.StorageGateway.AddTagsToResource.AddTagsToResourceResponse
- Network.AWS.StorageGateway.AddTagsToResource: instance GHC.Generics.Generic Network.AWS.StorageGateway.AddTagsToResource.AddTagsToResource
- Network.AWS.StorageGateway.AddTagsToResource: instance GHC.Generics.Generic Network.AWS.StorageGateway.AddTagsToResource.AddTagsToResourceResponse
- Network.AWS.StorageGateway.AddTagsToResource: instance GHC.Read.Read Network.AWS.StorageGateway.AddTagsToResource.AddTagsToResource
- Network.AWS.StorageGateway.AddTagsToResource: instance GHC.Read.Read Network.AWS.StorageGateway.AddTagsToResource.AddTagsToResourceResponse
- Network.AWS.StorageGateway.AddTagsToResource: instance GHC.Show.Show Network.AWS.StorageGateway.AddTagsToResource.AddTagsToResource
- Network.AWS.StorageGateway.AddTagsToResource: instance GHC.Show.Show Network.AWS.StorageGateway.AddTagsToResource.AddTagsToResourceResponse
- Network.AWS.StorageGateway.AddTagsToResource: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.AddTagsToResource.AddTagsToResource
- Network.AWS.StorageGateway.AddTagsToResource: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.AddTagsToResource.AddTagsToResource
- Network.AWS.StorageGateway.AddTagsToResource: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.AddTagsToResource.AddTagsToResource
- Network.AWS.StorageGateway.AddTagsToResource: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.AddTagsToResource.AddTagsToResource
- Network.AWS.StorageGateway.AddUploadBuffer: addUploadBuffer :: Text -> AddUploadBuffer
- Network.AWS.StorageGateway.AddUploadBuffer: addUploadBufferResponse :: Int -> AddUploadBufferResponse
- Network.AWS.StorageGateway.AddUploadBuffer: aubDiskIds :: Lens' AddUploadBuffer [Text]
- Network.AWS.StorageGateway.AddUploadBuffer: aubGatewayARN :: Lens' AddUploadBuffer Text
- Network.AWS.StorageGateway.AddUploadBuffer: aubrsGatewayARN :: Lens' AddUploadBufferResponse (Maybe Text)
- Network.AWS.StorageGateway.AddUploadBuffer: aubrsResponseStatus :: Lens' AddUploadBufferResponse Int
- Network.AWS.StorageGateway.AddUploadBuffer: data AddUploadBuffer
- Network.AWS.StorageGateway.AddUploadBuffer: data AddUploadBufferResponse
- Network.AWS.StorageGateway.AddUploadBuffer: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.AddUploadBuffer.AddUploadBuffer
- Network.AWS.StorageGateway.AddUploadBuffer: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.AddUploadBuffer.AddUploadBufferResponse
- Network.AWS.StorageGateway.AddUploadBuffer: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.AddUploadBuffer.AddUploadBuffer
- Network.AWS.StorageGateway.AddUploadBuffer: instance Data.Data.Data Network.AWS.StorageGateway.AddUploadBuffer.AddUploadBuffer
- Network.AWS.StorageGateway.AddUploadBuffer: instance Data.Data.Data Network.AWS.StorageGateway.AddUploadBuffer.AddUploadBufferResponse
- Network.AWS.StorageGateway.AddUploadBuffer: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.AddUploadBuffer.AddUploadBuffer
- Network.AWS.StorageGateway.AddUploadBuffer: instance GHC.Classes.Eq Network.AWS.StorageGateway.AddUploadBuffer.AddUploadBuffer
- Network.AWS.StorageGateway.AddUploadBuffer: instance GHC.Classes.Eq Network.AWS.StorageGateway.AddUploadBuffer.AddUploadBufferResponse
- Network.AWS.StorageGateway.AddUploadBuffer: instance GHC.Generics.Generic Network.AWS.StorageGateway.AddUploadBuffer.AddUploadBuffer
- Network.AWS.StorageGateway.AddUploadBuffer: instance GHC.Generics.Generic Network.AWS.StorageGateway.AddUploadBuffer.AddUploadBufferResponse
- Network.AWS.StorageGateway.AddUploadBuffer: instance GHC.Read.Read Network.AWS.StorageGateway.AddUploadBuffer.AddUploadBuffer
- Network.AWS.StorageGateway.AddUploadBuffer: instance GHC.Read.Read Network.AWS.StorageGateway.AddUploadBuffer.AddUploadBufferResponse
- Network.AWS.StorageGateway.AddUploadBuffer: instance GHC.Show.Show Network.AWS.StorageGateway.AddUploadBuffer.AddUploadBuffer
- Network.AWS.StorageGateway.AddUploadBuffer: instance GHC.Show.Show Network.AWS.StorageGateway.AddUploadBuffer.AddUploadBufferResponse
- Network.AWS.StorageGateway.AddUploadBuffer: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.AddUploadBuffer.AddUploadBuffer
- Network.AWS.StorageGateway.AddUploadBuffer: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.AddUploadBuffer.AddUploadBuffer
- Network.AWS.StorageGateway.AddUploadBuffer: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.AddUploadBuffer.AddUploadBuffer
- Network.AWS.StorageGateway.AddUploadBuffer: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.AddUploadBuffer.AddUploadBuffer
- Network.AWS.StorageGateway.AddWorkingStorage: addWorkingStorage :: Text -> AddWorkingStorage
- Network.AWS.StorageGateway.AddWorkingStorage: addWorkingStorageResponse :: Int -> AddWorkingStorageResponse
- Network.AWS.StorageGateway.AddWorkingStorage: awsDiskIds :: Lens' AddWorkingStorage [Text]
- Network.AWS.StorageGateway.AddWorkingStorage: awsGatewayARN :: Lens' AddWorkingStorage Text
- Network.AWS.StorageGateway.AddWorkingStorage: awsrsGatewayARN :: Lens' AddWorkingStorageResponse (Maybe Text)
- Network.AWS.StorageGateway.AddWorkingStorage: awsrsResponseStatus :: Lens' AddWorkingStorageResponse Int
- Network.AWS.StorageGateway.AddWorkingStorage: data AddWorkingStorage
- Network.AWS.StorageGateway.AddWorkingStorage: data AddWorkingStorageResponse
- Network.AWS.StorageGateway.AddWorkingStorage: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.AddWorkingStorage.AddWorkingStorage
- Network.AWS.StorageGateway.AddWorkingStorage: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.AddWorkingStorage.AddWorkingStorageResponse
- Network.AWS.StorageGateway.AddWorkingStorage: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.AddWorkingStorage.AddWorkingStorage
- Network.AWS.StorageGateway.AddWorkingStorage: instance Data.Data.Data Network.AWS.StorageGateway.AddWorkingStorage.AddWorkingStorage
- Network.AWS.StorageGateway.AddWorkingStorage: instance Data.Data.Data Network.AWS.StorageGateway.AddWorkingStorage.AddWorkingStorageResponse
- Network.AWS.StorageGateway.AddWorkingStorage: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.AddWorkingStorage.AddWorkingStorage
- Network.AWS.StorageGateway.AddWorkingStorage: instance GHC.Classes.Eq Network.AWS.StorageGateway.AddWorkingStorage.AddWorkingStorage
- Network.AWS.StorageGateway.AddWorkingStorage: instance GHC.Classes.Eq Network.AWS.StorageGateway.AddWorkingStorage.AddWorkingStorageResponse
- Network.AWS.StorageGateway.AddWorkingStorage: instance GHC.Generics.Generic Network.AWS.StorageGateway.AddWorkingStorage.AddWorkingStorage
- Network.AWS.StorageGateway.AddWorkingStorage: instance GHC.Generics.Generic Network.AWS.StorageGateway.AddWorkingStorage.AddWorkingStorageResponse
- Network.AWS.StorageGateway.AddWorkingStorage: instance GHC.Read.Read Network.AWS.StorageGateway.AddWorkingStorage.AddWorkingStorage
- Network.AWS.StorageGateway.AddWorkingStorage: instance GHC.Read.Read Network.AWS.StorageGateway.AddWorkingStorage.AddWorkingStorageResponse
- Network.AWS.StorageGateway.AddWorkingStorage: instance GHC.Show.Show Network.AWS.StorageGateway.AddWorkingStorage.AddWorkingStorage
- Network.AWS.StorageGateway.AddWorkingStorage: instance GHC.Show.Show Network.AWS.StorageGateway.AddWorkingStorage.AddWorkingStorageResponse
- Network.AWS.StorageGateway.AddWorkingStorage: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.AddWorkingStorage.AddWorkingStorage
- Network.AWS.StorageGateway.AddWorkingStorage: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.AddWorkingStorage.AddWorkingStorage
- Network.AWS.StorageGateway.AddWorkingStorage: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.AddWorkingStorage.AddWorkingStorage
- Network.AWS.StorageGateway.AddWorkingStorage: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.AddWorkingStorage.AddWorkingStorage
- Network.AWS.StorageGateway.CancelArchival: caGatewayARN :: Lens' CancelArchival Text
- Network.AWS.StorageGateway.CancelArchival: caTapeARN :: Lens' CancelArchival Text
- Network.AWS.StorageGateway.CancelArchival: cancelArchival :: Text -> Text -> CancelArchival
- Network.AWS.StorageGateway.CancelArchival: cancelArchivalResponse :: Int -> CancelArchivalResponse
- Network.AWS.StorageGateway.CancelArchival: carsResponseStatus :: Lens' CancelArchivalResponse Int
- Network.AWS.StorageGateway.CancelArchival: carsTapeARN :: Lens' CancelArchivalResponse (Maybe Text)
- Network.AWS.StorageGateway.CancelArchival: data CancelArchival
- Network.AWS.StorageGateway.CancelArchival: data CancelArchivalResponse
- Network.AWS.StorageGateway.CancelArchival: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.CancelArchival.CancelArchival
- Network.AWS.StorageGateway.CancelArchival: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.CancelArchival.CancelArchivalResponse
- Network.AWS.StorageGateway.CancelArchival: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.CancelArchival.CancelArchival
- Network.AWS.StorageGateway.CancelArchival: instance Data.Data.Data Network.AWS.StorageGateway.CancelArchival.CancelArchival
- Network.AWS.StorageGateway.CancelArchival: instance Data.Data.Data Network.AWS.StorageGateway.CancelArchival.CancelArchivalResponse
- Network.AWS.StorageGateway.CancelArchival: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.CancelArchival.CancelArchival
- Network.AWS.StorageGateway.CancelArchival: instance GHC.Classes.Eq Network.AWS.StorageGateway.CancelArchival.CancelArchival
- Network.AWS.StorageGateway.CancelArchival: instance GHC.Classes.Eq Network.AWS.StorageGateway.CancelArchival.CancelArchivalResponse
- Network.AWS.StorageGateway.CancelArchival: instance GHC.Generics.Generic Network.AWS.StorageGateway.CancelArchival.CancelArchival
- Network.AWS.StorageGateway.CancelArchival: instance GHC.Generics.Generic Network.AWS.StorageGateway.CancelArchival.CancelArchivalResponse
- Network.AWS.StorageGateway.CancelArchival: instance GHC.Read.Read Network.AWS.StorageGateway.CancelArchival.CancelArchival
- Network.AWS.StorageGateway.CancelArchival: instance GHC.Read.Read Network.AWS.StorageGateway.CancelArchival.CancelArchivalResponse
- Network.AWS.StorageGateway.CancelArchival: instance GHC.Show.Show Network.AWS.StorageGateway.CancelArchival.CancelArchival
- Network.AWS.StorageGateway.CancelArchival: instance GHC.Show.Show Network.AWS.StorageGateway.CancelArchival.CancelArchivalResponse
- Network.AWS.StorageGateway.CancelArchival: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.CancelArchival.CancelArchival
- Network.AWS.StorageGateway.CancelArchival: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.CancelArchival.CancelArchival
- Network.AWS.StorageGateway.CancelArchival: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.CancelArchival.CancelArchival
- Network.AWS.StorageGateway.CancelArchival: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.CancelArchival.CancelArchival
- Network.AWS.StorageGateway.CancelRetrieval: cancelRetrieval :: Text -> Text -> CancelRetrieval
- Network.AWS.StorageGateway.CancelRetrieval: cancelRetrievalResponse :: Int -> CancelRetrievalResponse
- Network.AWS.StorageGateway.CancelRetrieval: crGatewayARN :: Lens' CancelRetrieval Text
- Network.AWS.StorageGateway.CancelRetrieval: crTapeARN :: Lens' CancelRetrieval Text
- Network.AWS.StorageGateway.CancelRetrieval: crrsResponseStatus :: Lens' CancelRetrievalResponse Int
- Network.AWS.StorageGateway.CancelRetrieval: crrsTapeARN :: Lens' CancelRetrievalResponse (Maybe Text)
- Network.AWS.StorageGateway.CancelRetrieval: data CancelRetrieval
- Network.AWS.StorageGateway.CancelRetrieval: data CancelRetrievalResponse
- Network.AWS.StorageGateway.CancelRetrieval: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.CancelRetrieval.CancelRetrieval
- Network.AWS.StorageGateway.CancelRetrieval: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.CancelRetrieval.CancelRetrievalResponse
- Network.AWS.StorageGateway.CancelRetrieval: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.CancelRetrieval.CancelRetrieval
- Network.AWS.StorageGateway.CancelRetrieval: instance Data.Data.Data Network.AWS.StorageGateway.CancelRetrieval.CancelRetrieval
- Network.AWS.StorageGateway.CancelRetrieval: instance Data.Data.Data Network.AWS.StorageGateway.CancelRetrieval.CancelRetrievalResponse
- Network.AWS.StorageGateway.CancelRetrieval: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.CancelRetrieval.CancelRetrieval
- Network.AWS.StorageGateway.CancelRetrieval: instance GHC.Classes.Eq Network.AWS.StorageGateway.CancelRetrieval.CancelRetrieval
- Network.AWS.StorageGateway.CancelRetrieval: instance GHC.Classes.Eq Network.AWS.StorageGateway.CancelRetrieval.CancelRetrievalResponse
- Network.AWS.StorageGateway.CancelRetrieval: instance GHC.Generics.Generic Network.AWS.StorageGateway.CancelRetrieval.CancelRetrieval
- Network.AWS.StorageGateway.CancelRetrieval: instance GHC.Generics.Generic Network.AWS.StorageGateway.CancelRetrieval.CancelRetrievalResponse
- Network.AWS.StorageGateway.CancelRetrieval: instance GHC.Read.Read Network.AWS.StorageGateway.CancelRetrieval.CancelRetrieval
- Network.AWS.StorageGateway.CancelRetrieval: instance GHC.Read.Read Network.AWS.StorageGateway.CancelRetrieval.CancelRetrievalResponse
- Network.AWS.StorageGateway.CancelRetrieval: instance GHC.Show.Show Network.AWS.StorageGateway.CancelRetrieval.CancelRetrieval
- Network.AWS.StorageGateway.CancelRetrieval: instance GHC.Show.Show Network.AWS.StorageGateway.CancelRetrieval.CancelRetrievalResponse
- Network.AWS.StorageGateway.CancelRetrieval: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.CancelRetrieval.CancelRetrieval
- Network.AWS.StorageGateway.CancelRetrieval: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.CancelRetrieval.CancelRetrieval
- Network.AWS.StorageGateway.CancelRetrieval: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.CancelRetrieval.CancelRetrieval
- Network.AWS.StorageGateway.CancelRetrieval: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.CancelRetrieval.CancelRetrieval
- Network.AWS.StorageGateway.CreateCachediSCSIVolume: ccscsivClientToken :: Lens' CreateCachediSCSIVolume Text
- Network.AWS.StorageGateway.CreateCachediSCSIVolume: ccscsivGatewayARN :: Lens' CreateCachediSCSIVolume Text
- Network.AWS.StorageGateway.CreateCachediSCSIVolume: ccscsivNetworkInterfaceId :: Lens' CreateCachediSCSIVolume Text
- Network.AWS.StorageGateway.CreateCachediSCSIVolume: ccscsivSnapshotId :: Lens' CreateCachediSCSIVolume (Maybe Text)
- Network.AWS.StorageGateway.CreateCachediSCSIVolume: ccscsivSourceVolumeARN :: Lens' CreateCachediSCSIVolume (Maybe Text)
- Network.AWS.StorageGateway.CreateCachediSCSIVolume: ccscsivTargetName :: Lens' CreateCachediSCSIVolume Text
- Network.AWS.StorageGateway.CreateCachediSCSIVolume: ccscsivVolumeSizeInBytes :: Lens' CreateCachediSCSIVolume Integer
- Network.AWS.StorageGateway.CreateCachediSCSIVolume: ccscsivrsResponseStatus :: Lens' CreateCachediSCSIVolumeResponse Int
- Network.AWS.StorageGateway.CreateCachediSCSIVolume: ccscsivrsTargetARN :: Lens' CreateCachediSCSIVolumeResponse (Maybe Text)
- Network.AWS.StorageGateway.CreateCachediSCSIVolume: ccscsivrsVolumeARN :: Lens' CreateCachediSCSIVolumeResponse (Maybe Text)
- Network.AWS.StorageGateway.CreateCachediSCSIVolume: createCachediSCSIVolume :: Text -> Integer -> Text -> Text -> Text -> CreateCachediSCSIVolume
- Network.AWS.StorageGateway.CreateCachediSCSIVolume: createCachediSCSIVolumeResponse :: Int -> CreateCachediSCSIVolumeResponse
- Network.AWS.StorageGateway.CreateCachediSCSIVolume: data CreateCachediSCSIVolume
- Network.AWS.StorageGateway.CreateCachediSCSIVolume: data CreateCachediSCSIVolumeResponse
- Network.AWS.StorageGateway.CreateCachediSCSIVolume: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.CreateCachediSCSIVolume.CreateCachediSCSIVolume
- Network.AWS.StorageGateway.CreateCachediSCSIVolume: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.CreateCachediSCSIVolume.CreateCachediSCSIVolumeResponse
- Network.AWS.StorageGateway.CreateCachediSCSIVolume: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.CreateCachediSCSIVolume.CreateCachediSCSIVolume
- Network.AWS.StorageGateway.CreateCachediSCSIVolume: instance Data.Data.Data Network.AWS.StorageGateway.CreateCachediSCSIVolume.CreateCachediSCSIVolume
- Network.AWS.StorageGateway.CreateCachediSCSIVolume: instance Data.Data.Data Network.AWS.StorageGateway.CreateCachediSCSIVolume.CreateCachediSCSIVolumeResponse
- Network.AWS.StorageGateway.CreateCachediSCSIVolume: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.CreateCachediSCSIVolume.CreateCachediSCSIVolume
- Network.AWS.StorageGateway.CreateCachediSCSIVolume: instance GHC.Classes.Eq Network.AWS.StorageGateway.CreateCachediSCSIVolume.CreateCachediSCSIVolume
- Network.AWS.StorageGateway.CreateCachediSCSIVolume: instance GHC.Classes.Eq Network.AWS.StorageGateway.CreateCachediSCSIVolume.CreateCachediSCSIVolumeResponse
- Network.AWS.StorageGateway.CreateCachediSCSIVolume: instance GHC.Generics.Generic Network.AWS.StorageGateway.CreateCachediSCSIVolume.CreateCachediSCSIVolume
- Network.AWS.StorageGateway.CreateCachediSCSIVolume: instance GHC.Generics.Generic Network.AWS.StorageGateway.CreateCachediSCSIVolume.CreateCachediSCSIVolumeResponse
- Network.AWS.StorageGateway.CreateCachediSCSIVolume: instance GHC.Read.Read Network.AWS.StorageGateway.CreateCachediSCSIVolume.CreateCachediSCSIVolume
- Network.AWS.StorageGateway.CreateCachediSCSIVolume: instance GHC.Read.Read Network.AWS.StorageGateway.CreateCachediSCSIVolume.CreateCachediSCSIVolumeResponse
- Network.AWS.StorageGateway.CreateCachediSCSIVolume: instance GHC.Show.Show Network.AWS.StorageGateway.CreateCachediSCSIVolume.CreateCachediSCSIVolume
- Network.AWS.StorageGateway.CreateCachediSCSIVolume: instance GHC.Show.Show Network.AWS.StorageGateway.CreateCachediSCSIVolume.CreateCachediSCSIVolumeResponse
- Network.AWS.StorageGateway.CreateCachediSCSIVolume: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.CreateCachediSCSIVolume.CreateCachediSCSIVolume
- Network.AWS.StorageGateway.CreateCachediSCSIVolume: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.CreateCachediSCSIVolume.CreateCachediSCSIVolume
- Network.AWS.StorageGateway.CreateCachediSCSIVolume: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.CreateCachediSCSIVolume.CreateCachediSCSIVolume
- Network.AWS.StorageGateway.CreateCachediSCSIVolume: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.CreateCachediSCSIVolume.CreateCachediSCSIVolume
- Network.AWS.StorageGateway.CreateNFSFileShare: cnfsfsClientList :: Lens' CreateNFSFileShare (Maybe (NonEmpty Text))
- Network.AWS.StorageGateway.CreateNFSFileShare: cnfsfsClientToken :: Lens' CreateNFSFileShare Text
- Network.AWS.StorageGateway.CreateNFSFileShare: cnfsfsDefaultStorageClass :: Lens' CreateNFSFileShare (Maybe Text)
- Network.AWS.StorageGateway.CreateNFSFileShare: cnfsfsGatewayARN :: Lens' CreateNFSFileShare Text
- Network.AWS.StorageGateway.CreateNFSFileShare: cnfsfsGuessMIMETypeEnabled :: Lens' CreateNFSFileShare (Maybe Bool)
- Network.AWS.StorageGateway.CreateNFSFileShare: cnfsfsKMSEncrypted :: Lens' CreateNFSFileShare (Maybe Bool)
- Network.AWS.StorageGateway.CreateNFSFileShare: cnfsfsKMSKey :: Lens' CreateNFSFileShare (Maybe Text)
- Network.AWS.StorageGateway.CreateNFSFileShare: cnfsfsLocationARN :: Lens' CreateNFSFileShare Text
- Network.AWS.StorageGateway.CreateNFSFileShare: cnfsfsNFSFileShareDefaults :: Lens' CreateNFSFileShare (Maybe NFSFileShareDefaults)
- Network.AWS.StorageGateway.CreateNFSFileShare: cnfsfsObjectACL :: Lens' CreateNFSFileShare (Maybe ObjectACL)
- Network.AWS.StorageGateway.CreateNFSFileShare: cnfsfsReadOnly :: Lens' CreateNFSFileShare (Maybe Bool)
- Network.AWS.StorageGateway.CreateNFSFileShare: cnfsfsRequesterPays :: Lens' CreateNFSFileShare (Maybe Bool)
- Network.AWS.StorageGateway.CreateNFSFileShare: cnfsfsRole :: Lens' CreateNFSFileShare Text
- Network.AWS.StorageGateway.CreateNFSFileShare: cnfsfsSquash :: Lens' CreateNFSFileShare (Maybe Text)
- Network.AWS.StorageGateway.CreateNFSFileShare: cnfsfsrsFileShareARN :: Lens' CreateNFSFileShareResponse (Maybe Text)
- Network.AWS.StorageGateway.CreateNFSFileShare: cnfsfsrsResponseStatus :: Lens' CreateNFSFileShareResponse Int
- Network.AWS.StorageGateway.CreateNFSFileShare: createNFSFileShare :: Text -> Text -> Text -> Text -> CreateNFSFileShare
- Network.AWS.StorageGateway.CreateNFSFileShare: createNFSFileShareResponse :: Int -> CreateNFSFileShareResponse
- Network.AWS.StorageGateway.CreateNFSFileShare: data CreateNFSFileShare
- Network.AWS.StorageGateway.CreateNFSFileShare: data CreateNFSFileShareResponse
- Network.AWS.StorageGateway.CreateNFSFileShare: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.CreateNFSFileShare.CreateNFSFileShare
- Network.AWS.StorageGateway.CreateNFSFileShare: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.CreateNFSFileShare.CreateNFSFileShareResponse
- Network.AWS.StorageGateway.CreateNFSFileShare: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.CreateNFSFileShare.CreateNFSFileShare
- Network.AWS.StorageGateway.CreateNFSFileShare: instance Data.Data.Data Network.AWS.StorageGateway.CreateNFSFileShare.CreateNFSFileShare
- Network.AWS.StorageGateway.CreateNFSFileShare: instance Data.Data.Data Network.AWS.StorageGateway.CreateNFSFileShare.CreateNFSFileShareResponse
- Network.AWS.StorageGateway.CreateNFSFileShare: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.CreateNFSFileShare.CreateNFSFileShare
- Network.AWS.StorageGateway.CreateNFSFileShare: instance GHC.Classes.Eq Network.AWS.StorageGateway.CreateNFSFileShare.CreateNFSFileShare
- Network.AWS.StorageGateway.CreateNFSFileShare: instance GHC.Classes.Eq Network.AWS.StorageGateway.CreateNFSFileShare.CreateNFSFileShareResponse
- Network.AWS.StorageGateway.CreateNFSFileShare: instance GHC.Generics.Generic Network.AWS.StorageGateway.CreateNFSFileShare.CreateNFSFileShare
- Network.AWS.StorageGateway.CreateNFSFileShare: instance GHC.Generics.Generic Network.AWS.StorageGateway.CreateNFSFileShare.CreateNFSFileShareResponse
- Network.AWS.StorageGateway.CreateNFSFileShare: instance GHC.Read.Read Network.AWS.StorageGateway.CreateNFSFileShare.CreateNFSFileShare
- Network.AWS.StorageGateway.CreateNFSFileShare: instance GHC.Read.Read Network.AWS.StorageGateway.CreateNFSFileShare.CreateNFSFileShareResponse
- Network.AWS.StorageGateway.CreateNFSFileShare: instance GHC.Show.Show Network.AWS.StorageGateway.CreateNFSFileShare.CreateNFSFileShare
- Network.AWS.StorageGateway.CreateNFSFileShare: instance GHC.Show.Show Network.AWS.StorageGateway.CreateNFSFileShare.CreateNFSFileShareResponse
- Network.AWS.StorageGateway.CreateNFSFileShare: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.CreateNFSFileShare.CreateNFSFileShare
- Network.AWS.StorageGateway.CreateNFSFileShare: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.CreateNFSFileShare.CreateNFSFileShare
- Network.AWS.StorageGateway.CreateNFSFileShare: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.CreateNFSFileShare.CreateNFSFileShare
- Network.AWS.StorageGateway.CreateNFSFileShare: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.CreateNFSFileShare.CreateNFSFileShare
- Network.AWS.StorageGateway.CreateSnapshot: createSnapshot :: Text -> Text -> CreateSnapshot
- Network.AWS.StorageGateway.CreateSnapshot: createSnapshotResponse :: Int -> CreateSnapshotResponse
- Network.AWS.StorageGateway.CreateSnapshot: csSnapshotDescription :: Lens' CreateSnapshot Text
- Network.AWS.StorageGateway.CreateSnapshot: csVolumeARN :: Lens' CreateSnapshot Text
- Network.AWS.StorageGateway.CreateSnapshot: csrsResponseStatus :: Lens' CreateSnapshotResponse Int
- Network.AWS.StorageGateway.CreateSnapshot: csrsSnapshotId :: Lens' CreateSnapshotResponse (Maybe Text)
- Network.AWS.StorageGateway.CreateSnapshot: csrsVolumeARN :: Lens' CreateSnapshotResponse (Maybe Text)
- Network.AWS.StorageGateway.CreateSnapshot: data CreateSnapshot
- Network.AWS.StorageGateway.CreateSnapshot: data CreateSnapshotResponse
- Network.AWS.StorageGateway.CreateSnapshot: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.CreateSnapshot.CreateSnapshot
- Network.AWS.StorageGateway.CreateSnapshot: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.CreateSnapshot.CreateSnapshotResponse
- Network.AWS.StorageGateway.CreateSnapshot: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.CreateSnapshot.CreateSnapshot
- Network.AWS.StorageGateway.CreateSnapshot: instance Data.Data.Data Network.AWS.StorageGateway.CreateSnapshot.CreateSnapshot
- Network.AWS.StorageGateway.CreateSnapshot: instance Data.Data.Data Network.AWS.StorageGateway.CreateSnapshot.CreateSnapshotResponse
- Network.AWS.StorageGateway.CreateSnapshot: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.CreateSnapshot.CreateSnapshot
- Network.AWS.StorageGateway.CreateSnapshot: instance GHC.Classes.Eq Network.AWS.StorageGateway.CreateSnapshot.CreateSnapshot
- Network.AWS.StorageGateway.CreateSnapshot: instance GHC.Classes.Eq Network.AWS.StorageGateway.CreateSnapshot.CreateSnapshotResponse
- Network.AWS.StorageGateway.CreateSnapshot: instance GHC.Generics.Generic Network.AWS.StorageGateway.CreateSnapshot.CreateSnapshot
- Network.AWS.StorageGateway.CreateSnapshot: instance GHC.Generics.Generic Network.AWS.StorageGateway.CreateSnapshot.CreateSnapshotResponse
- Network.AWS.StorageGateway.CreateSnapshot: instance GHC.Read.Read Network.AWS.StorageGateway.CreateSnapshot.CreateSnapshot
- Network.AWS.StorageGateway.CreateSnapshot: instance GHC.Read.Read Network.AWS.StorageGateway.CreateSnapshot.CreateSnapshotResponse
- Network.AWS.StorageGateway.CreateSnapshot: instance GHC.Show.Show Network.AWS.StorageGateway.CreateSnapshot.CreateSnapshot
- Network.AWS.StorageGateway.CreateSnapshot: instance GHC.Show.Show Network.AWS.StorageGateway.CreateSnapshot.CreateSnapshotResponse
- Network.AWS.StorageGateway.CreateSnapshot: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.CreateSnapshot.CreateSnapshot
- Network.AWS.StorageGateway.CreateSnapshot: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.CreateSnapshot.CreateSnapshot
- Network.AWS.StorageGateway.CreateSnapshot: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.CreateSnapshot.CreateSnapshot
- Network.AWS.StorageGateway.CreateSnapshot: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.CreateSnapshot.CreateSnapshot
- Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: createSnapshotFromVolumeRecoveryPoint :: Text -> Text -> CreateSnapshotFromVolumeRecoveryPoint
- Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: createSnapshotFromVolumeRecoveryPointResponse :: Int -> CreateSnapshotFromVolumeRecoveryPointResponse
- Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: csfvrpSnapshotDescription :: Lens' CreateSnapshotFromVolumeRecoveryPoint Text
- Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: csfvrpVolumeARN :: Lens' CreateSnapshotFromVolumeRecoveryPoint Text
- Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: csfvrprsResponseStatus :: Lens' CreateSnapshotFromVolumeRecoveryPointResponse Int
- Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: csfvrprsSnapshotId :: Lens' CreateSnapshotFromVolumeRecoveryPointResponse (Maybe Text)
- Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: csfvrprsVolumeARN :: Lens' CreateSnapshotFromVolumeRecoveryPointResponse (Maybe Text)
- Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: csfvrprsVolumeRecoveryPointTime :: Lens' CreateSnapshotFromVolumeRecoveryPointResponse (Maybe Text)
- Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: data CreateSnapshotFromVolumeRecoveryPoint
- Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: data CreateSnapshotFromVolumeRecoveryPointResponse
- Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint.CreateSnapshotFromVolumeRecoveryPoint
- Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint.CreateSnapshotFromVolumeRecoveryPointResponse
- Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint.CreateSnapshotFromVolumeRecoveryPoint
- Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: instance Data.Data.Data Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint.CreateSnapshotFromVolumeRecoveryPoint
- Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: instance Data.Data.Data Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint.CreateSnapshotFromVolumeRecoveryPointResponse
- Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint.CreateSnapshotFromVolumeRecoveryPoint
- Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: instance GHC.Classes.Eq Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint.CreateSnapshotFromVolumeRecoveryPoint
- Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: instance GHC.Classes.Eq Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint.CreateSnapshotFromVolumeRecoveryPointResponse
- Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: instance GHC.Generics.Generic Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint.CreateSnapshotFromVolumeRecoveryPoint
- Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: instance GHC.Generics.Generic Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint.CreateSnapshotFromVolumeRecoveryPointResponse
- Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: instance GHC.Read.Read Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint.CreateSnapshotFromVolumeRecoveryPoint
- Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: instance GHC.Read.Read Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint.CreateSnapshotFromVolumeRecoveryPointResponse
- Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: instance GHC.Show.Show Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint.CreateSnapshotFromVolumeRecoveryPoint
- Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: instance GHC.Show.Show Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint.CreateSnapshotFromVolumeRecoveryPointResponse
- Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint.CreateSnapshotFromVolumeRecoveryPoint
- Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint.CreateSnapshotFromVolumeRecoveryPoint
- Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint.CreateSnapshotFromVolumeRecoveryPoint
- Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint.CreateSnapshotFromVolumeRecoveryPoint
- Network.AWS.StorageGateway.CreateStorediSCSIVolume: createStorediSCSIVolume :: Text -> Text -> Bool -> Text -> Text -> CreateStorediSCSIVolume
- Network.AWS.StorageGateway.CreateStorediSCSIVolume: createStorediSCSIVolumeResponse :: Int -> CreateStorediSCSIVolumeResponse
- Network.AWS.StorageGateway.CreateStorediSCSIVolume: csscsivDiskId :: Lens' CreateStorediSCSIVolume Text
- Network.AWS.StorageGateway.CreateStorediSCSIVolume: csscsivGatewayARN :: Lens' CreateStorediSCSIVolume Text
- Network.AWS.StorageGateway.CreateStorediSCSIVolume: csscsivNetworkInterfaceId :: Lens' CreateStorediSCSIVolume Text
- Network.AWS.StorageGateway.CreateStorediSCSIVolume: csscsivPreserveExistingData :: Lens' CreateStorediSCSIVolume Bool
- Network.AWS.StorageGateway.CreateStorediSCSIVolume: csscsivSnapshotId :: Lens' CreateStorediSCSIVolume (Maybe Text)
- Network.AWS.StorageGateway.CreateStorediSCSIVolume: csscsivTargetName :: Lens' CreateStorediSCSIVolume Text
- Network.AWS.StorageGateway.CreateStorediSCSIVolume: csscsivrsResponseStatus :: Lens' CreateStorediSCSIVolumeResponse Int
- Network.AWS.StorageGateway.CreateStorediSCSIVolume: csscsivrsTargetARN :: Lens' CreateStorediSCSIVolumeResponse (Maybe Text)
- Network.AWS.StorageGateway.CreateStorediSCSIVolume: csscsivrsVolumeARN :: Lens' CreateStorediSCSIVolumeResponse (Maybe Text)
- Network.AWS.StorageGateway.CreateStorediSCSIVolume: csscsivrsVolumeSizeInBytes :: Lens' CreateStorediSCSIVolumeResponse (Maybe Integer)
- Network.AWS.StorageGateway.CreateStorediSCSIVolume: data CreateStorediSCSIVolume
- Network.AWS.StorageGateway.CreateStorediSCSIVolume: data CreateStorediSCSIVolumeResponse
- Network.AWS.StorageGateway.CreateStorediSCSIVolume: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.CreateStorediSCSIVolume.CreateStorediSCSIVolume
- Network.AWS.StorageGateway.CreateStorediSCSIVolume: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.CreateStorediSCSIVolume.CreateStorediSCSIVolumeResponse
- Network.AWS.StorageGateway.CreateStorediSCSIVolume: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.CreateStorediSCSIVolume.CreateStorediSCSIVolume
- Network.AWS.StorageGateway.CreateStorediSCSIVolume: instance Data.Data.Data Network.AWS.StorageGateway.CreateStorediSCSIVolume.CreateStorediSCSIVolume
- Network.AWS.StorageGateway.CreateStorediSCSIVolume: instance Data.Data.Data Network.AWS.StorageGateway.CreateStorediSCSIVolume.CreateStorediSCSIVolumeResponse
- Network.AWS.StorageGateway.CreateStorediSCSIVolume: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.CreateStorediSCSIVolume.CreateStorediSCSIVolume
- Network.AWS.StorageGateway.CreateStorediSCSIVolume: instance GHC.Classes.Eq Network.AWS.StorageGateway.CreateStorediSCSIVolume.CreateStorediSCSIVolume
- Network.AWS.StorageGateway.CreateStorediSCSIVolume: instance GHC.Classes.Eq Network.AWS.StorageGateway.CreateStorediSCSIVolume.CreateStorediSCSIVolumeResponse
- Network.AWS.StorageGateway.CreateStorediSCSIVolume: instance GHC.Generics.Generic Network.AWS.StorageGateway.CreateStorediSCSIVolume.CreateStorediSCSIVolume
- Network.AWS.StorageGateway.CreateStorediSCSIVolume: instance GHC.Generics.Generic Network.AWS.StorageGateway.CreateStorediSCSIVolume.CreateStorediSCSIVolumeResponse
- Network.AWS.StorageGateway.CreateStorediSCSIVolume: instance GHC.Read.Read Network.AWS.StorageGateway.CreateStorediSCSIVolume.CreateStorediSCSIVolume
- Network.AWS.StorageGateway.CreateStorediSCSIVolume: instance GHC.Read.Read Network.AWS.StorageGateway.CreateStorediSCSIVolume.CreateStorediSCSIVolumeResponse
- Network.AWS.StorageGateway.CreateStorediSCSIVolume: instance GHC.Show.Show Network.AWS.StorageGateway.CreateStorediSCSIVolume.CreateStorediSCSIVolume
- Network.AWS.StorageGateway.CreateStorediSCSIVolume: instance GHC.Show.Show Network.AWS.StorageGateway.CreateStorediSCSIVolume.CreateStorediSCSIVolumeResponse
- Network.AWS.StorageGateway.CreateStorediSCSIVolume: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.CreateStorediSCSIVolume.CreateStorediSCSIVolume
- Network.AWS.StorageGateway.CreateStorediSCSIVolume: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.CreateStorediSCSIVolume.CreateStorediSCSIVolume
- Network.AWS.StorageGateway.CreateStorediSCSIVolume: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.CreateStorediSCSIVolume.CreateStorediSCSIVolume
- Network.AWS.StorageGateway.CreateStorediSCSIVolume: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.CreateStorediSCSIVolume.CreateStorediSCSIVolume
- Network.AWS.StorageGateway.CreateTapeWithBarcode: createTapeWithBarcode :: Text -> Integer -> Text -> CreateTapeWithBarcode
- Network.AWS.StorageGateway.CreateTapeWithBarcode: createTapeWithBarcodeResponse :: Int -> CreateTapeWithBarcodeResponse
- Network.AWS.StorageGateway.CreateTapeWithBarcode: ctwbGatewayARN :: Lens' CreateTapeWithBarcode Text
- Network.AWS.StorageGateway.CreateTapeWithBarcode: ctwbTapeBarcode :: Lens' CreateTapeWithBarcode Text
- Network.AWS.StorageGateway.CreateTapeWithBarcode: ctwbTapeSizeInBytes :: Lens' CreateTapeWithBarcode Integer
- Network.AWS.StorageGateway.CreateTapeWithBarcode: ctwbrsResponseStatus :: Lens' CreateTapeWithBarcodeResponse Int
- Network.AWS.StorageGateway.CreateTapeWithBarcode: ctwbrsTapeARN :: Lens' CreateTapeWithBarcodeResponse (Maybe Text)
- Network.AWS.StorageGateway.CreateTapeWithBarcode: data CreateTapeWithBarcode
- Network.AWS.StorageGateway.CreateTapeWithBarcode: data CreateTapeWithBarcodeResponse
- Network.AWS.StorageGateway.CreateTapeWithBarcode: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.CreateTapeWithBarcode.CreateTapeWithBarcode
- Network.AWS.StorageGateway.CreateTapeWithBarcode: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.CreateTapeWithBarcode.CreateTapeWithBarcodeResponse
- Network.AWS.StorageGateway.CreateTapeWithBarcode: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.CreateTapeWithBarcode.CreateTapeWithBarcode
- Network.AWS.StorageGateway.CreateTapeWithBarcode: instance Data.Data.Data Network.AWS.StorageGateway.CreateTapeWithBarcode.CreateTapeWithBarcode
- Network.AWS.StorageGateway.CreateTapeWithBarcode: instance Data.Data.Data Network.AWS.StorageGateway.CreateTapeWithBarcode.CreateTapeWithBarcodeResponse
- Network.AWS.StorageGateway.CreateTapeWithBarcode: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.CreateTapeWithBarcode.CreateTapeWithBarcode
- Network.AWS.StorageGateway.CreateTapeWithBarcode: instance GHC.Classes.Eq Network.AWS.StorageGateway.CreateTapeWithBarcode.CreateTapeWithBarcode
- Network.AWS.StorageGateway.CreateTapeWithBarcode: instance GHC.Classes.Eq Network.AWS.StorageGateway.CreateTapeWithBarcode.CreateTapeWithBarcodeResponse
- Network.AWS.StorageGateway.CreateTapeWithBarcode: instance GHC.Generics.Generic Network.AWS.StorageGateway.CreateTapeWithBarcode.CreateTapeWithBarcode
- Network.AWS.StorageGateway.CreateTapeWithBarcode: instance GHC.Generics.Generic Network.AWS.StorageGateway.CreateTapeWithBarcode.CreateTapeWithBarcodeResponse
- Network.AWS.StorageGateway.CreateTapeWithBarcode: instance GHC.Read.Read Network.AWS.StorageGateway.CreateTapeWithBarcode.CreateTapeWithBarcode
- Network.AWS.StorageGateway.CreateTapeWithBarcode: instance GHC.Read.Read Network.AWS.StorageGateway.CreateTapeWithBarcode.CreateTapeWithBarcodeResponse
- Network.AWS.StorageGateway.CreateTapeWithBarcode: instance GHC.Show.Show Network.AWS.StorageGateway.CreateTapeWithBarcode.CreateTapeWithBarcode
- Network.AWS.StorageGateway.CreateTapeWithBarcode: instance GHC.Show.Show Network.AWS.StorageGateway.CreateTapeWithBarcode.CreateTapeWithBarcodeResponse
- Network.AWS.StorageGateway.CreateTapeWithBarcode: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.CreateTapeWithBarcode.CreateTapeWithBarcode
- Network.AWS.StorageGateway.CreateTapeWithBarcode: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.CreateTapeWithBarcode.CreateTapeWithBarcode
- Network.AWS.StorageGateway.CreateTapeWithBarcode: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.CreateTapeWithBarcode.CreateTapeWithBarcode
- Network.AWS.StorageGateway.CreateTapeWithBarcode: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.CreateTapeWithBarcode.CreateTapeWithBarcode
- Network.AWS.StorageGateway.CreateTapes: createTapes :: Text -> Integer -> Text -> Natural -> Text -> CreateTapes
- Network.AWS.StorageGateway.CreateTapes: createTapesResponse :: Int -> CreateTapesResponse
- Network.AWS.StorageGateway.CreateTapes: ctClientToken :: Lens' CreateTapes Text
- Network.AWS.StorageGateway.CreateTapes: ctGatewayARN :: Lens' CreateTapes Text
- Network.AWS.StorageGateway.CreateTapes: ctNumTapesToCreate :: Lens' CreateTapes Natural
- Network.AWS.StorageGateway.CreateTapes: ctTapeBarcodePrefix :: Lens' CreateTapes Text
- Network.AWS.StorageGateway.CreateTapes: ctTapeSizeInBytes :: Lens' CreateTapes Integer
- Network.AWS.StorageGateway.CreateTapes: ctrsResponseStatus :: Lens' CreateTapesResponse Int
- Network.AWS.StorageGateway.CreateTapes: ctrsTapeARNs :: Lens' CreateTapesResponse [Text]
- Network.AWS.StorageGateway.CreateTapes: data CreateTapes
- Network.AWS.StorageGateway.CreateTapes: data CreateTapesResponse
- Network.AWS.StorageGateway.CreateTapes: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.CreateTapes.CreateTapes
- Network.AWS.StorageGateway.CreateTapes: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.CreateTapes.CreateTapesResponse
- Network.AWS.StorageGateway.CreateTapes: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.CreateTapes.CreateTapes
- Network.AWS.StorageGateway.CreateTapes: instance Data.Data.Data Network.AWS.StorageGateway.CreateTapes.CreateTapes
- Network.AWS.StorageGateway.CreateTapes: instance Data.Data.Data Network.AWS.StorageGateway.CreateTapes.CreateTapesResponse
- Network.AWS.StorageGateway.CreateTapes: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.CreateTapes.CreateTapes
- Network.AWS.StorageGateway.CreateTapes: instance GHC.Classes.Eq Network.AWS.StorageGateway.CreateTapes.CreateTapes
- Network.AWS.StorageGateway.CreateTapes: instance GHC.Classes.Eq Network.AWS.StorageGateway.CreateTapes.CreateTapesResponse
- Network.AWS.StorageGateway.CreateTapes: instance GHC.Generics.Generic Network.AWS.StorageGateway.CreateTapes.CreateTapes
- Network.AWS.StorageGateway.CreateTapes: instance GHC.Generics.Generic Network.AWS.StorageGateway.CreateTapes.CreateTapesResponse
- Network.AWS.StorageGateway.CreateTapes: instance GHC.Read.Read Network.AWS.StorageGateway.CreateTapes.CreateTapes
- Network.AWS.StorageGateway.CreateTapes: instance GHC.Read.Read Network.AWS.StorageGateway.CreateTapes.CreateTapesResponse
- Network.AWS.StorageGateway.CreateTapes: instance GHC.Show.Show Network.AWS.StorageGateway.CreateTapes.CreateTapes
- Network.AWS.StorageGateway.CreateTapes: instance GHC.Show.Show Network.AWS.StorageGateway.CreateTapes.CreateTapesResponse
- Network.AWS.StorageGateway.CreateTapes: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.CreateTapes.CreateTapes
- Network.AWS.StorageGateway.CreateTapes: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.CreateTapes.CreateTapes
- Network.AWS.StorageGateway.CreateTapes: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.CreateTapes.CreateTapes
- Network.AWS.StorageGateway.CreateTapes: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.CreateTapes.CreateTapes
- Network.AWS.StorageGateway.DeleteBandwidthRateLimit: data DeleteBandwidthRateLimit
- Network.AWS.StorageGateway.DeleteBandwidthRateLimit: data DeleteBandwidthRateLimitResponse
- Network.AWS.StorageGateway.DeleteBandwidthRateLimit: dbrlbBandwidthType :: Lens' DeleteBandwidthRateLimit Text
- Network.AWS.StorageGateway.DeleteBandwidthRateLimit: dbrlbGatewayARN :: Lens' DeleteBandwidthRateLimit Text
- Network.AWS.StorageGateway.DeleteBandwidthRateLimit: deleteBandwidthRateLimit :: Text -> Text -> DeleteBandwidthRateLimit
- Network.AWS.StorageGateway.DeleteBandwidthRateLimit: deleteBandwidthRateLimitResponse :: Int -> DeleteBandwidthRateLimitResponse
- Network.AWS.StorageGateway.DeleteBandwidthRateLimit: delrsGatewayARN :: Lens' DeleteBandwidthRateLimitResponse (Maybe Text)
- Network.AWS.StorageGateway.DeleteBandwidthRateLimit: delrsResponseStatus :: Lens' DeleteBandwidthRateLimitResponse Int
- Network.AWS.StorageGateway.DeleteBandwidthRateLimit: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DeleteBandwidthRateLimit.DeleteBandwidthRateLimit
- Network.AWS.StorageGateway.DeleteBandwidthRateLimit: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DeleteBandwidthRateLimit.DeleteBandwidthRateLimitResponse
- Network.AWS.StorageGateway.DeleteBandwidthRateLimit: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.DeleteBandwidthRateLimit.DeleteBandwidthRateLimit
- Network.AWS.StorageGateway.DeleteBandwidthRateLimit: instance Data.Data.Data Network.AWS.StorageGateway.DeleteBandwidthRateLimit.DeleteBandwidthRateLimit
- Network.AWS.StorageGateway.DeleteBandwidthRateLimit: instance Data.Data.Data Network.AWS.StorageGateway.DeleteBandwidthRateLimit.DeleteBandwidthRateLimitResponse
- Network.AWS.StorageGateway.DeleteBandwidthRateLimit: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.DeleteBandwidthRateLimit.DeleteBandwidthRateLimit
- Network.AWS.StorageGateway.DeleteBandwidthRateLimit: instance GHC.Classes.Eq Network.AWS.StorageGateway.DeleteBandwidthRateLimit.DeleteBandwidthRateLimit
- Network.AWS.StorageGateway.DeleteBandwidthRateLimit: instance GHC.Classes.Eq Network.AWS.StorageGateway.DeleteBandwidthRateLimit.DeleteBandwidthRateLimitResponse
- Network.AWS.StorageGateway.DeleteBandwidthRateLimit: instance GHC.Generics.Generic Network.AWS.StorageGateway.DeleteBandwidthRateLimit.DeleteBandwidthRateLimit
- Network.AWS.StorageGateway.DeleteBandwidthRateLimit: instance GHC.Generics.Generic Network.AWS.StorageGateway.DeleteBandwidthRateLimit.DeleteBandwidthRateLimitResponse
- Network.AWS.StorageGateway.DeleteBandwidthRateLimit: instance GHC.Read.Read Network.AWS.StorageGateway.DeleteBandwidthRateLimit.DeleteBandwidthRateLimit
- Network.AWS.StorageGateway.DeleteBandwidthRateLimit: instance GHC.Read.Read Network.AWS.StorageGateway.DeleteBandwidthRateLimit.DeleteBandwidthRateLimitResponse
- Network.AWS.StorageGateway.DeleteBandwidthRateLimit: instance GHC.Show.Show Network.AWS.StorageGateway.DeleteBandwidthRateLimit.DeleteBandwidthRateLimit
- Network.AWS.StorageGateway.DeleteBandwidthRateLimit: instance GHC.Show.Show Network.AWS.StorageGateway.DeleteBandwidthRateLimit.DeleteBandwidthRateLimitResponse
- Network.AWS.StorageGateway.DeleteBandwidthRateLimit: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.DeleteBandwidthRateLimit.DeleteBandwidthRateLimit
- Network.AWS.StorageGateway.DeleteBandwidthRateLimit: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.DeleteBandwidthRateLimit.DeleteBandwidthRateLimit
- Network.AWS.StorageGateway.DeleteBandwidthRateLimit: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.DeleteBandwidthRateLimit.DeleteBandwidthRateLimit
- Network.AWS.StorageGateway.DeleteBandwidthRateLimit: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.DeleteBandwidthRateLimit.DeleteBandwidthRateLimit
- Network.AWS.StorageGateway.DeleteChapCredentials: dInitiatorName :: Lens' DeleteChapCredentials Text
- Network.AWS.StorageGateway.DeleteChapCredentials: dTargetARN :: Lens' DeleteChapCredentials Text
- Network.AWS.StorageGateway.DeleteChapCredentials: data DeleteChapCredentials
- Network.AWS.StorageGateway.DeleteChapCredentials: data DeleteChapCredentialsResponse
- Network.AWS.StorageGateway.DeleteChapCredentials: deleteChapCredentials :: Text -> Text -> DeleteChapCredentials
- Network.AWS.StorageGateway.DeleteChapCredentials: deleteChapCredentialsResponse :: Int -> DeleteChapCredentialsResponse
- Network.AWS.StorageGateway.DeleteChapCredentials: drsInitiatorName :: Lens' DeleteChapCredentialsResponse (Maybe Text)
- Network.AWS.StorageGateway.DeleteChapCredentials: drsResponseStatus :: Lens' DeleteChapCredentialsResponse Int
- Network.AWS.StorageGateway.DeleteChapCredentials: drsTargetARN :: Lens' DeleteChapCredentialsResponse (Maybe Text)
- Network.AWS.StorageGateway.DeleteChapCredentials: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DeleteChapCredentials.DeleteChapCredentials
- Network.AWS.StorageGateway.DeleteChapCredentials: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DeleteChapCredentials.DeleteChapCredentialsResponse
- Network.AWS.StorageGateway.DeleteChapCredentials: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.DeleteChapCredentials.DeleteChapCredentials
- Network.AWS.StorageGateway.DeleteChapCredentials: instance Data.Data.Data Network.AWS.StorageGateway.DeleteChapCredentials.DeleteChapCredentials
- Network.AWS.StorageGateway.DeleteChapCredentials: instance Data.Data.Data Network.AWS.StorageGateway.DeleteChapCredentials.DeleteChapCredentialsResponse
- Network.AWS.StorageGateway.DeleteChapCredentials: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.DeleteChapCredentials.DeleteChapCredentials
- Network.AWS.StorageGateway.DeleteChapCredentials: instance GHC.Classes.Eq Network.AWS.StorageGateway.DeleteChapCredentials.DeleteChapCredentials
- Network.AWS.StorageGateway.DeleteChapCredentials: instance GHC.Classes.Eq Network.AWS.StorageGateway.DeleteChapCredentials.DeleteChapCredentialsResponse
- Network.AWS.StorageGateway.DeleteChapCredentials: instance GHC.Generics.Generic Network.AWS.StorageGateway.DeleteChapCredentials.DeleteChapCredentials
- Network.AWS.StorageGateway.DeleteChapCredentials: instance GHC.Generics.Generic Network.AWS.StorageGateway.DeleteChapCredentials.DeleteChapCredentialsResponse
- Network.AWS.StorageGateway.DeleteChapCredentials: instance GHC.Read.Read Network.AWS.StorageGateway.DeleteChapCredentials.DeleteChapCredentials
- Network.AWS.StorageGateway.DeleteChapCredentials: instance GHC.Read.Read Network.AWS.StorageGateway.DeleteChapCredentials.DeleteChapCredentialsResponse
- Network.AWS.StorageGateway.DeleteChapCredentials: instance GHC.Show.Show Network.AWS.StorageGateway.DeleteChapCredentials.DeleteChapCredentials
- Network.AWS.StorageGateway.DeleteChapCredentials: instance GHC.Show.Show Network.AWS.StorageGateway.DeleteChapCredentials.DeleteChapCredentialsResponse
- Network.AWS.StorageGateway.DeleteChapCredentials: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.DeleteChapCredentials.DeleteChapCredentials
- Network.AWS.StorageGateway.DeleteChapCredentials: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.DeleteChapCredentials.DeleteChapCredentials
- Network.AWS.StorageGateway.DeleteChapCredentials: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.DeleteChapCredentials.DeleteChapCredentials
- Network.AWS.StorageGateway.DeleteChapCredentials: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.DeleteChapCredentials.DeleteChapCredentials
- Network.AWS.StorageGateway.DeleteFileShare: data DeleteFileShare
- Network.AWS.StorageGateway.DeleteFileShare: data DeleteFileShareResponse
- Network.AWS.StorageGateway.DeleteFileShare: deleteFileShare :: Text -> DeleteFileShare
- Network.AWS.StorageGateway.DeleteFileShare: deleteFileShareResponse :: Int -> DeleteFileShareResponse
- Network.AWS.StorageGateway.DeleteFileShare: dfsFileShareARN :: Lens' DeleteFileShare Text
- Network.AWS.StorageGateway.DeleteFileShare: dfsForceDelete :: Lens' DeleteFileShare (Maybe Bool)
- Network.AWS.StorageGateway.DeleteFileShare: dfsrsFileShareARN :: Lens' DeleteFileShareResponse (Maybe Text)
- Network.AWS.StorageGateway.DeleteFileShare: dfsrsResponseStatus :: Lens' DeleteFileShareResponse Int
- Network.AWS.StorageGateway.DeleteFileShare: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DeleteFileShare.DeleteFileShare
- Network.AWS.StorageGateway.DeleteFileShare: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DeleteFileShare.DeleteFileShareResponse
- Network.AWS.StorageGateway.DeleteFileShare: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.DeleteFileShare.DeleteFileShare
- Network.AWS.StorageGateway.DeleteFileShare: instance Data.Data.Data Network.AWS.StorageGateway.DeleteFileShare.DeleteFileShare
- Network.AWS.StorageGateway.DeleteFileShare: instance Data.Data.Data Network.AWS.StorageGateway.DeleteFileShare.DeleteFileShareResponse
- Network.AWS.StorageGateway.DeleteFileShare: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.DeleteFileShare.DeleteFileShare
- Network.AWS.StorageGateway.DeleteFileShare: instance GHC.Classes.Eq Network.AWS.StorageGateway.DeleteFileShare.DeleteFileShare
- Network.AWS.StorageGateway.DeleteFileShare: instance GHC.Classes.Eq Network.AWS.StorageGateway.DeleteFileShare.DeleteFileShareResponse
- Network.AWS.StorageGateway.DeleteFileShare: instance GHC.Generics.Generic Network.AWS.StorageGateway.DeleteFileShare.DeleteFileShare
- Network.AWS.StorageGateway.DeleteFileShare: instance GHC.Generics.Generic Network.AWS.StorageGateway.DeleteFileShare.DeleteFileShareResponse
- Network.AWS.StorageGateway.DeleteFileShare: instance GHC.Read.Read Network.AWS.StorageGateway.DeleteFileShare.DeleteFileShare
- Network.AWS.StorageGateway.DeleteFileShare: instance GHC.Read.Read Network.AWS.StorageGateway.DeleteFileShare.DeleteFileShareResponse
- Network.AWS.StorageGateway.DeleteFileShare: instance GHC.Show.Show Network.AWS.StorageGateway.DeleteFileShare.DeleteFileShare
- Network.AWS.StorageGateway.DeleteFileShare: instance GHC.Show.Show Network.AWS.StorageGateway.DeleteFileShare.DeleteFileShareResponse
- Network.AWS.StorageGateway.DeleteFileShare: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.DeleteFileShare.DeleteFileShare
- Network.AWS.StorageGateway.DeleteFileShare: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.DeleteFileShare.DeleteFileShare
- Network.AWS.StorageGateway.DeleteFileShare: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.DeleteFileShare.DeleteFileShare
- Network.AWS.StorageGateway.DeleteFileShare: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.DeleteFileShare.DeleteFileShare
- Network.AWS.StorageGateway.DeleteGateway: data DeleteGateway
- Network.AWS.StorageGateway.DeleteGateway: data DeleteGatewayResponse
- Network.AWS.StorageGateway.DeleteGateway: deleteGateway :: Text -> DeleteGateway
- Network.AWS.StorageGateway.DeleteGateway: deleteGatewayResponse :: Int -> DeleteGatewayResponse
- Network.AWS.StorageGateway.DeleteGateway: dgGatewayARN :: Lens' DeleteGateway Text
- Network.AWS.StorageGateway.DeleteGateway: dgrsGatewayARN :: Lens' DeleteGatewayResponse (Maybe Text)
- Network.AWS.StorageGateway.DeleteGateway: dgrsResponseStatus :: Lens' DeleteGatewayResponse Int
- Network.AWS.StorageGateway.DeleteGateway: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DeleteGateway.DeleteGateway
- Network.AWS.StorageGateway.DeleteGateway: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DeleteGateway.DeleteGatewayResponse
- Network.AWS.StorageGateway.DeleteGateway: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.DeleteGateway.DeleteGateway
- Network.AWS.StorageGateway.DeleteGateway: instance Data.Data.Data Network.AWS.StorageGateway.DeleteGateway.DeleteGateway
- Network.AWS.StorageGateway.DeleteGateway: instance Data.Data.Data Network.AWS.StorageGateway.DeleteGateway.DeleteGatewayResponse
- Network.AWS.StorageGateway.DeleteGateway: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.DeleteGateway.DeleteGateway
- Network.AWS.StorageGateway.DeleteGateway: instance GHC.Classes.Eq Network.AWS.StorageGateway.DeleteGateway.DeleteGateway
- Network.AWS.StorageGateway.DeleteGateway: instance GHC.Classes.Eq Network.AWS.StorageGateway.DeleteGateway.DeleteGatewayResponse
- Network.AWS.StorageGateway.DeleteGateway: instance GHC.Generics.Generic Network.AWS.StorageGateway.DeleteGateway.DeleteGateway
- Network.AWS.StorageGateway.DeleteGateway: instance GHC.Generics.Generic Network.AWS.StorageGateway.DeleteGateway.DeleteGatewayResponse
- Network.AWS.StorageGateway.DeleteGateway: instance GHC.Read.Read Network.AWS.StorageGateway.DeleteGateway.DeleteGateway
- Network.AWS.StorageGateway.DeleteGateway: instance GHC.Read.Read Network.AWS.StorageGateway.DeleteGateway.DeleteGatewayResponse
- Network.AWS.StorageGateway.DeleteGateway: instance GHC.Show.Show Network.AWS.StorageGateway.DeleteGateway.DeleteGateway
- Network.AWS.StorageGateway.DeleteGateway: instance GHC.Show.Show Network.AWS.StorageGateway.DeleteGateway.DeleteGatewayResponse
- Network.AWS.StorageGateway.DeleteGateway: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.DeleteGateway.DeleteGateway
- Network.AWS.StorageGateway.DeleteGateway: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.DeleteGateway.DeleteGateway
- Network.AWS.StorageGateway.DeleteGateway: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.DeleteGateway.DeleteGateway
- Network.AWS.StorageGateway.DeleteGateway: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.DeleteGateway.DeleteGateway
- Network.AWS.StorageGateway.DeleteSnapshotSchedule: dVolumeARN :: Lens' DeleteSnapshotSchedule Text
- Network.AWS.StorageGateway.DeleteSnapshotSchedule: data DeleteSnapshotSchedule
- Network.AWS.StorageGateway.DeleteSnapshotSchedule: data DeleteSnapshotScheduleResponse
- Network.AWS.StorageGateway.DeleteSnapshotSchedule: deleteSnapshotSchedule :: Text -> DeleteSnapshotSchedule
- Network.AWS.StorageGateway.DeleteSnapshotSchedule: deleteSnapshotScheduleResponse :: Int -> DeleteSnapshotScheduleResponse
- Network.AWS.StorageGateway.DeleteSnapshotSchedule: dsssrsResponseStatus :: Lens' DeleteSnapshotScheduleResponse Int
- Network.AWS.StorageGateway.DeleteSnapshotSchedule: dsssrsVolumeARN :: Lens' DeleteSnapshotScheduleResponse (Maybe Text)
- Network.AWS.StorageGateway.DeleteSnapshotSchedule: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DeleteSnapshotSchedule.DeleteSnapshotSchedule
- Network.AWS.StorageGateway.DeleteSnapshotSchedule: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DeleteSnapshotSchedule.DeleteSnapshotScheduleResponse
- Network.AWS.StorageGateway.DeleteSnapshotSchedule: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.DeleteSnapshotSchedule.DeleteSnapshotSchedule
- Network.AWS.StorageGateway.DeleteSnapshotSchedule: instance Data.Data.Data Network.AWS.StorageGateway.DeleteSnapshotSchedule.DeleteSnapshotSchedule
- Network.AWS.StorageGateway.DeleteSnapshotSchedule: instance Data.Data.Data Network.AWS.StorageGateway.DeleteSnapshotSchedule.DeleteSnapshotScheduleResponse
- Network.AWS.StorageGateway.DeleteSnapshotSchedule: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.DeleteSnapshotSchedule.DeleteSnapshotSchedule
- Network.AWS.StorageGateway.DeleteSnapshotSchedule: instance GHC.Classes.Eq Network.AWS.StorageGateway.DeleteSnapshotSchedule.DeleteSnapshotSchedule
- Network.AWS.StorageGateway.DeleteSnapshotSchedule: instance GHC.Classes.Eq Network.AWS.StorageGateway.DeleteSnapshotSchedule.DeleteSnapshotScheduleResponse
- Network.AWS.StorageGateway.DeleteSnapshotSchedule: instance GHC.Generics.Generic Network.AWS.StorageGateway.DeleteSnapshotSchedule.DeleteSnapshotSchedule
- Network.AWS.StorageGateway.DeleteSnapshotSchedule: instance GHC.Generics.Generic Network.AWS.StorageGateway.DeleteSnapshotSchedule.DeleteSnapshotScheduleResponse
- Network.AWS.StorageGateway.DeleteSnapshotSchedule: instance GHC.Read.Read Network.AWS.StorageGateway.DeleteSnapshotSchedule.DeleteSnapshotSchedule
- Network.AWS.StorageGateway.DeleteSnapshotSchedule: instance GHC.Read.Read Network.AWS.StorageGateway.DeleteSnapshotSchedule.DeleteSnapshotScheduleResponse
- Network.AWS.StorageGateway.DeleteSnapshotSchedule: instance GHC.Show.Show Network.AWS.StorageGateway.DeleteSnapshotSchedule.DeleteSnapshotSchedule
- Network.AWS.StorageGateway.DeleteSnapshotSchedule: instance GHC.Show.Show Network.AWS.StorageGateway.DeleteSnapshotSchedule.DeleteSnapshotScheduleResponse
- Network.AWS.StorageGateway.DeleteSnapshotSchedule: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.DeleteSnapshotSchedule.DeleteSnapshotSchedule
- Network.AWS.StorageGateway.DeleteSnapshotSchedule: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.DeleteSnapshotSchedule.DeleteSnapshotSchedule
- Network.AWS.StorageGateway.DeleteSnapshotSchedule: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.DeleteSnapshotSchedule.DeleteSnapshotSchedule
- Network.AWS.StorageGateway.DeleteSnapshotSchedule: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.DeleteSnapshotSchedule.DeleteSnapshotSchedule
- Network.AWS.StorageGateway.DeleteTape: data DeleteTape
- Network.AWS.StorageGateway.DeleteTape: data DeleteTapeResponse
- Network.AWS.StorageGateway.DeleteTape: delGatewayARN :: Lens' DeleteTape Text
- Network.AWS.StorageGateway.DeleteTape: delTapeARN :: Lens' DeleteTape Text
- Network.AWS.StorageGateway.DeleteTape: deleteTape :: Text -> Text -> DeleteTape
- Network.AWS.StorageGateway.DeleteTape: deleteTapeResponse :: Int -> DeleteTapeResponse
- Network.AWS.StorageGateway.DeleteTape: dtrsResponseStatus :: Lens' DeleteTapeResponse Int
- Network.AWS.StorageGateway.DeleteTape: dtrsTapeARN :: Lens' DeleteTapeResponse (Maybe Text)
- Network.AWS.StorageGateway.DeleteTape: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DeleteTape.DeleteTape
- Network.AWS.StorageGateway.DeleteTape: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DeleteTape.DeleteTapeResponse
- Network.AWS.StorageGateway.DeleteTape: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.DeleteTape.DeleteTape
- Network.AWS.StorageGateway.DeleteTape: instance Data.Data.Data Network.AWS.StorageGateway.DeleteTape.DeleteTape
- Network.AWS.StorageGateway.DeleteTape: instance Data.Data.Data Network.AWS.StorageGateway.DeleteTape.DeleteTapeResponse
- Network.AWS.StorageGateway.DeleteTape: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.DeleteTape.DeleteTape
- Network.AWS.StorageGateway.DeleteTape: instance GHC.Classes.Eq Network.AWS.StorageGateway.DeleteTape.DeleteTape
- Network.AWS.StorageGateway.DeleteTape: instance GHC.Classes.Eq Network.AWS.StorageGateway.DeleteTape.DeleteTapeResponse
- Network.AWS.StorageGateway.DeleteTape: instance GHC.Generics.Generic Network.AWS.StorageGateway.DeleteTape.DeleteTape
- Network.AWS.StorageGateway.DeleteTape: instance GHC.Generics.Generic Network.AWS.StorageGateway.DeleteTape.DeleteTapeResponse
- Network.AWS.StorageGateway.DeleteTape: instance GHC.Read.Read Network.AWS.StorageGateway.DeleteTape.DeleteTape
- Network.AWS.StorageGateway.DeleteTape: instance GHC.Read.Read Network.AWS.StorageGateway.DeleteTape.DeleteTapeResponse
- Network.AWS.StorageGateway.DeleteTape: instance GHC.Show.Show Network.AWS.StorageGateway.DeleteTape.DeleteTape
- Network.AWS.StorageGateway.DeleteTape: instance GHC.Show.Show Network.AWS.StorageGateway.DeleteTape.DeleteTapeResponse
- Network.AWS.StorageGateway.DeleteTape: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.DeleteTape.DeleteTape
- Network.AWS.StorageGateway.DeleteTape: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.DeleteTape.DeleteTape
- Network.AWS.StorageGateway.DeleteTape: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.DeleteTape.DeleteTape
- Network.AWS.StorageGateway.DeleteTape: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.DeleteTape.DeleteTape
- Network.AWS.StorageGateway.DeleteTapeArchive: data DeleteTapeArchive
- Network.AWS.StorageGateway.DeleteTapeArchive: data DeleteTapeArchiveResponse
- Network.AWS.StorageGateway.DeleteTapeArchive: deleteTapeArchive :: Text -> DeleteTapeArchive
- Network.AWS.StorageGateway.DeleteTapeArchive: deleteTapeArchiveResponse :: Int -> DeleteTapeArchiveResponse
- Network.AWS.StorageGateway.DeleteTapeArchive: dtaTapeARN :: Lens' DeleteTapeArchive Text
- Network.AWS.StorageGateway.DeleteTapeArchive: dtatrsResponseStatus :: Lens' DeleteTapeArchiveResponse Int
- Network.AWS.StorageGateway.DeleteTapeArchive: dtatrsTapeARN :: Lens' DeleteTapeArchiveResponse (Maybe Text)
- Network.AWS.StorageGateway.DeleteTapeArchive: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DeleteTapeArchive.DeleteTapeArchive
- Network.AWS.StorageGateway.DeleteTapeArchive: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DeleteTapeArchive.DeleteTapeArchiveResponse
- Network.AWS.StorageGateway.DeleteTapeArchive: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.DeleteTapeArchive.DeleteTapeArchive
- Network.AWS.StorageGateway.DeleteTapeArchive: instance Data.Data.Data Network.AWS.StorageGateway.DeleteTapeArchive.DeleteTapeArchive
- Network.AWS.StorageGateway.DeleteTapeArchive: instance Data.Data.Data Network.AWS.StorageGateway.DeleteTapeArchive.DeleteTapeArchiveResponse
- Network.AWS.StorageGateway.DeleteTapeArchive: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.DeleteTapeArchive.DeleteTapeArchive
- Network.AWS.StorageGateway.DeleteTapeArchive: instance GHC.Classes.Eq Network.AWS.StorageGateway.DeleteTapeArchive.DeleteTapeArchive
- Network.AWS.StorageGateway.DeleteTapeArchive: instance GHC.Classes.Eq Network.AWS.StorageGateway.DeleteTapeArchive.DeleteTapeArchiveResponse
- Network.AWS.StorageGateway.DeleteTapeArchive: instance GHC.Generics.Generic Network.AWS.StorageGateway.DeleteTapeArchive.DeleteTapeArchive
- Network.AWS.StorageGateway.DeleteTapeArchive: instance GHC.Generics.Generic Network.AWS.StorageGateway.DeleteTapeArchive.DeleteTapeArchiveResponse
- Network.AWS.StorageGateway.DeleteTapeArchive: instance GHC.Read.Read Network.AWS.StorageGateway.DeleteTapeArchive.DeleteTapeArchive
- Network.AWS.StorageGateway.DeleteTapeArchive: instance GHC.Read.Read Network.AWS.StorageGateway.DeleteTapeArchive.DeleteTapeArchiveResponse
- Network.AWS.StorageGateway.DeleteTapeArchive: instance GHC.Show.Show Network.AWS.StorageGateway.DeleteTapeArchive.DeleteTapeArchive
- Network.AWS.StorageGateway.DeleteTapeArchive: instance GHC.Show.Show Network.AWS.StorageGateway.DeleteTapeArchive.DeleteTapeArchiveResponse
- Network.AWS.StorageGateway.DeleteTapeArchive: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.DeleteTapeArchive.DeleteTapeArchive
- Network.AWS.StorageGateway.DeleteTapeArchive: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.DeleteTapeArchive.DeleteTapeArchive
- Network.AWS.StorageGateway.DeleteTapeArchive: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.DeleteTapeArchive.DeleteTapeArchive
- Network.AWS.StorageGateway.DeleteTapeArchive: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.DeleteTapeArchive.DeleteTapeArchive
- Network.AWS.StorageGateway.DeleteVolume: data DeleteVolume
- Network.AWS.StorageGateway.DeleteVolume: data DeleteVolumeResponse
- Network.AWS.StorageGateway.DeleteVolume: deleteVolume :: Text -> DeleteVolume
- Network.AWS.StorageGateway.DeleteVolume: deleteVolumeResponse :: Int -> DeleteVolumeResponse
- Network.AWS.StorageGateway.DeleteVolume: dvVolumeARN :: Lens' DeleteVolume Text
- Network.AWS.StorageGateway.DeleteVolume: dvrsResponseStatus :: Lens' DeleteVolumeResponse Int
- Network.AWS.StorageGateway.DeleteVolume: dvrsVolumeARN :: Lens' DeleteVolumeResponse (Maybe Text)
- Network.AWS.StorageGateway.DeleteVolume: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DeleteVolume.DeleteVolume
- Network.AWS.StorageGateway.DeleteVolume: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DeleteVolume.DeleteVolumeResponse
- Network.AWS.StorageGateway.DeleteVolume: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.DeleteVolume.DeleteVolume
- Network.AWS.StorageGateway.DeleteVolume: instance Data.Data.Data Network.AWS.StorageGateway.DeleteVolume.DeleteVolume
- Network.AWS.StorageGateway.DeleteVolume: instance Data.Data.Data Network.AWS.StorageGateway.DeleteVolume.DeleteVolumeResponse
- Network.AWS.StorageGateway.DeleteVolume: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.DeleteVolume.DeleteVolume
- Network.AWS.StorageGateway.DeleteVolume: instance GHC.Classes.Eq Network.AWS.StorageGateway.DeleteVolume.DeleteVolume
- Network.AWS.StorageGateway.DeleteVolume: instance GHC.Classes.Eq Network.AWS.StorageGateway.DeleteVolume.DeleteVolumeResponse
- Network.AWS.StorageGateway.DeleteVolume: instance GHC.Generics.Generic Network.AWS.StorageGateway.DeleteVolume.DeleteVolume
- Network.AWS.StorageGateway.DeleteVolume: instance GHC.Generics.Generic Network.AWS.StorageGateway.DeleteVolume.DeleteVolumeResponse
- Network.AWS.StorageGateway.DeleteVolume: instance GHC.Read.Read Network.AWS.StorageGateway.DeleteVolume.DeleteVolume
- Network.AWS.StorageGateway.DeleteVolume: instance GHC.Read.Read Network.AWS.StorageGateway.DeleteVolume.DeleteVolumeResponse
- Network.AWS.StorageGateway.DeleteVolume: instance GHC.Show.Show Network.AWS.StorageGateway.DeleteVolume.DeleteVolume
- Network.AWS.StorageGateway.DeleteVolume: instance GHC.Show.Show Network.AWS.StorageGateway.DeleteVolume.DeleteVolumeResponse
- Network.AWS.StorageGateway.DeleteVolume: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.DeleteVolume.DeleteVolume
- Network.AWS.StorageGateway.DeleteVolume: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.DeleteVolume.DeleteVolume
- Network.AWS.StorageGateway.DeleteVolume: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.DeleteVolume.DeleteVolume
- Network.AWS.StorageGateway.DeleteVolume: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.DeleteVolume.DeleteVolume
- Network.AWS.StorageGateway.DescribeBandwidthRateLimit: data DescribeBandwidthRateLimit
- Network.AWS.StorageGateway.DescribeBandwidthRateLimit: data DescribeBandwidthRateLimitResponse
- Network.AWS.StorageGateway.DescribeBandwidthRateLimit: dbrlGatewayARN :: Lens' DescribeBandwidthRateLimit Text
- Network.AWS.StorageGateway.DescribeBandwidthRateLimit: dbrlrsAverageDownloadRateLimitInBitsPerSec :: Lens' DescribeBandwidthRateLimitResponse (Maybe Natural)
- Network.AWS.StorageGateway.DescribeBandwidthRateLimit: dbrlrsAverageUploadRateLimitInBitsPerSec :: Lens' DescribeBandwidthRateLimitResponse (Maybe Natural)
- Network.AWS.StorageGateway.DescribeBandwidthRateLimit: dbrlrsGatewayARN :: Lens' DescribeBandwidthRateLimitResponse (Maybe Text)
- Network.AWS.StorageGateway.DescribeBandwidthRateLimit: dbrlrsResponseStatus :: Lens' DescribeBandwidthRateLimitResponse Int
- Network.AWS.StorageGateway.DescribeBandwidthRateLimit: describeBandwidthRateLimit :: Text -> DescribeBandwidthRateLimit
- Network.AWS.StorageGateway.DescribeBandwidthRateLimit: describeBandwidthRateLimitResponse :: Int -> DescribeBandwidthRateLimitResponse
- Network.AWS.StorageGateway.DescribeBandwidthRateLimit: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DescribeBandwidthRateLimit.DescribeBandwidthRateLimit
- Network.AWS.StorageGateway.DescribeBandwidthRateLimit: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DescribeBandwidthRateLimit.DescribeBandwidthRateLimitResponse
- Network.AWS.StorageGateway.DescribeBandwidthRateLimit: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.DescribeBandwidthRateLimit.DescribeBandwidthRateLimit
- Network.AWS.StorageGateway.DescribeBandwidthRateLimit: instance Data.Data.Data Network.AWS.StorageGateway.DescribeBandwidthRateLimit.DescribeBandwidthRateLimit
- Network.AWS.StorageGateway.DescribeBandwidthRateLimit: instance Data.Data.Data Network.AWS.StorageGateway.DescribeBandwidthRateLimit.DescribeBandwidthRateLimitResponse
- Network.AWS.StorageGateway.DescribeBandwidthRateLimit: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.DescribeBandwidthRateLimit.DescribeBandwidthRateLimit
- Network.AWS.StorageGateway.DescribeBandwidthRateLimit: instance GHC.Classes.Eq Network.AWS.StorageGateway.DescribeBandwidthRateLimit.DescribeBandwidthRateLimit
- Network.AWS.StorageGateway.DescribeBandwidthRateLimit: instance GHC.Classes.Eq Network.AWS.StorageGateway.DescribeBandwidthRateLimit.DescribeBandwidthRateLimitResponse
- Network.AWS.StorageGateway.DescribeBandwidthRateLimit: instance GHC.Generics.Generic Network.AWS.StorageGateway.DescribeBandwidthRateLimit.DescribeBandwidthRateLimit
- Network.AWS.StorageGateway.DescribeBandwidthRateLimit: instance GHC.Generics.Generic Network.AWS.StorageGateway.DescribeBandwidthRateLimit.DescribeBandwidthRateLimitResponse
- Network.AWS.StorageGateway.DescribeBandwidthRateLimit: instance GHC.Read.Read Network.AWS.StorageGateway.DescribeBandwidthRateLimit.DescribeBandwidthRateLimit
- Network.AWS.StorageGateway.DescribeBandwidthRateLimit: instance GHC.Read.Read Network.AWS.StorageGateway.DescribeBandwidthRateLimit.DescribeBandwidthRateLimitResponse
- Network.AWS.StorageGateway.DescribeBandwidthRateLimit: instance GHC.Show.Show Network.AWS.StorageGateway.DescribeBandwidthRateLimit.DescribeBandwidthRateLimit
- Network.AWS.StorageGateway.DescribeBandwidthRateLimit: instance GHC.Show.Show Network.AWS.StorageGateway.DescribeBandwidthRateLimit.DescribeBandwidthRateLimitResponse
- Network.AWS.StorageGateway.DescribeBandwidthRateLimit: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.DescribeBandwidthRateLimit.DescribeBandwidthRateLimit
- Network.AWS.StorageGateway.DescribeBandwidthRateLimit: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.DescribeBandwidthRateLimit.DescribeBandwidthRateLimit
- Network.AWS.StorageGateway.DescribeBandwidthRateLimit: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.DescribeBandwidthRateLimit.DescribeBandwidthRateLimit
- Network.AWS.StorageGateway.DescribeBandwidthRateLimit: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.DescribeBandwidthRateLimit.DescribeBandwidthRateLimit
- Network.AWS.StorageGateway.DescribeCache: data DescribeCache
- Network.AWS.StorageGateway.DescribeCache: data DescribeCacheResponse
- Network.AWS.StorageGateway.DescribeCache: dcGatewayARN :: Lens' DescribeCache Text
- Network.AWS.StorageGateway.DescribeCache: dcrsCacheAllocatedInBytes :: Lens' DescribeCacheResponse (Maybe Integer)
- Network.AWS.StorageGateway.DescribeCache: dcrsCacheDirtyPercentage :: Lens' DescribeCacheResponse (Maybe Double)
- Network.AWS.StorageGateway.DescribeCache: dcrsCacheHitPercentage :: Lens' DescribeCacheResponse (Maybe Double)
- Network.AWS.StorageGateway.DescribeCache: dcrsCacheMissPercentage :: Lens' DescribeCacheResponse (Maybe Double)
- Network.AWS.StorageGateway.DescribeCache: dcrsCacheUsedPercentage :: Lens' DescribeCacheResponse (Maybe Double)
- Network.AWS.StorageGateway.DescribeCache: dcrsDiskIds :: Lens' DescribeCacheResponse [Text]
- Network.AWS.StorageGateway.DescribeCache: dcrsGatewayARN :: Lens' DescribeCacheResponse (Maybe Text)
- Network.AWS.StorageGateway.DescribeCache: dcrsResponseStatus :: Lens' DescribeCacheResponse Int
- Network.AWS.StorageGateway.DescribeCache: describeCache :: Text -> DescribeCache
- Network.AWS.StorageGateway.DescribeCache: describeCacheResponse :: Int -> DescribeCacheResponse
- Network.AWS.StorageGateway.DescribeCache: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DescribeCache.DescribeCache
- Network.AWS.StorageGateway.DescribeCache: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DescribeCache.DescribeCacheResponse
- Network.AWS.StorageGateway.DescribeCache: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.DescribeCache.DescribeCache
- Network.AWS.StorageGateway.DescribeCache: instance Data.Data.Data Network.AWS.StorageGateway.DescribeCache.DescribeCache
- Network.AWS.StorageGateway.DescribeCache: instance Data.Data.Data Network.AWS.StorageGateway.DescribeCache.DescribeCacheResponse
- Network.AWS.StorageGateway.DescribeCache: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.DescribeCache.DescribeCache
- Network.AWS.StorageGateway.DescribeCache: instance GHC.Classes.Eq Network.AWS.StorageGateway.DescribeCache.DescribeCache
- Network.AWS.StorageGateway.DescribeCache: instance GHC.Classes.Eq Network.AWS.StorageGateway.DescribeCache.DescribeCacheResponse
- Network.AWS.StorageGateway.DescribeCache: instance GHC.Generics.Generic Network.AWS.StorageGateway.DescribeCache.DescribeCache
- Network.AWS.StorageGateway.DescribeCache: instance GHC.Generics.Generic Network.AWS.StorageGateway.DescribeCache.DescribeCacheResponse
- Network.AWS.StorageGateway.DescribeCache: instance GHC.Read.Read Network.AWS.StorageGateway.DescribeCache.DescribeCache
- Network.AWS.StorageGateway.DescribeCache: instance GHC.Read.Read Network.AWS.StorageGateway.DescribeCache.DescribeCacheResponse
- Network.AWS.StorageGateway.DescribeCache: instance GHC.Show.Show Network.AWS.StorageGateway.DescribeCache.DescribeCache
- Network.AWS.StorageGateway.DescribeCache: instance GHC.Show.Show Network.AWS.StorageGateway.DescribeCache.DescribeCacheResponse
- Network.AWS.StorageGateway.DescribeCache: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.DescribeCache.DescribeCache
- Network.AWS.StorageGateway.DescribeCache: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.DescribeCache.DescribeCache
- Network.AWS.StorageGateway.DescribeCache: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.DescribeCache.DescribeCache
- Network.AWS.StorageGateway.DescribeCache: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.DescribeCache.DescribeCache
- Network.AWS.StorageGateway.DescribeCachediSCSIVolumes: data DescribeCachediSCSIVolumes
- Network.AWS.StorageGateway.DescribeCachediSCSIVolumes: data DescribeCachediSCSIVolumesResponse
- Network.AWS.StorageGateway.DescribeCachediSCSIVolumes: dcscsivVolumeARNs :: Lens' DescribeCachediSCSIVolumes [Text]
- Network.AWS.StorageGateway.DescribeCachediSCSIVolumes: dcscsivrsCachediSCSIVolumes :: Lens' DescribeCachediSCSIVolumesResponse [CachediSCSIVolume]
- Network.AWS.StorageGateway.DescribeCachediSCSIVolumes: dcscsivrsResponseStatus :: Lens' DescribeCachediSCSIVolumesResponse Int
- Network.AWS.StorageGateway.DescribeCachediSCSIVolumes: describeCachediSCSIVolumes :: DescribeCachediSCSIVolumes
- Network.AWS.StorageGateway.DescribeCachediSCSIVolumes: describeCachediSCSIVolumesResponse :: Int -> DescribeCachediSCSIVolumesResponse
- Network.AWS.StorageGateway.DescribeCachediSCSIVolumes: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DescribeCachediSCSIVolumes.DescribeCachediSCSIVolumes
- Network.AWS.StorageGateway.DescribeCachediSCSIVolumes: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DescribeCachediSCSIVolumes.DescribeCachediSCSIVolumesResponse
- Network.AWS.StorageGateway.DescribeCachediSCSIVolumes: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.DescribeCachediSCSIVolumes.DescribeCachediSCSIVolumes
- Network.AWS.StorageGateway.DescribeCachediSCSIVolumes: instance Data.Data.Data Network.AWS.StorageGateway.DescribeCachediSCSIVolumes.DescribeCachediSCSIVolumes
- Network.AWS.StorageGateway.DescribeCachediSCSIVolumes: instance Data.Data.Data Network.AWS.StorageGateway.DescribeCachediSCSIVolumes.DescribeCachediSCSIVolumesResponse
- Network.AWS.StorageGateway.DescribeCachediSCSIVolumes: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.DescribeCachediSCSIVolumes.DescribeCachediSCSIVolumes
- Network.AWS.StorageGateway.DescribeCachediSCSIVolumes: instance GHC.Classes.Eq Network.AWS.StorageGateway.DescribeCachediSCSIVolumes.DescribeCachediSCSIVolumes
- Network.AWS.StorageGateway.DescribeCachediSCSIVolumes: instance GHC.Classes.Eq Network.AWS.StorageGateway.DescribeCachediSCSIVolumes.DescribeCachediSCSIVolumesResponse
- Network.AWS.StorageGateway.DescribeCachediSCSIVolumes: instance GHC.Generics.Generic Network.AWS.StorageGateway.DescribeCachediSCSIVolumes.DescribeCachediSCSIVolumes
- Network.AWS.StorageGateway.DescribeCachediSCSIVolumes: instance GHC.Generics.Generic Network.AWS.StorageGateway.DescribeCachediSCSIVolumes.DescribeCachediSCSIVolumesResponse
- Network.AWS.StorageGateway.DescribeCachediSCSIVolumes: instance GHC.Read.Read Network.AWS.StorageGateway.DescribeCachediSCSIVolumes.DescribeCachediSCSIVolumes
- Network.AWS.StorageGateway.DescribeCachediSCSIVolumes: instance GHC.Read.Read Network.AWS.StorageGateway.DescribeCachediSCSIVolumes.DescribeCachediSCSIVolumesResponse
- Network.AWS.StorageGateway.DescribeCachediSCSIVolumes: instance GHC.Show.Show Network.AWS.StorageGateway.DescribeCachediSCSIVolumes.DescribeCachediSCSIVolumes
- Network.AWS.StorageGateway.DescribeCachediSCSIVolumes: instance GHC.Show.Show Network.AWS.StorageGateway.DescribeCachediSCSIVolumes.DescribeCachediSCSIVolumesResponse
- Network.AWS.StorageGateway.DescribeCachediSCSIVolumes: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.DescribeCachediSCSIVolumes.DescribeCachediSCSIVolumes
- Network.AWS.StorageGateway.DescribeCachediSCSIVolumes: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.DescribeCachediSCSIVolumes.DescribeCachediSCSIVolumes
- Network.AWS.StorageGateway.DescribeCachediSCSIVolumes: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.DescribeCachediSCSIVolumes.DescribeCachediSCSIVolumes
- Network.AWS.StorageGateway.DescribeCachediSCSIVolumes: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.DescribeCachediSCSIVolumes.DescribeCachediSCSIVolumes
- Network.AWS.StorageGateway.DescribeChapCredentials: data DescribeChapCredentials
- Network.AWS.StorageGateway.DescribeChapCredentials: data DescribeChapCredentialsResponse
- Network.AWS.StorageGateway.DescribeChapCredentials: dccTargetARN :: Lens' DescribeChapCredentials Text
- Network.AWS.StorageGateway.DescribeChapCredentials: dccrsChapCredentials :: Lens' DescribeChapCredentialsResponse [ChapInfo]
- Network.AWS.StorageGateway.DescribeChapCredentials: dccrsResponseStatus :: Lens' DescribeChapCredentialsResponse Int
- Network.AWS.StorageGateway.DescribeChapCredentials: describeChapCredentials :: Text -> DescribeChapCredentials
- Network.AWS.StorageGateway.DescribeChapCredentials: describeChapCredentialsResponse :: Int -> DescribeChapCredentialsResponse
- Network.AWS.StorageGateway.DescribeChapCredentials: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DescribeChapCredentials.DescribeChapCredentials
- Network.AWS.StorageGateway.DescribeChapCredentials: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DescribeChapCredentials.DescribeChapCredentialsResponse
- Network.AWS.StorageGateway.DescribeChapCredentials: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.DescribeChapCredentials.DescribeChapCredentials
- Network.AWS.StorageGateway.DescribeChapCredentials: instance Data.Data.Data Network.AWS.StorageGateway.DescribeChapCredentials.DescribeChapCredentials
- Network.AWS.StorageGateway.DescribeChapCredentials: instance Data.Data.Data Network.AWS.StorageGateway.DescribeChapCredentials.DescribeChapCredentialsResponse
- Network.AWS.StorageGateway.DescribeChapCredentials: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.DescribeChapCredentials.DescribeChapCredentials
- Network.AWS.StorageGateway.DescribeChapCredentials: instance GHC.Classes.Eq Network.AWS.StorageGateway.DescribeChapCredentials.DescribeChapCredentials
- Network.AWS.StorageGateway.DescribeChapCredentials: instance GHC.Classes.Eq Network.AWS.StorageGateway.DescribeChapCredentials.DescribeChapCredentialsResponse
- Network.AWS.StorageGateway.DescribeChapCredentials: instance GHC.Generics.Generic Network.AWS.StorageGateway.DescribeChapCredentials.DescribeChapCredentials
- Network.AWS.StorageGateway.DescribeChapCredentials: instance GHC.Generics.Generic Network.AWS.StorageGateway.DescribeChapCredentials.DescribeChapCredentialsResponse
- Network.AWS.StorageGateway.DescribeChapCredentials: instance GHC.Read.Read Network.AWS.StorageGateway.DescribeChapCredentials.DescribeChapCredentials
- Network.AWS.StorageGateway.DescribeChapCredentials: instance GHC.Read.Read Network.AWS.StorageGateway.DescribeChapCredentials.DescribeChapCredentialsResponse
- Network.AWS.StorageGateway.DescribeChapCredentials: instance GHC.Show.Show Network.AWS.StorageGateway.DescribeChapCredentials.DescribeChapCredentials
- Network.AWS.StorageGateway.DescribeChapCredentials: instance GHC.Show.Show Network.AWS.StorageGateway.DescribeChapCredentials.DescribeChapCredentialsResponse
- Network.AWS.StorageGateway.DescribeChapCredentials: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.DescribeChapCredentials.DescribeChapCredentials
- Network.AWS.StorageGateway.DescribeChapCredentials: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.DescribeChapCredentials.DescribeChapCredentials
- Network.AWS.StorageGateway.DescribeChapCredentials: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.DescribeChapCredentials.DescribeChapCredentials
- Network.AWS.StorageGateway.DescribeChapCredentials: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.DescribeChapCredentials.DescribeChapCredentials
- Network.AWS.StorageGateway.DescribeGatewayInformation: data DescribeGatewayInformation
- Network.AWS.StorageGateway.DescribeGatewayInformation: data DescribeGatewayInformationResponse
- Network.AWS.StorageGateway.DescribeGatewayInformation: describeGatewayInformation :: Text -> DescribeGatewayInformation
- Network.AWS.StorageGateway.DescribeGatewayInformation: describeGatewayInformationResponse :: Int -> DescribeGatewayInformationResponse
- Network.AWS.StorageGateway.DescribeGatewayInformation: dgiGatewayARN :: Lens' DescribeGatewayInformation Text
- Network.AWS.StorageGateway.DescribeGatewayInformation: dgirsGatewayARN :: Lens' DescribeGatewayInformationResponse (Maybe Text)
- Network.AWS.StorageGateway.DescribeGatewayInformation: dgirsGatewayId :: Lens' DescribeGatewayInformationResponse (Maybe Text)
- Network.AWS.StorageGateway.DescribeGatewayInformation: dgirsGatewayName :: Lens' DescribeGatewayInformationResponse (Maybe Text)
- Network.AWS.StorageGateway.DescribeGatewayInformation: dgirsGatewayNetworkInterfaces :: Lens' DescribeGatewayInformationResponse [NetworkInterface]
- Network.AWS.StorageGateway.DescribeGatewayInformation: dgirsGatewayState :: Lens' DescribeGatewayInformationResponse (Maybe Text)
- Network.AWS.StorageGateway.DescribeGatewayInformation: dgirsGatewayTimezone :: Lens' DescribeGatewayInformationResponse (Maybe Text)
- Network.AWS.StorageGateway.DescribeGatewayInformation: dgirsGatewayType :: Lens' DescribeGatewayInformationResponse (Maybe Text)
- Network.AWS.StorageGateway.DescribeGatewayInformation: dgirsLastSoftwareUpdate :: Lens' DescribeGatewayInformationResponse (Maybe Text)
- Network.AWS.StorageGateway.DescribeGatewayInformation: dgirsNextUpdateAvailabilityDate :: Lens' DescribeGatewayInformationResponse (Maybe Text)
- Network.AWS.StorageGateway.DescribeGatewayInformation: dgirsResponseStatus :: Lens' DescribeGatewayInformationResponse Int
- Network.AWS.StorageGateway.DescribeGatewayInformation: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DescribeGatewayInformation.DescribeGatewayInformation
- Network.AWS.StorageGateway.DescribeGatewayInformation: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DescribeGatewayInformation.DescribeGatewayInformationResponse
- Network.AWS.StorageGateway.DescribeGatewayInformation: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.DescribeGatewayInformation.DescribeGatewayInformation
- Network.AWS.StorageGateway.DescribeGatewayInformation: instance Data.Data.Data Network.AWS.StorageGateway.DescribeGatewayInformation.DescribeGatewayInformation
- Network.AWS.StorageGateway.DescribeGatewayInformation: instance Data.Data.Data Network.AWS.StorageGateway.DescribeGatewayInformation.DescribeGatewayInformationResponse
- Network.AWS.StorageGateway.DescribeGatewayInformation: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.DescribeGatewayInformation.DescribeGatewayInformation
- Network.AWS.StorageGateway.DescribeGatewayInformation: instance GHC.Classes.Eq Network.AWS.StorageGateway.DescribeGatewayInformation.DescribeGatewayInformation
- Network.AWS.StorageGateway.DescribeGatewayInformation: instance GHC.Classes.Eq Network.AWS.StorageGateway.DescribeGatewayInformation.DescribeGatewayInformationResponse
- Network.AWS.StorageGateway.DescribeGatewayInformation: instance GHC.Generics.Generic Network.AWS.StorageGateway.DescribeGatewayInformation.DescribeGatewayInformation
- Network.AWS.StorageGateway.DescribeGatewayInformation: instance GHC.Generics.Generic Network.AWS.StorageGateway.DescribeGatewayInformation.DescribeGatewayInformationResponse
- Network.AWS.StorageGateway.DescribeGatewayInformation: instance GHC.Read.Read Network.AWS.StorageGateway.DescribeGatewayInformation.DescribeGatewayInformation
- Network.AWS.StorageGateway.DescribeGatewayInformation: instance GHC.Read.Read Network.AWS.StorageGateway.DescribeGatewayInformation.DescribeGatewayInformationResponse
- Network.AWS.StorageGateway.DescribeGatewayInformation: instance GHC.Show.Show Network.AWS.StorageGateway.DescribeGatewayInformation.DescribeGatewayInformation
- Network.AWS.StorageGateway.DescribeGatewayInformation: instance GHC.Show.Show Network.AWS.StorageGateway.DescribeGatewayInformation.DescribeGatewayInformationResponse
- Network.AWS.StorageGateway.DescribeGatewayInformation: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.DescribeGatewayInformation.DescribeGatewayInformation
- Network.AWS.StorageGateway.DescribeGatewayInformation: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.DescribeGatewayInformation.DescribeGatewayInformation
- Network.AWS.StorageGateway.DescribeGatewayInformation: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.DescribeGatewayInformation.DescribeGatewayInformation
- Network.AWS.StorageGateway.DescribeGatewayInformation: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.DescribeGatewayInformation.DescribeGatewayInformation
- Network.AWS.StorageGateway.DescribeMaintenanceStartTime: data DescribeMaintenanceStartTime
- Network.AWS.StorageGateway.DescribeMaintenanceStartTime: data DescribeMaintenanceStartTimeResponse
- Network.AWS.StorageGateway.DescribeMaintenanceStartTime: describeMaintenanceStartTime :: Text -> DescribeMaintenanceStartTime
- Network.AWS.StorageGateway.DescribeMaintenanceStartTime: describeMaintenanceStartTimeResponse :: Int -> DescribeMaintenanceStartTimeResponse
- Network.AWS.StorageGateway.DescribeMaintenanceStartTime: dmstGatewayARN :: Lens' DescribeMaintenanceStartTime Text
- Network.AWS.StorageGateway.DescribeMaintenanceStartTime: dmstrsDayOfWeek :: Lens' DescribeMaintenanceStartTimeResponse (Maybe Natural)
- Network.AWS.StorageGateway.DescribeMaintenanceStartTime: dmstrsGatewayARN :: Lens' DescribeMaintenanceStartTimeResponse (Maybe Text)
- Network.AWS.StorageGateway.DescribeMaintenanceStartTime: dmstrsHourOfDay :: Lens' DescribeMaintenanceStartTimeResponse (Maybe Natural)
- Network.AWS.StorageGateway.DescribeMaintenanceStartTime: dmstrsMinuteOfHour :: Lens' DescribeMaintenanceStartTimeResponse (Maybe Natural)
- Network.AWS.StorageGateway.DescribeMaintenanceStartTime: dmstrsResponseStatus :: Lens' DescribeMaintenanceStartTimeResponse Int
- Network.AWS.StorageGateway.DescribeMaintenanceStartTime: dmstrsTimezone :: Lens' DescribeMaintenanceStartTimeResponse (Maybe Text)
- Network.AWS.StorageGateway.DescribeMaintenanceStartTime: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DescribeMaintenanceStartTime.DescribeMaintenanceStartTime
- Network.AWS.StorageGateway.DescribeMaintenanceStartTime: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DescribeMaintenanceStartTime.DescribeMaintenanceStartTimeResponse
- Network.AWS.StorageGateway.DescribeMaintenanceStartTime: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.DescribeMaintenanceStartTime.DescribeMaintenanceStartTime
- Network.AWS.StorageGateway.DescribeMaintenanceStartTime: instance Data.Data.Data Network.AWS.StorageGateway.DescribeMaintenanceStartTime.DescribeMaintenanceStartTime
- Network.AWS.StorageGateway.DescribeMaintenanceStartTime: instance Data.Data.Data Network.AWS.StorageGateway.DescribeMaintenanceStartTime.DescribeMaintenanceStartTimeResponse
- Network.AWS.StorageGateway.DescribeMaintenanceStartTime: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.DescribeMaintenanceStartTime.DescribeMaintenanceStartTime
- Network.AWS.StorageGateway.DescribeMaintenanceStartTime: instance GHC.Classes.Eq Network.AWS.StorageGateway.DescribeMaintenanceStartTime.DescribeMaintenanceStartTime
- Network.AWS.StorageGateway.DescribeMaintenanceStartTime: instance GHC.Classes.Eq Network.AWS.StorageGateway.DescribeMaintenanceStartTime.DescribeMaintenanceStartTimeResponse
- Network.AWS.StorageGateway.DescribeMaintenanceStartTime: instance GHC.Generics.Generic Network.AWS.StorageGateway.DescribeMaintenanceStartTime.DescribeMaintenanceStartTime
- Network.AWS.StorageGateway.DescribeMaintenanceStartTime: instance GHC.Generics.Generic Network.AWS.StorageGateway.DescribeMaintenanceStartTime.DescribeMaintenanceStartTimeResponse
- Network.AWS.StorageGateway.DescribeMaintenanceStartTime: instance GHC.Read.Read Network.AWS.StorageGateway.DescribeMaintenanceStartTime.DescribeMaintenanceStartTime
- Network.AWS.StorageGateway.DescribeMaintenanceStartTime: instance GHC.Read.Read Network.AWS.StorageGateway.DescribeMaintenanceStartTime.DescribeMaintenanceStartTimeResponse
- Network.AWS.StorageGateway.DescribeMaintenanceStartTime: instance GHC.Show.Show Network.AWS.StorageGateway.DescribeMaintenanceStartTime.DescribeMaintenanceStartTime
- Network.AWS.StorageGateway.DescribeMaintenanceStartTime: instance GHC.Show.Show Network.AWS.StorageGateway.DescribeMaintenanceStartTime.DescribeMaintenanceStartTimeResponse
- Network.AWS.StorageGateway.DescribeMaintenanceStartTime: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.DescribeMaintenanceStartTime.DescribeMaintenanceStartTime
- Network.AWS.StorageGateway.DescribeMaintenanceStartTime: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.DescribeMaintenanceStartTime.DescribeMaintenanceStartTime
- Network.AWS.StorageGateway.DescribeMaintenanceStartTime: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.DescribeMaintenanceStartTime.DescribeMaintenanceStartTime
- Network.AWS.StorageGateway.DescribeMaintenanceStartTime: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.DescribeMaintenanceStartTime.DescribeMaintenanceStartTime
- Network.AWS.StorageGateway.DescribeNFSFileShares: data DescribeNFSFileShares
- Network.AWS.StorageGateway.DescribeNFSFileShares: data DescribeNFSFileSharesResponse
- Network.AWS.StorageGateway.DescribeNFSFileShares: describeNFSFileShares :: NonEmpty Text -> DescribeNFSFileShares
- Network.AWS.StorageGateway.DescribeNFSFileShares: describeNFSFileSharesResponse :: Int -> DescribeNFSFileSharesResponse
- Network.AWS.StorageGateway.DescribeNFSFileShares: dnfsfsFileShareARNList :: Lens' DescribeNFSFileShares (NonEmpty Text)
- Network.AWS.StorageGateway.DescribeNFSFileShares: dnfsfsrsNFSFileShareInfoList :: Lens' DescribeNFSFileSharesResponse [NFSFileShareInfo]
- Network.AWS.StorageGateway.DescribeNFSFileShares: dnfsfsrsResponseStatus :: Lens' DescribeNFSFileSharesResponse Int
- Network.AWS.StorageGateway.DescribeNFSFileShares: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DescribeNFSFileShares.DescribeNFSFileShares
- Network.AWS.StorageGateway.DescribeNFSFileShares: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DescribeNFSFileShares.DescribeNFSFileSharesResponse
- Network.AWS.StorageGateway.DescribeNFSFileShares: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.DescribeNFSFileShares.DescribeNFSFileShares
- Network.AWS.StorageGateway.DescribeNFSFileShares: instance Data.Data.Data Network.AWS.StorageGateway.DescribeNFSFileShares.DescribeNFSFileShares
- Network.AWS.StorageGateway.DescribeNFSFileShares: instance Data.Data.Data Network.AWS.StorageGateway.DescribeNFSFileShares.DescribeNFSFileSharesResponse
- Network.AWS.StorageGateway.DescribeNFSFileShares: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.DescribeNFSFileShares.DescribeNFSFileShares
- Network.AWS.StorageGateway.DescribeNFSFileShares: instance GHC.Classes.Eq Network.AWS.StorageGateway.DescribeNFSFileShares.DescribeNFSFileShares
- Network.AWS.StorageGateway.DescribeNFSFileShares: instance GHC.Classes.Eq Network.AWS.StorageGateway.DescribeNFSFileShares.DescribeNFSFileSharesResponse
- Network.AWS.StorageGateway.DescribeNFSFileShares: instance GHC.Generics.Generic Network.AWS.StorageGateway.DescribeNFSFileShares.DescribeNFSFileShares
- Network.AWS.StorageGateway.DescribeNFSFileShares: instance GHC.Generics.Generic Network.AWS.StorageGateway.DescribeNFSFileShares.DescribeNFSFileSharesResponse
- Network.AWS.StorageGateway.DescribeNFSFileShares: instance GHC.Read.Read Network.AWS.StorageGateway.DescribeNFSFileShares.DescribeNFSFileShares
- Network.AWS.StorageGateway.DescribeNFSFileShares: instance GHC.Read.Read Network.AWS.StorageGateway.DescribeNFSFileShares.DescribeNFSFileSharesResponse
- Network.AWS.StorageGateway.DescribeNFSFileShares: instance GHC.Show.Show Network.AWS.StorageGateway.DescribeNFSFileShares.DescribeNFSFileShares
- Network.AWS.StorageGateway.DescribeNFSFileShares: instance GHC.Show.Show Network.AWS.StorageGateway.DescribeNFSFileShares.DescribeNFSFileSharesResponse
- Network.AWS.StorageGateway.DescribeNFSFileShares: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.DescribeNFSFileShares.DescribeNFSFileShares
- Network.AWS.StorageGateway.DescribeNFSFileShares: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.DescribeNFSFileShares.DescribeNFSFileShares
- Network.AWS.StorageGateway.DescribeNFSFileShares: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.DescribeNFSFileShares.DescribeNFSFileShares
- Network.AWS.StorageGateway.DescribeNFSFileShares: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.DescribeNFSFileShares.DescribeNFSFileShares
- Network.AWS.StorageGateway.DescribeSnapshotSchedule: data DescribeSnapshotSchedule
- Network.AWS.StorageGateway.DescribeSnapshotSchedule: data DescribeSnapshotScheduleResponse
- Network.AWS.StorageGateway.DescribeSnapshotSchedule: describeSnapshotSchedule :: Text -> DescribeSnapshotSchedule
- Network.AWS.StorageGateway.DescribeSnapshotSchedule: describeSnapshotScheduleResponse :: Int -> DescribeSnapshotScheduleResponse
- Network.AWS.StorageGateway.DescribeSnapshotSchedule: dssVolumeARN :: Lens' DescribeSnapshotSchedule Text
- Network.AWS.StorageGateway.DescribeSnapshotSchedule: dssrsDescription :: Lens' DescribeSnapshotScheduleResponse (Maybe Text)
- Network.AWS.StorageGateway.DescribeSnapshotSchedule: dssrsRecurrenceInHours :: Lens' DescribeSnapshotScheduleResponse (Maybe Natural)
- Network.AWS.StorageGateway.DescribeSnapshotSchedule: dssrsResponseStatus :: Lens' DescribeSnapshotScheduleResponse Int
- Network.AWS.StorageGateway.DescribeSnapshotSchedule: dssrsStartAt :: Lens' DescribeSnapshotScheduleResponse (Maybe Natural)
- Network.AWS.StorageGateway.DescribeSnapshotSchedule: dssrsTimezone :: Lens' DescribeSnapshotScheduleResponse (Maybe Text)
- Network.AWS.StorageGateway.DescribeSnapshotSchedule: dssrsVolumeARN :: Lens' DescribeSnapshotScheduleResponse (Maybe Text)
- Network.AWS.StorageGateway.DescribeSnapshotSchedule: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DescribeSnapshotSchedule.DescribeSnapshotSchedule
- Network.AWS.StorageGateway.DescribeSnapshotSchedule: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DescribeSnapshotSchedule.DescribeSnapshotScheduleResponse
- Network.AWS.StorageGateway.DescribeSnapshotSchedule: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.DescribeSnapshotSchedule.DescribeSnapshotSchedule
- Network.AWS.StorageGateway.DescribeSnapshotSchedule: instance Data.Data.Data Network.AWS.StorageGateway.DescribeSnapshotSchedule.DescribeSnapshotSchedule
- Network.AWS.StorageGateway.DescribeSnapshotSchedule: instance Data.Data.Data Network.AWS.StorageGateway.DescribeSnapshotSchedule.DescribeSnapshotScheduleResponse
- Network.AWS.StorageGateway.DescribeSnapshotSchedule: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.DescribeSnapshotSchedule.DescribeSnapshotSchedule
- Network.AWS.StorageGateway.DescribeSnapshotSchedule: instance GHC.Classes.Eq Network.AWS.StorageGateway.DescribeSnapshotSchedule.DescribeSnapshotSchedule
- Network.AWS.StorageGateway.DescribeSnapshotSchedule: instance GHC.Classes.Eq Network.AWS.StorageGateway.DescribeSnapshotSchedule.DescribeSnapshotScheduleResponse
- Network.AWS.StorageGateway.DescribeSnapshotSchedule: instance GHC.Generics.Generic Network.AWS.StorageGateway.DescribeSnapshotSchedule.DescribeSnapshotSchedule
- Network.AWS.StorageGateway.DescribeSnapshotSchedule: instance GHC.Generics.Generic Network.AWS.StorageGateway.DescribeSnapshotSchedule.DescribeSnapshotScheduleResponse
- Network.AWS.StorageGateway.DescribeSnapshotSchedule: instance GHC.Read.Read Network.AWS.StorageGateway.DescribeSnapshotSchedule.DescribeSnapshotSchedule
- Network.AWS.StorageGateway.DescribeSnapshotSchedule: instance GHC.Read.Read Network.AWS.StorageGateway.DescribeSnapshotSchedule.DescribeSnapshotScheduleResponse
- Network.AWS.StorageGateway.DescribeSnapshotSchedule: instance GHC.Show.Show Network.AWS.StorageGateway.DescribeSnapshotSchedule.DescribeSnapshotSchedule
- Network.AWS.StorageGateway.DescribeSnapshotSchedule: instance GHC.Show.Show Network.AWS.StorageGateway.DescribeSnapshotSchedule.DescribeSnapshotScheduleResponse
- Network.AWS.StorageGateway.DescribeSnapshotSchedule: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.DescribeSnapshotSchedule.DescribeSnapshotSchedule
- Network.AWS.StorageGateway.DescribeSnapshotSchedule: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.DescribeSnapshotSchedule.DescribeSnapshotSchedule
- Network.AWS.StorageGateway.DescribeSnapshotSchedule: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.DescribeSnapshotSchedule.DescribeSnapshotSchedule
- Network.AWS.StorageGateway.DescribeSnapshotSchedule: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.DescribeSnapshotSchedule.DescribeSnapshotSchedule
- Network.AWS.StorageGateway.DescribeStorediSCSIVolumes: data DescribeStorediSCSIVolumes
- Network.AWS.StorageGateway.DescribeStorediSCSIVolumes: data DescribeStorediSCSIVolumesResponse
- Network.AWS.StorageGateway.DescribeStorediSCSIVolumes: describeStorediSCSIVolumes :: DescribeStorediSCSIVolumes
- Network.AWS.StorageGateway.DescribeStorediSCSIVolumes: describeStorediSCSIVolumesResponse :: Int -> DescribeStorediSCSIVolumesResponse
- Network.AWS.StorageGateway.DescribeStorediSCSIVolumes: dsscsivVolumeARNs :: Lens' DescribeStorediSCSIVolumes [Text]
- Network.AWS.StorageGateway.DescribeStorediSCSIVolumes: dsscsivrsResponseStatus :: Lens' DescribeStorediSCSIVolumesResponse Int
- Network.AWS.StorageGateway.DescribeStorediSCSIVolumes: dsscsivrsStorediSCSIVolumes :: Lens' DescribeStorediSCSIVolumesResponse [StorediSCSIVolume]
- Network.AWS.StorageGateway.DescribeStorediSCSIVolumes: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DescribeStorediSCSIVolumes.DescribeStorediSCSIVolumes
- Network.AWS.StorageGateway.DescribeStorediSCSIVolumes: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DescribeStorediSCSIVolumes.DescribeStorediSCSIVolumesResponse
- Network.AWS.StorageGateway.DescribeStorediSCSIVolumes: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.DescribeStorediSCSIVolumes.DescribeStorediSCSIVolumes
- Network.AWS.StorageGateway.DescribeStorediSCSIVolumes: instance Data.Data.Data Network.AWS.StorageGateway.DescribeStorediSCSIVolumes.DescribeStorediSCSIVolumes
- Network.AWS.StorageGateway.DescribeStorediSCSIVolumes: instance Data.Data.Data Network.AWS.StorageGateway.DescribeStorediSCSIVolumes.DescribeStorediSCSIVolumesResponse
- Network.AWS.StorageGateway.DescribeStorediSCSIVolumes: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.DescribeStorediSCSIVolumes.DescribeStorediSCSIVolumes
- Network.AWS.StorageGateway.DescribeStorediSCSIVolumes: instance GHC.Classes.Eq Network.AWS.StorageGateway.DescribeStorediSCSIVolumes.DescribeStorediSCSIVolumes
- Network.AWS.StorageGateway.DescribeStorediSCSIVolumes: instance GHC.Classes.Eq Network.AWS.StorageGateway.DescribeStorediSCSIVolumes.DescribeStorediSCSIVolumesResponse
- Network.AWS.StorageGateway.DescribeStorediSCSIVolumes: instance GHC.Generics.Generic Network.AWS.StorageGateway.DescribeStorediSCSIVolumes.DescribeStorediSCSIVolumes
- Network.AWS.StorageGateway.DescribeStorediSCSIVolumes: instance GHC.Generics.Generic Network.AWS.StorageGateway.DescribeStorediSCSIVolumes.DescribeStorediSCSIVolumesResponse
- Network.AWS.StorageGateway.DescribeStorediSCSIVolumes: instance GHC.Read.Read Network.AWS.StorageGateway.DescribeStorediSCSIVolumes.DescribeStorediSCSIVolumes
- Network.AWS.StorageGateway.DescribeStorediSCSIVolumes: instance GHC.Read.Read Network.AWS.StorageGateway.DescribeStorediSCSIVolumes.DescribeStorediSCSIVolumesResponse
- Network.AWS.StorageGateway.DescribeStorediSCSIVolumes: instance GHC.Show.Show Network.AWS.StorageGateway.DescribeStorediSCSIVolumes.DescribeStorediSCSIVolumes
- Network.AWS.StorageGateway.DescribeStorediSCSIVolumes: instance GHC.Show.Show Network.AWS.StorageGateway.DescribeStorediSCSIVolumes.DescribeStorediSCSIVolumesResponse
- Network.AWS.StorageGateway.DescribeStorediSCSIVolumes: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.DescribeStorediSCSIVolumes.DescribeStorediSCSIVolumes
- Network.AWS.StorageGateway.DescribeStorediSCSIVolumes: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.DescribeStorediSCSIVolumes.DescribeStorediSCSIVolumes
- Network.AWS.StorageGateway.DescribeStorediSCSIVolumes: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.DescribeStorediSCSIVolumes.DescribeStorediSCSIVolumes
- Network.AWS.StorageGateway.DescribeStorediSCSIVolumes: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.DescribeStorediSCSIVolumes.DescribeStorediSCSIVolumes
- Network.AWS.StorageGateway.DescribeTapeArchives: data DescribeTapeArchives
- Network.AWS.StorageGateway.DescribeTapeArchives: data DescribeTapeArchivesResponse
- Network.AWS.StorageGateway.DescribeTapeArchives: describeTapeArchives :: DescribeTapeArchives
- Network.AWS.StorageGateway.DescribeTapeArchives: describeTapeArchivesResponse :: Int -> DescribeTapeArchivesResponse
- Network.AWS.StorageGateway.DescribeTapeArchives: dtaLimit :: Lens' DescribeTapeArchives (Maybe Natural)
- Network.AWS.StorageGateway.DescribeTapeArchives: dtaMarker :: Lens' DescribeTapeArchives (Maybe Text)
- Network.AWS.StorageGateway.DescribeTapeArchives: dtaTapeARNs :: Lens' DescribeTapeArchives [Text]
- Network.AWS.StorageGateway.DescribeTapeArchives: dtarsMarker :: Lens' DescribeTapeArchivesResponse (Maybe Text)
- Network.AWS.StorageGateway.DescribeTapeArchives: dtarsResponseStatus :: Lens' DescribeTapeArchivesResponse Int
- Network.AWS.StorageGateway.DescribeTapeArchives: dtarsTapeArchives :: Lens' DescribeTapeArchivesResponse [TapeArchive]
- Network.AWS.StorageGateway.DescribeTapeArchives: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DescribeTapeArchives.DescribeTapeArchives
- Network.AWS.StorageGateway.DescribeTapeArchives: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DescribeTapeArchives.DescribeTapeArchivesResponse
- Network.AWS.StorageGateway.DescribeTapeArchives: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.DescribeTapeArchives.DescribeTapeArchives
- Network.AWS.StorageGateway.DescribeTapeArchives: instance Data.Data.Data Network.AWS.StorageGateway.DescribeTapeArchives.DescribeTapeArchives
- Network.AWS.StorageGateway.DescribeTapeArchives: instance Data.Data.Data Network.AWS.StorageGateway.DescribeTapeArchives.DescribeTapeArchivesResponse
- Network.AWS.StorageGateway.DescribeTapeArchives: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.DescribeTapeArchives.DescribeTapeArchives
- Network.AWS.StorageGateway.DescribeTapeArchives: instance GHC.Classes.Eq Network.AWS.StorageGateway.DescribeTapeArchives.DescribeTapeArchives
- Network.AWS.StorageGateway.DescribeTapeArchives: instance GHC.Classes.Eq Network.AWS.StorageGateway.DescribeTapeArchives.DescribeTapeArchivesResponse
- Network.AWS.StorageGateway.DescribeTapeArchives: instance GHC.Generics.Generic Network.AWS.StorageGateway.DescribeTapeArchives.DescribeTapeArchives
- Network.AWS.StorageGateway.DescribeTapeArchives: instance GHC.Generics.Generic Network.AWS.StorageGateway.DescribeTapeArchives.DescribeTapeArchivesResponse
- Network.AWS.StorageGateway.DescribeTapeArchives: instance GHC.Read.Read Network.AWS.StorageGateway.DescribeTapeArchives.DescribeTapeArchives
- Network.AWS.StorageGateway.DescribeTapeArchives: instance GHC.Read.Read Network.AWS.StorageGateway.DescribeTapeArchives.DescribeTapeArchivesResponse
- Network.AWS.StorageGateway.DescribeTapeArchives: instance GHC.Show.Show Network.AWS.StorageGateway.DescribeTapeArchives.DescribeTapeArchives
- Network.AWS.StorageGateway.DescribeTapeArchives: instance GHC.Show.Show Network.AWS.StorageGateway.DescribeTapeArchives.DescribeTapeArchivesResponse
- Network.AWS.StorageGateway.DescribeTapeArchives: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.DescribeTapeArchives.DescribeTapeArchives
- Network.AWS.StorageGateway.DescribeTapeArchives: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.DescribeTapeArchives.DescribeTapeArchives
- Network.AWS.StorageGateway.DescribeTapeArchives: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.DescribeTapeArchives.DescribeTapeArchives
- Network.AWS.StorageGateway.DescribeTapeArchives: instance Network.AWS.Pager.AWSPager Network.AWS.StorageGateway.DescribeTapeArchives.DescribeTapeArchives
- Network.AWS.StorageGateway.DescribeTapeArchives: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.DescribeTapeArchives.DescribeTapeArchives
- Network.AWS.StorageGateway.DescribeTapeRecoveryPoints: data DescribeTapeRecoveryPoints
- Network.AWS.StorageGateway.DescribeTapeRecoveryPoints: data DescribeTapeRecoveryPointsResponse
- Network.AWS.StorageGateway.DescribeTapeRecoveryPoints: describeTapeRecoveryPoints :: Text -> DescribeTapeRecoveryPoints
- Network.AWS.StorageGateway.DescribeTapeRecoveryPoints: describeTapeRecoveryPointsResponse :: Int -> DescribeTapeRecoveryPointsResponse
- Network.AWS.StorageGateway.DescribeTapeRecoveryPoints: dtrpGatewayARN :: Lens' DescribeTapeRecoveryPoints Text
- Network.AWS.StorageGateway.DescribeTapeRecoveryPoints: dtrpLimit :: Lens' DescribeTapeRecoveryPoints (Maybe Natural)
- Network.AWS.StorageGateway.DescribeTapeRecoveryPoints: dtrpMarker :: Lens' DescribeTapeRecoveryPoints (Maybe Text)
- Network.AWS.StorageGateway.DescribeTapeRecoveryPoints: dtrprsGatewayARN :: Lens' DescribeTapeRecoveryPointsResponse (Maybe Text)
- Network.AWS.StorageGateway.DescribeTapeRecoveryPoints: dtrprsMarker :: Lens' DescribeTapeRecoveryPointsResponse (Maybe Text)
- Network.AWS.StorageGateway.DescribeTapeRecoveryPoints: dtrprsResponseStatus :: Lens' DescribeTapeRecoveryPointsResponse Int
- Network.AWS.StorageGateway.DescribeTapeRecoveryPoints: dtrprsTapeRecoveryPointInfos :: Lens' DescribeTapeRecoveryPointsResponse [TapeRecoveryPointInfo]
- Network.AWS.StorageGateway.DescribeTapeRecoveryPoints: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DescribeTapeRecoveryPoints.DescribeTapeRecoveryPoints
- Network.AWS.StorageGateway.DescribeTapeRecoveryPoints: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DescribeTapeRecoveryPoints.DescribeTapeRecoveryPointsResponse
- Network.AWS.StorageGateway.DescribeTapeRecoveryPoints: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.DescribeTapeRecoveryPoints.DescribeTapeRecoveryPoints
- Network.AWS.StorageGateway.DescribeTapeRecoveryPoints: instance Data.Data.Data Network.AWS.StorageGateway.DescribeTapeRecoveryPoints.DescribeTapeRecoveryPoints
- Network.AWS.StorageGateway.DescribeTapeRecoveryPoints: instance Data.Data.Data Network.AWS.StorageGateway.DescribeTapeRecoveryPoints.DescribeTapeRecoveryPointsResponse
- Network.AWS.StorageGateway.DescribeTapeRecoveryPoints: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.DescribeTapeRecoveryPoints.DescribeTapeRecoveryPoints
- Network.AWS.StorageGateway.DescribeTapeRecoveryPoints: instance GHC.Classes.Eq Network.AWS.StorageGateway.DescribeTapeRecoveryPoints.DescribeTapeRecoveryPoints
- Network.AWS.StorageGateway.DescribeTapeRecoveryPoints: instance GHC.Classes.Eq Network.AWS.StorageGateway.DescribeTapeRecoveryPoints.DescribeTapeRecoveryPointsResponse
- Network.AWS.StorageGateway.DescribeTapeRecoveryPoints: instance GHC.Generics.Generic Network.AWS.StorageGateway.DescribeTapeRecoveryPoints.DescribeTapeRecoveryPoints
- Network.AWS.StorageGateway.DescribeTapeRecoveryPoints: instance GHC.Generics.Generic Network.AWS.StorageGateway.DescribeTapeRecoveryPoints.DescribeTapeRecoveryPointsResponse
- Network.AWS.StorageGateway.DescribeTapeRecoveryPoints: instance GHC.Read.Read Network.AWS.StorageGateway.DescribeTapeRecoveryPoints.DescribeTapeRecoveryPoints
- Network.AWS.StorageGateway.DescribeTapeRecoveryPoints: instance GHC.Read.Read Network.AWS.StorageGateway.DescribeTapeRecoveryPoints.DescribeTapeRecoveryPointsResponse
- Network.AWS.StorageGateway.DescribeTapeRecoveryPoints: instance GHC.Show.Show Network.AWS.StorageGateway.DescribeTapeRecoveryPoints.DescribeTapeRecoveryPoints
- Network.AWS.StorageGateway.DescribeTapeRecoveryPoints: instance GHC.Show.Show Network.AWS.StorageGateway.DescribeTapeRecoveryPoints.DescribeTapeRecoveryPointsResponse
- Network.AWS.StorageGateway.DescribeTapeRecoveryPoints: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.DescribeTapeRecoveryPoints.DescribeTapeRecoveryPoints
- Network.AWS.StorageGateway.DescribeTapeRecoveryPoints: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.DescribeTapeRecoveryPoints.DescribeTapeRecoveryPoints
- Network.AWS.StorageGateway.DescribeTapeRecoveryPoints: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.DescribeTapeRecoveryPoints.DescribeTapeRecoveryPoints
- Network.AWS.StorageGateway.DescribeTapeRecoveryPoints: instance Network.AWS.Pager.AWSPager Network.AWS.StorageGateway.DescribeTapeRecoveryPoints.DescribeTapeRecoveryPoints
- Network.AWS.StorageGateway.DescribeTapeRecoveryPoints: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.DescribeTapeRecoveryPoints.DescribeTapeRecoveryPoints
- Network.AWS.StorageGateway.DescribeTapes: data DescribeTapes
- Network.AWS.StorageGateway.DescribeTapes: data DescribeTapesResponse
- Network.AWS.StorageGateway.DescribeTapes: describeTapes :: Text -> DescribeTapes
- Network.AWS.StorageGateway.DescribeTapes: describeTapesResponse :: Int -> DescribeTapesResponse
- Network.AWS.StorageGateway.DescribeTapes: dtGatewayARN :: Lens' DescribeTapes Text
- Network.AWS.StorageGateway.DescribeTapes: dtLimit :: Lens' DescribeTapes (Maybe Natural)
- Network.AWS.StorageGateway.DescribeTapes: dtMarker :: Lens' DescribeTapes (Maybe Text)
- Network.AWS.StorageGateway.DescribeTapes: dtTapeARNs :: Lens' DescribeTapes [Text]
- Network.AWS.StorageGateway.DescribeTapes: dtsrsMarker :: Lens' DescribeTapesResponse (Maybe Text)
- Network.AWS.StorageGateway.DescribeTapes: dtsrsResponseStatus :: Lens' DescribeTapesResponse Int
- Network.AWS.StorageGateway.DescribeTapes: dtsrsTapes :: Lens' DescribeTapesResponse [Tape]
- Network.AWS.StorageGateway.DescribeTapes: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DescribeTapes.DescribeTapes
- Network.AWS.StorageGateway.DescribeTapes: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DescribeTapes.DescribeTapesResponse
- Network.AWS.StorageGateway.DescribeTapes: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.DescribeTapes.DescribeTapes
- Network.AWS.StorageGateway.DescribeTapes: instance Data.Data.Data Network.AWS.StorageGateway.DescribeTapes.DescribeTapes
- Network.AWS.StorageGateway.DescribeTapes: instance Data.Data.Data Network.AWS.StorageGateway.DescribeTapes.DescribeTapesResponse
- Network.AWS.StorageGateway.DescribeTapes: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.DescribeTapes.DescribeTapes
- Network.AWS.StorageGateway.DescribeTapes: instance GHC.Classes.Eq Network.AWS.StorageGateway.DescribeTapes.DescribeTapes
- Network.AWS.StorageGateway.DescribeTapes: instance GHC.Classes.Eq Network.AWS.StorageGateway.DescribeTapes.DescribeTapesResponse
- Network.AWS.StorageGateway.DescribeTapes: instance GHC.Generics.Generic Network.AWS.StorageGateway.DescribeTapes.DescribeTapes
- Network.AWS.StorageGateway.DescribeTapes: instance GHC.Generics.Generic Network.AWS.StorageGateway.DescribeTapes.DescribeTapesResponse
- Network.AWS.StorageGateway.DescribeTapes: instance GHC.Read.Read Network.AWS.StorageGateway.DescribeTapes.DescribeTapes
- Network.AWS.StorageGateway.DescribeTapes: instance GHC.Read.Read Network.AWS.StorageGateway.DescribeTapes.DescribeTapesResponse
- Network.AWS.StorageGateway.DescribeTapes: instance GHC.Show.Show Network.AWS.StorageGateway.DescribeTapes.DescribeTapes
- Network.AWS.StorageGateway.DescribeTapes: instance GHC.Show.Show Network.AWS.StorageGateway.DescribeTapes.DescribeTapesResponse
- Network.AWS.StorageGateway.DescribeTapes: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.DescribeTapes.DescribeTapes
- Network.AWS.StorageGateway.DescribeTapes: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.DescribeTapes.DescribeTapes
- Network.AWS.StorageGateway.DescribeTapes: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.DescribeTapes.DescribeTapes
- Network.AWS.StorageGateway.DescribeTapes: instance Network.AWS.Pager.AWSPager Network.AWS.StorageGateway.DescribeTapes.DescribeTapes
- Network.AWS.StorageGateway.DescribeTapes: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.DescribeTapes.DescribeTapes
- Network.AWS.StorageGateway.DescribeUploadBuffer: data DescribeUploadBuffer
- Network.AWS.StorageGateway.DescribeUploadBuffer: data DescribeUploadBufferResponse
- Network.AWS.StorageGateway.DescribeUploadBuffer: describeUploadBuffer :: Text -> DescribeUploadBuffer
- Network.AWS.StorageGateway.DescribeUploadBuffer: describeUploadBufferResponse :: Int -> DescribeUploadBufferResponse
- Network.AWS.StorageGateway.DescribeUploadBuffer: dubGatewayARN :: Lens' DescribeUploadBuffer Text
- Network.AWS.StorageGateway.DescribeUploadBuffer: dubrsDiskIds :: Lens' DescribeUploadBufferResponse [Text]
- Network.AWS.StorageGateway.DescribeUploadBuffer: dubrsGatewayARN :: Lens' DescribeUploadBufferResponse (Maybe Text)
- Network.AWS.StorageGateway.DescribeUploadBuffer: dubrsResponseStatus :: Lens' DescribeUploadBufferResponse Int
- Network.AWS.StorageGateway.DescribeUploadBuffer: dubrsUploadBufferAllocatedInBytes :: Lens' DescribeUploadBufferResponse (Maybe Integer)
- Network.AWS.StorageGateway.DescribeUploadBuffer: dubrsUploadBufferUsedInBytes :: Lens' DescribeUploadBufferResponse (Maybe Integer)
- Network.AWS.StorageGateway.DescribeUploadBuffer: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DescribeUploadBuffer.DescribeUploadBuffer
- Network.AWS.StorageGateway.DescribeUploadBuffer: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DescribeUploadBuffer.DescribeUploadBufferResponse
- Network.AWS.StorageGateway.DescribeUploadBuffer: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.DescribeUploadBuffer.DescribeUploadBuffer
- Network.AWS.StorageGateway.DescribeUploadBuffer: instance Data.Data.Data Network.AWS.StorageGateway.DescribeUploadBuffer.DescribeUploadBuffer
- Network.AWS.StorageGateway.DescribeUploadBuffer: instance Data.Data.Data Network.AWS.StorageGateway.DescribeUploadBuffer.DescribeUploadBufferResponse
- Network.AWS.StorageGateway.DescribeUploadBuffer: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.DescribeUploadBuffer.DescribeUploadBuffer
- Network.AWS.StorageGateway.DescribeUploadBuffer: instance GHC.Classes.Eq Network.AWS.StorageGateway.DescribeUploadBuffer.DescribeUploadBuffer
- Network.AWS.StorageGateway.DescribeUploadBuffer: instance GHC.Classes.Eq Network.AWS.StorageGateway.DescribeUploadBuffer.DescribeUploadBufferResponse
- Network.AWS.StorageGateway.DescribeUploadBuffer: instance GHC.Generics.Generic Network.AWS.StorageGateway.DescribeUploadBuffer.DescribeUploadBuffer
- Network.AWS.StorageGateway.DescribeUploadBuffer: instance GHC.Generics.Generic Network.AWS.StorageGateway.DescribeUploadBuffer.DescribeUploadBufferResponse
- Network.AWS.StorageGateway.DescribeUploadBuffer: instance GHC.Read.Read Network.AWS.StorageGateway.DescribeUploadBuffer.DescribeUploadBuffer
- Network.AWS.StorageGateway.DescribeUploadBuffer: instance GHC.Read.Read Network.AWS.StorageGateway.DescribeUploadBuffer.DescribeUploadBufferResponse
- Network.AWS.StorageGateway.DescribeUploadBuffer: instance GHC.Show.Show Network.AWS.StorageGateway.DescribeUploadBuffer.DescribeUploadBuffer
- Network.AWS.StorageGateway.DescribeUploadBuffer: instance GHC.Show.Show Network.AWS.StorageGateway.DescribeUploadBuffer.DescribeUploadBufferResponse
- Network.AWS.StorageGateway.DescribeUploadBuffer: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.DescribeUploadBuffer.DescribeUploadBuffer
- Network.AWS.StorageGateway.DescribeUploadBuffer: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.DescribeUploadBuffer.DescribeUploadBuffer
- Network.AWS.StorageGateway.DescribeUploadBuffer: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.DescribeUploadBuffer.DescribeUploadBuffer
- Network.AWS.StorageGateway.DescribeUploadBuffer: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.DescribeUploadBuffer.DescribeUploadBuffer
- Network.AWS.StorageGateway.DescribeVTLDevices: data DescribeVTLDevices
- Network.AWS.StorageGateway.DescribeVTLDevices: data DescribeVTLDevicesResponse
- Network.AWS.StorageGateway.DescribeVTLDevices: describeVTLDevices :: Text -> DescribeVTLDevices
- Network.AWS.StorageGateway.DescribeVTLDevices: describeVTLDevicesResponse :: Int -> DescribeVTLDevicesResponse
- Network.AWS.StorageGateway.DescribeVTLDevices: dvtldGatewayARN :: Lens' DescribeVTLDevices Text
- Network.AWS.StorageGateway.DescribeVTLDevices: dvtldLimit :: Lens' DescribeVTLDevices (Maybe Natural)
- Network.AWS.StorageGateway.DescribeVTLDevices: dvtldMarker :: Lens' DescribeVTLDevices (Maybe Text)
- Network.AWS.StorageGateway.DescribeVTLDevices: dvtldVTLDeviceARNs :: Lens' DescribeVTLDevices [Text]
- Network.AWS.StorageGateway.DescribeVTLDevices: dvtldrsGatewayARN :: Lens' DescribeVTLDevicesResponse (Maybe Text)
- Network.AWS.StorageGateway.DescribeVTLDevices: dvtldrsMarker :: Lens' DescribeVTLDevicesResponse (Maybe Text)
- Network.AWS.StorageGateway.DescribeVTLDevices: dvtldrsResponseStatus :: Lens' DescribeVTLDevicesResponse Int
- Network.AWS.StorageGateway.DescribeVTLDevices: dvtldrsVTLDevices :: Lens' DescribeVTLDevicesResponse [VTLDevice]
- Network.AWS.StorageGateway.DescribeVTLDevices: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DescribeVTLDevices.DescribeVTLDevices
- Network.AWS.StorageGateway.DescribeVTLDevices: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DescribeVTLDevices.DescribeVTLDevicesResponse
- Network.AWS.StorageGateway.DescribeVTLDevices: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.DescribeVTLDevices.DescribeVTLDevices
- Network.AWS.StorageGateway.DescribeVTLDevices: instance Data.Data.Data Network.AWS.StorageGateway.DescribeVTLDevices.DescribeVTLDevices
- Network.AWS.StorageGateway.DescribeVTLDevices: instance Data.Data.Data Network.AWS.StorageGateway.DescribeVTLDevices.DescribeVTLDevicesResponse
- Network.AWS.StorageGateway.DescribeVTLDevices: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.DescribeVTLDevices.DescribeVTLDevices
- Network.AWS.StorageGateway.DescribeVTLDevices: instance GHC.Classes.Eq Network.AWS.StorageGateway.DescribeVTLDevices.DescribeVTLDevices
- Network.AWS.StorageGateway.DescribeVTLDevices: instance GHC.Classes.Eq Network.AWS.StorageGateway.DescribeVTLDevices.DescribeVTLDevicesResponse
- Network.AWS.StorageGateway.DescribeVTLDevices: instance GHC.Generics.Generic Network.AWS.StorageGateway.DescribeVTLDevices.DescribeVTLDevices
- Network.AWS.StorageGateway.DescribeVTLDevices: instance GHC.Generics.Generic Network.AWS.StorageGateway.DescribeVTLDevices.DescribeVTLDevicesResponse
- Network.AWS.StorageGateway.DescribeVTLDevices: instance GHC.Read.Read Network.AWS.StorageGateway.DescribeVTLDevices.DescribeVTLDevices
- Network.AWS.StorageGateway.DescribeVTLDevices: instance GHC.Read.Read Network.AWS.StorageGateway.DescribeVTLDevices.DescribeVTLDevicesResponse
- Network.AWS.StorageGateway.DescribeVTLDevices: instance GHC.Show.Show Network.AWS.StorageGateway.DescribeVTLDevices.DescribeVTLDevices
- Network.AWS.StorageGateway.DescribeVTLDevices: instance GHC.Show.Show Network.AWS.StorageGateway.DescribeVTLDevices.DescribeVTLDevicesResponse
- Network.AWS.StorageGateway.DescribeVTLDevices: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.DescribeVTLDevices.DescribeVTLDevices
- Network.AWS.StorageGateway.DescribeVTLDevices: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.DescribeVTLDevices.DescribeVTLDevices
- Network.AWS.StorageGateway.DescribeVTLDevices: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.DescribeVTLDevices.DescribeVTLDevices
- Network.AWS.StorageGateway.DescribeVTLDevices: instance Network.AWS.Pager.AWSPager Network.AWS.StorageGateway.DescribeVTLDevices.DescribeVTLDevices
- Network.AWS.StorageGateway.DescribeVTLDevices: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.DescribeVTLDevices.DescribeVTLDevices
- Network.AWS.StorageGateway.DescribeWorkingStorage: data DescribeWorkingStorage
- Network.AWS.StorageGateway.DescribeWorkingStorage: data DescribeWorkingStorageResponse
- Network.AWS.StorageGateway.DescribeWorkingStorage: describeWorkingStorage :: Text -> DescribeWorkingStorage
- Network.AWS.StorageGateway.DescribeWorkingStorage: describeWorkingStorageResponse :: Int -> DescribeWorkingStorageResponse
- Network.AWS.StorageGateway.DescribeWorkingStorage: dwsGatewayARN :: Lens' DescribeWorkingStorage Text
- Network.AWS.StorageGateway.DescribeWorkingStorage: dwsrsDiskIds :: Lens' DescribeWorkingStorageResponse [Text]
- Network.AWS.StorageGateway.DescribeWorkingStorage: dwsrsGatewayARN :: Lens' DescribeWorkingStorageResponse (Maybe Text)
- Network.AWS.StorageGateway.DescribeWorkingStorage: dwsrsResponseStatus :: Lens' DescribeWorkingStorageResponse Int
- Network.AWS.StorageGateway.DescribeWorkingStorage: dwsrsWorkingStorageAllocatedInBytes :: Lens' DescribeWorkingStorageResponse (Maybe Integer)
- Network.AWS.StorageGateway.DescribeWorkingStorage: dwsrsWorkingStorageUsedInBytes :: Lens' DescribeWorkingStorageResponse (Maybe Integer)
- Network.AWS.StorageGateway.DescribeWorkingStorage: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DescribeWorkingStorage.DescribeWorkingStorage
- Network.AWS.StorageGateway.DescribeWorkingStorage: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DescribeWorkingStorage.DescribeWorkingStorageResponse
- Network.AWS.StorageGateway.DescribeWorkingStorage: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.DescribeWorkingStorage.DescribeWorkingStorage
- Network.AWS.StorageGateway.DescribeWorkingStorage: instance Data.Data.Data Network.AWS.StorageGateway.DescribeWorkingStorage.DescribeWorkingStorage
- Network.AWS.StorageGateway.DescribeWorkingStorage: instance Data.Data.Data Network.AWS.StorageGateway.DescribeWorkingStorage.DescribeWorkingStorageResponse
- Network.AWS.StorageGateway.DescribeWorkingStorage: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.DescribeWorkingStorage.DescribeWorkingStorage
- Network.AWS.StorageGateway.DescribeWorkingStorage: instance GHC.Classes.Eq Network.AWS.StorageGateway.DescribeWorkingStorage.DescribeWorkingStorage
- Network.AWS.StorageGateway.DescribeWorkingStorage: instance GHC.Classes.Eq Network.AWS.StorageGateway.DescribeWorkingStorage.DescribeWorkingStorageResponse
- Network.AWS.StorageGateway.DescribeWorkingStorage: instance GHC.Generics.Generic Network.AWS.StorageGateway.DescribeWorkingStorage.DescribeWorkingStorage
- Network.AWS.StorageGateway.DescribeWorkingStorage: instance GHC.Generics.Generic Network.AWS.StorageGateway.DescribeWorkingStorage.DescribeWorkingStorageResponse
- Network.AWS.StorageGateway.DescribeWorkingStorage: instance GHC.Read.Read Network.AWS.StorageGateway.DescribeWorkingStorage.DescribeWorkingStorage
- Network.AWS.StorageGateway.DescribeWorkingStorage: instance GHC.Read.Read Network.AWS.StorageGateway.DescribeWorkingStorage.DescribeWorkingStorageResponse
- Network.AWS.StorageGateway.DescribeWorkingStorage: instance GHC.Show.Show Network.AWS.StorageGateway.DescribeWorkingStorage.DescribeWorkingStorage
- Network.AWS.StorageGateway.DescribeWorkingStorage: instance GHC.Show.Show Network.AWS.StorageGateway.DescribeWorkingStorage.DescribeWorkingStorageResponse
- Network.AWS.StorageGateway.DescribeWorkingStorage: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.DescribeWorkingStorage.DescribeWorkingStorage
- Network.AWS.StorageGateway.DescribeWorkingStorage: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.DescribeWorkingStorage.DescribeWorkingStorage
- Network.AWS.StorageGateway.DescribeWorkingStorage: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.DescribeWorkingStorage.DescribeWorkingStorage
- Network.AWS.StorageGateway.DescribeWorkingStorage: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.DescribeWorkingStorage.DescribeWorkingStorage
- Network.AWS.StorageGateway.DisableGateway: dGatewayARN :: Lens' DisableGateway Text
- Network.AWS.StorageGateway.DisableGateway: data DisableGateway
- Network.AWS.StorageGateway.DisableGateway: data DisableGatewayResponse
- Network.AWS.StorageGateway.DisableGateway: disableGateway :: Text -> DisableGateway
- Network.AWS.StorageGateway.DisableGateway: disableGatewayResponse :: Int -> DisableGatewayResponse
- Network.AWS.StorageGateway.DisableGateway: disrsGatewayARN :: Lens' DisableGatewayResponse (Maybe Text)
- Network.AWS.StorageGateway.DisableGateway: disrsResponseStatus :: Lens' DisableGatewayResponse Int
- Network.AWS.StorageGateway.DisableGateway: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DisableGateway.DisableGateway
- Network.AWS.StorageGateway.DisableGateway: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.DisableGateway.DisableGatewayResponse
- Network.AWS.StorageGateway.DisableGateway: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.DisableGateway.DisableGateway
- Network.AWS.StorageGateway.DisableGateway: instance Data.Data.Data Network.AWS.StorageGateway.DisableGateway.DisableGateway
- Network.AWS.StorageGateway.DisableGateway: instance Data.Data.Data Network.AWS.StorageGateway.DisableGateway.DisableGatewayResponse
- Network.AWS.StorageGateway.DisableGateway: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.DisableGateway.DisableGateway
- Network.AWS.StorageGateway.DisableGateway: instance GHC.Classes.Eq Network.AWS.StorageGateway.DisableGateway.DisableGateway
- Network.AWS.StorageGateway.DisableGateway: instance GHC.Classes.Eq Network.AWS.StorageGateway.DisableGateway.DisableGatewayResponse
- Network.AWS.StorageGateway.DisableGateway: instance GHC.Generics.Generic Network.AWS.StorageGateway.DisableGateway.DisableGateway
- Network.AWS.StorageGateway.DisableGateway: instance GHC.Generics.Generic Network.AWS.StorageGateway.DisableGateway.DisableGatewayResponse
- Network.AWS.StorageGateway.DisableGateway: instance GHC.Read.Read Network.AWS.StorageGateway.DisableGateway.DisableGateway
- Network.AWS.StorageGateway.DisableGateway: instance GHC.Read.Read Network.AWS.StorageGateway.DisableGateway.DisableGatewayResponse
- Network.AWS.StorageGateway.DisableGateway: instance GHC.Show.Show Network.AWS.StorageGateway.DisableGateway.DisableGateway
- Network.AWS.StorageGateway.DisableGateway: instance GHC.Show.Show Network.AWS.StorageGateway.DisableGateway.DisableGatewayResponse
- Network.AWS.StorageGateway.DisableGateway: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.DisableGateway.DisableGateway
- Network.AWS.StorageGateway.DisableGateway: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.DisableGateway.DisableGateway
- Network.AWS.StorageGateway.DisableGateway: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.DisableGateway.DisableGateway
- Network.AWS.StorageGateway.DisableGateway: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.DisableGateway.DisableGateway
- Network.AWS.StorageGateway.ListFileShares: data ListFileShares
- Network.AWS.StorageGateway.ListFileShares: data ListFileSharesResponse
- Network.AWS.StorageGateway.ListFileShares: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.ListFileShares.ListFileShares
- Network.AWS.StorageGateway.ListFileShares: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.ListFileShares.ListFileSharesResponse
- Network.AWS.StorageGateway.ListFileShares: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.ListFileShares.ListFileShares
- Network.AWS.StorageGateway.ListFileShares: instance Data.Data.Data Network.AWS.StorageGateway.ListFileShares.ListFileShares
- Network.AWS.StorageGateway.ListFileShares: instance Data.Data.Data Network.AWS.StorageGateway.ListFileShares.ListFileSharesResponse
- Network.AWS.StorageGateway.ListFileShares: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.ListFileShares.ListFileShares
- Network.AWS.StorageGateway.ListFileShares: instance GHC.Classes.Eq Network.AWS.StorageGateway.ListFileShares.ListFileShares
- Network.AWS.StorageGateway.ListFileShares: instance GHC.Classes.Eq Network.AWS.StorageGateway.ListFileShares.ListFileSharesResponse
- Network.AWS.StorageGateway.ListFileShares: instance GHC.Generics.Generic Network.AWS.StorageGateway.ListFileShares.ListFileShares
- Network.AWS.StorageGateway.ListFileShares: instance GHC.Generics.Generic Network.AWS.StorageGateway.ListFileShares.ListFileSharesResponse
- Network.AWS.StorageGateway.ListFileShares: instance GHC.Read.Read Network.AWS.StorageGateway.ListFileShares.ListFileShares
- Network.AWS.StorageGateway.ListFileShares: instance GHC.Read.Read Network.AWS.StorageGateway.ListFileShares.ListFileSharesResponse
- Network.AWS.StorageGateway.ListFileShares: instance GHC.Show.Show Network.AWS.StorageGateway.ListFileShares.ListFileShares
- Network.AWS.StorageGateway.ListFileShares: instance GHC.Show.Show Network.AWS.StorageGateway.ListFileShares.ListFileSharesResponse
- Network.AWS.StorageGateway.ListFileShares: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.ListFileShares.ListFileShares
- Network.AWS.StorageGateway.ListFileShares: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.ListFileShares.ListFileShares
- Network.AWS.StorageGateway.ListFileShares: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.ListFileShares.ListFileShares
- Network.AWS.StorageGateway.ListFileShares: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.ListFileShares.ListFileShares
- Network.AWS.StorageGateway.ListFileShares: lfsGatewayARN :: Lens' ListFileShares (Maybe Text)
- Network.AWS.StorageGateway.ListFileShares: lfsLimit :: Lens' ListFileShares (Maybe Natural)
- Network.AWS.StorageGateway.ListFileShares: lfsMarker :: Lens' ListFileShares (Maybe Text)
- Network.AWS.StorageGateway.ListFileShares: lfsrsFileShareInfoList :: Lens' ListFileSharesResponse [FileShareInfo]
- Network.AWS.StorageGateway.ListFileShares: lfsrsMarker :: Lens' ListFileSharesResponse (Maybe Text)
- Network.AWS.StorageGateway.ListFileShares: lfsrsNextMarker :: Lens' ListFileSharesResponse (Maybe Text)
- Network.AWS.StorageGateway.ListFileShares: lfsrsResponseStatus :: Lens' ListFileSharesResponse Int
- Network.AWS.StorageGateway.ListFileShares: listFileShares :: ListFileShares
- Network.AWS.StorageGateway.ListFileShares: listFileSharesResponse :: Int -> ListFileSharesResponse
- Network.AWS.StorageGateway.ListGateways: data ListGateways
- Network.AWS.StorageGateway.ListGateways: data ListGatewaysResponse
- Network.AWS.StorageGateway.ListGateways: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.ListGateways.ListGateways
- Network.AWS.StorageGateway.ListGateways: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.ListGateways.ListGatewaysResponse
- Network.AWS.StorageGateway.ListGateways: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.ListGateways.ListGateways
- Network.AWS.StorageGateway.ListGateways: instance Data.Data.Data Network.AWS.StorageGateway.ListGateways.ListGateways
- Network.AWS.StorageGateway.ListGateways: instance Data.Data.Data Network.AWS.StorageGateway.ListGateways.ListGatewaysResponse
- Network.AWS.StorageGateway.ListGateways: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.ListGateways.ListGateways
- Network.AWS.StorageGateway.ListGateways: instance GHC.Classes.Eq Network.AWS.StorageGateway.ListGateways.ListGateways
- Network.AWS.StorageGateway.ListGateways: instance GHC.Classes.Eq Network.AWS.StorageGateway.ListGateways.ListGatewaysResponse
- Network.AWS.StorageGateway.ListGateways: instance GHC.Generics.Generic Network.AWS.StorageGateway.ListGateways.ListGateways
- Network.AWS.StorageGateway.ListGateways: instance GHC.Generics.Generic Network.AWS.StorageGateway.ListGateways.ListGatewaysResponse
- Network.AWS.StorageGateway.ListGateways: instance GHC.Read.Read Network.AWS.StorageGateway.ListGateways.ListGateways
- Network.AWS.StorageGateway.ListGateways: instance GHC.Read.Read Network.AWS.StorageGateway.ListGateways.ListGatewaysResponse
- Network.AWS.StorageGateway.ListGateways: instance GHC.Show.Show Network.AWS.StorageGateway.ListGateways.ListGateways
- Network.AWS.StorageGateway.ListGateways: instance GHC.Show.Show Network.AWS.StorageGateway.ListGateways.ListGatewaysResponse
- Network.AWS.StorageGateway.ListGateways: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.ListGateways.ListGateways
- Network.AWS.StorageGateway.ListGateways: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.ListGateways.ListGateways
- Network.AWS.StorageGateway.ListGateways: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.ListGateways.ListGateways
- Network.AWS.StorageGateway.ListGateways: instance Network.AWS.Pager.AWSPager Network.AWS.StorageGateway.ListGateways.ListGateways
- Network.AWS.StorageGateway.ListGateways: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.ListGateways.ListGateways
- Network.AWS.StorageGateway.ListGateways: lgLimit :: Lens' ListGateways (Maybe Natural)
- Network.AWS.StorageGateway.ListGateways: lgMarker :: Lens' ListGateways (Maybe Text)
- Network.AWS.StorageGateway.ListGateways: lgrsGateways :: Lens' ListGatewaysResponse [GatewayInfo]
- Network.AWS.StorageGateway.ListGateways: lgrsMarker :: Lens' ListGatewaysResponse (Maybe Text)
- Network.AWS.StorageGateway.ListGateways: lgrsResponseStatus :: Lens' ListGatewaysResponse Int
- Network.AWS.StorageGateway.ListGateways: listGateways :: ListGateways
- Network.AWS.StorageGateway.ListGateways: listGatewaysResponse :: Int -> ListGatewaysResponse
- Network.AWS.StorageGateway.ListLocalDisks: data ListLocalDisks
- Network.AWS.StorageGateway.ListLocalDisks: data ListLocalDisksResponse
- Network.AWS.StorageGateway.ListLocalDisks: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.ListLocalDisks.ListLocalDisks
- Network.AWS.StorageGateway.ListLocalDisks: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.ListLocalDisks.ListLocalDisksResponse
- Network.AWS.StorageGateway.ListLocalDisks: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.ListLocalDisks.ListLocalDisks
- Network.AWS.StorageGateway.ListLocalDisks: instance Data.Data.Data Network.AWS.StorageGateway.ListLocalDisks.ListLocalDisks
- Network.AWS.StorageGateway.ListLocalDisks: instance Data.Data.Data Network.AWS.StorageGateway.ListLocalDisks.ListLocalDisksResponse
- Network.AWS.StorageGateway.ListLocalDisks: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.ListLocalDisks.ListLocalDisks
- Network.AWS.StorageGateway.ListLocalDisks: instance GHC.Classes.Eq Network.AWS.StorageGateway.ListLocalDisks.ListLocalDisks
- Network.AWS.StorageGateway.ListLocalDisks: instance GHC.Classes.Eq Network.AWS.StorageGateway.ListLocalDisks.ListLocalDisksResponse
- Network.AWS.StorageGateway.ListLocalDisks: instance GHC.Generics.Generic Network.AWS.StorageGateway.ListLocalDisks.ListLocalDisks
- Network.AWS.StorageGateway.ListLocalDisks: instance GHC.Generics.Generic Network.AWS.StorageGateway.ListLocalDisks.ListLocalDisksResponse
- Network.AWS.StorageGateway.ListLocalDisks: instance GHC.Read.Read Network.AWS.StorageGateway.ListLocalDisks.ListLocalDisks
- Network.AWS.StorageGateway.ListLocalDisks: instance GHC.Read.Read Network.AWS.StorageGateway.ListLocalDisks.ListLocalDisksResponse
- Network.AWS.StorageGateway.ListLocalDisks: instance GHC.Show.Show Network.AWS.StorageGateway.ListLocalDisks.ListLocalDisks
- Network.AWS.StorageGateway.ListLocalDisks: instance GHC.Show.Show Network.AWS.StorageGateway.ListLocalDisks.ListLocalDisksResponse
- Network.AWS.StorageGateway.ListLocalDisks: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.ListLocalDisks.ListLocalDisks
- Network.AWS.StorageGateway.ListLocalDisks: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.ListLocalDisks.ListLocalDisks
- Network.AWS.StorageGateway.ListLocalDisks: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.ListLocalDisks.ListLocalDisks
- Network.AWS.StorageGateway.ListLocalDisks: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.ListLocalDisks.ListLocalDisks
- Network.AWS.StorageGateway.ListLocalDisks: listLocalDisks :: Text -> ListLocalDisks
- Network.AWS.StorageGateway.ListLocalDisks: listLocalDisksResponse :: Int -> ListLocalDisksResponse
- Network.AWS.StorageGateway.ListLocalDisks: lldGatewayARN :: Lens' ListLocalDisks Text
- Network.AWS.StorageGateway.ListLocalDisks: lldrsDisks :: Lens' ListLocalDisksResponse [Disk]
- Network.AWS.StorageGateway.ListLocalDisks: lldrsGatewayARN :: Lens' ListLocalDisksResponse (Maybe Text)
- Network.AWS.StorageGateway.ListLocalDisks: lldrsResponseStatus :: Lens' ListLocalDisksResponse Int
- Network.AWS.StorageGateway.ListTagsForResource: data ListTagsForResource
- Network.AWS.StorageGateway.ListTagsForResource: data ListTagsForResourceResponse
- Network.AWS.StorageGateway.ListTagsForResource: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.ListTagsForResource.ListTagsForResource
- Network.AWS.StorageGateway.ListTagsForResource: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.ListTagsForResource.ListTagsForResourceResponse
- Network.AWS.StorageGateway.ListTagsForResource: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.ListTagsForResource.ListTagsForResource
- Network.AWS.StorageGateway.ListTagsForResource: instance Data.Data.Data Network.AWS.StorageGateway.ListTagsForResource.ListTagsForResource
- Network.AWS.StorageGateway.ListTagsForResource: instance Data.Data.Data Network.AWS.StorageGateway.ListTagsForResource.ListTagsForResourceResponse
- Network.AWS.StorageGateway.ListTagsForResource: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.ListTagsForResource.ListTagsForResource
- Network.AWS.StorageGateway.ListTagsForResource: instance GHC.Classes.Eq Network.AWS.StorageGateway.ListTagsForResource.ListTagsForResource
- Network.AWS.StorageGateway.ListTagsForResource: instance GHC.Classes.Eq Network.AWS.StorageGateway.ListTagsForResource.ListTagsForResourceResponse
- Network.AWS.StorageGateway.ListTagsForResource: instance GHC.Generics.Generic Network.AWS.StorageGateway.ListTagsForResource.ListTagsForResource
- Network.AWS.StorageGateway.ListTagsForResource: instance GHC.Generics.Generic Network.AWS.StorageGateway.ListTagsForResource.ListTagsForResourceResponse
- Network.AWS.StorageGateway.ListTagsForResource: instance GHC.Read.Read Network.AWS.StorageGateway.ListTagsForResource.ListTagsForResource
- Network.AWS.StorageGateway.ListTagsForResource: instance GHC.Read.Read Network.AWS.StorageGateway.ListTagsForResource.ListTagsForResourceResponse
- Network.AWS.StorageGateway.ListTagsForResource: instance GHC.Show.Show Network.AWS.StorageGateway.ListTagsForResource.ListTagsForResource
- Network.AWS.StorageGateway.ListTagsForResource: instance GHC.Show.Show Network.AWS.StorageGateway.ListTagsForResource.ListTagsForResourceResponse
- Network.AWS.StorageGateway.ListTagsForResource: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.ListTagsForResource.ListTagsForResource
- Network.AWS.StorageGateway.ListTagsForResource: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.ListTagsForResource.ListTagsForResource
- Network.AWS.StorageGateway.ListTagsForResource: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.ListTagsForResource.ListTagsForResource
- Network.AWS.StorageGateway.ListTagsForResource: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.ListTagsForResource.ListTagsForResource
- Network.AWS.StorageGateway.ListTagsForResource: listTagsForResource :: Text -> ListTagsForResource
- Network.AWS.StorageGateway.ListTagsForResource: listTagsForResourceResponse :: Int -> ListTagsForResourceResponse
- Network.AWS.StorageGateway.ListTagsForResource: ltfrLimit :: Lens' ListTagsForResource (Maybe Natural)
- Network.AWS.StorageGateway.ListTagsForResource: ltfrMarker :: Lens' ListTagsForResource (Maybe Text)
- Network.AWS.StorageGateway.ListTagsForResource: ltfrResourceARN :: Lens' ListTagsForResource Text
- Network.AWS.StorageGateway.ListTagsForResource: ltfrrsMarker :: Lens' ListTagsForResourceResponse (Maybe Text)
- Network.AWS.StorageGateway.ListTagsForResource: ltfrrsResourceARN :: Lens' ListTagsForResourceResponse (Maybe Text)
- Network.AWS.StorageGateway.ListTagsForResource: ltfrrsResponseStatus :: Lens' ListTagsForResourceResponse Int
- Network.AWS.StorageGateway.ListTagsForResource: ltfrrsTags :: Lens' ListTagsForResourceResponse [Tag]
- Network.AWS.StorageGateway.ListTapes: data ListTapes
- Network.AWS.StorageGateway.ListTapes: data ListTapesResponse
- Network.AWS.StorageGateway.ListTapes: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.ListTapes.ListTapes
- Network.AWS.StorageGateway.ListTapes: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.ListTapes.ListTapesResponse
- Network.AWS.StorageGateway.ListTapes: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.ListTapes.ListTapes
- Network.AWS.StorageGateway.ListTapes: instance Data.Data.Data Network.AWS.StorageGateway.ListTapes.ListTapes
- Network.AWS.StorageGateway.ListTapes: instance Data.Data.Data Network.AWS.StorageGateway.ListTapes.ListTapesResponse
- Network.AWS.StorageGateway.ListTapes: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.ListTapes.ListTapes
- Network.AWS.StorageGateway.ListTapes: instance GHC.Classes.Eq Network.AWS.StorageGateway.ListTapes.ListTapes
- Network.AWS.StorageGateway.ListTapes: instance GHC.Classes.Eq Network.AWS.StorageGateway.ListTapes.ListTapesResponse
- Network.AWS.StorageGateway.ListTapes: instance GHC.Generics.Generic Network.AWS.StorageGateway.ListTapes.ListTapes
- Network.AWS.StorageGateway.ListTapes: instance GHC.Generics.Generic Network.AWS.StorageGateway.ListTapes.ListTapesResponse
- Network.AWS.StorageGateway.ListTapes: instance GHC.Read.Read Network.AWS.StorageGateway.ListTapes.ListTapes
- Network.AWS.StorageGateway.ListTapes: instance GHC.Read.Read Network.AWS.StorageGateway.ListTapes.ListTapesResponse
- Network.AWS.StorageGateway.ListTapes: instance GHC.Show.Show Network.AWS.StorageGateway.ListTapes.ListTapes
- Network.AWS.StorageGateway.ListTapes: instance GHC.Show.Show Network.AWS.StorageGateway.ListTapes.ListTapesResponse
- Network.AWS.StorageGateway.ListTapes: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.ListTapes.ListTapes
- Network.AWS.StorageGateway.ListTapes: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.ListTapes.ListTapes
- Network.AWS.StorageGateway.ListTapes: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.ListTapes.ListTapes
- Network.AWS.StorageGateway.ListTapes: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.ListTapes.ListTapes
- Network.AWS.StorageGateway.ListTapes: listTapes :: ListTapes
- Network.AWS.StorageGateway.ListTapes: listTapesResponse :: Int -> ListTapesResponse
- Network.AWS.StorageGateway.ListTapes: ltLimit :: Lens' ListTapes (Maybe Natural)
- Network.AWS.StorageGateway.ListTapes: ltMarker :: Lens' ListTapes (Maybe Text)
- Network.AWS.StorageGateway.ListTapes: ltTapeARNs :: Lens' ListTapes [Text]
- Network.AWS.StorageGateway.ListTapes: ltrsMarker :: Lens' ListTapesResponse (Maybe Text)
- Network.AWS.StorageGateway.ListTapes: ltrsResponseStatus :: Lens' ListTapesResponse Int
- Network.AWS.StorageGateway.ListTapes: ltrsTapeInfos :: Lens' ListTapesResponse [TapeInfo]
- Network.AWS.StorageGateway.ListVolumeInitiators: data ListVolumeInitiators
- Network.AWS.StorageGateway.ListVolumeInitiators: data ListVolumeInitiatorsResponse
- Network.AWS.StorageGateway.ListVolumeInitiators: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.ListVolumeInitiators.ListVolumeInitiators
- Network.AWS.StorageGateway.ListVolumeInitiators: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.ListVolumeInitiators.ListVolumeInitiatorsResponse
- Network.AWS.StorageGateway.ListVolumeInitiators: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.ListVolumeInitiators.ListVolumeInitiators
- Network.AWS.StorageGateway.ListVolumeInitiators: instance Data.Data.Data Network.AWS.StorageGateway.ListVolumeInitiators.ListVolumeInitiators
- Network.AWS.StorageGateway.ListVolumeInitiators: instance Data.Data.Data Network.AWS.StorageGateway.ListVolumeInitiators.ListVolumeInitiatorsResponse
- Network.AWS.StorageGateway.ListVolumeInitiators: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.ListVolumeInitiators.ListVolumeInitiators
- Network.AWS.StorageGateway.ListVolumeInitiators: instance GHC.Classes.Eq Network.AWS.StorageGateway.ListVolumeInitiators.ListVolumeInitiators
- Network.AWS.StorageGateway.ListVolumeInitiators: instance GHC.Classes.Eq Network.AWS.StorageGateway.ListVolumeInitiators.ListVolumeInitiatorsResponse
- Network.AWS.StorageGateway.ListVolumeInitiators: instance GHC.Generics.Generic Network.AWS.StorageGateway.ListVolumeInitiators.ListVolumeInitiators
- Network.AWS.StorageGateway.ListVolumeInitiators: instance GHC.Generics.Generic Network.AWS.StorageGateway.ListVolumeInitiators.ListVolumeInitiatorsResponse
- Network.AWS.StorageGateway.ListVolumeInitiators: instance GHC.Read.Read Network.AWS.StorageGateway.ListVolumeInitiators.ListVolumeInitiators
- Network.AWS.StorageGateway.ListVolumeInitiators: instance GHC.Read.Read Network.AWS.StorageGateway.ListVolumeInitiators.ListVolumeInitiatorsResponse
- Network.AWS.StorageGateway.ListVolumeInitiators: instance GHC.Show.Show Network.AWS.StorageGateway.ListVolumeInitiators.ListVolumeInitiators
- Network.AWS.StorageGateway.ListVolumeInitiators: instance GHC.Show.Show Network.AWS.StorageGateway.ListVolumeInitiators.ListVolumeInitiatorsResponse
- Network.AWS.StorageGateway.ListVolumeInitiators: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.ListVolumeInitiators.ListVolumeInitiators
- Network.AWS.StorageGateway.ListVolumeInitiators: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.ListVolumeInitiators.ListVolumeInitiators
- Network.AWS.StorageGateway.ListVolumeInitiators: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.ListVolumeInitiators.ListVolumeInitiators
- Network.AWS.StorageGateway.ListVolumeInitiators: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.ListVolumeInitiators.ListVolumeInitiators
- Network.AWS.StorageGateway.ListVolumeInitiators: listVolumeInitiators :: Text -> ListVolumeInitiators
- Network.AWS.StorageGateway.ListVolumeInitiators: listVolumeInitiatorsResponse :: Int -> ListVolumeInitiatorsResponse
- Network.AWS.StorageGateway.ListVolumeInitiators: lviVolumeARN :: Lens' ListVolumeInitiators Text
- Network.AWS.StorageGateway.ListVolumeInitiators: lvirsInitiators :: Lens' ListVolumeInitiatorsResponse [Text]
- Network.AWS.StorageGateway.ListVolumeInitiators: lvirsResponseStatus :: Lens' ListVolumeInitiatorsResponse Int
- Network.AWS.StorageGateway.ListVolumeRecoveryPoints: data ListVolumeRecoveryPoints
- Network.AWS.StorageGateway.ListVolumeRecoveryPoints: data ListVolumeRecoveryPointsResponse
- Network.AWS.StorageGateway.ListVolumeRecoveryPoints: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.ListVolumeRecoveryPoints.ListVolumeRecoveryPoints
- Network.AWS.StorageGateway.ListVolumeRecoveryPoints: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.ListVolumeRecoveryPoints.ListVolumeRecoveryPointsResponse
- Network.AWS.StorageGateway.ListVolumeRecoveryPoints: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.ListVolumeRecoveryPoints.ListVolumeRecoveryPoints
- Network.AWS.StorageGateway.ListVolumeRecoveryPoints: instance Data.Data.Data Network.AWS.StorageGateway.ListVolumeRecoveryPoints.ListVolumeRecoveryPoints
- Network.AWS.StorageGateway.ListVolumeRecoveryPoints: instance Data.Data.Data Network.AWS.StorageGateway.ListVolumeRecoveryPoints.ListVolumeRecoveryPointsResponse
- Network.AWS.StorageGateway.ListVolumeRecoveryPoints: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.ListVolumeRecoveryPoints.ListVolumeRecoveryPoints
- Network.AWS.StorageGateway.ListVolumeRecoveryPoints: instance GHC.Classes.Eq Network.AWS.StorageGateway.ListVolumeRecoveryPoints.ListVolumeRecoveryPoints
- Network.AWS.StorageGateway.ListVolumeRecoveryPoints: instance GHC.Classes.Eq Network.AWS.StorageGateway.ListVolumeRecoveryPoints.ListVolumeRecoveryPointsResponse
- Network.AWS.StorageGateway.ListVolumeRecoveryPoints: instance GHC.Generics.Generic Network.AWS.StorageGateway.ListVolumeRecoveryPoints.ListVolumeRecoveryPoints
- Network.AWS.StorageGateway.ListVolumeRecoveryPoints: instance GHC.Generics.Generic Network.AWS.StorageGateway.ListVolumeRecoveryPoints.ListVolumeRecoveryPointsResponse
- Network.AWS.StorageGateway.ListVolumeRecoveryPoints: instance GHC.Read.Read Network.AWS.StorageGateway.ListVolumeRecoveryPoints.ListVolumeRecoveryPoints
- Network.AWS.StorageGateway.ListVolumeRecoveryPoints: instance GHC.Read.Read Network.AWS.StorageGateway.ListVolumeRecoveryPoints.ListVolumeRecoveryPointsResponse
- Network.AWS.StorageGateway.ListVolumeRecoveryPoints: instance GHC.Show.Show Network.AWS.StorageGateway.ListVolumeRecoveryPoints.ListVolumeRecoveryPoints
- Network.AWS.StorageGateway.ListVolumeRecoveryPoints: instance GHC.Show.Show Network.AWS.StorageGateway.ListVolumeRecoveryPoints.ListVolumeRecoveryPointsResponse
- Network.AWS.StorageGateway.ListVolumeRecoveryPoints: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.ListVolumeRecoveryPoints.ListVolumeRecoveryPoints
- Network.AWS.StorageGateway.ListVolumeRecoveryPoints: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.ListVolumeRecoveryPoints.ListVolumeRecoveryPoints
- Network.AWS.StorageGateway.ListVolumeRecoveryPoints: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.ListVolumeRecoveryPoints.ListVolumeRecoveryPoints
- Network.AWS.StorageGateway.ListVolumeRecoveryPoints: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.ListVolumeRecoveryPoints.ListVolumeRecoveryPoints
- Network.AWS.StorageGateway.ListVolumeRecoveryPoints: listVolumeRecoveryPoints :: Text -> ListVolumeRecoveryPoints
- Network.AWS.StorageGateway.ListVolumeRecoveryPoints: listVolumeRecoveryPointsResponse :: Int -> ListVolumeRecoveryPointsResponse
- Network.AWS.StorageGateway.ListVolumeRecoveryPoints: lvrpGatewayARN :: Lens' ListVolumeRecoveryPoints Text
- Network.AWS.StorageGateway.ListVolumeRecoveryPoints: lvrprsGatewayARN :: Lens' ListVolumeRecoveryPointsResponse (Maybe Text)
- Network.AWS.StorageGateway.ListVolumeRecoveryPoints: lvrprsResponseStatus :: Lens' ListVolumeRecoveryPointsResponse Int
- Network.AWS.StorageGateway.ListVolumeRecoveryPoints: lvrprsVolumeRecoveryPointInfos :: Lens' ListVolumeRecoveryPointsResponse [VolumeRecoveryPointInfo]
- Network.AWS.StorageGateway.ListVolumes: data ListVolumes
- Network.AWS.StorageGateway.ListVolumes: data ListVolumesResponse
- Network.AWS.StorageGateway.ListVolumes: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.ListVolumes.ListVolumes
- Network.AWS.StorageGateway.ListVolumes: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.ListVolumes.ListVolumesResponse
- Network.AWS.StorageGateway.ListVolumes: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.ListVolumes.ListVolumes
- Network.AWS.StorageGateway.ListVolumes: instance Data.Data.Data Network.AWS.StorageGateway.ListVolumes.ListVolumes
- Network.AWS.StorageGateway.ListVolumes: instance Data.Data.Data Network.AWS.StorageGateway.ListVolumes.ListVolumesResponse
- Network.AWS.StorageGateway.ListVolumes: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.ListVolumes.ListVolumes
- Network.AWS.StorageGateway.ListVolumes: instance GHC.Classes.Eq Network.AWS.StorageGateway.ListVolumes.ListVolumes
- Network.AWS.StorageGateway.ListVolumes: instance GHC.Classes.Eq Network.AWS.StorageGateway.ListVolumes.ListVolumesResponse
- Network.AWS.StorageGateway.ListVolumes: instance GHC.Generics.Generic Network.AWS.StorageGateway.ListVolumes.ListVolumes
- Network.AWS.StorageGateway.ListVolumes: instance GHC.Generics.Generic Network.AWS.StorageGateway.ListVolumes.ListVolumesResponse
- Network.AWS.StorageGateway.ListVolumes: instance GHC.Read.Read Network.AWS.StorageGateway.ListVolumes.ListVolumes
- Network.AWS.StorageGateway.ListVolumes: instance GHC.Read.Read Network.AWS.StorageGateway.ListVolumes.ListVolumesResponse
- Network.AWS.StorageGateway.ListVolumes: instance GHC.Show.Show Network.AWS.StorageGateway.ListVolumes.ListVolumes
- Network.AWS.StorageGateway.ListVolumes: instance GHC.Show.Show Network.AWS.StorageGateway.ListVolumes.ListVolumesResponse
- Network.AWS.StorageGateway.ListVolumes: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.ListVolumes.ListVolumes
- Network.AWS.StorageGateway.ListVolumes: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.ListVolumes.ListVolumes
- Network.AWS.StorageGateway.ListVolumes: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.ListVolumes.ListVolumes
- Network.AWS.StorageGateway.ListVolumes: instance Network.AWS.Pager.AWSPager Network.AWS.StorageGateway.ListVolumes.ListVolumes
- Network.AWS.StorageGateway.ListVolumes: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.ListVolumes.ListVolumes
- Network.AWS.StorageGateway.ListVolumes: listVolumes :: ListVolumes
- Network.AWS.StorageGateway.ListVolumes: listVolumesResponse :: Int -> ListVolumesResponse
- Network.AWS.StorageGateway.ListVolumes: lvGatewayARN :: Lens' ListVolumes (Maybe Text)
- Network.AWS.StorageGateway.ListVolumes: lvLimit :: Lens' ListVolumes (Maybe Natural)
- Network.AWS.StorageGateway.ListVolumes: lvMarker :: Lens' ListVolumes (Maybe Text)
- Network.AWS.StorageGateway.ListVolumes: lvrsGatewayARN :: Lens' ListVolumesResponse (Maybe Text)
- Network.AWS.StorageGateway.ListVolumes: lvrsMarker :: Lens' ListVolumesResponse (Maybe Text)
- Network.AWS.StorageGateway.ListVolumes: lvrsResponseStatus :: Lens' ListVolumesResponse Int
- Network.AWS.StorageGateway.ListVolumes: lvrsVolumeInfos :: Lens' ListVolumesResponse [VolumeInfo]
- Network.AWS.StorageGateway.NotifyWhenUploaded: data NotifyWhenUploaded
- Network.AWS.StorageGateway.NotifyWhenUploaded: data NotifyWhenUploadedResponse
- Network.AWS.StorageGateway.NotifyWhenUploaded: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.NotifyWhenUploaded.NotifyWhenUploaded
- Network.AWS.StorageGateway.NotifyWhenUploaded: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.NotifyWhenUploaded.NotifyWhenUploadedResponse
- Network.AWS.StorageGateway.NotifyWhenUploaded: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.NotifyWhenUploaded.NotifyWhenUploaded
- Network.AWS.StorageGateway.NotifyWhenUploaded: instance Data.Data.Data Network.AWS.StorageGateway.NotifyWhenUploaded.NotifyWhenUploaded
- Network.AWS.StorageGateway.NotifyWhenUploaded: instance Data.Data.Data Network.AWS.StorageGateway.NotifyWhenUploaded.NotifyWhenUploadedResponse
- Network.AWS.StorageGateway.NotifyWhenUploaded: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.NotifyWhenUploaded.NotifyWhenUploaded
- Network.AWS.StorageGateway.NotifyWhenUploaded: instance GHC.Classes.Eq Network.AWS.StorageGateway.NotifyWhenUploaded.NotifyWhenUploaded
- Network.AWS.StorageGateway.NotifyWhenUploaded: instance GHC.Classes.Eq Network.AWS.StorageGateway.NotifyWhenUploaded.NotifyWhenUploadedResponse
- Network.AWS.StorageGateway.NotifyWhenUploaded: instance GHC.Generics.Generic Network.AWS.StorageGateway.NotifyWhenUploaded.NotifyWhenUploaded
- Network.AWS.StorageGateway.NotifyWhenUploaded: instance GHC.Generics.Generic Network.AWS.StorageGateway.NotifyWhenUploaded.NotifyWhenUploadedResponse
- Network.AWS.StorageGateway.NotifyWhenUploaded: instance GHC.Read.Read Network.AWS.StorageGateway.NotifyWhenUploaded.NotifyWhenUploaded
- Network.AWS.StorageGateway.NotifyWhenUploaded: instance GHC.Read.Read Network.AWS.StorageGateway.NotifyWhenUploaded.NotifyWhenUploadedResponse
- Network.AWS.StorageGateway.NotifyWhenUploaded: instance GHC.Show.Show Network.AWS.StorageGateway.NotifyWhenUploaded.NotifyWhenUploaded
- Network.AWS.StorageGateway.NotifyWhenUploaded: instance GHC.Show.Show Network.AWS.StorageGateway.NotifyWhenUploaded.NotifyWhenUploadedResponse
- Network.AWS.StorageGateway.NotifyWhenUploaded: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.NotifyWhenUploaded.NotifyWhenUploaded
- Network.AWS.StorageGateway.NotifyWhenUploaded: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.NotifyWhenUploaded.NotifyWhenUploaded
- Network.AWS.StorageGateway.NotifyWhenUploaded: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.NotifyWhenUploaded.NotifyWhenUploaded
- Network.AWS.StorageGateway.NotifyWhenUploaded: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.NotifyWhenUploaded.NotifyWhenUploaded
- Network.AWS.StorageGateway.NotifyWhenUploaded: notifyWhenUploaded :: Text -> NotifyWhenUploaded
- Network.AWS.StorageGateway.NotifyWhenUploaded: notifyWhenUploadedResponse :: Int -> NotifyWhenUploadedResponse
- Network.AWS.StorageGateway.NotifyWhenUploaded: nwuFileShareARN :: Lens' NotifyWhenUploaded Text
- Network.AWS.StorageGateway.NotifyWhenUploaded: nwursFileShareARN :: Lens' NotifyWhenUploadedResponse (Maybe Text)
- Network.AWS.StorageGateway.NotifyWhenUploaded: nwursNotificationId :: Lens' NotifyWhenUploadedResponse (Maybe Text)
- Network.AWS.StorageGateway.NotifyWhenUploaded: nwursResponseStatus :: Lens' NotifyWhenUploadedResponse Int
- Network.AWS.StorageGateway.RefreshCache: data RefreshCache
- Network.AWS.StorageGateway.RefreshCache: data RefreshCacheResponse
- Network.AWS.StorageGateway.RefreshCache: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.RefreshCache.RefreshCache
- Network.AWS.StorageGateway.RefreshCache: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.RefreshCache.RefreshCacheResponse
- Network.AWS.StorageGateway.RefreshCache: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.RefreshCache.RefreshCache
- Network.AWS.StorageGateway.RefreshCache: instance Data.Data.Data Network.AWS.StorageGateway.RefreshCache.RefreshCache
- Network.AWS.StorageGateway.RefreshCache: instance Data.Data.Data Network.AWS.StorageGateway.RefreshCache.RefreshCacheResponse
- Network.AWS.StorageGateway.RefreshCache: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.RefreshCache.RefreshCache
- Network.AWS.StorageGateway.RefreshCache: instance GHC.Classes.Eq Network.AWS.StorageGateway.RefreshCache.RefreshCache
- Network.AWS.StorageGateway.RefreshCache: instance GHC.Classes.Eq Network.AWS.StorageGateway.RefreshCache.RefreshCacheResponse
- Network.AWS.StorageGateway.RefreshCache: instance GHC.Generics.Generic Network.AWS.StorageGateway.RefreshCache.RefreshCache
- Network.AWS.StorageGateway.RefreshCache: instance GHC.Generics.Generic Network.AWS.StorageGateway.RefreshCache.RefreshCacheResponse
- Network.AWS.StorageGateway.RefreshCache: instance GHC.Read.Read Network.AWS.StorageGateway.RefreshCache.RefreshCache
- Network.AWS.StorageGateway.RefreshCache: instance GHC.Read.Read Network.AWS.StorageGateway.RefreshCache.RefreshCacheResponse
- Network.AWS.StorageGateway.RefreshCache: instance GHC.Show.Show Network.AWS.StorageGateway.RefreshCache.RefreshCache
- Network.AWS.StorageGateway.RefreshCache: instance GHC.Show.Show Network.AWS.StorageGateway.RefreshCache.RefreshCacheResponse
- Network.AWS.StorageGateway.RefreshCache: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.RefreshCache.RefreshCache
- Network.AWS.StorageGateway.RefreshCache: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.RefreshCache.RefreshCache
- Network.AWS.StorageGateway.RefreshCache: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.RefreshCache.RefreshCache
- Network.AWS.StorageGateway.RefreshCache: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.RefreshCache.RefreshCache
- Network.AWS.StorageGateway.RefreshCache: rcFileShareARN :: Lens' RefreshCache Text
- Network.AWS.StorageGateway.RefreshCache: rcrsFileShareARN :: Lens' RefreshCacheResponse (Maybe Text)
- Network.AWS.StorageGateway.RefreshCache: rcrsResponseStatus :: Lens' RefreshCacheResponse Int
- Network.AWS.StorageGateway.RefreshCache: refreshCache :: Text -> RefreshCache
- Network.AWS.StorageGateway.RefreshCache: refreshCacheResponse :: Int -> RefreshCacheResponse
- Network.AWS.StorageGateway.RemoveTagsFromResource: data RemoveTagsFromResource
- Network.AWS.StorageGateway.RemoveTagsFromResource: data RemoveTagsFromResourceResponse
- Network.AWS.StorageGateway.RemoveTagsFromResource: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.RemoveTagsFromResource.RemoveTagsFromResource
- Network.AWS.StorageGateway.RemoveTagsFromResource: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.RemoveTagsFromResource.RemoveTagsFromResourceResponse
- Network.AWS.StorageGateway.RemoveTagsFromResource: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.RemoveTagsFromResource.RemoveTagsFromResource
- Network.AWS.StorageGateway.RemoveTagsFromResource: instance Data.Data.Data Network.AWS.StorageGateway.RemoveTagsFromResource.RemoveTagsFromResource
- Network.AWS.StorageGateway.RemoveTagsFromResource: instance Data.Data.Data Network.AWS.StorageGateway.RemoveTagsFromResource.RemoveTagsFromResourceResponse
- Network.AWS.StorageGateway.RemoveTagsFromResource: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.RemoveTagsFromResource.RemoveTagsFromResource
- Network.AWS.StorageGateway.RemoveTagsFromResource: instance GHC.Classes.Eq Network.AWS.StorageGateway.RemoveTagsFromResource.RemoveTagsFromResource
- Network.AWS.StorageGateway.RemoveTagsFromResource: instance GHC.Classes.Eq Network.AWS.StorageGateway.RemoveTagsFromResource.RemoveTagsFromResourceResponse
- Network.AWS.StorageGateway.RemoveTagsFromResource: instance GHC.Generics.Generic Network.AWS.StorageGateway.RemoveTagsFromResource.RemoveTagsFromResource
- Network.AWS.StorageGateway.RemoveTagsFromResource: instance GHC.Generics.Generic Network.AWS.StorageGateway.RemoveTagsFromResource.RemoveTagsFromResourceResponse
- Network.AWS.StorageGateway.RemoveTagsFromResource: instance GHC.Read.Read Network.AWS.StorageGateway.RemoveTagsFromResource.RemoveTagsFromResource
- Network.AWS.StorageGateway.RemoveTagsFromResource: instance GHC.Read.Read Network.AWS.StorageGateway.RemoveTagsFromResource.RemoveTagsFromResourceResponse
- Network.AWS.StorageGateway.RemoveTagsFromResource: instance GHC.Show.Show Network.AWS.StorageGateway.RemoveTagsFromResource.RemoveTagsFromResource
- Network.AWS.StorageGateway.RemoveTagsFromResource: instance GHC.Show.Show Network.AWS.StorageGateway.RemoveTagsFromResource.RemoveTagsFromResourceResponse
- Network.AWS.StorageGateway.RemoveTagsFromResource: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.RemoveTagsFromResource.RemoveTagsFromResource
- Network.AWS.StorageGateway.RemoveTagsFromResource: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.RemoveTagsFromResource.RemoveTagsFromResource
- Network.AWS.StorageGateway.RemoveTagsFromResource: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.RemoveTagsFromResource.RemoveTagsFromResource
- Network.AWS.StorageGateway.RemoveTagsFromResource: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.RemoveTagsFromResource.RemoveTagsFromResource
- Network.AWS.StorageGateway.RemoveTagsFromResource: removeTagsFromResource :: Text -> RemoveTagsFromResource
- Network.AWS.StorageGateway.RemoveTagsFromResource: removeTagsFromResourceResponse :: Int -> RemoveTagsFromResourceResponse
- Network.AWS.StorageGateway.RemoveTagsFromResource: rtfrResourceARN :: Lens' RemoveTagsFromResource Text
- Network.AWS.StorageGateway.RemoveTagsFromResource: rtfrTagKeys :: Lens' RemoveTagsFromResource [Text]
- Network.AWS.StorageGateway.RemoveTagsFromResource: rtfrrsResourceARN :: Lens' RemoveTagsFromResourceResponse (Maybe Text)
- Network.AWS.StorageGateway.RemoveTagsFromResource: rtfrrsResponseStatus :: Lens' RemoveTagsFromResourceResponse Int
- Network.AWS.StorageGateway.ResetCache: data ResetCache
- Network.AWS.StorageGateway.ResetCache: data ResetCacheResponse
- Network.AWS.StorageGateway.ResetCache: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.ResetCache.ResetCache
- Network.AWS.StorageGateway.ResetCache: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.ResetCache.ResetCacheResponse
- Network.AWS.StorageGateway.ResetCache: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.ResetCache.ResetCache
- Network.AWS.StorageGateway.ResetCache: instance Data.Data.Data Network.AWS.StorageGateway.ResetCache.ResetCache
- Network.AWS.StorageGateway.ResetCache: instance Data.Data.Data Network.AWS.StorageGateway.ResetCache.ResetCacheResponse
- Network.AWS.StorageGateway.ResetCache: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.ResetCache.ResetCache
- Network.AWS.StorageGateway.ResetCache: instance GHC.Classes.Eq Network.AWS.StorageGateway.ResetCache.ResetCache
- Network.AWS.StorageGateway.ResetCache: instance GHC.Classes.Eq Network.AWS.StorageGateway.ResetCache.ResetCacheResponse
- Network.AWS.StorageGateway.ResetCache: instance GHC.Generics.Generic Network.AWS.StorageGateway.ResetCache.ResetCache
- Network.AWS.StorageGateway.ResetCache: instance GHC.Generics.Generic Network.AWS.StorageGateway.ResetCache.ResetCacheResponse
- Network.AWS.StorageGateway.ResetCache: instance GHC.Read.Read Network.AWS.StorageGateway.ResetCache.ResetCache
- Network.AWS.StorageGateway.ResetCache: instance GHC.Read.Read Network.AWS.StorageGateway.ResetCache.ResetCacheResponse
- Network.AWS.StorageGateway.ResetCache: instance GHC.Show.Show Network.AWS.StorageGateway.ResetCache.ResetCache
- Network.AWS.StorageGateway.ResetCache: instance GHC.Show.Show Network.AWS.StorageGateway.ResetCache.ResetCacheResponse
- Network.AWS.StorageGateway.ResetCache: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.ResetCache.ResetCache
- Network.AWS.StorageGateway.ResetCache: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.ResetCache.ResetCache
- Network.AWS.StorageGateway.ResetCache: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.ResetCache.ResetCache
- Network.AWS.StorageGateway.ResetCache: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.ResetCache.ResetCache
- Network.AWS.StorageGateway.ResetCache: rcGatewayARN :: Lens' ResetCache Text
- Network.AWS.StorageGateway.ResetCache: resetCache :: Text -> ResetCache
- Network.AWS.StorageGateway.ResetCache: resetCacheResponse :: Int -> ResetCacheResponse
- Network.AWS.StorageGateway.ResetCache: rrsGatewayARN :: Lens' ResetCacheResponse (Maybe Text)
- Network.AWS.StorageGateway.ResetCache: rrsResponseStatus :: Lens' ResetCacheResponse Int
- Network.AWS.StorageGateway.RetrieveTapeArchive: data RetrieveTapeArchive
- Network.AWS.StorageGateway.RetrieveTapeArchive: data RetrieveTapeArchiveResponse
- Network.AWS.StorageGateway.RetrieveTapeArchive: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.RetrieveTapeArchive.RetrieveTapeArchive
- Network.AWS.StorageGateway.RetrieveTapeArchive: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.RetrieveTapeArchive.RetrieveTapeArchiveResponse
- Network.AWS.StorageGateway.RetrieveTapeArchive: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.RetrieveTapeArchive.RetrieveTapeArchive
- Network.AWS.StorageGateway.RetrieveTapeArchive: instance Data.Data.Data Network.AWS.StorageGateway.RetrieveTapeArchive.RetrieveTapeArchive
- Network.AWS.StorageGateway.RetrieveTapeArchive: instance Data.Data.Data Network.AWS.StorageGateway.RetrieveTapeArchive.RetrieveTapeArchiveResponse
- Network.AWS.StorageGateway.RetrieveTapeArchive: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.RetrieveTapeArchive.RetrieveTapeArchive
- Network.AWS.StorageGateway.RetrieveTapeArchive: instance GHC.Classes.Eq Network.AWS.StorageGateway.RetrieveTapeArchive.RetrieveTapeArchive
- Network.AWS.StorageGateway.RetrieveTapeArchive: instance GHC.Classes.Eq Network.AWS.StorageGateway.RetrieveTapeArchive.RetrieveTapeArchiveResponse
- Network.AWS.StorageGateway.RetrieveTapeArchive: instance GHC.Generics.Generic Network.AWS.StorageGateway.RetrieveTapeArchive.RetrieveTapeArchive
- Network.AWS.StorageGateway.RetrieveTapeArchive: instance GHC.Generics.Generic Network.AWS.StorageGateway.RetrieveTapeArchive.RetrieveTapeArchiveResponse
- Network.AWS.StorageGateway.RetrieveTapeArchive: instance GHC.Read.Read Network.AWS.StorageGateway.RetrieveTapeArchive.RetrieveTapeArchive
- Network.AWS.StorageGateway.RetrieveTapeArchive: instance GHC.Read.Read Network.AWS.StorageGateway.RetrieveTapeArchive.RetrieveTapeArchiveResponse
- Network.AWS.StorageGateway.RetrieveTapeArchive: instance GHC.Show.Show Network.AWS.StorageGateway.RetrieveTapeArchive.RetrieveTapeArchive
- Network.AWS.StorageGateway.RetrieveTapeArchive: instance GHC.Show.Show Network.AWS.StorageGateway.RetrieveTapeArchive.RetrieveTapeArchiveResponse
- Network.AWS.StorageGateway.RetrieveTapeArchive: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.RetrieveTapeArchive.RetrieveTapeArchive
- Network.AWS.StorageGateway.RetrieveTapeArchive: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.RetrieveTapeArchive.RetrieveTapeArchive
- Network.AWS.StorageGateway.RetrieveTapeArchive: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.RetrieveTapeArchive.RetrieveTapeArchive
- Network.AWS.StorageGateway.RetrieveTapeArchive: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.RetrieveTapeArchive.RetrieveTapeArchive
- Network.AWS.StorageGateway.RetrieveTapeArchive: retrieveTapeArchive :: Text -> Text -> RetrieveTapeArchive
- Network.AWS.StorageGateway.RetrieveTapeArchive: retrieveTapeArchiveResponse :: Int -> RetrieveTapeArchiveResponse
- Network.AWS.StorageGateway.RetrieveTapeArchive: rtaGatewayARN :: Lens' RetrieveTapeArchive Text
- Network.AWS.StorageGateway.RetrieveTapeArchive: rtaTapeARN :: Lens' RetrieveTapeArchive Text
- Network.AWS.StorageGateway.RetrieveTapeArchive: rtarsResponseStatus :: Lens' RetrieveTapeArchiveResponse Int
- Network.AWS.StorageGateway.RetrieveTapeArchive: rtarsTapeARN :: Lens' RetrieveTapeArchiveResponse (Maybe Text)
- Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint: data RetrieveTapeRecoveryPoint
- Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint: data RetrieveTapeRecoveryPointResponse
- Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint.RetrieveTapeRecoveryPoint
- Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint.RetrieveTapeRecoveryPointResponse
- Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint.RetrieveTapeRecoveryPoint
- Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint: instance Data.Data.Data Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint.RetrieveTapeRecoveryPoint
- Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint: instance Data.Data.Data Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint.RetrieveTapeRecoveryPointResponse
- Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint.RetrieveTapeRecoveryPoint
- Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint: instance GHC.Classes.Eq Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint.RetrieveTapeRecoveryPoint
- Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint: instance GHC.Classes.Eq Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint.RetrieveTapeRecoveryPointResponse
- Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint: instance GHC.Generics.Generic Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint.RetrieveTapeRecoveryPoint
- Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint: instance GHC.Generics.Generic Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint.RetrieveTapeRecoveryPointResponse
- Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint: instance GHC.Read.Read Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint.RetrieveTapeRecoveryPoint
- Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint: instance GHC.Read.Read Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint.RetrieveTapeRecoveryPointResponse
- Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint: instance GHC.Show.Show Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint.RetrieveTapeRecoveryPoint
- Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint: instance GHC.Show.Show Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint.RetrieveTapeRecoveryPointResponse
- Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint.RetrieveTapeRecoveryPoint
- Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint.RetrieveTapeRecoveryPoint
- Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint.RetrieveTapeRecoveryPoint
- Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint.RetrieveTapeRecoveryPoint
- Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint: retrieveTapeRecoveryPoint :: Text -> Text -> RetrieveTapeRecoveryPoint
- Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint: retrieveTapeRecoveryPointResponse :: Int -> RetrieveTapeRecoveryPointResponse
- Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint: rtrpGatewayARN :: Lens' RetrieveTapeRecoveryPoint Text
- Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint: rtrpTapeARN :: Lens' RetrieveTapeRecoveryPoint Text
- Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint: rtrprsResponseStatus :: Lens' RetrieveTapeRecoveryPointResponse Int
- Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint: rtrprsTapeARN :: Lens' RetrieveTapeRecoveryPointResponse (Maybe Text)
- Network.AWS.StorageGateway.SetLocalConsolePassword: data SetLocalConsolePassword
- Network.AWS.StorageGateway.SetLocalConsolePassword: data SetLocalConsolePasswordResponse
- Network.AWS.StorageGateway.SetLocalConsolePassword: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.SetLocalConsolePassword.SetLocalConsolePassword
- Network.AWS.StorageGateway.SetLocalConsolePassword: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.SetLocalConsolePassword.SetLocalConsolePasswordResponse
- Network.AWS.StorageGateway.SetLocalConsolePassword: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.SetLocalConsolePassword.SetLocalConsolePassword
- Network.AWS.StorageGateway.SetLocalConsolePassword: instance Data.Data.Data Network.AWS.StorageGateway.SetLocalConsolePassword.SetLocalConsolePassword
- Network.AWS.StorageGateway.SetLocalConsolePassword: instance Data.Data.Data Network.AWS.StorageGateway.SetLocalConsolePassword.SetLocalConsolePasswordResponse
- Network.AWS.StorageGateway.SetLocalConsolePassword: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.SetLocalConsolePassword.SetLocalConsolePassword
- Network.AWS.StorageGateway.SetLocalConsolePassword: instance GHC.Classes.Eq Network.AWS.StorageGateway.SetLocalConsolePassword.SetLocalConsolePassword
- Network.AWS.StorageGateway.SetLocalConsolePassword: instance GHC.Classes.Eq Network.AWS.StorageGateway.SetLocalConsolePassword.SetLocalConsolePasswordResponse
- Network.AWS.StorageGateway.SetLocalConsolePassword: instance GHC.Generics.Generic Network.AWS.StorageGateway.SetLocalConsolePassword.SetLocalConsolePassword
- Network.AWS.StorageGateway.SetLocalConsolePassword: instance GHC.Generics.Generic Network.AWS.StorageGateway.SetLocalConsolePassword.SetLocalConsolePasswordResponse
- Network.AWS.StorageGateway.SetLocalConsolePassword: instance GHC.Read.Read Network.AWS.StorageGateway.SetLocalConsolePassword.SetLocalConsolePasswordResponse
- Network.AWS.StorageGateway.SetLocalConsolePassword: instance GHC.Show.Show Network.AWS.StorageGateway.SetLocalConsolePassword.SetLocalConsolePassword
- Network.AWS.StorageGateway.SetLocalConsolePassword: instance GHC.Show.Show Network.AWS.StorageGateway.SetLocalConsolePassword.SetLocalConsolePasswordResponse
- Network.AWS.StorageGateway.SetLocalConsolePassword: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.SetLocalConsolePassword.SetLocalConsolePassword
- Network.AWS.StorageGateway.SetLocalConsolePassword: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.SetLocalConsolePassword.SetLocalConsolePassword
- Network.AWS.StorageGateway.SetLocalConsolePassword: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.SetLocalConsolePassword.SetLocalConsolePassword
- Network.AWS.StorageGateway.SetLocalConsolePassword: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.SetLocalConsolePassword.SetLocalConsolePassword
- Network.AWS.StorageGateway.SetLocalConsolePassword: setLocalConsolePassword :: Text -> Text -> SetLocalConsolePassword
- Network.AWS.StorageGateway.SetLocalConsolePassword: setLocalConsolePasswordResponse :: Int -> SetLocalConsolePasswordResponse
- Network.AWS.StorageGateway.SetLocalConsolePassword: slcpGatewayARN :: Lens' SetLocalConsolePassword Text
- Network.AWS.StorageGateway.SetLocalConsolePassword: slcpLocalConsolePassword :: Lens' SetLocalConsolePassword Text
- Network.AWS.StorageGateway.SetLocalConsolePassword: slcprsGatewayARN :: Lens' SetLocalConsolePasswordResponse (Maybe Text)
- Network.AWS.StorageGateway.SetLocalConsolePassword: slcprsResponseStatus :: Lens' SetLocalConsolePasswordResponse Int
- Network.AWS.StorageGateway.ShutdownGateway: data ShutdownGateway
- Network.AWS.StorageGateway.ShutdownGateway: data ShutdownGatewayResponse
- Network.AWS.StorageGateway.ShutdownGateway: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.ShutdownGateway.ShutdownGateway
- Network.AWS.StorageGateway.ShutdownGateway: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.ShutdownGateway.ShutdownGatewayResponse
- Network.AWS.StorageGateway.ShutdownGateway: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.ShutdownGateway.ShutdownGateway
- Network.AWS.StorageGateway.ShutdownGateway: instance Data.Data.Data Network.AWS.StorageGateway.ShutdownGateway.ShutdownGateway
- Network.AWS.StorageGateway.ShutdownGateway: instance Data.Data.Data Network.AWS.StorageGateway.ShutdownGateway.ShutdownGatewayResponse
- Network.AWS.StorageGateway.ShutdownGateway: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.ShutdownGateway.ShutdownGateway
- Network.AWS.StorageGateway.ShutdownGateway: instance GHC.Classes.Eq Network.AWS.StorageGateway.ShutdownGateway.ShutdownGateway
- Network.AWS.StorageGateway.ShutdownGateway: instance GHC.Classes.Eq Network.AWS.StorageGateway.ShutdownGateway.ShutdownGatewayResponse
- Network.AWS.StorageGateway.ShutdownGateway: instance GHC.Generics.Generic Network.AWS.StorageGateway.ShutdownGateway.ShutdownGateway
- Network.AWS.StorageGateway.ShutdownGateway: instance GHC.Generics.Generic Network.AWS.StorageGateway.ShutdownGateway.ShutdownGatewayResponse
- Network.AWS.StorageGateway.ShutdownGateway: instance GHC.Read.Read Network.AWS.StorageGateway.ShutdownGateway.ShutdownGateway
- Network.AWS.StorageGateway.ShutdownGateway: instance GHC.Read.Read Network.AWS.StorageGateway.ShutdownGateway.ShutdownGatewayResponse
- Network.AWS.StorageGateway.ShutdownGateway: instance GHC.Show.Show Network.AWS.StorageGateway.ShutdownGateway.ShutdownGateway
- Network.AWS.StorageGateway.ShutdownGateway: instance GHC.Show.Show Network.AWS.StorageGateway.ShutdownGateway.ShutdownGatewayResponse
- Network.AWS.StorageGateway.ShutdownGateway: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.ShutdownGateway.ShutdownGateway
- Network.AWS.StorageGateway.ShutdownGateway: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.ShutdownGateway.ShutdownGateway
- Network.AWS.StorageGateway.ShutdownGateway: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.ShutdownGateway.ShutdownGateway
- Network.AWS.StorageGateway.ShutdownGateway: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.ShutdownGateway.ShutdownGateway
- Network.AWS.StorageGateway.ShutdownGateway: sGatewayARN :: Lens' ShutdownGateway Text
- Network.AWS.StorageGateway.ShutdownGateway: shutdownGateway :: Text -> ShutdownGateway
- Network.AWS.StorageGateway.ShutdownGateway: shutdownGatewayResponse :: Int -> ShutdownGatewayResponse
- Network.AWS.StorageGateway.ShutdownGateway: srsGatewayARN :: Lens' ShutdownGatewayResponse (Maybe Text)
- Network.AWS.StorageGateway.ShutdownGateway: srsResponseStatus :: Lens' ShutdownGatewayResponse Int
- Network.AWS.StorageGateway.StartGateway: data StartGateway
- Network.AWS.StorageGateway.StartGateway: data StartGatewayResponse
- Network.AWS.StorageGateway.StartGateway: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.StartGateway.StartGateway
- Network.AWS.StorageGateway.StartGateway: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.StartGateway.StartGatewayResponse
- Network.AWS.StorageGateway.StartGateway: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.StartGateway.StartGateway
- Network.AWS.StorageGateway.StartGateway: instance Data.Data.Data Network.AWS.StorageGateway.StartGateway.StartGateway
- Network.AWS.StorageGateway.StartGateway: instance Data.Data.Data Network.AWS.StorageGateway.StartGateway.StartGatewayResponse
- Network.AWS.StorageGateway.StartGateway: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.StartGateway.StartGateway
- Network.AWS.StorageGateway.StartGateway: instance GHC.Classes.Eq Network.AWS.StorageGateway.StartGateway.StartGateway
- Network.AWS.StorageGateway.StartGateway: instance GHC.Classes.Eq Network.AWS.StorageGateway.StartGateway.StartGatewayResponse
- Network.AWS.StorageGateway.StartGateway: instance GHC.Generics.Generic Network.AWS.StorageGateway.StartGateway.StartGateway
- Network.AWS.StorageGateway.StartGateway: instance GHC.Generics.Generic Network.AWS.StorageGateway.StartGateway.StartGatewayResponse
- Network.AWS.StorageGateway.StartGateway: instance GHC.Read.Read Network.AWS.StorageGateway.StartGateway.StartGateway
- Network.AWS.StorageGateway.StartGateway: instance GHC.Read.Read Network.AWS.StorageGateway.StartGateway.StartGatewayResponse
- Network.AWS.StorageGateway.StartGateway: instance GHC.Show.Show Network.AWS.StorageGateway.StartGateway.StartGateway
- Network.AWS.StorageGateway.StartGateway: instance GHC.Show.Show Network.AWS.StorageGateway.StartGateway.StartGatewayResponse
- Network.AWS.StorageGateway.StartGateway: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.StartGateway.StartGateway
- Network.AWS.StorageGateway.StartGateway: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.StartGateway.StartGateway
- Network.AWS.StorageGateway.StartGateway: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.StartGateway.StartGateway
- Network.AWS.StorageGateway.StartGateway: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.StartGateway.StartGateway
- Network.AWS.StorageGateway.StartGateway: sgGatewayARN :: Lens' StartGateway Text
- Network.AWS.StorageGateway.StartGateway: sgrsGatewayARN :: Lens' StartGatewayResponse (Maybe Text)
- Network.AWS.StorageGateway.StartGateway: sgrsResponseStatus :: Lens' StartGatewayResponse Int
- Network.AWS.StorageGateway.StartGateway: startGateway :: Text -> StartGateway
- Network.AWS.StorageGateway.StartGateway: startGatewayResponse :: Int -> StartGatewayResponse
- Network.AWS.StorageGateway.Types: AWSExecRead :: ObjectACL
- Network.AWS.StorageGateway.Types: AuthenticatedRead :: ObjectACL
- Network.AWS.StorageGateway.Types: BucketOwnerFullControl :: ObjectACL
- Network.AWS.StorageGateway.Types: BucketOwnerRead :: ObjectACL
- Network.AWS.StorageGateway.Types: Private :: ObjectACL
- Network.AWS.StorageGateway.Types: PublicRead :: ObjectACL
- Network.AWS.StorageGateway.Types: PublicReadWrite :: ObjectACL
- Network.AWS.StorageGateway.Types: _InternalServerError :: AsError a => Getting (First ServiceError) a ServiceError
- Network.AWS.StorageGateway.Types: _InvalidGatewayRequestException :: AsError a => Getting (First ServiceError) a ServiceError
- Network.AWS.StorageGateway.Types: _ServiceUnavailableError :: AsError a => Getting (First ServiceError) a ServiceError
- Network.AWS.StorageGateway.Types: cachediSCSIVolume :: CachediSCSIVolume
- Network.AWS.StorageGateway.Types: chapInfo :: ChapInfo
- Network.AWS.StorageGateway.Types: ciInitiatorName :: Lens' ChapInfo (Maybe Text)
- Network.AWS.StorageGateway.Types: ciSecretToAuthenticateInitiator :: Lens' ChapInfo (Maybe Text)
- Network.AWS.StorageGateway.Types: ciSecretToAuthenticateTarget :: Lens' ChapInfo (Maybe Text)
- Network.AWS.StorageGateway.Types: ciTargetARN :: Lens' ChapInfo (Maybe Text)
- Network.AWS.StorageGateway.Types: cscsivCreatedDate :: Lens' CachediSCSIVolume (Maybe UTCTime)
- Network.AWS.StorageGateway.Types: cscsivSourceSnapshotId :: Lens' CachediSCSIVolume (Maybe Text)
- Network.AWS.StorageGateway.Types: cscsivVolumeARN :: Lens' CachediSCSIVolume (Maybe Text)
- Network.AWS.StorageGateway.Types: cscsivVolumeId :: Lens' CachediSCSIVolume (Maybe Text)
- Network.AWS.StorageGateway.Types: cscsivVolumeProgress :: Lens' CachediSCSIVolume (Maybe Double)
- Network.AWS.StorageGateway.Types: cscsivVolumeSizeInBytes :: Lens' CachediSCSIVolume (Maybe Integer)
- Network.AWS.StorageGateway.Types: cscsivVolumeStatus :: Lens' CachediSCSIVolume (Maybe Text)
- Network.AWS.StorageGateway.Types: cscsivVolumeType :: Lens' CachediSCSIVolume (Maybe Text)
- Network.AWS.StorageGateway.Types: cscsivVolumeUsedInBytes :: Lens' CachediSCSIVolume (Maybe Integer)
- Network.AWS.StorageGateway.Types: cscsivVolumeiSCSIAttributes :: Lens' CachediSCSIVolume (Maybe VolumeiSCSIAttributes)
- Network.AWS.StorageGateway.Types: dDiskAllocationResource :: Lens' Disk (Maybe Text)
- Network.AWS.StorageGateway.Types: dDiskAllocationType :: Lens' Disk (Maybe Text)
- Network.AWS.StorageGateway.Types: dDiskId :: Lens' Disk (Maybe Text)
- Network.AWS.StorageGateway.Types: dDiskNode :: Lens' Disk (Maybe Text)
- Network.AWS.StorageGateway.Types: dDiskPath :: Lens' Disk (Maybe Text)
- Network.AWS.StorageGateway.Types: dDiskSizeInBytes :: Lens' Disk (Maybe Integer)
- Network.AWS.StorageGateway.Types: dDiskStatus :: Lens' Disk (Maybe Text)
- Network.AWS.StorageGateway.Types: data CachediSCSIVolume
- Network.AWS.StorageGateway.Types: data ChapInfo
- Network.AWS.StorageGateway.Types: data DeviceiSCSIAttributes
- Network.AWS.StorageGateway.Types: data Disk
- Network.AWS.StorageGateway.Types: data FileShareInfo
- Network.AWS.StorageGateway.Types: data GatewayInfo
- Network.AWS.StorageGateway.Types: data NFSFileShareDefaults
- Network.AWS.StorageGateway.Types: data NFSFileShareInfo
- Network.AWS.StorageGateway.Types: data NetworkInterface
- Network.AWS.StorageGateway.Types: data ObjectACL
- Network.AWS.StorageGateway.Types: data StorediSCSIVolume
- Network.AWS.StorageGateway.Types: data Tag
- Network.AWS.StorageGateway.Types: data Tape
- Network.AWS.StorageGateway.Types: data TapeArchive
- Network.AWS.StorageGateway.Types: data TapeInfo
- Network.AWS.StorageGateway.Types: data TapeRecoveryPointInfo
- Network.AWS.StorageGateway.Types: data VTLDevice
- Network.AWS.StorageGateway.Types: data VolumeInfo
- Network.AWS.StorageGateway.Types: data VolumeRecoveryPointInfo
- Network.AWS.StorageGateway.Types: data VolumeiSCSIAttributes
- Network.AWS.StorageGateway.Types: deviceiSCSIAttributes :: DeviceiSCSIAttributes
- Network.AWS.StorageGateway.Types: disk :: Disk
- Network.AWS.StorageGateway.Types: dscsiaChapEnabled :: Lens' DeviceiSCSIAttributes (Maybe Bool)
- Network.AWS.StorageGateway.Types: dscsiaNetworkInterfaceId :: Lens' DeviceiSCSIAttributes (Maybe Text)
- Network.AWS.StorageGateway.Types: dscsiaNetworkInterfacePort :: Lens' DeviceiSCSIAttributes (Maybe Int)
- Network.AWS.StorageGateway.Types: dscsiaTargetARN :: Lens' DeviceiSCSIAttributes (Maybe Text)
- Network.AWS.StorageGateway.Types: fileShareInfo :: FileShareInfo
- Network.AWS.StorageGateway.Types: fsiFileShareARN :: Lens' FileShareInfo (Maybe Text)
- Network.AWS.StorageGateway.Types: fsiFileShareId :: Lens' FileShareInfo (Maybe Text)
- Network.AWS.StorageGateway.Types: fsiFileShareStatus :: Lens' FileShareInfo (Maybe Text)
- Network.AWS.StorageGateway.Types: fsiGatewayARN :: Lens' FileShareInfo (Maybe Text)
- Network.AWS.StorageGateway.Types: gatewayInfo :: GatewayInfo
- Network.AWS.StorageGateway.Types: giGatewayARN :: Lens' GatewayInfo (Maybe Text)
- Network.AWS.StorageGateway.Types: giGatewayId :: Lens' GatewayInfo (Maybe Text)
- Network.AWS.StorageGateway.Types: giGatewayName :: Lens' GatewayInfo (Maybe Text)
- Network.AWS.StorageGateway.Types: giGatewayOperationalState :: Lens' GatewayInfo (Maybe Text)
- Network.AWS.StorageGateway.Types: giGatewayType :: Lens' GatewayInfo (Maybe Text)
- Network.AWS.StorageGateway.Types: nFSFileShareDefaults :: NFSFileShareDefaults
- Network.AWS.StorageGateway.Types: nFSFileShareInfo :: NFSFileShareInfo
- Network.AWS.StorageGateway.Types: networkInterface :: NetworkInterface
- Network.AWS.StorageGateway.Types: nfsfsdDirectoryMode :: Lens' NFSFileShareDefaults (Maybe Text)
- Network.AWS.StorageGateway.Types: nfsfsdFileMode :: Lens' NFSFileShareDefaults (Maybe Text)
- Network.AWS.StorageGateway.Types: nfsfsdGroupId :: Lens' NFSFileShareDefaults (Maybe Natural)
- Network.AWS.StorageGateway.Types: nfsfsdOwnerId :: Lens' NFSFileShareDefaults (Maybe Natural)
- Network.AWS.StorageGateway.Types: nfsfsiClientList :: Lens' NFSFileShareInfo (Maybe (NonEmpty Text))
- Network.AWS.StorageGateway.Types: nfsfsiDefaultStorageClass :: Lens' NFSFileShareInfo (Maybe Text)
- Network.AWS.StorageGateway.Types: nfsfsiFileShareARN :: Lens' NFSFileShareInfo (Maybe Text)
- Network.AWS.StorageGateway.Types: nfsfsiFileShareId :: Lens' NFSFileShareInfo (Maybe Text)
- Network.AWS.StorageGateway.Types: nfsfsiFileShareStatus :: Lens' NFSFileShareInfo (Maybe Text)
- Network.AWS.StorageGateway.Types: nfsfsiGatewayARN :: Lens' NFSFileShareInfo (Maybe Text)
- Network.AWS.StorageGateway.Types: nfsfsiGuessMIMETypeEnabled :: Lens' NFSFileShareInfo (Maybe Bool)
- Network.AWS.StorageGateway.Types: nfsfsiKMSEncrypted :: Lens' NFSFileShareInfo (Maybe Bool)
- Network.AWS.StorageGateway.Types: nfsfsiKMSKey :: Lens' NFSFileShareInfo (Maybe Text)
- Network.AWS.StorageGateway.Types: nfsfsiLocationARN :: Lens' NFSFileShareInfo (Maybe Text)
- Network.AWS.StorageGateway.Types: nfsfsiNFSFileShareDefaults :: Lens' NFSFileShareInfo (Maybe NFSFileShareDefaults)
- Network.AWS.StorageGateway.Types: nfsfsiObjectACL :: Lens' NFSFileShareInfo (Maybe ObjectACL)
- Network.AWS.StorageGateway.Types: nfsfsiPath :: Lens' NFSFileShareInfo (Maybe Text)
- Network.AWS.StorageGateway.Types: nfsfsiReadOnly :: Lens' NFSFileShareInfo (Maybe Bool)
- Network.AWS.StorageGateway.Types: nfsfsiRequesterPays :: Lens' NFSFileShareInfo (Maybe Bool)
- Network.AWS.StorageGateway.Types: nfsfsiRole :: Lens' NFSFileShareInfo (Maybe Text)
- Network.AWS.StorageGateway.Types: nfsfsiSquash :: Lens' NFSFileShareInfo (Maybe Text)
- Network.AWS.StorageGateway.Types: niIPv4Address :: Lens' NetworkInterface (Maybe Text)
- Network.AWS.StorageGateway.Types: niIPv6Address :: Lens' NetworkInterface (Maybe Text)
- Network.AWS.StorageGateway.Types: niMACAddress :: Lens' NetworkInterface (Maybe Text)
- Network.AWS.StorageGateway.Types: sscsivCreatedDate :: Lens' StorediSCSIVolume (Maybe UTCTime)
- Network.AWS.StorageGateway.Types: sscsivPreservedExistingData :: Lens' StorediSCSIVolume (Maybe Bool)
- Network.AWS.StorageGateway.Types: sscsivSourceSnapshotId :: Lens' StorediSCSIVolume (Maybe Text)
- Network.AWS.StorageGateway.Types: sscsivVolumeARN :: Lens' StorediSCSIVolume (Maybe Text)
- Network.AWS.StorageGateway.Types: sscsivVolumeDiskId :: Lens' StorediSCSIVolume (Maybe Text)
- Network.AWS.StorageGateway.Types: sscsivVolumeId :: Lens' StorediSCSIVolume (Maybe Text)
- Network.AWS.StorageGateway.Types: sscsivVolumeProgress :: Lens' StorediSCSIVolume (Maybe Double)
- Network.AWS.StorageGateway.Types: sscsivVolumeSizeInBytes :: Lens' StorediSCSIVolume (Maybe Integer)
- Network.AWS.StorageGateway.Types: sscsivVolumeStatus :: Lens' StorediSCSIVolume (Maybe Text)
- Network.AWS.StorageGateway.Types: sscsivVolumeType :: Lens' StorediSCSIVolume (Maybe Text)
- Network.AWS.StorageGateway.Types: sscsivVolumeUsedInBytes :: Lens' StorediSCSIVolume (Maybe Integer)
- Network.AWS.StorageGateway.Types: sscsivVolumeiSCSIAttributes :: Lens' StorediSCSIVolume (Maybe VolumeiSCSIAttributes)
- Network.AWS.StorageGateway.Types: storageGateway :: Service
- Network.AWS.StorageGateway.Types: storediSCSIVolume :: StorediSCSIVolume
- Network.AWS.StorageGateway.Types: tProgress :: Lens' Tape (Maybe Double)
- Network.AWS.StorageGateway.Types: tTapeARN :: Lens' Tape (Maybe Text)
- Network.AWS.StorageGateway.Types: tTapeBarcode :: Lens' Tape (Maybe Text)
- Network.AWS.StorageGateway.Types: tTapeCreatedDate :: Lens' Tape (Maybe UTCTime)
- Network.AWS.StorageGateway.Types: tTapeSizeInBytes :: Lens' Tape (Maybe Integer)
- Network.AWS.StorageGateway.Types: tTapeStatus :: Lens' Tape (Maybe Text)
- Network.AWS.StorageGateway.Types: tTapeUsedInBytes :: Lens' Tape (Maybe Integer)
- Network.AWS.StorageGateway.Types: tVTLDevice :: Lens' Tape (Maybe Text)
- Network.AWS.StorageGateway.Types: taCompletionTime :: Lens' TapeArchive (Maybe UTCTime)
- Network.AWS.StorageGateway.Types: taRetrievedTo :: Lens' TapeArchive (Maybe Text)
- Network.AWS.StorageGateway.Types: taTapeARN :: Lens' TapeArchive (Maybe Text)
- Network.AWS.StorageGateway.Types: taTapeBarcode :: Lens' TapeArchive (Maybe Text)
- Network.AWS.StorageGateway.Types: taTapeCreatedDate :: Lens' TapeArchive (Maybe UTCTime)
- Network.AWS.StorageGateway.Types: taTapeSizeInBytes :: Lens' TapeArchive (Maybe Integer)
- Network.AWS.StorageGateway.Types: taTapeStatus :: Lens' TapeArchive (Maybe Text)
- Network.AWS.StorageGateway.Types: taTapeUsedInBytes :: Lens' TapeArchive (Maybe Integer)
- Network.AWS.StorageGateway.Types: tag :: Text -> Text -> Tag
- Network.AWS.StorageGateway.Types: tagKey :: Lens' Tag Text
- Network.AWS.StorageGateway.Types: tagValue :: Lens' Tag Text
- Network.AWS.StorageGateway.Types: tape :: Tape
- Network.AWS.StorageGateway.Types: tapeArchive :: TapeArchive
- Network.AWS.StorageGateway.Types: tapeInfo :: TapeInfo
- Network.AWS.StorageGateway.Types: tapeRecoveryPointInfo :: TapeRecoveryPointInfo
- Network.AWS.StorageGateway.Types: tiGatewayARN :: Lens' TapeInfo (Maybe Text)
- Network.AWS.StorageGateway.Types: tiTapeARN :: Lens' TapeInfo (Maybe Text)
- Network.AWS.StorageGateway.Types: tiTapeBarcode :: Lens' TapeInfo (Maybe Text)
- Network.AWS.StorageGateway.Types: tiTapeSizeInBytes :: Lens' TapeInfo (Maybe Integer)
- Network.AWS.StorageGateway.Types: tiTapeStatus :: Lens' TapeInfo (Maybe Text)
- Network.AWS.StorageGateway.Types: trpiTapeARN :: Lens' TapeRecoveryPointInfo (Maybe Text)
- Network.AWS.StorageGateway.Types: trpiTapeRecoveryPointTime :: Lens' TapeRecoveryPointInfo (Maybe UTCTime)
- Network.AWS.StorageGateway.Types: trpiTapeSizeInBytes :: Lens' TapeRecoveryPointInfo (Maybe Integer)
- Network.AWS.StorageGateway.Types: trpiTapeStatus :: Lens' TapeRecoveryPointInfo (Maybe Text)
- Network.AWS.StorageGateway.Types: vTLDevice :: VTLDevice
- Network.AWS.StorageGateway.Types: viGatewayARN :: Lens' VolumeInfo (Maybe Text)
- Network.AWS.StorageGateway.Types: viGatewayId :: Lens' VolumeInfo (Maybe Text)
- Network.AWS.StorageGateway.Types: viVolumeARN :: Lens' VolumeInfo (Maybe Text)
- Network.AWS.StorageGateway.Types: viVolumeId :: Lens' VolumeInfo (Maybe Text)
- Network.AWS.StorageGateway.Types: viVolumeSizeInBytes :: Lens' VolumeInfo (Maybe Integer)
- Network.AWS.StorageGateway.Types: viVolumeType :: Lens' VolumeInfo (Maybe Text)
- Network.AWS.StorageGateway.Types: volumeInfo :: VolumeInfo
- Network.AWS.StorageGateway.Types: volumeRecoveryPointInfo :: VolumeRecoveryPointInfo
- Network.AWS.StorageGateway.Types: volumeiSCSIAttributes :: VolumeiSCSIAttributes
- Network.AWS.StorageGateway.Types: vrpiVolumeARN :: Lens' VolumeRecoveryPointInfo (Maybe Text)
- Network.AWS.StorageGateway.Types: vrpiVolumeRecoveryPointTime :: Lens' VolumeRecoveryPointInfo (Maybe Text)
- Network.AWS.StorageGateway.Types: vrpiVolumeSizeInBytes :: Lens' VolumeRecoveryPointInfo (Maybe Integer)
- Network.AWS.StorageGateway.Types: vrpiVolumeUsageInBytes :: Lens' VolumeRecoveryPointInfo (Maybe Integer)
- Network.AWS.StorageGateway.Types: vscsiaChapEnabled :: Lens' VolumeiSCSIAttributes (Maybe Bool)
- Network.AWS.StorageGateway.Types: vscsiaLunNumber :: Lens' VolumeiSCSIAttributes (Maybe Natural)
- Network.AWS.StorageGateway.Types: vscsiaNetworkInterfaceId :: Lens' VolumeiSCSIAttributes (Maybe Text)
- Network.AWS.StorageGateway.Types: vscsiaNetworkInterfacePort :: Lens' VolumeiSCSIAttributes (Maybe Int)
- Network.AWS.StorageGateway.Types: vscsiaTargetARN :: Lens' VolumeiSCSIAttributes (Maybe Text)
- Network.AWS.StorageGateway.Types: vtldDeviceiSCSIAttributes :: Lens' VTLDevice (Maybe DeviceiSCSIAttributes)
- Network.AWS.StorageGateway.Types: vtldVTLDeviceARN :: Lens' VTLDevice (Maybe Text)
- Network.AWS.StorageGateway.Types: vtldVTLDeviceProductIdentifier :: Lens' VTLDevice (Maybe Text)
- Network.AWS.StorageGateway.Types: vtldVTLDeviceType :: Lens' VTLDevice (Maybe Text)
- Network.AWS.StorageGateway.Types: vtldVTLDeviceVendor :: Lens' VTLDevice (Maybe Text)
- Network.AWS.StorageGateway.UpdateBandwidthRateLimit: data UpdateBandwidthRateLimit
- Network.AWS.StorageGateway.UpdateBandwidthRateLimit: data UpdateBandwidthRateLimitResponse
- Network.AWS.StorageGateway.UpdateBandwidthRateLimit: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.UpdateBandwidthRateLimit.UpdateBandwidthRateLimit
- Network.AWS.StorageGateway.UpdateBandwidthRateLimit: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.UpdateBandwidthRateLimit.UpdateBandwidthRateLimitResponse
- Network.AWS.StorageGateway.UpdateBandwidthRateLimit: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.UpdateBandwidthRateLimit.UpdateBandwidthRateLimit
- Network.AWS.StorageGateway.UpdateBandwidthRateLimit: instance Data.Data.Data Network.AWS.StorageGateway.UpdateBandwidthRateLimit.UpdateBandwidthRateLimit
- Network.AWS.StorageGateway.UpdateBandwidthRateLimit: instance Data.Data.Data Network.AWS.StorageGateway.UpdateBandwidthRateLimit.UpdateBandwidthRateLimitResponse
- Network.AWS.StorageGateway.UpdateBandwidthRateLimit: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.UpdateBandwidthRateLimit.UpdateBandwidthRateLimit
- Network.AWS.StorageGateway.UpdateBandwidthRateLimit: instance GHC.Classes.Eq Network.AWS.StorageGateway.UpdateBandwidthRateLimit.UpdateBandwidthRateLimit
- Network.AWS.StorageGateway.UpdateBandwidthRateLimit: instance GHC.Classes.Eq Network.AWS.StorageGateway.UpdateBandwidthRateLimit.UpdateBandwidthRateLimitResponse
- Network.AWS.StorageGateway.UpdateBandwidthRateLimit: instance GHC.Generics.Generic Network.AWS.StorageGateway.UpdateBandwidthRateLimit.UpdateBandwidthRateLimit
- Network.AWS.StorageGateway.UpdateBandwidthRateLimit: instance GHC.Generics.Generic Network.AWS.StorageGateway.UpdateBandwidthRateLimit.UpdateBandwidthRateLimitResponse
- Network.AWS.StorageGateway.UpdateBandwidthRateLimit: instance GHC.Read.Read Network.AWS.StorageGateway.UpdateBandwidthRateLimit.UpdateBandwidthRateLimit
- Network.AWS.StorageGateway.UpdateBandwidthRateLimit: instance GHC.Read.Read Network.AWS.StorageGateway.UpdateBandwidthRateLimit.UpdateBandwidthRateLimitResponse
- Network.AWS.StorageGateway.UpdateBandwidthRateLimit: instance GHC.Show.Show Network.AWS.StorageGateway.UpdateBandwidthRateLimit.UpdateBandwidthRateLimit
- Network.AWS.StorageGateway.UpdateBandwidthRateLimit: instance GHC.Show.Show Network.AWS.StorageGateway.UpdateBandwidthRateLimit.UpdateBandwidthRateLimitResponse
- Network.AWS.StorageGateway.UpdateBandwidthRateLimit: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.UpdateBandwidthRateLimit.UpdateBandwidthRateLimit
- Network.AWS.StorageGateway.UpdateBandwidthRateLimit: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.UpdateBandwidthRateLimit.UpdateBandwidthRateLimit
- Network.AWS.StorageGateway.UpdateBandwidthRateLimit: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.UpdateBandwidthRateLimit.UpdateBandwidthRateLimit
- Network.AWS.StorageGateway.UpdateBandwidthRateLimit: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.UpdateBandwidthRateLimit.UpdateBandwidthRateLimit
- Network.AWS.StorageGateway.UpdateBandwidthRateLimit: ubrlAverageDownloadRateLimitInBitsPerSec :: Lens' UpdateBandwidthRateLimit (Maybe Natural)
- Network.AWS.StorageGateway.UpdateBandwidthRateLimit: ubrlAverageUploadRateLimitInBitsPerSec :: Lens' UpdateBandwidthRateLimit (Maybe Natural)
- Network.AWS.StorageGateway.UpdateBandwidthRateLimit: ubrlGatewayARN :: Lens' UpdateBandwidthRateLimit Text
- Network.AWS.StorageGateway.UpdateBandwidthRateLimit: ubrlrsGatewayARN :: Lens' UpdateBandwidthRateLimitResponse (Maybe Text)
- Network.AWS.StorageGateway.UpdateBandwidthRateLimit: ubrlrsResponseStatus :: Lens' UpdateBandwidthRateLimitResponse Int
- Network.AWS.StorageGateway.UpdateBandwidthRateLimit: updateBandwidthRateLimit :: Text -> UpdateBandwidthRateLimit
- Network.AWS.StorageGateway.UpdateBandwidthRateLimit: updateBandwidthRateLimitResponse :: Int -> UpdateBandwidthRateLimitResponse
- Network.AWS.StorageGateway.UpdateChapCredentials: data UpdateChapCredentials
- Network.AWS.StorageGateway.UpdateChapCredentials: data UpdateChapCredentialsResponse
- Network.AWS.StorageGateway.UpdateChapCredentials: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.UpdateChapCredentials.UpdateChapCredentials
- Network.AWS.StorageGateway.UpdateChapCredentials: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.UpdateChapCredentials.UpdateChapCredentialsResponse
- Network.AWS.StorageGateway.UpdateChapCredentials: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.UpdateChapCredentials.UpdateChapCredentials
- Network.AWS.StorageGateway.UpdateChapCredentials: instance Data.Data.Data Network.AWS.StorageGateway.UpdateChapCredentials.UpdateChapCredentials
- Network.AWS.StorageGateway.UpdateChapCredentials: instance Data.Data.Data Network.AWS.StorageGateway.UpdateChapCredentials.UpdateChapCredentialsResponse
- Network.AWS.StorageGateway.UpdateChapCredentials: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.UpdateChapCredentials.UpdateChapCredentials
- Network.AWS.StorageGateway.UpdateChapCredentials: instance GHC.Classes.Eq Network.AWS.StorageGateway.UpdateChapCredentials.UpdateChapCredentials
- Network.AWS.StorageGateway.UpdateChapCredentials: instance GHC.Classes.Eq Network.AWS.StorageGateway.UpdateChapCredentials.UpdateChapCredentialsResponse
- Network.AWS.StorageGateway.UpdateChapCredentials: instance GHC.Generics.Generic Network.AWS.StorageGateway.UpdateChapCredentials.UpdateChapCredentials
- Network.AWS.StorageGateway.UpdateChapCredentials: instance GHC.Generics.Generic Network.AWS.StorageGateway.UpdateChapCredentials.UpdateChapCredentialsResponse
- Network.AWS.StorageGateway.UpdateChapCredentials: instance GHC.Read.Read Network.AWS.StorageGateway.UpdateChapCredentials.UpdateChapCredentials
- Network.AWS.StorageGateway.UpdateChapCredentials: instance GHC.Read.Read Network.AWS.StorageGateway.UpdateChapCredentials.UpdateChapCredentialsResponse
- Network.AWS.StorageGateway.UpdateChapCredentials: instance GHC.Show.Show Network.AWS.StorageGateway.UpdateChapCredentials.UpdateChapCredentials
- Network.AWS.StorageGateway.UpdateChapCredentials: instance GHC.Show.Show Network.AWS.StorageGateway.UpdateChapCredentials.UpdateChapCredentialsResponse
- Network.AWS.StorageGateway.UpdateChapCredentials: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.UpdateChapCredentials.UpdateChapCredentials
- Network.AWS.StorageGateway.UpdateChapCredentials: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.UpdateChapCredentials.UpdateChapCredentials
- Network.AWS.StorageGateway.UpdateChapCredentials: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.UpdateChapCredentials.UpdateChapCredentials
- Network.AWS.StorageGateway.UpdateChapCredentials: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.UpdateChapCredentials.UpdateChapCredentials
- Network.AWS.StorageGateway.UpdateChapCredentials: uccInitiatorName :: Lens' UpdateChapCredentials Text
- Network.AWS.StorageGateway.UpdateChapCredentials: uccSecretToAuthenticateInitiator :: Lens' UpdateChapCredentials Text
- Network.AWS.StorageGateway.UpdateChapCredentials: uccSecretToAuthenticateTarget :: Lens' UpdateChapCredentials (Maybe Text)
- Network.AWS.StorageGateway.UpdateChapCredentials: uccTargetARN :: Lens' UpdateChapCredentials Text
- Network.AWS.StorageGateway.UpdateChapCredentials: uccrsInitiatorName :: Lens' UpdateChapCredentialsResponse (Maybe Text)
- Network.AWS.StorageGateway.UpdateChapCredentials: uccrsResponseStatus :: Lens' UpdateChapCredentialsResponse Int
- Network.AWS.StorageGateway.UpdateChapCredentials: uccrsTargetARN :: Lens' UpdateChapCredentialsResponse (Maybe Text)
- Network.AWS.StorageGateway.UpdateChapCredentials: updateChapCredentials :: Text -> Text -> Text -> UpdateChapCredentials
- Network.AWS.StorageGateway.UpdateChapCredentials: updateChapCredentialsResponse :: Int -> UpdateChapCredentialsResponse
- Network.AWS.StorageGateway.UpdateGatewayInformation: data UpdateGatewayInformation
- Network.AWS.StorageGateway.UpdateGatewayInformation: data UpdateGatewayInformationResponse
- Network.AWS.StorageGateway.UpdateGatewayInformation: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.UpdateGatewayInformation.UpdateGatewayInformation
- Network.AWS.StorageGateway.UpdateGatewayInformation: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.UpdateGatewayInformation.UpdateGatewayInformationResponse
- Network.AWS.StorageGateway.UpdateGatewayInformation: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.UpdateGatewayInformation.UpdateGatewayInformation
- Network.AWS.StorageGateway.UpdateGatewayInformation: instance Data.Data.Data Network.AWS.StorageGateway.UpdateGatewayInformation.UpdateGatewayInformation
- Network.AWS.StorageGateway.UpdateGatewayInformation: instance Data.Data.Data Network.AWS.StorageGateway.UpdateGatewayInformation.UpdateGatewayInformationResponse
- Network.AWS.StorageGateway.UpdateGatewayInformation: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.UpdateGatewayInformation.UpdateGatewayInformation
- Network.AWS.StorageGateway.UpdateGatewayInformation: instance GHC.Classes.Eq Network.AWS.StorageGateway.UpdateGatewayInformation.UpdateGatewayInformation
- Network.AWS.StorageGateway.UpdateGatewayInformation: instance GHC.Classes.Eq Network.AWS.StorageGateway.UpdateGatewayInformation.UpdateGatewayInformationResponse
- Network.AWS.StorageGateway.UpdateGatewayInformation: instance GHC.Generics.Generic Network.AWS.StorageGateway.UpdateGatewayInformation.UpdateGatewayInformation
- Network.AWS.StorageGateway.UpdateGatewayInformation: instance GHC.Generics.Generic Network.AWS.StorageGateway.UpdateGatewayInformation.UpdateGatewayInformationResponse
- Network.AWS.StorageGateway.UpdateGatewayInformation: instance GHC.Read.Read Network.AWS.StorageGateway.UpdateGatewayInformation.UpdateGatewayInformation
- Network.AWS.StorageGateway.UpdateGatewayInformation: instance GHC.Read.Read Network.AWS.StorageGateway.UpdateGatewayInformation.UpdateGatewayInformationResponse
- Network.AWS.StorageGateway.UpdateGatewayInformation: instance GHC.Show.Show Network.AWS.StorageGateway.UpdateGatewayInformation.UpdateGatewayInformation
- Network.AWS.StorageGateway.UpdateGatewayInformation: instance GHC.Show.Show Network.AWS.StorageGateway.UpdateGatewayInformation.UpdateGatewayInformationResponse
- Network.AWS.StorageGateway.UpdateGatewayInformation: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.UpdateGatewayInformation.UpdateGatewayInformation
- Network.AWS.StorageGateway.UpdateGatewayInformation: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.UpdateGatewayInformation.UpdateGatewayInformation
- Network.AWS.StorageGateway.UpdateGatewayInformation: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.UpdateGatewayInformation.UpdateGatewayInformation
- Network.AWS.StorageGateway.UpdateGatewayInformation: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.UpdateGatewayInformation.UpdateGatewayInformation
- Network.AWS.StorageGateway.UpdateGatewayInformation: ugiGatewayARN :: Lens' UpdateGatewayInformation Text
- Network.AWS.StorageGateway.UpdateGatewayInformation: ugiGatewayName :: Lens' UpdateGatewayInformation (Maybe Text)
- Network.AWS.StorageGateway.UpdateGatewayInformation: ugiGatewayTimezone :: Lens' UpdateGatewayInformation (Maybe Text)
- Network.AWS.StorageGateway.UpdateGatewayInformation: ugirsGatewayARN :: Lens' UpdateGatewayInformationResponse (Maybe Text)
- Network.AWS.StorageGateway.UpdateGatewayInformation: ugirsGatewayName :: Lens' UpdateGatewayInformationResponse (Maybe Text)
- Network.AWS.StorageGateway.UpdateGatewayInformation: ugirsResponseStatus :: Lens' UpdateGatewayInformationResponse Int
- Network.AWS.StorageGateway.UpdateGatewayInformation: updateGatewayInformation :: Text -> UpdateGatewayInformation
- Network.AWS.StorageGateway.UpdateGatewayInformation: updateGatewayInformationResponse :: Int -> UpdateGatewayInformationResponse
- Network.AWS.StorageGateway.UpdateGatewaySoftwareNow: data UpdateGatewaySoftwareNow
- Network.AWS.StorageGateway.UpdateGatewaySoftwareNow: data UpdateGatewaySoftwareNowResponse
- Network.AWS.StorageGateway.UpdateGatewaySoftwareNow: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.UpdateGatewaySoftwareNow.UpdateGatewaySoftwareNow
- Network.AWS.StorageGateway.UpdateGatewaySoftwareNow: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.UpdateGatewaySoftwareNow.UpdateGatewaySoftwareNowResponse
- Network.AWS.StorageGateway.UpdateGatewaySoftwareNow: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.UpdateGatewaySoftwareNow.UpdateGatewaySoftwareNow
- Network.AWS.StorageGateway.UpdateGatewaySoftwareNow: instance Data.Data.Data Network.AWS.StorageGateway.UpdateGatewaySoftwareNow.UpdateGatewaySoftwareNow
- Network.AWS.StorageGateway.UpdateGatewaySoftwareNow: instance Data.Data.Data Network.AWS.StorageGateway.UpdateGatewaySoftwareNow.UpdateGatewaySoftwareNowResponse
- Network.AWS.StorageGateway.UpdateGatewaySoftwareNow: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.UpdateGatewaySoftwareNow.UpdateGatewaySoftwareNow
- Network.AWS.StorageGateway.UpdateGatewaySoftwareNow: instance GHC.Classes.Eq Network.AWS.StorageGateway.UpdateGatewaySoftwareNow.UpdateGatewaySoftwareNow
- Network.AWS.StorageGateway.UpdateGatewaySoftwareNow: instance GHC.Classes.Eq Network.AWS.StorageGateway.UpdateGatewaySoftwareNow.UpdateGatewaySoftwareNowResponse
- Network.AWS.StorageGateway.UpdateGatewaySoftwareNow: instance GHC.Generics.Generic Network.AWS.StorageGateway.UpdateGatewaySoftwareNow.UpdateGatewaySoftwareNow
- Network.AWS.StorageGateway.UpdateGatewaySoftwareNow: instance GHC.Generics.Generic Network.AWS.StorageGateway.UpdateGatewaySoftwareNow.UpdateGatewaySoftwareNowResponse
- Network.AWS.StorageGateway.UpdateGatewaySoftwareNow: instance GHC.Read.Read Network.AWS.StorageGateway.UpdateGatewaySoftwareNow.UpdateGatewaySoftwareNow
- Network.AWS.StorageGateway.UpdateGatewaySoftwareNow: instance GHC.Read.Read Network.AWS.StorageGateway.UpdateGatewaySoftwareNow.UpdateGatewaySoftwareNowResponse
- Network.AWS.StorageGateway.UpdateGatewaySoftwareNow: instance GHC.Show.Show Network.AWS.StorageGateway.UpdateGatewaySoftwareNow.UpdateGatewaySoftwareNow
- Network.AWS.StorageGateway.UpdateGatewaySoftwareNow: instance GHC.Show.Show Network.AWS.StorageGateway.UpdateGatewaySoftwareNow.UpdateGatewaySoftwareNowResponse
- Network.AWS.StorageGateway.UpdateGatewaySoftwareNow: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.UpdateGatewaySoftwareNow.UpdateGatewaySoftwareNow
- Network.AWS.StorageGateway.UpdateGatewaySoftwareNow: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.UpdateGatewaySoftwareNow.UpdateGatewaySoftwareNow
- Network.AWS.StorageGateway.UpdateGatewaySoftwareNow: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.UpdateGatewaySoftwareNow.UpdateGatewaySoftwareNow
- Network.AWS.StorageGateway.UpdateGatewaySoftwareNow: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.UpdateGatewaySoftwareNow.UpdateGatewaySoftwareNow
- Network.AWS.StorageGateway.UpdateGatewaySoftwareNow: ugsnGatewayARN :: Lens' UpdateGatewaySoftwareNow Text
- Network.AWS.StorageGateway.UpdateGatewaySoftwareNow: ugsnrsGatewayARN :: Lens' UpdateGatewaySoftwareNowResponse (Maybe Text)
- Network.AWS.StorageGateway.UpdateGatewaySoftwareNow: ugsnrsResponseStatus :: Lens' UpdateGatewaySoftwareNowResponse Int
- Network.AWS.StorageGateway.UpdateGatewaySoftwareNow: updateGatewaySoftwareNow :: Text -> UpdateGatewaySoftwareNow
- Network.AWS.StorageGateway.UpdateGatewaySoftwareNow: updateGatewaySoftwareNowResponse :: Int -> UpdateGatewaySoftwareNowResponse
- Network.AWS.StorageGateway.UpdateMaintenanceStartTime: data UpdateMaintenanceStartTime
- Network.AWS.StorageGateway.UpdateMaintenanceStartTime: data UpdateMaintenanceStartTimeResponse
- Network.AWS.StorageGateway.UpdateMaintenanceStartTime: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.UpdateMaintenanceStartTime.UpdateMaintenanceStartTime
- Network.AWS.StorageGateway.UpdateMaintenanceStartTime: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.UpdateMaintenanceStartTime.UpdateMaintenanceStartTimeResponse
- Network.AWS.StorageGateway.UpdateMaintenanceStartTime: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.UpdateMaintenanceStartTime.UpdateMaintenanceStartTime
- Network.AWS.StorageGateway.UpdateMaintenanceStartTime: instance Data.Data.Data Network.AWS.StorageGateway.UpdateMaintenanceStartTime.UpdateMaintenanceStartTime
- Network.AWS.StorageGateway.UpdateMaintenanceStartTime: instance Data.Data.Data Network.AWS.StorageGateway.UpdateMaintenanceStartTime.UpdateMaintenanceStartTimeResponse
- Network.AWS.StorageGateway.UpdateMaintenanceStartTime: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.UpdateMaintenanceStartTime.UpdateMaintenanceStartTime
- Network.AWS.StorageGateway.UpdateMaintenanceStartTime: instance GHC.Classes.Eq Network.AWS.StorageGateway.UpdateMaintenanceStartTime.UpdateMaintenanceStartTime
- Network.AWS.StorageGateway.UpdateMaintenanceStartTime: instance GHC.Classes.Eq Network.AWS.StorageGateway.UpdateMaintenanceStartTime.UpdateMaintenanceStartTimeResponse
- Network.AWS.StorageGateway.UpdateMaintenanceStartTime: instance GHC.Generics.Generic Network.AWS.StorageGateway.UpdateMaintenanceStartTime.UpdateMaintenanceStartTime
- Network.AWS.StorageGateway.UpdateMaintenanceStartTime: instance GHC.Generics.Generic Network.AWS.StorageGateway.UpdateMaintenanceStartTime.UpdateMaintenanceStartTimeResponse
- Network.AWS.StorageGateway.UpdateMaintenanceStartTime: instance GHC.Read.Read Network.AWS.StorageGateway.UpdateMaintenanceStartTime.UpdateMaintenanceStartTime
- Network.AWS.StorageGateway.UpdateMaintenanceStartTime: instance GHC.Read.Read Network.AWS.StorageGateway.UpdateMaintenanceStartTime.UpdateMaintenanceStartTimeResponse
- Network.AWS.StorageGateway.UpdateMaintenanceStartTime: instance GHC.Show.Show Network.AWS.StorageGateway.UpdateMaintenanceStartTime.UpdateMaintenanceStartTime
- Network.AWS.StorageGateway.UpdateMaintenanceStartTime: instance GHC.Show.Show Network.AWS.StorageGateway.UpdateMaintenanceStartTime.UpdateMaintenanceStartTimeResponse
- Network.AWS.StorageGateway.UpdateMaintenanceStartTime: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.UpdateMaintenanceStartTime.UpdateMaintenanceStartTime
- Network.AWS.StorageGateway.UpdateMaintenanceStartTime: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.UpdateMaintenanceStartTime.UpdateMaintenanceStartTime
- Network.AWS.StorageGateway.UpdateMaintenanceStartTime: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.UpdateMaintenanceStartTime.UpdateMaintenanceStartTime
- Network.AWS.StorageGateway.UpdateMaintenanceStartTime: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.UpdateMaintenanceStartTime.UpdateMaintenanceStartTime
- Network.AWS.StorageGateway.UpdateMaintenanceStartTime: umstDayOfWeek :: Lens' UpdateMaintenanceStartTime Natural
- Network.AWS.StorageGateway.UpdateMaintenanceStartTime: umstGatewayARN :: Lens' UpdateMaintenanceStartTime Text
- Network.AWS.StorageGateway.UpdateMaintenanceStartTime: umstHourOfDay :: Lens' UpdateMaintenanceStartTime Natural
- Network.AWS.StorageGateway.UpdateMaintenanceStartTime: umstMinuteOfHour :: Lens' UpdateMaintenanceStartTime Natural
- Network.AWS.StorageGateway.UpdateMaintenanceStartTime: umstrsGatewayARN :: Lens' UpdateMaintenanceStartTimeResponse (Maybe Text)
- Network.AWS.StorageGateway.UpdateMaintenanceStartTime: umstrsResponseStatus :: Lens' UpdateMaintenanceStartTimeResponse Int
- Network.AWS.StorageGateway.UpdateMaintenanceStartTime: updateMaintenanceStartTime :: Text -> Natural -> Natural -> Natural -> UpdateMaintenanceStartTime
- Network.AWS.StorageGateway.UpdateMaintenanceStartTime: updateMaintenanceStartTimeResponse :: Int -> UpdateMaintenanceStartTimeResponse
- Network.AWS.StorageGateway.UpdateNFSFileShare: data UpdateNFSFileShare
- Network.AWS.StorageGateway.UpdateNFSFileShare: data UpdateNFSFileShareResponse
- Network.AWS.StorageGateway.UpdateNFSFileShare: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.UpdateNFSFileShare.UpdateNFSFileShare
- Network.AWS.StorageGateway.UpdateNFSFileShare: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.UpdateNFSFileShare.UpdateNFSFileShareResponse
- Network.AWS.StorageGateway.UpdateNFSFileShare: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.UpdateNFSFileShare.UpdateNFSFileShare
- Network.AWS.StorageGateway.UpdateNFSFileShare: instance Data.Data.Data Network.AWS.StorageGateway.UpdateNFSFileShare.UpdateNFSFileShare
- Network.AWS.StorageGateway.UpdateNFSFileShare: instance Data.Data.Data Network.AWS.StorageGateway.UpdateNFSFileShare.UpdateNFSFileShareResponse
- Network.AWS.StorageGateway.UpdateNFSFileShare: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.UpdateNFSFileShare.UpdateNFSFileShare
- Network.AWS.StorageGateway.UpdateNFSFileShare: instance GHC.Classes.Eq Network.AWS.StorageGateway.UpdateNFSFileShare.UpdateNFSFileShare
- Network.AWS.StorageGateway.UpdateNFSFileShare: instance GHC.Classes.Eq Network.AWS.StorageGateway.UpdateNFSFileShare.UpdateNFSFileShareResponse
- Network.AWS.StorageGateway.UpdateNFSFileShare: instance GHC.Generics.Generic Network.AWS.StorageGateway.UpdateNFSFileShare.UpdateNFSFileShare
- Network.AWS.StorageGateway.UpdateNFSFileShare: instance GHC.Generics.Generic Network.AWS.StorageGateway.UpdateNFSFileShare.UpdateNFSFileShareResponse
- Network.AWS.StorageGateway.UpdateNFSFileShare: instance GHC.Read.Read Network.AWS.StorageGateway.UpdateNFSFileShare.UpdateNFSFileShare
- Network.AWS.StorageGateway.UpdateNFSFileShare: instance GHC.Read.Read Network.AWS.StorageGateway.UpdateNFSFileShare.UpdateNFSFileShareResponse
- Network.AWS.StorageGateway.UpdateNFSFileShare: instance GHC.Show.Show Network.AWS.StorageGateway.UpdateNFSFileShare.UpdateNFSFileShare
- Network.AWS.StorageGateway.UpdateNFSFileShare: instance GHC.Show.Show Network.AWS.StorageGateway.UpdateNFSFileShare.UpdateNFSFileShareResponse
- Network.AWS.StorageGateway.UpdateNFSFileShare: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.UpdateNFSFileShare.UpdateNFSFileShare
- Network.AWS.StorageGateway.UpdateNFSFileShare: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.UpdateNFSFileShare.UpdateNFSFileShare
- Network.AWS.StorageGateway.UpdateNFSFileShare: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.UpdateNFSFileShare.UpdateNFSFileShare
- Network.AWS.StorageGateway.UpdateNFSFileShare: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.UpdateNFSFileShare.UpdateNFSFileShare
- Network.AWS.StorageGateway.UpdateNFSFileShare: unfsfsClientList :: Lens' UpdateNFSFileShare (Maybe (NonEmpty Text))
- Network.AWS.StorageGateway.UpdateNFSFileShare: unfsfsDefaultStorageClass :: Lens' UpdateNFSFileShare (Maybe Text)
- Network.AWS.StorageGateway.UpdateNFSFileShare: unfsfsFileShareARN :: Lens' UpdateNFSFileShare Text
- Network.AWS.StorageGateway.UpdateNFSFileShare: unfsfsGuessMIMETypeEnabled :: Lens' UpdateNFSFileShare (Maybe Bool)
- Network.AWS.StorageGateway.UpdateNFSFileShare: unfsfsKMSEncrypted :: Lens' UpdateNFSFileShare (Maybe Bool)
- Network.AWS.StorageGateway.UpdateNFSFileShare: unfsfsKMSKey :: Lens' UpdateNFSFileShare (Maybe Text)
- Network.AWS.StorageGateway.UpdateNFSFileShare: unfsfsNFSFileShareDefaults :: Lens' UpdateNFSFileShare (Maybe NFSFileShareDefaults)
- Network.AWS.StorageGateway.UpdateNFSFileShare: unfsfsObjectACL :: Lens' UpdateNFSFileShare (Maybe ObjectACL)
- Network.AWS.StorageGateway.UpdateNFSFileShare: unfsfsReadOnly :: Lens' UpdateNFSFileShare (Maybe Bool)
- Network.AWS.StorageGateway.UpdateNFSFileShare: unfsfsRequesterPays :: Lens' UpdateNFSFileShare (Maybe Bool)
- Network.AWS.StorageGateway.UpdateNFSFileShare: unfsfsSquash :: Lens' UpdateNFSFileShare (Maybe Text)
- Network.AWS.StorageGateway.UpdateNFSFileShare: unfsfsrsFileShareARN :: Lens' UpdateNFSFileShareResponse (Maybe Text)
- Network.AWS.StorageGateway.UpdateNFSFileShare: unfsfsrsResponseStatus :: Lens' UpdateNFSFileShareResponse Int
- Network.AWS.StorageGateway.UpdateNFSFileShare: updateNFSFileShare :: Text -> UpdateNFSFileShare
- Network.AWS.StorageGateway.UpdateNFSFileShare: updateNFSFileShareResponse :: Int -> UpdateNFSFileShareResponse
- Network.AWS.StorageGateway.UpdateSnapshotSchedule: data UpdateSnapshotSchedule
- Network.AWS.StorageGateway.UpdateSnapshotSchedule: data UpdateSnapshotScheduleResponse
- Network.AWS.StorageGateway.UpdateSnapshotSchedule: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.UpdateSnapshotSchedule.UpdateSnapshotSchedule
- Network.AWS.StorageGateway.UpdateSnapshotSchedule: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.UpdateSnapshotSchedule.UpdateSnapshotScheduleResponse
- Network.AWS.StorageGateway.UpdateSnapshotSchedule: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.UpdateSnapshotSchedule.UpdateSnapshotSchedule
- Network.AWS.StorageGateway.UpdateSnapshotSchedule: instance Data.Data.Data Network.AWS.StorageGateway.UpdateSnapshotSchedule.UpdateSnapshotSchedule
- Network.AWS.StorageGateway.UpdateSnapshotSchedule: instance Data.Data.Data Network.AWS.StorageGateway.UpdateSnapshotSchedule.UpdateSnapshotScheduleResponse
- Network.AWS.StorageGateway.UpdateSnapshotSchedule: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.UpdateSnapshotSchedule.UpdateSnapshotSchedule
- Network.AWS.StorageGateway.UpdateSnapshotSchedule: instance GHC.Classes.Eq Network.AWS.StorageGateway.UpdateSnapshotSchedule.UpdateSnapshotSchedule
- Network.AWS.StorageGateway.UpdateSnapshotSchedule: instance GHC.Classes.Eq Network.AWS.StorageGateway.UpdateSnapshotSchedule.UpdateSnapshotScheduleResponse
- Network.AWS.StorageGateway.UpdateSnapshotSchedule: instance GHC.Generics.Generic Network.AWS.StorageGateway.UpdateSnapshotSchedule.UpdateSnapshotSchedule
- Network.AWS.StorageGateway.UpdateSnapshotSchedule: instance GHC.Generics.Generic Network.AWS.StorageGateway.UpdateSnapshotSchedule.UpdateSnapshotScheduleResponse
- Network.AWS.StorageGateway.UpdateSnapshotSchedule: instance GHC.Read.Read Network.AWS.StorageGateway.UpdateSnapshotSchedule.UpdateSnapshotSchedule
- Network.AWS.StorageGateway.UpdateSnapshotSchedule: instance GHC.Read.Read Network.AWS.StorageGateway.UpdateSnapshotSchedule.UpdateSnapshotScheduleResponse
- Network.AWS.StorageGateway.UpdateSnapshotSchedule: instance GHC.Show.Show Network.AWS.StorageGateway.UpdateSnapshotSchedule.UpdateSnapshotSchedule
- Network.AWS.StorageGateway.UpdateSnapshotSchedule: instance GHC.Show.Show Network.AWS.StorageGateway.UpdateSnapshotSchedule.UpdateSnapshotScheduleResponse
- Network.AWS.StorageGateway.UpdateSnapshotSchedule: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.UpdateSnapshotSchedule.UpdateSnapshotSchedule
- Network.AWS.StorageGateway.UpdateSnapshotSchedule: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.UpdateSnapshotSchedule.UpdateSnapshotSchedule
- Network.AWS.StorageGateway.UpdateSnapshotSchedule: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.UpdateSnapshotSchedule.UpdateSnapshotSchedule
- Network.AWS.StorageGateway.UpdateSnapshotSchedule: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.UpdateSnapshotSchedule.UpdateSnapshotSchedule
- Network.AWS.StorageGateway.UpdateSnapshotSchedule: updateSnapshotSchedule :: Text -> Natural -> Natural -> UpdateSnapshotSchedule
- Network.AWS.StorageGateway.UpdateSnapshotSchedule: updateSnapshotScheduleResponse :: Int -> UpdateSnapshotScheduleResponse
- Network.AWS.StorageGateway.UpdateSnapshotSchedule: ussDescription :: Lens' UpdateSnapshotSchedule (Maybe Text)
- Network.AWS.StorageGateway.UpdateSnapshotSchedule: ussRecurrenceInHours :: Lens' UpdateSnapshotSchedule Natural
- Network.AWS.StorageGateway.UpdateSnapshotSchedule: ussStartAt :: Lens' UpdateSnapshotSchedule Natural
- Network.AWS.StorageGateway.UpdateSnapshotSchedule: ussVolumeARN :: Lens' UpdateSnapshotSchedule Text
- Network.AWS.StorageGateway.UpdateSnapshotSchedule: ussrsResponseStatus :: Lens' UpdateSnapshotScheduleResponse Int
- Network.AWS.StorageGateway.UpdateSnapshotSchedule: ussrsVolumeARN :: Lens' UpdateSnapshotScheduleResponse (Maybe Text)
- Network.AWS.StorageGateway.UpdateVTLDeviceType: data UpdateVTLDeviceType
- Network.AWS.StorageGateway.UpdateVTLDeviceType: data UpdateVTLDeviceTypeResponse
- Network.AWS.StorageGateway.UpdateVTLDeviceType: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.UpdateVTLDeviceType.UpdateVTLDeviceType
- Network.AWS.StorageGateway.UpdateVTLDeviceType: instance Control.DeepSeq.NFData Network.AWS.StorageGateway.UpdateVTLDeviceType.UpdateVTLDeviceTypeResponse
- Network.AWS.StorageGateway.UpdateVTLDeviceType: instance Data.Aeson.Types.ToJSON.ToJSON Network.AWS.StorageGateway.UpdateVTLDeviceType.UpdateVTLDeviceType
- Network.AWS.StorageGateway.UpdateVTLDeviceType: instance Data.Data.Data Network.AWS.StorageGateway.UpdateVTLDeviceType.UpdateVTLDeviceType
- Network.AWS.StorageGateway.UpdateVTLDeviceType: instance Data.Data.Data Network.AWS.StorageGateway.UpdateVTLDeviceType.UpdateVTLDeviceTypeResponse
- Network.AWS.StorageGateway.UpdateVTLDeviceType: instance Data.Hashable.Class.Hashable Network.AWS.StorageGateway.UpdateVTLDeviceType.UpdateVTLDeviceType
- Network.AWS.StorageGateway.UpdateVTLDeviceType: instance GHC.Classes.Eq Network.AWS.StorageGateway.UpdateVTLDeviceType.UpdateVTLDeviceType
- Network.AWS.StorageGateway.UpdateVTLDeviceType: instance GHC.Classes.Eq Network.AWS.StorageGateway.UpdateVTLDeviceType.UpdateVTLDeviceTypeResponse
- Network.AWS.StorageGateway.UpdateVTLDeviceType: instance GHC.Generics.Generic Network.AWS.StorageGateway.UpdateVTLDeviceType.UpdateVTLDeviceType
- Network.AWS.StorageGateway.UpdateVTLDeviceType: instance GHC.Generics.Generic Network.AWS.StorageGateway.UpdateVTLDeviceType.UpdateVTLDeviceTypeResponse
- Network.AWS.StorageGateway.UpdateVTLDeviceType: instance GHC.Read.Read Network.AWS.StorageGateway.UpdateVTLDeviceType.UpdateVTLDeviceType
- Network.AWS.StorageGateway.UpdateVTLDeviceType: instance GHC.Read.Read Network.AWS.StorageGateway.UpdateVTLDeviceType.UpdateVTLDeviceTypeResponse
- Network.AWS.StorageGateway.UpdateVTLDeviceType: instance GHC.Show.Show Network.AWS.StorageGateway.UpdateVTLDeviceType.UpdateVTLDeviceType
- Network.AWS.StorageGateway.UpdateVTLDeviceType: instance GHC.Show.Show Network.AWS.StorageGateway.UpdateVTLDeviceType.UpdateVTLDeviceTypeResponse
- Network.AWS.StorageGateway.UpdateVTLDeviceType: instance Network.AWS.Data.Headers.ToHeaders Network.AWS.StorageGateway.UpdateVTLDeviceType.UpdateVTLDeviceType
- Network.AWS.StorageGateway.UpdateVTLDeviceType: instance Network.AWS.Data.Path.ToPath Network.AWS.StorageGateway.UpdateVTLDeviceType.UpdateVTLDeviceType
- Network.AWS.StorageGateway.UpdateVTLDeviceType: instance Network.AWS.Data.Query.ToQuery Network.AWS.StorageGateway.UpdateVTLDeviceType.UpdateVTLDeviceType
- Network.AWS.StorageGateway.UpdateVTLDeviceType: instance Network.AWS.Types.AWSRequest Network.AWS.StorageGateway.UpdateVTLDeviceType.UpdateVTLDeviceType
- Network.AWS.StorageGateway.UpdateVTLDeviceType: updateVTLDeviceType :: Text -> Text -> UpdateVTLDeviceType
- Network.AWS.StorageGateway.UpdateVTLDeviceType: updateVTLDeviceTypeResponse :: Int -> UpdateVTLDeviceTypeResponse
- Network.AWS.StorageGateway.UpdateVTLDeviceType: uvtldtDeviceType :: Lens' UpdateVTLDeviceType Text
- Network.AWS.StorageGateway.UpdateVTLDeviceType: uvtldtVTLDeviceARN :: Lens' UpdateVTLDeviceType Text
- Network.AWS.StorageGateway.UpdateVTLDeviceType: uvtldtrsResponseStatus :: Lens' UpdateVTLDeviceTypeResponse Int
- Network.AWS.StorageGateway.UpdateVTLDeviceType: uvtldtrsVTLDeviceARN :: Lens' UpdateVTLDeviceTypeResponse (Maybe Text)
+ Amazonka.StorageGateway: ActivateGateway' :: Maybe Text -> Maybe Text -> Maybe [Tag] -> Maybe Text -> Text -> Text -> Text -> Text -> ActivateGateway
+ Amazonka.StorageGateway: ActivateGatewayResponse' :: Maybe Text -> Int -> ActivateGatewayResponse
+ Amazonka.StorageGateway: ActiveDirectoryStatus' :: Text -> ActiveDirectoryStatus
+ Amazonka.StorageGateway: AddCache' :: Text -> [Text] -> AddCache
+ Amazonka.StorageGateway: AddCacheResponse' :: Maybe Text -> Int -> AddCacheResponse
+ Amazonka.StorageGateway: AddTagsToResource' :: Text -> [Tag] -> AddTagsToResource
+ Amazonka.StorageGateway: AddTagsToResourceResponse' :: Maybe Text -> Int -> AddTagsToResourceResponse
+ Amazonka.StorageGateway: AddUploadBuffer' :: Text -> [Text] -> AddUploadBuffer
+ Amazonka.StorageGateway: AddUploadBufferResponse' :: Maybe Text -> Int -> AddUploadBufferResponse
+ Amazonka.StorageGateway: AddWorkingStorage' :: Text -> [Text] -> AddWorkingStorage
+ Amazonka.StorageGateway: AddWorkingStorageResponse' :: Maybe Text -> Int -> AddWorkingStorageResponse
+ Amazonka.StorageGateway: AssignTapePool' :: Maybe Bool -> Text -> Text -> AssignTapePool
+ Amazonka.StorageGateway: AssignTapePoolResponse' :: Maybe Text -> Int -> AssignTapePoolResponse
+ Amazonka.StorageGateway: AssociateFileSystem' :: Maybe Text -> Maybe CacheAttributes -> Maybe EndpointNetworkConfiguration -> Maybe [Tag] -> Text -> Sensitive Text -> Text -> Text -> Text -> AssociateFileSystem
+ Amazonka.StorageGateway: AssociateFileSystemResponse' :: Maybe Text -> Int -> AssociateFileSystemResponse
+ Amazonka.StorageGateway: AttachVolume' :: Maybe Text -> Maybe Text -> Text -> Text -> Text -> AttachVolume
+ Amazonka.StorageGateway: AttachVolumeResponse' :: Maybe Text -> Maybe Text -> Int -> AttachVolumeResponse
+ Amazonka.StorageGateway: AutomaticTapeCreationPolicyInfo' :: Maybe (NonEmpty AutomaticTapeCreationRule) -> Maybe Text -> AutomaticTapeCreationPolicyInfo
+ Amazonka.StorageGateway: AutomaticTapeCreationRule' :: Maybe Bool -> Text -> Text -> Integer -> Natural -> AutomaticTapeCreationRule
+ Amazonka.StorageGateway: AvailabilityMonitorTestStatus' :: Text -> AvailabilityMonitorTestStatus
+ Amazonka.StorageGateway: BandwidthRateLimitInterval' :: Maybe Natural -> Maybe Natural -> Natural -> Natural -> Natural -> Natural -> NonEmpty Natural -> BandwidthRateLimitInterval
+ Amazonka.StorageGateway: CacheAttributes' :: Maybe Int -> CacheAttributes
+ Amazonka.StorageGateway: CachediSCSIVolume' :: Maybe POSIX -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Double -> Maybe Integer -> Maybe Text -> Maybe Text -> Maybe Integer -> Maybe VolumeiSCSIAttributes -> CachediSCSIVolume
+ Amazonka.StorageGateway: CancelArchival' :: Text -> Text -> CancelArchival
+ Amazonka.StorageGateway: CancelArchivalResponse' :: Maybe Text -> Int -> CancelArchivalResponse
+ Amazonka.StorageGateway: CancelRetrieval' :: Text -> Text -> CancelRetrieval
+ Amazonka.StorageGateway: CancelRetrievalResponse' :: Maybe Text -> Int -> CancelRetrievalResponse
+ Amazonka.StorageGateway: CaseSensitivity' :: Text -> CaseSensitivity
+ Amazonka.StorageGateway: ChapInfo' :: Maybe Text -> Maybe (Sensitive Text) -> Maybe (Sensitive Text) -> Maybe Text -> ChapInfo
+ Amazonka.StorageGateway: CreateCachediSCSIVolume' :: Maybe Bool -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe [Tag] -> Text -> Integer -> Text -> Text -> Text -> CreateCachediSCSIVolume
+ Amazonka.StorageGateway: CreateCachediSCSIVolumeResponse' :: Maybe Text -> Maybe Text -> Int -> CreateCachediSCSIVolumeResponse
+ Amazonka.StorageGateway: CreateNFSFileShare' :: Maybe Text -> Maybe Text -> Maybe CacheAttributes -> Maybe (NonEmpty Text) -> Maybe Text -> Maybe Text -> Maybe Bool -> Maybe Bool -> Maybe Text -> Maybe NFSFileShareDefaults -> Maybe Text -> Maybe ObjectACL -> Maybe Bool -> Maybe Bool -> Maybe Text -> Maybe [Tag] -> Maybe Text -> Text -> Text -> Text -> Text -> CreateNFSFileShare
+ Amazonka.StorageGateway: CreateNFSFileShareResponse' :: Maybe Text -> Int -> CreateNFSFileShareResponse
+ Amazonka.StorageGateway: CreateSMBFileShare' :: Maybe Bool -> Maybe [Text] -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe CacheAttributes -> Maybe CaseSensitivity -> Maybe Text -> Maybe Text -> Maybe Bool -> Maybe [Text] -> Maybe Bool -> Maybe Text -> Maybe Text -> Maybe ObjectACL -> Maybe Bool -> Maybe Bool -> Maybe Bool -> Maybe Bool -> Maybe [Tag] -> Maybe Text -> Maybe [Text] -> Text -> Text -> Text -> Text -> CreateSMBFileShare
+ Amazonka.StorageGateway: CreateSMBFileShareResponse' :: Maybe Text -> Int -> CreateSMBFileShareResponse
+ Amazonka.StorageGateway: CreateSnapshot' :: Maybe [Tag] -> Text -> Text -> CreateSnapshot
+ Amazonka.StorageGateway: CreateSnapshotFromVolumeRecoveryPoint' :: Maybe [Tag] -> Text -> Text -> CreateSnapshotFromVolumeRecoveryPoint
+ Amazonka.StorageGateway: CreateSnapshotFromVolumeRecoveryPointResponse' :: Maybe Text -> Maybe Text -> Maybe Text -> Int -> CreateSnapshotFromVolumeRecoveryPointResponse
+ Amazonka.StorageGateway: CreateSnapshotResponse' :: Maybe Text -> Maybe Text -> Int -> CreateSnapshotResponse
+ Amazonka.StorageGateway: CreateStorediSCSIVolume' :: Maybe Bool -> Maybe Text -> Maybe Text -> Maybe [Tag] -> Text -> Text -> Bool -> Text -> Text -> CreateStorediSCSIVolume
+ Amazonka.StorageGateway: CreateStorediSCSIVolumeResponse' :: Maybe Text -> Maybe Text -> Maybe Integer -> Int -> CreateStorediSCSIVolumeResponse
+ Amazonka.StorageGateway: CreateTapePool' :: Maybe Natural -> Maybe RetentionLockType -> Maybe [Tag] -> Text -> TapeStorageClass -> CreateTapePool
+ Amazonka.StorageGateway: CreateTapePoolResponse' :: Maybe Text -> Int -> CreateTapePoolResponse
+ Amazonka.StorageGateway: CreateTapeWithBarcode' :: Maybe Bool -> Maybe Text -> Maybe Text -> Maybe [Tag] -> Maybe Bool -> Text -> Integer -> Text -> CreateTapeWithBarcode
+ Amazonka.StorageGateway: CreateTapeWithBarcodeResponse' :: Maybe Text -> Int -> CreateTapeWithBarcodeResponse
+ Amazonka.StorageGateway: CreateTapes' :: Maybe Bool -> Maybe Text -> Maybe Text -> Maybe [Tag] -> Maybe Bool -> Text -> Integer -> Text -> Natural -> Text -> CreateTapes
+ Amazonka.StorageGateway: CreateTapesResponse' :: Maybe [Text] -> Int -> CreateTapesResponse
+ Amazonka.StorageGateway: DeleteAutomaticTapeCreationPolicy' :: Text -> DeleteAutomaticTapeCreationPolicy
+ Amazonka.StorageGateway: DeleteAutomaticTapeCreationPolicyResponse' :: Maybe Text -> Int -> DeleteAutomaticTapeCreationPolicyResponse
+ Amazonka.StorageGateway: DeleteBandwidthRateLimit' :: Text -> Text -> DeleteBandwidthRateLimit
+ Amazonka.StorageGateway: DeleteBandwidthRateLimitResponse' :: Maybe Text -> Int -> DeleteBandwidthRateLimitResponse
+ Amazonka.StorageGateway: DeleteChapCredentials' :: Text -> Text -> DeleteChapCredentials
+ Amazonka.StorageGateway: DeleteChapCredentialsResponse' :: Maybe Text -> Maybe Text -> Int -> DeleteChapCredentialsResponse
+ Amazonka.StorageGateway: DeleteFileShare' :: Maybe Bool -> Text -> DeleteFileShare
+ Amazonka.StorageGateway: DeleteFileShareResponse' :: Maybe Text -> Int -> DeleteFileShareResponse
+ Amazonka.StorageGateway: DeleteGateway' :: Text -> DeleteGateway
+ Amazonka.StorageGateway: DeleteGatewayResponse' :: Maybe Text -> Int -> DeleteGatewayResponse
+ Amazonka.StorageGateway: DeleteSnapshotSchedule' :: Text -> DeleteSnapshotSchedule
+ Amazonka.StorageGateway: DeleteSnapshotScheduleResponse' :: Maybe Text -> Int -> DeleteSnapshotScheduleResponse
+ Amazonka.StorageGateway: DeleteTape' :: Maybe Bool -> Text -> Text -> DeleteTape
+ Amazonka.StorageGateway: DeleteTapeArchive' :: Maybe Bool -> Text -> DeleteTapeArchive
+ Amazonka.StorageGateway: DeleteTapeArchiveResponse' :: Maybe Text -> Int -> DeleteTapeArchiveResponse
+ Amazonka.StorageGateway: DeleteTapePool' :: Text -> DeleteTapePool
+ Amazonka.StorageGateway: DeleteTapePoolResponse' :: Maybe Text -> Int -> DeleteTapePoolResponse
+ Amazonka.StorageGateway: DeleteTapeResponse' :: Maybe Text -> Int -> DeleteTapeResponse
+ Amazonka.StorageGateway: DeleteVolume' :: Text -> DeleteVolume
+ Amazonka.StorageGateway: DeleteVolumeResponse' :: Maybe Text -> Int -> DeleteVolumeResponse
+ Amazonka.StorageGateway: DescribeAvailabilityMonitorTest' :: Text -> DescribeAvailabilityMonitorTest
+ Amazonka.StorageGateway: DescribeAvailabilityMonitorTestResponse' :: Maybe Text -> Maybe POSIX -> Maybe AvailabilityMonitorTestStatus -> Int -> DescribeAvailabilityMonitorTestResponse
+ Amazonka.StorageGateway: DescribeBandwidthRateLimit' :: Text -> DescribeBandwidthRateLimit
+ Amazonka.StorageGateway: DescribeBandwidthRateLimitResponse' :: Maybe Natural -> Maybe Natural -> Maybe Text -> Int -> DescribeBandwidthRateLimitResponse
+ Amazonka.StorageGateway: DescribeBandwidthRateLimitSchedule' :: Text -> DescribeBandwidthRateLimitSchedule
+ Amazonka.StorageGateway: DescribeBandwidthRateLimitScheduleResponse' :: Maybe [BandwidthRateLimitInterval] -> Maybe Text -> Int -> DescribeBandwidthRateLimitScheduleResponse
+ Amazonka.StorageGateway: DescribeCache' :: Text -> DescribeCache
+ Amazonka.StorageGateway: DescribeCacheResponse' :: Maybe Integer -> Maybe Double -> Maybe Double -> Maybe Double -> Maybe Double -> Maybe [Text] -> Maybe Text -> Int -> DescribeCacheResponse
+ Amazonka.StorageGateway: DescribeCachediSCSIVolumes' :: [Text] -> DescribeCachediSCSIVolumes
+ Amazonka.StorageGateway: DescribeCachediSCSIVolumesResponse' :: Maybe [CachediSCSIVolume] -> Int -> DescribeCachediSCSIVolumesResponse
+ Amazonka.StorageGateway: DescribeChapCredentials' :: Text -> DescribeChapCredentials
+ Amazonka.StorageGateway: DescribeChapCredentialsResponse' :: Maybe [ChapInfo] -> Int -> DescribeChapCredentialsResponse
+ Amazonka.StorageGateway: DescribeFileSystemAssociations' :: NonEmpty Text -> DescribeFileSystemAssociations
+ Amazonka.StorageGateway: DescribeFileSystemAssociationsResponse' :: Maybe [FileSystemAssociationInfo] -> Int -> DescribeFileSystemAssociationsResponse
+ Amazonka.StorageGateway: DescribeGatewayInformation' :: Text -> DescribeGatewayInformation
+ Amazonka.StorageGateway: DescribeGatewayInformationResponse' :: Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe GatewayCapacity -> Maybe Text -> Maybe Text -> Maybe [NetworkInterface] -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe HostEnvironment -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe [GatewayCapacity] -> Maybe [Tag] -> Maybe Text -> Int -> DescribeGatewayInformationResponse
+ Amazonka.StorageGateway: DescribeMaintenanceStartTime' :: Text -> DescribeMaintenanceStartTime
+ Amazonka.StorageGateway: DescribeMaintenanceStartTimeResponse' :: Maybe Natural -> Maybe Natural -> Maybe Text -> Maybe Natural -> Maybe Natural -> Maybe Text -> Int -> DescribeMaintenanceStartTimeResponse
+ Amazonka.StorageGateway: DescribeNFSFileShares' :: NonEmpty Text -> DescribeNFSFileShares
+ Amazonka.StorageGateway: DescribeNFSFileSharesResponse' :: Maybe [NFSFileShareInfo] -> Int -> DescribeNFSFileSharesResponse
+ Amazonka.StorageGateway: DescribeSMBFileShares' :: NonEmpty Text -> DescribeSMBFileShares
+ Amazonka.StorageGateway: DescribeSMBFileSharesResponse' :: Maybe [SMBFileShareInfo] -> Int -> DescribeSMBFileSharesResponse
+ Amazonka.StorageGateway: DescribeSMBSettings' :: Text -> DescribeSMBSettings
+ Amazonka.StorageGateway: DescribeSMBSettingsResponse' :: Maybe ActiveDirectoryStatus -> Maybe Text -> Maybe Bool -> Maybe Text -> Maybe Bool -> Maybe SMBLocalGroups -> Maybe SMBSecurityStrategy -> Int -> DescribeSMBSettingsResponse
+ Amazonka.StorageGateway: DescribeSnapshotSchedule' :: Text -> DescribeSnapshotSchedule
+ Amazonka.StorageGateway: DescribeSnapshotScheduleResponse' :: Maybe Text -> Maybe Natural -> Maybe Natural -> Maybe [Tag] -> Maybe Text -> Maybe Text -> Int -> DescribeSnapshotScheduleResponse
+ Amazonka.StorageGateway: DescribeStorediSCSIVolumes' :: [Text] -> DescribeStorediSCSIVolumes
+ Amazonka.StorageGateway: DescribeStorediSCSIVolumesResponse' :: Maybe [StorediSCSIVolume] -> Int -> DescribeStorediSCSIVolumesResponse
+ Amazonka.StorageGateway: DescribeTapeArchives' :: Maybe Natural -> Maybe Text -> Maybe [Text] -> DescribeTapeArchives
+ Amazonka.StorageGateway: DescribeTapeArchivesResponse' :: Maybe Text -> Maybe [TapeArchive] -> Int -> DescribeTapeArchivesResponse
+ Amazonka.StorageGateway: DescribeTapeRecoveryPoints' :: Maybe Natural -> Maybe Text -> Text -> DescribeTapeRecoveryPoints
+ Amazonka.StorageGateway: DescribeTapeRecoveryPointsResponse' :: Maybe Text -> Maybe Text -> Maybe [TapeRecoveryPointInfo] -> Int -> DescribeTapeRecoveryPointsResponse
+ Amazonka.StorageGateway: DescribeTapes' :: Maybe Natural -> Maybe Text -> Maybe [Text] -> Text -> DescribeTapes
+ Amazonka.StorageGateway: DescribeTapesResponse' :: Maybe Text -> Maybe [Tape] -> Int -> DescribeTapesResponse
+ Amazonka.StorageGateway: DescribeUploadBuffer' :: Text -> DescribeUploadBuffer
+ Amazonka.StorageGateway: DescribeUploadBufferResponse' :: Maybe [Text] -> Maybe Text -> Maybe Integer -> Maybe Integer -> Int -> DescribeUploadBufferResponse
+ Amazonka.StorageGateway: DescribeVTLDevices' :: Maybe Natural -> Maybe Text -> Maybe [Text] -> Text -> DescribeVTLDevices
+ Amazonka.StorageGateway: DescribeVTLDevicesResponse' :: Maybe Text -> Maybe Text -> Maybe [VTLDevice] -> Int -> DescribeVTLDevicesResponse
+ Amazonka.StorageGateway: DescribeWorkingStorage' :: Text -> DescribeWorkingStorage
+ Amazonka.StorageGateway: DescribeWorkingStorageResponse' :: Maybe [Text] -> Maybe Text -> Maybe Integer -> Maybe Integer -> Int -> DescribeWorkingStorageResponse
+ Amazonka.StorageGateway: DetachVolume' :: Maybe Bool -> Text -> DetachVolume
+ Amazonka.StorageGateway: DetachVolumeResponse' :: Maybe Text -> Int -> DetachVolumeResponse
+ Amazonka.StorageGateway: DeviceiSCSIAttributes' :: Maybe Bool -> Maybe Text -> Maybe Int -> Maybe Text -> DeviceiSCSIAttributes
+ Amazonka.StorageGateway: DisableGateway' :: Text -> DisableGateway
+ Amazonka.StorageGateway: DisableGatewayResponse' :: Maybe Text -> Int -> DisableGatewayResponse
+ Amazonka.StorageGateway: DisassociateFileSystem' :: Maybe Bool -> Text -> DisassociateFileSystem
+ Amazonka.StorageGateway: DisassociateFileSystemResponse' :: Maybe Text -> Int -> DisassociateFileSystemResponse
+ Amazonka.StorageGateway: Disk' :: Maybe Text -> Maybe Text -> Maybe [Text] -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Integer -> Maybe Text -> Disk
+ Amazonka.StorageGateway: EndpointNetworkConfiguration' :: Maybe [Text] -> EndpointNetworkConfiguration
+ Amazonka.StorageGateway: FileShareInfo' :: Maybe Text -> Maybe Text -> Maybe Text -> Maybe FileShareType -> Maybe Text -> FileShareInfo
+ Amazonka.StorageGateway: FileShareType' :: Text -> FileShareType
+ Amazonka.StorageGateway: FileSystemAssociationInfo' :: Maybe Text -> Maybe CacheAttributes -> Maybe EndpointNetworkConfiguration -> Maybe Text -> Maybe Text -> Maybe [FileSystemAssociationStatusDetail] -> Maybe Text -> Maybe Text -> Maybe [Tag] -> FileSystemAssociationInfo
+ Amazonka.StorageGateway: FileSystemAssociationStatusDetail' :: Maybe Text -> FileSystemAssociationStatusDetail
+ Amazonka.StorageGateway: FileSystemAssociationSummary' :: Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> FileSystemAssociationSummary
+ Amazonka.StorageGateway: GatewayCapacity' :: Text -> GatewayCapacity
+ Amazonka.StorageGateway: GatewayInfo' :: Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe HostEnvironment -> Maybe Text -> GatewayInfo
+ Amazonka.StorageGateway: HostEnvironment' :: Text -> HostEnvironment
+ Amazonka.StorageGateway: JoinDomain' :: Maybe [Text] -> Maybe Text -> Maybe Natural -> Text -> Text -> Text -> Sensitive Text -> JoinDomain
+ Amazonka.StorageGateway: JoinDomainResponse' :: Maybe ActiveDirectoryStatus -> Maybe Text -> Int -> JoinDomainResponse
+ Amazonka.StorageGateway: ListAutomaticTapeCreationPolicies' :: Maybe Text -> ListAutomaticTapeCreationPolicies
+ Amazonka.StorageGateway: ListAutomaticTapeCreationPoliciesResponse' :: Maybe [AutomaticTapeCreationPolicyInfo] -> Int -> ListAutomaticTapeCreationPoliciesResponse
+ Amazonka.StorageGateway: ListFileShares' :: Maybe Text -> Maybe Natural -> Maybe Text -> ListFileShares
+ Amazonka.StorageGateway: ListFileSharesResponse' :: Maybe [FileShareInfo] -> Maybe Text -> Maybe Text -> Int -> ListFileSharesResponse
+ Amazonka.StorageGateway: ListFileSystemAssociations' :: Maybe Text -> Maybe Natural -> Maybe Text -> ListFileSystemAssociations
+ Amazonka.StorageGateway: ListFileSystemAssociationsResponse' :: Maybe [FileSystemAssociationSummary] -> Maybe Text -> Maybe Text -> Int -> ListFileSystemAssociationsResponse
+ Amazonka.StorageGateway: ListGateways' :: Maybe Natural -> Maybe Text -> ListGateways
+ Amazonka.StorageGateway: ListGatewaysResponse' :: Maybe [GatewayInfo] -> Maybe Text -> Int -> ListGatewaysResponse
+ Amazonka.StorageGateway: ListLocalDisks' :: Text -> ListLocalDisks
+ Amazonka.StorageGateway: ListLocalDisksResponse' :: Maybe [Disk] -> Maybe Text -> Int -> ListLocalDisksResponse
+ Amazonka.StorageGateway: ListTagsForResource' :: Maybe Natural -> Maybe Text -> Text -> ListTagsForResource
+ Amazonka.StorageGateway: ListTagsForResourceResponse' :: Maybe Text -> Maybe Text -> Maybe [Tag] -> Int -> ListTagsForResourceResponse
+ Amazonka.StorageGateway: ListTapePools' :: Maybe Natural -> Maybe Text -> Maybe [Text] -> ListTapePools
+ Amazonka.StorageGateway: ListTapePoolsResponse' :: Maybe Text -> Maybe [PoolInfo] -> Int -> ListTapePoolsResponse
+ Amazonka.StorageGateway: ListTapes' :: Maybe Natural -> Maybe Text -> Maybe [Text] -> ListTapes
+ Amazonka.StorageGateway: ListTapesResponse' :: Maybe Text -> Maybe [TapeInfo] -> Int -> ListTapesResponse
+ Amazonka.StorageGateway: ListVolumeInitiators' :: Text -> ListVolumeInitiators
+ Amazonka.StorageGateway: ListVolumeInitiatorsResponse' :: Maybe [Text] -> Int -> ListVolumeInitiatorsResponse
+ Amazonka.StorageGateway: ListVolumeRecoveryPoints' :: Text -> ListVolumeRecoveryPoints
+ Amazonka.StorageGateway: ListVolumeRecoveryPointsResponse' :: Maybe Text -> Maybe [VolumeRecoveryPointInfo] -> Int -> ListVolumeRecoveryPointsResponse
+ Amazonka.StorageGateway: ListVolumes' :: Maybe Text -> Maybe Natural -> Maybe Text -> ListVolumes
+ Amazonka.StorageGateway: ListVolumesResponse' :: Maybe Text -> Maybe Text -> Maybe [VolumeInfo] -> Int -> ListVolumesResponse
+ Amazonka.StorageGateway: NFSFileShareDefaults' :: Maybe Text -> Maybe Text -> Maybe Natural -> Maybe Natural -> NFSFileShareDefaults
+ Amazonka.StorageGateway: NFSFileShareInfo' :: Maybe Text -> Maybe Text -> Maybe CacheAttributes -> Maybe (NonEmpty Text) -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Bool -> Maybe Bool -> Maybe Text -> Maybe Text -> Maybe NFSFileShareDefaults -> Maybe Text -> Maybe ObjectACL -> Maybe Text -> Maybe Bool -> Maybe Bool -> Maybe Text -> Maybe Text -> Maybe [Tag] -> Maybe Text -> NFSFileShareInfo
+ Amazonka.StorageGateway: NetworkInterface' :: Maybe Text -> Maybe Text -> Maybe Text -> NetworkInterface
+ Amazonka.StorageGateway: NotifyWhenUploaded' :: Text -> NotifyWhenUploaded
+ Amazonka.StorageGateway: NotifyWhenUploadedResponse' :: Maybe Text -> Maybe Text -> Int -> NotifyWhenUploadedResponse
+ Amazonka.StorageGateway: ObjectACL' :: Text -> ObjectACL
+ Amazonka.StorageGateway: PoolInfo' :: Maybe Text -> Maybe Text -> Maybe PoolStatus -> Maybe Natural -> Maybe RetentionLockType -> Maybe TapeStorageClass -> PoolInfo
+ Amazonka.StorageGateway: PoolStatus' :: Text -> PoolStatus
+ Amazonka.StorageGateway: RefreshCache' :: Maybe (NonEmpty Text) -> Maybe Bool -> Text -> RefreshCache
+ Amazonka.StorageGateway: RefreshCacheResponse' :: Maybe Text -> Maybe Text -> Int -> RefreshCacheResponse
+ Amazonka.StorageGateway: RemoveTagsFromResource' :: Text -> [Text] -> RemoveTagsFromResource
+ Amazonka.StorageGateway: RemoveTagsFromResourceResponse' :: Maybe Text -> Int -> RemoveTagsFromResourceResponse
+ Amazonka.StorageGateway: ResetCache' :: Text -> ResetCache
+ Amazonka.StorageGateway: ResetCacheResponse' :: Maybe Text -> Int -> ResetCacheResponse
+ Amazonka.StorageGateway: RetentionLockType' :: Text -> RetentionLockType
+ Amazonka.StorageGateway: RetrieveTapeArchive' :: Text -> Text -> RetrieveTapeArchive
+ Amazonka.StorageGateway: RetrieveTapeArchiveResponse' :: Maybe Text -> Int -> RetrieveTapeArchiveResponse
+ Amazonka.StorageGateway: RetrieveTapeRecoveryPoint' :: Text -> Text -> RetrieveTapeRecoveryPoint
+ Amazonka.StorageGateway: RetrieveTapeRecoveryPointResponse' :: Maybe Text -> Int -> RetrieveTapeRecoveryPointResponse
+ Amazonka.StorageGateway: SMBFileShareInfo' :: Maybe Bool -> Maybe [Text] -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe CacheAttributes -> Maybe CaseSensitivity -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Bool -> Maybe [Text] -> Maybe Bool -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe ObjectACL -> Maybe Bool -> Maybe Text -> Maybe Bool -> Maybe Bool -> Maybe Text -> Maybe Bool -> Maybe [Tag] -> Maybe Text -> Maybe [Text] -> SMBFileShareInfo
+ Amazonka.StorageGateway: SMBLocalGroups' :: Maybe [Text] -> SMBLocalGroups
+ Amazonka.StorageGateway: SMBSecurityStrategy' :: Text -> SMBSecurityStrategy
+ Amazonka.StorageGateway: SetLocalConsolePassword' :: Text -> Sensitive Text -> SetLocalConsolePassword
+ Amazonka.StorageGateway: SetLocalConsolePasswordResponse' :: Maybe Text -> Int -> SetLocalConsolePasswordResponse
+ Amazonka.StorageGateway: SetSMBGuestPassword' :: Text -> Sensitive Text -> SetSMBGuestPassword
+ Amazonka.StorageGateway: SetSMBGuestPasswordResponse' :: Maybe Text -> Int -> SetSMBGuestPasswordResponse
+ Amazonka.StorageGateway: ShutdownGateway' :: Text -> ShutdownGateway
+ Amazonka.StorageGateway: ShutdownGatewayResponse' :: Maybe Text -> Int -> ShutdownGatewayResponse
+ Amazonka.StorageGateway: StartAvailabilityMonitorTest' :: Text -> StartAvailabilityMonitorTest
+ Amazonka.StorageGateway: StartAvailabilityMonitorTestResponse' :: Maybe Text -> Int -> StartAvailabilityMonitorTestResponse
+ Amazonka.StorageGateway: StartGateway' :: Text -> StartGateway
+ Amazonka.StorageGateway: StartGatewayResponse' :: Maybe Text -> Int -> StartGatewayResponse
+ Amazonka.StorageGateway: StorediSCSIVolume' :: Maybe POSIX -> Maybe Text -> Maybe Bool -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Double -> Maybe Integer -> Maybe Text -> Maybe Text -> Maybe Integer -> Maybe VolumeiSCSIAttributes -> StorediSCSIVolume
+ Amazonka.StorageGateway: Tag' :: Text -> Text -> Tag
+ Amazonka.StorageGateway: Tape' :: Maybe Text -> Maybe POSIX -> Maybe Text -> Maybe Double -> Maybe POSIX -> Maybe Text -> Maybe Text -> Maybe POSIX -> Maybe Integer -> Maybe Text -> Maybe Integer -> Maybe Text -> Maybe Bool -> Tape
+ Amazonka.StorageGateway: TapeArchive' :: Maybe POSIX -> Maybe Text -> Maybe POSIX -> Maybe Text -> Maybe POSIX -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe POSIX -> Maybe Integer -> Maybe Text -> Maybe Integer -> Maybe Bool -> TapeArchive
+ Amazonka.StorageGateway: TapeInfo' :: Maybe Text -> Maybe POSIX -> Maybe Text -> Maybe POSIX -> Maybe Text -> Maybe Text -> Maybe Integer -> Maybe Text -> TapeInfo
+ Amazonka.StorageGateway: TapeRecoveryPointInfo' :: Maybe Text -> Maybe POSIX -> Maybe Integer -> Maybe Text -> TapeRecoveryPointInfo
+ Amazonka.StorageGateway: TapeStorageClass' :: Text -> TapeStorageClass
+ Amazonka.StorageGateway: UpdateAutomaticTapeCreationPolicy' :: NonEmpty AutomaticTapeCreationRule -> Text -> UpdateAutomaticTapeCreationPolicy
+ Amazonka.StorageGateway: UpdateAutomaticTapeCreationPolicyResponse' :: Maybe Text -> Int -> UpdateAutomaticTapeCreationPolicyResponse
+ Amazonka.StorageGateway: UpdateBandwidthRateLimit' :: Maybe Natural -> Maybe Natural -> Text -> UpdateBandwidthRateLimit
+ Amazonka.StorageGateway: UpdateBandwidthRateLimitResponse' :: Maybe Text -> Int -> UpdateBandwidthRateLimitResponse
+ Amazonka.StorageGateway: UpdateBandwidthRateLimitSchedule' :: Text -> [BandwidthRateLimitInterval] -> UpdateBandwidthRateLimitSchedule
+ Amazonka.StorageGateway: UpdateBandwidthRateLimitScheduleResponse' :: Maybe Text -> Int -> UpdateBandwidthRateLimitScheduleResponse
+ Amazonka.StorageGateway: UpdateChapCredentials' :: Maybe (Sensitive Text) -> Text -> Sensitive Text -> Text -> UpdateChapCredentials
+ Amazonka.StorageGateway: UpdateChapCredentialsResponse' :: Maybe Text -> Maybe Text -> Int -> UpdateChapCredentialsResponse
+ Amazonka.StorageGateway: UpdateFileSystemAssociation' :: Maybe Text -> Maybe CacheAttributes -> Maybe (Sensitive Text) -> Maybe Text -> Text -> UpdateFileSystemAssociation
+ Amazonka.StorageGateway: UpdateFileSystemAssociationResponse' :: Maybe Text -> Int -> UpdateFileSystemAssociationResponse
+ Amazonka.StorageGateway: UpdateGatewayInformation' :: Maybe Text -> Maybe GatewayCapacity -> Maybe Text -> Maybe Text -> Text -> UpdateGatewayInformation
+ Amazonka.StorageGateway: UpdateGatewayInformationResponse' :: Maybe Text -> Maybe Text -> Int -> UpdateGatewayInformationResponse
+ Amazonka.StorageGateway: UpdateGatewaySoftwareNow' :: Text -> UpdateGatewaySoftwareNow
+ Amazonka.StorageGateway: UpdateGatewaySoftwareNowResponse' :: Maybe Text -> Int -> UpdateGatewaySoftwareNowResponse
+ Amazonka.StorageGateway: UpdateMaintenanceStartTime' :: Maybe Natural -> Maybe Natural -> Text -> Natural -> Natural -> UpdateMaintenanceStartTime
+ Amazonka.StorageGateway: UpdateMaintenanceStartTimeResponse' :: Maybe Text -> Int -> UpdateMaintenanceStartTimeResponse
+ Amazonka.StorageGateway: UpdateNFSFileShare' :: Maybe Text -> Maybe CacheAttributes -> Maybe (NonEmpty Text) -> Maybe Text -> Maybe Text -> Maybe Bool -> Maybe Bool -> Maybe Text -> Maybe NFSFileShareDefaults -> Maybe Text -> Maybe ObjectACL -> Maybe Bool -> Maybe Bool -> Maybe Text -> Text -> UpdateNFSFileShare
+ Amazonka.StorageGateway: UpdateNFSFileShareResponse' :: Maybe Text -> Int -> UpdateNFSFileShareResponse
+ Amazonka.StorageGateway: UpdateSMBFileShare' :: Maybe Bool -> Maybe [Text] -> Maybe Text -> Maybe CacheAttributes -> Maybe CaseSensitivity -> Maybe Text -> Maybe Text -> Maybe Bool -> Maybe [Text] -> Maybe Bool -> Maybe Text -> Maybe Text -> Maybe ObjectACL -> Maybe Bool -> Maybe Bool -> Maybe Bool -> Maybe Bool -> Maybe [Text] -> Text -> UpdateSMBFileShare
+ Amazonka.StorageGateway: UpdateSMBFileShareResponse' :: Maybe Text -> Int -> UpdateSMBFileShareResponse
+ Amazonka.StorageGateway: UpdateSMBFileShareVisibility' :: Text -> Bool -> UpdateSMBFileShareVisibility
+ Amazonka.StorageGateway: UpdateSMBFileShareVisibilityResponse' :: Maybe Text -> Int -> UpdateSMBFileShareVisibilityResponse
+ Amazonka.StorageGateway: UpdateSMBLocalGroups' :: Text -> SMBLocalGroups -> UpdateSMBLocalGroups
+ Amazonka.StorageGateway: UpdateSMBLocalGroupsResponse' :: Maybe Text -> Int -> UpdateSMBLocalGroupsResponse
+ Amazonka.StorageGateway: UpdateSMBSecurityStrategy' :: Text -> SMBSecurityStrategy -> UpdateSMBSecurityStrategy
+ Amazonka.StorageGateway: UpdateSMBSecurityStrategyResponse' :: Maybe Text -> Int -> UpdateSMBSecurityStrategyResponse
+ Amazonka.StorageGateway: UpdateSnapshotSchedule' :: Maybe Text -> Maybe [Tag] -> Text -> Natural -> Natural -> UpdateSnapshotSchedule
+ Amazonka.StorageGateway: UpdateSnapshotScheduleResponse' :: Maybe Text -> Int -> UpdateSnapshotScheduleResponse
+ Amazonka.StorageGateway: UpdateVTLDeviceType' :: Text -> Text -> UpdateVTLDeviceType
+ Amazonka.StorageGateway: UpdateVTLDeviceTypeResponse' :: Maybe Text -> Int -> UpdateVTLDeviceTypeResponse
+ Amazonka.StorageGateway: VTLDevice' :: Maybe DeviceiSCSIAttributes -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> VTLDevice
+ Amazonka.StorageGateway: VolumeInfo' :: Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Integer -> Maybe Text -> VolumeInfo
+ Amazonka.StorageGateway: VolumeRecoveryPointInfo' :: Maybe Text -> Maybe Text -> Maybe Integer -> Maybe Integer -> VolumeRecoveryPointInfo
+ Amazonka.StorageGateway: VolumeiSCSIAttributes' :: Maybe Bool -> Maybe Natural -> Maybe Text -> Maybe Int -> Maybe Text -> VolumeiSCSIAttributes
+ Amazonka.StorageGateway: [fromActiveDirectoryStatus] :: ActiveDirectoryStatus -> Text
+ Amazonka.StorageGateway: [fromAvailabilityMonitorTestStatus] :: AvailabilityMonitorTestStatus -> Text
+ Amazonka.StorageGateway: [fromCaseSensitivity] :: CaseSensitivity -> Text
+ Amazonka.StorageGateway: [fromFileShareType] :: FileShareType -> Text
+ Amazonka.StorageGateway: [fromGatewayCapacity] :: GatewayCapacity -> Text
+ Amazonka.StorageGateway: [fromHostEnvironment] :: HostEnvironment -> Text
+ Amazonka.StorageGateway: [fromObjectACL] :: ObjectACL -> Text
+ Amazonka.StorageGateway: [fromPoolStatus] :: PoolStatus -> Text
+ Amazonka.StorageGateway: [fromRetentionLockType] :: RetentionLockType -> Text
+ Amazonka.StorageGateway: [fromSMBSecurityStrategy] :: SMBSecurityStrategy -> Text
+ Amazonka.StorageGateway: [fromTapeStorageClass] :: TapeStorageClass -> Text
+ Amazonka.StorageGateway: _InternalServerError :: AsError a => Fold a ServiceError
+ Amazonka.StorageGateway: _InvalidGatewayRequestException :: AsError a => Fold a ServiceError
+ Amazonka.StorageGateway: _ServiceUnavailableError :: AsError a => Fold a ServiceError
+ Amazonka.StorageGateway: data ActivateGateway
+ Amazonka.StorageGateway: data ActivateGatewayResponse
+ Amazonka.StorageGateway: data AddCache
+ Amazonka.StorageGateway: data AddCacheResponse
+ Amazonka.StorageGateway: data AddTagsToResource
+ Amazonka.StorageGateway: data AddTagsToResourceResponse
+ Amazonka.StorageGateway: data AddUploadBuffer
+ Amazonka.StorageGateway: data AddUploadBufferResponse
+ Amazonka.StorageGateway: data AddWorkingStorage
+ Amazonka.StorageGateway: data AddWorkingStorageResponse
+ Amazonka.StorageGateway: data AssignTapePool
+ Amazonka.StorageGateway: data AssignTapePoolResponse
+ Amazonka.StorageGateway: data AssociateFileSystem
+ Amazonka.StorageGateway: data AssociateFileSystemResponse
+ Amazonka.StorageGateway: data AttachVolume
+ Amazonka.StorageGateway: data AttachVolumeResponse
+ Amazonka.StorageGateway: data AutomaticTapeCreationPolicyInfo
+ Amazonka.StorageGateway: data AutomaticTapeCreationRule
+ Amazonka.StorageGateway: data BandwidthRateLimitInterval
+ Amazonka.StorageGateway: data CacheAttributes
+ Amazonka.StorageGateway: data CachediSCSIVolume
+ Amazonka.StorageGateway: data CancelArchival
+ Amazonka.StorageGateway: data CancelArchivalResponse
+ Amazonka.StorageGateway: data CancelRetrieval
+ Amazonka.StorageGateway: data CancelRetrievalResponse
+ Amazonka.StorageGateway: data ChapInfo
+ Amazonka.StorageGateway: data CreateCachediSCSIVolume
+ Amazonka.StorageGateway: data CreateCachediSCSIVolumeResponse
+ Amazonka.StorageGateway: data CreateNFSFileShare
+ Amazonka.StorageGateway: data CreateNFSFileShareResponse
+ Amazonka.StorageGateway: data CreateSMBFileShare
+ Amazonka.StorageGateway: data CreateSMBFileShareResponse
+ Amazonka.StorageGateway: data CreateSnapshot
+ Amazonka.StorageGateway: data CreateSnapshotFromVolumeRecoveryPoint
+ Amazonka.StorageGateway: data CreateSnapshotFromVolumeRecoveryPointResponse
+ Amazonka.StorageGateway: data CreateSnapshotResponse
+ Amazonka.StorageGateway: data CreateStorediSCSIVolume
+ Amazonka.StorageGateway: data CreateStorediSCSIVolumeResponse
+ Amazonka.StorageGateway: data CreateTapePool
+ Amazonka.StorageGateway: data CreateTapePoolResponse
+ Amazonka.StorageGateway: data CreateTapeWithBarcode
+ Amazonka.StorageGateway: data CreateTapeWithBarcodeResponse
+ Amazonka.StorageGateway: data CreateTapes
+ Amazonka.StorageGateway: data CreateTapesResponse
+ Amazonka.StorageGateway: data DeleteAutomaticTapeCreationPolicy
+ Amazonka.StorageGateway: data DeleteAutomaticTapeCreationPolicyResponse
+ Amazonka.StorageGateway: data DeleteBandwidthRateLimit
+ Amazonka.StorageGateway: data DeleteBandwidthRateLimitResponse
+ Amazonka.StorageGateway: data DeleteChapCredentials
+ Amazonka.StorageGateway: data DeleteChapCredentialsResponse
+ Amazonka.StorageGateway: data DeleteFileShare
+ Amazonka.StorageGateway: data DeleteFileShareResponse
+ Amazonka.StorageGateway: data DeleteGateway
+ Amazonka.StorageGateway: data DeleteGatewayResponse
+ Amazonka.StorageGateway: data DeleteSnapshotSchedule
+ Amazonka.StorageGateway: data DeleteSnapshotScheduleResponse
+ Amazonka.StorageGateway: data DeleteTape
+ Amazonka.StorageGateway: data DeleteTapeArchive
+ Amazonka.StorageGateway: data DeleteTapeArchiveResponse
+ Amazonka.StorageGateway: data DeleteTapePool
+ Amazonka.StorageGateway: data DeleteTapePoolResponse
+ Amazonka.StorageGateway: data DeleteTapeResponse
+ Amazonka.StorageGateway: data DeleteVolume
+ Amazonka.StorageGateway: data DeleteVolumeResponse
+ Amazonka.StorageGateway: data DescribeAvailabilityMonitorTest
+ Amazonka.StorageGateway: data DescribeAvailabilityMonitorTestResponse
+ Amazonka.StorageGateway: data DescribeBandwidthRateLimit
+ Amazonka.StorageGateway: data DescribeBandwidthRateLimitResponse
+ Amazonka.StorageGateway: data DescribeBandwidthRateLimitSchedule
+ Amazonka.StorageGateway: data DescribeBandwidthRateLimitScheduleResponse
+ Amazonka.StorageGateway: data DescribeCache
+ Amazonka.StorageGateway: data DescribeCacheResponse
+ Amazonka.StorageGateway: data DescribeCachediSCSIVolumes
+ Amazonka.StorageGateway: data DescribeCachediSCSIVolumesResponse
+ Amazonka.StorageGateway: data DescribeChapCredentials
+ Amazonka.StorageGateway: data DescribeChapCredentialsResponse
+ Amazonka.StorageGateway: data DescribeFileSystemAssociations
+ Amazonka.StorageGateway: data DescribeFileSystemAssociationsResponse
+ Amazonka.StorageGateway: data DescribeGatewayInformation
+ Amazonka.StorageGateway: data DescribeGatewayInformationResponse
+ Amazonka.StorageGateway: data DescribeMaintenanceStartTime
+ Amazonka.StorageGateway: data DescribeMaintenanceStartTimeResponse
+ Amazonka.StorageGateway: data DescribeNFSFileShares
+ Amazonka.StorageGateway: data DescribeNFSFileSharesResponse
+ Amazonka.StorageGateway: data DescribeSMBFileShares
+ Amazonka.StorageGateway: data DescribeSMBFileSharesResponse
+ Amazonka.StorageGateway: data DescribeSMBSettings
+ Amazonka.StorageGateway: data DescribeSMBSettingsResponse
+ Amazonka.StorageGateway: data DescribeSnapshotSchedule
+ Amazonka.StorageGateway: data DescribeSnapshotScheduleResponse
+ Amazonka.StorageGateway: data DescribeStorediSCSIVolumes
+ Amazonka.StorageGateway: data DescribeStorediSCSIVolumesResponse
+ Amazonka.StorageGateway: data DescribeTapeArchives
+ Amazonka.StorageGateway: data DescribeTapeArchivesResponse
+ Amazonka.StorageGateway: data DescribeTapeRecoveryPoints
+ Amazonka.StorageGateway: data DescribeTapeRecoveryPointsResponse
+ Amazonka.StorageGateway: data DescribeTapes
+ Amazonka.StorageGateway: data DescribeTapesResponse
+ Amazonka.StorageGateway: data DescribeUploadBuffer
+ Amazonka.StorageGateway: data DescribeUploadBufferResponse
+ Amazonka.StorageGateway: data DescribeVTLDevices
+ Amazonka.StorageGateway: data DescribeVTLDevicesResponse
+ Amazonka.StorageGateway: data DescribeWorkingStorage
+ Amazonka.StorageGateway: data DescribeWorkingStorageResponse
+ Amazonka.StorageGateway: data DetachVolume
+ Amazonka.StorageGateway: data DetachVolumeResponse
+ Amazonka.StorageGateway: data DeviceiSCSIAttributes
+ Amazonka.StorageGateway: data DisableGateway
+ Amazonka.StorageGateway: data DisableGatewayResponse
+ Amazonka.StorageGateway: data DisassociateFileSystem
+ Amazonka.StorageGateway: data DisassociateFileSystemResponse
+ Amazonka.StorageGateway: data Disk
+ Amazonka.StorageGateway: data EndpointNetworkConfiguration
+ Amazonka.StorageGateway: data FileShareInfo
+ Amazonka.StorageGateway: data FileSystemAssociationInfo
+ Amazonka.StorageGateway: data FileSystemAssociationStatusDetail
+ Amazonka.StorageGateway: data FileSystemAssociationSummary
+ Amazonka.StorageGateway: data GatewayInfo
+ Amazonka.StorageGateway: data JoinDomain
+ Amazonka.StorageGateway: data JoinDomainResponse
+ Amazonka.StorageGateway: data ListAutomaticTapeCreationPolicies
+ Amazonka.StorageGateway: data ListAutomaticTapeCreationPoliciesResponse
+ Amazonka.StorageGateway: data ListFileShares
+ Amazonka.StorageGateway: data ListFileSharesResponse
+ Amazonka.StorageGateway: data ListFileSystemAssociations
+ Amazonka.StorageGateway: data ListFileSystemAssociationsResponse
+ Amazonka.StorageGateway: data ListGateways
+ Amazonka.StorageGateway: data ListGatewaysResponse
+ Amazonka.StorageGateway: data ListLocalDisks
+ Amazonka.StorageGateway: data ListLocalDisksResponse
+ Amazonka.StorageGateway: data ListTagsForResource
+ Amazonka.StorageGateway: data ListTagsForResourceResponse
+ Amazonka.StorageGateway: data ListTapePools
+ Amazonka.StorageGateway: data ListTapePoolsResponse
+ Amazonka.StorageGateway: data ListTapes
+ Amazonka.StorageGateway: data ListTapesResponse
+ Amazonka.StorageGateway: data ListVolumeInitiators
+ Amazonka.StorageGateway: data ListVolumeInitiatorsResponse
+ Amazonka.StorageGateway: data ListVolumeRecoveryPoints
+ Amazonka.StorageGateway: data ListVolumeRecoveryPointsResponse
+ Amazonka.StorageGateway: data ListVolumes
+ Amazonka.StorageGateway: data ListVolumesResponse
+ Amazonka.StorageGateway: data NFSFileShareDefaults
+ Amazonka.StorageGateway: data NFSFileShareInfo
+ Amazonka.StorageGateway: data NetworkInterface
+ Amazonka.StorageGateway: data NotifyWhenUploaded
+ Amazonka.StorageGateway: data NotifyWhenUploadedResponse
+ Amazonka.StorageGateway: data PoolInfo
+ Amazonka.StorageGateway: data RefreshCache
+ Amazonka.StorageGateway: data RefreshCacheResponse
+ Amazonka.StorageGateway: data RemoveTagsFromResource
+ Amazonka.StorageGateway: data RemoveTagsFromResourceResponse
+ Amazonka.StorageGateway: data ResetCache
+ Amazonka.StorageGateway: data ResetCacheResponse
+ Amazonka.StorageGateway: data RetrieveTapeArchive
+ Amazonka.StorageGateway: data RetrieveTapeArchiveResponse
+ Amazonka.StorageGateway: data RetrieveTapeRecoveryPoint
+ Amazonka.StorageGateway: data RetrieveTapeRecoveryPointResponse
+ Amazonka.StorageGateway: data SMBFileShareInfo
+ Amazonka.StorageGateway: data SMBLocalGroups
+ Amazonka.StorageGateway: data SetLocalConsolePassword
+ Amazonka.StorageGateway: data SetLocalConsolePasswordResponse
+ Amazonka.StorageGateway: data SetSMBGuestPassword
+ Amazonka.StorageGateway: data SetSMBGuestPasswordResponse
+ Amazonka.StorageGateway: data ShutdownGateway
+ Amazonka.StorageGateway: data ShutdownGatewayResponse
+ Amazonka.StorageGateway: data StartAvailabilityMonitorTest
+ Amazonka.StorageGateway: data StartAvailabilityMonitorTestResponse
+ Amazonka.StorageGateway: data StartGateway
+ Amazonka.StorageGateway: data StartGatewayResponse
+ Amazonka.StorageGateway: data StorediSCSIVolume
+ Amazonka.StorageGateway: data Tag
+ Amazonka.StorageGateway: data Tape
+ Amazonka.StorageGateway: data TapeArchive
+ Amazonka.StorageGateway: data TapeInfo
+ Amazonka.StorageGateway: data TapeRecoveryPointInfo
+ Amazonka.StorageGateway: data UpdateAutomaticTapeCreationPolicy
+ Amazonka.StorageGateway: data UpdateAutomaticTapeCreationPolicyResponse
+ Amazonka.StorageGateway: data UpdateBandwidthRateLimit
+ Amazonka.StorageGateway: data UpdateBandwidthRateLimitResponse
+ Amazonka.StorageGateway: data UpdateBandwidthRateLimitSchedule
+ Amazonka.StorageGateway: data UpdateBandwidthRateLimitScheduleResponse
+ Amazonka.StorageGateway: data UpdateChapCredentials
+ Amazonka.StorageGateway: data UpdateChapCredentialsResponse
+ Amazonka.StorageGateway: data UpdateFileSystemAssociation
+ Amazonka.StorageGateway: data UpdateFileSystemAssociationResponse
+ Amazonka.StorageGateway: data UpdateGatewayInformation
+ Amazonka.StorageGateway: data UpdateGatewayInformationResponse
+ Amazonka.StorageGateway: data UpdateGatewaySoftwareNow
+ Amazonka.StorageGateway: data UpdateGatewaySoftwareNowResponse
+ Amazonka.StorageGateway: data UpdateMaintenanceStartTime
+ Amazonka.StorageGateway: data UpdateMaintenanceStartTimeResponse
+ Amazonka.StorageGateway: data UpdateNFSFileShare
+ Amazonka.StorageGateway: data UpdateNFSFileShareResponse
+ Amazonka.StorageGateway: data UpdateSMBFileShare
+ Amazonka.StorageGateway: data UpdateSMBFileShareResponse
+ Amazonka.StorageGateway: data UpdateSMBFileShareVisibility
+ Amazonka.StorageGateway: data UpdateSMBFileShareVisibilityResponse
+ Amazonka.StorageGateway: data UpdateSMBLocalGroups
+ Amazonka.StorageGateway: data UpdateSMBLocalGroupsResponse
+ Amazonka.StorageGateway: data UpdateSMBSecurityStrategy
+ Amazonka.StorageGateway: data UpdateSMBSecurityStrategyResponse
+ Amazonka.StorageGateway: data UpdateSnapshotSchedule
+ Amazonka.StorageGateway: data UpdateSnapshotScheduleResponse
+ Amazonka.StorageGateway: data UpdateVTLDeviceType
+ Amazonka.StorageGateway: data UpdateVTLDeviceTypeResponse
+ Amazonka.StorageGateway: data VTLDevice
+ Amazonka.StorageGateway: data VolumeInfo
+ Amazonka.StorageGateway: data VolumeRecoveryPointInfo
+ Amazonka.StorageGateway: data VolumeiSCSIAttributes
+ Amazonka.StorageGateway: defaultService :: Service
+ Amazonka.StorageGateway: newActivateGateway :: Text -> Text -> Text -> Text -> ActivateGateway
+ Amazonka.StorageGateway: newActivateGatewayResponse :: Int -> ActivateGatewayResponse
+ Amazonka.StorageGateway: newAddCache :: Text -> AddCache
+ Amazonka.StorageGateway: newAddCacheResponse :: Int -> AddCacheResponse
+ Amazonka.StorageGateway: newAddTagsToResource :: Text -> AddTagsToResource
+ Amazonka.StorageGateway: newAddTagsToResourceResponse :: Int -> AddTagsToResourceResponse
+ Amazonka.StorageGateway: newAddUploadBuffer :: Text -> AddUploadBuffer
+ Amazonka.StorageGateway: newAddUploadBufferResponse :: Int -> AddUploadBufferResponse
+ Amazonka.StorageGateway: newAddWorkingStorage :: Text -> AddWorkingStorage
+ Amazonka.StorageGateway: newAddWorkingStorageResponse :: Int -> AddWorkingStorageResponse
+ Amazonka.StorageGateway: newAssignTapePool :: Text -> Text -> AssignTapePool
+ Amazonka.StorageGateway: newAssignTapePoolResponse :: Int -> AssignTapePoolResponse
+ Amazonka.StorageGateway: newAssociateFileSystem :: Text -> Text -> Text -> Text -> Text -> AssociateFileSystem
+ Amazonka.StorageGateway: newAssociateFileSystemResponse :: Int -> AssociateFileSystemResponse
+ Amazonka.StorageGateway: newAttachVolume :: Text -> Text -> Text -> AttachVolume
+ Amazonka.StorageGateway: newAttachVolumeResponse :: Int -> AttachVolumeResponse
+ Amazonka.StorageGateway: newAutomaticTapeCreationPolicyInfo :: AutomaticTapeCreationPolicyInfo
+ Amazonka.StorageGateway: newAutomaticTapeCreationRule :: Text -> Text -> Integer -> Natural -> AutomaticTapeCreationRule
+ Amazonka.StorageGateway: newBandwidthRateLimitInterval :: Natural -> Natural -> Natural -> Natural -> NonEmpty Natural -> BandwidthRateLimitInterval
+ Amazonka.StorageGateway: newCacheAttributes :: CacheAttributes
+ Amazonka.StorageGateway: newCachediSCSIVolume :: CachediSCSIVolume
+ Amazonka.StorageGateway: newCancelArchival :: Text -> Text -> CancelArchival
+ Amazonka.StorageGateway: newCancelArchivalResponse :: Int -> CancelArchivalResponse
+ Amazonka.StorageGateway: newCancelRetrieval :: Text -> Text -> CancelRetrieval
+ Amazonka.StorageGateway: newCancelRetrievalResponse :: Int -> CancelRetrievalResponse
+ Amazonka.StorageGateway: newChapInfo :: ChapInfo
+ Amazonka.StorageGateway: newCreateCachediSCSIVolume :: Text -> Integer -> Text -> Text -> Text -> CreateCachediSCSIVolume
+ Amazonka.StorageGateway: newCreateCachediSCSIVolumeResponse :: Int -> CreateCachediSCSIVolumeResponse
+ Amazonka.StorageGateway: newCreateNFSFileShare :: Text -> Text -> Text -> Text -> CreateNFSFileShare
+ Amazonka.StorageGateway: newCreateNFSFileShareResponse :: Int -> CreateNFSFileShareResponse
+ Amazonka.StorageGateway: newCreateSMBFileShare :: Text -> Text -> Text -> Text -> CreateSMBFileShare
+ Amazonka.StorageGateway: newCreateSMBFileShareResponse :: Int -> CreateSMBFileShareResponse
+ Amazonka.StorageGateway: newCreateSnapshot :: Text -> Text -> CreateSnapshot
+ Amazonka.StorageGateway: newCreateSnapshotFromVolumeRecoveryPoint :: Text -> Text -> CreateSnapshotFromVolumeRecoveryPoint
+ Amazonka.StorageGateway: newCreateSnapshotFromVolumeRecoveryPointResponse :: Int -> CreateSnapshotFromVolumeRecoveryPointResponse
+ Amazonka.StorageGateway: newCreateSnapshotResponse :: Int -> CreateSnapshotResponse
+ Amazonka.StorageGateway: newCreateStorediSCSIVolume :: Text -> Text -> Bool -> Text -> Text -> CreateStorediSCSIVolume
+ Amazonka.StorageGateway: newCreateStorediSCSIVolumeResponse :: Int -> CreateStorediSCSIVolumeResponse
+ Amazonka.StorageGateway: newCreateTapePool :: Text -> TapeStorageClass -> CreateTapePool
+ Amazonka.StorageGateway: newCreateTapePoolResponse :: Int -> CreateTapePoolResponse
+ Amazonka.StorageGateway: newCreateTapeWithBarcode :: Text -> Integer -> Text -> CreateTapeWithBarcode
+ Amazonka.StorageGateway: newCreateTapeWithBarcodeResponse :: Int -> CreateTapeWithBarcodeResponse
+ Amazonka.StorageGateway: newCreateTapes :: Text -> Integer -> Text -> Natural -> Text -> CreateTapes
+ Amazonka.StorageGateway: newCreateTapesResponse :: Int -> CreateTapesResponse
+ Amazonka.StorageGateway: newDeleteAutomaticTapeCreationPolicy :: Text -> DeleteAutomaticTapeCreationPolicy
+ Amazonka.StorageGateway: newDeleteAutomaticTapeCreationPolicyResponse :: Int -> DeleteAutomaticTapeCreationPolicyResponse
+ Amazonka.StorageGateway: newDeleteBandwidthRateLimit :: Text -> Text -> DeleteBandwidthRateLimit
+ Amazonka.StorageGateway: newDeleteBandwidthRateLimitResponse :: Int -> DeleteBandwidthRateLimitResponse
+ Amazonka.StorageGateway: newDeleteChapCredentials :: Text -> Text -> DeleteChapCredentials
+ Amazonka.StorageGateway: newDeleteChapCredentialsResponse :: Int -> DeleteChapCredentialsResponse
+ Amazonka.StorageGateway: newDeleteFileShare :: Text -> DeleteFileShare
+ Amazonka.StorageGateway: newDeleteFileShareResponse :: Int -> DeleteFileShareResponse
+ Amazonka.StorageGateway: newDeleteGateway :: Text -> DeleteGateway
+ Amazonka.StorageGateway: newDeleteGatewayResponse :: Int -> DeleteGatewayResponse
+ Amazonka.StorageGateway: newDeleteSnapshotSchedule :: Text -> DeleteSnapshotSchedule
+ Amazonka.StorageGateway: newDeleteSnapshotScheduleResponse :: Int -> DeleteSnapshotScheduleResponse
+ Amazonka.StorageGateway: newDeleteTape :: Text -> Text -> DeleteTape
+ Amazonka.StorageGateway: newDeleteTapeArchive :: Text -> DeleteTapeArchive
+ Amazonka.StorageGateway: newDeleteTapeArchiveResponse :: Int -> DeleteTapeArchiveResponse
+ Amazonka.StorageGateway: newDeleteTapePool :: Text -> DeleteTapePool
+ Amazonka.StorageGateway: newDeleteTapePoolResponse :: Int -> DeleteTapePoolResponse
+ Amazonka.StorageGateway: newDeleteTapeResponse :: Int -> DeleteTapeResponse
+ Amazonka.StorageGateway: newDeleteVolume :: Text -> DeleteVolume
+ Amazonka.StorageGateway: newDeleteVolumeResponse :: Int -> DeleteVolumeResponse
+ Amazonka.StorageGateway: newDescribeAvailabilityMonitorTest :: Text -> DescribeAvailabilityMonitorTest
+ Amazonka.StorageGateway: newDescribeAvailabilityMonitorTestResponse :: Int -> DescribeAvailabilityMonitorTestResponse
+ Amazonka.StorageGateway: newDescribeBandwidthRateLimit :: Text -> DescribeBandwidthRateLimit
+ Amazonka.StorageGateway: newDescribeBandwidthRateLimitResponse :: Int -> DescribeBandwidthRateLimitResponse
+ Amazonka.StorageGateway: newDescribeBandwidthRateLimitSchedule :: Text -> DescribeBandwidthRateLimitSchedule
+ Amazonka.StorageGateway: newDescribeBandwidthRateLimitScheduleResponse :: Int -> DescribeBandwidthRateLimitScheduleResponse
+ Amazonka.StorageGateway: newDescribeCache :: Text -> DescribeCache
+ Amazonka.StorageGateway: newDescribeCacheResponse :: Int -> DescribeCacheResponse
+ Amazonka.StorageGateway: newDescribeCachediSCSIVolumes :: DescribeCachediSCSIVolumes
+ Amazonka.StorageGateway: newDescribeCachediSCSIVolumesResponse :: Int -> DescribeCachediSCSIVolumesResponse
+ Amazonka.StorageGateway: newDescribeChapCredentials :: Text -> DescribeChapCredentials
+ Amazonka.StorageGateway: newDescribeChapCredentialsResponse :: Int -> DescribeChapCredentialsResponse
+ Amazonka.StorageGateway: newDescribeFileSystemAssociations :: NonEmpty Text -> DescribeFileSystemAssociations
+ Amazonka.StorageGateway: newDescribeFileSystemAssociationsResponse :: Int -> DescribeFileSystemAssociationsResponse
+ Amazonka.StorageGateway: newDescribeGatewayInformation :: Text -> DescribeGatewayInformation
+ Amazonka.StorageGateway: newDescribeGatewayInformationResponse :: Int -> DescribeGatewayInformationResponse
+ Amazonka.StorageGateway: newDescribeMaintenanceStartTime :: Text -> DescribeMaintenanceStartTime
+ Amazonka.StorageGateway: newDescribeMaintenanceStartTimeResponse :: Int -> DescribeMaintenanceStartTimeResponse
+ Amazonka.StorageGateway: newDescribeNFSFileShares :: NonEmpty Text -> DescribeNFSFileShares
+ Amazonka.StorageGateway: newDescribeNFSFileSharesResponse :: Int -> DescribeNFSFileSharesResponse
+ Amazonka.StorageGateway: newDescribeSMBFileShares :: NonEmpty Text -> DescribeSMBFileShares
+ Amazonka.StorageGateway: newDescribeSMBFileSharesResponse :: Int -> DescribeSMBFileSharesResponse
+ Amazonka.StorageGateway: newDescribeSMBSettings :: Text -> DescribeSMBSettings
+ Amazonka.StorageGateway: newDescribeSMBSettingsResponse :: Int -> DescribeSMBSettingsResponse
+ Amazonka.StorageGateway: newDescribeSnapshotSchedule :: Text -> DescribeSnapshotSchedule
+ Amazonka.StorageGateway: newDescribeSnapshotScheduleResponse :: Int -> DescribeSnapshotScheduleResponse
+ Amazonka.StorageGateway: newDescribeStorediSCSIVolumes :: DescribeStorediSCSIVolumes
+ Amazonka.StorageGateway: newDescribeStorediSCSIVolumesResponse :: Int -> DescribeStorediSCSIVolumesResponse
+ Amazonka.StorageGateway: newDescribeTapeArchives :: DescribeTapeArchives
+ Amazonka.StorageGateway: newDescribeTapeArchivesResponse :: Int -> DescribeTapeArchivesResponse
+ Amazonka.StorageGateway: newDescribeTapeRecoveryPoints :: Text -> DescribeTapeRecoveryPoints
+ Amazonka.StorageGateway: newDescribeTapeRecoveryPointsResponse :: Int -> DescribeTapeRecoveryPointsResponse
+ Amazonka.StorageGateway: newDescribeTapes :: Text -> DescribeTapes
+ Amazonka.StorageGateway: newDescribeTapesResponse :: Int -> DescribeTapesResponse
+ Amazonka.StorageGateway: newDescribeUploadBuffer :: Text -> DescribeUploadBuffer
+ Amazonka.StorageGateway: newDescribeUploadBufferResponse :: Int -> DescribeUploadBufferResponse
+ Amazonka.StorageGateway: newDescribeVTLDevices :: Text -> DescribeVTLDevices
+ Amazonka.StorageGateway: newDescribeVTLDevicesResponse :: Int -> DescribeVTLDevicesResponse
+ Amazonka.StorageGateway: newDescribeWorkingStorage :: Text -> DescribeWorkingStorage
+ Amazonka.StorageGateway: newDescribeWorkingStorageResponse :: Int -> DescribeWorkingStorageResponse
+ Amazonka.StorageGateway: newDetachVolume :: Text -> DetachVolume
+ Amazonka.StorageGateway: newDetachVolumeResponse :: Int -> DetachVolumeResponse
+ Amazonka.StorageGateway: newDeviceiSCSIAttributes :: DeviceiSCSIAttributes
+ Amazonka.StorageGateway: newDisableGateway :: Text -> DisableGateway
+ Amazonka.StorageGateway: newDisableGatewayResponse :: Int -> DisableGatewayResponse
+ Amazonka.StorageGateway: newDisassociateFileSystem :: Text -> DisassociateFileSystem
+ Amazonka.StorageGateway: newDisassociateFileSystemResponse :: Int -> DisassociateFileSystemResponse
+ Amazonka.StorageGateway: newDisk :: Disk
+ Amazonka.StorageGateway: newEndpointNetworkConfiguration :: EndpointNetworkConfiguration
+ Amazonka.StorageGateway: newFileShareInfo :: FileShareInfo
+ Amazonka.StorageGateway: newFileSystemAssociationInfo :: FileSystemAssociationInfo
+ Amazonka.StorageGateway: newFileSystemAssociationStatusDetail :: FileSystemAssociationStatusDetail
+ Amazonka.StorageGateway: newFileSystemAssociationSummary :: FileSystemAssociationSummary
+ Amazonka.StorageGateway: newGatewayInfo :: GatewayInfo
+ Amazonka.StorageGateway: newJoinDomain :: Text -> Text -> Text -> Text -> JoinDomain
+ Amazonka.StorageGateway: newJoinDomainResponse :: Int -> JoinDomainResponse
+ Amazonka.StorageGateway: newListAutomaticTapeCreationPolicies :: ListAutomaticTapeCreationPolicies
+ Amazonka.StorageGateway: newListAutomaticTapeCreationPoliciesResponse :: Int -> ListAutomaticTapeCreationPoliciesResponse
+ Amazonka.StorageGateway: newListFileShares :: ListFileShares
+ Amazonka.StorageGateway: newListFileSharesResponse :: Int -> ListFileSharesResponse
+ Amazonka.StorageGateway: newListFileSystemAssociations :: ListFileSystemAssociations
+ Amazonka.StorageGateway: newListFileSystemAssociationsResponse :: Int -> ListFileSystemAssociationsResponse
+ Amazonka.StorageGateway: newListGateways :: ListGateways
+ Amazonka.StorageGateway: newListGatewaysResponse :: Int -> ListGatewaysResponse
+ Amazonka.StorageGateway: newListLocalDisks :: Text -> ListLocalDisks
+ Amazonka.StorageGateway: newListLocalDisksResponse :: Int -> ListLocalDisksResponse
+ Amazonka.StorageGateway: newListTagsForResource :: Text -> ListTagsForResource
+ Amazonka.StorageGateway: newListTagsForResourceResponse :: Int -> ListTagsForResourceResponse
+ Amazonka.StorageGateway: newListTapePools :: ListTapePools
+ Amazonka.StorageGateway: newListTapePoolsResponse :: Int -> ListTapePoolsResponse
+ Amazonka.StorageGateway: newListTapes :: ListTapes
+ Amazonka.StorageGateway: newListTapesResponse :: Int -> ListTapesResponse
+ Amazonka.StorageGateway: newListVolumeInitiators :: Text -> ListVolumeInitiators
+ Amazonka.StorageGateway: newListVolumeInitiatorsResponse :: Int -> ListVolumeInitiatorsResponse
+ Amazonka.StorageGateway: newListVolumeRecoveryPoints :: Text -> ListVolumeRecoveryPoints
+ Amazonka.StorageGateway: newListVolumeRecoveryPointsResponse :: Int -> ListVolumeRecoveryPointsResponse
+ Amazonka.StorageGateway: newListVolumes :: ListVolumes
+ Amazonka.StorageGateway: newListVolumesResponse :: Int -> ListVolumesResponse
+ Amazonka.StorageGateway: newNFSFileShareDefaults :: NFSFileShareDefaults
+ Amazonka.StorageGateway: newNFSFileShareInfo :: NFSFileShareInfo
+ Amazonka.StorageGateway: newNetworkInterface :: NetworkInterface
+ Amazonka.StorageGateway: newNotifyWhenUploaded :: Text -> NotifyWhenUploaded
+ Amazonka.StorageGateway: newNotifyWhenUploadedResponse :: Int -> NotifyWhenUploadedResponse
+ Amazonka.StorageGateway: newPoolInfo :: PoolInfo
+ Amazonka.StorageGateway: newRefreshCache :: Text -> RefreshCache
+ Amazonka.StorageGateway: newRefreshCacheResponse :: Int -> RefreshCacheResponse
+ Amazonka.StorageGateway: newRemoveTagsFromResource :: Text -> RemoveTagsFromResource
+ Amazonka.StorageGateway: newRemoveTagsFromResourceResponse :: Int -> RemoveTagsFromResourceResponse
+ Amazonka.StorageGateway: newResetCache :: Text -> ResetCache
+ Amazonka.StorageGateway: newResetCacheResponse :: Int -> ResetCacheResponse
+ Amazonka.StorageGateway: newRetrieveTapeArchive :: Text -> Text -> RetrieveTapeArchive
+ Amazonka.StorageGateway: newRetrieveTapeArchiveResponse :: Int -> RetrieveTapeArchiveResponse
+ Amazonka.StorageGateway: newRetrieveTapeRecoveryPoint :: Text -> Text -> RetrieveTapeRecoveryPoint
+ Amazonka.StorageGateway: newRetrieveTapeRecoveryPointResponse :: Int -> RetrieveTapeRecoveryPointResponse
+ Amazonka.StorageGateway: newSMBFileShareInfo :: SMBFileShareInfo
+ Amazonka.StorageGateway: newSMBLocalGroups :: SMBLocalGroups
+ Amazonka.StorageGateway: newSetLocalConsolePassword :: Text -> Text -> SetLocalConsolePassword
+ Amazonka.StorageGateway: newSetLocalConsolePasswordResponse :: Int -> SetLocalConsolePasswordResponse
+ Amazonka.StorageGateway: newSetSMBGuestPassword :: Text -> Text -> SetSMBGuestPassword
+ Amazonka.StorageGateway: newSetSMBGuestPasswordResponse :: Int -> SetSMBGuestPasswordResponse
+ Amazonka.StorageGateway: newShutdownGateway :: Text -> ShutdownGateway
+ Amazonka.StorageGateway: newShutdownGatewayResponse :: Int -> ShutdownGatewayResponse
+ Amazonka.StorageGateway: newStartAvailabilityMonitorTest :: Text -> StartAvailabilityMonitorTest
+ Amazonka.StorageGateway: newStartAvailabilityMonitorTestResponse :: Int -> StartAvailabilityMonitorTestResponse
+ Amazonka.StorageGateway: newStartGateway :: Text -> StartGateway
+ Amazonka.StorageGateway: newStartGatewayResponse :: Int -> StartGatewayResponse
+ Amazonka.StorageGateway: newStorediSCSIVolume :: StorediSCSIVolume
+ Amazonka.StorageGateway: newTag :: Text -> Text -> Tag
+ Amazonka.StorageGateway: newTape :: Tape
+ Amazonka.StorageGateway: newTapeArchive :: TapeArchive
+ Amazonka.StorageGateway: newTapeInfo :: TapeInfo
+ Amazonka.StorageGateway: newTapeRecoveryPointInfo :: TapeRecoveryPointInfo
+ Amazonka.StorageGateway: newUpdateAutomaticTapeCreationPolicy :: NonEmpty AutomaticTapeCreationRule -> Text -> UpdateAutomaticTapeCreationPolicy
+ Amazonka.StorageGateway: newUpdateAutomaticTapeCreationPolicyResponse :: Int -> UpdateAutomaticTapeCreationPolicyResponse
+ Amazonka.StorageGateway: newUpdateBandwidthRateLimit :: Text -> UpdateBandwidthRateLimit
+ Amazonka.StorageGateway: newUpdateBandwidthRateLimitResponse :: Int -> UpdateBandwidthRateLimitResponse
+ Amazonka.StorageGateway: newUpdateBandwidthRateLimitSchedule :: Text -> UpdateBandwidthRateLimitSchedule
+ Amazonka.StorageGateway: newUpdateBandwidthRateLimitScheduleResponse :: Int -> UpdateBandwidthRateLimitScheduleResponse
+ Amazonka.StorageGateway: newUpdateChapCredentials :: Text -> Text -> Text -> UpdateChapCredentials
+ Amazonka.StorageGateway: newUpdateChapCredentialsResponse :: Int -> UpdateChapCredentialsResponse
+ Amazonka.StorageGateway: newUpdateFileSystemAssociation :: Text -> UpdateFileSystemAssociation
+ Amazonka.StorageGateway: newUpdateFileSystemAssociationResponse :: Int -> UpdateFileSystemAssociationResponse
+ Amazonka.StorageGateway: newUpdateGatewayInformation :: Text -> UpdateGatewayInformation
+ Amazonka.StorageGateway: newUpdateGatewayInformationResponse :: Int -> UpdateGatewayInformationResponse
+ Amazonka.StorageGateway: newUpdateGatewaySoftwareNow :: Text -> UpdateGatewaySoftwareNow
+ Amazonka.StorageGateway: newUpdateGatewaySoftwareNowResponse :: Int -> UpdateGatewaySoftwareNowResponse
+ Amazonka.StorageGateway: newUpdateMaintenanceStartTime :: Text -> Natural -> Natural -> UpdateMaintenanceStartTime
+ Amazonka.StorageGateway: newUpdateMaintenanceStartTimeResponse :: Int -> UpdateMaintenanceStartTimeResponse
+ Amazonka.StorageGateway: newUpdateNFSFileShare :: Text -> UpdateNFSFileShare
+ Amazonka.StorageGateway: newUpdateNFSFileShareResponse :: Int -> UpdateNFSFileShareResponse
+ Amazonka.StorageGateway: newUpdateSMBFileShare :: Text -> UpdateSMBFileShare
+ Amazonka.StorageGateway: newUpdateSMBFileShareResponse :: Int -> UpdateSMBFileShareResponse
+ Amazonka.StorageGateway: newUpdateSMBFileShareVisibility :: Text -> Bool -> UpdateSMBFileShareVisibility
+ Amazonka.StorageGateway: newUpdateSMBFileShareVisibilityResponse :: Int -> UpdateSMBFileShareVisibilityResponse
+ Amazonka.StorageGateway: newUpdateSMBLocalGroups :: Text -> SMBLocalGroups -> UpdateSMBLocalGroups
+ Amazonka.StorageGateway: newUpdateSMBLocalGroupsResponse :: Int -> UpdateSMBLocalGroupsResponse
+ Amazonka.StorageGateway: newUpdateSMBSecurityStrategy :: Text -> SMBSecurityStrategy -> UpdateSMBSecurityStrategy
+ Amazonka.StorageGateway: newUpdateSMBSecurityStrategyResponse :: Int -> UpdateSMBSecurityStrategyResponse
+ Amazonka.StorageGateway: newUpdateSnapshotSchedule :: Text -> Natural -> Natural -> UpdateSnapshotSchedule
+ Amazonka.StorageGateway: newUpdateSnapshotScheduleResponse :: Int -> UpdateSnapshotScheduleResponse
+ Amazonka.StorageGateway: newUpdateVTLDeviceType :: Text -> Text -> UpdateVTLDeviceType
+ Amazonka.StorageGateway: newUpdateVTLDeviceTypeResponse :: Int -> UpdateVTLDeviceTypeResponse
+ Amazonka.StorageGateway: newVTLDevice :: VTLDevice
+ Amazonka.StorageGateway: newVolumeInfo :: VolumeInfo
+ Amazonka.StorageGateway: newVolumeRecoveryPointInfo :: VolumeRecoveryPointInfo
+ Amazonka.StorageGateway: newVolumeiSCSIAttributes :: VolumeiSCSIAttributes
+ Amazonka.StorageGateway: newtype ActiveDirectoryStatus
+ Amazonka.StorageGateway: newtype AvailabilityMonitorTestStatus
+ Amazonka.StorageGateway: newtype CaseSensitivity
+ Amazonka.StorageGateway: newtype FileShareType
+ Amazonka.StorageGateway: newtype GatewayCapacity
+ Amazonka.StorageGateway: newtype HostEnvironment
+ Amazonka.StorageGateway: newtype ObjectACL
+ Amazonka.StorageGateway: newtype PoolStatus
+ Amazonka.StorageGateway: newtype RetentionLockType
+ Amazonka.StorageGateway: newtype SMBSecurityStrategy
+ Amazonka.StorageGateway: newtype TapeStorageClass
+ Amazonka.StorageGateway: pattern ActiveDirectoryStatus_ACCESS_DENIED :: ActiveDirectoryStatus
+ Amazonka.StorageGateway: pattern ActiveDirectoryStatus_DETACHED :: ActiveDirectoryStatus
+ Amazonka.StorageGateway: pattern ActiveDirectoryStatus_JOINED :: ActiveDirectoryStatus
+ Amazonka.StorageGateway: pattern ActiveDirectoryStatus_JOINING :: ActiveDirectoryStatus
+ Amazonka.StorageGateway: pattern ActiveDirectoryStatus_NETWORK_ERROR :: ActiveDirectoryStatus
+ Amazonka.StorageGateway: pattern ActiveDirectoryStatus_TIMEOUT :: ActiveDirectoryStatus
+ Amazonka.StorageGateway: pattern ActiveDirectoryStatus_UNKNOWN_ERROR :: ActiveDirectoryStatus
+ Amazonka.StorageGateway: pattern AvailabilityMonitorTestStatus_COMPLETE :: AvailabilityMonitorTestStatus
+ Amazonka.StorageGateway: pattern AvailabilityMonitorTestStatus_FAILED :: AvailabilityMonitorTestStatus
+ Amazonka.StorageGateway: pattern AvailabilityMonitorTestStatus_PENDING :: AvailabilityMonitorTestStatus
+ Amazonka.StorageGateway: pattern CaseSensitivity_CaseSensitive :: CaseSensitivity
+ Amazonka.StorageGateway: pattern CaseSensitivity_ClientSpecified :: CaseSensitivity
+ Amazonka.StorageGateway: pattern FileShareType_NFS :: FileShareType
+ Amazonka.StorageGateway: pattern FileShareType_SMB :: FileShareType
+ Amazonka.StorageGateway: pattern GatewayCapacity_Large :: GatewayCapacity
+ Amazonka.StorageGateway: pattern GatewayCapacity_Medium :: GatewayCapacity
+ Amazonka.StorageGateway: pattern GatewayCapacity_Small :: GatewayCapacity
+ Amazonka.StorageGateway: pattern HostEnvironment_EC2 :: HostEnvironment
+ Amazonka.StorageGateway: pattern HostEnvironment_HYPER_V :: HostEnvironment
+ Amazonka.StorageGateway: pattern HostEnvironment_KVM :: HostEnvironment
+ Amazonka.StorageGateway: pattern HostEnvironment_OTHER :: HostEnvironment
+ Amazonka.StorageGateway: pattern HostEnvironment_SNOWBALL :: HostEnvironment
+ Amazonka.StorageGateway: pattern HostEnvironment_VMWARE :: HostEnvironment
+ Amazonka.StorageGateway: pattern ObjectACL_Authenticated_read :: ObjectACL
+ Amazonka.StorageGateway: pattern ObjectACL_Aws_exec_read :: ObjectACL
+ Amazonka.StorageGateway: pattern ObjectACL_Bucket_owner_full_control :: ObjectACL
+ Amazonka.StorageGateway: pattern ObjectACL_Bucket_owner_read :: ObjectACL
+ Amazonka.StorageGateway: pattern ObjectACL_Private :: ObjectACL
+ Amazonka.StorageGateway: pattern ObjectACL_Public_read :: ObjectACL
+ Amazonka.StorageGateway: pattern ObjectACL_Public_read_write :: ObjectACL
+ Amazonka.StorageGateway: pattern PoolStatus_ACTIVE :: PoolStatus
+ Amazonka.StorageGateway: pattern PoolStatus_DELETED :: PoolStatus
+ Amazonka.StorageGateway: pattern RetentionLockType_COMPLIANCE :: RetentionLockType
+ Amazonka.StorageGateway: pattern RetentionLockType_GOVERNANCE :: RetentionLockType
+ Amazonka.StorageGateway: pattern RetentionLockType_NONE :: RetentionLockType
+ Amazonka.StorageGateway: pattern SMBSecurityStrategy_ClientSpecified :: SMBSecurityStrategy
+ Amazonka.StorageGateway: pattern SMBSecurityStrategy_MandatoryEncryption :: SMBSecurityStrategy
+ Amazonka.StorageGateway: pattern SMBSecurityStrategy_MandatorySigning :: SMBSecurityStrategy
+ Amazonka.StorageGateway: pattern TapeStorageClass_DEEP_ARCHIVE :: TapeStorageClass
+ Amazonka.StorageGateway: pattern TapeStorageClass_GLACIER :: TapeStorageClass
+ Amazonka.StorageGateway.ActivateGateway: ActivateGateway' :: Maybe Text -> Maybe Text -> Maybe [Tag] -> Maybe Text -> Text -> Text -> Text -> Text -> ActivateGateway
+ Amazonka.StorageGateway.ActivateGateway: ActivateGatewayResponse' :: Maybe Text -> Int -> ActivateGatewayResponse
+ Amazonka.StorageGateway.ActivateGateway: [$sel:activationKey:ActivateGateway'] :: ActivateGateway -> Text
+ Amazonka.StorageGateway.ActivateGateway: [$sel:gatewayARN:ActivateGatewayResponse'] :: ActivateGatewayResponse -> Maybe Text
+ Amazonka.StorageGateway.ActivateGateway: [$sel:gatewayName:ActivateGateway'] :: ActivateGateway -> Text
+ Amazonka.StorageGateway.ActivateGateway: [$sel:gatewayRegion:ActivateGateway'] :: ActivateGateway -> Text
+ Amazonka.StorageGateway.ActivateGateway: [$sel:gatewayTimezone:ActivateGateway'] :: ActivateGateway -> Text
+ Amazonka.StorageGateway.ActivateGateway: [$sel:gatewayType:ActivateGateway'] :: ActivateGateway -> Maybe Text
+ Amazonka.StorageGateway.ActivateGateway: [$sel:httpStatus:ActivateGatewayResponse'] :: ActivateGatewayResponse -> Int
+ Amazonka.StorageGateway.ActivateGateway: [$sel:mediumChangerType:ActivateGateway'] :: ActivateGateway -> Maybe Text
+ Amazonka.StorageGateway.ActivateGateway: [$sel:tags:ActivateGateway'] :: ActivateGateway -> Maybe [Tag]
+ Amazonka.StorageGateway.ActivateGateway: [$sel:tapeDriveType:ActivateGateway'] :: ActivateGateway -> Maybe Text
+ Amazonka.StorageGateway.ActivateGateway: activateGatewayResponse_gatewayARN :: Lens' ActivateGatewayResponse (Maybe Text)
+ Amazonka.StorageGateway.ActivateGateway: activateGatewayResponse_httpStatus :: Lens' ActivateGatewayResponse Int
+ Amazonka.StorageGateway.ActivateGateway: activateGateway_activationKey :: Lens' ActivateGateway Text
+ Amazonka.StorageGateway.ActivateGateway: activateGateway_gatewayName :: Lens' ActivateGateway Text
+ Amazonka.StorageGateway.ActivateGateway: activateGateway_gatewayRegion :: Lens' ActivateGateway Text
+ Amazonka.StorageGateway.ActivateGateway: activateGateway_gatewayTimezone :: Lens' ActivateGateway Text
+ Amazonka.StorageGateway.ActivateGateway: activateGateway_gatewayType :: Lens' ActivateGateway (Maybe Text)
+ Amazonka.StorageGateway.ActivateGateway: activateGateway_mediumChangerType :: Lens' ActivateGateway (Maybe Text)
+ Amazonka.StorageGateway.ActivateGateway: activateGateway_tags :: Lens' ActivateGateway (Maybe [Tag])
+ Amazonka.StorageGateway.ActivateGateway: activateGateway_tapeDriveType :: Lens' ActivateGateway (Maybe Text)
+ Amazonka.StorageGateway.ActivateGateway: data ActivateGateway
+ Amazonka.StorageGateway.ActivateGateway: data ActivateGatewayResponse
+ Amazonka.StorageGateway.ActivateGateway: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.ActivateGateway.ActivateGateway
+ Amazonka.StorageGateway.ActivateGateway: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.ActivateGateway.ActivateGateway
+ Amazonka.StorageGateway.ActivateGateway: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.ActivateGateway.ActivateGateway
+ Amazonka.StorageGateway.ActivateGateway: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.ActivateGateway.ActivateGateway
+ Amazonka.StorageGateway.ActivateGateway: instance Control.DeepSeq.NFData Amazonka.StorageGateway.ActivateGateway.ActivateGateway
+ Amazonka.StorageGateway.ActivateGateway: instance Control.DeepSeq.NFData Amazonka.StorageGateway.ActivateGateway.ActivateGatewayResponse
+ Amazonka.StorageGateway.ActivateGateway: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.ActivateGateway.ActivateGateway
+ Amazonka.StorageGateway.ActivateGateway: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.ActivateGateway.ActivateGateway
+ Amazonka.StorageGateway.ActivateGateway: instance GHC.Classes.Eq Amazonka.StorageGateway.ActivateGateway.ActivateGateway
+ Amazonka.StorageGateway.ActivateGateway: instance GHC.Classes.Eq Amazonka.StorageGateway.ActivateGateway.ActivateGatewayResponse
+ Amazonka.StorageGateway.ActivateGateway: instance GHC.Generics.Generic Amazonka.StorageGateway.ActivateGateway.ActivateGateway
+ Amazonka.StorageGateway.ActivateGateway: instance GHC.Generics.Generic Amazonka.StorageGateway.ActivateGateway.ActivateGatewayResponse
+ Amazonka.StorageGateway.ActivateGateway: instance GHC.Read.Read Amazonka.StorageGateway.ActivateGateway.ActivateGateway
+ Amazonka.StorageGateway.ActivateGateway: instance GHC.Read.Read Amazonka.StorageGateway.ActivateGateway.ActivateGatewayResponse
+ Amazonka.StorageGateway.ActivateGateway: instance GHC.Show.Show Amazonka.StorageGateway.ActivateGateway.ActivateGateway
+ Amazonka.StorageGateway.ActivateGateway: instance GHC.Show.Show Amazonka.StorageGateway.ActivateGateway.ActivateGatewayResponse
+ Amazonka.StorageGateway.ActivateGateway: newActivateGateway :: Text -> Text -> Text -> Text -> ActivateGateway
+ Amazonka.StorageGateway.ActivateGateway: newActivateGatewayResponse :: Int -> ActivateGatewayResponse
+ Amazonka.StorageGateway.AddCache: AddCache' :: Text -> [Text] -> AddCache
+ Amazonka.StorageGateway.AddCache: AddCacheResponse' :: Maybe Text -> Int -> AddCacheResponse
+ Amazonka.StorageGateway.AddCache: [$sel:diskIds:AddCache'] :: AddCache -> [Text]
+ Amazonka.StorageGateway.AddCache: [$sel:gatewayARN:AddCache'] :: AddCache -> Text
+ Amazonka.StorageGateway.AddCache: [$sel:gatewayARN:AddCacheResponse'] :: AddCacheResponse -> Maybe Text
+ Amazonka.StorageGateway.AddCache: [$sel:httpStatus:AddCacheResponse'] :: AddCacheResponse -> Int
+ Amazonka.StorageGateway.AddCache: addCacheResponse_gatewayARN :: Lens' AddCacheResponse (Maybe Text)
+ Amazonka.StorageGateway.AddCache: addCacheResponse_httpStatus :: Lens' AddCacheResponse Int
+ Amazonka.StorageGateway.AddCache: addCache_diskIds :: Lens' AddCache [Text]
+ Amazonka.StorageGateway.AddCache: addCache_gatewayARN :: Lens' AddCache Text
+ Amazonka.StorageGateway.AddCache: data AddCache
+ Amazonka.StorageGateway.AddCache: data AddCacheResponse
+ Amazonka.StorageGateway.AddCache: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.AddCache.AddCache
+ Amazonka.StorageGateway.AddCache: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.AddCache.AddCache
+ Amazonka.StorageGateway.AddCache: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.AddCache.AddCache
+ Amazonka.StorageGateway.AddCache: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.AddCache.AddCache
+ Amazonka.StorageGateway.AddCache: instance Control.DeepSeq.NFData Amazonka.StorageGateway.AddCache.AddCache
+ Amazonka.StorageGateway.AddCache: instance Control.DeepSeq.NFData Amazonka.StorageGateway.AddCache.AddCacheResponse
+ Amazonka.StorageGateway.AddCache: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.AddCache.AddCache
+ Amazonka.StorageGateway.AddCache: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.AddCache.AddCache
+ Amazonka.StorageGateway.AddCache: instance GHC.Classes.Eq Amazonka.StorageGateway.AddCache.AddCache
+ Amazonka.StorageGateway.AddCache: instance GHC.Classes.Eq Amazonka.StorageGateway.AddCache.AddCacheResponse
+ Amazonka.StorageGateway.AddCache: instance GHC.Generics.Generic Amazonka.StorageGateway.AddCache.AddCache
+ Amazonka.StorageGateway.AddCache: instance GHC.Generics.Generic Amazonka.StorageGateway.AddCache.AddCacheResponse
+ Amazonka.StorageGateway.AddCache: instance GHC.Read.Read Amazonka.StorageGateway.AddCache.AddCache
+ Amazonka.StorageGateway.AddCache: instance GHC.Read.Read Amazonka.StorageGateway.AddCache.AddCacheResponse
+ Amazonka.StorageGateway.AddCache: instance GHC.Show.Show Amazonka.StorageGateway.AddCache.AddCache
+ Amazonka.StorageGateway.AddCache: instance GHC.Show.Show Amazonka.StorageGateway.AddCache.AddCacheResponse
+ Amazonka.StorageGateway.AddCache: newAddCache :: Text -> AddCache
+ Amazonka.StorageGateway.AddCache: newAddCacheResponse :: Int -> AddCacheResponse
+ Amazonka.StorageGateway.AddTagsToResource: AddTagsToResource' :: Text -> [Tag] -> AddTagsToResource
+ Amazonka.StorageGateway.AddTagsToResource: AddTagsToResourceResponse' :: Maybe Text -> Int -> AddTagsToResourceResponse
+ Amazonka.StorageGateway.AddTagsToResource: [$sel:httpStatus:AddTagsToResourceResponse'] :: AddTagsToResourceResponse -> Int
+ Amazonka.StorageGateway.AddTagsToResource: [$sel:resourceARN:AddTagsToResource'] :: AddTagsToResource -> Text
+ Amazonka.StorageGateway.AddTagsToResource: [$sel:resourceARN:AddTagsToResourceResponse'] :: AddTagsToResourceResponse -> Maybe Text
+ Amazonka.StorageGateway.AddTagsToResource: [$sel:tags:AddTagsToResource'] :: AddTagsToResource -> [Tag]
+ Amazonka.StorageGateway.AddTagsToResource: addTagsToResourceResponse_httpStatus :: Lens' AddTagsToResourceResponse Int
+ Amazonka.StorageGateway.AddTagsToResource: addTagsToResourceResponse_resourceARN :: Lens' AddTagsToResourceResponse (Maybe Text)
+ Amazonka.StorageGateway.AddTagsToResource: addTagsToResource_resourceARN :: Lens' AddTagsToResource Text
+ Amazonka.StorageGateway.AddTagsToResource: addTagsToResource_tags :: Lens' AddTagsToResource [Tag]
+ Amazonka.StorageGateway.AddTagsToResource: data AddTagsToResource
+ Amazonka.StorageGateway.AddTagsToResource: data AddTagsToResourceResponse
+ Amazonka.StorageGateway.AddTagsToResource: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.AddTagsToResource.AddTagsToResource
+ Amazonka.StorageGateway.AddTagsToResource: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.AddTagsToResource.AddTagsToResource
+ Amazonka.StorageGateway.AddTagsToResource: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.AddTagsToResource.AddTagsToResource
+ Amazonka.StorageGateway.AddTagsToResource: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.AddTagsToResource.AddTagsToResource
+ Amazonka.StorageGateway.AddTagsToResource: instance Control.DeepSeq.NFData Amazonka.StorageGateway.AddTagsToResource.AddTagsToResource
+ Amazonka.StorageGateway.AddTagsToResource: instance Control.DeepSeq.NFData Amazonka.StorageGateway.AddTagsToResource.AddTagsToResourceResponse
+ Amazonka.StorageGateway.AddTagsToResource: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.AddTagsToResource.AddTagsToResource
+ Amazonka.StorageGateway.AddTagsToResource: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.AddTagsToResource.AddTagsToResource
+ Amazonka.StorageGateway.AddTagsToResource: instance GHC.Classes.Eq Amazonka.StorageGateway.AddTagsToResource.AddTagsToResource
+ Amazonka.StorageGateway.AddTagsToResource: instance GHC.Classes.Eq Amazonka.StorageGateway.AddTagsToResource.AddTagsToResourceResponse
+ Amazonka.StorageGateway.AddTagsToResource: instance GHC.Generics.Generic Amazonka.StorageGateway.AddTagsToResource.AddTagsToResource
+ Amazonka.StorageGateway.AddTagsToResource: instance GHC.Generics.Generic Amazonka.StorageGateway.AddTagsToResource.AddTagsToResourceResponse
+ Amazonka.StorageGateway.AddTagsToResource: instance GHC.Read.Read Amazonka.StorageGateway.AddTagsToResource.AddTagsToResource
+ Amazonka.StorageGateway.AddTagsToResource: instance GHC.Read.Read Amazonka.StorageGateway.AddTagsToResource.AddTagsToResourceResponse
+ Amazonka.StorageGateway.AddTagsToResource: instance GHC.Show.Show Amazonka.StorageGateway.AddTagsToResource.AddTagsToResource
+ Amazonka.StorageGateway.AddTagsToResource: instance GHC.Show.Show Amazonka.StorageGateway.AddTagsToResource.AddTagsToResourceResponse
+ Amazonka.StorageGateway.AddTagsToResource: newAddTagsToResource :: Text -> AddTagsToResource
+ Amazonka.StorageGateway.AddTagsToResource: newAddTagsToResourceResponse :: Int -> AddTagsToResourceResponse
+ Amazonka.StorageGateway.AddUploadBuffer: AddUploadBuffer' :: Text -> [Text] -> AddUploadBuffer
+ Amazonka.StorageGateway.AddUploadBuffer: AddUploadBufferResponse' :: Maybe Text -> Int -> AddUploadBufferResponse
+ Amazonka.StorageGateway.AddUploadBuffer: [$sel:diskIds:AddUploadBuffer'] :: AddUploadBuffer -> [Text]
+ Amazonka.StorageGateway.AddUploadBuffer: [$sel:gatewayARN:AddUploadBuffer'] :: AddUploadBuffer -> Text
+ Amazonka.StorageGateway.AddUploadBuffer: [$sel:gatewayARN:AddUploadBufferResponse'] :: AddUploadBufferResponse -> Maybe Text
+ Amazonka.StorageGateway.AddUploadBuffer: [$sel:httpStatus:AddUploadBufferResponse'] :: AddUploadBufferResponse -> Int
+ Amazonka.StorageGateway.AddUploadBuffer: addUploadBufferResponse_gatewayARN :: Lens' AddUploadBufferResponse (Maybe Text)
+ Amazonka.StorageGateway.AddUploadBuffer: addUploadBufferResponse_httpStatus :: Lens' AddUploadBufferResponse Int
+ Amazonka.StorageGateway.AddUploadBuffer: addUploadBuffer_diskIds :: Lens' AddUploadBuffer [Text]
+ Amazonka.StorageGateway.AddUploadBuffer: addUploadBuffer_gatewayARN :: Lens' AddUploadBuffer Text
+ Amazonka.StorageGateway.AddUploadBuffer: data AddUploadBuffer
+ Amazonka.StorageGateway.AddUploadBuffer: data AddUploadBufferResponse
+ Amazonka.StorageGateway.AddUploadBuffer: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.AddUploadBuffer.AddUploadBuffer
+ Amazonka.StorageGateway.AddUploadBuffer: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.AddUploadBuffer.AddUploadBuffer
+ Amazonka.StorageGateway.AddUploadBuffer: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.AddUploadBuffer.AddUploadBuffer
+ Amazonka.StorageGateway.AddUploadBuffer: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.AddUploadBuffer.AddUploadBuffer
+ Amazonka.StorageGateway.AddUploadBuffer: instance Control.DeepSeq.NFData Amazonka.StorageGateway.AddUploadBuffer.AddUploadBuffer
+ Amazonka.StorageGateway.AddUploadBuffer: instance Control.DeepSeq.NFData Amazonka.StorageGateway.AddUploadBuffer.AddUploadBufferResponse
+ Amazonka.StorageGateway.AddUploadBuffer: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.AddUploadBuffer.AddUploadBuffer
+ Amazonka.StorageGateway.AddUploadBuffer: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.AddUploadBuffer.AddUploadBuffer
+ Amazonka.StorageGateway.AddUploadBuffer: instance GHC.Classes.Eq Amazonka.StorageGateway.AddUploadBuffer.AddUploadBuffer
+ Amazonka.StorageGateway.AddUploadBuffer: instance GHC.Classes.Eq Amazonka.StorageGateway.AddUploadBuffer.AddUploadBufferResponse
+ Amazonka.StorageGateway.AddUploadBuffer: instance GHC.Generics.Generic Amazonka.StorageGateway.AddUploadBuffer.AddUploadBuffer
+ Amazonka.StorageGateway.AddUploadBuffer: instance GHC.Generics.Generic Amazonka.StorageGateway.AddUploadBuffer.AddUploadBufferResponse
+ Amazonka.StorageGateway.AddUploadBuffer: instance GHC.Read.Read Amazonka.StorageGateway.AddUploadBuffer.AddUploadBuffer
+ Amazonka.StorageGateway.AddUploadBuffer: instance GHC.Read.Read Amazonka.StorageGateway.AddUploadBuffer.AddUploadBufferResponse
+ Amazonka.StorageGateway.AddUploadBuffer: instance GHC.Show.Show Amazonka.StorageGateway.AddUploadBuffer.AddUploadBuffer
+ Amazonka.StorageGateway.AddUploadBuffer: instance GHC.Show.Show Amazonka.StorageGateway.AddUploadBuffer.AddUploadBufferResponse
+ Amazonka.StorageGateway.AddUploadBuffer: newAddUploadBuffer :: Text -> AddUploadBuffer
+ Amazonka.StorageGateway.AddUploadBuffer: newAddUploadBufferResponse :: Int -> AddUploadBufferResponse
+ Amazonka.StorageGateway.AddWorkingStorage: AddWorkingStorage' :: Text -> [Text] -> AddWorkingStorage
+ Amazonka.StorageGateway.AddWorkingStorage: AddWorkingStorageResponse' :: Maybe Text -> Int -> AddWorkingStorageResponse
+ Amazonka.StorageGateway.AddWorkingStorage: [$sel:diskIds:AddWorkingStorage'] :: AddWorkingStorage -> [Text]
+ Amazonka.StorageGateway.AddWorkingStorage: [$sel:gatewayARN:AddWorkingStorage'] :: AddWorkingStorage -> Text
+ Amazonka.StorageGateway.AddWorkingStorage: [$sel:gatewayARN:AddWorkingStorageResponse'] :: AddWorkingStorageResponse -> Maybe Text
+ Amazonka.StorageGateway.AddWorkingStorage: [$sel:httpStatus:AddWorkingStorageResponse'] :: AddWorkingStorageResponse -> Int
+ Amazonka.StorageGateway.AddWorkingStorage: addWorkingStorageResponse_gatewayARN :: Lens' AddWorkingStorageResponse (Maybe Text)
+ Amazonka.StorageGateway.AddWorkingStorage: addWorkingStorageResponse_httpStatus :: Lens' AddWorkingStorageResponse Int
+ Amazonka.StorageGateway.AddWorkingStorage: addWorkingStorage_diskIds :: Lens' AddWorkingStorage [Text]
+ Amazonka.StorageGateway.AddWorkingStorage: addWorkingStorage_gatewayARN :: Lens' AddWorkingStorage Text
+ Amazonka.StorageGateway.AddWorkingStorage: data AddWorkingStorage
+ Amazonka.StorageGateway.AddWorkingStorage: data AddWorkingStorageResponse
+ Amazonka.StorageGateway.AddWorkingStorage: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.AddWorkingStorage.AddWorkingStorage
+ Amazonka.StorageGateway.AddWorkingStorage: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.AddWorkingStorage.AddWorkingStorage
+ Amazonka.StorageGateway.AddWorkingStorage: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.AddWorkingStorage.AddWorkingStorage
+ Amazonka.StorageGateway.AddWorkingStorage: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.AddWorkingStorage.AddWorkingStorage
+ Amazonka.StorageGateway.AddWorkingStorage: instance Control.DeepSeq.NFData Amazonka.StorageGateway.AddWorkingStorage.AddWorkingStorage
+ Amazonka.StorageGateway.AddWorkingStorage: instance Control.DeepSeq.NFData Amazonka.StorageGateway.AddWorkingStorage.AddWorkingStorageResponse
+ Amazonka.StorageGateway.AddWorkingStorage: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.AddWorkingStorage.AddWorkingStorage
+ Amazonka.StorageGateway.AddWorkingStorage: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.AddWorkingStorage.AddWorkingStorage
+ Amazonka.StorageGateway.AddWorkingStorage: instance GHC.Classes.Eq Amazonka.StorageGateway.AddWorkingStorage.AddWorkingStorage
+ Amazonka.StorageGateway.AddWorkingStorage: instance GHC.Classes.Eq Amazonka.StorageGateway.AddWorkingStorage.AddWorkingStorageResponse
+ Amazonka.StorageGateway.AddWorkingStorage: instance GHC.Generics.Generic Amazonka.StorageGateway.AddWorkingStorage.AddWorkingStorage
+ Amazonka.StorageGateway.AddWorkingStorage: instance GHC.Generics.Generic Amazonka.StorageGateway.AddWorkingStorage.AddWorkingStorageResponse
+ Amazonka.StorageGateway.AddWorkingStorage: instance GHC.Read.Read Amazonka.StorageGateway.AddWorkingStorage.AddWorkingStorage
+ Amazonka.StorageGateway.AddWorkingStorage: instance GHC.Read.Read Amazonka.StorageGateway.AddWorkingStorage.AddWorkingStorageResponse
+ Amazonka.StorageGateway.AddWorkingStorage: instance GHC.Show.Show Amazonka.StorageGateway.AddWorkingStorage.AddWorkingStorage
+ Amazonka.StorageGateway.AddWorkingStorage: instance GHC.Show.Show Amazonka.StorageGateway.AddWorkingStorage.AddWorkingStorageResponse
+ Amazonka.StorageGateway.AddWorkingStorage: newAddWorkingStorage :: Text -> AddWorkingStorage
+ Amazonka.StorageGateway.AddWorkingStorage: newAddWorkingStorageResponse :: Int -> AddWorkingStorageResponse
+ Amazonka.StorageGateway.AssignTapePool: AssignTapePool' :: Maybe Bool -> Text -> Text -> AssignTapePool
+ Amazonka.StorageGateway.AssignTapePool: AssignTapePoolResponse' :: Maybe Text -> Int -> AssignTapePoolResponse
+ Amazonka.StorageGateway.AssignTapePool: [$sel:bypassGovernanceRetention:AssignTapePool'] :: AssignTapePool -> Maybe Bool
+ Amazonka.StorageGateway.AssignTapePool: [$sel:httpStatus:AssignTapePoolResponse'] :: AssignTapePoolResponse -> Int
+ Amazonka.StorageGateway.AssignTapePool: [$sel:poolId:AssignTapePool'] :: AssignTapePool -> Text
+ Amazonka.StorageGateway.AssignTapePool: [$sel:tapeARN:AssignTapePool'] :: AssignTapePool -> Text
+ Amazonka.StorageGateway.AssignTapePool: [$sel:tapeARN:AssignTapePoolResponse'] :: AssignTapePoolResponse -> Maybe Text
+ Amazonka.StorageGateway.AssignTapePool: assignTapePoolResponse_httpStatus :: Lens' AssignTapePoolResponse Int
+ Amazonka.StorageGateway.AssignTapePool: assignTapePoolResponse_tapeARN :: Lens' AssignTapePoolResponse (Maybe Text)
+ Amazonka.StorageGateway.AssignTapePool: assignTapePool_bypassGovernanceRetention :: Lens' AssignTapePool (Maybe Bool)
+ Amazonka.StorageGateway.AssignTapePool: assignTapePool_poolId :: Lens' AssignTapePool Text
+ Amazonka.StorageGateway.AssignTapePool: assignTapePool_tapeARN :: Lens' AssignTapePool Text
+ Amazonka.StorageGateway.AssignTapePool: data AssignTapePool
+ Amazonka.StorageGateway.AssignTapePool: data AssignTapePoolResponse
+ Amazonka.StorageGateway.AssignTapePool: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.AssignTapePool.AssignTapePool
+ Amazonka.StorageGateway.AssignTapePool: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.AssignTapePool.AssignTapePool
+ Amazonka.StorageGateway.AssignTapePool: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.AssignTapePool.AssignTapePool
+ Amazonka.StorageGateway.AssignTapePool: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.AssignTapePool.AssignTapePool
+ Amazonka.StorageGateway.AssignTapePool: instance Control.DeepSeq.NFData Amazonka.StorageGateway.AssignTapePool.AssignTapePool
+ Amazonka.StorageGateway.AssignTapePool: instance Control.DeepSeq.NFData Amazonka.StorageGateway.AssignTapePool.AssignTapePoolResponse
+ Amazonka.StorageGateway.AssignTapePool: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.AssignTapePool.AssignTapePool
+ Amazonka.StorageGateway.AssignTapePool: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.AssignTapePool.AssignTapePool
+ Amazonka.StorageGateway.AssignTapePool: instance GHC.Classes.Eq Amazonka.StorageGateway.AssignTapePool.AssignTapePool
+ Amazonka.StorageGateway.AssignTapePool: instance GHC.Classes.Eq Amazonka.StorageGateway.AssignTapePool.AssignTapePoolResponse
+ Amazonka.StorageGateway.AssignTapePool: instance GHC.Generics.Generic Amazonka.StorageGateway.AssignTapePool.AssignTapePool
+ Amazonka.StorageGateway.AssignTapePool: instance GHC.Generics.Generic Amazonka.StorageGateway.AssignTapePool.AssignTapePoolResponse
+ Amazonka.StorageGateway.AssignTapePool: instance GHC.Read.Read Amazonka.StorageGateway.AssignTapePool.AssignTapePool
+ Amazonka.StorageGateway.AssignTapePool: instance GHC.Read.Read Amazonka.StorageGateway.AssignTapePool.AssignTapePoolResponse
+ Amazonka.StorageGateway.AssignTapePool: instance GHC.Show.Show Amazonka.StorageGateway.AssignTapePool.AssignTapePool
+ Amazonka.StorageGateway.AssignTapePool: instance GHC.Show.Show Amazonka.StorageGateway.AssignTapePool.AssignTapePoolResponse
+ Amazonka.StorageGateway.AssignTapePool: newAssignTapePool :: Text -> Text -> AssignTapePool
+ Amazonka.StorageGateway.AssignTapePool: newAssignTapePoolResponse :: Int -> AssignTapePoolResponse
+ Amazonka.StorageGateway.AssociateFileSystem: AssociateFileSystem' :: Maybe Text -> Maybe CacheAttributes -> Maybe EndpointNetworkConfiguration -> Maybe [Tag] -> Text -> Sensitive Text -> Text -> Text -> Text -> AssociateFileSystem
+ Amazonka.StorageGateway.AssociateFileSystem: AssociateFileSystemResponse' :: Maybe Text -> Int -> AssociateFileSystemResponse
+ Amazonka.StorageGateway.AssociateFileSystem: [$sel:auditDestinationARN:AssociateFileSystem'] :: AssociateFileSystem -> Maybe Text
+ Amazonka.StorageGateway.AssociateFileSystem: [$sel:cacheAttributes:AssociateFileSystem'] :: AssociateFileSystem -> Maybe CacheAttributes
+ Amazonka.StorageGateway.AssociateFileSystem: [$sel:clientToken:AssociateFileSystem'] :: AssociateFileSystem -> Text
+ Amazonka.StorageGateway.AssociateFileSystem: [$sel:endpointNetworkConfiguration:AssociateFileSystem'] :: AssociateFileSystem -> Maybe EndpointNetworkConfiguration
+ Amazonka.StorageGateway.AssociateFileSystem: [$sel:fileSystemAssociationARN:AssociateFileSystemResponse'] :: AssociateFileSystemResponse -> Maybe Text
+ Amazonka.StorageGateway.AssociateFileSystem: [$sel:gatewayARN:AssociateFileSystem'] :: AssociateFileSystem -> Text
+ Amazonka.StorageGateway.AssociateFileSystem: [$sel:httpStatus:AssociateFileSystemResponse'] :: AssociateFileSystemResponse -> Int
+ Amazonka.StorageGateway.AssociateFileSystem: [$sel:locationARN:AssociateFileSystem'] :: AssociateFileSystem -> Text
+ Amazonka.StorageGateway.AssociateFileSystem: [$sel:password:AssociateFileSystem'] :: AssociateFileSystem -> Sensitive Text
+ Amazonka.StorageGateway.AssociateFileSystem: [$sel:tags:AssociateFileSystem'] :: AssociateFileSystem -> Maybe [Tag]
+ Amazonka.StorageGateway.AssociateFileSystem: [$sel:userName:AssociateFileSystem'] :: AssociateFileSystem -> Text
+ Amazonka.StorageGateway.AssociateFileSystem: associateFileSystemResponse_fileSystemAssociationARN :: Lens' AssociateFileSystemResponse (Maybe Text)
+ Amazonka.StorageGateway.AssociateFileSystem: associateFileSystemResponse_httpStatus :: Lens' AssociateFileSystemResponse Int
+ Amazonka.StorageGateway.AssociateFileSystem: associateFileSystem_auditDestinationARN :: Lens' AssociateFileSystem (Maybe Text)
+ Amazonka.StorageGateway.AssociateFileSystem: associateFileSystem_cacheAttributes :: Lens' AssociateFileSystem (Maybe CacheAttributes)
+ Amazonka.StorageGateway.AssociateFileSystem: associateFileSystem_clientToken :: Lens' AssociateFileSystem Text
+ Amazonka.StorageGateway.AssociateFileSystem: associateFileSystem_endpointNetworkConfiguration :: Lens' AssociateFileSystem (Maybe EndpointNetworkConfiguration)
+ Amazonka.StorageGateway.AssociateFileSystem: associateFileSystem_gatewayARN :: Lens' AssociateFileSystem Text
+ Amazonka.StorageGateway.AssociateFileSystem: associateFileSystem_locationARN :: Lens' AssociateFileSystem Text
+ Amazonka.StorageGateway.AssociateFileSystem: associateFileSystem_password :: Lens' AssociateFileSystem Text
+ Amazonka.StorageGateway.AssociateFileSystem: associateFileSystem_tags :: Lens' AssociateFileSystem (Maybe [Tag])
+ Amazonka.StorageGateway.AssociateFileSystem: associateFileSystem_userName :: Lens' AssociateFileSystem Text
+ Amazonka.StorageGateway.AssociateFileSystem: data AssociateFileSystem
+ Amazonka.StorageGateway.AssociateFileSystem: data AssociateFileSystemResponse
+ Amazonka.StorageGateway.AssociateFileSystem: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.AssociateFileSystem.AssociateFileSystem
+ Amazonka.StorageGateway.AssociateFileSystem: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.AssociateFileSystem.AssociateFileSystem
+ Amazonka.StorageGateway.AssociateFileSystem: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.AssociateFileSystem.AssociateFileSystem
+ Amazonka.StorageGateway.AssociateFileSystem: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.AssociateFileSystem.AssociateFileSystem
+ Amazonka.StorageGateway.AssociateFileSystem: instance Control.DeepSeq.NFData Amazonka.StorageGateway.AssociateFileSystem.AssociateFileSystem
+ Amazonka.StorageGateway.AssociateFileSystem: instance Control.DeepSeq.NFData Amazonka.StorageGateway.AssociateFileSystem.AssociateFileSystemResponse
+ Amazonka.StorageGateway.AssociateFileSystem: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.AssociateFileSystem.AssociateFileSystem
+ Amazonka.StorageGateway.AssociateFileSystem: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.AssociateFileSystem.AssociateFileSystem
+ Amazonka.StorageGateway.AssociateFileSystem: instance GHC.Classes.Eq Amazonka.StorageGateway.AssociateFileSystem.AssociateFileSystem
+ Amazonka.StorageGateway.AssociateFileSystem: instance GHC.Classes.Eq Amazonka.StorageGateway.AssociateFileSystem.AssociateFileSystemResponse
+ Amazonka.StorageGateway.AssociateFileSystem: instance GHC.Generics.Generic Amazonka.StorageGateway.AssociateFileSystem.AssociateFileSystem
+ Amazonka.StorageGateway.AssociateFileSystem: instance GHC.Generics.Generic Amazonka.StorageGateway.AssociateFileSystem.AssociateFileSystemResponse
+ Amazonka.StorageGateway.AssociateFileSystem: instance GHC.Read.Read Amazonka.StorageGateway.AssociateFileSystem.AssociateFileSystemResponse
+ Amazonka.StorageGateway.AssociateFileSystem: instance GHC.Show.Show Amazonka.StorageGateway.AssociateFileSystem.AssociateFileSystem
+ Amazonka.StorageGateway.AssociateFileSystem: instance GHC.Show.Show Amazonka.StorageGateway.AssociateFileSystem.AssociateFileSystemResponse
+ Amazonka.StorageGateway.AssociateFileSystem: newAssociateFileSystem :: Text -> Text -> Text -> Text -> Text -> AssociateFileSystem
+ Amazonka.StorageGateway.AssociateFileSystem: newAssociateFileSystemResponse :: Int -> AssociateFileSystemResponse
+ Amazonka.StorageGateway.AttachVolume: AttachVolume' :: Maybe Text -> Maybe Text -> Text -> Text -> Text -> AttachVolume
+ Amazonka.StorageGateway.AttachVolume: AttachVolumeResponse' :: Maybe Text -> Maybe Text -> Int -> AttachVolumeResponse
+ Amazonka.StorageGateway.AttachVolume: [$sel:diskId:AttachVolume'] :: AttachVolume -> Maybe Text
+ Amazonka.StorageGateway.AttachVolume: [$sel:gatewayARN:AttachVolume'] :: AttachVolume -> Text
+ Amazonka.StorageGateway.AttachVolume: [$sel:httpStatus:AttachVolumeResponse'] :: AttachVolumeResponse -> Int
+ Amazonka.StorageGateway.AttachVolume: [$sel:networkInterfaceId:AttachVolume'] :: AttachVolume -> Text
+ Amazonka.StorageGateway.AttachVolume: [$sel:targetARN:AttachVolumeResponse'] :: AttachVolumeResponse -> Maybe Text
+ Amazonka.StorageGateway.AttachVolume: [$sel:targetName:AttachVolume'] :: AttachVolume -> Maybe Text
+ Amazonka.StorageGateway.AttachVolume: [$sel:volumeARN:AttachVolume'] :: AttachVolume -> Text
+ Amazonka.StorageGateway.AttachVolume: [$sel:volumeARN:AttachVolumeResponse'] :: AttachVolumeResponse -> Maybe Text
+ Amazonka.StorageGateway.AttachVolume: attachVolumeResponse_httpStatus :: Lens' AttachVolumeResponse Int
+ Amazonka.StorageGateway.AttachVolume: attachVolumeResponse_targetARN :: Lens' AttachVolumeResponse (Maybe Text)
+ Amazonka.StorageGateway.AttachVolume: attachVolumeResponse_volumeARN :: Lens' AttachVolumeResponse (Maybe Text)
+ Amazonka.StorageGateway.AttachVolume: attachVolume_diskId :: Lens' AttachVolume (Maybe Text)
+ Amazonka.StorageGateway.AttachVolume: attachVolume_gatewayARN :: Lens' AttachVolume Text
+ Amazonka.StorageGateway.AttachVolume: attachVolume_networkInterfaceId :: Lens' AttachVolume Text
+ Amazonka.StorageGateway.AttachVolume: attachVolume_targetName :: Lens' AttachVolume (Maybe Text)
+ Amazonka.StorageGateway.AttachVolume: attachVolume_volumeARN :: Lens' AttachVolume Text
+ Amazonka.StorageGateway.AttachVolume: data AttachVolume
+ Amazonka.StorageGateway.AttachVolume: data AttachVolumeResponse
+ Amazonka.StorageGateway.AttachVolume: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.AttachVolume.AttachVolume
+ Amazonka.StorageGateway.AttachVolume: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.AttachVolume.AttachVolume
+ Amazonka.StorageGateway.AttachVolume: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.AttachVolume.AttachVolume
+ Amazonka.StorageGateway.AttachVolume: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.AttachVolume.AttachVolume
+ Amazonka.StorageGateway.AttachVolume: instance Control.DeepSeq.NFData Amazonka.StorageGateway.AttachVolume.AttachVolume
+ Amazonka.StorageGateway.AttachVolume: instance Control.DeepSeq.NFData Amazonka.StorageGateway.AttachVolume.AttachVolumeResponse
+ Amazonka.StorageGateway.AttachVolume: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.AttachVolume.AttachVolume
+ Amazonka.StorageGateway.AttachVolume: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.AttachVolume.AttachVolume
+ Amazonka.StorageGateway.AttachVolume: instance GHC.Classes.Eq Amazonka.StorageGateway.AttachVolume.AttachVolume
+ Amazonka.StorageGateway.AttachVolume: instance GHC.Classes.Eq Amazonka.StorageGateway.AttachVolume.AttachVolumeResponse
+ Amazonka.StorageGateway.AttachVolume: instance GHC.Generics.Generic Amazonka.StorageGateway.AttachVolume.AttachVolume
+ Amazonka.StorageGateway.AttachVolume: instance GHC.Generics.Generic Amazonka.StorageGateway.AttachVolume.AttachVolumeResponse
+ Amazonka.StorageGateway.AttachVolume: instance GHC.Read.Read Amazonka.StorageGateway.AttachVolume.AttachVolume
+ Amazonka.StorageGateway.AttachVolume: instance GHC.Read.Read Amazonka.StorageGateway.AttachVolume.AttachVolumeResponse
+ Amazonka.StorageGateway.AttachVolume: instance GHC.Show.Show Amazonka.StorageGateway.AttachVolume.AttachVolume
+ Amazonka.StorageGateway.AttachVolume: instance GHC.Show.Show Amazonka.StorageGateway.AttachVolume.AttachVolumeResponse
+ Amazonka.StorageGateway.AttachVolume: newAttachVolume :: Text -> Text -> Text -> AttachVolume
+ Amazonka.StorageGateway.AttachVolume: newAttachVolumeResponse :: Int -> AttachVolumeResponse
+ Amazonka.StorageGateway.CancelArchival: CancelArchival' :: Text -> Text -> CancelArchival
+ Amazonka.StorageGateway.CancelArchival: CancelArchivalResponse' :: Maybe Text -> Int -> CancelArchivalResponse
+ Amazonka.StorageGateway.CancelArchival: [$sel:gatewayARN:CancelArchival'] :: CancelArchival -> Text
+ Amazonka.StorageGateway.CancelArchival: [$sel:httpStatus:CancelArchivalResponse'] :: CancelArchivalResponse -> Int
+ Amazonka.StorageGateway.CancelArchival: [$sel:tapeARN:CancelArchival'] :: CancelArchival -> Text
+ Amazonka.StorageGateway.CancelArchival: [$sel:tapeARN:CancelArchivalResponse'] :: CancelArchivalResponse -> Maybe Text
+ Amazonka.StorageGateway.CancelArchival: cancelArchivalResponse_httpStatus :: Lens' CancelArchivalResponse Int
+ Amazonka.StorageGateway.CancelArchival: cancelArchivalResponse_tapeARN :: Lens' CancelArchivalResponse (Maybe Text)
+ Amazonka.StorageGateway.CancelArchival: cancelArchival_gatewayARN :: Lens' CancelArchival Text
+ Amazonka.StorageGateway.CancelArchival: cancelArchival_tapeARN :: Lens' CancelArchival Text
+ Amazonka.StorageGateway.CancelArchival: data CancelArchival
+ Amazonka.StorageGateway.CancelArchival: data CancelArchivalResponse
+ Amazonka.StorageGateway.CancelArchival: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.CancelArchival.CancelArchival
+ Amazonka.StorageGateway.CancelArchival: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.CancelArchival.CancelArchival
+ Amazonka.StorageGateway.CancelArchival: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.CancelArchival.CancelArchival
+ Amazonka.StorageGateway.CancelArchival: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.CancelArchival.CancelArchival
+ Amazonka.StorageGateway.CancelArchival: instance Control.DeepSeq.NFData Amazonka.StorageGateway.CancelArchival.CancelArchival
+ Amazonka.StorageGateway.CancelArchival: instance Control.DeepSeq.NFData Amazonka.StorageGateway.CancelArchival.CancelArchivalResponse
+ Amazonka.StorageGateway.CancelArchival: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.CancelArchival.CancelArchival
+ Amazonka.StorageGateway.CancelArchival: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.CancelArchival.CancelArchival
+ Amazonka.StorageGateway.CancelArchival: instance GHC.Classes.Eq Amazonka.StorageGateway.CancelArchival.CancelArchival
+ Amazonka.StorageGateway.CancelArchival: instance GHC.Classes.Eq Amazonka.StorageGateway.CancelArchival.CancelArchivalResponse
+ Amazonka.StorageGateway.CancelArchival: instance GHC.Generics.Generic Amazonka.StorageGateway.CancelArchival.CancelArchival
+ Amazonka.StorageGateway.CancelArchival: instance GHC.Generics.Generic Amazonka.StorageGateway.CancelArchival.CancelArchivalResponse
+ Amazonka.StorageGateway.CancelArchival: instance GHC.Read.Read Amazonka.StorageGateway.CancelArchival.CancelArchival
+ Amazonka.StorageGateway.CancelArchival: instance GHC.Read.Read Amazonka.StorageGateway.CancelArchival.CancelArchivalResponse
+ Amazonka.StorageGateway.CancelArchival: instance GHC.Show.Show Amazonka.StorageGateway.CancelArchival.CancelArchival
+ Amazonka.StorageGateway.CancelArchival: instance GHC.Show.Show Amazonka.StorageGateway.CancelArchival.CancelArchivalResponse
+ Amazonka.StorageGateway.CancelArchival: newCancelArchival :: Text -> Text -> CancelArchival
+ Amazonka.StorageGateway.CancelArchival: newCancelArchivalResponse :: Int -> CancelArchivalResponse
+ Amazonka.StorageGateway.CancelRetrieval: CancelRetrieval' :: Text -> Text -> CancelRetrieval
+ Amazonka.StorageGateway.CancelRetrieval: CancelRetrievalResponse' :: Maybe Text -> Int -> CancelRetrievalResponse
+ Amazonka.StorageGateway.CancelRetrieval: [$sel:gatewayARN:CancelRetrieval'] :: CancelRetrieval -> Text
+ Amazonka.StorageGateway.CancelRetrieval: [$sel:httpStatus:CancelRetrievalResponse'] :: CancelRetrievalResponse -> Int
+ Amazonka.StorageGateway.CancelRetrieval: [$sel:tapeARN:CancelRetrieval'] :: CancelRetrieval -> Text
+ Amazonka.StorageGateway.CancelRetrieval: [$sel:tapeARN:CancelRetrievalResponse'] :: CancelRetrievalResponse -> Maybe Text
+ Amazonka.StorageGateway.CancelRetrieval: cancelRetrievalResponse_httpStatus :: Lens' CancelRetrievalResponse Int
+ Amazonka.StorageGateway.CancelRetrieval: cancelRetrievalResponse_tapeARN :: Lens' CancelRetrievalResponse (Maybe Text)
+ Amazonka.StorageGateway.CancelRetrieval: cancelRetrieval_gatewayARN :: Lens' CancelRetrieval Text
+ Amazonka.StorageGateway.CancelRetrieval: cancelRetrieval_tapeARN :: Lens' CancelRetrieval Text
+ Amazonka.StorageGateway.CancelRetrieval: data CancelRetrieval
+ Amazonka.StorageGateway.CancelRetrieval: data CancelRetrievalResponse
+ Amazonka.StorageGateway.CancelRetrieval: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.CancelRetrieval.CancelRetrieval
+ Amazonka.StorageGateway.CancelRetrieval: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.CancelRetrieval.CancelRetrieval
+ Amazonka.StorageGateway.CancelRetrieval: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.CancelRetrieval.CancelRetrieval
+ Amazonka.StorageGateway.CancelRetrieval: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.CancelRetrieval.CancelRetrieval
+ Amazonka.StorageGateway.CancelRetrieval: instance Control.DeepSeq.NFData Amazonka.StorageGateway.CancelRetrieval.CancelRetrieval
+ Amazonka.StorageGateway.CancelRetrieval: instance Control.DeepSeq.NFData Amazonka.StorageGateway.CancelRetrieval.CancelRetrievalResponse
+ Amazonka.StorageGateway.CancelRetrieval: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.CancelRetrieval.CancelRetrieval
+ Amazonka.StorageGateway.CancelRetrieval: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.CancelRetrieval.CancelRetrieval
+ Amazonka.StorageGateway.CancelRetrieval: instance GHC.Classes.Eq Amazonka.StorageGateway.CancelRetrieval.CancelRetrieval
+ Amazonka.StorageGateway.CancelRetrieval: instance GHC.Classes.Eq Amazonka.StorageGateway.CancelRetrieval.CancelRetrievalResponse
+ Amazonka.StorageGateway.CancelRetrieval: instance GHC.Generics.Generic Amazonka.StorageGateway.CancelRetrieval.CancelRetrieval
+ Amazonka.StorageGateway.CancelRetrieval: instance GHC.Generics.Generic Amazonka.StorageGateway.CancelRetrieval.CancelRetrievalResponse
+ Amazonka.StorageGateway.CancelRetrieval: instance GHC.Read.Read Amazonka.StorageGateway.CancelRetrieval.CancelRetrieval
+ Amazonka.StorageGateway.CancelRetrieval: instance GHC.Read.Read Amazonka.StorageGateway.CancelRetrieval.CancelRetrievalResponse
+ Amazonka.StorageGateway.CancelRetrieval: instance GHC.Show.Show Amazonka.StorageGateway.CancelRetrieval.CancelRetrieval
+ Amazonka.StorageGateway.CancelRetrieval: instance GHC.Show.Show Amazonka.StorageGateway.CancelRetrieval.CancelRetrievalResponse
+ Amazonka.StorageGateway.CancelRetrieval: newCancelRetrieval :: Text -> Text -> CancelRetrieval
+ Amazonka.StorageGateway.CancelRetrieval: newCancelRetrievalResponse :: Int -> CancelRetrievalResponse
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: CreateCachediSCSIVolume' :: Maybe Bool -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe [Tag] -> Text -> Integer -> Text -> Text -> Text -> CreateCachediSCSIVolume
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: CreateCachediSCSIVolumeResponse' :: Maybe Text -> Maybe Text -> Int -> CreateCachediSCSIVolumeResponse
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: [$sel:clientToken:CreateCachediSCSIVolume'] :: CreateCachediSCSIVolume -> Text
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: [$sel:gatewayARN:CreateCachediSCSIVolume'] :: CreateCachediSCSIVolume -> Text
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: [$sel:httpStatus:CreateCachediSCSIVolumeResponse'] :: CreateCachediSCSIVolumeResponse -> Int
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: [$sel:kmsEncrypted:CreateCachediSCSIVolume'] :: CreateCachediSCSIVolume -> Maybe Bool
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: [$sel:kmsKey:CreateCachediSCSIVolume'] :: CreateCachediSCSIVolume -> Maybe Text
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: [$sel:networkInterfaceId:CreateCachediSCSIVolume'] :: CreateCachediSCSIVolume -> Text
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: [$sel:snapshotId:CreateCachediSCSIVolume'] :: CreateCachediSCSIVolume -> Maybe Text
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: [$sel:sourceVolumeARN:CreateCachediSCSIVolume'] :: CreateCachediSCSIVolume -> Maybe Text
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: [$sel:tags:CreateCachediSCSIVolume'] :: CreateCachediSCSIVolume -> Maybe [Tag]
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: [$sel:targetARN:CreateCachediSCSIVolumeResponse'] :: CreateCachediSCSIVolumeResponse -> Maybe Text
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: [$sel:targetName:CreateCachediSCSIVolume'] :: CreateCachediSCSIVolume -> Text
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: [$sel:volumeARN:CreateCachediSCSIVolumeResponse'] :: CreateCachediSCSIVolumeResponse -> Maybe Text
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: [$sel:volumeSizeInBytes:CreateCachediSCSIVolume'] :: CreateCachediSCSIVolume -> Integer
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: createCachediSCSIVolumeResponse_httpStatus :: Lens' CreateCachediSCSIVolumeResponse Int
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: createCachediSCSIVolumeResponse_targetARN :: Lens' CreateCachediSCSIVolumeResponse (Maybe Text)
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: createCachediSCSIVolumeResponse_volumeARN :: Lens' CreateCachediSCSIVolumeResponse (Maybe Text)
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: createCachediSCSIVolume_clientToken :: Lens' CreateCachediSCSIVolume Text
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: createCachediSCSIVolume_gatewayARN :: Lens' CreateCachediSCSIVolume Text
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: createCachediSCSIVolume_kmsEncrypted :: Lens' CreateCachediSCSIVolume (Maybe Bool)
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: createCachediSCSIVolume_kmsKey :: Lens' CreateCachediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: createCachediSCSIVolume_networkInterfaceId :: Lens' CreateCachediSCSIVolume Text
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: createCachediSCSIVolume_snapshotId :: Lens' CreateCachediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: createCachediSCSIVolume_sourceVolumeARN :: Lens' CreateCachediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: createCachediSCSIVolume_tags :: Lens' CreateCachediSCSIVolume (Maybe [Tag])
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: createCachediSCSIVolume_targetName :: Lens' CreateCachediSCSIVolume Text
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: createCachediSCSIVolume_volumeSizeInBytes :: Lens' CreateCachediSCSIVolume Integer
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: data CreateCachediSCSIVolume
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: data CreateCachediSCSIVolumeResponse
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.CreateCachediSCSIVolume.CreateCachediSCSIVolume
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.CreateCachediSCSIVolume.CreateCachediSCSIVolume
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.CreateCachediSCSIVolume.CreateCachediSCSIVolume
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.CreateCachediSCSIVolume.CreateCachediSCSIVolume
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: instance Control.DeepSeq.NFData Amazonka.StorageGateway.CreateCachediSCSIVolume.CreateCachediSCSIVolume
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: instance Control.DeepSeq.NFData Amazonka.StorageGateway.CreateCachediSCSIVolume.CreateCachediSCSIVolumeResponse
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.CreateCachediSCSIVolume.CreateCachediSCSIVolume
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.CreateCachediSCSIVolume.CreateCachediSCSIVolume
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: instance GHC.Classes.Eq Amazonka.StorageGateway.CreateCachediSCSIVolume.CreateCachediSCSIVolume
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: instance GHC.Classes.Eq Amazonka.StorageGateway.CreateCachediSCSIVolume.CreateCachediSCSIVolumeResponse
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: instance GHC.Generics.Generic Amazonka.StorageGateway.CreateCachediSCSIVolume.CreateCachediSCSIVolume
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: instance GHC.Generics.Generic Amazonka.StorageGateway.CreateCachediSCSIVolume.CreateCachediSCSIVolumeResponse
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: instance GHC.Read.Read Amazonka.StorageGateway.CreateCachediSCSIVolume.CreateCachediSCSIVolume
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: instance GHC.Read.Read Amazonka.StorageGateway.CreateCachediSCSIVolume.CreateCachediSCSIVolumeResponse
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: instance GHC.Show.Show Amazonka.StorageGateway.CreateCachediSCSIVolume.CreateCachediSCSIVolume
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: instance GHC.Show.Show Amazonka.StorageGateway.CreateCachediSCSIVolume.CreateCachediSCSIVolumeResponse
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: newCreateCachediSCSIVolume :: Text -> Integer -> Text -> Text -> Text -> CreateCachediSCSIVolume
+ Amazonka.StorageGateway.CreateCachediSCSIVolume: newCreateCachediSCSIVolumeResponse :: Int -> CreateCachediSCSIVolumeResponse
+ Amazonka.StorageGateway.CreateNFSFileShare: CreateNFSFileShare' :: Maybe Text -> Maybe Text -> Maybe CacheAttributes -> Maybe (NonEmpty Text) -> Maybe Text -> Maybe Text -> Maybe Bool -> Maybe Bool -> Maybe Text -> Maybe NFSFileShareDefaults -> Maybe Text -> Maybe ObjectACL -> Maybe Bool -> Maybe Bool -> Maybe Text -> Maybe [Tag] -> Maybe Text -> Text -> Text -> Text -> Text -> CreateNFSFileShare
+ Amazonka.StorageGateway.CreateNFSFileShare: CreateNFSFileShareResponse' :: Maybe Text -> Int -> CreateNFSFileShareResponse
+ Amazonka.StorageGateway.CreateNFSFileShare: [$sel:auditDestinationARN:CreateNFSFileShare'] :: CreateNFSFileShare -> Maybe Text
+ Amazonka.StorageGateway.CreateNFSFileShare: [$sel:bucketRegion:CreateNFSFileShare'] :: CreateNFSFileShare -> Maybe Text
+ Amazonka.StorageGateway.CreateNFSFileShare: [$sel:cacheAttributes:CreateNFSFileShare'] :: CreateNFSFileShare -> Maybe CacheAttributes
+ Amazonka.StorageGateway.CreateNFSFileShare: [$sel:clientList:CreateNFSFileShare'] :: CreateNFSFileShare -> Maybe (NonEmpty Text)
+ Amazonka.StorageGateway.CreateNFSFileShare: [$sel:clientToken:CreateNFSFileShare'] :: CreateNFSFileShare -> Text
+ Amazonka.StorageGateway.CreateNFSFileShare: [$sel:defaultStorageClass:CreateNFSFileShare'] :: CreateNFSFileShare -> Maybe Text
+ Amazonka.StorageGateway.CreateNFSFileShare: [$sel:fileShareARN:CreateNFSFileShareResponse'] :: CreateNFSFileShareResponse -> Maybe Text
+ Amazonka.StorageGateway.CreateNFSFileShare: [$sel:fileShareName:CreateNFSFileShare'] :: CreateNFSFileShare -> Maybe Text
+ Amazonka.StorageGateway.CreateNFSFileShare: [$sel:gatewayARN:CreateNFSFileShare'] :: CreateNFSFileShare -> Text
+ Amazonka.StorageGateway.CreateNFSFileShare: [$sel:guessMIMETypeEnabled:CreateNFSFileShare'] :: CreateNFSFileShare -> Maybe Bool
+ Amazonka.StorageGateway.CreateNFSFileShare: [$sel:httpStatus:CreateNFSFileShareResponse'] :: CreateNFSFileShareResponse -> Int
+ Amazonka.StorageGateway.CreateNFSFileShare: [$sel:kmsEncrypted:CreateNFSFileShare'] :: CreateNFSFileShare -> Maybe Bool
+ Amazonka.StorageGateway.CreateNFSFileShare: [$sel:kmsKey:CreateNFSFileShare'] :: CreateNFSFileShare -> Maybe Text
+ Amazonka.StorageGateway.CreateNFSFileShare: [$sel:locationARN:CreateNFSFileShare'] :: CreateNFSFileShare -> Text
+ Amazonka.StorageGateway.CreateNFSFileShare: [$sel:nFSFileShareDefaults:CreateNFSFileShare'] :: CreateNFSFileShare -> Maybe NFSFileShareDefaults
+ Amazonka.StorageGateway.CreateNFSFileShare: [$sel:notificationPolicy:CreateNFSFileShare'] :: CreateNFSFileShare -> Maybe Text
+ Amazonka.StorageGateway.CreateNFSFileShare: [$sel:objectACL:CreateNFSFileShare'] :: CreateNFSFileShare -> Maybe ObjectACL
+ Amazonka.StorageGateway.CreateNFSFileShare: [$sel:readOnly:CreateNFSFileShare'] :: CreateNFSFileShare -> Maybe Bool
+ Amazonka.StorageGateway.CreateNFSFileShare: [$sel:requesterPays:CreateNFSFileShare'] :: CreateNFSFileShare -> Maybe Bool
+ Amazonka.StorageGateway.CreateNFSFileShare: [$sel:role':CreateNFSFileShare'] :: CreateNFSFileShare -> Text
+ Amazonka.StorageGateway.CreateNFSFileShare: [$sel:squash:CreateNFSFileShare'] :: CreateNFSFileShare -> Maybe Text
+ Amazonka.StorageGateway.CreateNFSFileShare: [$sel:tags:CreateNFSFileShare'] :: CreateNFSFileShare -> Maybe [Tag]
+ Amazonka.StorageGateway.CreateNFSFileShare: [$sel:vPCEndpointDNSName:CreateNFSFileShare'] :: CreateNFSFileShare -> Maybe Text
+ Amazonka.StorageGateway.CreateNFSFileShare: createNFSFileShareResponse_fileShareARN :: Lens' CreateNFSFileShareResponse (Maybe Text)
+ Amazonka.StorageGateway.CreateNFSFileShare: createNFSFileShareResponse_httpStatus :: Lens' CreateNFSFileShareResponse Int
+ Amazonka.StorageGateway.CreateNFSFileShare: createNFSFileShare_auditDestinationARN :: Lens' CreateNFSFileShare (Maybe Text)
+ Amazonka.StorageGateway.CreateNFSFileShare: createNFSFileShare_bucketRegion :: Lens' CreateNFSFileShare (Maybe Text)
+ Amazonka.StorageGateway.CreateNFSFileShare: createNFSFileShare_cacheAttributes :: Lens' CreateNFSFileShare (Maybe CacheAttributes)
+ Amazonka.StorageGateway.CreateNFSFileShare: createNFSFileShare_clientList :: Lens' CreateNFSFileShare (Maybe (NonEmpty Text))
+ Amazonka.StorageGateway.CreateNFSFileShare: createNFSFileShare_clientToken :: Lens' CreateNFSFileShare Text
+ Amazonka.StorageGateway.CreateNFSFileShare: createNFSFileShare_defaultStorageClass :: Lens' CreateNFSFileShare (Maybe Text)
+ Amazonka.StorageGateway.CreateNFSFileShare: createNFSFileShare_fileShareName :: Lens' CreateNFSFileShare (Maybe Text)
+ Amazonka.StorageGateway.CreateNFSFileShare: createNFSFileShare_gatewayARN :: Lens' CreateNFSFileShare Text
+ Amazonka.StorageGateway.CreateNFSFileShare: createNFSFileShare_guessMIMETypeEnabled :: Lens' CreateNFSFileShare (Maybe Bool)
+ Amazonka.StorageGateway.CreateNFSFileShare: createNFSFileShare_kmsEncrypted :: Lens' CreateNFSFileShare (Maybe Bool)
+ Amazonka.StorageGateway.CreateNFSFileShare: createNFSFileShare_kmsKey :: Lens' CreateNFSFileShare (Maybe Text)
+ Amazonka.StorageGateway.CreateNFSFileShare: createNFSFileShare_locationARN :: Lens' CreateNFSFileShare Text
+ Amazonka.StorageGateway.CreateNFSFileShare: createNFSFileShare_nFSFileShareDefaults :: Lens' CreateNFSFileShare (Maybe NFSFileShareDefaults)
+ Amazonka.StorageGateway.CreateNFSFileShare: createNFSFileShare_notificationPolicy :: Lens' CreateNFSFileShare (Maybe Text)
+ Amazonka.StorageGateway.CreateNFSFileShare: createNFSFileShare_objectACL :: Lens' CreateNFSFileShare (Maybe ObjectACL)
+ Amazonka.StorageGateway.CreateNFSFileShare: createNFSFileShare_readOnly :: Lens' CreateNFSFileShare (Maybe Bool)
+ Amazonka.StorageGateway.CreateNFSFileShare: createNFSFileShare_requesterPays :: Lens' CreateNFSFileShare (Maybe Bool)
+ Amazonka.StorageGateway.CreateNFSFileShare: createNFSFileShare_role :: Lens' CreateNFSFileShare Text
+ Amazonka.StorageGateway.CreateNFSFileShare: createNFSFileShare_squash :: Lens' CreateNFSFileShare (Maybe Text)
+ Amazonka.StorageGateway.CreateNFSFileShare: createNFSFileShare_tags :: Lens' CreateNFSFileShare (Maybe [Tag])
+ Amazonka.StorageGateway.CreateNFSFileShare: createNFSFileShare_vPCEndpointDNSName :: Lens' CreateNFSFileShare (Maybe Text)
+ Amazonka.StorageGateway.CreateNFSFileShare: data CreateNFSFileShare
+ Amazonka.StorageGateway.CreateNFSFileShare: data CreateNFSFileShareResponse
+ Amazonka.StorageGateway.CreateNFSFileShare: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.CreateNFSFileShare.CreateNFSFileShare
+ Amazonka.StorageGateway.CreateNFSFileShare: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.CreateNFSFileShare.CreateNFSFileShare
+ Amazonka.StorageGateway.CreateNFSFileShare: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.CreateNFSFileShare.CreateNFSFileShare
+ Amazonka.StorageGateway.CreateNFSFileShare: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.CreateNFSFileShare.CreateNFSFileShare
+ Amazonka.StorageGateway.CreateNFSFileShare: instance Control.DeepSeq.NFData Amazonka.StorageGateway.CreateNFSFileShare.CreateNFSFileShare
+ Amazonka.StorageGateway.CreateNFSFileShare: instance Control.DeepSeq.NFData Amazonka.StorageGateway.CreateNFSFileShare.CreateNFSFileShareResponse
+ Amazonka.StorageGateway.CreateNFSFileShare: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.CreateNFSFileShare.CreateNFSFileShare
+ Amazonka.StorageGateway.CreateNFSFileShare: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.CreateNFSFileShare.CreateNFSFileShare
+ Amazonka.StorageGateway.CreateNFSFileShare: instance GHC.Classes.Eq Amazonka.StorageGateway.CreateNFSFileShare.CreateNFSFileShare
+ Amazonka.StorageGateway.CreateNFSFileShare: instance GHC.Classes.Eq Amazonka.StorageGateway.CreateNFSFileShare.CreateNFSFileShareResponse
+ Amazonka.StorageGateway.CreateNFSFileShare: instance GHC.Generics.Generic Amazonka.StorageGateway.CreateNFSFileShare.CreateNFSFileShare
+ Amazonka.StorageGateway.CreateNFSFileShare: instance GHC.Generics.Generic Amazonka.StorageGateway.CreateNFSFileShare.CreateNFSFileShareResponse
+ Amazonka.StorageGateway.CreateNFSFileShare: instance GHC.Read.Read Amazonka.StorageGateway.CreateNFSFileShare.CreateNFSFileShare
+ Amazonka.StorageGateway.CreateNFSFileShare: instance GHC.Read.Read Amazonka.StorageGateway.CreateNFSFileShare.CreateNFSFileShareResponse
+ Amazonka.StorageGateway.CreateNFSFileShare: instance GHC.Show.Show Amazonka.StorageGateway.CreateNFSFileShare.CreateNFSFileShare
+ Amazonka.StorageGateway.CreateNFSFileShare: instance GHC.Show.Show Amazonka.StorageGateway.CreateNFSFileShare.CreateNFSFileShareResponse
+ Amazonka.StorageGateway.CreateNFSFileShare: newCreateNFSFileShare :: Text -> Text -> Text -> Text -> CreateNFSFileShare
+ Amazonka.StorageGateway.CreateNFSFileShare: newCreateNFSFileShareResponse :: Int -> CreateNFSFileShareResponse
+ Amazonka.StorageGateway.CreateSMBFileShare: CreateSMBFileShare' :: Maybe Bool -> Maybe [Text] -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe CacheAttributes -> Maybe CaseSensitivity -> Maybe Text -> Maybe Text -> Maybe Bool -> Maybe [Text] -> Maybe Bool -> Maybe Text -> Maybe Text -> Maybe ObjectACL -> Maybe Bool -> Maybe Bool -> Maybe Bool -> Maybe Bool -> Maybe [Tag] -> Maybe Text -> Maybe [Text] -> Text -> Text -> Text -> Text -> CreateSMBFileShare
+ Amazonka.StorageGateway.CreateSMBFileShare: CreateSMBFileShareResponse' :: Maybe Text -> Int -> CreateSMBFileShareResponse
+ Amazonka.StorageGateway.CreateSMBFileShare: [$sel:accessBasedEnumeration:CreateSMBFileShare'] :: CreateSMBFileShare -> Maybe Bool
+ Amazonka.StorageGateway.CreateSMBFileShare: [$sel:adminUserList:CreateSMBFileShare'] :: CreateSMBFileShare -> Maybe [Text]
+ Amazonka.StorageGateway.CreateSMBFileShare: [$sel:auditDestinationARN:CreateSMBFileShare'] :: CreateSMBFileShare -> Maybe Text
+ Amazonka.StorageGateway.CreateSMBFileShare: [$sel:authentication:CreateSMBFileShare'] :: CreateSMBFileShare -> Maybe Text
+ Amazonka.StorageGateway.CreateSMBFileShare: [$sel:bucketRegion:CreateSMBFileShare'] :: CreateSMBFileShare -> Maybe Text
+ Amazonka.StorageGateway.CreateSMBFileShare: [$sel:cacheAttributes:CreateSMBFileShare'] :: CreateSMBFileShare -> Maybe CacheAttributes
+ Amazonka.StorageGateway.CreateSMBFileShare: [$sel:caseSensitivity:CreateSMBFileShare'] :: CreateSMBFileShare -> Maybe CaseSensitivity
+ Amazonka.StorageGateway.CreateSMBFileShare: [$sel:clientToken:CreateSMBFileShare'] :: CreateSMBFileShare -> Text
+ Amazonka.StorageGateway.CreateSMBFileShare: [$sel:defaultStorageClass:CreateSMBFileShare'] :: CreateSMBFileShare -> Maybe Text
+ Amazonka.StorageGateway.CreateSMBFileShare: [$sel:fileShareARN:CreateSMBFileShareResponse'] :: CreateSMBFileShareResponse -> Maybe Text
+ Amazonka.StorageGateway.CreateSMBFileShare: [$sel:fileShareName:CreateSMBFileShare'] :: CreateSMBFileShare -> Maybe Text
+ Amazonka.StorageGateway.CreateSMBFileShare: [$sel:gatewayARN:CreateSMBFileShare'] :: CreateSMBFileShare -> Text
+ Amazonka.StorageGateway.CreateSMBFileShare: [$sel:guessMIMETypeEnabled:CreateSMBFileShare'] :: CreateSMBFileShare -> Maybe Bool
+ Amazonka.StorageGateway.CreateSMBFileShare: [$sel:httpStatus:CreateSMBFileShareResponse'] :: CreateSMBFileShareResponse -> Int
+ Amazonka.StorageGateway.CreateSMBFileShare: [$sel:invalidUserList:CreateSMBFileShare'] :: CreateSMBFileShare -> Maybe [Text]
+ Amazonka.StorageGateway.CreateSMBFileShare: [$sel:kmsEncrypted:CreateSMBFileShare'] :: CreateSMBFileShare -> Maybe Bool
+ Amazonka.StorageGateway.CreateSMBFileShare: [$sel:kmsKey:CreateSMBFileShare'] :: CreateSMBFileShare -> Maybe Text
+ Amazonka.StorageGateway.CreateSMBFileShare: [$sel:locationARN:CreateSMBFileShare'] :: CreateSMBFileShare -> Text
+ Amazonka.StorageGateway.CreateSMBFileShare: [$sel:notificationPolicy:CreateSMBFileShare'] :: CreateSMBFileShare -> Maybe Text
+ Amazonka.StorageGateway.CreateSMBFileShare: [$sel:objectACL:CreateSMBFileShare'] :: CreateSMBFileShare -> Maybe ObjectACL
+ Amazonka.StorageGateway.CreateSMBFileShare: [$sel:oplocksEnabled:CreateSMBFileShare'] :: CreateSMBFileShare -> Maybe Bool
+ Amazonka.StorageGateway.CreateSMBFileShare: [$sel:readOnly:CreateSMBFileShare'] :: CreateSMBFileShare -> Maybe Bool
+ Amazonka.StorageGateway.CreateSMBFileShare: [$sel:requesterPays:CreateSMBFileShare'] :: CreateSMBFileShare -> Maybe Bool
+ Amazonka.StorageGateway.CreateSMBFileShare: [$sel:role':CreateSMBFileShare'] :: CreateSMBFileShare -> Text
+ Amazonka.StorageGateway.CreateSMBFileShare: [$sel:sMBACLEnabled:CreateSMBFileShare'] :: CreateSMBFileShare -> Maybe Bool
+ Amazonka.StorageGateway.CreateSMBFileShare: [$sel:tags:CreateSMBFileShare'] :: CreateSMBFileShare -> Maybe [Tag]
+ Amazonka.StorageGateway.CreateSMBFileShare: [$sel:vPCEndpointDNSName:CreateSMBFileShare'] :: CreateSMBFileShare -> Maybe Text
+ Amazonka.StorageGateway.CreateSMBFileShare: [$sel:validUserList:CreateSMBFileShare'] :: CreateSMBFileShare -> Maybe [Text]
+ Amazonka.StorageGateway.CreateSMBFileShare: createSMBFileShareResponse_fileShareARN :: Lens' CreateSMBFileShareResponse (Maybe Text)
+ Amazonka.StorageGateway.CreateSMBFileShare: createSMBFileShareResponse_httpStatus :: Lens' CreateSMBFileShareResponse Int
+ Amazonka.StorageGateway.CreateSMBFileShare: createSMBFileShare_accessBasedEnumeration :: Lens' CreateSMBFileShare (Maybe Bool)
+ Amazonka.StorageGateway.CreateSMBFileShare: createSMBFileShare_adminUserList :: Lens' CreateSMBFileShare (Maybe [Text])
+ Amazonka.StorageGateway.CreateSMBFileShare: createSMBFileShare_auditDestinationARN :: Lens' CreateSMBFileShare (Maybe Text)
+ Amazonka.StorageGateway.CreateSMBFileShare: createSMBFileShare_authentication :: Lens' CreateSMBFileShare (Maybe Text)
+ Amazonka.StorageGateway.CreateSMBFileShare: createSMBFileShare_bucketRegion :: Lens' CreateSMBFileShare (Maybe Text)
+ Amazonka.StorageGateway.CreateSMBFileShare: createSMBFileShare_cacheAttributes :: Lens' CreateSMBFileShare (Maybe CacheAttributes)
+ Amazonka.StorageGateway.CreateSMBFileShare: createSMBFileShare_caseSensitivity :: Lens' CreateSMBFileShare (Maybe CaseSensitivity)
+ Amazonka.StorageGateway.CreateSMBFileShare: createSMBFileShare_clientToken :: Lens' CreateSMBFileShare Text
+ Amazonka.StorageGateway.CreateSMBFileShare: createSMBFileShare_defaultStorageClass :: Lens' CreateSMBFileShare (Maybe Text)
+ Amazonka.StorageGateway.CreateSMBFileShare: createSMBFileShare_fileShareName :: Lens' CreateSMBFileShare (Maybe Text)
+ Amazonka.StorageGateway.CreateSMBFileShare: createSMBFileShare_gatewayARN :: Lens' CreateSMBFileShare Text
+ Amazonka.StorageGateway.CreateSMBFileShare: createSMBFileShare_guessMIMETypeEnabled :: Lens' CreateSMBFileShare (Maybe Bool)
+ Amazonka.StorageGateway.CreateSMBFileShare: createSMBFileShare_invalidUserList :: Lens' CreateSMBFileShare (Maybe [Text])
+ Amazonka.StorageGateway.CreateSMBFileShare: createSMBFileShare_kmsEncrypted :: Lens' CreateSMBFileShare (Maybe Bool)
+ Amazonka.StorageGateway.CreateSMBFileShare: createSMBFileShare_kmsKey :: Lens' CreateSMBFileShare (Maybe Text)
+ Amazonka.StorageGateway.CreateSMBFileShare: createSMBFileShare_locationARN :: Lens' CreateSMBFileShare Text
+ Amazonka.StorageGateway.CreateSMBFileShare: createSMBFileShare_notificationPolicy :: Lens' CreateSMBFileShare (Maybe Text)
+ Amazonka.StorageGateway.CreateSMBFileShare: createSMBFileShare_objectACL :: Lens' CreateSMBFileShare (Maybe ObjectACL)
+ Amazonka.StorageGateway.CreateSMBFileShare: createSMBFileShare_oplocksEnabled :: Lens' CreateSMBFileShare (Maybe Bool)
+ Amazonka.StorageGateway.CreateSMBFileShare: createSMBFileShare_readOnly :: Lens' CreateSMBFileShare (Maybe Bool)
+ Amazonka.StorageGateway.CreateSMBFileShare: createSMBFileShare_requesterPays :: Lens' CreateSMBFileShare (Maybe Bool)
+ Amazonka.StorageGateway.CreateSMBFileShare: createSMBFileShare_role :: Lens' CreateSMBFileShare Text
+ Amazonka.StorageGateway.CreateSMBFileShare: createSMBFileShare_sMBACLEnabled :: Lens' CreateSMBFileShare (Maybe Bool)
+ Amazonka.StorageGateway.CreateSMBFileShare: createSMBFileShare_tags :: Lens' CreateSMBFileShare (Maybe [Tag])
+ Amazonka.StorageGateway.CreateSMBFileShare: createSMBFileShare_vPCEndpointDNSName :: Lens' CreateSMBFileShare (Maybe Text)
+ Amazonka.StorageGateway.CreateSMBFileShare: createSMBFileShare_validUserList :: Lens' CreateSMBFileShare (Maybe [Text])
+ Amazonka.StorageGateway.CreateSMBFileShare: data CreateSMBFileShare
+ Amazonka.StorageGateway.CreateSMBFileShare: data CreateSMBFileShareResponse
+ Amazonka.StorageGateway.CreateSMBFileShare: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.CreateSMBFileShare.CreateSMBFileShare
+ Amazonka.StorageGateway.CreateSMBFileShare: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.CreateSMBFileShare.CreateSMBFileShare
+ Amazonka.StorageGateway.CreateSMBFileShare: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.CreateSMBFileShare.CreateSMBFileShare
+ Amazonka.StorageGateway.CreateSMBFileShare: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.CreateSMBFileShare.CreateSMBFileShare
+ Amazonka.StorageGateway.CreateSMBFileShare: instance Control.DeepSeq.NFData Amazonka.StorageGateway.CreateSMBFileShare.CreateSMBFileShare
+ Amazonka.StorageGateway.CreateSMBFileShare: instance Control.DeepSeq.NFData Amazonka.StorageGateway.CreateSMBFileShare.CreateSMBFileShareResponse
+ Amazonka.StorageGateway.CreateSMBFileShare: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.CreateSMBFileShare.CreateSMBFileShare
+ Amazonka.StorageGateway.CreateSMBFileShare: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.CreateSMBFileShare.CreateSMBFileShare
+ Amazonka.StorageGateway.CreateSMBFileShare: instance GHC.Classes.Eq Amazonka.StorageGateway.CreateSMBFileShare.CreateSMBFileShare
+ Amazonka.StorageGateway.CreateSMBFileShare: instance GHC.Classes.Eq Amazonka.StorageGateway.CreateSMBFileShare.CreateSMBFileShareResponse
+ Amazonka.StorageGateway.CreateSMBFileShare: instance GHC.Generics.Generic Amazonka.StorageGateway.CreateSMBFileShare.CreateSMBFileShare
+ Amazonka.StorageGateway.CreateSMBFileShare: instance GHC.Generics.Generic Amazonka.StorageGateway.CreateSMBFileShare.CreateSMBFileShareResponse
+ Amazonka.StorageGateway.CreateSMBFileShare: instance GHC.Read.Read Amazonka.StorageGateway.CreateSMBFileShare.CreateSMBFileShare
+ Amazonka.StorageGateway.CreateSMBFileShare: instance GHC.Read.Read Amazonka.StorageGateway.CreateSMBFileShare.CreateSMBFileShareResponse
+ Amazonka.StorageGateway.CreateSMBFileShare: instance GHC.Show.Show Amazonka.StorageGateway.CreateSMBFileShare.CreateSMBFileShare
+ Amazonka.StorageGateway.CreateSMBFileShare: instance GHC.Show.Show Amazonka.StorageGateway.CreateSMBFileShare.CreateSMBFileShareResponse
+ Amazonka.StorageGateway.CreateSMBFileShare: newCreateSMBFileShare :: Text -> Text -> Text -> Text -> CreateSMBFileShare
+ Amazonka.StorageGateway.CreateSMBFileShare: newCreateSMBFileShareResponse :: Int -> CreateSMBFileShareResponse
+ Amazonka.StorageGateway.CreateSnapshot: CreateSnapshot' :: Maybe [Tag] -> Text -> Text -> CreateSnapshot
+ Amazonka.StorageGateway.CreateSnapshot: CreateSnapshotResponse' :: Maybe Text -> Maybe Text -> Int -> CreateSnapshotResponse
+ Amazonka.StorageGateway.CreateSnapshot: [$sel:httpStatus:CreateSnapshotResponse'] :: CreateSnapshotResponse -> Int
+ Amazonka.StorageGateway.CreateSnapshot: [$sel:snapshotDescription:CreateSnapshot'] :: CreateSnapshot -> Text
+ Amazonka.StorageGateway.CreateSnapshot: [$sel:snapshotId:CreateSnapshotResponse'] :: CreateSnapshotResponse -> Maybe Text
+ Amazonka.StorageGateway.CreateSnapshot: [$sel:tags:CreateSnapshot'] :: CreateSnapshot -> Maybe [Tag]
+ Amazonka.StorageGateway.CreateSnapshot: [$sel:volumeARN:CreateSnapshot'] :: CreateSnapshot -> Text
+ Amazonka.StorageGateway.CreateSnapshot: [$sel:volumeARN:CreateSnapshotResponse'] :: CreateSnapshotResponse -> Maybe Text
+ Amazonka.StorageGateway.CreateSnapshot: createSnapshotResponse_httpStatus :: Lens' CreateSnapshotResponse Int
+ Amazonka.StorageGateway.CreateSnapshot: createSnapshotResponse_snapshotId :: Lens' CreateSnapshotResponse (Maybe Text)
+ Amazonka.StorageGateway.CreateSnapshot: createSnapshotResponse_volumeARN :: Lens' CreateSnapshotResponse (Maybe Text)
+ Amazonka.StorageGateway.CreateSnapshot: createSnapshot_snapshotDescription :: Lens' CreateSnapshot Text
+ Amazonka.StorageGateway.CreateSnapshot: createSnapshot_tags :: Lens' CreateSnapshot (Maybe [Tag])
+ Amazonka.StorageGateway.CreateSnapshot: createSnapshot_volumeARN :: Lens' CreateSnapshot Text
+ Amazonka.StorageGateway.CreateSnapshot: data CreateSnapshot
+ Amazonka.StorageGateway.CreateSnapshot: data CreateSnapshotResponse
+ Amazonka.StorageGateway.CreateSnapshot: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.CreateSnapshot.CreateSnapshot
+ Amazonka.StorageGateway.CreateSnapshot: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.CreateSnapshot.CreateSnapshot
+ Amazonka.StorageGateway.CreateSnapshot: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.CreateSnapshot.CreateSnapshot
+ Amazonka.StorageGateway.CreateSnapshot: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.CreateSnapshot.CreateSnapshot
+ Amazonka.StorageGateway.CreateSnapshot: instance Control.DeepSeq.NFData Amazonka.StorageGateway.CreateSnapshot.CreateSnapshot
+ Amazonka.StorageGateway.CreateSnapshot: instance Control.DeepSeq.NFData Amazonka.StorageGateway.CreateSnapshot.CreateSnapshotResponse
+ Amazonka.StorageGateway.CreateSnapshot: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.CreateSnapshot.CreateSnapshot
+ Amazonka.StorageGateway.CreateSnapshot: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.CreateSnapshot.CreateSnapshot
+ Amazonka.StorageGateway.CreateSnapshot: instance GHC.Classes.Eq Amazonka.StorageGateway.CreateSnapshot.CreateSnapshot
+ Amazonka.StorageGateway.CreateSnapshot: instance GHC.Classes.Eq Amazonka.StorageGateway.CreateSnapshot.CreateSnapshotResponse
+ Amazonka.StorageGateway.CreateSnapshot: instance GHC.Generics.Generic Amazonka.StorageGateway.CreateSnapshot.CreateSnapshot
+ Amazonka.StorageGateway.CreateSnapshot: instance GHC.Generics.Generic Amazonka.StorageGateway.CreateSnapshot.CreateSnapshotResponse
+ Amazonka.StorageGateway.CreateSnapshot: instance GHC.Read.Read Amazonka.StorageGateway.CreateSnapshot.CreateSnapshot
+ Amazonka.StorageGateway.CreateSnapshot: instance GHC.Read.Read Amazonka.StorageGateway.CreateSnapshot.CreateSnapshotResponse
+ Amazonka.StorageGateway.CreateSnapshot: instance GHC.Show.Show Amazonka.StorageGateway.CreateSnapshot.CreateSnapshot
+ Amazonka.StorageGateway.CreateSnapshot: instance GHC.Show.Show Amazonka.StorageGateway.CreateSnapshot.CreateSnapshotResponse
+ Amazonka.StorageGateway.CreateSnapshot: newCreateSnapshot :: Text -> Text -> CreateSnapshot
+ Amazonka.StorageGateway.CreateSnapshot: newCreateSnapshotResponse :: Int -> CreateSnapshotResponse
+ Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: CreateSnapshotFromVolumeRecoveryPoint' :: Maybe [Tag] -> Text -> Text -> CreateSnapshotFromVolumeRecoveryPoint
+ Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: CreateSnapshotFromVolumeRecoveryPointResponse' :: Maybe Text -> Maybe Text -> Maybe Text -> Int -> CreateSnapshotFromVolumeRecoveryPointResponse
+ Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: [$sel:httpStatus:CreateSnapshotFromVolumeRecoveryPointResponse'] :: CreateSnapshotFromVolumeRecoveryPointResponse -> Int
+ Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: [$sel:snapshotDescription:CreateSnapshotFromVolumeRecoveryPoint'] :: CreateSnapshotFromVolumeRecoveryPoint -> Text
+ Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: [$sel:snapshotId:CreateSnapshotFromVolumeRecoveryPointResponse'] :: CreateSnapshotFromVolumeRecoveryPointResponse -> Maybe Text
+ Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: [$sel:tags:CreateSnapshotFromVolumeRecoveryPoint'] :: CreateSnapshotFromVolumeRecoveryPoint -> Maybe [Tag]
+ Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: [$sel:volumeARN:CreateSnapshotFromVolumeRecoveryPoint'] :: CreateSnapshotFromVolumeRecoveryPoint -> Text
+ Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: [$sel:volumeARN:CreateSnapshotFromVolumeRecoveryPointResponse'] :: CreateSnapshotFromVolumeRecoveryPointResponse -> Maybe Text
+ Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: [$sel:volumeRecoveryPointTime:CreateSnapshotFromVolumeRecoveryPointResponse'] :: CreateSnapshotFromVolumeRecoveryPointResponse -> Maybe Text
+ Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: createSnapshotFromVolumeRecoveryPointResponse_httpStatus :: Lens' CreateSnapshotFromVolumeRecoveryPointResponse Int
+ Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: createSnapshotFromVolumeRecoveryPointResponse_snapshotId :: Lens' CreateSnapshotFromVolumeRecoveryPointResponse (Maybe Text)
+ Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: createSnapshotFromVolumeRecoveryPointResponse_volumeARN :: Lens' CreateSnapshotFromVolumeRecoveryPointResponse (Maybe Text)
+ Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: createSnapshotFromVolumeRecoveryPointResponse_volumeRecoveryPointTime :: Lens' CreateSnapshotFromVolumeRecoveryPointResponse (Maybe Text)
+ Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: createSnapshotFromVolumeRecoveryPoint_snapshotDescription :: Lens' CreateSnapshotFromVolumeRecoveryPoint Text
+ Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: createSnapshotFromVolumeRecoveryPoint_tags :: Lens' CreateSnapshotFromVolumeRecoveryPoint (Maybe [Tag])
+ Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: createSnapshotFromVolumeRecoveryPoint_volumeARN :: Lens' CreateSnapshotFromVolumeRecoveryPoint Text
+ Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: data CreateSnapshotFromVolumeRecoveryPoint
+ Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: data CreateSnapshotFromVolumeRecoveryPointResponse
+ Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint.CreateSnapshotFromVolumeRecoveryPoint
+ Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint.CreateSnapshotFromVolumeRecoveryPoint
+ Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint.CreateSnapshotFromVolumeRecoveryPoint
+ Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint.CreateSnapshotFromVolumeRecoveryPoint
+ Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: instance Control.DeepSeq.NFData Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint.CreateSnapshotFromVolumeRecoveryPoint
+ Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: instance Control.DeepSeq.NFData Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint.CreateSnapshotFromVolumeRecoveryPointResponse
+ Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint.CreateSnapshotFromVolumeRecoveryPoint
+ Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint.CreateSnapshotFromVolumeRecoveryPoint
+ Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: instance GHC.Classes.Eq Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint.CreateSnapshotFromVolumeRecoveryPoint
+ Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: instance GHC.Classes.Eq Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint.CreateSnapshotFromVolumeRecoveryPointResponse
+ Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: instance GHC.Generics.Generic Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint.CreateSnapshotFromVolumeRecoveryPoint
+ Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: instance GHC.Generics.Generic Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint.CreateSnapshotFromVolumeRecoveryPointResponse
+ Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: instance GHC.Read.Read Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint.CreateSnapshotFromVolumeRecoveryPoint
+ Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: instance GHC.Read.Read Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint.CreateSnapshotFromVolumeRecoveryPointResponse
+ Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: instance GHC.Show.Show Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint.CreateSnapshotFromVolumeRecoveryPoint
+ Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: instance GHC.Show.Show Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint.CreateSnapshotFromVolumeRecoveryPointResponse
+ Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: newCreateSnapshotFromVolumeRecoveryPoint :: Text -> Text -> CreateSnapshotFromVolumeRecoveryPoint
+ Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint: newCreateSnapshotFromVolumeRecoveryPointResponse :: Int -> CreateSnapshotFromVolumeRecoveryPointResponse
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: CreateStorediSCSIVolume' :: Maybe Bool -> Maybe Text -> Maybe Text -> Maybe [Tag] -> Text -> Text -> Bool -> Text -> Text -> CreateStorediSCSIVolume
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: CreateStorediSCSIVolumeResponse' :: Maybe Text -> Maybe Text -> Maybe Integer -> Int -> CreateStorediSCSIVolumeResponse
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: [$sel:diskId:CreateStorediSCSIVolume'] :: CreateStorediSCSIVolume -> Text
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: [$sel:gatewayARN:CreateStorediSCSIVolume'] :: CreateStorediSCSIVolume -> Text
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: [$sel:httpStatus:CreateStorediSCSIVolumeResponse'] :: CreateStorediSCSIVolumeResponse -> Int
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: [$sel:kmsEncrypted:CreateStorediSCSIVolume'] :: CreateStorediSCSIVolume -> Maybe Bool
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: [$sel:kmsKey:CreateStorediSCSIVolume'] :: CreateStorediSCSIVolume -> Maybe Text
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: [$sel:networkInterfaceId:CreateStorediSCSIVolume'] :: CreateStorediSCSIVolume -> Text
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: [$sel:preserveExistingData:CreateStorediSCSIVolume'] :: CreateStorediSCSIVolume -> Bool
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: [$sel:snapshotId:CreateStorediSCSIVolume'] :: CreateStorediSCSIVolume -> Maybe Text
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: [$sel:tags:CreateStorediSCSIVolume'] :: CreateStorediSCSIVolume -> Maybe [Tag]
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: [$sel:targetARN:CreateStorediSCSIVolumeResponse'] :: CreateStorediSCSIVolumeResponse -> Maybe Text
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: [$sel:targetName:CreateStorediSCSIVolume'] :: CreateStorediSCSIVolume -> Text
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: [$sel:volumeARN:CreateStorediSCSIVolumeResponse'] :: CreateStorediSCSIVolumeResponse -> Maybe Text
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: [$sel:volumeSizeInBytes:CreateStorediSCSIVolumeResponse'] :: CreateStorediSCSIVolumeResponse -> Maybe Integer
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: createStorediSCSIVolumeResponse_httpStatus :: Lens' CreateStorediSCSIVolumeResponse Int
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: createStorediSCSIVolumeResponse_targetARN :: Lens' CreateStorediSCSIVolumeResponse (Maybe Text)
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: createStorediSCSIVolumeResponse_volumeARN :: Lens' CreateStorediSCSIVolumeResponse (Maybe Text)
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: createStorediSCSIVolumeResponse_volumeSizeInBytes :: Lens' CreateStorediSCSIVolumeResponse (Maybe Integer)
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: createStorediSCSIVolume_diskId :: Lens' CreateStorediSCSIVolume Text
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: createStorediSCSIVolume_gatewayARN :: Lens' CreateStorediSCSIVolume Text
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: createStorediSCSIVolume_kmsEncrypted :: Lens' CreateStorediSCSIVolume (Maybe Bool)
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: createStorediSCSIVolume_kmsKey :: Lens' CreateStorediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: createStorediSCSIVolume_networkInterfaceId :: Lens' CreateStorediSCSIVolume Text
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: createStorediSCSIVolume_preserveExistingData :: Lens' CreateStorediSCSIVolume Bool
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: createStorediSCSIVolume_snapshotId :: Lens' CreateStorediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: createStorediSCSIVolume_tags :: Lens' CreateStorediSCSIVolume (Maybe [Tag])
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: createStorediSCSIVolume_targetName :: Lens' CreateStorediSCSIVolume Text
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: data CreateStorediSCSIVolume
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: data CreateStorediSCSIVolumeResponse
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.CreateStorediSCSIVolume.CreateStorediSCSIVolume
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.CreateStorediSCSIVolume.CreateStorediSCSIVolume
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.CreateStorediSCSIVolume.CreateStorediSCSIVolume
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.CreateStorediSCSIVolume.CreateStorediSCSIVolume
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: instance Control.DeepSeq.NFData Amazonka.StorageGateway.CreateStorediSCSIVolume.CreateStorediSCSIVolume
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: instance Control.DeepSeq.NFData Amazonka.StorageGateway.CreateStorediSCSIVolume.CreateStorediSCSIVolumeResponse
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.CreateStorediSCSIVolume.CreateStorediSCSIVolume
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.CreateStorediSCSIVolume.CreateStorediSCSIVolume
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: instance GHC.Classes.Eq Amazonka.StorageGateway.CreateStorediSCSIVolume.CreateStorediSCSIVolume
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: instance GHC.Classes.Eq Amazonka.StorageGateway.CreateStorediSCSIVolume.CreateStorediSCSIVolumeResponse
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: instance GHC.Generics.Generic Amazonka.StorageGateway.CreateStorediSCSIVolume.CreateStorediSCSIVolume
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: instance GHC.Generics.Generic Amazonka.StorageGateway.CreateStorediSCSIVolume.CreateStorediSCSIVolumeResponse
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: instance GHC.Read.Read Amazonka.StorageGateway.CreateStorediSCSIVolume.CreateStorediSCSIVolume
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: instance GHC.Read.Read Amazonka.StorageGateway.CreateStorediSCSIVolume.CreateStorediSCSIVolumeResponse
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: instance GHC.Show.Show Amazonka.StorageGateway.CreateStorediSCSIVolume.CreateStorediSCSIVolume
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: instance GHC.Show.Show Amazonka.StorageGateway.CreateStorediSCSIVolume.CreateStorediSCSIVolumeResponse
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: newCreateStorediSCSIVolume :: Text -> Text -> Bool -> Text -> Text -> CreateStorediSCSIVolume
+ Amazonka.StorageGateway.CreateStorediSCSIVolume: newCreateStorediSCSIVolumeResponse :: Int -> CreateStorediSCSIVolumeResponse
+ Amazonka.StorageGateway.CreateTapePool: CreateTapePool' :: Maybe Natural -> Maybe RetentionLockType -> Maybe [Tag] -> Text -> TapeStorageClass -> CreateTapePool
+ Amazonka.StorageGateway.CreateTapePool: CreateTapePoolResponse' :: Maybe Text -> Int -> CreateTapePoolResponse
+ Amazonka.StorageGateway.CreateTapePool: [$sel:httpStatus:CreateTapePoolResponse'] :: CreateTapePoolResponse -> Int
+ Amazonka.StorageGateway.CreateTapePool: [$sel:poolARN:CreateTapePoolResponse'] :: CreateTapePoolResponse -> Maybe Text
+ Amazonka.StorageGateway.CreateTapePool: [$sel:poolName:CreateTapePool'] :: CreateTapePool -> Text
+ Amazonka.StorageGateway.CreateTapePool: [$sel:retentionLockTimeInDays:CreateTapePool'] :: CreateTapePool -> Maybe Natural
+ Amazonka.StorageGateway.CreateTapePool: [$sel:retentionLockType:CreateTapePool'] :: CreateTapePool -> Maybe RetentionLockType
+ Amazonka.StorageGateway.CreateTapePool: [$sel:storageClass:CreateTapePool'] :: CreateTapePool -> TapeStorageClass
+ Amazonka.StorageGateway.CreateTapePool: [$sel:tags:CreateTapePool'] :: CreateTapePool -> Maybe [Tag]
+ Amazonka.StorageGateway.CreateTapePool: createTapePoolResponse_httpStatus :: Lens' CreateTapePoolResponse Int
+ Amazonka.StorageGateway.CreateTapePool: createTapePoolResponse_poolARN :: Lens' CreateTapePoolResponse (Maybe Text)
+ Amazonka.StorageGateway.CreateTapePool: createTapePool_poolName :: Lens' CreateTapePool Text
+ Amazonka.StorageGateway.CreateTapePool: createTapePool_retentionLockTimeInDays :: Lens' CreateTapePool (Maybe Natural)
+ Amazonka.StorageGateway.CreateTapePool: createTapePool_retentionLockType :: Lens' CreateTapePool (Maybe RetentionLockType)
+ Amazonka.StorageGateway.CreateTapePool: createTapePool_storageClass :: Lens' CreateTapePool TapeStorageClass
+ Amazonka.StorageGateway.CreateTapePool: createTapePool_tags :: Lens' CreateTapePool (Maybe [Tag])
+ Amazonka.StorageGateway.CreateTapePool: data CreateTapePool
+ Amazonka.StorageGateway.CreateTapePool: data CreateTapePoolResponse
+ Amazonka.StorageGateway.CreateTapePool: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.CreateTapePool.CreateTapePool
+ Amazonka.StorageGateway.CreateTapePool: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.CreateTapePool.CreateTapePool
+ Amazonka.StorageGateway.CreateTapePool: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.CreateTapePool.CreateTapePool
+ Amazonka.StorageGateway.CreateTapePool: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.CreateTapePool.CreateTapePool
+ Amazonka.StorageGateway.CreateTapePool: instance Control.DeepSeq.NFData Amazonka.StorageGateway.CreateTapePool.CreateTapePool
+ Amazonka.StorageGateway.CreateTapePool: instance Control.DeepSeq.NFData Amazonka.StorageGateway.CreateTapePool.CreateTapePoolResponse
+ Amazonka.StorageGateway.CreateTapePool: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.CreateTapePool.CreateTapePool
+ Amazonka.StorageGateway.CreateTapePool: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.CreateTapePool.CreateTapePool
+ Amazonka.StorageGateway.CreateTapePool: instance GHC.Classes.Eq Amazonka.StorageGateway.CreateTapePool.CreateTapePool
+ Amazonka.StorageGateway.CreateTapePool: instance GHC.Classes.Eq Amazonka.StorageGateway.CreateTapePool.CreateTapePoolResponse
+ Amazonka.StorageGateway.CreateTapePool: instance GHC.Generics.Generic Amazonka.StorageGateway.CreateTapePool.CreateTapePool
+ Amazonka.StorageGateway.CreateTapePool: instance GHC.Generics.Generic Amazonka.StorageGateway.CreateTapePool.CreateTapePoolResponse
+ Amazonka.StorageGateway.CreateTapePool: instance GHC.Read.Read Amazonka.StorageGateway.CreateTapePool.CreateTapePool
+ Amazonka.StorageGateway.CreateTapePool: instance GHC.Read.Read Amazonka.StorageGateway.CreateTapePool.CreateTapePoolResponse
+ Amazonka.StorageGateway.CreateTapePool: instance GHC.Show.Show Amazonka.StorageGateway.CreateTapePool.CreateTapePool
+ Amazonka.StorageGateway.CreateTapePool: instance GHC.Show.Show Amazonka.StorageGateway.CreateTapePool.CreateTapePoolResponse
+ Amazonka.StorageGateway.CreateTapePool: newCreateTapePool :: Text -> TapeStorageClass -> CreateTapePool
+ Amazonka.StorageGateway.CreateTapePool: newCreateTapePoolResponse :: Int -> CreateTapePoolResponse
+ Amazonka.StorageGateway.CreateTapeWithBarcode: CreateTapeWithBarcode' :: Maybe Bool -> Maybe Text -> Maybe Text -> Maybe [Tag] -> Maybe Bool -> Text -> Integer -> Text -> CreateTapeWithBarcode
+ Amazonka.StorageGateway.CreateTapeWithBarcode: CreateTapeWithBarcodeResponse' :: Maybe Text -> Int -> CreateTapeWithBarcodeResponse
+ Amazonka.StorageGateway.CreateTapeWithBarcode: [$sel:gatewayARN:CreateTapeWithBarcode'] :: CreateTapeWithBarcode -> Text
+ Amazonka.StorageGateway.CreateTapeWithBarcode: [$sel:httpStatus:CreateTapeWithBarcodeResponse'] :: CreateTapeWithBarcodeResponse -> Int
+ Amazonka.StorageGateway.CreateTapeWithBarcode: [$sel:kmsEncrypted:CreateTapeWithBarcode'] :: CreateTapeWithBarcode -> Maybe Bool
+ Amazonka.StorageGateway.CreateTapeWithBarcode: [$sel:kmsKey:CreateTapeWithBarcode'] :: CreateTapeWithBarcode -> Maybe Text
+ Amazonka.StorageGateway.CreateTapeWithBarcode: [$sel:poolId:CreateTapeWithBarcode'] :: CreateTapeWithBarcode -> Maybe Text
+ Amazonka.StorageGateway.CreateTapeWithBarcode: [$sel:tags:CreateTapeWithBarcode'] :: CreateTapeWithBarcode -> Maybe [Tag]
+ Amazonka.StorageGateway.CreateTapeWithBarcode: [$sel:tapeARN:CreateTapeWithBarcodeResponse'] :: CreateTapeWithBarcodeResponse -> Maybe Text
+ Amazonka.StorageGateway.CreateTapeWithBarcode: [$sel:tapeBarcode:CreateTapeWithBarcode'] :: CreateTapeWithBarcode -> Text
+ Amazonka.StorageGateway.CreateTapeWithBarcode: [$sel:tapeSizeInBytes:CreateTapeWithBarcode'] :: CreateTapeWithBarcode -> Integer
+ Amazonka.StorageGateway.CreateTapeWithBarcode: [$sel:worm:CreateTapeWithBarcode'] :: CreateTapeWithBarcode -> Maybe Bool
+ Amazonka.StorageGateway.CreateTapeWithBarcode: createTapeWithBarcodeResponse_httpStatus :: Lens' CreateTapeWithBarcodeResponse Int
+ Amazonka.StorageGateway.CreateTapeWithBarcode: createTapeWithBarcodeResponse_tapeARN :: Lens' CreateTapeWithBarcodeResponse (Maybe Text)
+ Amazonka.StorageGateway.CreateTapeWithBarcode: createTapeWithBarcode_gatewayARN :: Lens' CreateTapeWithBarcode Text
+ Amazonka.StorageGateway.CreateTapeWithBarcode: createTapeWithBarcode_kmsEncrypted :: Lens' CreateTapeWithBarcode (Maybe Bool)
+ Amazonka.StorageGateway.CreateTapeWithBarcode: createTapeWithBarcode_kmsKey :: Lens' CreateTapeWithBarcode (Maybe Text)
+ Amazonka.StorageGateway.CreateTapeWithBarcode: createTapeWithBarcode_poolId :: Lens' CreateTapeWithBarcode (Maybe Text)
+ Amazonka.StorageGateway.CreateTapeWithBarcode: createTapeWithBarcode_tags :: Lens' CreateTapeWithBarcode (Maybe [Tag])
+ Amazonka.StorageGateway.CreateTapeWithBarcode: createTapeWithBarcode_tapeBarcode :: Lens' CreateTapeWithBarcode Text
+ Amazonka.StorageGateway.CreateTapeWithBarcode: createTapeWithBarcode_tapeSizeInBytes :: Lens' CreateTapeWithBarcode Integer
+ Amazonka.StorageGateway.CreateTapeWithBarcode: createTapeWithBarcode_worm :: Lens' CreateTapeWithBarcode (Maybe Bool)
+ Amazonka.StorageGateway.CreateTapeWithBarcode: data CreateTapeWithBarcode
+ Amazonka.StorageGateway.CreateTapeWithBarcode: data CreateTapeWithBarcodeResponse
+ Amazonka.StorageGateway.CreateTapeWithBarcode: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.CreateTapeWithBarcode.CreateTapeWithBarcode
+ Amazonka.StorageGateway.CreateTapeWithBarcode: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.CreateTapeWithBarcode.CreateTapeWithBarcode
+ Amazonka.StorageGateway.CreateTapeWithBarcode: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.CreateTapeWithBarcode.CreateTapeWithBarcode
+ Amazonka.StorageGateway.CreateTapeWithBarcode: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.CreateTapeWithBarcode.CreateTapeWithBarcode
+ Amazonka.StorageGateway.CreateTapeWithBarcode: instance Control.DeepSeq.NFData Amazonka.StorageGateway.CreateTapeWithBarcode.CreateTapeWithBarcode
+ Amazonka.StorageGateway.CreateTapeWithBarcode: instance Control.DeepSeq.NFData Amazonka.StorageGateway.CreateTapeWithBarcode.CreateTapeWithBarcodeResponse
+ Amazonka.StorageGateway.CreateTapeWithBarcode: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.CreateTapeWithBarcode.CreateTapeWithBarcode
+ Amazonka.StorageGateway.CreateTapeWithBarcode: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.CreateTapeWithBarcode.CreateTapeWithBarcode
+ Amazonka.StorageGateway.CreateTapeWithBarcode: instance GHC.Classes.Eq Amazonka.StorageGateway.CreateTapeWithBarcode.CreateTapeWithBarcode
+ Amazonka.StorageGateway.CreateTapeWithBarcode: instance GHC.Classes.Eq Amazonka.StorageGateway.CreateTapeWithBarcode.CreateTapeWithBarcodeResponse
+ Amazonka.StorageGateway.CreateTapeWithBarcode: instance GHC.Generics.Generic Amazonka.StorageGateway.CreateTapeWithBarcode.CreateTapeWithBarcode
+ Amazonka.StorageGateway.CreateTapeWithBarcode: instance GHC.Generics.Generic Amazonka.StorageGateway.CreateTapeWithBarcode.CreateTapeWithBarcodeResponse
+ Amazonka.StorageGateway.CreateTapeWithBarcode: instance GHC.Read.Read Amazonka.StorageGateway.CreateTapeWithBarcode.CreateTapeWithBarcode
+ Amazonka.StorageGateway.CreateTapeWithBarcode: instance GHC.Read.Read Amazonka.StorageGateway.CreateTapeWithBarcode.CreateTapeWithBarcodeResponse
+ Amazonka.StorageGateway.CreateTapeWithBarcode: instance GHC.Show.Show Amazonka.StorageGateway.CreateTapeWithBarcode.CreateTapeWithBarcode
+ Amazonka.StorageGateway.CreateTapeWithBarcode: instance GHC.Show.Show Amazonka.StorageGateway.CreateTapeWithBarcode.CreateTapeWithBarcodeResponse
+ Amazonka.StorageGateway.CreateTapeWithBarcode: newCreateTapeWithBarcode :: Text -> Integer -> Text -> CreateTapeWithBarcode
+ Amazonka.StorageGateway.CreateTapeWithBarcode: newCreateTapeWithBarcodeResponse :: Int -> CreateTapeWithBarcodeResponse
+ Amazonka.StorageGateway.CreateTapes: CreateTapes' :: Maybe Bool -> Maybe Text -> Maybe Text -> Maybe [Tag] -> Maybe Bool -> Text -> Integer -> Text -> Natural -> Text -> CreateTapes
+ Amazonka.StorageGateway.CreateTapes: CreateTapesResponse' :: Maybe [Text] -> Int -> CreateTapesResponse
+ Amazonka.StorageGateway.CreateTapes: [$sel:clientToken:CreateTapes'] :: CreateTapes -> Text
+ Amazonka.StorageGateway.CreateTapes: [$sel:gatewayARN:CreateTapes'] :: CreateTapes -> Text
+ Amazonka.StorageGateway.CreateTapes: [$sel:httpStatus:CreateTapesResponse'] :: CreateTapesResponse -> Int
+ Amazonka.StorageGateway.CreateTapes: [$sel:kmsEncrypted:CreateTapes'] :: CreateTapes -> Maybe Bool
+ Amazonka.StorageGateway.CreateTapes: [$sel:kmsKey:CreateTapes'] :: CreateTapes -> Maybe Text
+ Amazonka.StorageGateway.CreateTapes: [$sel:numTapesToCreate:CreateTapes'] :: CreateTapes -> Natural
+ Amazonka.StorageGateway.CreateTapes: [$sel:poolId:CreateTapes'] :: CreateTapes -> Maybe Text
+ Amazonka.StorageGateway.CreateTapes: [$sel:tags:CreateTapes'] :: CreateTapes -> Maybe [Tag]
+ Amazonka.StorageGateway.CreateTapes: [$sel:tapeARNs:CreateTapesResponse'] :: CreateTapesResponse -> Maybe [Text]
+ Amazonka.StorageGateway.CreateTapes: [$sel:tapeBarcodePrefix:CreateTapes'] :: CreateTapes -> Text
+ Amazonka.StorageGateway.CreateTapes: [$sel:tapeSizeInBytes:CreateTapes'] :: CreateTapes -> Integer
+ Amazonka.StorageGateway.CreateTapes: [$sel:worm:CreateTapes'] :: CreateTapes -> Maybe Bool
+ Amazonka.StorageGateway.CreateTapes: createTapesResponse_httpStatus :: Lens' CreateTapesResponse Int
+ Amazonka.StorageGateway.CreateTapes: createTapesResponse_tapeARNs :: Lens' CreateTapesResponse (Maybe [Text])
+ Amazonka.StorageGateway.CreateTapes: createTapes_clientToken :: Lens' CreateTapes Text
+ Amazonka.StorageGateway.CreateTapes: createTapes_gatewayARN :: Lens' CreateTapes Text
+ Amazonka.StorageGateway.CreateTapes: createTapes_kmsEncrypted :: Lens' CreateTapes (Maybe Bool)
+ Amazonka.StorageGateway.CreateTapes: createTapes_kmsKey :: Lens' CreateTapes (Maybe Text)
+ Amazonka.StorageGateway.CreateTapes: createTapes_numTapesToCreate :: Lens' CreateTapes Natural
+ Amazonka.StorageGateway.CreateTapes: createTapes_poolId :: Lens' CreateTapes (Maybe Text)
+ Amazonka.StorageGateway.CreateTapes: createTapes_tags :: Lens' CreateTapes (Maybe [Tag])
+ Amazonka.StorageGateway.CreateTapes: createTapes_tapeBarcodePrefix :: Lens' CreateTapes Text
+ Amazonka.StorageGateway.CreateTapes: createTapes_tapeSizeInBytes :: Lens' CreateTapes Integer
+ Amazonka.StorageGateway.CreateTapes: createTapes_worm :: Lens' CreateTapes (Maybe Bool)
+ Amazonka.StorageGateway.CreateTapes: data CreateTapes
+ Amazonka.StorageGateway.CreateTapes: data CreateTapesResponse
+ Amazonka.StorageGateway.CreateTapes: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.CreateTapes.CreateTapes
+ Amazonka.StorageGateway.CreateTapes: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.CreateTapes.CreateTapes
+ Amazonka.StorageGateway.CreateTapes: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.CreateTapes.CreateTapes
+ Amazonka.StorageGateway.CreateTapes: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.CreateTapes.CreateTapes
+ Amazonka.StorageGateway.CreateTapes: instance Control.DeepSeq.NFData Amazonka.StorageGateway.CreateTapes.CreateTapes
+ Amazonka.StorageGateway.CreateTapes: instance Control.DeepSeq.NFData Amazonka.StorageGateway.CreateTapes.CreateTapesResponse
+ Amazonka.StorageGateway.CreateTapes: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.CreateTapes.CreateTapes
+ Amazonka.StorageGateway.CreateTapes: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.CreateTapes.CreateTapes
+ Amazonka.StorageGateway.CreateTapes: instance GHC.Classes.Eq Amazonka.StorageGateway.CreateTapes.CreateTapes
+ Amazonka.StorageGateway.CreateTapes: instance GHC.Classes.Eq Amazonka.StorageGateway.CreateTapes.CreateTapesResponse
+ Amazonka.StorageGateway.CreateTapes: instance GHC.Generics.Generic Amazonka.StorageGateway.CreateTapes.CreateTapes
+ Amazonka.StorageGateway.CreateTapes: instance GHC.Generics.Generic Amazonka.StorageGateway.CreateTapes.CreateTapesResponse
+ Amazonka.StorageGateway.CreateTapes: instance GHC.Read.Read Amazonka.StorageGateway.CreateTapes.CreateTapes
+ Amazonka.StorageGateway.CreateTapes: instance GHC.Read.Read Amazonka.StorageGateway.CreateTapes.CreateTapesResponse
+ Amazonka.StorageGateway.CreateTapes: instance GHC.Show.Show Amazonka.StorageGateway.CreateTapes.CreateTapes
+ Amazonka.StorageGateway.CreateTapes: instance GHC.Show.Show Amazonka.StorageGateway.CreateTapes.CreateTapesResponse
+ Amazonka.StorageGateway.CreateTapes: newCreateTapes :: Text -> Integer -> Text -> Natural -> Text -> CreateTapes
+ Amazonka.StorageGateway.CreateTapes: newCreateTapesResponse :: Int -> CreateTapesResponse
+ Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy: DeleteAutomaticTapeCreationPolicy' :: Text -> DeleteAutomaticTapeCreationPolicy
+ Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy: DeleteAutomaticTapeCreationPolicyResponse' :: Maybe Text -> Int -> DeleteAutomaticTapeCreationPolicyResponse
+ Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy: [$sel:gatewayARN:DeleteAutomaticTapeCreationPolicy'] :: DeleteAutomaticTapeCreationPolicy -> Text
+ Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy: [$sel:gatewayARN:DeleteAutomaticTapeCreationPolicyResponse'] :: DeleteAutomaticTapeCreationPolicyResponse -> Maybe Text
+ Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy: [$sel:httpStatus:DeleteAutomaticTapeCreationPolicyResponse'] :: DeleteAutomaticTapeCreationPolicyResponse -> Int
+ Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy: data DeleteAutomaticTapeCreationPolicy
+ Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy: data DeleteAutomaticTapeCreationPolicyResponse
+ Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy: deleteAutomaticTapeCreationPolicyResponse_gatewayARN :: Lens' DeleteAutomaticTapeCreationPolicyResponse (Maybe Text)
+ Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy: deleteAutomaticTapeCreationPolicyResponse_httpStatus :: Lens' DeleteAutomaticTapeCreationPolicyResponse Int
+ Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy: deleteAutomaticTapeCreationPolicy_gatewayARN :: Lens' DeleteAutomaticTapeCreationPolicy Text
+ Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy.DeleteAutomaticTapeCreationPolicy
+ Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy.DeleteAutomaticTapeCreationPolicy
+ Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy.DeleteAutomaticTapeCreationPolicy
+ Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy.DeleteAutomaticTapeCreationPolicy
+ Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy.DeleteAutomaticTapeCreationPolicy
+ Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy.DeleteAutomaticTapeCreationPolicyResponse
+ Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy.DeleteAutomaticTapeCreationPolicy
+ Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy.DeleteAutomaticTapeCreationPolicy
+ Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy: instance GHC.Classes.Eq Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy.DeleteAutomaticTapeCreationPolicy
+ Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy: instance GHC.Classes.Eq Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy.DeleteAutomaticTapeCreationPolicyResponse
+ Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy: instance GHC.Generics.Generic Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy.DeleteAutomaticTapeCreationPolicy
+ Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy: instance GHC.Generics.Generic Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy.DeleteAutomaticTapeCreationPolicyResponse
+ Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy: instance GHC.Read.Read Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy.DeleteAutomaticTapeCreationPolicy
+ Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy: instance GHC.Read.Read Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy.DeleteAutomaticTapeCreationPolicyResponse
+ Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy: instance GHC.Show.Show Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy.DeleteAutomaticTapeCreationPolicy
+ Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy: instance GHC.Show.Show Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy.DeleteAutomaticTapeCreationPolicyResponse
+ Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy: newDeleteAutomaticTapeCreationPolicy :: Text -> DeleteAutomaticTapeCreationPolicy
+ Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy: newDeleteAutomaticTapeCreationPolicyResponse :: Int -> DeleteAutomaticTapeCreationPolicyResponse
+ Amazonka.StorageGateway.DeleteBandwidthRateLimit: DeleteBandwidthRateLimit' :: Text -> Text -> DeleteBandwidthRateLimit
+ Amazonka.StorageGateway.DeleteBandwidthRateLimit: DeleteBandwidthRateLimitResponse' :: Maybe Text -> Int -> DeleteBandwidthRateLimitResponse
+ Amazonka.StorageGateway.DeleteBandwidthRateLimit: [$sel:bandwidthType:DeleteBandwidthRateLimit'] :: DeleteBandwidthRateLimit -> Text
+ Amazonka.StorageGateway.DeleteBandwidthRateLimit: [$sel:gatewayARN:DeleteBandwidthRateLimit'] :: DeleteBandwidthRateLimit -> Text
+ Amazonka.StorageGateway.DeleteBandwidthRateLimit: [$sel:gatewayARN:DeleteBandwidthRateLimitResponse'] :: DeleteBandwidthRateLimitResponse -> Maybe Text
+ Amazonka.StorageGateway.DeleteBandwidthRateLimit: [$sel:httpStatus:DeleteBandwidthRateLimitResponse'] :: DeleteBandwidthRateLimitResponse -> Int
+ Amazonka.StorageGateway.DeleteBandwidthRateLimit: data DeleteBandwidthRateLimit
+ Amazonka.StorageGateway.DeleteBandwidthRateLimit: data DeleteBandwidthRateLimitResponse
+ Amazonka.StorageGateway.DeleteBandwidthRateLimit: deleteBandwidthRateLimitResponse_gatewayARN :: Lens' DeleteBandwidthRateLimitResponse (Maybe Text)
+ Amazonka.StorageGateway.DeleteBandwidthRateLimit: deleteBandwidthRateLimitResponse_httpStatus :: Lens' DeleteBandwidthRateLimitResponse Int
+ Amazonka.StorageGateway.DeleteBandwidthRateLimit: deleteBandwidthRateLimit_bandwidthType :: Lens' DeleteBandwidthRateLimit Text
+ Amazonka.StorageGateway.DeleteBandwidthRateLimit: deleteBandwidthRateLimit_gatewayARN :: Lens' DeleteBandwidthRateLimit Text
+ Amazonka.StorageGateway.DeleteBandwidthRateLimit: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.DeleteBandwidthRateLimit.DeleteBandwidthRateLimit
+ Amazonka.StorageGateway.DeleteBandwidthRateLimit: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.DeleteBandwidthRateLimit.DeleteBandwidthRateLimit
+ Amazonka.StorageGateway.DeleteBandwidthRateLimit: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.DeleteBandwidthRateLimit.DeleteBandwidthRateLimit
+ Amazonka.StorageGateway.DeleteBandwidthRateLimit: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.DeleteBandwidthRateLimit.DeleteBandwidthRateLimit
+ Amazonka.StorageGateway.DeleteBandwidthRateLimit: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DeleteBandwidthRateLimit.DeleteBandwidthRateLimit
+ Amazonka.StorageGateway.DeleteBandwidthRateLimit: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DeleteBandwidthRateLimit.DeleteBandwidthRateLimitResponse
+ Amazonka.StorageGateway.DeleteBandwidthRateLimit: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.DeleteBandwidthRateLimit.DeleteBandwidthRateLimit
+ Amazonka.StorageGateway.DeleteBandwidthRateLimit: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.DeleteBandwidthRateLimit.DeleteBandwidthRateLimit
+ Amazonka.StorageGateway.DeleteBandwidthRateLimit: instance GHC.Classes.Eq Amazonka.StorageGateway.DeleteBandwidthRateLimit.DeleteBandwidthRateLimit
+ Amazonka.StorageGateway.DeleteBandwidthRateLimit: instance GHC.Classes.Eq Amazonka.StorageGateway.DeleteBandwidthRateLimit.DeleteBandwidthRateLimitResponse
+ Amazonka.StorageGateway.DeleteBandwidthRateLimit: instance GHC.Generics.Generic Amazonka.StorageGateway.DeleteBandwidthRateLimit.DeleteBandwidthRateLimit
+ Amazonka.StorageGateway.DeleteBandwidthRateLimit: instance GHC.Generics.Generic Amazonka.StorageGateway.DeleteBandwidthRateLimit.DeleteBandwidthRateLimitResponse
+ Amazonka.StorageGateway.DeleteBandwidthRateLimit: instance GHC.Read.Read Amazonka.StorageGateway.DeleteBandwidthRateLimit.DeleteBandwidthRateLimit
+ Amazonka.StorageGateway.DeleteBandwidthRateLimit: instance GHC.Read.Read Amazonka.StorageGateway.DeleteBandwidthRateLimit.DeleteBandwidthRateLimitResponse
+ Amazonka.StorageGateway.DeleteBandwidthRateLimit: instance GHC.Show.Show Amazonka.StorageGateway.DeleteBandwidthRateLimit.DeleteBandwidthRateLimit
+ Amazonka.StorageGateway.DeleteBandwidthRateLimit: instance GHC.Show.Show Amazonka.StorageGateway.DeleteBandwidthRateLimit.DeleteBandwidthRateLimitResponse
+ Amazonka.StorageGateway.DeleteBandwidthRateLimit: newDeleteBandwidthRateLimit :: Text -> Text -> DeleteBandwidthRateLimit
+ Amazonka.StorageGateway.DeleteBandwidthRateLimit: newDeleteBandwidthRateLimitResponse :: Int -> DeleteBandwidthRateLimitResponse
+ Amazonka.StorageGateway.DeleteChapCredentials: DeleteChapCredentials' :: Text -> Text -> DeleteChapCredentials
+ Amazonka.StorageGateway.DeleteChapCredentials: DeleteChapCredentialsResponse' :: Maybe Text -> Maybe Text -> Int -> DeleteChapCredentialsResponse
+ Amazonka.StorageGateway.DeleteChapCredentials: [$sel:httpStatus:DeleteChapCredentialsResponse'] :: DeleteChapCredentialsResponse -> Int
+ Amazonka.StorageGateway.DeleteChapCredentials: [$sel:initiatorName:DeleteChapCredentials'] :: DeleteChapCredentials -> Text
+ Amazonka.StorageGateway.DeleteChapCredentials: [$sel:initiatorName:DeleteChapCredentialsResponse'] :: DeleteChapCredentialsResponse -> Maybe Text
+ Amazonka.StorageGateway.DeleteChapCredentials: [$sel:targetARN:DeleteChapCredentials'] :: DeleteChapCredentials -> Text
+ Amazonka.StorageGateway.DeleteChapCredentials: [$sel:targetARN:DeleteChapCredentialsResponse'] :: DeleteChapCredentialsResponse -> Maybe Text
+ Amazonka.StorageGateway.DeleteChapCredentials: data DeleteChapCredentials
+ Amazonka.StorageGateway.DeleteChapCredentials: data DeleteChapCredentialsResponse
+ Amazonka.StorageGateway.DeleteChapCredentials: deleteChapCredentialsResponse_httpStatus :: Lens' DeleteChapCredentialsResponse Int
+ Amazonka.StorageGateway.DeleteChapCredentials: deleteChapCredentialsResponse_initiatorName :: Lens' DeleteChapCredentialsResponse (Maybe Text)
+ Amazonka.StorageGateway.DeleteChapCredentials: deleteChapCredentialsResponse_targetARN :: Lens' DeleteChapCredentialsResponse (Maybe Text)
+ Amazonka.StorageGateway.DeleteChapCredentials: deleteChapCredentials_initiatorName :: Lens' DeleteChapCredentials Text
+ Amazonka.StorageGateway.DeleteChapCredentials: deleteChapCredentials_targetARN :: Lens' DeleteChapCredentials Text
+ Amazonka.StorageGateway.DeleteChapCredentials: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.DeleteChapCredentials.DeleteChapCredentials
+ Amazonka.StorageGateway.DeleteChapCredentials: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.DeleteChapCredentials.DeleteChapCredentials
+ Amazonka.StorageGateway.DeleteChapCredentials: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.DeleteChapCredentials.DeleteChapCredentials
+ Amazonka.StorageGateway.DeleteChapCredentials: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.DeleteChapCredentials.DeleteChapCredentials
+ Amazonka.StorageGateway.DeleteChapCredentials: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DeleteChapCredentials.DeleteChapCredentials
+ Amazonka.StorageGateway.DeleteChapCredentials: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DeleteChapCredentials.DeleteChapCredentialsResponse
+ Amazonka.StorageGateway.DeleteChapCredentials: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.DeleteChapCredentials.DeleteChapCredentials
+ Amazonka.StorageGateway.DeleteChapCredentials: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.DeleteChapCredentials.DeleteChapCredentials
+ Amazonka.StorageGateway.DeleteChapCredentials: instance GHC.Classes.Eq Amazonka.StorageGateway.DeleteChapCredentials.DeleteChapCredentials
+ Amazonka.StorageGateway.DeleteChapCredentials: instance GHC.Classes.Eq Amazonka.StorageGateway.DeleteChapCredentials.DeleteChapCredentialsResponse
+ Amazonka.StorageGateway.DeleteChapCredentials: instance GHC.Generics.Generic Amazonka.StorageGateway.DeleteChapCredentials.DeleteChapCredentials
+ Amazonka.StorageGateway.DeleteChapCredentials: instance GHC.Generics.Generic Amazonka.StorageGateway.DeleteChapCredentials.DeleteChapCredentialsResponse
+ Amazonka.StorageGateway.DeleteChapCredentials: instance GHC.Read.Read Amazonka.StorageGateway.DeleteChapCredentials.DeleteChapCredentials
+ Amazonka.StorageGateway.DeleteChapCredentials: instance GHC.Read.Read Amazonka.StorageGateway.DeleteChapCredentials.DeleteChapCredentialsResponse
+ Amazonka.StorageGateway.DeleteChapCredentials: instance GHC.Show.Show Amazonka.StorageGateway.DeleteChapCredentials.DeleteChapCredentials
+ Amazonka.StorageGateway.DeleteChapCredentials: instance GHC.Show.Show Amazonka.StorageGateway.DeleteChapCredentials.DeleteChapCredentialsResponse
+ Amazonka.StorageGateway.DeleteChapCredentials: newDeleteChapCredentials :: Text -> Text -> DeleteChapCredentials
+ Amazonka.StorageGateway.DeleteChapCredentials: newDeleteChapCredentialsResponse :: Int -> DeleteChapCredentialsResponse
+ Amazonka.StorageGateway.DeleteFileShare: DeleteFileShare' :: Maybe Bool -> Text -> DeleteFileShare
+ Amazonka.StorageGateway.DeleteFileShare: DeleteFileShareResponse' :: Maybe Text -> Int -> DeleteFileShareResponse
+ Amazonka.StorageGateway.DeleteFileShare: [$sel:fileShareARN:DeleteFileShare'] :: DeleteFileShare -> Text
+ Amazonka.StorageGateway.DeleteFileShare: [$sel:fileShareARN:DeleteFileShareResponse'] :: DeleteFileShareResponse -> Maybe Text
+ Amazonka.StorageGateway.DeleteFileShare: [$sel:forceDelete:DeleteFileShare'] :: DeleteFileShare -> Maybe Bool
+ Amazonka.StorageGateway.DeleteFileShare: [$sel:httpStatus:DeleteFileShareResponse'] :: DeleteFileShareResponse -> Int
+ Amazonka.StorageGateway.DeleteFileShare: data DeleteFileShare
+ Amazonka.StorageGateway.DeleteFileShare: data DeleteFileShareResponse
+ Amazonka.StorageGateway.DeleteFileShare: deleteFileShareResponse_fileShareARN :: Lens' DeleteFileShareResponse (Maybe Text)
+ Amazonka.StorageGateway.DeleteFileShare: deleteFileShareResponse_httpStatus :: Lens' DeleteFileShareResponse Int
+ Amazonka.StorageGateway.DeleteFileShare: deleteFileShare_fileShareARN :: Lens' DeleteFileShare Text
+ Amazonka.StorageGateway.DeleteFileShare: deleteFileShare_forceDelete :: Lens' DeleteFileShare (Maybe Bool)
+ Amazonka.StorageGateway.DeleteFileShare: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.DeleteFileShare.DeleteFileShare
+ Amazonka.StorageGateway.DeleteFileShare: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.DeleteFileShare.DeleteFileShare
+ Amazonka.StorageGateway.DeleteFileShare: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.DeleteFileShare.DeleteFileShare
+ Amazonka.StorageGateway.DeleteFileShare: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.DeleteFileShare.DeleteFileShare
+ Amazonka.StorageGateway.DeleteFileShare: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DeleteFileShare.DeleteFileShare
+ Amazonka.StorageGateway.DeleteFileShare: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DeleteFileShare.DeleteFileShareResponse
+ Amazonka.StorageGateway.DeleteFileShare: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.DeleteFileShare.DeleteFileShare
+ Amazonka.StorageGateway.DeleteFileShare: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.DeleteFileShare.DeleteFileShare
+ Amazonka.StorageGateway.DeleteFileShare: instance GHC.Classes.Eq Amazonka.StorageGateway.DeleteFileShare.DeleteFileShare
+ Amazonka.StorageGateway.DeleteFileShare: instance GHC.Classes.Eq Amazonka.StorageGateway.DeleteFileShare.DeleteFileShareResponse
+ Amazonka.StorageGateway.DeleteFileShare: instance GHC.Generics.Generic Amazonka.StorageGateway.DeleteFileShare.DeleteFileShare
+ Amazonka.StorageGateway.DeleteFileShare: instance GHC.Generics.Generic Amazonka.StorageGateway.DeleteFileShare.DeleteFileShareResponse
+ Amazonka.StorageGateway.DeleteFileShare: instance GHC.Read.Read Amazonka.StorageGateway.DeleteFileShare.DeleteFileShare
+ Amazonka.StorageGateway.DeleteFileShare: instance GHC.Read.Read Amazonka.StorageGateway.DeleteFileShare.DeleteFileShareResponse
+ Amazonka.StorageGateway.DeleteFileShare: instance GHC.Show.Show Amazonka.StorageGateway.DeleteFileShare.DeleteFileShare
+ Amazonka.StorageGateway.DeleteFileShare: instance GHC.Show.Show Amazonka.StorageGateway.DeleteFileShare.DeleteFileShareResponse
+ Amazonka.StorageGateway.DeleteFileShare: newDeleteFileShare :: Text -> DeleteFileShare
+ Amazonka.StorageGateway.DeleteFileShare: newDeleteFileShareResponse :: Int -> DeleteFileShareResponse
+ Amazonka.StorageGateway.DeleteGateway: DeleteGateway' :: Text -> DeleteGateway
+ Amazonka.StorageGateway.DeleteGateway: DeleteGatewayResponse' :: Maybe Text -> Int -> DeleteGatewayResponse
+ Amazonka.StorageGateway.DeleteGateway: [$sel:gatewayARN:DeleteGateway'] :: DeleteGateway -> Text
+ Amazonka.StorageGateway.DeleteGateway: [$sel:gatewayARN:DeleteGatewayResponse'] :: DeleteGatewayResponse -> Maybe Text
+ Amazonka.StorageGateway.DeleteGateway: [$sel:httpStatus:DeleteGatewayResponse'] :: DeleteGatewayResponse -> Int
+ Amazonka.StorageGateway.DeleteGateway: data DeleteGateway
+ Amazonka.StorageGateway.DeleteGateway: data DeleteGatewayResponse
+ Amazonka.StorageGateway.DeleteGateway: deleteGatewayResponse_gatewayARN :: Lens' DeleteGatewayResponse (Maybe Text)
+ Amazonka.StorageGateway.DeleteGateway: deleteGatewayResponse_httpStatus :: Lens' DeleteGatewayResponse Int
+ Amazonka.StorageGateway.DeleteGateway: deleteGateway_gatewayARN :: Lens' DeleteGateway Text
+ Amazonka.StorageGateway.DeleteGateway: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.DeleteGateway.DeleteGateway
+ Amazonka.StorageGateway.DeleteGateway: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.DeleteGateway.DeleteGateway
+ Amazonka.StorageGateway.DeleteGateway: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.DeleteGateway.DeleteGateway
+ Amazonka.StorageGateway.DeleteGateway: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.DeleteGateway.DeleteGateway
+ Amazonka.StorageGateway.DeleteGateway: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DeleteGateway.DeleteGateway
+ Amazonka.StorageGateway.DeleteGateway: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DeleteGateway.DeleteGatewayResponse
+ Amazonka.StorageGateway.DeleteGateway: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.DeleteGateway.DeleteGateway
+ Amazonka.StorageGateway.DeleteGateway: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.DeleteGateway.DeleteGateway
+ Amazonka.StorageGateway.DeleteGateway: instance GHC.Classes.Eq Amazonka.StorageGateway.DeleteGateway.DeleteGateway
+ Amazonka.StorageGateway.DeleteGateway: instance GHC.Classes.Eq Amazonka.StorageGateway.DeleteGateway.DeleteGatewayResponse
+ Amazonka.StorageGateway.DeleteGateway: instance GHC.Generics.Generic Amazonka.StorageGateway.DeleteGateway.DeleteGateway
+ Amazonka.StorageGateway.DeleteGateway: instance GHC.Generics.Generic Amazonka.StorageGateway.DeleteGateway.DeleteGatewayResponse
+ Amazonka.StorageGateway.DeleteGateway: instance GHC.Read.Read Amazonka.StorageGateway.DeleteGateway.DeleteGateway
+ Amazonka.StorageGateway.DeleteGateway: instance GHC.Read.Read Amazonka.StorageGateway.DeleteGateway.DeleteGatewayResponse
+ Amazonka.StorageGateway.DeleteGateway: instance GHC.Show.Show Amazonka.StorageGateway.DeleteGateway.DeleteGateway
+ Amazonka.StorageGateway.DeleteGateway: instance GHC.Show.Show Amazonka.StorageGateway.DeleteGateway.DeleteGatewayResponse
+ Amazonka.StorageGateway.DeleteGateway: newDeleteGateway :: Text -> DeleteGateway
+ Amazonka.StorageGateway.DeleteGateway: newDeleteGatewayResponse :: Int -> DeleteGatewayResponse
+ Amazonka.StorageGateway.DeleteSnapshotSchedule: DeleteSnapshotSchedule' :: Text -> DeleteSnapshotSchedule
+ Amazonka.StorageGateway.DeleteSnapshotSchedule: DeleteSnapshotScheduleResponse' :: Maybe Text -> Int -> DeleteSnapshotScheduleResponse
+ Amazonka.StorageGateway.DeleteSnapshotSchedule: [$sel:httpStatus:DeleteSnapshotScheduleResponse'] :: DeleteSnapshotScheduleResponse -> Int
+ Amazonka.StorageGateway.DeleteSnapshotSchedule: [$sel:volumeARN:DeleteSnapshotSchedule'] :: DeleteSnapshotSchedule -> Text
+ Amazonka.StorageGateway.DeleteSnapshotSchedule: [$sel:volumeARN:DeleteSnapshotScheduleResponse'] :: DeleteSnapshotScheduleResponse -> Maybe Text
+ Amazonka.StorageGateway.DeleteSnapshotSchedule: data DeleteSnapshotSchedule
+ Amazonka.StorageGateway.DeleteSnapshotSchedule: data DeleteSnapshotScheduleResponse
+ Amazonka.StorageGateway.DeleteSnapshotSchedule: deleteSnapshotScheduleResponse_httpStatus :: Lens' DeleteSnapshotScheduleResponse Int
+ Amazonka.StorageGateway.DeleteSnapshotSchedule: deleteSnapshotScheduleResponse_volumeARN :: Lens' DeleteSnapshotScheduleResponse (Maybe Text)
+ Amazonka.StorageGateway.DeleteSnapshotSchedule: deleteSnapshotSchedule_volumeARN :: Lens' DeleteSnapshotSchedule Text
+ Amazonka.StorageGateway.DeleteSnapshotSchedule: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.DeleteSnapshotSchedule.DeleteSnapshotSchedule
+ Amazonka.StorageGateway.DeleteSnapshotSchedule: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.DeleteSnapshotSchedule.DeleteSnapshotSchedule
+ Amazonka.StorageGateway.DeleteSnapshotSchedule: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.DeleteSnapshotSchedule.DeleteSnapshotSchedule
+ Amazonka.StorageGateway.DeleteSnapshotSchedule: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.DeleteSnapshotSchedule.DeleteSnapshotSchedule
+ Amazonka.StorageGateway.DeleteSnapshotSchedule: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DeleteSnapshotSchedule.DeleteSnapshotSchedule
+ Amazonka.StorageGateway.DeleteSnapshotSchedule: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DeleteSnapshotSchedule.DeleteSnapshotScheduleResponse
+ Amazonka.StorageGateway.DeleteSnapshotSchedule: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.DeleteSnapshotSchedule.DeleteSnapshotSchedule
+ Amazonka.StorageGateway.DeleteSnapshotSchedule: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.DeleteSnapshotSchedule.DeleteSnapshotSchedule
+ Amazonka.StorageGateway.DeleteSnapshotSchedule: instance GHC.Classes.Eq Amazonka.StorageGateway.DeleteSnapshotSchedule.DeleteSnapshotSchedule
+ Amazonka.StorageGateway.DeleteSnapshotSchedule: instance GHC.Classes.Eq Amazonka.StorageGateway.DeleteSnapshotSchedule.DeleteSnapshotScheduleResponse
+ Amazonka.StorageGateway.DeleteSnapshotSchedule: instance GHC.Generics.Generic Amazonka.StorageGateway.DeleteSnapshotSchedule.DeleteSnapshotSchedule
+ Amazonka.StorageGateway.DeleteSnapshotSchedule: instance GHC.Generics.Generic Amazonka.StorageGateway.DeleteSnapshotSchedule.DeleteSnapshotScheduleResponse
+ Amazonka.StorageGateway.DeleteSnapshotSchedule: instance GHC.Read.Read Amazonka.StorageGateway.DeleteSnapshotSchedule.DeleteSnapshotSchedule
+ Amazonka.StorageGateway.DeleteSnapshotSchedule: instance GHC.Read.Read Amazonka.StorageGateway.DeleteSnapshotSchedule.DeleteSnapshotScheduleResponse
+ Amazonka.StorageGateway.DeleteSnapshotSchedule: instance GHC.Show.Show Amazonka.StorageGateway.DeleteSnapshotSchedule.DeleteSnapshotSchedule
+ Amazonka.StorageGateway.DeleteSnapshotSchedule: instance GHC.Show.Show Amazonka.StorageGateway.DeleteSnapshotSchedule.DeleteSnapshotScheduleResponse
+ Amazonka.StorageGateway.DeleteSnapshotSchedule: newDeleteSnapshotSchedule :: Text -> DeleteSnapshotSchedule
+ Amazonka.StorageGateway.DeleteSnapshotSchedule: newDeleteSnapshotScheduleResponse :: Int -> DeleteSnapshotScheduleResponse
+ Amazonka.StorageGateway.DeleteTape: DeleteTape' :: Maybe Bool -> Text -> Text -> DeleteTape
+ Amazonka.StorageGateway.DeleteTape: DeleteTapeResponse' :: Maybe Text -> Int -> DeleteTapeResponse
+ Amazonka.StorageGateway.DeleteTape: [$sel:bypassGovernanceRetention:DeleteTape'] :: DeleteTape -> Maybe Bool
+ Amazonka.StorageGateway.DeleteTape: [$sel:gatewayARN:DeleteTape'] :: DeleteTape -> Text
+ Amazonka.StorageGateway.DeleteTape: [$sel:httpStatus:DeleteTapeResponse'] :: DeleteTapeResponse -> Int
+ Amazonka.StorageGateway.DeleteTape: [$sel:tapeARN:DeleteTape'] :: DeleteTape -> Text
+ Amazonka.StorageGateway.DeleteTape: [$sel:tapeARN:DeleteTapeResponse'] :: DeleteTapeResponse -> Maybe Text
+ Amazonka.StorageGateway.DeleteTape: data DeleteTape
+ Amazonka.StorageGateway.DeleteTape: data DeleteTapeResponse
+ Amazonka.StorageGateway.DeleteTape: deleteTapeResponse_httpStatus :: Lens' DeleteTapeResponse Int
+ Amazonka.StorageGateway.DeleteTape: deleteTapeResponse_tapeARN :: Lens' DeleteTapeResponse (Maybe Text)
+ Amazonka.StorageGateway.DeleteTape: deleteTape_bypassGovernanceRetention :: Lens' DeleteTape (Maybe Bool)
+ Amazonka.StorageGateway.DeleteTape: deleteTape_gatewayARN :: Lens' DeleteTape Text
+ Amazonka.StorageGateway.DeleteTape: deleteTape_tapeARN :: Lens' DeleteTape Text
+ Amazonka.StorageGateway.DeleteTape: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.DeleteTape.DeleteTape
+ Amazonka.StorageGateway.DeleteTape: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.DeleteTape.DeleteTape
+ Amazonka.StorageGateway.DeleteTape: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.DeleteTape.DeleteTape
+ Amazonka.StorageGateway.DeleteTape: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.DeleteTape.DeleteTape
+ Amazonka.StorageGateway.DeleteTape: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DeleteTape.DeleteTape
+ Amazonka.StorageGateway.DeleteTape: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DeleteTape.DeleteTapeResponse
+ Amazonka.StorageGateway.DeleteTape: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.DeleteTape.DeleteTape
+ Amazonka.StorageGateway.DeleteTape: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.DeleteTape.DeleteTape
+ Amazonka.StorageGateway.DeleteTape: instance GHC.Classes.Eq Amazonka.StorageGateway.DeleteTape.DeleteTape
+ Amazonka.StorageGateway.DeleteTape: instance GHC.Classes.Eq Amazonka.StorageGateway.DeleteTape.DeleteTapeResponse
+ Amazonka.StorageGateway.DeleteTape: instance GHC.Generics.Generic Amazonka.StorageGateway.DeleteTape.DeleteTape
+ Amazonka.StorageGateway.DeleteTape: instance GHC.Generics.Generic Amazonka.StorageGateway.DeleteTape.DeleteTapeResponse
+ Amazonka.StorageGateway.DeleteTape: instance GHC.Read.Read Amazonka.StorageGateway.DeleteTape.DeleteTape
+ Amazonka.StorageGateway.DeleteTape: instance GHC.Read.Read Amazonka.StorageGateway.DeleteTape.DeleteTapeResponse
+ Amazonka.StorageGateway.DeleteTape: instance GHC.Show.Show Amazonka.StorageGateway.DeleteTape.DeleteTape
+ Amazonka.StorageGateway.DeleteTape: instance GHC.Show.Show Amazonka.StorageGateway.DeleteTape.DeleteTapeResponse
+ Amazonka.StorageGateway.DeleteTape: newDeleteTape :: Text -> Text -> DeleteTape
+ Amazonka.StorageGateway.DeleteTape: newDeleteTapeResponse :: Int -> DeleteTapeResponse
+ Amazonka.StorageGateway.DeleteTapeArchive: DeleteTapeArchive' :: Maybe Bool -> Text -> DeleteTapeArchive
+ Amazonka.StorageGateway.DeleteTapeArchive: DeleteTapeArchiveResponse' :: Maybe Text -> Int -> DeleteTapeArchiveResponse
+ Amazonka.StorageGateway.DeleteTapeArchive: [$sel:bypassGovernanceRetention:DeleteTapeArchive'] :: DeleteTapeArchive -> Maybe Bool
+ Amazonka.StorageGateway.DeleteTapeArchive: [$sel:httpStatus:DeleteTapeArchiveResponse'] :: DeleteTapeArchiveResponse -> Int
+ Amazonka.StorageGateway.DeleteTapeArchive: [$sel:tapeARN:DeleteTapeArchive'] :: DeleteTapeArchive -> Text
+ Amazonka.StorageGateway.DeleteTapeArchive: [$sel:tapeARN:DeleteTapeArchiveResponse'] :: DeleteTapeArchiveResponse -> Maybe Text
+ Amazonka.StorageGateway.DeleteTapeArchive: data DeleteTapeArchive
+ Amazonka.StorageGateway.DeleteTapeArchive: data DeleteTapeArchiveResponse
+ Amazonka.StorageGateway.DeleteTapeArchive: deleteTapeArchiveResponse_httpStatus :: Lens' DeleteTapeArchiveResponse Int
+ Amazonka.StorageGateway.DeleteTapeArchive: deleteTapeArchiveResponse_tapeARN :: Lens' DeleteTapeArchiveResponse (Maybe Text)
+ Amazonka.StorageGateway.DeleteTapeArchive: deleteTapeArchive_bypassGovernanceRetention :: Lens' DeleteTapeArchive (Maybe Bool)
+ Amazonka.StorageGateway.DeleteTapeArchive: deleteTapeArchive_tapeARN :: Lens' DeleteTapeArchive Text
+ Amazonka.StorageGateway.DeleteTapeArchive: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.DeleteTapeArchive.DeleteTapeArchive
+ Amazonka.StorageGateway.DeleteTapeArchive: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.DeleteTapeArchive.DeleteTapeArchive
+ Amazonka.StorageGateway.DeleteTapeArchive: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.DeleteTapeArchive.DeleteTapeArchive
+ Amazonka.StorageGateway.DeleteTapeArchive: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.DeleteTapeArchive.DeleteTapeArchive
+ Amazonka.StorageGateway.DeleteTapeArchive: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DeleteTapeArchive.DeleteTapeArchive
+ Amazonka.StorageGateway.DeleteTapeArchive: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DeleteTapeArchive.DeleteTapeArchiveResponse
+ Amazonka.StorageGateway.DeleteTapeArchive: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.DeleteTapeArchive.DeleteTapeArchive
+ Amazonka.StorageGateway.DeleteTapeArchive: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.DeleteTapeArchive.DeleteTapeArchive
+ Amazonka.StorageGateway.DeleteTapeArchive: instance GHC.Classes.Eq Amazonka.StorageGateway.DeleteTapeArchive.DeleteTapeArchive
+ Amazonka.StorageGateway.DeleteTapeArchive: instance GHC.Classes.Eq Amazonka.StorageGateway.DeleteTapeArchive.DeleteTapeArchiveResponse
+ Amazonka.StorageGateway.DeleteTapeArchive: instance GHC.Generics.Generic Amazonka.StorageGateway.DeleteTapeArchive.DeleteTapeArchive
+ Amazonka.StorageGateway.DeleteTapeArchive: instance GHC.Generics.Generic Amazonka.StorageGateway.DeleteTapeArchive.DeleteTapeArchiveResponse
+ Amazonka.StorageGateway.DeleteTapeArchive: instance GHC.Read.Read Amazonka.StorageGateway.DeleteTapeArchive.DeleteTapeArchive
+ Amazonka.StorageGateway.DeleteTapeArchive: instance GHC.Read.Read Amazonka.StorageGateway.DeleteTapeArchive.DeleteTapeArchiveResponse
+ Amazonka.StorageGateway.DeleteTapeArchive: instance GHC.Show.Show Amazonka.StorageGateway.DeleteTapeArchive.DeleteTapeArchive
+ Amazonka.StorageGateway.DeleteTapeArchive: instance GHC.Show.Show Amazonka.StorageGateway.DeleteTapeArchive.DeleteTapeArchiveResponse
+ Amazonka.StorageGateway.DeleteTapeArchive: newDeleteTapeArchive :: Text -> DeleteTapeArchive
+ Amazonka.StorageGateway.DeleteTapeArchive: newDeleteTapeArchiveResponse :: Int -> DeleteTapeArchiveResponse
+ Amazonka.StorageGateway.DeleteTapePool: DeleteTapePool' :: Text -> DeleteTapePool
+ Amazonka.StorageGateway.DeleteTapePool: DeleteTapePoolResponse' :: Maybe Text -> Int -> DeleteTapePoolResponse
+ Amazonka.StorageGateway.DeleteTapePool: [$sel:httpStatus:DeleteTapePoolResponse'] :: DeleteTapePoolResponse -> Int
+ Amazonka.StorageGateway.DeleteTapePool: [$sel:poolARN:DeleteTapePool'] :: DeleteTapePool -> Text
+ Amazonka.StorageGateway.DeleteTapePool: [$sel:poolARN:DeleteTapePoolResponse'] :: DeleteTapePoolResponse -> Maybe Text
+ Amazonka.StorageGateway.DeleteTapePool: data DeleteTapePool
+ Amazonka.StorageGateway.DeleteTapePool: data DeleteTapePoolResponse
+ Amazonka.StorageGateway.DeleteTapePool: deleteTapePoolResponse_httpStatus :: Lens' DeleteTapePoolResponse Int
+ Amazonka.StorageGateway.DeleteTapePool: deleteTapePoolResponse_poolARN :: Lens' DeleteTapePoolResponse (Maybe Text)
+ Amazonka.StorageGateway.DeleteTapePool: deleteTapePool_poolARN :: Lens' DeleteTapePool Text
+ Amazonka.StorageGateway.DeleteTapePool: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.DeleteTapePool.DeleteTapePool
+ Amazonka.StorageGateway.DeleteTapePool: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.DeleteTapePool.DeleteTapePool
+ Amazonka.StorageGateway.DeleteTapePool: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.DeleteTapePool.DeleteTapePool
+ Amazonka.StorageGateway.DeleteTapePool: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.DeleteTapePool.DeleteTapePool
+ Amazonka.StorageGateway.DeleteTapePool: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DeleteTapePool.DeleteTapePool
+ Amazonka.StorageGateway.DeleteTapePool: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DeleteTapePool.DeleteTapePoolResponse
+ Amazonka.StorageGateway.DeleteTapePool: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.DeleteTapePool.DeleteTapePool
+ Amazonka.StorageGateway.DeleteTapePool: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.DeleteTapePool.DeleteTapePool
+ Amazonka.StorageGateway.DeleteTapePool: instance GHC.Classes.Eq Amazonka.StorageGateway.DeleteTapePool.DeleteTapePool
+ Amazonka.StorageGateway.DeleteTapePool: instance GHC.Classes.Eq Amazonka.StorageGateway.DeleteTapePool.DeleteTapePoolResponse
+ Amazonka.StorageGateway.DeleteTapePool: instance GHC.Generics.Generic Amazonka.StorageGateway.DeleteTapePool.DeleteTapePool
+ Amazonka.StorageGateway.DeleteTapePool: instance GHC.Generics.Generic Amazonka.StorageGateway.DeleteTapePool.DeleteTapePoolResponse
+ Amazonka.StorageGateway.DeleteTapePool: instance GHC.Read.Read Amazonka.StorageGateway.DeleteTapePool.DeleteTapePool
+ Amazonka.StorageGateway.DeleteTapePool: instance GHC.Read.Read Amazonka.StorageGateway.DeleteTapePool.DeleteTapePoolResponse
+ Amazonka.StorageGateway.DeleteTapePool: instance GHC.Show.Show Amazonka.StorageGateway.DeleteTapePool.DeleteTapePool
+ Amazonka.StorageGateway.DeleteTapePool: instance GHC.Show.Show Amazonka.StorageGateway.DeleteTapePool.DeleteTapePoolResponse
+ Amazonka.StorageGateway.DeleteTapePool: newDeleteTapePool :: Text -> DeleteTapePool
+ Amazonka.StorageGateway.DeleteTapePool: newDeleteTapePoolResponse :: Int -> DeleteTapePoolResponse
+ Amazonka.StorageGateway.DeleteVolume: DeleteVolume' :: Text -> DeleteVolume
+ Amazonka.StorageGateway.DeleteVolume: DeleteVolumeResponse' :: Maybe Text -> Int -> DeleteVolumeResponse
+ Amazonka.StorageGateway.DeleteVolume: [$sel:httpStatus:DeleteVolumeResponse'] :: DeleteVolumeResponse -> Int
+ Amazonka.StorageGateway.DeleteVolume: [$sel:volumeARN:DeleteVolume'] :: DeleteVolume -> Text
+ Amazonka.StorageGateway.DeleteVolume: [$sel:volumeARN:DeleteVolumeResponse'] :: DeleteVolumeResponse -> Maybe Text
+ Amazonka.StorageGateway.DeleteVolume: data DeleteVolume
+ Amazonka.StorageGateway.DeleteVolume: data DeleteVolumeResponse
+ Amazonka.StorageGateway.DeleteVolume: deleteVolumeResponse_httpStatus :: Lens' DeleteVolumeResponse Int
+ Amazonka.StorageGateway.DeleteVolume: deleteVolumeResponse_volumeARN :: Lens' DeleteVolumeResponse (Maybe Text)
+ Amazonka.StorageGateway.DeleteVolume: deleteVolume_volumeARN :: Lens' DeleteVolume Text
+ Amazonka.StorageGateway.DeleteVolume: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.DeleteVolume.DeleteVolume
+ Amazonka.StorageGateway.DeleteVolume: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.DeleteVolume.DeleteVolume
+ Amazonka.StorageGateway.DeleteVolume: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.DeleteVolume.DeleteVolume
+ Amazonka.StorageGateway.DeleteVolume: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.DeleteVolume.DeleteVolume
+ Amazonka.StorageGateway.DeleteVolume: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DeleteVolume.DeleteVolume
+ Amazonka.StorageGateway.DeleteVolume: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DeleteVolume.DeleteVolumeResponse
+ Amazonka.StorageGateway.DeleteVolume: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.DeleteVolume.DeleteVolume
+ Amazonka.StorageGateway.DeleteVolume: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.DeleteVolume.DeleteVolume
+ Amazonka.StorageGateway.DeleteVolume: instance GHC.Classes.Eq Amazonka.StorageGateway.DeleteVolume.DeleteVolume
+ Amazonka.StorageGateway.DeleteVolume: instance GHC.Classes.Eq Amazonka.StorageGateway.DeleteVolume.DeleteVolumeResponse
+ Amazonka.StorageGateway.DeleteVolume: instance GHC.Generics.Generic Amazonka.StorageGateway.DeleteVolume.DeleteVolume
+ Amazonka.StorageGateway.DeleteVolume: instance GHC.Generics.Generic Amazonka.StorageGateway.DeleteVolume.DeleteVolumeResponse
+ Amazonka.StorageGateway.DeleteVolume: instance GHC.Read.Read Amazonka.StorageGateway.DeleteVolume.DeleteVolume
+ Amazonka.StorageGateway.DeleteVolume: instance GHC.Read.Read Amazonka.StorageGateway.DeleteVolume.DeleteVolumeResponse
+ Amazonka.StorageGateway.DeleteVolume: instance GHC.Show.Show Amazonka.StorageGateway.DeleteVolume.DeleteVolume
+ Amazonka.StorageGateway.DeleteVolume: instance GHC.Show.Show Amazonka.StorageGateway.DeleteVolume.DeleteVolumeResponse
+ Amazonka.StorageGateway.DeleteVolume: newDeleteVolume :: Text -> DeleteVolume
+ Amazonka.StorageGateway.DeleteVolume: newDeleteVolumeResponse :: Int -> DeleteVolumeResponse
+ Amazonka.StorageGateway.DescribeAvailabilityMonitorTest: DescribeAvailabilityMonitorTest' :: Text -> DescribeAvailabilityMonitorTest
+ Amazonka.StorageGateway.DescribeAvailabilityMonitorTest: DescribeAvailabilityMonitorTestResponse' :: Maybe Text -> Maybe POSIX -> Maybe AvailabilityMonitorTestStatus -> Int -> DescribeAvailabilityMonitorTestResponse
+ Amazonka.StorageGateway.DescribeAvailabilityMonitorTest: [$sel:gatewayARN:DescribeAvailabilityMonitorTest'] :: DescribeAvailabilityMonitorTest -> Text
+ Amazonka.StorageGateway.DescribeAvailabilityMonitorTest: [$sel:gatewayARN:DescribeAvailabilityMonitorTestResponse'] :: DescribeAvailabilityMonitorTestResponse -> Maybe Text
+ Amazonka.StorageGateway.DescribeAvailabilityMonitorTest: [$sel:httpStatus:DescribeAvailabilityMonitorTestResponse'] :: DescribeAvailabilityMonitorTestResponse -> Int
+ Amazonka.StorageGateway.DescribeAvailabilityMonitorTest: [$sel:startTime:DescribeAvailabilityMonitorTestResponse'] :: DescribeAvailabilityMonitorTestResponse -> Maybe POSIX
+ Amazonka.StorageGateway.DescribeAvailabilityMonitorTest: [$sel:status:DescribeAvailabilityMonitorTestResponse'] :: DescribeAvailabilityMonitorTestResponse -> Maybe AvailabilityMonitorTestStatus
+ Amazonka.StorageGateway.DescribeAvailabilityMonitorTest: data DescribeAvailabilityMonitorTest
+ Amazonka.StorageGateway.DescribeAvailabilityMonitorTest: data DescribeAvailabilityMonitorTestResponse
+ Amazonka.StorageGateway.DescribeAvailabilityMonitorTest: describeAvailabilityMonitorTestResponse_gatewayARN :: Lens' DescribeAvailabilityMonitorTestResponse (Maybe Text)
+ Amazonka.StorageGateway.DescribeAvailabilityMonitorTest: describeAvailabilityMonitorTestResponse_httpStatus :: Lens' DescribeAvailabilityMonitorTestResponse Int
+ Amazonka.StorageGateway.DescribeAvailabilityMonitorTest: describeAvailabilityMonitorTestResponse_startTime :: Lens' DescribeAvailabilityMonitorTestResponse (Maybe UTCTime)
+ Amazonka.StorageGateway.DescribeAvailabilityMonitorTest: describeAvailabilityMonitorTestResponse_status :: Lens' DescribeAvailabilityMonitorTestResponse (Maybe AvailabilityMonitorTestStatus)
+ Amazonka.StorageGateway.DescribeAvailabilityMonitorTest: describeAvailabilityMonitorTest_gatewayARN :: Lens' DescribeAvailabilityMonitorTest Text
+ Amazonka.StorageGateway.DescribeAvailabilityMonitorTest: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.DescribeAvailabilityMonitorTest.DescribeAvailabilityMonitorTest
+ Amazonka.StorageGateway.DescribeAvailabilityMonitorTest: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.DescribeAvailabilityMonitorTest.DescribeAvailabilityMonitorTest
+ Amazonka.StorageGateway.DescribeAvailabilityMonitorTest: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.DescribeAvailabilityMonitorTest.DescribeAvailabilityMonitorTest
+ Amazonka.StorageGateway.DescribeAvailabilityMonitorTest: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.DescribeAvailabilityMonitorTest.DescribeAvailabilityMonitorTest
+ Amazonka.StorageGateway.DescribeAvailabilityMonitorTest: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DescribeAvailabilityMonitorTest.DescribeAvailabilityMonitorTest
+ Amazonka.StorageGateway.DescribeAvailabilityMonitorTest: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DescribeAvailabilityMonitorTest.DescribeAvailabilityMonitorTestResponse
+ Amazonka.StorageGateway.DescribeAvailabilityMonitorTest: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.DescribeAvailabilityMonitorTest.DescribeAvailabilityMonitorTest
+ Amazonka.StorageGateway.DescribeAvailabilityMonitorTest: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.DescribeAvailabilityMonitorTest.DescribeAvailabilityMonitorTest
+ Amazonka.StorageGateway.DescribeAvailabilityMonitorTest: instance GHC.Classes.Eq Amazonka.StorageGateway.DescribeAvailabilityMonitorTest.DescribeAvailabilityMonitorTest
+ Amazonka.StorageGateway.DescribeAvailabilityMonitorTest: instance GHC.Classes.Eq Amazonka.StorageGateway.DescribeAvailabilityMonitorTest.DescribeAvailabilityMonitorTestResponse
+ Amazonka.StorageGateway.DescribeAvailabilityMonitorTest: instance GHC.Generics.Generic Amazonka.StorageGateway.DescribeAvailabilityMonitorTest.DescribeAvailabilityMonitorTest
+ Amazonka.StorageGateway.DescribeAvailabilityMonitorTest: instance GHC.Generics.Generic Amazonka.StorageGateway.DescribeAvailabilityMonitorTest.DescribeAvailabilityMonitorTestResponse
+ Amazonka.StorageGateway.DescribeAvailabilityMonitorTest: instance GHC.Read.Read Amazonka.StorageGateway.DescribeAvailabilityMonitorTest.DescribeAvailabilityMonitorTest
+ Amazonka.StorageGateway.DescribeAvailabilityMonitorTest: instance GHC.Read.Read Amazonka.StorageGateway.DescribeAvailabilityMonitorTest.DescribeAvailabilityMonitorTestResponse
+ Amazonka.StorageGateway.DescribeAvailabilityMonitorTest: instance GHC.Show.Show Amazonka.StorageGateway.DescribeAvailabilityMonitorTest.DescribeAvailabilityMonitorTest
+ Amazonka.StorageGateway.DescribeAvailabilityMonitorTest: instance GHC.Show.Show Amazonka.StorageGateway.DescribeAvailabilityMonitorTest.DescribeAvailabilityMonitorTestResponse
+ Amazonka.StorageGateway.DescribeAvailabilityMonitorTest: newDescribeAvailabilityMonitorTest :: Text -> DescribeAvailabilityMonitorTest
+ Amazonka.StorageGateway.DescribeAvailabilityMonitorTest: newDescribeAvailabilityMonitorTestResponse :: Int -> DescribeAvailabilityMonitorTestResponse
+ Amazonka.StorageGateway.DescribeBandwidthRateLimit: DescribeBandwidthRateLimit' :: Text -> DescribeBandwidthRateLimit
+ Amazonka.StorageGateway.DescribeBandwidthRateLimit: DescribeBandwidthRateLimitResponse' :: Maybe Natural -> Maybe Natural -> Maybe Text -> Int -> DescribeBandwidthRateLimitResponse
+ Amazonka.StorageGateway.DescribeBandwidthRateLimit: [$sel:averageDownloadRateLimitInBitsPerSec:DescribeBandwidthRateLimitResponse'] :: DescribeBandwidthRateLimitResponse -> Maybe Natural
+ Amazonka.StorageGateway.DescribeBandwidthRateLimit: [$sel:averageUploadRateLimitInBitsPerSec:DescribeBandwidthRateLimitResponse'] :: DescribeBandwidthRateLimitResponse -> Maybe Natural
+ Amazonka.StorageGateway.DescribeBandwidthRateLimit: [$sel:gatewayARN:DescribeBandwidthRateLimit'] :: DescribeBandwidthRateLimit -> Text
+ Amazonka.StorageGateway.DescribeBandwidthRateLimit: [$sel:gatewayARN:DescribeBandwidthRateLimitResponse'] :: DescribeBandwidthRateLimitResponse -> Maybe Text
+ Amazonka.StorageGateway.DescribeBandwidthRateLimit: [$sel:httpStatus:DescribeBandwidthRateLimitResponse'] :: DescribeBandwidthRateLimitResponse -> Int
+ Amazonka.StorageGateway.DescribeBandwidthRateLimit: data DescribeBandwidthRateLimit
+ Amazonka.StorageGateway.DescribeBandwidthRateLimit: data DescribeBandwidthRateLimitResponse
+ Amazonka.StorageGateway.DescribeBandwidthRateLimit: describeBandwidthRateLimitResponse_averageDownloadRateLimitInBitsPerSec :: Lens' DescribeBandwidthRateLimitResponse (Maybe Natural)
+ Amazonka.StorageGateway.DescribeBandwidthRateLimit: describeBandwidthRateLimitResponse_averageUploadRateLimitInBitsPerSec :: Lens' DescribeBandwidthRateLimitResponse (Maybe Natural)
+ Amazonka.StorageGateway.DescribeBandwidthRateLimit: describeBandwidthRateLimitResponse_gatewayARN :: Lens' DescribeBandwidthRateLimitResponse (Maybe Text)
+ Amazonka.StorageGateway.DescribeBandwidthRateLimit: describeBandwidthRateLimitResponse_httpStatus :: Lens' DescribeBandwidthRateLimitResponse Int
+ Amazonka.StorageGateway.DescribeBandwidthRateLimit: describeBandwidthRateLimit_gatewayARN :: Lens' DescribeBandwidthRateLimit Text
+ Amazonka.StorageGateway.DescribeBandwidthRateLimit: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.DescribeBandwidthRateLimit.DescribeBandwidthRateLimit
+ Amazonka.StorageGateway.DescribeBandwidthRateLimit: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.DescribeBandwidthRateLimit.DescribeBandwidthRateLimit
+ Amazonka.StorageGateway.DescribeBandwidthRateLimit: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.DescribeBandwidthRateLimit.DescribeBandwidthRateLimit
+ Amazonka.StorageGateway.DescribeBandwidthRateLimit: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.DescribeBandwidthRateLimit.DescribeBandwidthRateLimit
+ Amazonka.StorageGateway.DescribeBandwidthRateLimit: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DescribeBandwidthRateLimit.DescribeBandwidthRateLimit
+ Amazonka.StorageGateway.DescribeBandwidthRateLimit: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DescribeBandwidthRateLimit.DescribeBandwidthRateLimitResponse
+ Amazonka.StorageGateway.DescribeBandwidthRateLimit: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.DescribeBandwidthRateLimit.DescribeBandwidthRateLimit
+ Amazonka.StorageGateway.DescribeBandwidthRateLimit: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.DescribeBandwidthRateLimit.DescribeBandwidthRateLimit
+ Amazonka.StorageGateway.DescribeBandwidthRateLimit: instance GHC.Classes.Eq Amazonka.StorageGateway.DescribeBandwidthRateLimit.DescribeBandwidthRateLimit
+ Amazonka.StorageGateway.DescribeBandwidthRateLimit: instance GHC.Classes.Eq Amazonka.StorageGateway.DescribeBandwidthRateLimit.DescribeBandwidthRateLimitResponse
+ Amazonka.StorageGateway.DescribeBandwidthRateLimit: instance GHC.Generics.Generic Amazonka.StorageGateway.DescribeBandwidthRateLimit.DescribeBandwidthRateLimit
+ Amazonka.StorageGateway.DescribeBandwidthRateLimit: instance GHC.Generics.Generic Amazonka.StorageGateway.DescribeBandwidthRateLimit.DescribeBandwidthRateLimitResponse
+ Amazonka.StorageGateway.DescribeBandwidthRateLimit: instance GHC.Read.Read Amazonka.StorageGateway.DescribeBandwidthRateLimit.DescribeBandwidthRateLimit
+ Amazonka.StorageGateway.DescribeBandwidthRateLimit: instance GHC.Read.Read Amazonka.StorageGateway.DescribeBandwidthRateLimit.DescribeBandwidthRateLimitResponse
+ Amazonka.StorageGateway.DescribeBandwidthRateLimit: instance GHC.Show.Show Amazonka.StorageGateway.DescribeBandwidthRateLimit.DescribeBandwidthRateLimit
+ Amazonka.StorageGateway.DescribeBandwidthRateLimit: instance GHC.Show.Show Amazonka.StorageGateway.DescribeBandwidthRateLimit.DescribeBandwidthRateLimitResponse
+ Amazonka.StorageGateway.DescribeBandwidthRateLimit: newDescribeBandwidthRateLimit :: Text -> DescribeBandwidthRateLimit
+ Amazonka.StorageGateway.DescribeBandwidthRateLimit: newDescribeBandwidthRateLimitResponse :: Int -> DescribeBandwidthRateLimitResponse
+ Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule: DescribeBandwidthRateLimitSchedule' :: Text -> DescribeBandwidthRateLimitSchedule
+ Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule: DescribeBandwidthRateLimitScheduleResponse' :: Maybe [BandwidthRateLimitInterval] -> Maybe Text -> Int -> DescribeBandwidthRateLimitScheduleResponse
+ Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule: [$sel:bandwidthRateLimitIntervals:DescribeBandwidthRateLimitScheduleResponse'] :: DescribeBandwidthRateLimitScheduleResponse -> Maybe [BandwidthRateLimitInterval]
+ Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule: [$sel:gatewayARN:DescribeBandwidthRateLimitSchedule'] :: DescribeBandwidthRateLimitSchedule -> Text
+ Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule: [$sel:gatewayARN:DescribeBandwidthRateLimitScheduleResponse'] :: DescribeBandwidthRateLimitScheduleResponse -> Maybe Text
+ Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule: [$sel:httpStatus:DescribeBandwidthRateLimitScheduleResponse'] :: DescribeBandwidthRateLimitScheduleResponse -> Int
+ Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule: data DescribeBandwidthRateLimitSchedule
+ Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule: data DescribeBandwidthRateLimitScheduleResponse
+ Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule: describeBandwidthRateLimitScheduleResponse_bandwidthRateLimitIntervals :: Lens' DescribeBandwidthRateLimitScheduleResponse (Maybe [BandwidthRateLimitInterval])
+ Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule: describeBandwidthRateLimitScheduleResponse_gatewayARN :: Lens' DescribeBandwidthRateLimitScheduleResponse (Maybe Text)
+ Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule: describeBandwidthRateLimitScheduleResponse_httpStatus :: Lens' DescribeBandwidthRateLimitScheduleResponse Int
+ Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule: describeBandwidthRateLimitSchedule_gatewayARN :: Lens' DescribeBandwidthRateLimitSchedule Text
+ Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule.DescribeBandwidthRateLimitSchedule
+ Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule.DescribeBandwidthRateLimitSchedule
+ Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule.DescribeBandwidthRateLimitSchedule
+ Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule.DescribeBandwidthRateLimitSchedule
+ Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule.DescribeBandwidthRateLimitSchedule
+ Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule.DescribeBandwidthRateLimitScheduleResponse
+ Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule.DescribeBandwidthRateLimitSchedule
+ Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule.DescribeBandwidthRateLimitSchedule
+ Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule: instance GHC.Classes.Eq Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule.DescribeBandwidthRateLimitSchedule
+ Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule: instance GHC.Classes.Eq Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule.DescribeBandwidthRateLimitScheduleResponse
+ Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule: instance GHC.Generics.Generic Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule.DescribeBandwidthRateLimitSchedule
+ Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule: instance GHC.Generics.Generic Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule.DescribeBandwidthRateLimitScheduleResponse
+ Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule: instance GHC.Read.Read Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule.DescribeBandwidthRateLimitSchedule
+ Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule: instance GHC.Read.Read Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule.DescribeBandwidthRateLimitScheduleResponse
+ Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule: instance GHC.Show.Show Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule.DescribeBandwidthRateLimitSchedule
+ Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule: instance GHC.Show.Show Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule.DescribeBandwidthRateLimitScheduleResponse
+ Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule: newDescribeBandwidthRateLimitSchedule :: Text -> DescribeBandwidthRateLimitSchedule
+ Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule: newDescribeBandwidthRateLimitScheduleResponse :: Int -> DescribeBandwidthRateLimitScheduleResponse
+ Amazonka.StorageGateway.DescribeCache: DescribeCache' :: Text -> DescribeCache
+ Amazonka.StorageGateway.DescribeCache: DescribeCacheResponse' :: Maybe Integer -> Maybe Double -> Maybe Double -> Maybe Double -> Maybe Double -> Maybe [Text] -> Maybe Text -> Int -> DescribeCacheResponse
+ Amazonka.StorageGateway.DescribeCache: [$sel:cacheAllocatedInBytes:DescribeCacheResponse'] :: DescribeCacheResponse -> Maybe Integer
+ Amazonka.StorageGateway.DescribeCache: [$sel:cacheDirtyPercentage:DescribeCacheResponse'] :: DescribeCacheResponse -> Maybe Double
+ Amazonka.StorageGateway.DescribeCache: [$sel:cacheHitPercentage:DescribeCacheResponse'] :: DescribeCacheResponse -> Maybe Double
+ Amazonka.StorageGateway.DescribeCache: [$sel:cacheMissPercentage:DescribeCacheResponse'] :: DescribeCacheResponse -> Maybe Double
+ Amazonka.StorageGateway.DescribeCache: [$sel:cacheUsedPercentage:DescribeCacheResponse'] :: DescribeCacheResponse -> Maybe Double
+ Amazonka.StorageGateway.DescribeCache: [$sel:diskIds:DescribeCacheResponse'] :: DescribeCacheResponse -> Maybe [Text]
+ Amazonka.StorageGateway.DescribeCache: [$sel:gatewayARN:DescribeCache'] :: DescribeCache -> Text
+ Amazonka.StorageGateway.DescribeCache: [$sel:gatewayARN:DescribeCacheResponse'] :: DescribeCacheResponse -> Maybe Text
+ Amazonka.StorageGateway.DescribeCache: [$sel:httpStatus:DescribeCacheResponse'] :: DescribeCacheResponse -> Int
+ Amazonka.StorageGateway.DescribeCache: data DescribeCache
+ Amazonka.StorageGateway.DescribeCache: data DescribeCacheResponse
+ Amazonka.StorageGateway.DescribeCache: describeCacheResponse_cacheAllocatedInBytes :: Lens' DescribeCacheResponse (Maybe Integer)
+ Amazonka.StorageGateway.DescribeCache: describeCacheResponse_cacheDirtyPercentage :: Lens' DescribeCacheResponse (Maybe Double)
+ Amazonka.StorageGateway.DescribeCache: describeCacheResponse_cacheHitPercentage :: Lens' DescribeCacheResponse (Maybe Double)
+ Amazonka.StorageGateway.DescribeCache: describeCacheResponse_cacheMissPercentage :: Lens' DescribeCacheResponse (Maybe Double)
+ Amazonka.StorageGateway.DescribeCache: describeCacheResponse_cacheUsedPercentage :: Lens' DescribeCacheResponse (Maybe Double)
+ Amazonka.StorageGateway.DescribeCache: describeCacheResponse_diskIds :: Lens' DescribeCacheResponse (Maybe [Text])
+ Amazonka.StorageGateway.DescribeCache: describeCacheResponse_gatewayARN :: Lens' DescribeCacheResponse (Maybe Text)
+ Amazonka.StorageGateway.DescribeCache: describeCacheResponse_httpStatus :: Lens' DescribeCacheResponse Int
+ Amazonka.StorageGateway.DescribeCache: describeCache_gatewayARN :: Lens' DescribeCache Text
+ Amazonka.StorageGateway.DescribeCache: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.DescribeCache.DescribeCache
+ Amazonka.StorageGateway.DescribeCache: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.DescribeCache.DescribeCache
+ Amazonka.StorageGateway.DescribeCache: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.DescribeCache.DescribeCache
+ Amazonka.StorageGateway.DescribeCache: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.DescribeCache.DescribeCache
+ Amazonka.StorageGateway.DescribeCache: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DescribeCache.DescribeCache
+ Amazonka.StorageGateway.DescribeCache: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DescribeCache.DescribeCacheResponse
+ Amazonka.StorageGateway.DescribeCache: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.DescribeCache.DescribeCache
+ Amazonka.StorageGateway.DescribeCache: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.DescribeCache.DescribeCache
+ Amazonka.StorageGateway.DescribeCache: instance GHC.Classes.Eq Amazonka.StorageGateway.DescribeCache.DescribeCache
+ Amazonka.StorageGateway.DescribeCache: instance GHC.Classes.Eq Amazonka.StorageGateway.DescribeCache.DescribeCacheResponse
+ Amazonka.StorageGateway.DescribeCache: instance GHC.Generics.Generic Amazonka.StorageGateway.DescribeCache.DescribeCache
+ Amazonka.StorageGateway.DescribeCache: instance GHC.Generics.Generic Amazonka.StorageGateway.DescribeCache.DescribeCacheResponse
+ Amazonka.StorageGateway.DescribeCache: instance GHC.Read.Read Amazonka.StorageGateway.DescribeCache.DescribeCache
+ Amazonka.StorageGateway.DescribeCache: instance GHC.Read.Read Amazonka.StorageGateway.DescribeCache.DescribeCacheResponse
+ Amazonka.StorageGateway.DescribeCache: instance GHC.Show.Show Amazonka.StorageGateway.DescribeCache.DescribeCache
+ Amazonka.StorageGateway.DescribeCache: instance GHC.Show.Show Amazonka.StorageGateway.DescribeCache.DescribeCacheResponse
+ Amazonka.StorageGateway.DescribeCache: newDescribeCache :: Text -> DescribeCache
+ Amazonka.StorageGateway.DescribeCache: newDescribeCacheResponse :: Int -> DescribeCacheResponse
+ Amazonka.StorageGateway.DescribeCachediSCSIVolumes: DescribeCachediSCSIVolumes' :: [Text] -> DescribeCachediSCSIVolumes
+ Amazonka.StorageGateway.DescribeCachediSCSIVolumes: DescribeCachediSCSIVolumesResponse' :: Maybe [CachediSCSIVolume] -> Int -> DescribeCachediSCSIVolumesResponse
+ Amazonka.StorageGateway.DescribeCachediSCSIVolumes: [$sel:cachediSCSIVolumes:DescribeCachediSCSIVolumesResponse'] :: DescribeCachediSCSIVolumesResponse -> Maybe [CachediSCSIVolume]
+ Amazonka.StorageGateway.DescribeCachediSCSIVolumes: [$sel:httpStatus:DescribeCachediSCSIVolumesResponse'] :: DescribeCachediSCSIVolumesResponse -> Int
+ Amazonka.StorageGateway.DescribeCachediSCSIVolumes: [$sel:volumeARNs:DescribeCachediSCSIVolumes'] :: DescribeCachediSCSIVolumes -> [Text]
+ Amazonka.StorageGateway.DescribeCachediSCSIVolumes: data DescribeCachediSCSIVolumes
+ Amazonka.StorageGateway.DescribeCachediSCSIVolumes: data DescribeCachediSCSIVolumesResponse
+ Amazonka.StorageGateway.DescribeCachediSCSIVolumes: describeCachediSCSIVolumesResponse_cachediSCSIVolumes :: Lens' DescribeCachediSCSIVolumesResponse (Maybe [CachediSCSIVolume])
+ Amazonka.StorageGateway.DescribeCachediSCSIVolumes: describeCachediSCSIVolumesResponse_httpStatus :: Lens' DescribeCachediSCSIVolumesResponse Int
+ Amazonka.StorageGateway.DescribeCachediSCSIVolumes: describeCachediSCSIVolumes_volumeARNs :: Lens' DescribeCachediSCSIVolumes [Text]
+ Amazonka.StorageGateway.DescribeCachediSCSIVolumes: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.DescribeCachediSCSIVolumes.DescribeCachediSCSIVolumes
+ Amazonka.StorageGateway.DescribeCachediSCSIVolumes: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.DescribeCachediSCSIVolumes.DescribeCachediSCSIVolumes
+ Amazonka.StorageGateway.DescribeCachediSCSIVolumes: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.DescribeCachediSCSIVolumes.DescribeCachediSCSIVolumes
+ Amazonka.StorageGateway.DescribeCachediSCSIVolumes: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.DescribeCachediSCSIVolumes.DescribeCachediSCSIVolumes
+ Amazonka.StorageGateway.DescribeCachediSCSIVolumes: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DescribeCachediSCSIVolumes.DescribeCachediSCSIVolumes
+ Amazonka.StorageGateway.DescribeCachediSCSIVolumes: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DescribeCachediSCSIVolumes.DescribeCachediSCSIVolumesResponse
+ Amazonka.StorageGateway.DescribeCachediSCSIVolumes: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.DescribeCachediSCSIVolumes.DescribeCachediSCSIVolumes
+ Amazonka.StorageGateway.DescribeCachediSCSIVolumes: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.DescribeCachediSCSIVolumes.DescribeCachediSCSIVolumes
+ Amazonka.StorageGateway.DescribeCachediSCSIVolumes: instance GHC.Classes.Eq Amazonka.StorageGateway.DescribeCachediSCSIVolumes.DescribeCachediSCSIVolumes
+ Amazonka.StorageGateway.DescribeCachediSCSIVolumes: instance GHC.Classes.Eq Amazonka.StorageGateway.DescribeCachediSCSIVolumes.DescribeCachediSCSIVolumesResponse
+ Amazonka.StorageGateway.DescribeCachediSCSIVolumes: instance GHC.Generics.Generic Amazonka.StorageGateway.DescribeCachediSCSIVolumes.DescribeCachediSCSIVolumes
+ Amazonka.StorageGateway.DescribeCachediSCSIVolumes: instance GHC.Generics.Generic Amazonka.StorageGateway.DescribeCachediSCSIVolumes.DescribeCachediSCSIVolumesResponse
+ Amazonka.StorageGateway.DescribeCachediSCSIVolumes: instance GHC.Read.Read Amazonka.StorageGateway.DescribeCachediSCSIVolumes.DescribeCachediSCSIVolumes
+ Amazonka.StorageGateway.DescribeCachediSCSIVolumes: instance GHC.Read.Read Amazonka.StorageGateway.DescribeCachediSCSIVolumes.DescribeCachediSCSIVolumesResponse
+ Amazonka.StorageGateway.DescribeCachediSCSIVolumes: instance GHC.Show.Show Amazonka.StorageGateway.DescribeCachediSCSIVolumes.DescribeCachediSCSIVolumes
+ Amazonka.StorageGateway.DescribeCachediSCSIVolumes: instance GHC.Show.Show Amazonka.StorageGateway.DescribeCachediSCSIVolumes.DescribeCachediSCSIVolumesResponse
+ Amazonka.StorageGateway.DescribeCachediSCSIVolumes: newDescribeCachediSCSIVolumes :: DescribeCachediSCSIVolumes
+ Amazonka.StorageGateway.DescribeCachediSCSIVolumes: newDescribeCachediSCSIVolumesResponse :: Int -> DescribeCachediSCSIVolumesResponse
+ Amazonka.StorageGateway.DescribeChapCredentials: DescribeChapCredentials' :: Text -> DescribeChapCredentials
+ Amazonka.StorageGateway.DescribeChapCredentials: DescribeChapCredentialsResponse' :: Maybe [ChapInfo] -> Int -> DescribeChapCredentialsResponse
+ Amazonka.StorageGateway.DescribeChapCredentials: [$sel:chapCredentials:DescribeChapCredentialsResponse'] :: DescribeChapCredentialsResponse -> Maybe [ChapInfo]
+ Amazonka.StorageGateway.DescribeChapCredentials: [$sel:httpStatus:DescribeChapCredentialsResponse'] :: DescribeChapCredentialsResponse -> Int
+ Amazonka.StorageGateway.DescribeChapCredentials: [$sel:targetARN:DescribeChapCredentials'] :: DescribeChapCredentials -> Text
+ Amazonka.StorageGateway.DescribeChapCredentials: data DescribeChapCredentials
+ Amazonka.StorageGateway.DescribeChapCredentials: data DescribeChapCredentialsResponse
+ Amazonka.StorageGateway.DescribeChapCredentials: describeChapCredentialsResponse_chapCredentials :: Lens' DescribeChapCredentialsResponse (Maybe [ChapInfo])
+ Amazonka.StorageGateway.DescribeChapCredentials: describeChapCredentialsResponse_httpStatus :: Lens' DescribeChapCredentialsResponse Int
+ Amazonka.StorageGateway.DescribeChapCredentials: describeChapCredentials_targetARN :: Lens' DescribeChapCredentials Text
+ Amazonka.StorageGateway.DescribeChapCredentials: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.DescribeChapCredentials.DescribeChapCredentials
+ Amazonka.StorageGateway.DescribeChapCredentials: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.DescribeChapCredentials.DescribeChapCredentials
+ Amazonka.StorageGateway.DescribeChapCredentials: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.DescribeChapCredentials.DescribeChapCredentials
+ Amazonka.StorageGateway.DescribeChapCredentials: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.DescribeChapCredentials.DescribeChapCredentials
+ Amazonka.StorageGateway.DescribeChapCredentials: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DescribeChapCredentials.DescribeChapCredentials
+ Amazonka.StorageGateway.DescribeChapCredentials: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DescribeChapCredentials.DescribeChapCredentialsResponse
+ Amazonka.StorageGateway.DescribeChapCredentials: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.DescribeChapCredentials.DescribeChapCredentials
+ Amazonka.StorageGateway.DescribeChapCredentials: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.DescribeChapCredentials.DescribeChapCredentials
+ Amazonka.StorageGateway.DescribeChapCredentials: instance GHC.Classes.Eq Amazonka.StorageGateway.DescribeChapCredentials.DescribeChapCredentials
+ Amazonka.StorageGateway.DescribeChapCredentials: instance GHC.Classes.Eq Amazonka.StorageGateway.DescribeChapCredentials.DescribeChapCredentialsResponse
+ Amazonka.StorageGateway.DescribeChapCredentials: instance GHC.Generics.Generic Amazonka.StorageGateway.DescribeChapCredentials.DescribeChapCredentials
+ Amazonka.StorageGateway.DescribeChapCredentials: instance GHC.Generics.Generic Amazonka.StorageGateway.DescribeChapCredentials.DescribeChapCredentialsResponse
+ Amazonka.StorageGateway.DescribeChapCredentials: instance GHC.Read.Read Amazonka.StorageGateway.DescribeChapCredentials.DescribeChapCredentials
+ Amazonka.StorageGateway.DescribeChapCredentials: instance GHC.Show.Show Amazonka.StorageGateway.DescribeChapCredentials.DescribeChapCredentials
+ Amazonka.StorageGateway.DescribeChapCredentials: instance GHC.Show.Show Amazonka.StorageGateway.DescribeChapCredentials.DescribeChapCredentialsResponse
+ Amazonka.StorageGateway.DescribeChapCredentials: newDescribeChapCredentials :: Text -> DescribeChapCredentials
+ Amazonka.StorageGateway.DescribeChapCredentials: newDescribeChapCredentialsResponse :: Int -> DescribeChapCredentialsResponse
+ Amazonka.StorageGateway.DescribeFileSystemAssociations: DescribeFileSystemAssociations' :: NonEmpty Text -> DescribeFileSystemAssociations
+ Amazonka.StorageGateway.DescribeFileSystemAssociations: DescribeFileSystemAssociationsResponse' :: Maybe [FileSystemAssociationInfo] -> Int -> DescribeFileSystemAssociationsResponse
+ Amazonka.StorageGateway.DescribeFileSystemAssociations: [$sel:fileSystemAssociationARNList:DescribeFileSystemAssociations'] :: DescribeFileSystemAssociations -> NonEmpty Text
+ Amazonka.StorageGateway.DescribeFileSystemAssociations: [$sel:fileSystemAssociationInfoList:DescribeFileSystemAssociationsResponse'] :: DescribeFileSystemAssociationsResponse -> Maybe [FileSystemAssociationInfo]
+ Amazonka.StorageGateway.DescribeFileSystemAssociations: [$sel:httpStatus:DescribeFileSystemAssociationsResponse'] :: DescribeFileSystemAssociationsResponse -> Int
+ Amazonka.StorageGateway.DescribeFileSystemAssociations: data DescribeFileSystemAssociations
+ Amazonka.StorageGateway.DescribeFileSystemAssociations: data DescribeFileSystemAssociationsResponse
+ Amazonka.StorageGateway.DescribeFileSystemAssociations: describeFileSystemAssociationsResponse_fileSystemAssociationInfoList :: Lens' DescribeFileSystemAssociationsResponse (Maybe [FileSystemAssociationInfo])
+ Amazonka.StorageGateway.DescribeFileSystemAssociations: describeFileSystemAssociationsResponse_httpStatus :: Lens' DescribeFileSystemAssociationsResponse Int
+ Amazonka.StorageGateway.DescribeFileSystemAssociations: describeFileSystemAssociations_fileSystemAssociationARNList :: Lens' DescribeFileSystemAssociations (NonEmpty Text)
+ Amazonka.StorageGateway.DescribeFileSystemAssociations: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.DescribeFileSystemAssociations.DescribeFileSystemAssociations
+ Amazonka.StorageGateway.DescribeFileSystemAssociations: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.DescribeFileSystemAssociations.DescribeFileSystemAssociations
+ Amazonka.StorageGateway.DescribeFileSystemAssociations: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.DescribeFileSystemAssociations.DescribeFileSystemAssociations
+ Amazonka.StorageGateway.DescribeFileSystemAssociations: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.DescribeFileSystemAssociations.DescribeFileSystemAssociations
+ Amazonka.StorageGateway.DescribeFileSystemAssociations: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DescribeFileSystemAssociations.DescribeFileSystemAssociations
+ Amazonka.StorageGateway.DescribeFileSystemAssociations: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DescribeFileSystemAssociations.DescribeFileSystemAssociationsResponse
+ Amazonka.StorageGateway.DescribeFileSystemAssociations: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.DescribeFileSystemAssociations.DescribeFileSystemAssociations
+ Amazonka.StorageGateway.DescribeFileSystemAssociations: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.DescribeFileSystemAssociations.DescribeFileSystemAssociations
+ Amazonka.StorageGateway.DescribeFileSystemAssociations: instance GHC.Classes.Eq Amazonka.StorageGateway.DescribeFileSystemAssociations.DescribeFileSystemAssociations
+ Amazonka.StorageGateway.DescribeFileSystemAssociations: instance GHC.Classes.Eq Amazonka.StorageGateway.DescribeFileSystemAssociations.DescribeFileSystemAssociationsResponse
+ Amazonka.StorageGateway.DescribeFileSystemAssociations: instance GHC.Generics.Generic Amazonka.StorageGateway.DescribeFileSystemAssociations.DescribeFileSystemAssociations
+ Amazonka.StorageGateway.DescribeFileSystemAssociations: instance GHC.Generics.Generic Amazonka.StorageGateway.DescribeFileSystemAssociations.DescribeFileSystemAssociationsResponse
+ Amazonka.StorageGateway.DescribeFileSystemAssociations: instance GHC.Read.Read Amazonka.StorageGateway.DescribeFileSystemAssociations.DescribeFileSystemAssociations
+ Amazonka.StorageGateway.DescribeFileSystemAssociations: instance GHC.Read.Read Amazonka.StorageGateway.DescribeFileSystemAssociations.DescribeFileSystemAssociationsResponse
+ Amazonka.StorageGateway.DescribeFileSystemAssociations: instance GHC.Show.Show Amazonka.StorageGateway.DescribeFileSystemAssociations.DescribeFileSystemAssociations
+ Amazonka.StorageGateway.DescribeFileSystemAssociations: instance GHC.Show.Show Amazonka.StorageGateway.DescribeFileSystemAssociations.DescribeFileSystemAssociationsResponse
+ Amazonka.StorageGateway.DescribeFileSystemAssociations: newDescribeFileSystemAssociations :: NonEmpty Text -> DescribeFileSystemAssociations
+ Amazonka.StorageGateway.DescribeFileSystemAssociations: newDescribeFileSystemAssociationsResponse :: Int -> DescribeFileSystemAssociationsResponse
+ Amazonka.StorageGateway.DescribeGatewayInformation: DescribeGatewayInformation' :: Text -> DescribeGatewayInformation
+ Amazonka.StorageGateway.DescribeGatewayInformation: DescribeGatewayInformationResponse' :: Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe GatewayCapacity -> Maybe Text -> Maybe Text -> Maybe [NetworkInterface] -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe HostEnvironment -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe [GatewayCapacity] -> Maybe [Tag] -> Maybe Text -> Int -> DescribeGatewayInformationResponse
+ Amazonka.StorageGateway.DescribeGatewayInformation: [$sel:cloudWatchLogGroupARN:DescribeGatewayInformationResponse'] :: DescribeGatewayInformationResponse -> Maybe Text
+ Amazonka.StorageGateway.DescribeGatewayInformation: [$sel:deprecationDate:DescribeGatewayInformationResponse'] :: DescribeGatewayInformationResponse -> Maybe Text
+ Amazonka.StorageGateway.DescribeGatewayInformation: [$sel:ec2InstanceId:DescribeGatewayInformationResponse'] :: DescribeGatewayInformationResponse -> Maybe Text
+ Amazonka.StorageGateway.DescribeGatewayInformation: [$sel:ec2InstanceRegion:DescribeGatewayInformationResponse'] :: DescribeGatewayInformationResponse -> Maybe Text
+ Amazonka.StorageGateway.DescribeGatewayInformation: [$sel:endpointType:DescribeGatewayInformationResponse'] :: DescribeGatewayInformationResponse -> Maybe Text
+ Amazonka.StorageGateway.DescribeGatewayInformation: [$sel:gatewayARN:DescribeGatewayInformation'] :: DescribeGatewayInformation -> Text
+ Amazonka.StorageGateway.DescribeGatewayInformation: [$sel:gatewayARN:DescribeGatewayInformationResponse'] :: DescribeGatewayInformationResponse -> Maybe Text
+ Amazonka.StorageGateway.DescribeGatewayInformation: [$sel:gatewayCapacity:DescribeGatewayInformationResponse'] :: DescribeGatewayInformationResponse -> Maybe GatewayCapacity
+ Amazonka.StorageGateway.DescribeGatewayInformation: [$sel:gatewayId:DescribeGatewayInformationResponse'] :: DescribeGatewayInformationResponse -> Maybe Text
+ Amazonka.StorageGateway.DescribeGatewayInformation: [$sel:gatewayName:DescribeGatewayInformationResponse'] :: DescribeGatewayInformationResponse -> Maybe Text
+ Amazonka.StorageGateway.DescribeGatewayInformation: [$sel:gatewayNetworkInterfaces:DescribeGatewayInformationResponse'] :: DescribeGatewayInformationResponse -> Maybe [NetworkInterface]
+ Amazonka.StorageGateway.DescribeGatewayInformation: [$sel:gatewayState:DescribeGatewayInformationResponse'] :: DescribeGatewayInformationResponse -> Maybe Text
+ Amazonka.StorageGateway.DescribeGatewayInformation: [$sel:gatewayTimezone:DescribeGatewayInformationResponse'] :: DescribeGatewayInformationResponse -> Maybe Text
+ Amazonka.StorageGateway.DescribeGatewayInformation: [$sel:gatewayType:DescribeGatewayInformationResponse'] :: DescribeGatewayInformationResponse -> Maybe Text
+ Amazonka.StorageGateway.DescribeGatewayInformation: [$sel:hostEnvironment:DescribeGatewayInformationResponse'] :: DescribeGatewayInformationResponse -> Maybe HostEnvironment
+ Amazonka.StorageGateway.DescribeGatewayInformation: [$sel:hostEnvironmentId:DescribeGatewayInformationResponse'] :: DescribeGatewayInformationResponse -> Maybe Text
+ Amazonka.StorageGateway.DescribeGatewayInformation: [$sel:httpStatus:DescribeGatewayInformationResponse'] :: DescribeGatewayInformationResponse -> Int
+ Amazonka.StorageGateway.DescribeGatewayInformation: [$sel:lastSoftwareUpdate:DescribeGatewayInformationResponse'] :: DescribeGatewayInformationResponse -> Maybe Text
+ Amazonka.StorageGateway.DescribeGatewayInformation: [$sel:nextUpdateAvailabilityDate:DescribeGatewayInformationResponse'] :: DescribeGatewayInformationResponse -> Maybe Text
+ Amazonka.StorageGateway.DescribeGatewayInformation: [$sel:softwareUpdatesEndDate:DescribeGatewayInformationResponse'] :: DescribeGatewayInformationResponse -> Maybe Text
+ Amazonka.StorageGateway.DescribeGatewayInformation: [$sel:supportedGatewayCapacities:DescribeGatewayInformationResponse'] :: DescribeGatewayInformationResponse -> Maybe [GatewayCapacity]
+ Amazonka.StorageGateway.DescribeGatewayInformation: [$sel:tags:DescribeGatewayInformationResponse'] :: DescribeGatewayInformationResponse -> Maybe [Tag]
+ Amazonka.StorageGateway.DescribeGatewayInformation: [$sel:vPCEndpoint:DescribeGatewayInformationResponse'] :: DescribeGatewayInformationResponse -> Maybe Text
+ Amazonka.StorageGateway.DescribeGatewayInformation: data DescribeGatewayInformation
+ Amazonka.StorageGateway.DescribeGatewayInformation: data DescribeGatewayInformationResponse
+ Amazonka.StorageGateway.DescribeGatewayInformation: describeGatewayInformationResponse_cloudWatchLogGroupARN :: Lens' DescribeGatewayInformationResponse (Maybe Text)
+ Amazonka.StorageGateway.DescribeGatewayInformation: describeGatewayInformationResponse_deprecationDate :: Lens' DescribeGatewayInformationResponse (Maybe Text)
+ Amazonka.StorageGateway.DescribeGatewayInformation: describeGatewayInformationResponse_ec2InstanceId :: Lens' DescribeGatewayInformationResponse (Maybe Text)
+ Amazonka.StorageGateway.DescribeGatewayInformation: describeGatewayInformationResponse_ec2InstanceRegion :: Lens' DescribeGatewayInformationResponse (Maybe Text)
+ Amazonka.StorageGateway.DescribeGatewayInformation: describeGatewayInformationResponse_endpointType :: Lens' DescribeGatewayInformationResponse (Maybe Text)
+ Amazonka.StorageGateway.DescribeGatewayInformation: describeGatewayInformationResponse_gatewayARN :: Lens' DescribeGatewayInformationResponse (Maybe Text)
+ Amazonka.StorageGateway.DescribeGatewayInformation: describeGatewayInformationResponse_gatewayCapacity :: Lens' DescribeGatewayInformationResponse (Maybe GatewayCapacity)
+ Amazonka.StorageGateway.DescribeGatewayInformation: describeGatewayInformationResponse_gatewayId :: Lens' DescribeGatewayInformationResponse (Maybe Text)
+ Amazonka.StorageGateway.DescribeGatewayInformation: describeGatewayInformationResponse_gatewayName :: Lens' DescribeGatewayInformationResponse (Maybe Text)
+ Amazonka.StorageGateway.DescribeGatewayInformation: describeGatewayInformationResponse_gatewayNetworkInterfaces :: Lens' DescribeGatewayInformationResponse (Maybe [NetworkInterface])
+ Amazonka.StorageGateway.DescribeGatewayInformation: describeGatewayInformationResponse_gatewayState :: Lens' DescribeGatewayInformationResponse (Maybe Text)
+ Amazonka.StorageGateway.DescribeGatewayInformation: describeGatewayInformationResponse_gatewayTimezone :: Lens' DescribeGatewayInformationResponse (Maybe Text)
+ Amazonka.StorageGateway.DescribeGatewayInformation: describeGatewayInformationResponse_gatewayType :: Lens' DescribeGatewayInformationResponse (Maybe Text)
+ Amazonka.StorageGateway.DescribeGatewayInformation: describeGatewayInformationResponse_hostEnvironment :: Lens' DescribeGatewayInformationResponse (Maybe HostEnvironment)
+ Amazonka.StorageGateway.DescribeGatewayInformation: describeGatewayInformationResponse_hostEnvironmentId :: Lens' DescribeGatewayInformationResponse (Maybe Text)
+ Amazonka.StorageGateway.DescribeGatewayInformation: describeGatewayInformationResponse_httpStatus :: Lens' DescribeGatewayInformationResponse Int
+ Amazonka.StorageGateway.DescribeGatewayInformation: describeGatewayInformationResponse_lastSoftwareUpdate :: Lens' DescribeGatewayInformationResponse (Maybe Text)
+ Amazonka.StorageGateway.DescribeGatewayInformation: describeGatewayInformationResponse_nextUpdateAvailabilityDate :: Lens' DescribeGatewayInformationResponse (Maybe Text)
+ Amazonka.StorageGateway.DescribeGatewayInformation: describeGatewayInformationResponse_softwareUpdatesEndDate :: Lens' DescribeGatewayInformationResponse (Maybe Text)
+ Amazonka.StorageGateway.DescribeGatewayInformation: describeGatewayInformationResponse_supportedGatewayCapacities :: Lens' DescribeGatewayInformationResponse (Maybe [GatewayCapacity])
+ Amazonka.StorageGateway.DescribeGatewayInformation: describeGatewayInformationResponse_tags :: Lens' DescribeGatewayInformationResponse (Maybe [Tag])
+ Amazonka.StorageGateway.DescribeGatewayInformation: describeGatewayInformationResponse_vPCEndpoint :: Lens' DescribeGatewayInformationResponse (Maybe Text)
+ Amazonka.StorageGateway.DescribeGatewayInformation: describeGatewayInformation_gatewayARN :: Lens' DescribeGatewayInformation Text
+ Amazonka.StorageGateway.DescribeGatewayInformation: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.DescribeGatewayInformation.DescribeGatewayInformation
+ Amazonka.StorageGateway.DescribeGatewayInformation: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.DescribeGatewayInformation.DescribeGatewayInformation
+ Amazonka.StorageGateway.DescribeGatewayInformation: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.DescribeGatewayInformation.DescribeGatewayInformation
+ Amazonka.StorageGateway.DescribeGatewayInformation: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.DescribeGatewayInformation.DescribeGatewayInformation
+ Amazonka.StorageGateway.DescribeGatewayInformation: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DescribeGatewayInformation.DescribeGatewayInformation
+ Amazonka.StorageGateway.DescribeGatewayInformation: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DescribeGatewayInformation.DescribeGatewayInformationResponse
+ Amazonka.StorageGateway.DescribeGatewayInformation: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.DescribeGatewayInformation.DescribeGatewayInformation
+ Amazonka.StorageGateway.DescribeGatewayInformation: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.DescribeGatewayInformation.DescribeGatewayInformation
+ Amazonka.StorageGateway.DescribeGatewayInformation: instance GHC.Classes.Eq Amazonka.StorageGateway.DescribeGatewayInformation.DescribeGatewayInformation
+ Amazonka.StorageGateway.DescribeGatewayInformation: instance GHC.Classes.Eq Amazonka.StorageGateway.DescribeGatewayInformation.DescribeGatewayInformationResponse
+ Amazonka.StorageGateway.DescribeGatewayInformation: instance GHC.Generics.Generic Amazonka.StorageGateway.DescribeGatewayInformation.DescribeGatewayInformation
+ Amazonka.StorageGateway.DescribeGatewayInformation: instance GHC.Generics.Generic Amazonka.StorageGateway.DescribeGatewayInformation.DescribeGatewayInformationResponse
+ Amazonka.StorageGateway.DescribeGatewayInformation: instance GHC.Read.Read Amazonka.StorageGateway.DescribeGatewayInformation.DescribeGatewayInformation
+ Amazonka.StorageGateway.DescribeGatewayInformation: instance GHC.Read.Read Amazonka.StorageGateway.DescribeGatewayInformation.DescribeGatewayInformationResponse
+ Amazonka.StorageGateway.DescribeGatewayInformation: instance GHC.Show.Show Amazonka.StorageGateway.DescribeGatewayInformation.DescribeGatewayInformation
+ Amazonka.StorageGateway.DescribeGatewayInformation: instance GHC.Show.Show Amazonka.StorageGateway.DescribeGatewayInformation.DescribeGatewayInformationResponse
+ Amazonka.StorageGateway.DescribeGatewayInformation: newDescribeGatewayInformation :: Text -> DescribeGatewayInformation
+ Amazonka.StorageGateway.DescribeGatewayInformation: newDescribeGatewayInformationResponse :: Int -> DescribeGatewayInformationResponse
+ Amazonka.StorageGateway.DescribeMaintenanceStartTime: DescribeMaintenanceStartTime' :: Text -> DescribeMaintenanceStartTime
+ Amazonka.StorageGateway.DescribeMaintenanceStartTime: DescribeMaintenanceStartTimeResponse' :: Maybe Natural -> Maybe Natural -> Maybe Text -> Maybe Natural -> Maybe Natural -> Maybe Text -> Int -> DescribeMaintenanceStartTimeResponse
+ Amazonka.StorageGateway.DescribeMaintenanceStartTime: [$sel:dayOfMonth:DescribeMaintenanceStartTimeResponse'] :: DescribeMaintenanceStartTimeResponse -> Maybe Natural
+ Amazonka.StorageGateway.DescribeMaintenanceStartTime: [$sel:dayOfWeek:DescribeMaintenanceStartTimeResponse'] :: DescribeMaintenanceStartTimeResponse -> Maybe Natural
+ Amazonka.StorageGateway.DescribeMaintenanceStartTime: [$sel:gatewayARN:DescribeMaintenanceStartTime'] :: DescribeMaintenanceStartTime -> Text
+ Amazonka.StorageGateway.DescribeMaintenanceStartTime: [$sel:gatewayARN:DescribeMaintenanceStartTimeResponse'] :: DescribeMaintenanceStartTimeResponse -> Maybe Text
+ Amazonka.StorageGateway.DescribeMaintenanceStartTime: [$sel:hourOfDay:DescribeMaintenanceStartTimeResponse'] :: DescribeMaintenanceStartTimeResponse -> Maybe Natural
+ Amazonka.StorageGateway.DescribeMaintenanceStartTime: [$sel:httpStatus:DescribeMaintenanceStartTimeResponse'] :: DescribeMaintenanceStartTimeResponse -> Int
+ Amazonka.StorageGateway.DescribeMaintenanceStartTime: [$sel:minuteOfHour:DescribeMaintenanceStartTimeResponse'] :: DescribeMaintenanceStartTimeResponse -> Maybe Natural
+ Amazonka.StorageGateway.DescribeMaintenanceStartTime: [$sel:timezone:DescribeMaintenanceStartTimeResponse'] :: DescribeMaintenanceStartTimeResponse -> Maybe Text
+ Amazonka.StorageGateway.DescribeMaintenanceStartTime: data DescribeMaintenanceStartTime
+ Amazonka.StorageGateway.DescribeMaintenanceStartTime: data DescribeMaintenanceStartTimeResponse
+ Amazonka.StorageGateway.DescribeMaintenanceStartTime: describeMaintenanceStartTimeResponse_dayOfMonth :: Lens' DescribeMaintenanceStartTimeResponse (Maybe Natural)
+ Amazonka.StorageGateway.DescribeMaintenanceStartTime: describeMaintenanceStartTimeResponse_dayOfWeek :: Lens' DescribeMaintenanceStartTimeResponse (Maybe Natural)
+ Amazonka.StorageGateway.DescribeMaintenanceStartTime: describeMaintenanceStartTimeResponse_gatewayARN :: Lens' DescribeMaintenanceStartTimeResponse (Maybe Text)
+ Amazonka.StorageGateway.DescribeMaintenanceStartTime: describeMaintenanceStartTimeResponse_hourOfDay :: Lens' DescribeMaintenanceStartTimeResponse (Maybe Natural)
+ Amazonka.StorageGateway.DescribeMaintenanceStartTime: describeMaintenanceStartTimeResponse_httpStatus :: Lens' DescribeMaintenanceStartTimeResponse Int
+ Amazonka.StorageGateway.DescribeMaintenanceStartTime: describeMaintenanceStartTimeResponse_minuteOfHour :: Lens' DescribeMaintenanceStartTimeResponse (Maybe Natural)
+ Amazonka.StorageGateway.DescribeMaintenanceStartTime: describeMaintenanceStartTimeResponse_timezone :: Lens' DescribeMaintenanceStartTimeResponse (Maybe Text)
+ Amazonka.StorageGateway.DescribeMaintenanceStartTime: describeMaintenanceStartTime_gatewayARN :: Lens' DescribeMaintenanceStartTime Text
+ Amazonka.StorageGateway.DescribeMaintenanceStartTime: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.DescribeMaintenanceStartTime.DescribeMaintenanceStartTime
+ Amazonka.StorageGateway.DescribeMaintenanceStartTime: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.DescribeMaintenanceStartTime.DescribeMaintenanceStartTime
+ Amazonka.StorageGateway.DescribeMaintenanceStartTime: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.DescribeMaintenanceStartTime.DescribeMaintenanceStartTime
+ Amazonka.StorageGateway.DescribeMaintenanceStartTime: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.DescribeMaintenanceStartTime.DescribeMaintenanceStartTime
+ Amazonka.StorageGateway.DescribeMaintenanceStartTime: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DescribeMaintenanceStartTime.DescribeMaintenanceStartTime
+ Amazonka.StorageGateway.DescribeMaintenanceStartTime: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DescribeMaintenanceStartTime.DescribeMaintenanceStartTimeResponse
+ Amazonka.StorageGateway.DescribeMaintenanceStartTime: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.DescribeMaintenanceStartTime.DescribeMaintenanceStartTime
+ Amazonka.StorageGateway.DescribeMaintenanceStartTime: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.DescribeMaintenanceStartTime.DescribeMaintenanceStartTime
+ Amazonka.StorageGateway.DescribeMaintenanceStartTime: instance GHC.Classes.Eq Amazonka.StorageGateway.DescribeMaintenanceStartTime.DescribeMaintenanceStartTime
+ Amazonka.StorageGateway.DescribeMaintenanceStartTime: instance GHC.Classes.Eq Amazonka.StorageGateway.DescribeMaintenanceStartTime.DescribeMaintenanceStartTimeResponse
+ Amazonka.StorageGateway.DescribeMaintenanceStartTime: instance GHC.Generics.Generic Amazonka.StorageGateway.DescribeMaintenanceStartTime.DescribeMaintenanceStartTime
+ Amazonka.StorageGateway.DescribeMaintenanceStartTime: instance GHC.Generics.Generic Amazonka.StorageGateway.DescribeMaintenanceStartTime.DescribeMaintenanceStartTimeResponse
+ Amazonka.StorageGateway.DescribeMaintenanceStartTime: instance GHC.Read.Read Amazonka.StorageGateway.DescribeMaintenanceStartTime.DescribeMaintenanceStartTime
+ Amazonka.StorageGateway.DescribeMaintenanceStartTime: instance GHC.Read.Read Amazonka.StorageGateway.DescribeMaintenanceStartTime.DescribeMaintenanceStartTimeResponse
+ Amazonka.StorageGateway.DescribeMaintenanceStartTime: instance GHC.Show.Show Amazonka.StorageGateway.DescribeMaintenanceStartTime.DescribeMaintenanceStartTime
+ Amazonka.StorageGateway.DescribeMaintenanceStartTime: instance GHC.Show.Show Amazonka.StorageGateway.DescribeMaintenanceStartTime.DescribeMaintenanceStartTimeResponse
+ Amazonka.StorageGateway.DescribeMaintenanceStartTime: newDescribeMaintenanceStartTime :: Text -> DescribeMaintenanceStartTime
+ Amazonka.StorageGateway.DescribeMaintenanceStartTime: newDescribeMaintenanceStartTimeResponse :: Int -> DescribeMaintenanceStartTimeResponse
+ Amazonka.StorageGateway.DescribeNFSFileShares: DescribeNFSFileShares' :: NonEmpty Text -> DescribeNFSFileShares
+ Amazonka.StorageGateway.DescribeNFSFileShares: DescribeNFSFileSharesResponse' :: Maybe [NFSFileShareInfo] -> Int -> DescribeNFSFileSharesResponse
+ Amazonka.StorageGateway.DescribeNFSFileShares: [$sel:fileShareARNList:DescribeNFSFileShares'] :: DescribeNFSFileShares -> NonEmpty Text
+ Amazonka.StorageGateway.DescribeNFSFileShares: [$sel:httpStatus:DescribeNFSFileSharesResponse'] :: DescribeNFSFileSharesResponse -> Int
+ Amazonka.StorageGateway.DescribeNFSFileShares: [$sel:nFSFileShareInfoList:DescribeNFSFileSharesResponse'] :: DescribeNFSFileSharesResponse -> Maybe [NFSFileShareInfo]
+ Amazonka.StorageGateway.DescribeNFSFileShares: data DescribeNFSFileShares
+ Amazonka.StorageGateway.DescribeNFSFileShares: data DescribeNFSFileSharesResponse
+ Amazonka.StorageGateway.DescribeNFSFileShares: describeNFSFileSharesResponse_httpStatus :: Lens' DescribeNFSFileSharesResponse Int
+ Amazonka.StorageGateway.DescribeNFSFileShares: describeNFSFileSharesResponse_nFSFileShareInfoList :: Lens' DescribeNFSFileSharesResponse (Maybe [NFSFileShareInfo])
+ Amazonka.StorageGateway.DescribeNFSFileShares: describeNFSFileShares_fileShareARNList :: Lens' DescribeNFSFileShares (NonEmpty Text)
+ Amazonka.StorageGateway.DescribeNFSFileShares: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.DescribeNFSFileShares.DescribeNFSFileShares
+ Amazonka.StorageGateway.DescribeNFSFileShares: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.DescribeNFSFileShares.DescribeNFSFileShares
+ Amazonka.StorageGateway.DescribeNFSFileShares: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.DescribeNFSFileShares.DescribeNFSFileShares
+ Amazonka.StorageGateway.DescribeNFSFileShares: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.DescribeNFSFileShares.DescribeNFSFileShares
+ Amazonka.StorageGateway.DescribeNFSFileShares: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DescribeNFSFileShares.DescribeNFSFileShares
+ Amazonka.StorageGateway.DescribeNFSFileShares: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DescribeNFSFileShares.DescribeNFSFileSharesResponse
+ Amazonka.StorageGateway.DescribeNFSFileShares: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.DescribeNFSFileShares.DescribeNFSFileShares
+ Amazonka.StorageGateway.DescribeNFSFileShares: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.DescribeNFSFileShares.DescribeNFSFileShares
+ Amazonka.StorageGateway.DescribeNFSFileShares: instance GHC.Classes.Eq Amazonka.StorageGateway.DescribeNFSFileShares.DescribeNFSFileShares
+ Amazonka.StorageGateway.DescribeNFSFileShares: instance GHC.Classes.Eq Amazonka.StorageGateway.DescribeNFSFileShares.DescribeNFSFileSharesResponse
+ Amazonka.StorageGateway.DescribeNFSFileShares: instance GHC.Generics.Generic Amazonka.StorageGateway.DescribeNFSFileShares.DescribeNFSFileShares
+ Amazonka.StorageGateway.DescribeNFSFileShares: instance GHC.Generics.Generic Amazonka.StorageGateway.DescribeNFSFileShares.DescribeNFSFileSharesResponse
+ Amazonka.StorageGateway.DescribeNFSFileShares: instance GHC.Read.Read Amazonka.StorageGateway.DescribeNFSFileShares.DescribeNFSFileShares
+ Amazonka.StorageGateway.DescribeNFSFileShares: instance GHC.Read.Read Amazonka.StorageGateway.DescribeNFSFileShares.DescribeNFSFileSharesResponse
+ Amazonka.StorageGateway.DescribeNFSFileShares: instance GHC.Show.Show Amazonka.StorageGateway.DescribeNFSFileShares.DescribeNFSFileShares
+ Amazonka.StorageGateway.DescribeNFSFileShares: instance GHC.Show.Show Amazonka.StorageGateway.DescribeNFSFileShares.DescribeNFSFileSharesResponse
+ Amazonka.StorageGateway.DescribeNFSFileShares: newDescribeNFSFileShares :: NonEmpty Text -> DescribeNFSFileShares
+ Amazonka.StorageGateway.DescribeNFSFileShares: newDescribeNFSFileSharesResponse :: Int -> DescribeNFSFileSharesResponse
+ Amazonka.StorageGateway.DescribeSMBFileShares: DescribeSMBFileShares' :: NonEmpty Text -> DescribeSMBFileShares
+ Amazonka.StorageGateway.DescribeSMBFileShares: DescribeSMBFileSharesResponse' :: Maybe [SMBFileShareInfo] -> Int -> DescribeSMBFileSharesResponse
+ Amazonka.StorageGateway.DescribeSMBFileShares: [$sel:fileShareARNList:DescribeSMBFileShares'] :: DescribeSMBFileShares -> NonEmpty Text
+ Amazonka.StorageGateway.DescribeSMBFileShares: [$sel:httpStatus:DescribeSMBFileSharesResponse'] :: DescribeSMBFileSharesResponse -> Int
+ Amazonka.StorageGateway.DescribeSMBFileShares: [$sel:sMBFileShareInfoList:DescribeSMBFileSharesResponse'] :: DescribeSMBFileSharesResponse -> Maybe [SMBFileShareInfo]
+ Amazonka.StorageGateway.DescribeSMBFileShares: data DescribeSMBFileShares
+ Amazonka.StorageGateway.DescribeSMBFileShares: data DescribeSMBFileSharesResponse
+ Amazonka.StorageGateway.DescribeSMBFileShares: describeSMBFileSharesResponse_httpStatus :: Lens' DescribeSMBFileSharesResponse Int
+ Amazonka.StorageGateway.DescribeSMBFileShares: describeSMBFileSharesResponse_sMBFileShareInfoList :: Lens' DescribeSMBFileSharesResponse (Maybe [SMBFileShareInfo])
+ Amazonka.StorageGateway.DescribeSMBFileShares: describeSMBFileShares_fileShareARNList :: Lens' DescribeSMBFileShares (NonEmpty Text)
+ Amazonka.StorageGateway.DescribeSMBFileShares: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.DescribeSMBFileShares.DescribeSMBFileShares
+ Amazonka.StorageGateway.DescribeSMBFileShares: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.DescribeSMBFileShares.DescribeSMBFileShares
+ Amazonka.StorageGateway.DescribeSMBFileShares: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.DescribeSMBFileShares.DescribeSMBFileShares
+ Amazonka.StorageGateway.DescribeSMBFileShares: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.DescribeSMBFileShares.DescribeSMBFileShares
+ Amazonka.StorageGateway.DescribeSMBFileShares: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DescribeSMBFileShares.DescribeSMBFileShares
+ Amazonka.StorageGateway.DescribeSMBFileShares: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DescribeSMBFileShares.DescribeSMBFileSharesResponse
+ Amazonka.StorageGateway.DescribeSMBFileShares: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.DescribeSMBFileShares.DescribeSMBFileShares
+ Amazonka.StorageGateway.DescribeSMBFileShares: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.DescribeSMBFileShares.DescribeSMBFileShares
+ Amazonka.StorageGateway.DescribeSMBFileShares: instance GHC.Classes.Eq Amazonka.StorageGateway.DescribeSMBFileShares.DescribeSMBFileShares
+ Amazonka.StorageGateway.DescribeSMBFileShares: instance GHC.Classes.Eq Amazonka.StorageGateway.DescribeSMBFileShares.DescribeSMBFileSharesResponse
+ Amazonka.StorageGateway.DescribeSMBFileShares: instance GHC.Generics.Generic Amazonka.StorageGateway.DescribeSMBFileShares.DescribeSMBFileShares
+ Amazonka.StorageGateway.DescribeSMBFileShares: instance GHC.Generics.Generic Amazonka.StorageGateway.DescribeSMBFileShares.DescribeSMBFileSharesResponse
+ Amazonka.StorageGateway.DescribeSMBFileShares: instance GHC.Read.Read Amazonka.StorageGateway.DescribeSMBFileShares.DescribeSMBFileShares
+ Amazonka.StorageGateway.DescribeSMBFileShares: instance GHC.Read.Read Amazonka.StorageGateway.DescribeSMBFileShares.DescribeSMBFileSharesResponse
+ Amazonka.StorageGateway.DescribeSMBFileShares: instance GHC.Show.Show Amazonka.StorageGateway.DescribeSMBFileShares.DescribeSMBFileShares
+ Amazonka.StorageGateway.DescribeSMBFileShares: instance GHC.Show.Show Amazonka.StorageGateway.DescribeSMBFileShares.DescribeSMBFileSharesResponse
+ Amazonka.StorageGateway.DescribeSMBFileShares: newDescribeSMBFileShares :: NonEmpty Text -> DescribeSMBFileShares
+ Amazonka.StorageGateway.DescribeSMBFileShares: newDescribeSMBFileSharesResponse :: Int -> DescribeSMBFileSharesResponse
+ Amazonka.StorageGateway.DescribeSMBSettings: DescribeSMBSettings' :: Text -> DescribeSMBSettings
+ Amazonka.StorageGateway.DescribeSMBSettings: DescribeSMBSettingsResponse' :: Maybe ActiveDirectoryStatus -> Maybe Text -> Maybe Bool -> Maybe Text -> Maybe Bool -> Maybe SMBLocalGroups -> Maybe SMBSecurityStrategy -> Int -> DescribeSMBSettingsResponse
+ Amazonka.StorageGateway.DescribeSMBSettings: [$sel:activeDirectoryStatus:DescribeSMBSettingsResponse'] :: DescribeSMBSettingsResponse -> Maybe ActiveDirectoryStatus
+ Amazonka.StorageGateway.DescribeSMBSettings: [$sel:domainName:DescribeSMBSettingsResponse'] :: DescribeSMBSettingsResponse -> Maybe Text
+ Amazonka.StorageGateway.DescribeSMBSettings: [$sel:fileSharesVisible:DescribeSMBSettingsResponse'] :: DescribeSMBSettingsResponse -> Maybe Bool
+ Amazonka.StorageGateway.DescribeSMBSettings: [$sel:gatewayARN:DescribeSMBSettings'] :: DescribeSMBSettings -> Text
+ Amazonka.StorageGateway.DescribeSMBSettings: [$sel:gatewayARN:DescribeSMBSettingsResponse'] :: DescribeSMBSettingsResponse -> Maybe Text
+ Amazonka.StorageGateway.DescribeSMBSettings: [$sel:httpStatus:DescribeSMBSettingsResponse'] :: DescribeSMBSettingsResponse -> Int
+ Amazonka.StorageGateway.DescribeSMBSettings: [$sel:sMBGuestPasswordSet:DescribeSMBSettingsResponse'] :: DescribeSMBSettingsResponse -> Maybe Bool
+ Amazonka.StorageGateway.DescribeSMBSettings: [$sel:sMBLocalGroups:DescribeSMBSettingsResponse'] :: DescribeSMBSettingsResponse -> Maybe SMBLocalGroups
+ Amazonka.StorageGateway.DescribeSMBSettings: [$sel:sMBSecurityStrategy:DescribeSMBSettingsResponse'] :: DescribeSMBSettingsResponse -> Maybe SMBSecurityStrategy
+ Amazonka.StorageGateway.DescribeSMBSettings: data DescribeSMBSettings
+ Amazonka.StorageGateway.DescribeSMBSettings: data DescribeSMBSettingsResponse
+ Amazonka.StorageGateway.DescribeSMBSettings: describeSMBSettingsResponse_activeDirectoryStatus :: Lens' DescribeSMBSettingsResponse (Maybe ActiveDirectoryStatus)
+ Amazonka.StorageGateway.DescribeSMBSettings: describeSMBSettingsResponse_domainName :: Lens' DescribeSMBSettingsResponse (Maybe Text)
+ Amazonka.StorageGateway.DescribeSMBSettings: describeSMBSettingsResponse_fileSharesVisible :: Lens' DescribeSMBSettingsResponse (Maybe Bool)
+ Amazonka.StorageGateway.DescribeSMBSettings: describeSMBSettingsResponse_gatewayARN :: Lens' DescribeSMBSettingsResponse (Maybe Text)
+ Amazonka.StorageGateway.DescribeSMBSettings: describeSMBSettingsResponse_httpStatus :: Lens' DescribeSMBSettingsResponse Int
+ Amazonka.StorageGateway.DescribeSMBSettings: describeSMBSettingsResponse_sMBGuestPasswordSet :: Lens' DescribeSMBSettingsResponse (Maybe Bool)
+ Amazonka.StorageGateway.DescribeSMBSettings: describeSMBSettingsResponse_sMBLocalGroups :: Lens' DescribeSMBSettingsResponse (Maybe SMBLocalGroups)
+ Amazonka.StorageGateway.DescribeSMBSettings: describeSMBSettingsResponse_sMBSecurityStrategy :: Lens' DescribeSMBSettingsResponse (Maybe SMBSecurityStrategy)
+ Amazonka.StorageGateway.DescribeSMBSettings: describeSMBSettings_gatewayARN :: Lens' DescribeSMBSettings Text
+ Amazonka.StorageGateway.DescribeSMBSettings: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.DescribeSMBSettings.DescribeSMBSettings
+ Amazonka.StorageGateway.DescribeSMBSettings: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.DescribeSMBSettings.DescribeSMBSettings
+ Amazonka.StorageGateway.DescribeSMBSettings: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.DescribeSMBSettings.DescribeSMBSettings
+ Amazonka.StorageGateway.DescribeSMBSettings: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.DescribeSMBSettings.DescribeSMBSettings
+ Amazonka.StorageGateway.DescribeSMBSettings: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DescribeSMBSettings.DescribeSMBSettings
+ Amazonka.StorageGateway.DescribeSMBSettings: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DescribeSMBSettings.DescribeSMBSettingsResponse
+ Amazonka.StorageGateway.DescribeSMBSettings: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.DescribeSMBSettings.DescribeSMBSettings
+ Amazonka.StorageGateway.DescribeSMBSettings: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.DescribeSMBSettings.DescribeSMBSettings
+ Amazonka.StorageGateway.DescribeSMBSettings: instance GHC.Classes.Eq Amazonka.StorageGateway.DescribeSMBSettings.DescribeSMBSettings
+ Amazonka.StorageGateway.DescribeSMBSettings: instance GHC.Classes.Eq Amazonka.StorageGateway.DescribeSMBSettings.DescribeSMBSettingsResponse
+ Amazonka.StorageGateway.DescribeSMBSettings: instance GHC.Generics.Generic Amazonka.StorageGateway.DescribeSMBSettings.DescribeSMBSettings
+ Amazonka.StorageGateway.DescribeSMBSettings: instance GHC.Generics.Generic Amazonka.StorageGateway.DescribeSMBSettings.DescribeSMBSettingsResponse
+ Amazonka.StorageGateway.DescribeSMBSettings: instance GHC.Read.Read Amazonka.StorageGateway.DescribeSMBSettings.DescribeSMBSettings
+ Amazonka.StorageGateway.DescribeSMBSettings: instance GHC.Read.Read Amazonka.StorageGateway.DescribeSMBSettings.DescribeSMBSettingsResponse
+ Amazonka.StorageGateway.DescribeSMBSettings: instance GHC.Show.Show Amazonka.StorageGateway.DescribeSMBSettings.DescribeSMBSettings
+ Amazonka.StorageGateway.DescribeSMBSettings: instance GHC.Show.Show Amazonka.StorageGateway.DescribeSMBSettings.DescribeSMBSettingsResponse
+ Amazonka.StorageGateway.DescribeSMBSettings: newDescribeSMBSettings :: Text -> DescribeSMBSettings
+ Amazonka.StorageGateway.DescribeSMBSettings: newDescribeSMBSettingsResponse :: Int -> DescribeSMBSettingsResponse
+ Amazonka.StorageGateway.DescribeSnapshotSchedule: DescribeSnapshotSchedule' :: Text -> DescribeSnapshotSchedule
+ Amazonka.StorageGateway.DescribeSnapshotSchedule: DescribeSnapshotScheduleResponse' :: Maybe Text -> Maybe Natural -> Maybe Natural -> Maybe [Tag] -> Maybe Text -> Maybe Text -> Int -> DescribeSnapshotScheduleResponse
+ Amazonka.StorageGateway.DescribeSnapshotSchedule: [$sel:description:DescribeSnapshotScheduleResponse'] :: DescribeSnapshotScheduleResponse -> Maybe Text
+ Amazonka.StorageGateway.DescribeSnapshotSchedule: [$sel:httpStatus:DescribeSnapshotScheduleResponse'] :: DescribeSnapshotScheduleResponse -> Int
+ Amazonka.StorageGateway.DescribeSnapshotSchedule: [$sel:recurrenceInHours:DescribeSnapshotScheduleResponse'] :: DescribeSnapshotScheduleResponse -> Maybe Natural
+ Amazonka.StorageGateway.DescribeSnapshotSchedule: [$sel:startAt:DescribeSnapshotScheduleResponse'] :: DescribeSnapshotScheduleResponse -> Maybe Natural
+ Amazonka.StorageGateway.DescribeSnapshotSchedule: [$sel:tags:DescribeSnapshotScheduleResponse'] :: DescribeSnapshotScheduleResponse -> Maybe [Tag]
+ Amazonka.StorageGateway.DescribeSnapshotSchedule: [$sel:timezone:DescribeSnapshotScheduleResponse'] :: DescribeSnapshotScheduleResponse -> Maybe Text
+ Amazonka.StorageGateway.DescribeSnapshotSchedule: [$sel:volumeARN:DescribeSnapshotSchedule'] :: DescribeSnapshotSchedule -> Text
+ Amazonka.StorageGateway.DescribeSnapshotSchedule: [$sel:volumeARN:DescribeSnapshotScheduleResponse'] :: DescribeSnapshotScheduleResponse -> Maybe Text
+ Amazonka.StorageGateway.DescribeSnapshotSchedule: data DescribeSnapshotSchedule
+ Amazonka.StorageGateway.DescribeSnapshotSchedule: data DescribeSnapshotScheduleResponse
+ Amazonka.StorageGateway.DescribeSnapshotSchedule: describeSnapshotScheduleResponse_description :: Lens' DescribeSnapshotScheduleResponse (Maybe Text)
+ Amazonka.StorageGateway.DescribeSnapshotSchedule: describeSnapshotScheduleResponse_httpStatus :: Lens' DescribeSnapshotScheduleResponse Int
+ Amazonka.StorageGateway.DescribeSnapshotSchedule: describeSnapshotScheduleResponse_recurrenceInHours :: Lens' DescribeSnapshotScheduleResponse (Maybe Natural)
+ Amazonka.StorageGateway.DescribeSnapshotSchedule: describeSnapshotScheduleResponse_startAt :: Lens' DescribeSnapshotScheduleResponse (Maybe Natural)
+ Amazonka.StorageGateway.DescribeSnapshotSchedule: describeSnapshotScheduleResponse_tags :: Lens' DescribeSnapshotScheduleResponse (Maybe [Tag])
+ Amazonka.StorageGateway.DescribeSnapshotSchedule: describeSnapshotScheduleResponse_timezone :: Lens' DescribeSnapshotScheduleResponse (Maybe Text)
+ Amazonka.StorageGateway.DescribeSnapshotSchedule: describeSnapshotScheduleResponse_volumeARN :: Lens' DescribeSnapshotScheduleResponse (Maybe Text)
+ Amazonka.StorageGateway.DescribeSnapshotSchedule: describeSnapshotSchedule_volumeARN :: Lens' DescribeSnapshotSchedule Text
+ Amazonka.StorageGateway.DescribeSnapshotSchedule: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.DescribeSnapshotSchedule.DescribeSnapshotSchedule
+ Amazonka.StorageGateway.DescribeSnapshotSchedule: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.DescribeSnapshotSchedule.DescribeSnapshotSchedule
+ Amazonka.StorageGateway.DescribeSnapshotSchedule: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.DescribeSnapshotSchedule.DescribeSnapshotSchedule
+ Amazonka.StorageGateway.DescribeSnapshotSchedule: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.DescribeSnapshotSchedule.DescribeSnapshotSchedule
+ Amazonka.StorageGateway.DescribeSnapshotSchedule: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DescribeSnapshotSchedule.DescribeSnapshotSchedule
+ Amazonka.StorageGateway.DescribeSnapshotSchedule: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DescribeSnapshotSchedule.DescribeSnapshotScheduleResponse
+ Amazonka.StorageGateway.DescribeSnapshotSchedule: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.DescribeSnapshotSchedule.DescribeSnapshotSchedule
+ Amazonka.StorageGateway.DescribeSnapshotSchedule: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.DescribeSnapshotSchedule.DescribeSnapshotSchedule
+ Amazonka.StorageGateway.DescribeSnapshotSchedule: instance GHC.Classes.Eq Amazonka.StorageGateway.DescribeSnapshotSchedule.DescribeSnapshotSchedule
+ Amazonka.StorageGateway.DescribeSnapshotSchedule: instance GHC.Classes.Eq Amazonka.StorageGateway.DescribeSnapshotSchedule.DescribeSnapshotScheduleResponse
+ Amazonka.StorageGateway.DescribeSnapshotSchedule: instance GHC.Generics.Generic Amazonka.StorageGateway.DescribeSnapshotSchedule.DescribeSnapshotSchedule
+ Amazonka.StorageGateway.DescribeSnapshotSchedule: instance GHC.Generics.Generic Amazonka.StorageGateway.DescribeSnapshotSchedule.DescribeSnapshotScheduleResponse
+ Amazonka.StorageGateway.DescribeSnapshotSchedule: instance GHC.Read.Read Amazonka.StorageGateway.DescribeSnapshotSchedule.DescribeSnapshotSchedule
+ Amazonka.StorageGateway.DescribeSnapshotSchedule: instance GHC.Read.Read Amazonka.StorageGateway.DescribeSnapshotSchedule.DescribeSnapshotScheduleResponse
+ Amazonka.StorageGateway.DescribeSnapshotSchedule: instance GHC.Show.Show Amazonka.StorageGateway.DescribeSnapshotSchedule.DescribeSnapshotSchedule
+ Amazonka.StorageGateway.DescribeSnapshotSchedule: instance GHC.Show.Show Amazonka.StorageGateway.DescribeSnapshotSchedule.DescribeSnapshotScheduleResponse
+ Amazonka.StorageGateway.DescribeSnapshotSchedule: newDescribeSnapshotSchedule :: Text -> DescribeSnapshotSchedule
+ Amazonka.StorageGateway.DescribeSnapshotSchedule: newDescribeSnapshotScheduleResponse :: Int -> DescribeSnapshotScheduleResponse
+ Amazonka.StorageGateway.DescribeStorediSCSIVolumes: DescribeStorediSCSIVolumes' :: [Text] -> DescribeStorediSCSIVolumes
+ Amazonka.StorageGateway.DescribeStorediSCSIVolumes: DescribeStorediSCSIVolumesResponse' :: Maybe [StorediSCSIVolume] -> Int -> DescribeStorediSCSIVolumesResponse
+ Amazonka.StorageGateway.DescribeStorediSCSIVolumes: [$sel:httpStatus:DescribeStorediSCSIVolumesResponse'] :: DescribeStorediSCSIVolumesResponse -> Int
+ Amazonka.StorageGateway.DescribeStorediSCSIVolumes: [$sel:storediSCSIVolumes:DescribeStorediSCSIVolumesResponse'] :: DescribeStorediSCSIVolumesResponse -> Maybe [StorediSCSIVolume]
+ Amazonka.StorageGateway.DescribeStorediSCSIVolumes: [$sel:volumeARNs:DescribeStorediSCSIVolumes'] :: DescribeStorediSCSIVolumes -> [Text]
+ Amazonka.StorageGateway.DescribeStorediSCSIVolumes: data DescribeStorediSCSIVolumes
+ Amazonka.StorageGateway.DescribeStorediSCSIVolumes: data DescribeStorediSCSIVolumesResponse
+ Amazonka.StorageGateway.DescribeStorediSCSIVolumes: describeStorediSCSIVolumesResponse_httpStatus :: Lens' DescribeStorediSCSIVolumesResponse Int
+ Amazonka.StorageGateway.DescribeStorediSCSIVolumes: describeStorediSCSIVolumesResponse_storediSCSIVolumes :: Lens' DescribeStorediSCSIVolumesResponse (Maybe [StorediSCSIVolume])
+ Amazonka.StorageGateway.DescribeStorediSCSIVolumes: describeStorediSCSIVolumes_volumeARNs :: Lens' DescribeStorediSCSIVolumes [Text]
+ Amazonka.StorageGateway.DescribeStorediSCSIVolumes: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.DescribeStorediSCSIVolumes.DescribeStorediSCSIVolumes
+ Amazonka.StorageGateway.DescribeStorediSCSIVolumes: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.DescribeStorediSCSIVolumes.DescribeStorediSCSIVolumes
+ Amazonka.StorageGateway.DescribeStorediSCSIVolumes: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.DescribeStorediSCSIVolumes.DescribeStorediSCSIVolumes
+ Amazonka.StorageGateway.DescribeStorediSCSIVolumes: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.DescribeStorediSCSIVolumes.DescribeStorediSCSIVolumes
+ Amazonka.StorageGateway.DescribeStorediSCSIVolumes: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DescribeStorediSCSIVolumes.DescribeStorediSCSIVolumes
+ Amazonka.StorageGateway.DescribeStorediSCSIVolumes: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DescribeStorediSCSIVolumes.DescribeStorediSCSIVolumesResponse
+ Amazonka.StorageGateway.DescribeStorediSCSIVolumes: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.DescribeStorediSCSIVolumes.DescribeStorediSCSIVolumes
+ Amazonka.StorageGateway.DescribeStorediSCSIVolumes: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.DescribeStorediSCSIVolumes.DescribeStorediSCSIVolumes
+ Amazonka.StorageGateway.DescribeStorediSCSIVolumes: instance GHC.Classes.Eq Amazonka.StorageGateway.DescribeStorediSCSIVolumes.DescribeStorediSCSIVolumes
+ Amazonka.StorageGateway.DescribeStorediSCSIVolumes: instance GHC.Classes.Eq Amazonka.StorageGateway.DescribeStorediSCSIVolumes.DescribeStorediSCSIVolumesResponse
+ Amazonka.StorageGateway.DescribeStorediSCSIVolumes: instance GHC.Generics.Generic Amazonka.StorageGateway.DescribeStorediSCSIVolumes.DescribeStorediSCSIVolumes
+ Amazonka.StorageGateway.DescribeStorediSCSIVolumes: instance GHC.Generics.Generic Amazonka.StorageGateway.DescribeStorediSCSIVolumes.DescribeStorediSCSIVolumesResponse
+ Amazonka.StorageGateway.DescribeStorediSCSIVolumes: instance GHC.Read.Read Amazonka.StorageGateway.DescribeStorediSCSIVolumes.DescribeStorediSCSIVolumes
+ Amazonka.StorageGateway.DescribeStorediSCSIVolumes: instance GHC.Read.Read Amazonka.StorageGateway.DescribeStorediSCSIVolumes.DescribeStorediSCSIVolumesResponse
+ Amazonka.StorageGateway.DescribeStorediSCSIVolumes: instance GHC.Show.Show Amazonka.StorageGateway.DescribeStorediSCSIVolumes.DescribeStorediSCSIVolumes
+ Amazonka.StorageGateway.DescribeStorediSCSIVolumes: instance GHC.Show.Show Amazonka.StorageGateway.DescribeStorediSCSIVolumes.DescribeStorediSCSIVolumesResponse
+ Amazonka.StorageGateway.DescribeStorediSCSIVolumes: newDescribeStorediSCSIVolumes :: DescribeStorediSCSIVolumes
+ Amazonka.StorageGateway.DescribeStorediSCSIVolumes: newDescribeStorediSCSIVolumesResponse :: Int -> DescribeStorediSCSIVolumesResponse
+ Amazonka.StorageGateway.DescribeTapeArchives: DescribeTapeArchives' :: Maybe Natural -> Maybe Text -> Maybe [Text] -> DescribeTapeArchives
+ Amazonka.StorageGateway.DescribeTapeArchives: DescribeTapeArchivesResponse' :: Maybe Text -> Maybe [TapeArchive] -> Int -> DescribeTapeArchivesResponse
+ Amazonka.StorageGateway.DescribeTapeArchives: [$sel:httpStatus:DescribeTapeArchivesResponse'] :: DescribeTapeArchivesResponse -> Int
+ Amazonka.StorageGateway.DescribeTapeArchives: [$sel:limit:DescribeTapeArchives'] :: DescribeTapeArchives -> Maybe Natural
+ Amazonka.StorageGateway.DescribeTapeArchives: [$sel:marker:DescribeTapeArchives'] :: DescribeTapeArchives -> Maybe Text
+ Amazonka.StorageGateway.DescribeTapeArchives: [$sel:marker:DescribeTapeArchivesResponse'] :: DescribeTapeArchivesResponse -> Maybe Text
+ Amazonka.StorageGateway.DescribeTapeArchives: [$sel:tapeARNs:DescribeTapeArchives'] :: DescribeTapeArchives -> Maybe [Text]
+ Amazonka.StorageGateway.DescribeTapeArchives: [$sel:tapeArchives:DescribeTapeArchivesResponse'] :: DescribeTapeArchivesResponse -> Maybe [TapeArchive]
+ Amazonka.StorageGateway.DescribeTapeArchives: data DescribeTapeArchives
+ Amazonka.StorageGateway.DescribeTapeArchives: data DescribeTapeArchivesResponse
+ Amazonka.StorageGateway.DescribeTapeArchives: describeTapeArchivesResponse_httpStatus :: Lens' DescribeTapeArchivesResponse Int
+ Amazonka.StorageGateway.DescribeTapeArchives: describeTapeArchivesResponse_marker :: Lens' DescribeTapeArchivesResponse (Maybe Text)
+ Amazonka.StorageGateway.DescribeTapeArchives: describeTapeArchivesResponse_tapeArchives :: Lens' DescribeTapeArchivesResponse (Maybe [TapeArchive])
+ Amazonka.StorageGateway.DescribeTapeArchives: describeTapeArchives_limit :: Lens' DescribeTapeArchives (Maybe Natural)
+ Amazonka.StorageGateway.DescribeTapeArchives: describeTapeArchives_marker :: Lens' DescribeTapeArchives (Maybe Text)
+ Amazonka.StorageGateway.DescribeTapeArchives: describeTapeArchives_tapeARNs :: Lens' DescribeTapeArchives (Maybe [Text])
+ Amazonka.StorageGateway.DescribeTapeArchives: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.DescribeTapeArchives.DescribeTapeArchives
+ Amazonka.StorageGateway.DescribeTapeArchives: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.DescribeTapeArchives.DescribeTapeArchives
+ Amazonka.StorageGateway.DescribeTapeArchives: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.DescribeTapeArchives.DescribeTapeArchives
+ Amazonka.StorageGateway.DescribeTapeArchives: instance Amazonka.Pager.AWSPager Amazonka.StorageGateway.DescribeTapeArchives.DescribeTapeArchives
+ Amazonka.StorageGateway.DescribeTapeArchives: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.DescribeTapeArchives.DescribeTapeArchives
+ Amazonka.StorageGateway.DescribeTapeArchives: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DescribeTapeArchives.DescribeTapeArchives
+ Amazonka.StorageGateway.DescribeTapeArchives: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DescribeTapeArchives.DescribeTapeArchivesResponse
+ Amazonka.StorageGateway.DescribeTapeArchives: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.DescribeTapeArchives.DescribeTapeArchives
+ Amazonka.StorageGateway.DescribeTapeArchives: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.DescribeTapeArchives.DescribeTapeArchives
+ Amazonka.StorageGateway.DescribeTapeArchives: instance GHC.Classes.Eq Amazonka.StorageGateway.DescribeTapeArchives.DescribeTapeArchives
+ Amazonka.StorageGateway.DescribeTapeArchives: instance GHC.Classes.Eq Amazonka.StorageGateway.DescribeTapeArchives.DescribeTapeArchivesResponse
+ Amazonka.StorageGateway.DescribeTapeArchives: instance GHC.Generics.Generic Amazonka.StorageGateway.DescribeTapeArchives.DescribeTapeArchives
+ Amazonka.StorageGateway.DescribeTapeArchives: instance GHC.Generics.Generic Amazonka.StorageGateway.DescribeTapeArchives.DescribeTapeArchivesResponse
+ Amazonka.StorageGateway.DescribeTapeArchives: instance GHC.Read.Read Amazonka.StorageGateway.DescribeTapeArchives.DescribeTapeArchives
+ Amazonka.StorageGateway.DescribeTapeArchives: instance GHC.Read.Read Amazonka.StorageGateway.DescribeTapeArchives.DescribeTapeArchivesResponse
+ Amazonka.StorageGateway.DescribeTapeArchives: instance GHC.Show.Show Amazonka.StorageGateway.DescribeTapeArchives.DescribeTapeArchives
+ Amazonka.StorageGateway.DescribeTapeArchives: instance GHC.Show.Show Amazonka.StorageGateway.DescribeTapeArchives.DescribeTapeArchivesResponse
+ Amazonka.StorageGateway.DescribeTapeArchives: newDescribeTapeArchives :: DescribeTapeArchives
+ Amazonka.StorageGateway.DescribeTapeArchives: newDescribeTapeArchivesResponse :: Int -> DescribeTapeArchivesResponse
+ Amazonka.StorageGateway.DescribeTapeRecoveryPoints: DescribeTapeRecoveryPoints' :: Maybe Natural -> Maybe Text -> Text -> DescribeTapeRecoveryPoints
+ Amazonka.StorageGateway.DescribeTapeRecoveryPoints: DescribeTapeRecoveryPointsResponse' :: Maybe Text -> Maybe Text -> Maybe [TapeRecoveryPointInfo] -> Int -> DescribeTapeRecoveryPointsResponse
+ Amazonka.StorageGateway.DescribeTapeRecoveryPoints: [$sel:gatewayARN:DescribeTapeRecoveryPoints'] :: DescribeTapeRecoveryPoints -> Text
+ Amazonka.StorageGateway.DescribeTapeRecoveryPoints: [$sel:gatewayARN:DescribeTapeRecoveryPointsResponse'] :: DescribeTapeRecoveryPointsResponse -> Maybe Text
+ Amazonka.StorageGateway.DescribeTapeRecoveryPoints: [$sel:httpStatus:DescribeTapeRecoveryPointsResponse'] :: DescribeTapeRecoveryPointsResponse -> Int
+ Amazonka.StorageGateway.DescribeTapeRecoveryPoints: [$sel:limit:DescribeTapeRecoveryPoints'] :: DescribeTapeRecoveryPoints -> Maybe Natural
+ Amazonka.StorageGateway.DescribeTapeRecoveryPoints: [$sel:marker:DescribeTapeRecoveryPoints'] :: DescribeTapeRecoveryPoints -> Maybe Text
+ Amazonka.StorageGateway.DescribeTapeRecoveryPoints: [$sel:marker:DescribeTapeRecoveryPointsResponse'] :: DescribeTapeRecoveryPointsResponse -> Maybe Text
+ Amazonka.StorageGateway.DescribeTapeRecoveryPoints: [$sel:tapeRecoveryPointInfos:DescribeTapeRecoveryPointsResponse'] :: DescribeTapeRecoveryPointsResponse -> Maybe [TapeRecoveryPointInfo]
+ Amazonka.StorageGateway.DescribeTapeRecoveryPoints: data DescribeTapeRecoveryPoints
+ Amazonka.StorageGateway.DescribeTapeRecoveryPoints: data DescribeTapeRecoveryPointsResponse
+ Amazonka.StorageGateway.DescribeTapeRecoveryPoints: describeTapeRecoveryPointsResponse_gatewayARN :: Lens' DescribeTapeRecoveryPointsResponse (Maybe Text)
+ Amazonka.StorageGateway.DescribeTapeRecoveryPoints: describeTapeRecoveryPointsResponse_httpStatus :: Lens' DescribeTapeRecoveryPointsResponse Int
+ Amazonka.StorageGateway.DescribeTapeRecoveryPoints: describeTapeRecoveryPointsResponse_marker :: Lens' DescribeTapeRecoveryPointsResponse (Maybe Text)
+ Amazonka.StorageGateway.DescribeTapeRecoveryPoints: describeTapeRecoveryPointsResponse_tapeRecoveryPointInfos :: Lens' DescribeTapeRecoveryPointsResponse (Maybe [TapeRecoveryPointInfo])
+ Amazonka.StorageGateway.DescribeTapeRecoveryPoints: describeTapeRecoveryPoints_gatewayARN :: Lens' DescribeTapeRecoveryPoints Text
+ Amazonka.StorageGateway.DescribeTapeRecoveryPoints: describeTapeRecoveryPoints_limit :: Lens' DescribeTapeRecoveryPoints (Maybe Natural)
+ Amazonka.StorageGateway.DescribeTapeRecoveryPoints: describeTapeRecoveryPoints_marker :: Lens' DescribeTapeRecoveryPoints (Maybe Text)
+ Amazonka.StorageGateway.DescribeTapeRecoveryPoints: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.DescribeTapeRecoveryPoints.DescribeTapeRecoveryPoints
+ Amazonka.StorageGateway.DescribeTapeRecoveryPoints: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.DescribeTapeRecoveryPoints.DescribeTapeRecoveryPoints
+ Amazonka.StorageGateway.DescribeTapeRecoveryPoints: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.DescribeTapeRecoveryPoints.DescribeTapeRecoveryPoints
+ Amazonka.StorageGateway.DescribeTapeRecoveryPoints: instance Amazonka.Pager.AWSPager Amazonka.StorageGateway.DescribeTapeRecoveryPoints.DescribeTapeRecoveryPoints
+ Amazonka.StorageGateway.DescribeTapeRecoveryPoints: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.DescribeTapeRecoveryPoints.DescribeTapeRecoveryPoints
+ Amazonka.StorageGateway.DescribeTapeRecoveryPoints: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DescribeTapeRecoveryPoints.DescribeTapeRecoveryPoints
+ Amazonka.StorageGateway.DescribeTapeRecoveryPoints: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DescribeTapeRecoveryPoints.DescribeTapeRecoveryPointsResponse
+ Amazonka.StorageGateway.DescribeTapeRecoveryPoints: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.DescribeTapeRecoveryPoints.DescribeTapeRecoveryPoints
+ Amazonka.StorageGateway.DescribeTapeRecoveryPoints: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.DescribeTapeRecoveryPoints.DescribeTapeRecoveryPoints
+ Amazonka.StorageGateway.DescribeTapeRecoveryPoints: instance GHC.Classes.Eq Amazonka.StorageGateway.DescribeTapeRecoveryPoints.DescribeTapeRecoveryPoints
+ Amazonka.StorageGateway.DescribeTapeRecoveryPoints: instance GHC.Classes.Eq Amazonka.StorageGateway.DescribeTapeRecoveryPoints.DescribeTapeRecoveryPointsResponse
+ Amazonka.StorageGateway.DescribeTapeRecoveryPoints: instance GHC.Generics.Generic Amazonka.StorageGateway.DescribeTapeRecoveryPoints.DescribeTapeRecoveryPoints
+ Amazonka.StorageGateway.DescribeTapeRecoveryPoints: instance GHC.Generics.Generic Amazonka.StorageGateway.DescribeTapeRecoveryPoints.DescribeTapeRecoveryPointsResponse
+ Amazonka.StorageGateway.DescribeTapeRecoveryPoints: instance GHC.Read.Read Amazonka.StorageGateway.DescribeTapeRecoveryPoints.DescribeTapeRecoveryPoints
+ Amazonka.StorageGateway.DescribeTapeRecoveryPoints: instance GHC.Read.Read Amazonka.StorageGateway.DescribeTapeRecoveryPoints.DescribeTapeRecoveryPointsResponse
+ Amazonka.StorageGateway.DescribeTapeRecoveryPoints: instance GHC.Show.Show Amazonka.StorageGateway.DescribeTapeRecoveryPoints.DescribeTapeRecoveryPoints
+ Amazonka.StorageGateway.DescribeTapeRecoveryPoints: instance GHC.Show.Show Amazonka.StorageGateway.DescribeTapeRecoveryPoints.DescribeTapeRecoveryPointsResponse
+ Amazonka.StorageGateway.DescribeTapeRecoveryPoints: newDescribeTapeRecoveryPoints :: Text -> DescribeTapeRecoveryPoints
+ Amazonka.StorageGateway.DescribeTapeRecoveryPoints: newDescribeTapeRecoveryPointsResponse :: Int -> DescribeTapeRecoveryPointsResponse
+ Amazonka.StorageGateway.DescribeTapes: DescribeTapes' :: Maybe Natural -> Maybe Text -> Maybe [Text] -> Text -> DescribeTapes
+ Amazonka.StorageGateway.DescribeTapes: DescribeTapesResponse' :: Maybe Text -> Maybe [Tape] -> Int -> DescribeTapesResponse
+ Amazonka.StorageGateway.DescribeTapes: [$sel:gatewayARN:DescribeTapes'] :: DescribeTapes -> Text
+ Amazonka.StorageGateway.DescribeTapes: [$sel:httpStatus:DescribeTapesResponse'] :: DescribeTapesResponse -> Int
+ Amazonka.StorageGateway.DescribeTapes: [$sel:limit:DescribeTapes'] :: DescribeTapes -> Maybe Natural
+ Amazonka.StorageGateway.DescribeTapes: [$sel:marker:DescribeTapes'] :: DescribeTapes -> Maybe Text
+ Amazonka.StorageGateway.DescribeTapes: [$sel:marker:DescribeTapesResponse'] :: DescribeTapesResponse -> Maybe Text
+ Amazonka.StorageGateway.DescribeTapes: [$sel:tapeARNs:DescribeTapes'] :: DescribeTapes -> Maybe [Text]
+ Amazonka.StorageGateway.DescribeTapes: [$sel:tapes:DescribeTapesResponse'] :: DescribeTapesResponse -> Maybe [Tape]
+ Amazonka.StorageGateway.DescribeTapes: data DescribeTapes
+ Amazonka.StorageGateway.DescribeTapes: data DescribeTapesResponse
+ Amazonka.StorageGateway.DescribeTapes: describeTapesResponse_httpStatus :: Lens' DescribeTapesResponse Int
+ Amazonka.StorageGateway.DescribeTapes: describeTapesResponse_marker :: Lens' DescribeTapesResponse (Maybe Text)
+ Amazonka.StorageGateway.DescribeTapes: describeTapesResponse_tapes :: Lens' DescribeTapesResponse (Maybe [Tape])
+ Amazonka.StorageGateway.DescribeTapes: describeTapes_gatewayARN :: Lens' DescribeTapes Text
+ Amazonka.StorageGateway.DescribeTapes: describeTapes_limit :: Lens' DescribeTapes (Maybe Natural)
+ Amazonka.StorageGateway.DescribeTapes: describeTapes_marker :: Lens' DescribeTapes (Maybe Text)
+ Amazonka.StorageGateway.DescribeTapes: describeTapes_tapeARNs :: Lens' DescribeTapes (Maybe [Text])
+ Amazonka.StorageGateway.DescribeTapes: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.DescribeTapes.DescribeTapes
+ Amazonka.StorageGateway.DescribeTapes: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.DescribeTapes.DescribeTapes
+ Amazonka.StorageGateway.DescribeTapes: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.DescribeTapes.DescribeTapes
+ Amazonka.StorageGateway.DescribeTapes: instance Amazonka.Pager.AWSPager Amazonka.StorageGateway.DescribeTapes.DescribeTapes
+ Amazonka.StorageGateway.DescribeTapes: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.DescribeTapes.DescribeTapes
+ Amazonka.StorageGateway.DescribeTapes: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DescribeTapes.DescribeTapes
+ Amazonka.StorageGateway.DescribeTapes: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DescribeTapes.DescribeTapesResponse
+ Amazonka.StorageGateway.DescribeTapes: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.DescribeTapes.DescribeTapes
+ Amazonka.StorageGateway.DescribeTapes: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.DescribeTapes.DescribeTapes
+ Amazonka.StorageGateway.DescribeTapes: instance GHC.Classes.Eq Amazonka.StorageGateway.DescribeTapes.DescribeTapes
+ Amazonka.StorageGateway.DescribeTapes: instance GHC.Classes.Eq Amazonka.StorageGateway.DescribeTapes.DescribeTapesResponse
+ Amazonka.StorageGateway.DescribeTapes: instance GHC.Generics.Generic Amazonka.StorageGateway.DescribeTapes.DescribeTapes
+ Amazonka.StorageGateway.DescribeTapes: instance GHC.Generics.Generic Amazonka.StorageGateway.DescribeTapes.DescribeTapesResponse
+ Amazonka.StorageGateway.DescribeTapes: instance GHC.Read.Read Amazonka.StorageGateway.DescribeTapes.DescribeTapes
+ Amazonka.StorageGateway.DescribeTapes: instance GHC.Read.Read Amazonka.StorageGateway.DescribeTapes.DescribeTapesResponse
+ Amazonka.StorageGateway.DescribeTapes: instance GHC.Show.Show Amazonka.StorageGateway.DescribeTapes.DescribeTapes
+ Amazonka.StorageGateway.DescribeTapes: instance GHC.Show.Show Amazonka.StorageGateway.DescribeTapes.DescribeTapesResponse
+ Amazonka.StorageGateway.DescribeTapes: newDescribeTapes :: Text -> DescribeTapes
+ Amazonka.StorageGateway.DescribeTapes: newDescribeTapesResponse :: Int -> DescribeTapesResponse
+ Amazonka.StorageGateway.DescribeUploadBuffer: DescribeUploadBuffer' :: Text -> DescribeUploadBuffer
+ Amazonka.StorageGateway.DescribeUploadBuffer: DescribeUploadBufferResponse' :: Maybe [Text] -> Maybe Text -> Maybe Integer -> Maybe Integer -> Int -> DescribeUploadBufferResponse
+ Amazonka.StorageGateway.DescribeUploadBuffer: [$sel:diskIds:DescribeUploadBufferResponse'] :: DescribeUploadBufferResponse -> Maybe [Text]
+ Amazonka.StorageGateway.DescribeUploadBuffer: [$sel:gatewayARN:DescribeUploadBuffer'] :: DescribeUploadBuffer -> Text
+ Amazonka.StorageGateway.DescribeUploadBuffer: [$sel:gatewayARN:DescribeUploadBufferResponse'] :: DescribeUploadBufferResponse -> Maybe Text
+ Amazonka.StorageGateway.DescribeUploadBuffer: [$sel:httpStatus:DescribeUploadBufferResponse'] :: DescribeUploadBufferResponse -> Int
+ Amazonka.StorageGateway.DescribeUploadBuffer: [$sel:uploadBufferAllocatedInBytes:DescribeUploadBufferResponse'] :: DescribeUploadBufferResponse -> Maybe Integer
+ Amazonka.StorageGateway.DescribeUploadBuffer: [$sel:uploadBufferUsedInBytes:DescribeUploadBufferResponse'] :: DescribeUploadBufferResponse -> Maybe Integer
+ Amazonka.StorageGateway.DescribeUploadBuffer: data DescribeUploadBuffer
+ Amazonka.StorageGateway.DescribeUploadBuffer: data DescribeUploadBufferResponse
+ Amazonka.StorageGateway.DescribeUploadBuffer: describeUploadBufferResponse_diskIds :: Lens' DescribeUploadBufferResponse (Maybe [Text])
+ Amazonka.StorageGateway.DescribeUploadBuffer: describeUploadBufferResponse_gatewayARN :: Lens' DescribeUploadBufferResponse (Maybe Text)
+ Amazonka.StorageGateway.DescribeUploadBuffer: describeUploadBufferResponse_httpStatus :: Lens' DescribeUploadBufferResponse Int
+ Amazonka.StorageGateway.DescribeUploadBuffer: describeUploadBufferResponse_uploadBufferAllocatedInBytes :: Lens' DescribeUploadBufferResponse (Maybe Integer)
+ Amazonka.StorageGateway.DescribeUploadBuffer: describeUploadBufferResponse_uploadBufferUsedInBytes :: Lens' DescribeUploadBufferResponse (Maybe Integer)
+ Amazonka.StorageGateway.DescribeUploadBuffer: describeUploadBuffer_gatewayARN :: Lens' DescribeUploadBuffer Text
+ Amazonka.StorageGateway.DescribeUploadBuffer: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.DescribeUploadBuffer.DescribeUploadBuffer
+ Amazonka.StorageGateway.DescribeUploadBuffer: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.DescribeUploadBuffer.DescribeUploadBuffer
+ Amazonka.StorageGateway.DescribeUploadBuffer: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.DescribeUploadBuffer.DescribeUploadBuffer
+ Amazonka.StorageGateway.DescribeUploadBuffer: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.DescribeUploadBuffer.DescribeUploadBuffer
+ Amazonka.StorageGateway.DescribeUploadBuffer: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DescribeUploadBuffer.DescribeUploadBuffer
+ Amazonka.StorageGateway.DescribeUploadBuffer: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DescribeUploadBuffer.DescribeUploadBufferResponse
+ Amazonka.StorageGateway.DescribeUploadBuffer: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.DescribeUploadBuffer.DescribeUploadBuffer
+ Amazonka.StorageGateway.DescribeUploadBuffer: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.DescribeUploadBuffer.DescribeUploadBuffer
+ Amazonka.StorageGateway.DescribeUploadBuffer: instance GHC.Classes.Eq Amazonka.StorageGateway.DescribeUploadBuffer.DescribeUploadBuffer
+ Amazonka.StorageGateway.DescribeUploadBuffer: instance GHC.Classes.Eq Amazonka.StorageGateway.DescribeUploadBuffer.DescribeUploadBufferResponse
+ Amazonka.StorageGateway.DescribeUploadBuffer: instance GHC.Generics.Generic Amazonka.StorageGateway.DescribeUploadBuffer.DescribeUploadBuffer
+ Amazonka.StorageGateway.DescribeUploadBuffer: instance GHC.Generics.Generic Amazonka.StorageGateway.DescribeUploadBuffer.DescribeUploadBufferResponse
+ Amazonka.StorageGateway.DescribeUploadBuffer: instance GHC.Read.Read Amazonka.StorageGateway.DescribeUploadBuffer.DescribeUploadBuffer
+ Amazonka.StorageGateway.DescribeUploadBuffer: instance GHC.Read.Read Amazonka.StorageGateway.DescribeUploadBuffer.DescribeUploadBufferResponse
+ Amazonka.StorageGateway.DescribeUploadBuffer: instance GHC.Show.Show Amazonka.StorageGateway.DescribeUploadBuffer.DescribeUploadBuffer
+ Amazonka.StorageGateway.DescribeUploadBuffer: instance GHC.Show.Show Amazonka.StorageGateway.DescribeUploadBuffer.DescribeUploadBufferResponse
+ Amazonka.StorageGateway.DescribeUploadBuffer: newDescribeUploadBuffer :: Text -> DescribeUploadBuffer
+ Amazonka.StorageGateway.DescribeUploadBuffer: newDescribeUploadBufferResponse :: Int -> DescribeUploadBufferResponse
+ Amazonka.StorageGateway.DescribeVTLDevices: DescribeVTLDevices' :: Maybe Natural -> Maybe Text -> Maybe [Text] -> Text -> DescribeVTLDevices
+ Amazonka.StorageGateway.DescribeVTLDevices: DescribeVTLDevicesResponse' :: Maybe Text -> Maybe Text -> Maybe [VTLDevice] -> Int -> DescribeVTLDevicesResponse
+ Amazonka.StorageGateway.DescribeVTLDevices: [$sel:gatewayARN:DescribeVTLDevices'] :: DescribeVTLDevices -> Text
+ Amazonka.StorageGateway.DescribeVTLDevices: [$sel:gatewayARN:DescribeVTLDevicesResponse'] :: DescribeVTLDevicesResponse -> Maybe Text
+ Amazonka.StorageGateway.DescribeVTLDevices: [$sel:httpStatus:DescribeVTLDevicesResponse'] :: DescribeVTLDevicesResponse -> Int
+ Amazonka.StorageGateway.DescribeVTLDevices: [$sel:limit:DescribeVTLDevices'] :: DescribeVTLDevices -> Maybe Natural
+ Amazonka.StorageGateway.DescribeVTLDevices: [$sel:marker:DescribeVTLDevices'] :: DescribeVTLDevices -> Maybe Text
+ Amazonka.StorageGateway.DescribeVTLDevices: [$sel:marker:DescribeVTLDevicesResponse'] :: DescribeVTLDevicesResponse -> Maybe Text
+ Amazonka.StorageGateway.DescribeVTLDevices: [$sel:vTLDeviceARNs:DescribeVTLDevices'] :: DescribeVTLDevices -> Maybe [Text]
+ Amazonka.StorageGateway.DescribeVTLDevices: [$sel:vTLDevices:DescribeVTLDevicesResponse'] :: DescribeVTLDevicesResponse -> Maybe [VTLDevice]
+ Amazonka.StorageGateway.DescribeVTLDevices: data DescribeVTLDevices
+ Amazonka.StorageGateway.DescribeVTLDevices: data DescribeVTLDevicesResponse
+ Amazonka.StorageGateway.DescribeVTLDevices: describeVTLDevicesResponse_gatewayARN :: Lens' DescribeVTLDevicesResponse (Maybe Text)
+ Amazonka.StorageGateway.DescribeVTLDevices: describeVTLDevicesResponse_httpStatus :: Lens' DescribeVTLDevicesResponse Int
+ Amazonka.StorageGateway.DescribeVTLDevices: describeVTLDevicesResponse_marker :: Lens' DescribeVTLDevicesResponse (Maybe Text)
+ Amazonka.StorageGateway.DescribeVTLDevices: describeVTLDevicesResponse_vTLDevices :: Lens' DescribeVTLDevicesResponse (Maybe [VTLDevice])
+ Amazonka.StorageGateway.DescribeVTLDevices: describeVTLDevices_gatewayARN :: Lens' DescribeVTLDevices Text
+ Amazonka.StorageGateway.DescribeVTLDevices: describeVTLDevices_limit :: Lens' DescribeVTLDevices (Maybe Natural)
+ Amazonka.StorageGateway.DescribeVTLDevices: describeVTLDevices_marker :: Lens' DescribeVTLDevices (Maybe Text)
+ Amazonka.StorageGateway.DescribeVTLDevices: describeVTLDevices_vTLDeviceARNs :: Lens' DescribeVTLDevices (Maybe [Text])
+ Amazonka.StorageGateway.DescribeVTLDevices: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.DescribeVTLDevices.DescribeVTLDevices
+ Amazonka.StorageGateway.DescribeVTLDevices: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.DescribeVTLDevices.DescribeVTLDevices
+ Amazonka.StorageGateway.DescribeVTLDevices: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.DescribeVTLDevices.DescribeVTLDevices
+ Amazonka.StorageGateway.DescribeVTLDevices: instance Amazonka.Pager.AWSPager Amazonka.StorageGateway.DescribeVTLDevices.DescribeVTLDevices
+ Amazonka.StorageGateway.DescribeVTLDevices: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.DescribeVTLDevices.DescribeVTLDevices
+ Amazonka.StorageGateway.DescribeVTLDevices: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DescribeVTLDevices.DescribeVTLDevices
+ Amazonka.StorageGateway.DescribeVTLDevices: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DescribeVTLDevices.DescribeVTLDevicesResponse
+ Amazonka.StorageGateway.DescribeVTLDevices: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.DescribeVTLDevices.DescribeVTLDevices
+ Amazonka.StorageGateway.DescribeVTLDevices: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.DescribeVTLDevices.DescribeVTLDevices
+ Amazonka.StorageGateway.DescribeVTLDevices: instance GHC.Classes.Eq Amazonka.StorageGateway.DescribeVTLDevices.DescribeVTLDevices
+ Amazonka.StorageGateway.DescribeVTLDevices: instance GHC.Classes.Eq Amazonka.StorageGateway.DescribeVTLDevices.DescribeVTLDevicesResponse
+ Amazonka.StorageGateway.DescribeVTLDevices: instance GHC.Generics.Generic Amazonka.StorageGateway.DescribeVTLDevices.DescribeVTLDevices
+ Amazonka.StorageGateway.DescribeVTLDevices: instance GHC.Generics.Generic Amazonka.StorageGateway.DescribeVTLDevices.DescribeVTLDevicesResponse
+ Amazonka.StorageGateway.DescribeVTLDevices: instance GHC.Read.Read Amazonka.StorageGateway.DescribeVTLDevices.DescribeVTLDevices
+ Amazonka.StorageGateway.DescribeVTLDevices: instance GHC.Read.Read Amazonka.StorageGateway.DescribeVTLDevices.DescribeVTLDevicesResponse
+ Amazonka.StorageGateway.DescribeVTLDevices: instance GHC.Show.Show Amazonka.StorageGateway.DescribeVTLDevices.DescribeVTLDevices
+ Amazonka.StorageGateway.DescribeVTLDevices: instance GHC.Show.Show Amazonka.StorageGateway.DescribeVTLDevices.DescribeVTLDevicesResponse
+ Amazonka.StorageGateway.DescribeVTLDevices: newDescribeVTLDevices :: Text -> DescribeVTLDevices
+ Amazonka.StorageGateway.DescribeVTLDevices: newDescribeVTLDevicesResponse :: Int -> DescribeVTLDevicesResponse
+ Amazonka.StorageGateway.DescribeWorkingStorage: DescribeWorkingStorage' :: Text -> DescribeWorkingStorage
+ Amazonka.StorageGateway.DescribeWorkingStorage: DescribeWorkingStorageResponse' :: Maybe [Text] -> Maybe Text -> Maybe Integer -> Maybe Integer -> Int -> DescribeWorkingStorageResponse
+ Amazonka.StorageGateway.DescribeWorkingStorage: [$sel:diskIds:DescribeWorkingStorageResponse'] :: DescribeWorkingStorageResponse -> Maybe [Text]
+ Amazonka.StorageGateway.DescribeWorkingStorage: [$sel:gatewayARN:DescribeWorkingStorage'] :: DescribeWorkingStorage -> Text
+ Amazonka.StorageGateway.DescribeWorkingStorage: [$sel:gatewayARN:DescribeWorkingStorageResponse'] :: DescribeWorkingStorageResponse -> Maybe Text
+ Amazonka.StorageGateway.DescribeWorkingStorage: [$sel:httpStatus:DescribeWorkingStorageResponse'] :: DescribeWorkingStorageResponse -> Int
+ Amazonka.StorageGateway.DescribeWorkingStorage: [$sel:workingStorageAllocatedInBytes:DescribeWorkingStorageResponse'] :: DescribeWorkingStorageResponse -> Maybe Integer
+ Amazonka.StorageGateway.DescribeWorkingStorage: [$sel:workingStorageUsedInBytes:DescribeWorkingStorageResponse'] :: DescribeWorkingStorageResponse -> Maybe Integer
+ Amazonka.StorageGateway.DescribeWorkingStorage: data DescribeWorkingStorage
+ Amazonka.StorageGateway.DescribeWorkingStorage: data DescribeWorkingStorageResponse
+ Amazonka.StorageGateway.DescribeWorkingStorage: describeWorkingStorageResponse_diskIds :: Lens' DescribeWorkingStorageResponse (Maybe [Text])
+ Amazonka.StorageGateway.DescribeWorkingStorage: describeWorkingStorageResponse_gatewayARN :: Lens' DescribeWorkingStorageResponse (Maybe Text)
+ Amazonka.StorageGateway.DescribeWorkingStorage: describeWorkingStorageResponse_httpStatus :: Lens' DescribeWorkingStorageResponse Int
+ Amazonka.StorageGateway.DescribeWorkingStorage: describeWorkingStorageResponse_workingStorageAllocatedInBytes :: Lens' DescribeWorkingStorageResponse (Maybe Integer)
+ Amazonka.StorageGateway.DescribeWorkingStorage: describeWorkingStorageResponse_workingStorageUsedInBytes :: Lens' DescribeWorkingStorageResponse (Maybe Integer)
+ Amazonka.StorageGateway.DescribeWorkingStorage: describeWorkingStorage_gatewayARN :: Lens' DescribeWorkingStorage Text
+ Amazonka.StorageGateway.DescribeWorkingStorage: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.DescribeWorkingStorage.DescribeWorkingStorage
+ Amazonka.StorageGateway.DescribeWorkingStorage: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.DescribeWorkingStorage.DescribeWorkingStorage
+ Amazonka.StorageGateway.DescribeWorkingStorage: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.DescribeWorkingStorage.DescribeWorkingStorage
+ Amazonka.StorageGateway.DescribeWorkingStorage: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.DescribeWorkingStorage.DescribeWorkingStorage
+ Amazonka.StorageGateway.DescribeWorkingStorage: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DescribeWorkingStorage.DescribeWorkingStorage
+ Amazonka.StorageGateway.DescribeWorkingStorage: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DescribeWorkingStorage.DescribeWorkingStorageResponse
+ Amazonka.StorageGateway.DescribeWorkingStorage: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.DescribeWorkingStorage.DescribeWorkingStorage
+ Amazonka.StorageGateway.DescribeWorkingStorage: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.DescribeWorkingStorage.DescribeWorkingStorage
+ Amazonka.StorageGateway.DescribeWorkingStorage: instance GHC.Classes.Eq Amazonka.StorageGateway.DescribeWorkingStorage.DescribeWorkingStorage
+ Amazonka.StorageGateway.DescribeWorkingStorage: instance GHC.Classes.Eq Amazonka.StorageGateway.DescribeWorkingStorage.DescribeWorkingStorageResponse
+ Amazonka.StorageGateway.DescribeWorkingStorage: instance GHC.Generics.Generic Amazonka.StorageGateway.DescribeWorkingStorage.DescribeWorkingStorage
+ Amazonka.StorageGateway.DescribeWorkingStorage: instance GHC.Generics.Generic Amazonka.StorageGateway.DescribeWorkingStorage.DescribeWorkingStorageResponse
+ Amazonka.StorageGateway.DescribeWorkingStorage: instance GHC.Read.Read Amazonka.StorageGateway.DescribeWorkingStorage.DescribeWorkingStorage
+ Amazonka.StorageGateway.DescribeWorkingStorage: instance GHC.Read.Read Amazonka.StorageGateway.DescribeWorkingStorage.DescribeWorkingStorageResponse
+ Amazonka.StorageGateway.DescribeWorkingStorage: instance GHC.Show.Show Amazonka.StorageGateway.DescribeWorkingStorage.DescribeWorkingStorage
+ Amazonka.StorageGateway.DescribeWorkingStorage: instance GHC.Show.Show Amazonka.StorageGateway.DescribeWorkingStorage.DescribeWorkingStorageResponse
+ Amazonka.StorageGateway.DescribeWorkingStorage: newDescribeWorkingStorage :: Text -> DescribeWorkingStorage
+ Amazonka.StorageGateway.DescribeWorkingStorage: newDescribeWorkingStorageResponse :: Int -> DescribeWorkingStorageResponse
+ Amazonka.StorageGateway.DetachVolume: DetachVolume' :: Maybe Bool -> Text -> DetachVolume
+ Amazonka.StorageGateway.DetachVolume: DetachVolumeResponse' :: Maybe Text -> Int -> DetachVolumeResponse
+ Amazonka.StorageGateway.DetachVolume: [$sel:forceDetach:DetachVolume'] :: DetachVolume -> Maybe Bool
+ Amazonka.StorageGateway.DetachVolume: [$sel:httpStatus:DetachVolumeResponse'] :: DetachVolumeResponse -> Int
+ Amazonka.StorageGateway.DetachVolume: [$sel:volumeARN:DetachVolume'] :: DetachVolume -> Text
+ Amazonka.StorageGateway.DetachVolume: [$sel:volumeARN:DetachVolumeResponse'] :: DetachVolumeResponse -> Maybe Text
+ Amazonka.StorageGateway.DetachVolume: data DetachVolume
+ Amazonka.StorageGateway.DetachVolume: data DetachVolumeResponse
+ Amazonka.StorageGateway.DetachVolume: detachVolumeResponse_httpStatus :: Lens' DetachVolumeResponse Int
+ Amazonka.StorageGateway.DetachVolume: detachVolumeResponse_volumeARN :: Lens' DetachVolumeResponse (Maybe Text)
+ Amazonka.StorageGateway.DetachVolume: detachVolume_forceDetach :: Lens' DetachVolume (Maybe Bool)
+ Amazonka.StorageGateway.DetachVolume: detachVolume_volumeARN :: Lens' DetachVolume Text
+ Amazonka.StorageGateway.DetachVolume: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.DetachVolume.DetachVolume
+ Amazonka.StorageGateway.DetachVolume: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.DetachVolume.DetachVolume
+ Amazonka.StorageGateway.DetachVolume: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.DetachVolume.DetachVolume
+ Amazonka.StorageGateway.DetachVolume: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.DetachVolume.DetachVolume
+ Amazonka.StorageGateway.DetachVolume: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DetachVolume.DetachVolume
+ Amazonka.StorageGateway.DetachVolume: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DetachVolume.DetachVolumeResponse
+ Amazonka.StorageGateway.DetachVolume: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.DetachVolume.DetachVolume
+ Amazonka.StorageGateway.DetachVolume: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.DetachVolume.DetachVolume
+ Amazonka.StorageGateway.DetachVolume: instance GHC.Classes.Eq Amazonka.StorageGateway.DetachVolume.DetachVolume
+ Amazonka.StorageGateway.DetachVolume: instance GHC.Classes.Eq Amazonka.StorageGateway.DetachVolume.DetachVolumeResponse
+ Amazonka.StorageGateway.DetachVolume: instance GHC.Generics.Generic Amazonka.StorageGateway.DetachVolume.DetachVolume
+ Amazonka.StorageGateway.DetachVolume: instance GHC.Generics.Generic Amazonka.StorageGateway.DetachVolume.DetachVolumeResponse
+ Amazonka.StorageGateway.DetachVolume: instance GHC.Read.Read Amazonka.StorageGateway.DetachVolume.DetachVolume
+ Amazonka.StorageGateway.DetachVolume: instance GHC.Read.Read Amazonka.StorageGateway.DetachVolume.DetachVolumeResponse
+ Amazonka.StorageGateway.DetachVolume: instance GHC.Show.Show Amazonka.StorageGateway.DetachVolume.DetachVolume
+ Amazonka.StorageGateway.DetachVolume: instance GHC.Show.Show Amazonka.StorageGateway.DetachVolume.DetachVolumeResponse
+ Amazonka.StorageGateway.DetachVolume: newDetachVolume :: Text -> DetachVolume
+ Amazonka.StorageGateway.DetachVolume: newDetachVolumeResponse :: Int -> DetachVolumeResponse
+ Amazonka.StorageGateway.DisableGateway: DisableGateway' :: Text -> DisableGateway
+ Amazonka.StorageGateway.DisableGateway: DisableGatewayResponse' :: Maybe Text -> Int -> DisableGatewayResponse
+ Amazonka.StorageGateway.DisableGateway: [$sel:gatewayARN:DisableGateway'] :: DisableGateway -> Text
+ Amazonka.StorageGateway.DisableGateway: [$sel:gatewayARN:DisableGatewayResponse'] :: DisableGatewayResponse -> Maybe Text
+ Amazonka.StorageGateway.DisableGateway: [$sel:httpStatus:DisableGatewayResponse'] :: DisableGatewayResponse -> Int
+ Amazonka.StorageGateway.DisableGateway: data DisableGateway
+ Amazonka.StorageGateway.DisableGateway: data DisableGatewayResponse
+ Amazonka.StorageGateway.DisableGateway: disableGatewayResponse_gatewayARN :: Lens' DisableGatewayResponse (Maybe Text)
+ Amazonka.StorageGateway.DisableGateway: disableGatewayResponse_httpStatus :: Lens' DisableGatewayResponse Int
+ Amazonka.StorageGateway.DisableGateway: disableGateway_gatewayARN :: Lens' DisableGateway Text
+ Amazonka.StorageGateway.DisableGateway: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.DisableGateway.DisableGateway
+ Amazonka.StorageGateway.DisableGateway: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.DisableGateway.DisableGateway
+ Amazonka.StorageGateway.DisableGateway: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.DisableGateway.DisableGateway
+ Amazonka.StorageGateway.DisableGateway: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.DisableGateway.DisableGateway
+ Amazonka.StorageGateway.DisableGateway: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DisableGateway.DisableGateway
+ Amazonka.StorageGateway.DisableGateway: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DisableGateway.DisableGatewayResponse
+ Amazonka.StorageGateway.DisableGateway: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.DisableGateway.DisableGateway
+ Amazonka.StorageGateway.DisableGateway: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.DisableGateway.DisableGateway
+ Amazonka.StorageGateway.DisableGateway: instance GHC.Classes.Eq Amazonka.StorageGateway.DisableGateway.DisableGateway
+ Amazonka.StorageGateway.DisableGateway: instance GHC.Classes.Eq Amazonka.StorageGateway.DisableGateway.DisableGatewayResponse
+ Amazonka.StorageGateway.DisableGateway: instance GHC.Generics.Generic Amazonka.StorageGateway.DisableGateway.DisableGateway
+ Amazonka.StorageGateway.DisableGateway: instance GHC.Generics.Generic Amazonka.StorageGateway.DisableGateway.DisableGatewayResponse
+ Amazonka.StorageGateway.DisableGateway: instance GHC.Read.Read Amazonka.StorageGateway.DisableGateway.DisableGateway
+ Amazonka.StorageGateway.DisableGateway: instance GHC.Read.Read Amazonka.StorageGateway.DisableGateway.DisableGatewayResponse
+ Amazonka.StorageGateway.DisableGateway: instance GHC.Show.Show Amazonka.StorageGateway.DisableGateway.DisableGateway
+ Amazonka.StorageGateway.DisableGateway: instance GHC.Show.Show Amazonka.StorageGateway.DisableGateway.DisableGatewayResponse
+ Amazonka.StorageGateway.DisableGateway: newDisableGateway :: Text -> DisableGateway
+ Amazonka.StorageGateway.DisableGateway: newDisableGatewayResponse :: Int -> DisableGatewayResponse
+ Amazonka.StorageGateway.DisassociateFileSystem: DisassociateFileSystem' :: Maybe Bool -> Text -> DisassociateFileSystem
+ Amazonka.StorageGateway.DisassociateFileSystem: DisassociateFileSystemResponse' :: Maybe Text -> Int -> DisassociateFileSystemResponse
+ Amazonka.StorageGateway.DisassociateFileSystem: [$sel:fileSystemAssociationARN:DisassociateFileSystem'] :: DisassociateFileSystem -> Text
+ Amazonka.StorageGateway.DisassociateFileSystem: [$sel:fileSystemAssociationARN:DisassociateFileSystemResponse'] :: DisassociateFileSystemResponse -> Maybe Text
+ Amazonka.StorageGateway.DisassociateFileSystem: [$sel:forceDelete:DisassociateFileSystem'] :: DisassociateFileSystem -> Maybe Bool
+ Amazonka.StorageGateway.DisassociateFileSystem: [$sel:httpStatus:DisassociateFileSystemResponse'] :: DisassociateFileSystemResponse -> Int
+ Amazonka.StorageGateway.DisassociateFileSystem: data DisassociateFileSystem
+ Amazonka.StorageGateway.DisassociateFileSystem: data DisassociateFileSystemResponse
+ Amazonka.StorageGateway.DisassociateFileSystem: disassociateFileSystemResponse_fileSystemAssociationARN :: Lens' DisassociateFileSystemResponse (Maybe Text)
+ Amazonka.StorageGateway.DisassociateFileSystem: disassociateFileSystemResponse_httpStatus :: Lens' DisassociateFileSystemResponse Int
+ Amazonka.StorageGateway.DisassociateFileSystem: disassociateFileSystem_fileSystemAssociationARN :: Lens' DisassociateFileSystem Text
+ Amazonka.StorageGateway.DisassociateFileSystem: disassociateFileSystem_forceDelete :: Lens' DisassociateFileSystem (Maybe Bool)
+ Amazonka.StorageGateway.DisassociateFileSystem: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.DisassociateFileSystem.DisassociateFileSystem
+ Amazonka.StorageGateway.DisassociateFileSystem: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.DisassociateFileSystem.DisassociateFileSystem
+ Amazonka.StorageGateway.DisassociateFileSystem: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.DisassociateFileSystem.DisassociateFileSystem
+ Amazonka.StorageGateway.DisassociateFileSystem: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.DisassociateFileSystem.DisassociateFileSystem
+ Amazonka.StorageGateway.DisassociateFileSystem: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DisassociateFileSystem.DisassociateFileSystem
+ Amazonka.StorageGateway.DisassociateFileSystem: instance Control.DeepSeq.NFData Amazonka.StorageGateway.DisassociateFileSystem.DisassociateFileSystemResponse
+ Amazonka.StorageGateway.DisassociateFileSystem: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.DisassociateFileSystem.DisassociateFileSystem
+ Amazonka.StorageGateway.DisassociateFileSystem: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.DisassociateFileSystem.DisassociateFileSystem
+ Amazonka.StorageGateway.DisassociateFileSystem: instance GHC.Classes.Eq Amazonka.StorageGateway.DisassociateFileSystem.DisassociateFileSystem
+ Amazonka.StorageGateway.DisassociateFileSystem: instance GHC.Classes.Eq Amazonka.StorageGateway.DisassociateFileSystem.DisassociateFileSystemResponse
+ Amazonka.StorageGateway.DisassociateFileSystem: instance GHC.Generics.Generic Amazonka.StorageGateway.DisassociateFileSystem.DisassociateFileSystem
+ Amazonka.StorageGateway.DisassociateFileSystem: instance GHC.Generics.Generic Amazonka.StorageGateway.DisassociateFileSystem.DisassociateFileSystemResponse
+ Amazonka.StorageGateway.DisassociateFileSystem: instance GHC.Read.Read Amazonka.StorageGateway.DisassociateFileSystem.DisassociateFileSystem
+ Amazonka.StorageGateway.DisassociateFileSystem: instance GHC.Read.Read Amazonka.StorageGateway.DisassociateFileSystem.DisassociateFileSystemResponse
+ Amazonka.StorageGateway.DisassociateFileSystem: instance GHC.Show.Show Amazonka.StorageGateway.DisassociateFileSystem.DisassociateFileSystem
+ Amazonka.StorageGateway.DisassociateFileSystem: instance GHC.Show.Show Amazonka.StorageGateway.DisassociateFileSystem.DisassociateFileSystemResponse
+ Amazonka.StorageGateway.DisassociateFileSystem: newDisassociateFileSystem :: Text -> DisassociateFileSystem
+ Amazonka.StorageGateway.DisassociateFileSystem: newDisassociateFileSystemResponse :: Int -> DisassociateFileSystemResponse
+ Amazonka.StorageGateway.JoinDomain: JoinDomain' :: Maybe [Text] -> Maybe Text -> Maybe Natural -> Text -> Text -> Text -> Sensitive Text -> JoinDomain
+ Amazonka.StorageGateway.JoinDomain: JoinDomainResponse' :: Maybe ActiveDirectoryStatus -> Maybe Text -> Int -> JoinDomainResponse
+ Amazonka.StorageGateway.JoinDomain: [$sel:activeDirectoryStatus:JoinDomainResponse'] :: JoinDomainResponse -> Maybe ActiveDirectoryStatus
+ Amazonka.StorageGateway.JoinDomain: [$sel:domainControllers:JoinDomain'] :: JoinDomain -> Maybe [Text]
+ Amazonka.StorageGateway.JoinDomain: [$sel:domainName:JoinDomain'] :: JoinDomain -> Text
+ Amazonka.StorageGateway.JoinDomain: [$sel:gatewayARN:JoinDomain'] :: JoinDomain -> Text
+ Amazonka.StorageGateway.JoinDomain: [$sel:gatewayARN:JoinDomainResponse'] :: JoinDomainResponse -> Maybe Text
+ Amazonka.StorageGateway.JoinDomain: [$sel:httpStatus:JoinDomainResponse'] :: JoinDomainResponse -> Int
+ Amazonka.StorageGateway.JoinDomain: [$sel:organizationalUnit:JoinDomain'] :: JoinDomain -> Maybe Text
+ Amazonka.StorageGateway.JoinDomain: [$sel:password:JoinDomain'] :: JoinDomain -> Sensitive Text
+ Amazonka.StorageGateway.JoinDomain: [$sel:timeoutInSeconds:JoinDomain'] :: JoinDomain -> Maybe Natural
+ Amazonka.StorageGateway.JoinDomain: [$sel:userName:JoinDomain'] :: JoinDomain -> Text
+ Amazonka.StorageGateway.JoinDomain: data JoinDomain
+ Amazonka.StorageGateway.JoinDomain: data JoinDomainResponse
+ Amazonka.StorageGateway.JoinDomain: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.JoinDomain.JoinDomain
+ Amazonka.StorageGateway.JoinDomain: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.JoinDomain.JoinDomain
+ Amazonka.StorageGateway.JoinDomain: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.JoinDomain.JoinDomain
+ Amazonka.StorageGateway.JoinDomain: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.JoinDomain.JoinDomain
+ Amazonka.StorageGateway.JoinDomain: instance Control.DeepSeq.NFData Amazonka.StorageGateway.JoinDomain.JoinDomain
+ Amazonka.StorageGateway.JoinDomain: instance Control.DeepSeq.NFData Amazonka.StorageGateway.JoinDomain.JoinDomainResponse
+ Amazonka.StorageGateway.JoinDomain: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.JoinDomain.JoinDomain
+ Amazonka.StorageGateway.JoinDomain: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.JoinDomain.JoinDomain
+ Amazonka.StorageGateway.JoinDomain: instance GHC.Classes.Eq Amazonka.StorageGateway.JoinDomain.JoinDomain
+ Amazonka.StorageGateway.JoinDomain: instance GHC.Classes.Eq Amazonka.StorageGateway.JoinDomain.JoinDomainResponse
+ Amazonka.StorageGateway.JoinDomain: instance GHC.Generics.Generic Amazonka.StorageGateway.JoinDomain.JoinDomain
+ Amazonka.StorageGateway.JoinDomain: instance GHC.Generics.Generic Amazonka.StorageGateway.JoinDomain.JoinDomainResponse
+ Amazonka.StorageGateway.JoinDomain: instance GHC.Read.Read Amazonka.StorageGateway.JoinDomain.JoinDomainResponse
+ Amazonka.StorageGateway.JoinDomain: instance GHC.Show.Show Amazonka.StorageGateway.JoinDomain.JoinDomain
+ Amazonka.StorageGateway.JoinDomain: instance GHC.Show.Show Amazonka.StorageGateway.JoinDomain.JoinDomainResponse
+ Amazonka.StorageGateway.JoinDomain: joinDomainResponse_activeDirectoryStatus :: Lens' JoinDomainResponse (Maybe ActiveDirectoryStatus)
+ Amazonka.StorageGateway.JoinDomain: joinDomainResponse_gatewayARN :: Lens' JoinDomainResponse (Maybe Text)
+ Amazonka.StorageGateway.JoinDomain: joinDomainResponse_httpStatus :: Lens' JoinDomainResponse Int
+ Amazonka.StorageGateway.JoinDomain: joinDomain_domainControllers :: Lens' JoinDomain (Maybe [Text])
+ Amazonka.StorageGateway.JoinDomain: joinDomain_domainName :: Lens' JoinDomain Text
+ Amazonka.StorageGateway.JoinDomain: joinDomain_gatewayARN :: Lens' JoinDomain Text
+ Amazonka.StorageGateway.JoinDomain: joinDomain_organizationalUnit :: Lens' JoinDomain (Maybe Text)
+ Amazonka.StorageGateway.JoinDomain: joinDomain_password :: Lens' JoinDomain Text
+ Amazonka.StorageGateway.JoinDomain: joinDomain_timeoutInSeconds :: Lens' JoinDomain (Maybe Natural)
+ Amazonka.StorageGateway.JoinDomain: joinDomain_userName :: Lens' JoinDomain Text
+ Amazonka.StorageGateway.JoinDomain: newJoinDomain :: Text -> Text -> Text -> Text -> JoinDomain
+ Amazonka.StorageGateway.JoinDomain: newJoinDomainResponse :: Int -> JoinDomainResponse
+ Amazonka.StorageGateway.Lens: activateGatewayResponse_gatewayARN :: Lens' ActivateGatewayResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: activateGatewayResponse_httpStatus :: Lens' ActivateGatewayResponse Int
+ Amazonka.StorageGateway.Lens: activateGateway_activationKey :: Lens' ActivateGateway Text
+ Amazonka.StorageGateway.Lens: activateGateway_gatewayName :: Lens' ActivateGateway Text
+ Amazonka.StorageGateway.Lens: activateGateway_gatewayRegion :: Lens' ActivateGateway Text
+ Amazonka.StorageGateway.Lens: activateGateway_gatewayTimezone :: Lens' ActivateGateway Text
+ Amazonka.StorageGateway.Lens: activateGateway_gatewayType :: Lens' ActivateGateway (Maybe Text)
+ Amazonka.StorageGateway.Lens: activateGateway_mediumChangerType :: Lens' ActivateGateway (Maybe Text)
+ Amazonka.StorageGateway.Lens: activateGateway_tags :: Lens' ActivateGateway (Maybe [Tag])
+ Amazonka.StorageGateway.Lens: activateGateway_tapeDriveType :: Lens' ActivateGateway (Maybe Text)
+ Amazonka.StorageGateway.Lens: addCacheResponse_gatewayARN :: Lens' AddCacheResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: addCacheResponse_httpStatus :: Lens' AddCacheResponse Int
+ Amazonka.StorageGateway.Lens: addCache_diskIds :: Lens' AddCache [Text]
+ Amazonka.StorageGateway.Lens: addCache_gatewayARN :: Lens' AddCache Text
+ Amazonka.StorageGateway.Lens: addTagsToResourceResponse_httpStatus :: Lens' AddTagsToResourceResponse Int
+ Amazonka.StorageGateway.Lens: addTagsToResourceResponse_resourceARN :: Lens' AddTagsToResourceResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: addTagsToResource_resourceARN :: Lens' AddTagsToResource Text
+ Amazonka.StorageGateway.Lens: addTagsToResource_tags :: Lens' AddTagsToResource [Tag]
+ Amazonka.StorageGateway.Lens: addUploadBufferResponse_gatewayARN :: Lens' AddUploadBufferResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: addUploadBufferResponse_httpStatus :: Lens' AddUploadBufferResponse Int
+ Amazonka.StorageGateway.Lens: addUploadBuffer_diskIds :: Lens' AddUploadBuffer [Text]
+ Amazonka.StorageGateway.Lens: addUploadBuffer_gatewayARN :: Lens' AddUploadBuffer Text
+ Amazonka.StorageGateway.Lens: addWorkingStorageResponse_gatewayARN :: Lens' AddWorkingStorageResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: addWorkingStorageResponse_httpStatus :: Lens' AddWorkingStorageResponse Int
+ Amazonka.StorageGateway.Lens: addWorkingStorage_diskIds :: Lens' AddWorkingStorage [Text]
+ Amazonka.StorageGateway.Lens: addWorkingStorage_gatewayARN :: Lens' AddWorkingStorage Text
+ Amazonka.StorageGateway.Lens: assignTapePoolResponse_httpStatus :: Lens' AssignTapePoolResponse Int
+ Amazonka.StorageGateway.Lens: assignTapePoolResponse_tapeARN :: Lens' AssignTapePoolResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: assignTapePool_bypassGovernanceRetention :: Lens' AssignTapePool (Maybe Bool)
+ Amazonka.StorageGateway.Lens: assignTapePool_poolId :: Lens' AssignTapePool Text
+ Amazonka.StorageGateway.Lens: assignTapePool_tapeARN :: Lens' AssignTapePool Text
+ Amazonka.StorageGateway.Lens: associateFileSystemResponse_fileSystemAssociationARN :: Lens' AssociateFileSystemResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: associateFileSystemResponse_httpStatus :: Lens' AssociateFileSystemResponse Int
+ Amazonka.StorageGateway.Lens: associateFileSystem_auditDestinationARN :: Lens' AssociateFileSystem (Maybe Text)
+ Amazonka.StorageGateway.Lens: associateFileSystem_cacheAttributes :: Lens' AssociateFileSystem (Maybe CacheAttributes)
+ Amazonka.StorageGateway.Lens: associateFileSystem_clientToken :: Lens' AssociateFileSystem Text
+ Amazonka.StorageGateway.Lens: associateFileSystem_endpointNetworkConfiguration :: Lens' AssociateFileSystem (Maybe EndpointNetworkConfiguration)
+ Amazonka.StorageGateway.Lens: associateFileSystem_gatewayARN :: Lens' AssociateFileSystem Text
+ Amazonka.StorageGateway.Lens: associateFileSystem_locationARN :: Lens' AssociateFileSystem Text
+ Amazonka.StorageGateway.Lens: associateFileSystem_password :: Lens' AssociateFileSystem Text
+ Amazonka.StorageGateway.Lens: associateFileSystem_tags :: Lens' AssociateFileSystem (Maybe [Tag])
+ Amazonka.StorageGateway.Lens: associateFileSystem_userName :: Lens' AssociateFileSystem Text
+ Amazonka.StorageGateway.Lens: attachVolumeResponse_httpStatus :: Lens' AttachVolumeResponse Int
+ Amazonka.StorageGateway.Lens: attachVolumeResponse_targetARN :: Lens' AttachVolumeResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: attachVolumeResponse_volumeARN :: Lens' AttachVolumeResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: attachVolume_diskId :: Lens' AttachVolume (Maybe Text)
+ Amazonka.StorageGateway.Lens: attachVolume_gatewayARN :: Lens' AttachVolume Text
+ Amazonka.StorageGateway.Lens: attachVolume_networkInterfaceId :: Lens' AttachVolume Text
+ Amazonka.StorageGateway.Lens: attachVolume_targetName :: Lens' AttachVolume (Maybe Text)
+ Amazonka.StorageGateway.Lens: attachVolume_volumeARN :: Lens' AttachVolume Text
+ Amazonka.StorageGateway.Lens: automaticTapeCreationPolicyInfo_automaticTapeCreationRules :: Lens' AutomaticTapeCreationPolicyInfo (Maybe (NonEmpty AutomaticTapeCreationRule))
+ Amazonka.StorageGateway.Lens: automaticTapeCreationPolicyInfo_gatewayARN :: Lens' AutomaticTapeCreationPolicyInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: automaticTapeCreationRule_minimumNumTapes :: Lens' AutomaticTapeCreationRule Natural
+ Amazonka.StorageGateway.Lens: automaticTapeCreationRule_poolId :: Lens' AutomaticTapeCreationRule Text
+ Amazonka.StorageGateway.Lens: automaticTapeCreationRule_tapeBarcodePrefix :: Lens' AutomaticTapeCreationRule Text
+ Amazonka.StorageGateway.Lens: automaticTapeCreationRule_tapeSizeInBytes :: Lens' AutomaticTapeCreationRule Integer
+ Amazonka.StorageGateway.Lens: automaticTapeCreationRule_worm :: Lens' AutomaticTapeCreationRule (Maybe Bool)
+ Amazonka.StorageGateway.Lens: bandwidthRateLimitInterval_averageDownloadRateLimitInBitsPerSec :: Lens' BandwidthRateLimitInterval (Maybe Natural)
+ Amazonka.StorageGateway.Lens: bandwidthRateLimitInterval_averageUploadRateLimitInBitsPerSec :: Lens' BandwidthRateLimitInterval (Maybe Natural)
+ Amazonka.StorageGateway.Lens: bandwidthRateLimitInterval_daysOfWeek :: Lens' BandwidthRateLimitInterval (NonEmpty Natural)
+ Amazonka.StorageGateway.Lens: bandwidthRateLimitInterval_endHourOfDay :: Lens' BandwidthRateLimitInterval Natural
+ Amazonka.StorageGateway.Lens: bandwidthRateLimitInterval_endMinuteOfHour :: Lens' BandwidthRateLimitInterval Natural
+ Amazonka.StorageGateway.Lens: bandwidthRateLimitInterval_startHourOfDay :: Lens' BandwidthRateLimitInterval Natural
+ Amazonka.StorageGateway.Lens: bandwidthRateLimitInterval_startMinuteOfHour :: Lens' BandwidthRateLimitInterval Natural
+ Amazonka.StorageGateway.Lens: cacheAttributes_cacheStaleTimeoutInSeconds :: Lens' CacheAttributes (Maybe Int)
+ Amazonka.StorageGateway.Lens: cachediSCSIVolume_createdDate :: Lens' CachediSCSIVolume (Maybe UTCTime)
+ Amazonka.StorageGateway.Lens: cachediSCSIVolume_kmsKey :: Lens' CachediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Lens: cachediSCSIVolume_sourceSnapshotId :: Lens' CachediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Lens: cachediSCSIVolume_targetName :: Lens' CachediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Lens: cachediSCSIVolume_volumeARN :: Lens' CachediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Lens: cachediSCSIVolume_volumeAttachmentStatus :: Lens' CachediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Lens: cachediSCSIVolume_volumeId :: Lens' CachediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Lens: cachediSCSIVolume_volumeProgress :: Lens' CachediSCSIVolume (Maybe Double)
+ Amazonka.StorageGateway.Lens: cachediSCSIVolume_volumeSizeInBytes :: Lens' CachediSCSIVolume (Maybe Integer)
+ Amazonka.StorageGateway.Lens: cachediSCSIVolume_volumeStatus :: Lens' CachediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Lens: cachediSCSIVolume_volumeType :: Lens' CachediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Lens: cachediSCSIVolume_volumeUsedInBytes :: Lens' CachediSCSIVolume (Maybe Integer)
+ Amazonka.StorageGateway.Lens: cachediSCSIVolume_volumeiSCSIAttributes :: Lens' CachediSCSIVolume (Maybe VolumeiSCSIAttributes)
+ Amazonka.StorageGateway.Lens: cancelArchivalResponse_httpStatus :: Lens' CancelArchivalResponse Int
+ Amazonka.StorageGateway.Lens: cancelArchivalResponse_tapeARN :: Lens' CancelArchivalResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: cancelArchival_gatewayARN :: Lens' CancelArchival Text
+ Amazonka.StorageGateway.Lens: cancelArchival_tapeARN :: Lens' CancelArchival Text
+ Amazonka.StorageGateway.Lens: cancelRetrievalResponse_httpStatus :: Lens' CancelRetrievalResponse Int
+ Amazonka.StorageGateway.Lens: cancelRetrievalResponse_tapeARN :: Lens' CancelRetrievalResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: cancelRetrieval_gatewayARN :: Lens' CancelRetrieval Text
+ Amazonka.StorageGateway.Lens: cancelRetrieval_tapeARN :: Lens' CancelRetrieval Text
+ Amazonka.StorageGateway.Lens: chapInfo_initiatorName :: Lens' ChapInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: chapInfo_secretToAuthenticateInitiator :: Lens' ChapInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: chapInfo_secretToAuthenticateTarget :: Lens' ChapInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: chapInfo_targetARN :: Lens' ChapInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: createCachediSCSIVolumeResponse_httpStatus :: Lens' CreateCachediSCSIVolumeResponse Int
+ Amazonka.StorageGateway.Lens: createCachediSCSIVolumeResponse_targetARN :: Lens' CreateCachediSCSIVolumeResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: createCachediSCSIVolumeResponse_volumeARN :: Lens' CreateCachediSCSIVolumeResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: createCachediSCSIVolume_clientToken :: Lens' CreateCachediSCSIVolume Text
+ Amazonka.StorageGateway.Lens: createCachediSCSIVolume_gatewayARN :: Lens' CreateCachediSCSIVolume Text
+ Amazonka.StorageGateway.Lens: createCachediSCSIVolume_kmsEncrypted :: Lens' CreateCachediSCSIVolume (Maybe Bool)
+ Amazonka.StorageGateway.Lens: createCachediSCSIVolume_kmsKey :: Lens' CreateCachediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Lens: createCachediSCSIVolume_networkInterfaceId :: Lens' CreateCachediSCSIVolume Text
+ Amazonka.StorageGateway.Lens: createCachediSCSIVolume_snapshotId :: Lens' CreateCachediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Lens: createCachediSCSIVolume_sourceVolumeARN :: Lens' CreateCachediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Lens: createCachediSCSIVolume_tags :: Lens' CreateCachediSCSIVolume (Maybe [Tag])
+ Amazonka.StorageGateway.Lens: createCachediSCSIVolume_targetName :: Lens' CreateCachediSCSIVolume Text
+ Amazonka.StorageGateway.Lens: createCachediSCSIVolume_volumeSizeInBytes :: Lens' CreateCachediSCSIVolume Integer
+ Amazonka.StorageGateway.Lens: createNFSFileShareResponse_fileShareARN :: Lens' CreateNFSFileShareResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: createNFSFileShareResponse_httpStatus :: Lens' CreateNFSFileShareResponse Int
+ Amazonka.StorageGateway.Lens: createNFSFileShare_auditDestinationARN :: Lens' CreateNFSFileShare (Maybe Text)
+ Amazonka.StorageGateway.Lens: createNFSFileShare_bucketRegion :: Lens' CreateNFSFileShare (Maybe Text)
+ Amazonka.StorageGateway.Lens: createNFSFileShare_cacheAttributes :: Lens' CreateNFSFileShare (Maybe CacheAttributes)
+ Amazonka.StorageGateway.Lens: createNFSFileShare_clientList :: Lens' CreateNFSFileShare (Maybe (NonEmpty Text))
+ Amazonka.StorageGateway.Lens: createNFSFileShare_clientToken :: Lens' CreateNFSFileShare Text
+ Amazonka.StorageGateway.Lens: createNFSFileShare_defaultStorageClass :: Lens' CreateNFSFileShare (Maybe Text)
+ Amazonka.StorageGateway.Lens: createNFSFileShare_fileShareName :: Lens' CreateNFSFileShare (Maybe Text)
+ Amazonka.StorageGateway.Lens: createNFSFileShare_gatewayARN :: Lens' CreateNFSFileShare Text
+ Amazonka.StorageGateway.Lens: createNFSFileShare_guessMIMETypeEnabled :: Lens' CreateNFSFileShare (Maybe Bool)
+ Amazonka.StorageGateway.Lens: createNFSFileShare_kmsEncrypted :: Lens' CreateNFSFileShare (Maybe Bool)
+ Amazonka.StorageGateway.Lens: createNFSFileShare_kmsKey :: Lens' CreateNFSFileShare (Maybe Text)
+ Amazonka.StorageGateway.Lens: createNFSFileShare_locationARN :: Lens' CreateNFSFileShare Text
+ Amazonka.StorageGateway.Lens: createNFSFileShare_nFSFileShareDefaults :: Lens' CreateNFSFileShare (Maybe NFSFileShareDefaults)
+ Amazonka.StorageGateway.Lens: createNFSFileShare_notificationPolicy :: Lens' CreateNFSFileShare (Maybe Text)
+ Amazonka.StorageGateway.Lens: createNFSFileShare_objectACL :: Lens' CreateNFSFileShare (Maybe ObjectACL)
+ Amazonka.StorageGateway.Lens: createNFSFileShare_readOnly :: Lens' CreateNFSFileShare (Maybe Bool)
+ Amazonka.StorageGateway.Lens: createNFSFileShare_requesterPays :: Lens' CreateNFSFileShare (Maybe Bool)
+ Amazonka.StorageGateway.Lens: createNFSFileShare_role :: Lens' CreateNFSFileShare Text
+ Amazonka.StorageGateway.Lens: createNFSFileShare_squash :: Lens' CreateNFSFileShare (Maybe Text)
+ Amazonka.StorageGateway.Lens: createNFSFileShare_tags :: Lens' CreateNFSFileShare (Maybe [Tag])
+ Amazonka.StorageGateway.Lens: createNFSFileShare_vPCEndpointDNSName :: Lens' CreateNFSFileShare (Maybe Text)
+ Amazonka.StorageGateway.Lens: createSMBFileShareResponse_fileShareARN :: Lens' CreateSMBFileShareResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: createSMBFileShareResponse_httpStatus :: Lens' CreateSMBFileShareResponse Int
+ Amazonka.StorageGateway.Lens: createSMBFileShare_accessBasedEnumeration :: Lens' CreateSMBFileShare (Maybe Bool)
+ Amazonka.StorageGateway.Lens: createSMBFileShare_adminUserList :: Lens' CreateSMBFileShare (Maybe [Text])
+ Amazonka.StorageGateway.Lens: createSMBFileShare_auditDestinationARN :: Lens' CreateSMBFileShare (Maybe Text)
+ Amazonka.StorageGateway.Lens: createSMBFileShare_authentication :: Lens' CreateSMBFileShare (Maybe Text)
+ Amazonka.StorageGateway.Lens: createSMBFileShare_bucketRegion :: Lens' CreateSMBFileShare (Maybe Text)
+ Amazonka.StorageGateway.Lens: createSMBFileShare_cacheAttributes :: Lens' CreateSMBFileShare (Maybe CacheAttributes)
+ Amazonka.StorageGateway.Lens: createSMBFileShare_caseSensitivity :: Lens' CreateSMBFileShare (Maybe CaseSensitivity)
+ Amazonka.StorageGateway.Lens: createSMBFileShare_clientToken :: Lens' CreateSMBFileShare Text
+ Amazonka.StorageGateway.Lens: createSMBFileShare_defaultStorageClass :: Lens' CreateSMBFileShare (Maybe Text)
+ Amazonka.StorageGateway.Lens: createSMBFileShare_fileShareName :: Lens' CreateSMBFileShare (Maybe Text)
+ Amazonka.StorageGateway.Lens: createSMBFileShare_gatewayARN :: Lens' CreateSMBFileShare Text
+ Amazonka.StorageGateway.Lens: createSMBFileShare_guessMIMETypeEnabled :: Lens' CreateSMBFileShare (Maybe Bool)
+ Amazonka.StorageGateway.Lens: createSMBFileShare_invalidUserList :: Lens' CreateSMBFileShare (Maybe [Text])
+ Amazonka.StorageGateway.Lens: createSMBFileShare_kmsEncrypted :: Lens' CreateSMBFileShare (Maybe Bool)
+ Amazonka.StorageGateway.Lens: createSMBFileShare_kmsKey :: Lens' CreateSMBFileShare (Maybe Text)
+ Amazonka.StorageGateway.Lens: createSMBFileShare_locationARN :: Lens' CreateSMBFileShare Text
+ Amazonka.StorageGateway.Lens: createSMBFileShare_notificationPolicy :: Lens' CreateSMBFileShare (Maybe Text)
+ Amazonka.StorageGateway.Lens: createSMBFileShare_objectACL :: Lens' CreateSMBFileShare (Maybe ObjectACL)
+ Amazonka.StorageGateway.Lens: createSMBFileShare_oplocksEnabled :: Lens' CreateSMBFileShare (Maybe Bool)
+ Amazonka.StorageGateway.Lens: createSMBFileShare_readOnly :: Lens' CreateSMBFileShare (Maybe Bool)
+ Amazonka.StorageGateway.Lens: createSMBFileShare_requesterPays :: Lens' CreateSMBFileShare (Maybe Bool)
+ Amazonka.StorageGateway.Lens: createSMBFileShare_role :: Lens' CreateSMBFileShare Text
+ Amazonka.StorageGateway.Lens: createSMBFileShare_sMBACLEnabled :: Lens' CreateSMBFileShare (Maybe Bool)
+ Amazonka.StorageGateway.Lens: createSMBFileShare_tags :: Lens' CreateSMBFileShare (Maybe [Tag])
+ Amazonka.StorageGateway.Lens: createSMBFileShare_vPCEndpointDNSName :: Lens' CreateSMBFileShare (Maybe Text)
+ Amazonka.StorageGateway.Lens: createSMBFileShare_validUserList :: Lens' CreateSMBFileShare (Maybe [Text])
+ Amazonka.StorageGateway.Lens: createSnapshotFromVolumeRecoveryPointResponse_httpStatus :: Lens' CreateSnapshotFromVolumeRecoveryPointResponse Int
+ Amazonka.StorageGateway.Lens: createSnapshotFromVolumeRecoveryPointResponse_snapshotId :: Lens' CreateSnapshotFromVolumeRecoveryPointResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: createSnapshotFromVolumeRecoveryPointResponse_volumeARN :: Lens' CreateSnapshotFromVolumeRecoveryPointResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: createSnapshotFromVolumeRecoveryPointResponse_volumeRecoveryPointTime :: Lens' CreateSnapshotFromVolumeRecoveryPointResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: createSnapshotFromVolumeRecoveryPoint_snapshotDescription :: Lens' CreateSnapshotFromVolumeRecoveryPoint Text
+ Amazonka.StorageGateway.Lens: createSnapshotFromVolumeRecoveryPoint_tags :: Lens' CreateSnapshotFromVolumeRecoveryPoint (Maybe [Tag])
+ Amazonka.StorageGateway.Lens: createSnapshotFromVolumeRecoveryPoint_volumeARN :: Lens' CreateSnapshotFromVolumeRecoveryPoint Text
+ Amazonka.StorageGateway.Lens: createSnapshotResponse_httpStatus :: Lens' CreateSnapshotResponse Int
+ Amazonka.StorageGateway.Lens: createSnapshotResponse_snapshotId :: Lens' CreateSnapshotResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: createSnapshotResponse_volumeARN :: Lens' CreateSnapshotResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: createSnapshot_snapshotDescription :: Lens' CreateSnapshot Text
+ Amazonka.StorageGateway.Lens: createSnapshot_tags :: Lens' CreateSnapshot (Maybe [Tag])
+ Amazonka.StorageGateway.Lens: createSnapshot_volumeARN :: Lens' CreateSnapshot Text
+ Amazonka.StorageGateway.Lens: createStorediSCSIVolumeResponse_httpStatus :: Lens' CreateStorediSCSIVolumeResponse Int
+ Amazonka.StorageGateway.Lens: createStorediSCSIVolumeResponse_targetARN :: Lens' CreateStorediSCSIVolumeResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: createStorediSCSIVolumeResponse_volumeARN :: Lens' CreateStorediSCSIVolumeResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: createStorediSCSIVolumeResponse_volumeSizeInBytes :: Lens' CreateStorediSCSIVolumeResponse (Maybe Integer)
+ Amazonka.StorageGateway.Lens: createStorediSCSIVolume_diskId :: Lens' CreateStorediSCSIVolume Text
+ Amazonka.StorageGateway.Lens: createStorediSCSIVolume_gatewayARN :: Lens' CreateStorediSCSIVolume Text
+ Amazonka.StorageGateway.Lens: createStorediSCSIVolume_kmsEncrypted :: Lens' CreateStorediSCSIVolume (Maybe Bool)
+ Amazonka.StorageGateway.Lens: createStorediSCSIVolume_kmsKey :: Lens' CreateStorediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Lens: createStorediSCSIVolume_networkInterfaceId :: Lens' CreateStorediSCSIVolume Text
+ Amazonka.StorageGateway.Lens: createStorediSCSIVolume_preserveExistingData :: Lens' CreateStorediSCSIVolume Bool
+ Amazonka.StorageGateway.Lens: createStorediSCSIVolume_snapshotId :: Lens' CreateStorediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Lens: createStorediSCSIVolume_tags :: Lens' CreateStorediSCSIVolume (Maybe [Tag])
+ Amazonka.StorageGateway.Lens: createStorediSCSIVolume_targetName :: Lens' CreateStorediSCSIVolume Text
+ Amazonka.StorageGateway.Lens: createTapePoolResponse_httpStatus :: Lens' CreateTapePoolResponse Int
+ Amazonka.StorageGateway.Lens: createTapePoolResponse_poolARN :: Lens' CreateTapePoolResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: createTapePool_poolName :: Lens' CreateTapePool Text
+ Amazonka.StorageGateway.Lens: createTapePool_retentionLockTimeInDays :: Lens' CreateTapePool (Maybe Natural)
+ Amazonka.StorageGateway.Lens: createTapePool_retentionLockType :: Lens' CreateTapePool (Maybe RetentionLockType)
+ Amazonka.StorageGateway.Lens: createTapePool_storageClass :: Lens' CreateTapePool TapeStorageClass
+ Amazonka.StorageGateway.Lens: createTapePool_tags :: Lens' CreateTapePool (Maybe [Tag])
+ Amazonka.StorageGateway.Lens: createTapeWithBarcodeResponse_httpStatus :: Lens' CreateTapeWithBarcodeResponse Int
+ Amazonka.StorageGateway.Lens: createTapeWithBarcodeResponse_tapeARN :: Lens' CreateTapeWithBarcodeResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: createTapeWithBarcode_gatewayARN :: Lens' CreateTapeWithBarcode Text
+ Amazonka.StorageGateway.Lens: createTapeWithBarcode_kmsEncrypted :: Lens' CreateTapeWithBarcode (Maybe Bool)
+ Amazonka.StorageGateway.Lens: createTapeWithBarcode_kmsKey :: Lens' CreateTapeWithBarcode (Maybe Text)
+ Amazonka.StorageGateway.Lens: createTapeWithBarcode_poolId :: Lens' CreateTapeWithBarcode (Maybe Text)
+ Amazonka.StorageGateway.Lens: createTapeWithBarcode_tags :: Lens' CreateTapeWithBarcode (Maybe [Tag])
+ Amazonka.StorageGateway.Lens: createTapeWithBarcode_tapeBarcode :: Lens' CreateTapeWithBarcode Text
+ Amazonka.StorageGateway.Lens: createTapeWithBarcode_tapeSizeInBytes :: Lens' CreateTapeWithBarcode Integer
+ Amazonka.StorageGateway.Lens: createTapeWithBarcode_worm :: Lens' CreateTapeWithBarcode (Maybe Bool)
+ Amazonka.StorageGateway.Lens: createTapesResponse_httpStatus :: Lens' CreateTapesResponse Int
+ Amazonka.StorageGateway.Lens: createTapesResponse_tapeARNs :: Lens' CreateTapesResponse (Maybe [Text])
+ Amazonka.StorageGateway.Lens: createTapes_clientToken :: Lens' CreateTapes Text
+ Amazonka.StorageGateway.Lens: createTapes_gatewayARN :: Lens' CreateTapes Text
+ Amazonka.StorageGateway.Lens: createTapes_kmsEncrypted :: Lens' CreateTapes (Maybe Bool)
+ Amazonka.StorageGateway.Lens: createTapes_kmsKey :: Lens' CreateTapes (Maybe Text)
+ Amazonka.StorageGateway.Lens: createTapes_numTapesToCreate :: Lens' CreateTapes Natural
+ Amazonka.StorageGateway.Lens: createTapes_poolId :: Lens' CreateTapes (Maybe Text)
+ Amazonka.StorageGateway.Lens: createTapes_tags :: Lens' CreateTapes (Maybe [Tag])
+ Amazonka.StorageGateway.Lens: createTapes_tapeBarcodePrefix :: Lens' CreateTapes Text
+ Amazonka.StorageGateway.Lens: createTapes_tapeSizeInBytes :: Lens' CreateTapes Integer
+ Amazonka.StorageGateway.Lens: createTapes_worm :: Lens' CreateTapes (Maybe Bool)
+ Amazonka.StorageGateway.Lens: deleteAutomaticTapeCreationPolicyResponse_gatewayARN :: Lens' DeleteAutomaticTapeCreationPolicyResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: deleteAutomaticTapeCreationPolicyResponse_httpStatus :: Lens' DeleteAutomaticTapeCreationPolicyResponse Int
+ Amazonka.StorageGateway.Lens: deleteAutomaticTapeCreationPolicy_gatewayARN :: Lens' DeleteAutomaticTapeCreationPolicy Text
+ Amazonka.StorageGateway.Lens: deleteBandwidthRateLimitResponse_gatewayARN :: Lens' DeleteBandwidthRateLimitResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: deleteBandwidthRateLimitResponse_httpStatus :: Lens' DeleteBandwidthRateLimitResponse Int
+ Amazonka.StorageGateway.Lens: deleteBandwidthRateLimit_bandwidthType :: Lens' DeleteBandwidthRateLimit Text
+ Amazonka.StorageGateway.Lens: deleteBandwidthRateLimit_gatewayARN :: Lens' DeleteBandwidthRateLimit Text
+ Amazonka.StorageGateway.Lens: deleteChapCredentialsResponse_httpStatus :: Lens' DeleteChapCredentialsResponse Int
+ Amazonka.StorageGateway.Lens: deleteChapCredentialsResponse_initiatorName :: Lens' DeleteChapCredentialsResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: deleteChapCredentialsResponse_targetARN :: Lens' DeleteChapCredentialsResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: deleteChapCredentials_initiatorName :: Lens' DeleteChapCredentials Text
+ Amazonka.StorageGateway.Lens: deleteChapCredentials_targetARN :: Lens' DeleteChapCredentials Text
+ Amazonka.StorageGateway.Lens: deleteFileShareResponse_fileShareARN :: Lens' DeleteFileShareResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: deleteFileShareResponse_httpStatus :: Lens' DeleteFileShareResponse Int
+ Amazonka.StorageGateway.Lens: deleteFileShare_fileShareARN :: Lens' DeleteFileShare Text
+ Amazonka.StorageGateway.Lens: deleteFileShare_forceDelete :: Lens' DeleteFileShare (Maybe Bool)
+ Amazonka.StorageGateway.Lens: deleteGatewayResponse_gatewayARN :: Lens' DeleteGatewayResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: deleteGatewayResponse_httpStatus :: Lens' DeleteGatewayResponse Int
+ Amazonka.StorageGateway.Lens: deleteGateway_gatewayARN :: Lens' DeleteGateway Text
+ Amazonka.StorageGateway.Lens: deleteSnapshotScheduleResponse_httpStatus :: Lens' DeleteSnapshotScheduleResponse Int
+ Amazonka.StorageGateway.Lens: deleteSnapshotScheduleResponse_volumeARN :: Lens' DeleteSnapshotScheduleResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: deleteSnapshotSchedule_volumeARN :: Lens' DeleteSnapshotSchedule Text
+ Amazonka.StorageGateway.Lens: deleteTapeArchiveResponse_httpStatus :: Lens' DeleteTapeArchiveResponse Int
+ Amazonka.StorageGateway.Lens: deleteTapeArchiveResponse_tapeARN :: Lens' DeleteTapeArchiveResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: deleteTapeArchive_bypassGovernanceRetention :: Lens' DeleteTapeArchive (Maybe Bool)
+ Amazonka.StorageGateway.Lens: deleteTapeArchive_tapeARN :: Lens' DeleteTapeArchive Text
+ Amazonka.StorageGateway.Lens: deleteTapePoolResponse_httpStatus :: Lens' DeleteTapePoolResponse Int
+ Amazonka.StorageGateway.Lens: deleteTapePoolResponse_poolARN :: Lens' DeleteTapePoolResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: deleteTapePool_poolARN :: Lens' DeleteTapePool Text
+ Amazonka.StorageGateway.Lens: deleteTapeResponse_httpStatus :: Lens' DeleteTapeResponse Int
+ Amazonka.StorageGateway.Lens: deleteTapeResponse_tapeARN :: Lens' DeleteTapeResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: deleteTape_bypassGovernanceRetention :: Lens' DeleteTape (Maybe Bool)
+ Amazonka.StorageGateway.Lens: deleteTape_gatewayARN :: Lens' DeleteTape Text
+ Amazonka.StorageGateway.Lens: deleteTape_tapeARN :: Lens' DeleteTape Text
+ Amazonka.StorageGateway.Lens: deleteVolumeResponse_httpStatus :: Lens' DeleteVolumeResponse Int
+ Amazonka.StorageGateway.Lens: deleteVolumeResponse_volumeARN :: Lens' DeleteVolumeResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: deleteVolume_volumeARN :: Lens' DeleteVolume Text
+ Amazonka.StorageGateway.Lens: describeAvailabilityMonitorTestResponse_gatewayARN :: Lens' DescribeAvailabilityMonitorTestResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: describeAvailabilityMonitorTestResponse_httpStatus :: Lens' DescribeAvailabilityMonitorTestResponse Int
+ Amazonka.StorageGateway.Lens: describeAvailabilityMonitorTestResponse_startTime :: Lens' DescribeAvailabilityMonitorTestResponse (Maybe UTCTime)
+ Amazonka.StorageGateway.Lens: describeAvailabilityMonitorTestResponse_status :: Lens' DescribeAvailabilityMonitorTestResponse (Maybe AvailabilityMonitorTestStatus)
+ Amazonka.StorageGateway.Lens: describeAvailabilityMonitorTest_gatewayARN :: Lens' DescribeAvailabilityMonitorTest Text
+ Amazonka.StorageGateway.Lens: describeBandwidthRateLimitResponse_averageDownloadRateLimitInBitsPerSec :: Lens' DescribeBandwidthRateLimitResponse (Maybe Natural)
+ Amazonka.StorageGateway.Lens: describeBandwidthRateLimitResponse_averageUploadRateLimitInBitsPerSec :: Lens' DescribeBandwidthRateLimitResponse (Maybe Natural)
+ Amazonka.StorageGateway.Lens: describeBandwidthRateLimitResponse_gatewayARN :: Lens' DescribeBandwidthRateLimitResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: describeBandwidthRateLimitResponse_httpStatus :: Lens' DescribeBandwidthRateLimitResponse Int
+ Amazonka.StorageGateway.Lens: describeBandwidthRateLimitScheduleResponse_bandwidthRateLimitIntervals :: Lens' DescribeBandwidthRateLimitScheduleResponse (Maybe [BandwidthRateLimitInterval])
+ Amazonka.StorageGateway.Lens: describeBandwidthRateLimitScheduleResponse_gatewayARN :: Lens' DescribeBandwidthRateLimitScheduleResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: describeBandwidthRateLimitScheduleResponse_httpStatus :: Lens' DescribeBandwidthRateLimitScheduleResponse Int
+ Amazonka.StorageGateway.Lens: describeBandwidthRateLimitSchedule_gatewayARN :: Lens' DescribeBandwidthRateLimitSchedule Text
+ Amazonka.StorageGateway.Lens: describeBandwidthRateLimit_gatewayARN :: Lens' DescribeBandwidthRateLimit Text
+ Amazonka.StorageGateway.Lens: describeCacheResponse_cacheAllocatedInBytes :: Lens' DescribeCacheResponse (Maybe Integer)
+ Amazonka.StorageGateway.Lens: describeCacheResponse_cacheDirtyPercentage :: Lens' DescribeCacheResponse (Maybe Double)
+ Amazonka.StorageGateway.Lens: describeCacheResponse_cacheHitPercentage :: Lens' DescribeCacheResponse (Maybe Double)
+ Amazonka.StorageGateway.Lens: describeCacheResponse_cacheMissPercentage :: Lens' DescribeCacheResponse (Maybe Double)
+ Amazonka.StorageGateway.Lens: describeCacheResponse_cacheUsedPercentage :: Lens' DescribeCacheResponse (Maybe Double)
+ Amazonka.StorageGateway.Lens: describeCacheResponse_diskIds :: Lens' DescribeCacheResponse (Maybe [Text])
+ Amazonka.StorageGateway.Lens: describeCacheResponse_gatewayARN :: Lens' DescribeCacheResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: describeCacheResponse_httpStatus :: Lens' DescribeCacheResponse Int
+ Amazonka.StorageGateway.Lens: describeCache_gatewayARN :: Lens' DescribeCache Text
+ Amazonka.StorageGateway.Lens: describeCachediSCSIVolumesResponse_cachediSCSIVolumes :: Lens' DescribeCachediSCSIVolumesResponse (Maybe [CachediSCSIVolume])
+ Amazonka.StorageGateway.Lens: describeCachediSCSIVolumesResponse_httpStatus :: Lens' DescribeCachediSCSIVolumesResponse Int
+ Amazonka.StorageGateway.Lens: describeCachediSCSIVolumes_volumeARNs :: Lens' DescribeCachediSCSIVolumes [Text]
+ Amazonka.StorageGateway.Lens: describeChapCredentialsResponse_chapCredentials :: Lens' DescribeChapCredentialsResponse (Maybe [ChapInfo])
+ Amazonka.StorageGateway.Lens: describeChapCredentialsResponse_httpStatus :: Lens' DescribeChapCredentialsResponse Int
+ Amazonka.StorageGateway.Lens: describeChapCredentials_targetARN :: Lens' DescribeChapCredentials Text
+ Amazonka.StorageGateway.Lens: describeFileSystemAssociationsResponse_fileSystemAssociationInfoList :: Lens' DescribeFileSystemAssociationsResponse (Maybe [FileSystemAssociationInfo])
+ Amazonka.StorageGateway.Lens: describeFileSystemAssociationsResponse_httpStatus :: Lens' DescribeFileSystemAssociationsResponse Int
+ Amazonka.StorageGateway.Lens: describeFileSystemAssociations_fileSystemAssociationARNList :: Lens' DescribeFileSystemAssociations (NonEmpty Text)
+ Amazonka.StorageGateway.Lens: describeGatewayInformationResponse_cloudWatchLogGroupARN :: Lens' DescribeGatewayInformationResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: describeGatewayInformationResponse_deprecationDate :: Lens' DescribeGatewayInformationResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: describeGatewayInformationResponse_ec2InstanceId :: Lens' DescribeGatewayInformationResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: describeGatewayInformationResponse_ec2InstanceRegion :: Lens' DescribeGatewayInformationResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: describeGatewayInformationResponse_endpointType :: Lens' DescribeGatewayInformationResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: describeGatewayInformationResponse_gatewayARN :: Lens' DescribeGatewayInformationResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: describeGatewayInformationResponse_gatewayCapacity :: Lens' DescribeGatewayInformationResponse (Maybe GatewayCapacity)
+ Amazonka.StorageGateway.Lens: describeGatewayInformationResponse_gatewayId :: Lens' DescribeGatewayInformationResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: describeGatewayInformationResponse_gatewayName :: Lens' DescribeGatewayInformationResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: describeGatewayInformationResponse_gatewayNetworkInterfaces :: Lens' DescribeGatewayInformationResponse (Maybe [NetworkInterface])
+ Amazonka.StorageGateway.Lens: describeGatewayInformationResponse_gatewayState :: Lens' DescribeGatewayInformationResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: describeGatewayInformationResponse_gatewayTimezone :: Lens' DescribeGatewayInformationResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: describeGatewayInformationResponse_gatewayType :: Lens' DescribeGatewayInformationResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: describeGatewayInformationResponse_hostEnvironment :: Lens' DescribeGatewayInformationResponse (Maybe HostEnvironment)
+ Amazonka.StorageGateway.Lens: describeGatewayInformationResponse_hostEnvironmentId :: Lens' DescribeGatewayInformationResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: describeGatewayInformationResponse_httpStatus :: Lens' DescribeGatewayInformationResponse Int
+ Amazonka.StorageGateway.Lens: describeGatewayInformationResponse_lastSoftwareUpdate :: Lens' DescribeGatewayInformationResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: describeGatewayInformationResponse_nextUpdateAvailabilityDate :: Lens' DescribeGatewayInformationResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: describeGatewayInformationResponse_softwareUpdatesEndDate :: Lens' DescribeGatewayInformationResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: describeGatewayInformationResponse_supportedGatewayCapacities :: Lens' DescribeGatewayInformationResponse (Maybe [GatewayCapacity])
+ Amazonka.StorageGateway.Lens: describeGatewayInformationResponse_tags :: Lens' DescribeGatewayInformationResponse (Maybe [Tag])
+ Amazonka.StorageGateway.Lens: describeGatewayInformationResponse_vPCEndpoint :: Lens' DescribeGatewayInformationResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: describeGatewayInformation_gatewayARN :: Lens' DescribeGatewayInformation Text
+ Amazonka.StorageGateway.Lens: describeMaintenanceStartTimeResponse_dayOfMonth :: Lens' DescribeMaintenanceStartTimeResponse (Maybe Natural)
+ Amazonka.StorageGateway.Lens: describeMaintenanceStartTimeResponse_dayOfWeek :: Lens' DescribeMaintenanceStartTimeResponse (Maybe Natural)
+ Amazonka.StorageGateway.Lens: describeMaintenanceStartTimeResponse_gatewayARN :: Lens' DescribeMaintenanceStartTimeResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: describeMaintenanceStartTimeResponse_hourOfDay :: Lens' DescribeMaintenanceStartTimeResponse (Maybe Natural)
+ Amazonka.StorageGateway.Lens: describeMaintenanceStartTimeResponse_httpStatus :: Lens' DescribeMaintenanceStartTimeResponse Int
+ Amazonka.StorageGateway.Lens: describeMaintenanceStartTimeResponse_minuteOfHour :: Lens' DescribeMaintenanceStartTimeResponse (Maybe Natural)
+ Amazonka.StorageGateway.Lens: describeMaintenanceStartTimeResponse_timezone :: Lens' DescribeMaintenanceStartTimeResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: describeMaintenanceStartTime_gatewayARN :: Lens' DescribeMaintenanceStartTime Text
+ Amazonka.StorageGateway.Lens: describeNFSFileSharesResponse_httpStatus :: Lens' DescribeNFSFileSharesResponse Int
+ Amazonka.StorageGateway.Lens: describeNFSFileSharesResponse_nFSFileShareInfoList :: Lens' DescribeNFSFileSharesResponse (Maybe [NFSFileShareInfo])
+ Amazonka.StorageGateway.Lens: describeNFSFileShares_fileShareARNList :: Lens' DescribeNFSFileShares (NonEmpty Text)
+ Amazonka.StorageGateway.Lens: describeSMBFileSharesResponse_httpStatus :: Lens' DescribeSMBFileSharesResponse Int
+ Amazonka.StorageGateway.Lens: describeSMBFileSharesResponse_sMBFileShareInfoList :: Lens' DescribeSMBFileSharesResponse (Maybe [SMBFileShareInfo])
+ Amazonka.StorageGateway.Lens: describeSMBFileShares_fileShareARNList :: Lens' DescribeSMBFileShares (NonEmpty Text)
+ Amazonka.StorageGateway.Lens: describeSMBSettingsResponse_activeDirectoryStatus :: Lens' DescribeSMBSettingsResponse (Maybe ActiveDirectoryStatus)
+ Amazonka.StorageGateway.Lens: describeSMBSettingsResponse_domainName :: Lens' DescribeSMBSettingsResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: describeSMBSettingsResponse_fileSharesVisible :: Lens' DescribeSMBSettingsResponse (Maybe Bool)
+ Amazonka.StorageGateway.Lens: describeSMBSettingsResponse_gatewayARN :: Lens' DescribeSMBSettingsResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: describeSMBSettingsResponse_httpStatus :: Lens' DescribeSMBSettingsResponse Int
+ Amazonka.StorageGateway.Lens: describeSMBSettingsResponse_sMBGuestPasswordSet :: Lens' DescribeSMBSettingsResponse (Maybe Bool)
+ Amazonka.StorageGateway.Lens: describeSMBSettingsResponse_sMBLocalGroups :: Lens' DescribeSMBSettingsResponse (Maybe SMBLocalGroups)
+ Amazonka.StorageGateway.Lens: describeSMBSettingsResponse_sMBSecurityStrategy :: Lens' DescribeSMBSettingsResponse (Maybe SMBSecurityStrategy)
+ Amazonka.StorageGateway.Lens: describeSMBSettings_gatewayARN :: Lens' DescribeSMBSettings Text
+ Amazonka.StorageGateway.Lens: describeSnapshotScheduleResponse_description :: Lens' DescribeSnapshotScheduleResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: describeSnapshotScheduleResponse_httpStatus :: Lens' DescribeSnapshotScheduleResponse Int
+ Amazonka.StorageGateway.Lens: describeSnapshotScheduleResponse_recurrenceInHours :: Lens' DescribeSnapshotScheduleResponse (Maybe Natural)
+ Amazonka.StorageGateway.Lens: describeSnapshotScheduleResponse_startAt :: Lens' DescribeSnapshotScheduleResponse (Maybe Natural)
+ Amazonka.StorageGateway.Lens: describeSnapshotScheduleResponse_tags :: Lens' DescribeSnapshotScheduleResponse (Maybe [Tag])
+ Amazonka.StorageGateway.Lens: describeSnapshotScheduleResponse_timezone :: Lens' DescribeSnapshotScheduleResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: describeSnapshotScheduleResponse_volumeARN :: Lens' DescribeSnapshotScheduleResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: describeSnapshotSchedule_volumeARN :: Lens' DescribeSnapshotSchedule Text
+ Amazonka.StorageGateway.Lens: describeStorediSCSIVolumesResponse_httpStatus :: Lens' DescribeStorediSCSIVolumesResponse Int
+ Amazonka.StorageGateway.Lens: describeStorediSCSIVolumesResponse_storediSCSIVolumes :: Lens' DescribeStorediSCSIVolumesResponse (Maybe [StorediSCSIVolume])
+ Amazonka.StorageGateway.Lens: describeStorediSCSIVolumes_volumeARNs :: Lens' DescribeStorediSCSIVolumes [Text]
+ Amazonka.StorageGateway.Lens: describeTapeArchivesResponse_httpStatus :: Lens' DescribeTapeArchivesResponse Int
+ Amazonka.StorageGateway.Lens: describeTapeArchivesResponse_marker :: Lens' DescribeTapeArchivesResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: describeTapeArchivesResponse_tapeArchives :: Lens' DescribeTapeArchivesResponse (Maybe [TapeArchive])
+ Amazonka.StorageGateway.Lens: describeTapeArchives_limit :: Lens' DescribeTapeArchives (Maybe Natural)
+ Amazonka.StorageGateway.Lens: describeTapeArchives_marker :: Lens' DescribeTapeArchives (Maybe Text)
+ Amazonka.StorageGateway.Lens: describeTapeArchives_tapeARNs :: Lens' DescribeTapeArchives (Maybe [Text])
+ Amazonka.StorageGateway.Lens: describeTapeRecoveryPointsResponse_gatewayARN :: Lens' DescribeTapeRecoveryPointsResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: describeTapeRecoveryPointsResponse_httpStatus :: Lens' DescribeTapeRecoveryPointsResponse Int
+ Amazonka.StorageGateway.Lens: describeTapeRecoveryPointsResponse_marker :: Lens' DescribeTapeRecoveryPointsResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: describeTapeRecoveryPointsResponse_tapeRecoveryPointInfos :: Lens' DescribeTapeRecoveryPointsResponse (Maybe [TapeRecoveryPointInfo])
+ Amazonka.StorageGateway.Lens: describeTapeRecoveryPoints_gatewayARN :: Lens' DescribeTapeRecoveryPoints Text
+ Amazonka.StorageGateway.Lens: describeTapeRecoveryPoints_limit :: Lens' DescribeTapeRecoveryPoints (Maybe Natural)
+ Amazonka.StorageGateway.Lens: describeTapeRecoveryPoints_marker :: Lens' DescribeTapeRecoveryPoints (Maybe Text)
+ Amazonka.StorageGateway.Lens: describeTapesResponse_httpStatus :: Lens' DescribeTapesResponse Int
+ Amazonka.StorageGateway.Lens: describeTapesResponse_marker :: Lens' DescribeTapesResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: describeTapesResponse_tapes :: Lens' DescribeTapesResponse (Maybe [Tape])
+ Amazonka.StorageGateway.Lens: describeTapes_gatewayARN :: Lens' DescribeTapes Text
+ Amazonka.StorageGateway.Lens: describeTapes_limit :: Lens' DescribeTapes (Maybe Natural)
+ Amazonka.StorageGateway.Lens: describeTapes_marker :: Lens' DescribeTapes (Maybe Text)
+ Amazonka.StorageGateway.Lens: describeTapes_tapeARNs :: Lens' DescribeTapes (Maybe [Text])
+ Amazonka.StorageGateway.Lens: describeUploadBufferResponse_diskIds :: Lens' DescribeUploadBufferResponse (Maybe [Text])
+ Amazonka.StorageGateway.Lens: describeUploadBufferResponse_gatewayARN :: Lens' DescribeUploadBufferResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: describeUploadBufferResponse_httpStatus :: Lens' DescribeUploadBufferResponse Int
+ Amazonka.StorageGateway.Lens: describeUploadBufferResponse_uploadBufferAllocatedInBytes :: Lens' DescribeUploadBufferResponse (Maybe Integer)
+ Amazonka.StorageGateway.Lens: describeUploadBufferResponse_uploadBufferUsedInBytes :: Lens' DescribeUploadBufferResponse (Maybe Integer)
+ Amazonka.StorageGateway.Lens: describeUploadBuffer_gatewayARN :: Lens' DescribeUploadBuffer Text
+ Amazonka.StorageGateway.Lens: describeVTLDevicesResponse_gatewayARN :: Lens' DescribeVTLDevicesResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: describeVTLDevicesResponse_httpStatus :: Lens' DescribeVTLDevicesResponse Int
+ Amazonka.StorageGateway.Lens: describeVTLDevicesResponse_marker :: Lens' DescribeVTLDevicesResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: describeVTLDevicesResponse_vTLDevices :: Lens' DescribeVTLDevicesResponse (Maybe [VTLDevice])
+ Amazonka.StorageGateway.Lens: describeVTLDevices_gatewayARN :: Lens' DescribeVTLDevices Text
+ Amazonka.StorageGateway.Lens: describeVTLDevices_limit :: Lens' DescribeVTLDevices (Maybe Natural)
+ Amazonka.StorageGateway.Lens: describeVTLDevices_marker :: Lens' DescribeVTLDevices (Maybe Text)
+ Amazonka.StorageGateway.Lens: describeVTLDevices_vTLDeviceARNs :: Lens' DescribeVTLDevices (Maybe [Text])
+ Amazonka.StorageGateway.Lens: describeWorkingStorageResponse_diskIds :: Lens' DescribeWorkingStorageResponse (Maybe [Text])
+ Amazonka.StorageGateway.Lens: describeWorkingStorageResponse_gatewayARN :: Lens' DescribeWorkingStorageResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: describeWorkingStorageResponse_httpStatus :: Lens' DescribeWorkingStorageResponse Int
+ Amazonka.StorageGateway.Lens: describeWorkingStorageResponse_workingStorageAllocatedInBytes :: Lens' DescribeWorkingStorageResponse (Maybe Integer)
+ Amazonka.StorageGateway.Lens: describeWorkingStorageResponse_workingStorageUsedInBytes :: Lens' DescribeWorkingStorageResponse (Maybe Integer)
+ Amazonka.StorageGateway.Lens: describeWorkingStorage_gatewayARN :: Lens' DescribeWorkingStorage Text
+ Amazonka.StorageGateway.Lens: detachVolumeResponse_httpStatus :: Lens' DetachVolumeResponse Int
+ Amazonka.StorageGateway.Lens: detachVolumeResponse_volumeARN :: Lens' DetachVolumeResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: detachVolume_forceDetach :: Lens' DetachVolume (Maybe Bool)
+ Amazonka.StorageGateway.Lens: detachVolume_volumeARN :: Lens' DetachVolume Text
+ Amazonka.StorageGateway.Lens: deviceiSCSIAttributes_chapEnabled :: Lens' DeviceiSCSIAttributes (Maybe Bool)
+ Amazonka.StorageGateway.Lens: deviceiSCSIAttributes_networkInterfaceId :: Lens' DeviceiSCSIAttributes (Maybe Text)
+ Amazonka.StorageGateway.Lens: deviceiSCSIAttributes_networkInterfacePort :: Lens' DeviceiSCSIAttributes (Maybe Int)
+ Amazonka.StorageGateway.Lens: deviceiSCSIAttributes_targetARN :: Lens' DeviceiSCSIAttributes (Maybe Text)
+ Amazonka.StorageGateway.Lens: disableGatewayResponse_gatewayARN :: Lens' DisableGatewayResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: disableGatewayResponse_httpStatus :: Lens' DisableGatewayResponse Int
+ Amazonka.StorageGateway.Lens: disableGateway_gatewayARN :: Lens' DisableGateway Text
+ Amazonka.StorageGateway.Lens: disassociateFileSystemResponse_fileSystemAssociationARN :: Lens' DisassociateFileSystemResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: disassociateFileSystemResponse_httpStatus :: Lens' DisassociateFileSystemResponse Int
+ Amazonka.StorageGateway.Lens: disassociateFileSystem_fileSystemAssociationARN :: Lens' DisassociateFileSystem Text
+ Amazonka.StorageGateway.Lens: disassociateFileSystem_forceDelete :: Lens' DisassociateFileSystem (Maybe Bool)
+ Amazonka.StorageGateway.Lens: disk_diskAllocationResource :: Lens' Disk (Maybe Text)
+ Amazonka.StorageGateway.Lens: disk_diskAllocationType :: Lens' Disk (Maybe Text)
+ Amazonka.StorageGateway.Lens: disk_diskAttributeList :: Lens' Disk (Maybe [Text])
+ Amazonka.StorageGateway.Lens: disk_diskId :: Lens' Disk (Maybe Text)
+ Amazonka.StorageGateway.Lens: disk_diskNode :: Lens' Disk (Maybe Text)
+ Amazonka.StorageGateway.Lens: disk_diskPath :: Lens' Disk (Maybe Text)
+ Amazonka.StorageGateway.Lens: disk_diskSizeInBytes :: Lens' Disk (Maybe Integer)
+ Amazonka.StorageGateway.Lens: disk_diskStatus :: Lens' Disk (Maybe Text)
+ Amazonka.StorageGateway.Lens: endpointNetworkConfiguration_ipAddresses :: Lens' EndpointNetworkConfiguration (Maybe [Text])
+ Amazonka.StorageGateway.Lens: fileShareInfo_fileShareARN :: Lens' FileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: fileShareInfo_fileShareId :: Lens' FileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: fileShareInfo_fileShareStatus :: Lens' FileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: fileShareInfo_fileShareType :: Lens' FileShareInfo (Maybe FileShareType)
+ Amazonka.StorageGateway.Lens: fileShareInfo_gatewayARN :: Lens' FileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: fileSystemAssociationInfo_auditDestinationARN :: Lens' FileSystemAssociationInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: fileSystemAssociationInfo_cacheAttributes :: Lens' FileSystemAssociationInfo (Maybe CacheAttributes)
+ Amazonka.StorageGateway.Lens: fileSystemAssociationInfo_endpointNetworkConfiguration :: Lens' FileSystemAssociationInfo (Maybe EndpointNetworkConfiguration)
+ Amazonka.StorageGateway.Lens: fileSystemAssociationInfo_fileSystemAssociationARN :: Lens' FileSystemAssociationInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: fileSystemAssociationInfo_fileSystemAssociationStatus :: Lens' FileSystemAssociationInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: fileSystemAssociationInfo_fileSystemAssociationStatusDetails :: Lens' FileSystemAssociationInfo (Maybe [FileSystemAssociationStatusDetail])
+ Amazonka.StorageGateway.Lens: fileSystemAssociationInfo_gatewayARN :: Lens' FileSystemAssociationInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: fileSystemAssociationInfo_locationARN :: Lens' FileSystemAssociationInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: fileSystemAssociationInfo_tags :: Lens' FileSystemAssociationInfo (Maybe [Tag])
+ Amazonka.StorageGateway.Lens: fileSystemAssociationStatusDetail_errorCode :: Lens' FileSystemAssociationStatusDetail (Maybe Text)
+ Amazonka.StorageGateway.Lens: fileSystemAssociationSummary_fileSystemAssociationARN :: Lens' FileSystemAssociationSummary (Maybe Text)
+ Amazonka.StorageGateway.Lens: fileSystemAssociationSummary_fileSystemAssociationId :: Lens' FileSystemAssociationSummary (Maybe Text)
+ Amazonka.StorageGateway.Lens: fileSystemAssociationSummary_fileSystemAssociationStatus :: Lens' FileSystemAssociationSummary (Maybe Text)
+ Amazonka.StorageGateway.Lens: fileSystemAssociationSummary_gatewayARN :: Lens' FileSystemAssociationSummary (Maybe Text)
+ Amazonka.StorageGateway.Lens: gatewayInfo_ec2InstanceId :: Lens' GatewayInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: gatewayInfo_ec2InstanceRegion :: Lens' GatewayInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: gatewayInfo_gatewayARN :: Lens' GatewayInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: gatewayInfo_gatewayId :: Lens' GatewayInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: gatewayInfo_gatewayName :: Lens' GatewayInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: gatewayInfo_gatewayOperationalState :: Lens' GatewayInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: gatewayInfo_gatewayType :: Lens' GatewayInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: gatewayInfo_hostEnvironment :: Lens' GatewayInfo (Maybe HostEnvironment)
+ Amazonka.StorageGateway.Lens: gatewayInfo_hostEnvironmentId :: Lens' GatewayInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: joinDomainResponse_activeDirectoryStatus :: Lens' JoinDomainResponse (Maybe ActiveDirectoryStatus)
+ Amazonka.StorageGateway.Lens: joinDomainResponse_gatewayARN :: Lens' JoinDomainResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: joinDomainResponse_httpStatus :: Lens' JoinDomainResponse Int
+ Amazonka.StorageGateway.Lens: joinDomain_domainControllers :: Lens' JoinDomain (Maybe [Text])
+ Amazonka.StorageGateway.Lens: joinDomain_domainName :: Lens' JoinDomain Text
+ Amazonka.StorageGateway.Lens: joinDomain_gatewayARN :: Lens' JoinDomain Text
+ Amazonka.StorageGateway.Lens: joinDomain_organizationalUnit :: Lens' JoinDomain (Maybe Text)
+ Amazonka.StorageGateway.Lens: joinDomain_password :: Lens' JoinDomain Text
+ Amazonka.StorageGateway.Lens: joinDomain_timeoutInSeconds :: Lens' JoinDomain (Maybe Natural)
+ Amazonka.StorageGateway.Lens: joinDomain_userName :: Lens' JoinDomain Text
+ Amazonka.StorageGateway.Lens: listAutomaticTapeCreationPoliciesResponse_automaticTapeCreationPolicyInfos :: Lens' ListAutomaticTapeCreationPoliciesResponse (Maybe [AutomaticTapeCreationPolicyInfo])
+ Amazonka.StorageGateway.Lens: listAutomaticTapeCreationPoliciesResponse_httpStatus :: Lens' ListAutomaticTapeCreationPoliciesResponse Int
+ Amazonka.StorageGateway.Lens: listAutomaticTapeCreationPolicies_gatewayARN :: Lens' ListAutomaticTapeCreationPolicies (Maybe Text)
+ Amazonka.StorageGateway.Lens: listFileSharesResponse_fileShareInfoList :: Lens' ListFileSharesResponse (Maybe [FileShareInfo])
+ Amazonka.StorageGateway.Lens: listFileSharesResponse_httpStatus :: Lens' ListFileSharesResponse Int
+ Amazonka.StorageGateway.Lens: listFileSharesResponse_marker :: Lens' ListFileSharesResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: listFileSharesResponse_nextMarker :: Lens' ListFileSharesResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: listFileShares_gatewayARN :: Lens' ListFileShares (Maybe Text)
+ Amazonka.StorageGateway.Lens: listFileShares_limit :: Lens' ListFileShares (Maybe Natural)
+ Amazonka.StorageGateway.Lens: listFileShares_marker :: Lens' ListFileShares (Maybe Text)
+ Amazonka.StorageGateway.Lens: listFileSystemAssociationsResponse_fileSystemAssociationSummaryList :: Lens' ListFileSystemAssociationsResponse (Maybe [FileSystemAssociationSummary])
+ Amazonka.StorageGateway.Lens: listFileSystemAssociationsResponse_httpStatus :: Lens' ListFileSystemAssociationsResponse Int
+ Amazonka.StorageGateway.Lens: listFileSystemAssociationsResponse_marker :: Lens' ListFileSystemAssociationsResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: listFileSystemAssociationsResponse_nextMarker :: Lens' ListFileSystemAssociationsResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: listFileSystemAssociations_gatewayARN :: Lens' ListFileSystemAssociations (Maybe Text)
+ Amazonka.StorageGateway.Lens: listFileSystemAssociations_limit :: Lens' ListFileSystemAssociations (Maybe Natural)
+ Amazonka.StorageGateway.Lens: listFileSystemAssociations_marker :: Lens' ListFileSystemAssociations (Maybe Text)
+ Amazonka.StorageGateway.Lens: listGatewaysResponse_gateways :: Lens' ListGatewaysResponse (Maybe [GatewayInfo])
+ Amazonka.StorageGateway.Lens: listGatewaysResponse_httpStatus :: Lens' ListGatewaysResponse Int
+ Amazonka.StorageGateway.Lens: listGatewaysResponse_marker :: Lens' ListGatewaysResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: listGateways_limit :: Lens' ListGateways (Maybe Natural)
+ Amazonka.StorageGateway.Lens: listGateways_marker :: Lens' ListGateways (Maybe Text)
+ Amazonka.StorageGateway.Lens: listLocalDisksResponse_disks :: Lens' ListLocalDisksResponse (Maybe [Disk])
+ Amazonka.StorageGateway.Lens: listLocalDisksResponse_gatewayARN :: Lens' ListLocalDisksResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: listLocalDisksResponse_httpStatus :: Lens' ListLocalDisksResponse Int
+ Amazonka.StorageGateway.Lens: listLocalDisks_gatewayARN :: Lens' ListLocalDisks Text
+ Amazonka.StorageGateway.Lens: listTagsForResourceResponse_httpStatus :: Lens' ListTagsForResourceResponse Int
+ Amazonka.StorageGateway.Lens: listTagsForResourceResponse_marker :: Lens' ListTagsForResourceResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: listTagsForResourceResponse_resourceARN :: Lens' ListTagsForResourceResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: listTagsForResourceResponse_tags :: Lens' ListTagsForResourceResponse (Maybe [Tag])
+ Amazonka.StorageGateway.Lens: listTagsForResource_limit :: Lens' ListTagsForResource (Maybe Natural)
+ Amazonka.StorageGateway.Lens: listTagsForResource_marker :: Lens' ListTagsForResource (Maybe Text)
+ Amazonka.StorageGateway.Lens: listTagsForResource_resourceARN :: Lens' ListTagsForResource Text
+ Amazonka.StorageGateway.Lens: listTapePoolsResponse_httpStatus :: Lens' ListTapePoolsResponse Int
+ Amazonka.StorageGateway.Lens: listTapePoolsResponse_marker :: Lens' ListTapePoolsResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: listTapePoolsResponse_poolInfos :: Lens' ListTapePoolsResponse (Maybe [PoolInfo])
+ Amazonka.StorageGateway.Lens: listTapePools_limit :: Lens' ListTapePools (Maybe Natural)
+ Amazonka.StorageGateway.Lens: listTapePools_marker :: Lens' ListTapePools (Maybe Text)
+ Amazonka.StorageGateway.Lens: listTapePools_poolARNs :: Lens' ListTapePools (Maybe [Text])
+ Amazonka.StorageGateway.Lens: listTapesResponse_httpStatus :: Lens' ListTapesResponse Int
+ Amazonka.StorageGateway.Lens: listTapesResponse_marker :: Lens' ListTapesResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: listTapesResponse_tapeInfos :: Lens' ListTapesResponse (Maybe [TapeInfo])
+ Amazonka.StorageGateway.Lens: listTapes_limit :: Lens' ListTapes (Maybe Natural)
+ Amazonka.StorageGateway.Lens: listTapes_marker :: Lens' ListTapes (Maybe Text)
+ Amazonka.StorageGateway.Lens: listTapes_tapeARNs :: Lens' ListTapes (Maybe [Text])
+ Amazonka.StorageGateway.Lens: listVolumeInitiatorsResponse_httpStatus :: Lens' ListVolumeInitiatorsResponse Int
+ Amazonka.StorageGateway.Lens: listVolumeInitiatorsResponse_initiators :: Lens' ListVolumeInitiatorsResponse (Maybe [Text])
+ Amazonka.StorageGateway.Lens: listVolumeInitiators_volumeARN :: Lens' ListVolumeInitiators Text
+ Amazonka.StorageGateway.Lens: listVolumeRecoveryPointsResponse_gatewayARN :: Lens' ListVolumeRecoveryPointsResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: listVolumeRecoveryPointsResponse_httpStatus :: Lens' ListVolumeRecoveryPointsResponse Int
+ Amazonka.StorageGateway.Lens: listVolumeRecoveryPointsResponse_volumeRecoveryPointInfos :: Lens' ListVolumeRecoveryPointsResponse (Maybe [VolumeRecoveryPointInfo])
+ Amazonka.StorageGateway.Lens: listVolumeRecoveryPoints_gatewayARN :: Lens' ListVolumeRecoveryPoints Text
+ Amazonka.StorageGateway.Lens: listVolumesResponse_gatewayARN :: Lens' ListVolumesResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: listVolumesResponse_httpStatus :: Lens' ListVolumesResponse Int
+ Amazonka.StorageGateway.Lens: listVolumesResponse_marker :: Lens' ListVolumesResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: listVolumesResponse_volumeInfos :: Lens' ListVolumesResponse (Maybe [VolumeInfo])
+ Amazonka.StorageGateway.Lens: listVolumes_gatewayARN :: Lens' ListVolumes (Maybe Text)
+ Amazonka.StorageGateway.Lens: listVolumes_limit :: Lens' ListVolumes (Maybe Natural)
+ Amazonka.StorageGateway.Lens: listVolumes_marker :: Lens' ListVolumes (Maybe Text)
+ Amazonka.StorageGateway.Lens: nFSFileShareDefaults_directoryMode :: Lens' NFSFileShareDefaults (Maybe Text)
+ Amazonka.StorageGateway.Lens: nFSFileShareDefaults_fileMode :: Lens' NFSFileShareDefaults (Maybe Text)
+ Amazonka.StorageGateway.Lens: nFSFileShareDefaults_groupId :: Lens' NFSFileShareDefaults (Maybe Natural)
+ Amazonka.StorageGateway.Lens: nFSFileShareDefaults_ownerId :: Lens' NFSFileShareDefaults (Maybe Natural)
+ Amazonka.StorageGateway.Lens: nFSFileShareInfo_auditDestinationARN :: Lens' NFSFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: nFSFileShareInfo_bucketRegion :: Lens' NFSFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: nFSFileShareInfo_cacheAttributes :: Lens' NFSFileShareInfo (Maybe CacheAttributes)
+ Amazonka.StorageGateway.Lens: nFSFileShareInfo_clientList :: Lens' NFSFileShareInfo (Maybe (NonEmpty Text))
+ Amazonka.StorageGateway.Lens: nFSFileShareInfo_defaultStorageClass :: Lens' NFSFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: nFSFileShareInfo_fileShareARN :: Lens' NFSFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: nFSFileShareInfo_fileShareId :: Lens' NFSFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: nFSFileShareInfo_fileShareName :: Lens' NFSFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: nFSFileShareInfo_fileShareStatus :: Lens' NFSFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: nFSFileShareInfo_gatewayARN :: Lens' NFSFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: nFSFileShareInfo_guessMIMETypeEnabled :: Lens' NFSFileShareInfo (Maybe Bool)
+ Amazonka.StorageGateway.Lens: nFSFileShareInfo_kmsEncrypted :: Lens' NFSFileShareInfo (Maybe Bool)
+ Amazonka.StorageGateway.Lens: nFSFileShareInfo_kmsKey :: Lens' NFSFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: nFSFileShareInfo_locationARN :: Lens' NFSFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: nFSFileShareInfo_nFSFileShareDefaults :: Lens' NFSFileShareInfo (Maybe NFSFileShareDefaults)
+ Amazonka.StorageGateway.Lens: nFSFileShareInfo_notificationPolicy :: Lens' NFSFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: nFSFileShareInfo_objectACL :: Lens' NFSFileShareInfo (Maybe ObjectACL)
+ Amazonka.StorageGateway.Lens: nFSFileShareInfo_path :: Lens' NFSFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: nFSFileShareInfo_readOnly :: Lens' NFSFileShareInfo (Maybe Bool)
+ Amazonka.StorageGateway.Lens: nFSFileShareInfo_requesterPays :: Lens' NFSFileShareInfo (Maybe Bool)
+ Amazonka.StorageGateway.Lens: nFSFileShareInfo_role :: Lens' NFSFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: nFSFileShareInfo_squash :: Lens' NFSFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: nFSFileShareInfo_tags :: Lens' NFSFileShareInfo (Maybe [Tag])
+ Amazonka.StorageGateway.Lens: nFSFileShareInfo_vPCEndpointDNSName :: Lens' NFSFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: networkInterface_ipv4Address :: Lens' NetworkInterface (Maybe Text)
+ Amazonka.StorageGateway.Lens: networkInterface_ipv6Address :: Lens' NetworkInterface (Maybe Text)
+ Amazonka.StorageGateway.Lens: networkInterface_macAddress :: Lens' NetworkInterface (Maybe Text)
+ Amazonka.StorageGateway.Lens: notifyWhenUploadedResponse_fileShareARN :: Lens' NotifyWhenUploadedResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: notifyWhenUploadedResponse_httpStatus :: Lens' NotifyWhenUploadedResponse Int
+ Amazonka.StorageGateway.Lens: notifyWhenUploadedResponse_notificationId :: Lens' NotifyWhenUploadedResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: notifyWhenUploaded_fileShareARN :: Lens' NotifyWhenUploaded Text
+ Amazonka.StorageGateway.Lens: poolInfo_poolARN :: Lens' PoolInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: poolInfo_poolName :: Lens' PoolInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: poolInfo_poolStatus :: Lens' PoolInfo (Maybe PoolStatus)
+ Amazonka.StorageGateway.Lens: poolInfo_retentionLockTimeInDays :: Lens' PoolInfo (Maybe Natural)
+ Amazonka.StorageGateway.Lens: poolInfo_retentionLockType :: Lens' PoolInfo (Maybe RetentionLockType)
+ Amazonka.StorageGateway.Lens: poolInfo_storageClass :: Lens' PoolInfo (Maybe TapeStorageClass)
+ Amazonka.StorageGateway.Lens: refreshCacheResponse_fileShareARN :: Lens' RefreshCacheResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: refreshCacheResponse_httpStatus :: Lens' RefreshCacheResponse Int
+ Amazonka.StorageGateway.Lens: refreshCacheResponse_notificationId :: Lens' RefreshCacheResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: refreshCache_fileShareARN :: Lens' RefreshCache Text
+ Amazonka.StorageGateway.Lens: refreshCache_folderList :: Lens' RefreshCache (Maybe (NonEmpty Text))
+ Amazonka.StorageGateway.Lens: refreshCache_recursive :: Lens' RefreshCache (Maybe Bool)
+ Amazonka.StorageGateway.Lens: removeTagsFromResourceResponse_httpStatus :: Lens' RemoveTagsFromResourceResponse Int
+ Amazonka.StorageGateway.Lens: removeTagsFromResourceResponse_resourceARN :: Lens' RemoveTagsFromResourceResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: removeTagsFromResource_resourceARN :: Lens' RemoveTagsFromResource Text
+ Amazonka.StorageGateway.Lens: removeTagsFromResource_tagKeys :: Lens' RemoveTagsFromResource [Text]
+ Amazonka.StorageGateway.Lens: resetCacheResponse_gatewayARN :: Lens' ResetCacheResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: resetCacheResponse_httpStatus :: Lens' ResetCacheResponse Int
+ Amazonka.StorageGateway.Lens: resetCache_gatewayARN :: Lens' ResetCache Text
+ Amazonka.StorageGateway.Lens: retrieveTapeArchiveResponse_httpStatus :: Lens' RetrieveTapeArchiveResponse Int
+ Amazonka.StorageGateway.Lens: retrieveTapeArchiveResponse_tapeARN :: Lens' RetrieveTapeArchiveResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: retrieveTapeArchive_gatewayARN :: Lens' RetrieveTapeArchive Text
+ Amazonka.StorageGateway.Lens: retrieveTapeArchive_tapeARN :: Lens' RetrieveTapeArchive Text
+ Amazonka.StorageGateway.Lens: retrieveTapeRecoveryPointResponse_httpStatus :: Lens' RetrieveTapeRecoveryPointResponse Int
+ Amazonka.StorageGateway.Lens: retrieveTapeRecoveryPointResponse_tapeARN :: Lens' RetrieveTapeRecoveryPointResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: retrieveTapeRecoveryPoint_gatewayARN :: Lens' RetrieveTapeRecoveryPoint Text
+ Amazonka.StorageGateway.Lens: retrieveTapeRecoveryPoint_tapeARN :: Lens' RetrieveTapeRecoveryPoint Text
+ Amazonka.StorageGateway.Lens: sMBFileShareInfo_accessBasedEnumeration :: Lens' SMBFileShareInfo (Maybe Bool)
+ Amazonka.StorageGateway.Lens: sMBFileShareInfo_adminUserList :: Lens' SMBFileShareInfo (Maybe [Text])
+ Amazonka.StorageGateway.Lens: sMBFileShareInfo_auditDestinationARN :: Lens' SMBFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: sMBFileShareInfo_authentication :: Lens' SMBFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: sMBFileShareInfo_bucketRegion :: Lens' SMBFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: sMBFileShareInfo_cacheAttributes :: Lens' SMBFileShareInfo (Maybe CacheAttributes)
+ Amazonka.StorageGateway.Lens: sMBFileShareInfo_caseSensitivity :: Lens' SMBFileShareInfo (Maybe CaseSensitivity)
+ Amazonka.StorageGateway.Lens: sMBFileShareInfo_defaultStorageClass :: Lens' SMBFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: sMBFileShareInfo_fileShareARN :: Lens' SMBFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: sMBFileShareInfo_fileShareId :: Lens' SMBFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: sMBFileShareInfo_fileShareName :: Lens' SMBFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: sMBFileShareInfo_fileShareStatus :: Lens' SMBFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: sMBFileShareInfo_gatewayARN :: Lens' SMBFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: sMBFileShareInfo_guessMIMETypeEnabled :: Lens' SMBFileShareInfo (Maybe Bool)
+ Amazonka.StorageGateway.Lens: sMBFileShareInfo_invalidUserList :: Lens' SMBFileShareInfo (Maybe [Text])
+ Amazonka.StorageGateway.Lens: sMBFileShareInfo_kmsEncrypted :: Lens' SMBFileShareInfo (Maybe Bool)
+ Amazonka.StorageGateway.Lens: sMBFileShareInfo_kmsKey :: Lens' SMBFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: sMBFileShareInfo_locationARN :: Lens' SMBFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: sMBFileShareInfo_notificationPolicy :: Lens' SMBFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: sMBFileShareInfo_objectACL :: Lens' SMBFileShareInfo (Maybe ObjectACL)
+ Amazonka.StorageGateway.Lens: sMBFileShareInfo_oplocksEnabled :: Lens' SMBFileShareInfo (Maybe Bool)
+ Amazonka.StorageGateway.Lens: sMBFileShareInfo_path :: Lens' SMBFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: sMBFileShareInfo_readOnly :: Lens' SMBFileShareInfo (Maybe Bool)
+ Amazonka.StorageGateway.Lens: sMBFileShareInfo_requesterPays :: Lens' SMBFileShareInfo (Maybe Bool)
+ Amazonka.StorageGateway.Lens: sMBFileShareInfo_role :: Lens' SMBFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: sMBFileShareInfo_sMBACLEnabled :: Lens' SMBFileShareInfo (Maybe Bool)
+ Amazonka.StorageGateway.Lens: sMBFileShareInfo_tags :: Lens' SMBFileShareInfo (Maybe [Tag])
+ Amazonka.StorageGateway.Lens: sMBFileShareInfo_vPCEndpointDNSName :: Lens' SMBFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: sMBFileShareInfo_validUserList :: Lens' SMBFileShareInfo (Maybe [Text])
+ Amazonka.StorageGateway.Lens: sMBLocalGroups_gatewayAdmins :: Lens' SMBLocalGroups (Maybe [Text])
+ Amazonka.StorageGateway.Lens: setLocalConsolePasswordResponse_gatewayARN :: Lens' SetLocalConsolePasswordResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: setLocalConsolePasswordResponse_httpStatus :: Lens' SetLocalConsolePasswordResponse Int
+ Amazonka.StorageGateway.Lens: setLocalConsolePassword_gatewayARN :: Lens' SetLocalConsolePassword Text
+ Amazonka.StorageGateway.Lens: setLocalConsolePassword_localConsolePassword :: Lens' SetLocalConsolePassword Text
+ Amazonka.StorageGateway.Lens: setSMBGuestPasswordResponse_gatewayARN :: Lens' SetSMBGuestPasswordResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: setSMBGuestPasswordResponse_httpStatus :: Lens' SetSMBGuestPasswordResponse Int
+ Amazonka.StorageGateway.Lens: setSMBGuestPassword_gatewayARN :: Lens' SetSMBGuestPassword Text
+ Amazonka.StorageGateway.Lens: setSMBGuestPassword_password :: Lens' SetSMBGuestPassword Text
+ Amazonka.StorageGateway.Lens: shutdownGatewayResponse_gatewayARN :: Lens' ShutdownGatewayResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: shutdownGatewayResponse_httpStatus :: Lens' ShutdownGatewayResponse Int
+ Amazonka.StorageGateway.Lens: shutdownGateway_gatewayARN :: Lens' ShutdownGateway Text
+ Amazonka.StorageGateway.Lens: startAvailabilityMonitorTestResponse_gatewayARN :: Lens' StartAvailabilityMonitorTestResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: startAvailabilityMonitorTestResponse_httpStatus :: Lens' StartAvailabilityMonitorTestResponse Int
+ Amazonka.StorageGateway.Lens: startAvailabilityMonitorTest_gatewayARN :: Lens' StartAvailabilityMonitorTest Text
+ Amazonka.StorageGateway.Lens: startGatewayResponse_gatewayARN :: Lens' StartGatewayResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: startGatewayResponse_httpStatus :: Lens' StartGatewayResponse Int
+ Amazonka.StorageGateway.Lens: startGateway_gatewayARN :: Lens' StartGateway Text
+ Amazonka.StorageGateway.Lens: storediSCSIVolume_createdDate :: Lens' StorediSCSIVolume (Maybe UTCTime)
+ Amazonka.StorageGateway.Lens: storediSCSIVolume_kmsKey :: Lens' StorediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Lens: storediSCSIVolume_preservedExistingData :: Lens' StorediSCSIVolume (Maybe Bool)
+ Amazonka.StorageGateway.Lens: storediSCSIVolume_sourceSnapshotId :: Lens' StorediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Lens: storediSCSIVolume_targetName :: Lens' StorediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Lens: storediSCSIVolume_volumeARN :: Lens' StorediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Lens: storediSCSIVolume_volumeAttachmentStatus :: Lens' StorediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Lens: storediSCSIVolume_volumeDiskId :: Lens' StorediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Lens: storediSCSIVolume_volumeId :: Lens' StorediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Lens: storediSCSIVolume_volumeProgress :: Lens' StorediSCSIVolume (Maybe Double)
+ Amazonka.StorageGateway.Lens: storediSCSIVolume_volumeSizeInBytes :: Lens' StorediSCSIVolume (Maybe Integer)
+ Amazonka.StorageGateway.Lens: storediSCSIVolume_volumeStatus :: Lens' StorediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Lens: storediSCSIVolume_volumeType :: Lens' StorediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Lens: storediSCSIVolume_volumeUsedInBytes :: Lens' StorediSCSIVolume (Maybe Integer)
+ Amazonka.StorageGateway.Lens: storediSCSIVolume_volumeiSCSIAttributes :: Lens' StorediSCSIVolume (Maybe VolumeiSCSIAttributes)
+ Amazonka.StorageGateway.Lens: tag_key :: Lens' Tag Text
+ Amazonka.StorageGateway.Lens: tag_value :: Lens' Tag Text
+ Amazonka.StorageGateway.Lens: tapeArchive_completionTime :: Lens' TapeArchive (Maybe UTCTime)
+ Amazonka.StorageGateway.Lens: tapeArchive_kmsKey :: Lens' TapeArchive (Maybe Text)
+ Amazonka.StorageGateway.Lens: tapeArchive_poolEntryDate :: Lens' TapeArchive (Maybe UTCTime)
+ Amazonka.StorageGateway.Lens: tapeArchive_poolId :: Lens' TapeArchive (Maybe Text)
+ Amazonka.StorageGateway.Lens: tapeArchive_retentionStartDate :: Lens' TapeArchive (Maybe UTCTime)
+ Amazonka.StorageGateway.Lens: tapeArchive_retrievedTo :: Lens' TapeArchive (Maybe Text)
+ Amazonka.StorageGateway.Lens: tapeArchive_tapeARN :: Lens' TapeArchive (Maybe Text)
+ Amazonka.StorageGateway.Lens: tapeArchive_tapeBarcode :: Lens' TapeArchive (Maybe Text)
+ Amazonka.StorageGateway.Lens: tapeArchive_tapeCreatedDate :: Lens' TapeArchive (Maybe UTCTime)
+ Amazonka.StorageGateway.Lens: tapeArchive_tapeSizeInBytes :: Lens' TapeArchive (Maybe Integer)
+ Amazonka.StorageGateway.Lens: tapeArchive_tapeStatus :: Lens' TapeArchive (Maybe Text)
+ Amazonka.StorageGateway.Lens: tapeArchive_tapeUsedInBytes :: Lens' TapeArchive (Maybe Integer)
+ Amazonka.StorageGateway.Lens: tapeArchive_worm :: Lens' TapeArchive (Maybe Bool)
+ Amazonka.StorageGateway.Lens: tapeInfo_gatewayARN :: Lens' TapeInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: tapeInfo_poolEntryDate :: Lens' TapeInfo (Maybe UTCTime)
+ Amazonka.StorageGateway.Lens: tapeInfo_poolId :: Lens' TapeInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: tapeInfo_retentionStartDate :: Lens' TapeInfo (Maybe UTCTime)
+ Amazonka.StorageGateway.Lens: tapeInfo_tapeARN :: Lens' TapeInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: tapeInfo_tapeBarcode :: Lens' TapeInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: tapeInfo_tapeSizeInBytes :: Lens' TapeInfo (Maybe Integer)
+ Amazonka.StorageGateway.Lens: tapeInfo_tapeStatus :: Lens' TapeInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: tapeRecoveryPointInfo_tapeARN :: Lens' TapeRecoveryPointInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: tapeRecoveryPointInfo_tapeRecoveryPointTime :: Lens' TapeRecoveryPointInfo (Maybe UTCTime)
+ Amazonka.StorageGateway.Lens: tapeRecoveryPointInfo_tapeSizeInBytes :: Lens' TapeRecoveryPointInfo (Maybe Integer)
+ Amazonka.StorageGateway.Lens: tapeRecoveryPointInfo_tapeStatus :: Lens' TapeRecoveryPointInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: tape_kmsKey :: Lens' Tape (Maybe Text)
+ Amazonka.StorageGateway.Lens: tape_poolEntryDate :: Lens' Tape (Maybe UTCTime)
+ Amazonka.StorageGateway.Lens: tape_poolId :: Lens' Tape (Maybe Text)
+ Amazonka.StorageGateway.Lens: tape_progress :: Lens' Tape (Maybe Double)
+ Amazonka.StorageGateway.Lens: tape_retentionStartDate :: Lens' Tape (Maybe UTCTime)
+ Amazonka.StorageGateway.Lens: tape_tapeARN :: Lens' Tape (Maybe Text)
+ Amazonka.StorageGateway.Lens: tape_tapeBarcode :: Lens' Tape (Maybe Text)
+ Amazonka.StorageGateway.Lens: tape_tapeCreatedDate :: Lens' Tape (Maybe UTCTime)
+ Amazonka.StorageGateway.Lens: tape_tapeSizeInBytes :: Lens' Tape (Maybe Integer)
+ Amazonka.StorageGateway.Lens: tape_tapeStatus :: Lens' Tape (Maybe Text)
+ Amazonka.StorageGateway.Lens: tape_tapeUsedInBytes :: Lens' Tape (Maybe Integer)
+ Amazonka.StorageGateway.Lens: tape_vTLDevice :: Lens' Tape (Maybe Text)
+ Amazonka.StorageGateway.Lens: tape_worm :: Lens' Tape (Maybe Bool)
+ Amazonka.StorageGateway.Lens: updateAutomaticTapeCreationPolicyResponse_gatewayARN :: Lens' UpdateAutomaticTapeCreationPolicyResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: updateAutomaticTapeCreationPolicyResponse_httpStatus :: Lens' UpdateAutomaticTapeCreationPolicyResponse Int
+ Amazonka.StorageGateway.Lens: updateAutomaticTapeCreationPolicy_automaticTapeCreationRules :: Lens' UpdateAutomaticTapeCreationPolicy (NonEmpty AutomaticTapeCreationRule)
+ Amazonka.StorageGateway.Lens: updateAutomaticTapeCreationPolicy_gatewayARN :: Lens' UpdateAutomaticTapeCreationPolicy Text
+ Amazonka.StorageGateway.Lens: updateBandwidthRateLimitResponse_gatewayARN :: Lens' UpdateBandwidthRateLimitResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: updateBandwidthRateLimitResponse_httpStatus :: Lens' UpdateBandwidthRateLimitResponse Int
+ Amazonka.StorageGateway.Lens: updateBandwidthRateLimitScheduleResponse_gatewayARN :: Lens' UpdateBandwidthRateLimitScheduleResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: updateBandwidthRateLimitScheduleResponse_httpStatus :: Lens' UpdateBandwidthRateLimitScheduleResponse Int
+ Amazonka.StorageGateway.Lens: updateBandwidthRateLimitSchedule_bandwidthRateLimitIntervals :: Lens' UpdateBandwidthRateLimitSchedule [BandwidthRateLimitInterval]
+ Amazonka.StorageGateway.Lens: updateBandwidthRateLimitSchedule_gatewayARN :: Lens' UpdateBandwidthRateLimitSchedule Text
+ Amazonka.StorageGateway.Lens: updateBandwidthRateLimit_averageDownloadRateLimitInBitsPerSec :: Lens' UpdateBandwidthRateLimit (Maybe Natural)
+ Amazonka.StorageGateway.Lens: updateBandwidthRateLimit_averageUploadRateLimitInBitsPerSec :: Lens' UpdateBandwidthRateLimit (Maybe Natural)
+ Amazonka.StorageGateway.Lens: updateBandwidthRateLimit_gatewayARN :: Lens' UpdateBandwidthRateLimit Text
+ Amazonka.StorageGateway.Lens: updateChapCredentialsResponse_httpStatus :: Lens' UpdateChapCredentialsResponse Int
+ Amazonka.StorageGateway.Lens: updateChapCredentialsResponse_initiatorName :: Lens' UpdateChapCredentialsResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: updateChapCredentialsResponse_targetARN :: Lens' UpdateChapCredentialsResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: updateChapCredentials_initiatorName :: Lens' UpdateChapCredentials Text
+ Amazonka.StorageGateway.Lens: updateChapCredentials_secretToAuthenticateInitiator :: Lens' UpdateChapCredentials Text
+ Amazonka.StorageGateway.Lens: updateChapCredentials_secretToAuthenticateTarget :: Lens' UpdateChapCredentials (Maybe Text)
+ Amazonka.StorageGateway.Lens: updateChapCredentials_targetARN :: Lens' UpdateChapCredentials Text
+ Amazonka.StorageGateway.Lens: updateFileSystemAssociationResponse_fileSystemAssociationARN :: Lens' UpdateFileSystemAssociationResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: updateFileSystemAssociationResponse_httpStatus :: Lens' UpdateFileSystemAssociationResponse Int
+ Amazonka.StorageGateway.Lens: updateFileSystemAssociation_auditDestinationARN :: Lens' UpdateFileSystemAssociation (Maybe Text)
+ Amazonka.StorageGateway.Lens: updateFileSystemAssociation_cacheAttributes :: Lens' UpdateFileSystemAssociation (Maybe CacheAttributes)
+ Amazonka.StorageGateway.Lens: updateFileSystemAssociation_fileSystemAssociationARN :: Lens' UpdateFileSystemAssociation Text
+ Amazonka.StorageGateway.Lens: updateFileSystemAssociation_password :: Lens' UpdateFileSystemAssociation (Maybe Text)
+ Amazonka.StorageGateway.Lens: updateFileSystemAssociation_userName :: Lens' UpdateFileSystemAssociation (Maybe Text)
+ Amazonka.StorageGateway.Lens: updateGatewayInformationResponse_gatewayARN :: Lens' UpdateGatewayInformationResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: updateGatewayInformationResponse_gatewayName :: Lens' UpdateGatewayInformationResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: updateGatewayInformationResponse_httpStatus :: Lens' UpdateGatewayInformationResponse Int
+ Amazonka.StorageGateway.Lens: updateGatewayInformation_cloudWatchLogGroupARN :: Lens' UpdateGatewayInformation (Maybe Text)
+ Amazonka.StorageGateway.Lens: updateGatewayInformation_gatewayARN :: Lens' UpdateGatewayInformation Text
+ Amazonka.StorageGateway.Lens: updateGatewayInformation_gatewayCapacity :: Lens' UpdateGatewayInformation (Maybe GatewayCapacity)
+ Amazonka.StorageGateway.Lens: updateGatewayInformation_gatewayName :: Lens' UpdateGatewayInformation (Maybe Text)
+ Amazonka.StorageGateway.Lens: updateGatewayInformation_gatewayTimezone :: Lens' UpdateGatewayInformation (Maybe Text)
+ Amazonka.StorageGateway.Lens: updateGatewaySoftwareNowResponse_gatewayARN :: Lens' UpdateGatewaySoftwareNowResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: updateGatewaySoftwareNowResponse_httpStatus :: Lens' UpdateGatewaySoftwareNowResponse Int
+ Amazonka.StorageGateway.Lens: updateGatewaySoftwareNow_gatewayARN :: Lens' UpdateGatewaySoftwareNow Text
+ Amazonka.StorageGateway.Lens: updateMaintenanceStartTimeResponse_gatewayARN :: Lens' UpdateMaintenanceStartTimeResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: updateMaintenanceStartTimeResponse_httpStatus :: Lens' UpdateMaintenanceStartTimeResponse Int
+ Amazonka.StorageGateway.Lens: updateMaintenanceStartTime_dayOfMonth :: Lens' UpdateMaintenanceStartTime (Maybe Natural)
+ Amazonka.StorageGateway.Lens: updateMaintenanceStartTime_dayOfWeek :: Lens' UpdateMaintenanceStartTime (Maybe Natural)
+ Amazonka.StorageGateway.Lens: updateMaintenanceStartTime_gatewayARN :: Lens' UpdateMaintenanceStartTime Text
+ Amazonka.StorageGateway.Lens: updateMaintenanceStartTime_hourOfDay :: Lens' UpdateMaintenanceStartTime Natural
+ Amazonka.StorageGateway.Lens: updateMaintenanceStartTime_minuteOfHour :: Lens' UpdateMaintenanceStartTime Natural
+ Amazonka.StorageGateway.Lens: updateNFSFileShareResponse_fileShareARN :: Lens' UpdateNFSFileShareResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: updateNFSFileShareResponse_httpStatus :: Lens' UpdateNFSFileShareResponse Int
+ Amazonka.StorageGateway.Lens: updateNFSFileShare_auditDestinationARN :: Lens' UpdateNFSFileShare (Maybe Text)
+ Amazonka.StorageGateway.Lens: updateNFSFileShare_cacheAttributes :: Lens' UpdateNFSFileShare (Maybe CacheAttributes)
+ Amazonka.StorageGateway.Lens: updateNFSFileShare_clientList :: Lens' UpdateNFSFileShare (Maybe (NonEmpty Text))
+ Amazonka.StorageGateway.Lens: updateNFSFileShare_defaultStorageClass :: Lens' UpdateNFSFileShare (Maybe Text)
+ Amazonka.StorageGateway.Lens: updateNFSFileShare_fileShareARN :: Lens' UpdateNFSFileShare Text
+ Amazonka.StorageGateway.Lens: updateNFSFileShare_fileShareName :: Lens' UpdateNFSFileShare (Maybe Text)
+ Amazonka.StorageGateway.Lens: updateNFSFileShare_guessMIMETypeEnabled :: Lens' UpdateNFSFileShare (Maybe Bool)
+ Amazonka.StorageGateway.Lens: updateNFSFileShare_kmsEncrypted :: Lens' UpdateNFSFileShare (Maybe Bool)
+ Amazonka.StorageGateway.Lens: updateNFSFileShare_kmsKey :: Lens' UpdateNFSFileShare (Maybe Text)
+ Amazonka.StorageGateway.Lens: updateNFSFileShare_nFSFileShareDefaults :: Lens' UpdateNFSFileShare (Maybe NFSFileShareDefaults)
+ Amazonka.StorageGateway.Lens: updateNFSFileShare_notificationPolicy :: Lens' UpdateNFSFileShare (Maybe Text)
+ Amazonka.StorageGateway.Lens: updateNFSFileShare_objectACL :: Lens' UpdateNFSFileShare (Maybe ObjectACL)
+ Amazonka.StorageGateway.Lens: updateNFSFileShare_readOnly :: Lens' UpdateNFSFileShare (Maybe Bool)
+ Amazonka.StorageGateway.Lens: updateNFSFileShare_requesterPays :: Lens' UpdateNFSFileShare (Maybe Bool)
+ Amazonka.StorageGateway.Lens: updateNFSFileShare_squash :: Lens' UpdateNFSFileShare (Maybe Text)
+ Amazonka.StorageGateway.Lens: updateSMBFileShareResponse_fileShareARN :: Lens' UpdateSMBFileShareResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: updateSMBFileShareResponse_httpStatus :: Lens' UpdateSMBFileShareResponse Int
+ Amazonka.StorageGateway.Lens: updateSMBFileShareVisibilityResponse_gatewayARN :: Lens' UpdateSMBFileShareVisibilityResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: updateSMBFileShareVisibilityResponse_httpStatus :: Lens' UpdateSMBFileShareVisibilityResponse Int
+ Amazonka.StorageGateway.Lens: updateSMBFileShareVisibility_fileSharesVisible :: Lens' UpdateSMBFileShareVisibility Bool
+ Amazonka.StorageGateway.Lens: updateSMBFileShareVisibility_gatewayARN :: Lens' UpdateSMBFileShareVisibility Text
+ Amazonka.StorageGateway.Lens: updateSMBFileShare_accessBasedEnumeration :: Lens' UpdateSMBFileShare (Maybe Bool)
+ Amazonka.StorageGateway.Lens: updateSMBFileShare_adminUserList :: Lens' UpdateSMBFileShare (Maybe [Text])
+ Amazonka.StorageGateway.Lens: updateSMBFileShare_auditDestinationARN :: Lens' UpdateSMBFileShare (Maybe Text)
+ Amazonka.StorageGateway.Lens: updateSMBFileShare_cacheAttributes :: Lens' UpdateSMBFileShare (Maybe CacheAttributes)
+ Amazonka.StorageGateway.Lens: updateSMBFileShare_caseSensitivity :: Lens' UpdateSMBFileShare (Maybe CaseSensitivity)
+ Amazonka.StorageGateway.Lens: updateSMBFileShare_defaultStorageClass :: Lens' UpdateSMBFileShare (Maybe Text)
+ Amazonka.StorageGateway.Lens: updateSMBFileShare_fileShareARN :: Lens' UpdateSMBFileShare Text
+ Amazonka.StorageGateway.Lens: updateSMBFileShare_fileShareName :: Lens' UpdateSMBFileShare (Maybe Text)
+ Amazonka.StorageGateway.Lens: updateSMBFileShare_guessMIMETypeEnabled :: Lens' UpdateSMBFileShare (Maybe Bool)
+ Amazonka.StorageGateway.Lens: updateSMBFileShare_invalidUserList :: Lens' UpdateSMBFileShare (Maybe [Text])
+ Amazonka.StorageGateway.Lens: updateSMBFileShare_kmsEncrypted :: Lens' UpdateSMBFileShare (Maybe Bool)
+ Amazonka.StorageGateway.Lens: updateSMBFileShare_kmsKey :: Lens' UpdateSMBFileShare (Maybe Text)
+ Amazonka.StorageGateway.Lens: updateSMBFileShare_notificationPolicy :: Lens' UpdateSMBFileShare (Maybe Text)
+ Amazonka.StorageGateway.Lens: updateSMBFileShare_objectACL :: Lens' UpdateSMBFileShare (Maybe ObjectACL)
+ Amazonka.StorageGateway.Lens: updateSMBFileShare_oplocksEnabled :: Lens' UpdateSMBFileShare (Maybe Bool)
+ Amazonka.StorageGateway.Lens: updateSMBFileShare_readOnly :: Lens' UpdateSMBFileShare (Maybe Bool)
+ Amazonka.StorageGateway.Lens: updateSMBFileShare_requesterPays :: Lens' UpdateSMBFileShare (Maybe Bool)
+ Amazonka.StorageGateway.Lens: updateSMBFileShare_sMBACLEnabled :: Lens' UpdateSMBFileShare (Maybe Bool)
+ Amazonka.StorageGateway.Lens: updateSMBFileShare_validUserList :: Lens' UpdateSMBFileShare (Maybe [Text])
+ Amazonka.StorageGateway.Lens: updateSMBLocalGroupsResponse_gatewayARN :: Lens' UpdateSMBLocalGroupsResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: updateSMBLocalGroupsResponse_httpStatus :: Lens' UpdateSMBLocalGroupsResponse Int
+ Amazonka.StorageGateway.Lens: updateSMBLocalGroups_gatewayARN :: Lens' UpdateSMBLocalGroups Text
+ Amazonka.StorageGateway.Lens: updateSMBLocalGroups_sMBLocalGroups :: Lens' UpdateSMBLocalGroups SMBLocalGroups
+ Amazonka.StorageGateway.Lens: updateSMBSecurityStrategyResponse_gatewayARN :: Lens' UpdateSMBSecurityStrategyResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: updateSMBSecurityStrategyResponse_httpStatus :: Lens' UpdateSMBSecurityStrategyResponse Int
+ Amazonka.StorageGateway.Lens: updateSMBSecurityStrategy_gatewayARN :: Lens' UpdateSMBSecurityStrategy Text
+ Amazonka.StorageGateway.Lens: updateSMBSecurityStrategy_sMBSecurityStrategy :: Lens' UpdateSMBSecurityStrategy SMBSecurityStrategy
+ Amazonka.StorageGateway.Lens: updateSnapshotScheduleResponse_httpStatus :: Lens' UpdateSnapshotScheduleResponse Int
+ Amazonka.StorageGateway.Lens: updateSnapshotScheduleResponse_volumeARN :: Lens' UpdateSnapshotScheduleResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: updateSnapshotSchedule_description :: Lens' UpdateSnapshotSchedule (Maybe Text)
+ Amazonka.StorageGateway.Lens: updateSnapshotSchedule_recurrenceInHours :: Lens' UpdateSnapshotSchedule Natural
+ Amazonka.StorageGateway.Lens: updateSnapshotSchedule_startAt :: Lens' UpdateSnapshotSchedule Natural
+ Amazonka.StorageGateway.Lens: updateSnapshotSchedule_tags :: Lens' UpdateSnapshotSchedule (Maybe [Tag])
+ Amazonka.StorageGateway.Lens: updateSnapshotSchedule_volumeARN :: Lens' UpdateSnapshotSchedule Text
+ Amazonka.StorageGateway.Lens: updateVTLDeviceTypeResponse_httpStatus :: Lens' UpdateVTLDeviceTypeResponse Int
+ Amazonka.StorageGateway.Lens: updateVTLDeviceTypeResponse_vTLDeviceARN :: Lens' UpdateVTLDeviceTypeResponse (Maybe Text)
+ Amazonka.StorageGateway.Lens: updateVTLDeviceType_deviceType :: Lens' UpdateVTLDeviceType Text
+ Amazonka.StorageGateway.Lens: updateVTLDeviceType_vTLDeviceARN :: Lens' UpdateVTLDeviceType Text
+ Amazonka.StorageGateway.Lens: vTLDevice_deviceiSCSIAttributes :: Lens' VTLDevice (Maybe DeviceiSCSIAttributes)
+ Amazonka.StorageGateway.Lens: vTLDevice_vTLDeviceARN :: Lens' VTLDevice (Maybe Text)
+ Amazonka.StorageGateway.Lens: vTLDevice_vTLDeviceProductIdentifier :: Lens' VTLDevice (Maybe Text)
+ Amazonka.StorageGateway.Lens: vTLDevice_vTLDeviceType :: Lens' VTLDevice (Maybe Text)
+ Amazonka.StorageGateway.Lens: vTLDevice_vTLDeviceVendor :: Lens' VTLDevice (Maybe Text)
+ Amazonka.StorageGateway.Lens: volumeInfo_gatewayARN :: Lens' VolumeInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: volumeInfo_gatewayId :: Lens' VolumeInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: volumeInfo_volumeARN :: Lens' VolumeInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: volumeInfo_volumeAttachmentStatus :: Lens' VolumeInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: volumeInfo_volumeId :: Lens' VolumeInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: volumeInfo_volumeSizeInBytes :: Lens' VolumeInfo (Maybe Integer)
+ Amazonka.StorageGateway.Lens: volumeInfo_volumeType :: Lens' VolumeInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: volumeRecoveryPointInfo_volumeARN :: Lens' VolumeRecoveryPointInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: volumeRecoveryPointInfo_volumeRecoveryPointTime :: Lens' VolumeRecoveryPointInfo (Maybe Text)
+ Amazonka.StorageGateway.Lens: volumeRecoveryPointInfo_volumeSizeInBytes :: Lens' VolumeRecoveryPointInfo (Maybe Integer)
+ Amazonka.StorageGateway.Lens: volumeRecoveryPointInfo_volumeUsageInBytes :: Lens' VolumeRecoveryPointInfo (Maybe Integer)
+ Amazonka.StorageGateway.Lens: volumeiSCSIAttributes_chapEnabled :: Lens' VolumeiSCSIAttributes (Maybe Bool)
+ Amazonka.StorageGateway.Lens: volumeiSCSIAttributes_lunNumber :: Lens' VolumeiSCSIAttributes (Maybe Natural)
+ Amazonka.StorageGateway.Lens: volumeiSCSIAttributes_networkInterfaceId :: Lens' VolumeiSCSIAttributes (Maybe Text)
+ Amazonka.StorageGateway.Lens: volumeiSCSIAttributes_networkInterfacePort :: Lens' VolumeiSCSIAttributes (Maybe Int)
+ Amazonka.StorageGateway.Lens: volumeiSCSIAttributes_targetARN :: Lens' VolumeiSCSIAttributes (Maybe Text)
+ Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies: ListAutomaticTapeCreationPolicies' :: Maybe Text -> ListAutomaticTapeCreationPolicies
+ Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies: ListAutomaticTapeCreationPoliciesResponse' :: Maybe [AutomaticTapeCreationPolicyInfo] -> Int -> ListAutomaticTapeCreationPoliciesResponse
+ Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies: [$sel:automaticTapeCreationPolicyInfos:ListAutomaticTapeCreationPoliciesResponse'] :: ListAutomaticTapeCreationPoliciesResponse -> Maybe [AutomaticTapeCreationPolicyInfo]
+ Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies: [$sel:gatewayARN:ListAutomaticTapeCreationPolicies'] :: ListAutomaticTapeCreationPolicies -> Maybe Text
+ Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies: [$sel:httpStatus:ListAutomaticTapeCreationPoliciesResponse'] :: ListAutomaticTapeCreationPoliciesResponse -> Int
+ Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies: data ListAutomaticTapeCreationPolicies
+ Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies: data ListAutomaticTapeCreationPoliciesResponse
+ Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies.ListAutomaticTapeCreationPolicies
+ Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies.ListAutomaticTapeCreationPolicies
+ Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies.ListAutomaticTapeCreationPolicies
+ Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies.ListAutomaticTapeCreationPolicies
+ Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies: instance Control.DeepSeq.NFData Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies.ListAutomaticTapeCreationPolicies
+ Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies: instance Control.DeepSeq.NFData Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies.ListAutomaticTapeCreationPoliciesResponse
+ Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies.ListAutomaticTapeCreationPolicies
+ Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies.ListAutomaticTapeCreationPolicies
+ Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies: instance GHC.Classes.Eq Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies.ListAutomaticTapeCreationPolicies
+ Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies: instance GHC.Classes.Eq Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies.ListAutomaticTapeCreationPoliciesResponse
+ Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies: instance GHC.Generics.Generic Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies.ListAutomaticTapeCreationPolicies
+ Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies: instance GHC.Generics.Generic Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies.ListAutomaticTapeCreationPoliciesResponse
+ Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies: instance GHC.Read.Read Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies.ListAutomaticTapeCreationPolicies
+ Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies: instance GHC.Read.Read Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies.ListAutomaticTapeCreationPoliciesResponse
+ Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies: instance GHC.Show.Show Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies.ListAutomaticTapeCreationPolicies
+ Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies: instance GHC.Show.Show Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies.ListAutomaticTapeCreationPoliciesResponse
+ Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies: listAutomaticTapeCreationPoliciesResponse_automaticTapeCreationPolicyInfos :: Lens' ListAutomaticTapeCreationPoliciesResponse (Maybe [AutomaticTapeCreationPolicyInfo])
+ Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies: listAutomaticTapeCreationPoliciesResponse_httpStatus :: Lens' ListAutomaticTapeCreationPoliciesResponse Int
+ Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies: listAutomaticTapeCreationPolicies_gatewayARN :: Lens' ListAutomaticTapeCreationPolicies (Maybe Text)
+ Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies: newListAutomaticTapeCreationPolicies :: ListAutomaticTapeCreationPolicies
+ Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies: newListAutomaticTapeCreationPoliciesResponse :: Int -> ListAutomaticTapeCreationPoliciesResponse
+ Amazonka.StorageGateway.ListFileShares: ListFileShares' :: Maybe Text -> Maybe Natural -> Maybe Text -> ListFileShares
+ Amazonka.StorageGateway.ListFileShares: ListFileSharesResponse' :: Maybe [FileShareInfo] -> Maybe Text -> Maybe Text -> Int -> ListFileSharesResponse
+ Amazonka.StorageGateway.ListFileShares: [$sel:fileShareInfoList:ListFileSharesResponse'] :: ListFileSharesResponse -> Maybe [FileShareInfo]
+ Amazonka.StorageGateway.ListFileShares: [$sel:gatewayARN:ListFileShares'] :: ListFileShares -> Maybe Text
+ Amazonka.StorageGateway.ListFileShares: [$sel:httpStatus:ListFileSharesResponse'] :: ListFileSharesResponse -> Int
+ Amazonka.StorageGateway.ListFileShares: [$sel:limit:ListFileShares'] :: ListFileShares -> Maybe Natural
+ Amazonka.StorageGateway.ListFileShares: [$sel:marker:ListFileShares'] :: ListFileShares -> Maybe Text
+ Amazonka.StorageGateway.ListFileShares: [$sel:marker:ListFileSharesResponse'] :: ListFileSharesResponse -> Maybe Text
+ Amazonka.StorageGateway.ListFileShares: [$sel:nextMarker:ListFileSharesResponse'] :: ListFileSharesResponse -> Maybe Text
+ Amazonka.StorageGateway.ListFileShares: data ListFileShares
+ Amazonka.StorageGateway.ListFileShares: data ListFileSharesResponse
+ Amazonka.StorageGateway.ListFileShares: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.ListFileShares.ListFileShares
+ Amazonka.StorageGateway.ListFileShares: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.ListFileShares.ListFileShares
+ Amazonka.StorageGateway.ListFileShares: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.ListFileShares.ListFileShares
+ Amazonka.StorageGateway.ListFileShares: instance Amazonka.Pager.AWSPager Amazonka.StorageGateway.ListFileShares.ListFileShares
+ Amazonka.StorageGateway.ListFileShares: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.ListFileShares.ListFileShares
+ Amazonka.StorageGateway.ListFileShares: instance Control.DeepSeq.NFData Amazonka.StorageGateway.ListFileShares.ListFileShares
+ Amazonka.StorageGateway.ListFileShares: instance Control.DeepSeq.NFData Amazonka.StorageGateway.ListFileShares.ListFileSharesResponse
+ Amazonka.StorageGateway.ListFileShares: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.ListFileShares.ListFileShares
+ Amazonka.StorageGateway.ListFileShares: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.ListFileShares.ListFileShares
+ Amazonka.StorageGateway.ListFileShares: instance GHC.Classes.Eq Amazonka.StorageGateway.ListFileShares.ListFileShares
+ Amazonka.StorageGateway.ListFileShares: instance GHC.Classes.Eq Amazonka.StorageGateway.ListFileShares.ListFileSharesResponse
+ Amazonka.StorageGateway.ListFileShares: instance GHC.Generics.Generic Amazonka.StorageGateway.ListFileShares.ListFileShares
+ Amazonka.StorageGateway.ListFileShares: instance GHC.Generics.Generic Amazonka.StorageGateway.ListFileShares.ListFileSharesResponse
+ Amazonka.StorageGateway.ListFileShares: instance GHC.Read.Read Amazonka.StorageGateway.ListFileShares.ListFileShares
+ Amazonka.StorageGateway.ListFileShares: instance GHC.Read.Read Amazonka.StorageGateway.ListFileShares.ListFileSharesResponse
+ Amazonka.StorageGateway.ListFileShares: instance GHC.Show.Show Amazonka.StorageGateway.ListFileShares.ListFileShares
+ Amazonka.StorageGateway.ListFileShares: instance GHC.Show.Show Amazonka.StorageGateway.ListFileShares.ListFileSharesResponse
+ Amazonka.StorageGateway.ListFileShares: listFileSharesResponse_fileShareInfoList :: Lens' ListFileSharesResponse (Maybe [FileShareInfo])
+ Amazonka.StorageGateway.ListFileShares: listFileSharesResponse_httpStatus :: Lens' ListFileSharesResponse Int
+ Amazonka.StorageGateway.ListFileShares: listFileSharesResponse_marker :: Lens' ListFileSharesResponse (Maybe Text)
+ Amazonka.StorageGateway.ListFileShares: listFileSharesResponse_nextMarker :: Lens' ListFileSharesResponse (Maybe Text)
+ Amazonka.StorageGateway.ListFileShares: listFileShares_gatewayARN :: Lens' ListFileShares (Maybe Text)
+ Amazonka.StorageGateway.ListFileShares: listFileShares_limit :: Lens' ListFileShares (Maybe Natural)
+ Amazonka.StorageGateway.ListFileShares: listFileShares_marker :: Lens' ListFileShares (Maybe Text)
+ Amazonka.StorageGateway.ListFileShares: newListFileShares :: ListFileShares
+ Amazonka.StorageGateway.ListFileShares: newListFileSharesResponse :: Int -> ListFileSharesResponse
+ Amazonka.StorageGateway.ListFileSystemAssociations: ListFileSystemAssociations' :: Maybe Text -> Maybe Natural -> Maybe Text -> ListFileSystemAssociations
+ Amazonka.StorageGateway.ListFileSystemAssociations: ListFileSystemAssociationsResponse' :: Maybe [FileSystemAssociationSummary] -> Maybe Text -> Maybe Text -> Int -> ListFileSystemAssociationsResponse
+ Amazonka.StorageGateway.ListFileSystemAssociations: [$sel:fileSystemAssociationSummaryList:ListFileSystemAssociationsResponse'] :: ListFileSystemAssociationsResponse -> Maybe [FileSystemAssociationSummary]
+ Amazonka.StorageGateway.ListFileSystemAssociations: [$sel:gatewayARN:ListFileSystemAssociations'] :: ListFileSystemAssociations -> Maybe Text
+ Amazonka.StorageGateway.ListFileSystemAssociations: [$sel:httpStatus:ListFileSystemAssociationsResponse'] :: ListFileSystemAssociationsResponse -> Int
+ Amazonka.StorageGateway.ListFileSystemAssociations: [$sel:limit:ListFileSystemAssociations'] :: ListFileSystemAssociations -> Maybe Natural
+ Amazonka.StorageGateway.ListFileSystemAssociations: [$sel:marker:ListFileSystemAssociations'] :: ListFileSystemAssociations -> Maybe Text
+ Amazonka.StorageGateway.ListFileSystemAssociations: [$sel:marker:ListFileSystemAssociationsResponse'] :: ListFileSystemAssociationsResponse -> Maybe Text
+ Amazonka.StorageGateway.ListFileSystemAssociations: [$sel:nextMarker:ListFileSystemAssociationsResponse'] :: ListFileSystemAssociationsResponse -> Maybe Text
+ Amazonka.StorageGateway.ListFileSystemAssociations: data ListFileSystemAssociations
+ Amazonka.StorageGateway.ListFileSystemAssociations: data ListFileSystemAssociationsResponse
+ Amazonka.StorageGateway.ListFileSystemAssociations: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.ListFileSystemAssociations.ListFileSystemAssociations
+ Amazonka.StorageGateway.ListFileSystemAssociations: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.ListFileSystemAssociations.ListFileSystemAssociations
+ Amazonka.StorageGateway.ListFileSystemAssociations: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.ListFileSystemAssociations.ListFileSystemAssociations
+ Amazonka.StorageGateway.ListFileSystemAssociations: instance Amazonka.Pager.AWSPager Amazonka.StorageGateway.ListFileSystemAssociations.ListFileSystemAssociations
+ Amazonka.StorageGateway.ListFileSystemAssociations: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.ListFileSystemAssociations.ListFileSystemAssociations
+ Amazonka.StorageGateway.ListFileSystemAssociations: instance Control.DeepSeq.NFData Amazonka.StorageGateway.ListFileSystemAssociations.ListFileSystemAssociations
+ Amazonka.StorageGateway.ListFileSystemAssociations: instance Control.DeepSeq.NFData Amazonka.StorageGateway.ListFileSystemAssociations.ListFileSystemAssociationsResponse
+ Amazonka.StorageGateway.ListFileSystemAssociations: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.ListFileSystemAssociations.ListFileSystemAssociations
+ Amazonka.StorageGateway.ListFileSystemAssociations: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.ListFileSystemAssociations.ListFileSystemAssociations
+ Amazonka.StorageGateway.ListFileSystemAssociations: instance GHC.Classes.Eq Amazonka.StorageGateway.ListFileSystemAssociations.ListFileSystemAssociations
+ Amazonka.StorageGateway.ListFileSystemAssociations: instance GHC.Classes.Eq Amazonka.StorageGateway.ListFileSystemAssociations.ListFileSystemAssociationsResponse
+ Amazonka.StorageGateway.ListFileSystemAssociations: instance GHC.Generics.Generic Amazonka.StorageGateway.ListFileSystemAssociations.ListFileSystemAssociations
+ Amazonka.StorageGateway.ListFileSystemAssociations: instance GHC.Generics.Generic Amazonka.StorageGateway.ListFileSystemAssociations.ListFileSystemAssociationsResponse
+ Amazonka.StorageGateway.ListFileSystemAssociations: instance GHC.Read.Read Amazonka.StorageGateway.ListFileSystemAssociations.ListFileSystemAssociations
+ Amazonka.StorageGateway.ListFileSystemAssociations: instance GHC.Read.Read Amazonka.StorageGateway.ListFileSystemAssociations.ListFileSystemAssociationsResponse
+ Amazonka.StorageGateway.ListFileSystemAssociations: instance GHC.Show.Show Amazonka.StorageGateway.ListFileSystemAssociations.ListFileSystemAssociations
+ Amazonka.StorageGateway.ListFileSystemAssociations: instance GHC.Show.Show Amazonka.StorageGateway.ListFileSystemAssociations.ListFileSystemAssociationsResponse
+ Amazonka.StorageGateway.ListFileSystemAssociations: listFileSystemAssociationsResponse_fileSystemAssociationSummaryList :: Lens' ListFileSystemAssociationsResponse (Maybe [FileSystemAssociationSummary])
+ Amazonka.StorageGateway.ListFileSystemAssociations: listFileSystemAssociationsResponse_httpStatus :: Lens' ListFileSystemAssociationsResponse Int
+ Amazonka.StorageGateway.ListFileSystemAssociations: listFileSystemAssociationsResponse_marker :: Lens' ListFileSystemAssociationsResponse (Maybe Text)
+ Amazonka.StorageGateway.ListFileSystemAssociations: listFileSystemAssociationsResponse_nextMarker :: Lens' ListFileSystemAssociationsResponse (Maybe Text)
+ Amazonka.StorageGateway.ListFileSystemAssociations: listFileSystemAssociations_gatewayARN :: Lens' ListFileSystemAssociations (Maybe Text)
+ Amazonka.StorageGateway.ListFileSystemAssociations: listFileSystemAssociations_limit :: Lens' ListFileSystemAssociations (Maybe Natural)
+ Amazonka.StorageGateway.ListFileSystemAssociations: listFileSystemAssociations_marker :: Lens' ListFileSystemAssociations (Maybe Text)
+ Amazonka.StorageGateway.ListFileSystemAssociations: newListFileSystemAssociations :: ListFileSystemAssociations
+ Amazonka.StorageGateway.ListFileSystemAssociations: newListFileSystemAssociationsResponse :: Int -> ListFileSystemAssociationsResponse
+ Amazonka.StorageGateway.ListGateways: ListGateways' :: Maybe Natural -> Maybe Text -> ListGateways
+ Amazonka.StorageGateway.ListGateways: ListGatewaysResponse' :: Maybe [GatewayInfo] -> Maybe Text -> Int -> ListGatewaysResponse
+ Amazonka.StorageGateway.ListGateways: [$sel:gateways:ListGatewaysResponse'] :: ListGatewaysResponse -> Maybe [GatewayInfo]
+ Amazonka.StorageGateway.ListGateways: [$sel:httpStatus:ListGatewaysResponse'] :: ListGatewaysResponse -> Int
+ Amazonka.StorageGateway.ListGateways: [$sel:limit:ListGateways'] :: ListGateways -> Maybe Natural
+ Amazonka.StorageGateway.ListGateways: [$sel:marker:ListGateways'] :: ListGateways -> Maybe Text
+ Amazonka.StorageGateway.ListGateways: [$sel:marker:ListGatewaysResponse'] :: ListGatewaysResponse -> Maybe Text
+ Amazonka.StorageGateway.ListGateways: data ListGateways
+ Amazonka.StorageGateway.ListGateways: data ListGatewaysResponse
+ Amazonka.StorageGateway.ListGateways: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.ListGateways.ListGateways
+ Amazonka.StorageGateway.ListGateways: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.ListGateways.ListGateways
+ Amazonka.StorageGateway.ListGateways: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.ListGateways.ListGateways
+ Amazonka.StorageGateway.ListGateways: instance Amazonka.Pager.AWSPager Amazonka.StorageGateway.ListGateways.ListGateways
+ Amazonka.StorageGateway.ListGateways: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.ListGateways.ListGateways
+ Amazonka.StorageGateway.ListGateways: instance Control.DeepSeq.NFData Amazonka.StorageGateway.ListGateways.ListGateways
+ Amazonka.StorageGateway.ListGateways: instance Control.DeepSeq.NFData Amazonka.StorageGateway.ListGateways.ListGatewaysResponse
+ Amazonka.StorageGateway.ListGateways: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.ListGateways.ListGateways
+ Amazonka.StorageGateway.ListGateways: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.ListGateways.ListGateways
+ Amazonka.StorageGateway.ListGateways: instance GHC.Classes.Eq Amazonka.StorageGateway.ListGateways.ListGateways
+ Amazonka.StorageGateway.ListGateways: instance GHC.Classes.Eq Amazonka.StorageGateway.ListGateways.ListGatewaysResponse
+ Amazonka.StorageGateway.ListGateways: instance GHC.Generics.Generic Amazonka.StorageGateway.ListGateways.ListGateways
+ Amazonka.StorageGateway.ListGateways: instance GHC.Generics.Generic Amazonka.StorageGateway.ListGateways.ListGatewaysResponse
+ Amazonka.StorageGateway.ListGateways: instance GHC.Read.Read Amazonka.StorageGateway.ListGateways.ListGateways
+ Amazonka.StorageGateway.ListGateways: instance GHC.Read.Read Amazonka.StorageGateway.ListGateways.ListGatewaysResponse
+ Amazonka.StorageGateway.ListGateways: instance GHC.Show.Show Amazonka.StorageGateway.ListGateways.ListGateways
+ Amazonka.StorageGateway.ListGateways: instance GHC.Show.Show Amazonka.StorageGateway.ListGateways.ListGatewaysResponse
+ Amazonka.StorageGateway.ListGateways: listGatewaysResponse_gateways :: Lens' ListGatewaysResponse (Maybe [GatewayInfo])
+ Amazonka.StorageGateway.ListGateways: listGatewaysResponse_httpStatus :: Lens' ListGatewaysResponse Int
+ Amazonka.StorageGateway.ListGateways: listGatewaysResponse_marker :: Lens' ListGatewaysResponse (Maybe Text)
+ Amazonka.StorageGateway.ListGateways: listGateways_limit :: Lens' ListGateways (Maybe Natural)
+ Amazonka.StorageGateway.ListGateways: listGateways_marker :: Lens' ListGateways (Maybe Text)
+ Amazonka.StorageGateway.ListGateways: newListGateways :: ListGateways
+ Amazonka.StorageGateway.ListGateways: newListGatewaysResponse :: Int -> ListGatewaysResponse
+ Amazonka.StorageGateway.ListLocalDisks: ListLocalDisks' :: Text -> ListLocalDisks
+ Amazonka.StorageGateway.ListLocalDisks: ListLocalDisksResponse' :: Maybe [Disk] -> Maybe Text -> Int -> ListLocalDisksResponse
+ Amazonka.StorageGateway.ListLocalDisks: [$sel:disks:ListLocalDisksResponse'] :: ListLocalDisksResponse -> Maybe [Disk]
+ Amazonka.StorageGateway.ListLocalDisks: [$sel:gatewayARN:ListLocalDisks'] :: ListLocalDisks -> Text
+ Amazonka.StorageGateway.ListLocalDisks: [$sel:gatewayARN:ListLocalDisksResponse'] :: ListLocalDisksResponse -> Maybe Text
+ Amazonka.StorageGateway.ListLocalDisks: [$sel:httpStatus:ListLocalDisksResponse'] :: ListLocalDisksResponse -> Int
+ Amazonka.StorageGateway.ListLocalDisks: data ListLocalDisks
+ Amazonka.StorageGateway.ListLocalDisks: data ListLocalDisksResponse
+ Amazonka.StorageGateway.ListLocalDisks: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.ListLocalDisks.ListLocalDisks
+ Amazonka.StorageGateway.ListLocalDisks: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.ListLocalDisks.ListLocalDisks
+ Amazonka.StorageGateway.ListLocalDisks: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.ListLocalDisks.ListLocalDisks
+ Amazonka.StorageGateway.ListLocalDisks: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.ListLocalDisks.ListLocalDisks
+ Amazonka.StorageGateway.ListLocalDisks: instance Control.DeepSeq.NFData Amazonka.StorageGateway.ListLocalDisks.ListLocalDisks
+ Amazonka.StorageGateway.ListLocalDisks: instance Control.DeepSeq.NFData Amazonka.StorageGateway.ListLocalDisks.ListLocalDisksResponse
+ Amazonka.StorageGateway.ListLocalDisks: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.ListLocalDisks.ListLocalDisks
+ Amazonka.StorageGateway.ListLocalDisks: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.ListLocalDisks.ListLocalDisks
+ Amazonka.StorageGateway.ListLocalDisks: instance GHC.Classes.Eq Amazonka.StorageGateway.ListLocalDisks.ListLocalDisks
+ Amazonka.StorageGateway.ListLocalDisks: instance GHC.Classes.Eq Amazonka.StorageGateway.ListLocalDisks.ListLocalDisksResponse
+ Amazonka.StorageGateway.ListLocalDisks: instance GHC.Generics.Generic Amazonka.StorageGateway.ListLocalDisks.ListLocalDisks
+ Amazonka.StorageGateway.ListLocalDisks: instance GHC.Generics.Generic Amazonka.StorageGateway.ListLocalDisks.ListLocalDisksResponse
+ Amazonka.StorageGateway.ListLocalDisks: instance GHC.Read.Read Amazonka.StorageGateway.ListLocalDisks.ListLocalDisks
+ Amazonka.StorageGateway.ListLocalDisks: instance GHC.Read.Read Amazonka.StorageGateway.ListLocalDisks.ListLocalDisksResponse
+ Amazonka.StorageGateway.ListLocalDisks: instance GHC.Show.Show Amazonka.StorageGateway.ListLocalDisks.ListLocalDisks
+ Amazonka.StorageGateway.ListLocalDisks: instance GHC.Show.Show Amazonka.StorageGateway.ListLocalDisks.ListLocalDisksResponse
+ Amazonka.StorageGateway.ListLocalDisks: listLocalDisksResponse_disks :: Lens' ListLocalDisksResponse (Maybe [Disk])
+ Amazonka.StorageGateway.ListLocalDisks: listLocalDisksResponse_gatewayARN :: Lens' ListLocalDisksResponse (Maybe Text)
+ Amazonka.StorageGateway.ListLocalDisks: listLocalDisksResponse_httpStatus :: Lens' ListLocalDisksResponse Int
+ Amazonka.StorageGateway.ListLocalDisks: listLocalDisks_gatewayARN :: Lens' ListLocalDisks Text
+ Amazonka.StorageGateway.ListLocalDisks: newListLocalDisks :: Text -> ListLocalDisks
+ Amazonka.StorageGateway.ListLocalDisks: newListLocalDisksResponse :: Int -> ListLocalDisksResponse
+ Amazonka.StorageGateway.ListTagsForResource: ListTagsForResource' :: Maybe Natural -> Maybe Text -> Text -> ListTagsForResource
+ Amazonka.StorageGateway.ListTagsForResource: ListTagsForResourceResponse' :: Maybe Text -> Maybe Text -> Maybe [Tag] -> Int -> ListTagsForResourceResponse
+ Amazonka.StorageGateway.ListTagsForResource: [$sel:httpStatus:ListTagsForResourceResponse'] :: ListTagsForResourceResponse -> Int
+ Amazonka.StorageGateway.ListTagsForResource: [$sel:limit:ListTagsForResource'] :: ListTagsForResource -> Maybe Natural
+ Amazonka.StorageGateway.ListTagsForResource: [$sel:marker:ListTagsForResource'] :: ListTagsForResource -> Maybe Text
+ Amazonka.StorageGateway.ListTagsForResource: [$sel:marker:ListTagsForResourceResponse'] :: ListTagsForResourceResponse -> Maybe Text
+ Amazonka.StorageGateway.ListTagsForResource: [$sel:resourceARN:ListTagsForResource'] :: ListTagsForResource -> Text
+ Amazonka.StorageGateway.ListTagsForResource: [$sel:resourceARN:ListTagsForResourceResponse'] :: ListTagsForResourceResponse -> Maybe Text
+ Amazonka.StorageGateway.ListTagsForResource: [$sel:tags:ListTagsForResourceResponse'] :: ListTagsForResourceResponse -> Maybe [Tag]
+ Amazonka.StorageGateway.ListTagsForResource: data ListTagsForResource
+ Amazonka.StorageGateway.ListTagsForResource: data ListTagsForResourceResponse
+ Amazonka.StorageGateway.ListTagsForResource: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.ListTagsForResource.ListTagsForResource
+ Amazonka.StorageGateway.ListTagsForResource: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.ListTagsForResource.ListTagsForResource
+ Amazonka.StorageGateway.ListTagsForResource: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.ListTagsForResource.ListTagsForResource
+ Amazonka.StorageGateway.ListTagsForResource: instance Amazonka.Pager.AWSPager Amazonka.StorageGateway.ListTagsForResource.ListTagsForResource
+ Amazonka.StorageGateway.ListTagsForResource: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.ListTagsForResource.ListTagsForResource
+ Amazonka.StorageGateway.ListTagsForResource: instance Control.DeepSeq.NFData Amazonka.StorageGateway.ListTagsForResource.ListTagsForResource
+ Amazonka.StorageGateway.ListTagsForResource: instance Control.DeepSeq.NFData Amazonka.StorageGateway.ListTagsForResource.ListTagsForResourceResponse
+ Amazonka.StorageGateway.ListTagsForResource: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.ListTagsForResource.ListTagsForResource
+ Amazonka.StorageGateway.ListTagsForResource: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.ListTagsForResource.ListTagsForResource
+ Amazonka.StorageGateway.ListTagsForResource: instance GHC.Classes.Eq Amazonka.StorageGateway.ListTagsForResource.ListTagsForResource
+ Amazonka.StorageGateway.ListTagsForResource: instance GHC.Classes.Eq Amazonka.StorageGateway.ListTagsForResource.ListTagsForResourceResponse
+ Amazonka.StorageGateway.ListTagsForResource: instance GHC.Generics.Generic Amazonka.StorageGateway.ListTagsForResource.ListTagsForResource
+ Amazonka.StorageGateway.ListTagsForResource: instance GHC.Generics.Generic Amazonka.StorageGateway.ListTagsForResource.ListTagsForResourceResponse
+ Amazonka.StorageGateway.ListTagsForResource: instance GHC.Read.Read Amazonka.StorageGateway.ListTagsForResource.ListTagsForResource
+ Amazonka.StorageGateway.ListTagsForResource: instance GHC.Read.Read Amazonka.StorageGateway.ListTagsForResource.ListTagsForResourceResponse
+ Amazonka.StorageGateway.ListTagsForResource: instance GHC.Show.Show Amazonka.StorageGateway.ListTagsForResource.ListTagsForResource
+ Amazonka.StorageGateway.ListTagsForResource: instance GHC.Show.Show Amazonka.StorageGateway.ListTagsForResource.ListTagsForResourceResponse
+ Amazonka.StorageGateway.ListTagsForResource: listTagsForResourceResponse_httpStatus :: Lens' ListTagsForResourceResponse Int
+ Amazonka.StorageGateway.ListTagsForResource: listTagsForResourceResponse_marker :: Lens' ListTagsForResourceResponse (Maybe Text)
+ Amazonka.StorageGateway.ListTagsForResource: listTagsForResourceResponse_resourceARN :: Lens' ListTagsForResourceResponse (Maybe Text)
+ Amazonka.StorageGateway.ListTagsForResource: listTagsForResourceResponse_tags :: Lens' ListTagsForResourceResponse (Maybe [Tag])
+ Amazonka.StorageGateway.ListTagsForResource: listTagsForResource_limit :: Lens' ListTagsForResource (Maybe Natural)
+ Amazonka.StorageGateway.ListTagsForResource: listTagsForResource_marker :: Lens' ListTagsForResource (Maybe Text)
+ Amazonka.StorageGateway.ListTagsForResource: listTagsForResource_resourceARN :: Lens' ListTagsForResource Text
+ Amazonka.StorageGateway.ListTagsForResource: newListTagsForResource :: Text -> ListTagsForResource
+ Amazonka.StorageGateway.ListTagsForResource: newListTagsForResourceResponse :: Int -> ListTagsForResourceResponse
+ Amazonka.StorageGateway.ListTapePools: ListTapePools' :: Maybe Natural -> Maybe Text -> Maybe [Text] -> ListTapePools
+ Amazonka.StorageGateway.ListTapePools: ListTapePoolsResponse' :: Maybe Text -> Maybe [PoolInfo] -> Int -> ListTapePoolsResponse
+ Amazonka.StorageGateway.ListTapePools: [$sel:httpStatus:ListTapePoolsResponse'] :: ListTapePoolsResponse -> Int
+ Amazonka.StorageGateway.ListTapePools: [$sel:limit:ListTapePools'] :: ListTapePools -> Maybe Natural
+ Amazonka.StorageGateway.ListTapePools: [$sel:marker:ListTapePools'] :: ListTapePools -> Maybe Text
+ Amazonka.StorageGateway.ListTapePools: [$sel:marker:ListTapePoolsResponse'] :: ListTapePoolsResponse -> Maybe Text
+ Amazonka.StorageGateway.ListTapePools: [$sel:poolARNs:ListTapePools'] :: ListTapePools -> Maybe [Text]
+ Amazonka.StorageGateway.ListTapePools: [$sel:poolInfos:ListTapePoolsResponse'] :: ListTapePoolsResponse -> Maybe [PoolInfo]
+ Amazonka.StorageGateway.ListTapePools: data ListTapePools
+ Amazonka.StorageGateway.ListTapePools: data ListTapePoolsResponse
+ Amazonka.StorageGateway.ListTapePools: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.ListTapePools.ListTapePools
+ Amazonka.StorageGateway.ListTapePools: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.ListTapePools.ListTapePools
+ Amazonka.StorageGateway.ListTapePools: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.ListTapePools.ListTapePools
+ Amazonka.StorageGateway.ListTapePools: instance Amazonka.Pager.AWSPager Amazonka.StorageGateway.ListTapePools.ListTapePools
+ Amazonka.StorageGateway.ListTapePools: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.ListTapePools.ListTapePools
+ Amazonka.StorageGateway.ListTapePools: instance Control.DeepSeq.NFData Amazonka.StorageGateway.ListTapePools.ListTapePools
+ Amazonka.StorageGateway.ListTapePools: instance Control.DeepSeq.NFData Amazonka.StorageGateway.ListTapePools.ListTapePoolsResponse
+ Amazonka.StorageGateway.ListTapePools: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.ListTapePools.ListTapePools
+ Amazonka.StorageGateway.ListTapePools: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.ListTapePools.ListTapePools
+ Amazonka.StorageGateway.ListTapePools: instance GHC.Classes.Eq Amazonka.StorageGateway.ListTapePools.ListTapePools
+ Amazonka.StorageGateway.ListTapePools: instance GHC.Classes.Eq Amazonka.StorageGateway.ListTapePools.ListTapePoolsResponse
+ Amazonka.StorageGateway.ListTapePools: instance GHC.Generics.Generic Amazonka.StorageGateway.ListTapePools.ListTapePools
+ Amazonka.StorageGateway.ListTapePools: instance GHC.Generics.Generic Amazonka.StorageGateway.ListTapePools.ListTapePoolsResponse
+ Amazonka.StorageGateway.ListTapePools: instance GHC.Read.Read Amazonka.StorageGateway.ListTapePools.ListTapePools
+ Amazonka.StorageGateway.ListTapePools: instance GHC.Read.Read Amazonka.StorageGateway.ListTapePools.ListTapePoolsResponse
+ Amazonka.StorageGateway.ListTapePools: instance GHC.Show.Show Amazonka.StorageGateway.ListTapePools.ListTapePools
+ Amazonka.StorageGateway.ListTapePools: instance GHC.Show.Show Amazonka.StorageGateway.ListTapePools.ListTapePoolsResponse
+ Amazonka.StorageGateway.ListTapePools: listTapePoolsResponse_httpStatus :: Lens' ListTapePoolsResponse Int
+ Amazonka.StorageGateway.ListTapePools: listTapePoolsResponse_marker :: Lens' ListTapePoolsResponse (Maybe Text)
+ Amazonka.StorageGateway.ListTapePools: listTapePoolsResponse_poolInfos :: Lens' ListTapePoolsResponse (Maybe [PoolInfo])
+ Amazonka.StorageGateway.ListTapePools: listTapePools_limit :: Lens' ListTapePools (Maybe Natural)
+ Amazonka.StorageGateway.ListTapePools: listTapePools_marker :: Lens' ListTapePools (Maybe Text)
+ Amazonka.StorageGateway.ListTapePools: listTapePools_poolARNs :: Lens' ListTapePools (Maybe [Text])
+ Amazonka.StorageGateway.ListTapePools: newListTapePools :: ListTapePools
+ Amazonka.StorageGateway.ListTapePools: newListTapePoolsResponse :: Int -> ListTapePoolsResponse
+ Amazonka.StorageGateway.ListTapes: ListTapes' :: Maybe Natural -> Maybe Text -> Maybe [Text] -> ListTapes
+ Amazonka.StorageGateway.ListTapes: ListTapesResponse' :: Maybe Text -> Maybe [TapeInfo] -> Int -> ListTapesResponse
+ Amazonka.StorageGateway.ListTapes: [$sel:httpStatus:ListTapesResponse'] :: ListTapesResponse -> Int
+ Amazonka.StorageGateway.ListTapes: [$sel:limit:ListTapes'] :: ListTapes -> Maybe Natural
+ Amazonka.StorageGateway.ListTapes: [$sel:marker:ListTapes'] :: ListTapes -> Maybe Text
+ Amazonka.StorageGateway.ListTapes: [$sel:marker:ListTapesResponse'] :: ListTapesResponse -> Maybe Text
+ Amazonka.StorageGateway.ListTapes: [$sel:tapeARNs:ListTapes'] :: ListTapes -> Maybe [Text]
+ Amazonka.StorageGateway.ListTapes: [$sel:tapeInfos:ListTapesResponse'] :: ListTapesResponse -> Maybe [TapeInfo]
+ Amazonka.StorageGateway.ListTapes: data ListTapes
+ Amazonka.StorageGateway.ListTapes: data ListTapesResponse
+ Amazonka.StorageGateway.ListTapes: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.ListTapes.ListTapes
+ Amazonka.StorageGateway.ListTapes: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.ListTapes.ListTapes
+ Amazonka.StorageGateway.ListTapes: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.ListTapes.ListTapes
+ Amazonka.StorageGateway.ListTapes: instance Amazonka.Pager.AWSPager Amazonka.StorageGateway.ListTapes.ListTapes
+ Amazonka.StorageGateway.ListTapes: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.ListTapes.ListTapes
+ Amazonka.StorageGateway.ListTapes: instance Control.DeepSeq.NFData Amazonka.StorageGateway.ListTapes.ListTapes
+ Amazonka.StorageGateway.ListTapes: instance Control.DeepSeq.NFData Amazonka.StorageGateway.ListTapes.ListTapesResponse
+ Amazonka.StorageGateway.ListTapes: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.ListTapes.ListTapes
+ Amazonka.StorageGateway.ListTapes: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.ListTapes.ListTapes
+ Amazonka.StorageGateway.ListTapes: instance GHC.Classes.Eq Amazonka.StorageGateway.ListTapes.ListTapes
+ Amazonka.StorageGateway.ListTapes: instance GHC.Classes.Eq Amazonka.StorageGateway.ListTapes.ListTapesResponse
+ Amazonka.StorageGateway.ListTapes: instance GHC.Generics.Generic Amazonka.StorageGateway.ListTapes.ListTapes
+ Amazonka.StorageGateway.ListTapes: instance GHC.Generics.Generic Amazonka.StorageGateway.ListTapes.ListTapesResponse
+ Amazonka.StorageGateway.ListTapes: instance GHC.Read.Read Amazonka.StorageGateway.ListTapes.ListTapes
+ Amazonka.StorageGateway.ListTapes: instance GHC.Read.Read Amazonka.StorageGateway.ListTapes.ListTapesResponse
+ Amazonka.StorageGateway.ListTapes: instance GHC.Show.Show Amazonka.StorageGateway.ListTapes.ListTapes
+ Amazonka.StorageGateway.ListTapes: instance GHC.Show.Show Amazonka.StorageGateway.ListTapes.ListTapesResponse
+ Amazonka.StorageGateway.ListTapes: listTapesResponse_httpStatus :: Lens' ListTapesResponse Int
+ Amazonka.StorageGateway.ListTapes: listTapesResponse_marker :: Lens' ListTapesResponse (Maybe Text)
+ Amazonka.StorageGateway.ListTapes: listTapesResponse_tapeInfos :: Lens' ListTapesResponse (Maybe [TapeInfo])
+ Amazonka.StorageGateway.ListTapes: listTapes_limit :: Lens' ListTapes (Maybe Natural)
+ Amazonka.StorageGateway.ListTapes: listTapes_marker :: Lens' ListTapes (Maybe Text)
+ Amazonka.StorageGateway.ListTapes: listTapes_tapeARNs :: Lens' ListTapes (Maybe [Text])
+ Amazonka.StorageGateway.ListTapes: newListTapes :: ListTapes
+ Amazonka.StorageGateway.ListTapes: newListTapesResponse :: Int -> ListTapesResponse
+ Amazonka.StorageGateway.ListVolumeInitiators: ListVolumeInitiators' :: Text -> ListVolumeInitiators
+ Amazonka.StorageGateway.ListVolumeInitiators: ListVolumeInitiatorsResponse' :: Maybe [Text] -> Int -> ListVolumeInitiatorsResponse
+ Amazonka.StorageGateway.ListVolumeInitiators: [$sel:httpStatus:ListVolumeInitiatorsResponse'] :: ListVolumeInitiatorsResponse -> Int
+ Amazonka.StorageGateway.ListVolumeInitiators: [$sel:initiators:ListVolumeInitiatorsResponse'] :: ListVolumeInitiatorsResponse -> Maybe [Text]
+ Amazonka.StorageGateway.ListVolumeInitiators: [$sel:volumeARN:ListVolumeInitiators'] :: ListVolumeInitiators -> Text
+ Amazonka.StorageGateway.ListVolumeInitiators: data ListVolumeInitiators
+ Amazonka.StorageGateway.ListVolumeInitiators: data ListVolumeInitiatorsResponse
+ Amazonka.StorageGateway.ListVolumeInitiators: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.ListVolumeInitiators.ListVolumeInitiators
+ Amazonka.StorageGateway.ListVolumeInitiators: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.ListVolumeInitiators.ListVolumeInitiators
+ Amazonka.StorageGateway.ListVolumeInitiators: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.ListVolumeInitiators.ListVolumeInitiators
+ Amazonka.StorageGateway.ListVolumeInitiators: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.ListVolumeInitiators.ListVolumeInitiators
+ Amazonka.StorageGateway.ListVolumeInitiators: instance Control.DeepSeq.NFData Amazonka.StorageGateway.ListVolumeInitiators.ListVolumeInitiators
+ Amazonka.StorageGateway.ListVolumeInitiators: instance Control.DeepSeq.NFData Amazonka.StorageGateway.ListVolumeInitiators.ListVolumeInitiatorsResponse
+ Amazonka.StorageGateway.ListVolumeInitiators: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.ListVolumeInitiators.ListVolumeInitiators
+ Amazonka.StorageGateway.ListVolumeInitiators: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.ListVolumeInitiators.ListVolumeInitiators
+ Amazonka.StorageGateway.ListVolumeInitiators: instance GHC.Classes.Eq Amazonka.StorageGateway.ListVolumeInitiators.ListVolumeInitiators
+ Amazonka.StorageGateway.ListVolumeInitiators: instance GHC.Classes.Eq Amazonka.StorageGateway.ListVolumeInitiators.ListVolumeInitiatorsResponse
+ Amazonka.StorageGateway.ListVolumeInitiators: instance GHC.Generics.Generic Amazonka.StorageGateway.ListVolumeInitiators.ListVolumeInitiators
+ Amazonka.StorageGateway.ListVolumeInitiators: instance GHC.Generics.Generic Amazonka.StorageGateway.ListVolumeInitiators.ListVolumeInitiatorsResponse
+ Amazonka.StorageGateway.ListVolumeInitiators: instance GHC.Read.Read Amazonka.StorageGateway.ListVolumeInitiators.ListVolumeInitiators
+ Amazonka.StorageGateway.ListVolumeInitiators: instance GHC.Read.Read Amazonka.StorageGateway.ListVolumeInitiators.ListVolumeInitiatorsResponse
+ Amazonka.StorageGateway.ListVolumeInitiators: instance GHC.Show.Show Amazonka.StorageGateway.ListVolumeInitiators.ListVolumeInitiators
+ Amazonka.StorageGateway.ListVolumeInitiators: instance GHC.Show.Show Amazonka.StorageGateway.ListVolumeInitiators.ListVolumeInitiatorsResponse
+ Amazonka.StorageGateway.ListVolumeInitiators: listVolumeInitiatorsResponse_httpStatus :: Lens' ListVolumeInitiatorsResponse Int
+ Amazonka.StorageGateway.ListVolumeInitiators: listVolumeInitiatorsResponse_initiators :: Lens' ListVolumeInitiatorsResponse (Maybe [Text])
+ Amazonka.StorageGateway.ListVolumeInitiators: listVolumeInitiators_volumeARN :: Lens' ListVolumeInitiators Text
+ Amazonka.StorageGateway.ListVolumeInitiators: newListVolumeInitiators :: Text -> ListVolumeInitiators
+ Amazonka.StorageGateway.ListVolumeInitiators: newListVolumeInitiatorsResponse :: Int -> ListVolumeInitiatorsResponse
+ Amazonka.StorageGateway.ListVolumeRecoveryPoints: ListVolumeRecoveryPoints' :: Text -> ListVolumeRecoveryPoints
+ Amazonka.StorageGateway.ListVolumeRecoveryPoints: ListVolumeRecoveryPointsResponse' :: Maybe Text -> Maybe [VolumeRecoveryPointInfo] -> Int -> ListVolumeRecoveryPointsResponse
+ Amazonka.StorageGateway.ListVolumeRecoveryPoints: [$sel:gatewayARN:ListVolumeRecoveryPoints'] :: ListVolumeRecoveryPoints -> Text
+ Amazonka.StorageGateway.ListVolumeRecoveryPoints: [$sel:gatewayARN:ListVolumeRecoveryPointsResponse'] :: ListVolumeRecoveryPointsResponse -> Maybe Text
+ Amazonka.StorageGateway.ListVolumeRecoveryPoints: [$sel:httpStatus:ListVolumeRecoveryPointsResponse'] :: ListVolumeRecoveryPointsResponse -> Int
+ Amazonka.StorageGateway.ListVolumeRecoveryPoints: [$sel:volumeRecoveryPointInfos:ListVolumeRecoveryPointsResponse'] :: ListVolumeRecoveryPointsResponse -> Maybe [VolumeRecoveryPointInfo]
+ Amazonka.StorageGateway.ListVolumeRecoveryPoints: data ListVolumeRecoveryPoints
+ Amazonka.StorageGateway.ListVolumeRecoveryPoints: data ListVolumeRecoveryPointsResponse
+ Amazonka.StorageGateway.ListVolumeRecoveryPoints: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.ListVolumeRecoveryPoints.ListVolumeRecoveryPoints
+ Amazonka.StorageGateway.ListVolumeRecoveryPoints: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.ListVolumeRecoveryPoints.ListVolumeRecoveryPoints
+ Amazonka.StorageGateway.ListVolumeRecoveryPoints: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.ListVolumeRecoveryPoints.ListVolumeRecoveryPoints
+ Amazonka.StorageGateway.ListVolumeRecoveryPoints: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.ListVolumeRecoveryPoints.ListVolumeRecoveryPoints
+ Amazonka.StorageGateway.ListVolumeRecoveryPoints: instance Control.DeepSeq.NFData Amazonka.StorageGateway.ListVolumeRecoveryPoints.ListVolumeRecoveryPoints
+ Amazonka.StorageGateway.ListVolumeRecoveryPoints: instance Control.DeepSeq.NFData Amazonka.StorageGateway.ListVolumeRecoveryPoints.ListVolumeRecoveryPointsResponse
+ Amazonka.StorageGateway.ListVolumeRecoveryPoints: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.ListVolumeRecoveryPoints.ListVolumeRecoveryPoints
+ Amazonka.StorageGateway.ListVolumeRecoveryPoints: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.ListVolumeRecoveryPoints.ListVolumeRecoveryPoints
+ Amazonka.StorageGateway.ListVolumeRecoveryPoints: instance GHC.Classes.Eq Amazonka.StorageGateway.ListVolumeRecoveryPoints.ListVolumeRecoveryPoints
+ Amazonka.StorageGateway.ListVolumeRecoveryPoints: instance GHC.Classes.Eq Amazonka.StorageGateway.ListVolumeRecoveryPoints.ListVolumeRecoveryPointsResponse
+ Amazonka.StorageGateway.ListVolumeRecoveryPoints: instance GHC.Generics.Generic Amazonka.StorageGateway.ListVolumeRecoveryPoints.ListVolumeRecoveryPoints
+ Amazonka.StorageGateway.ListVolumeRecoveryPoints: instance GHC.Generics.Generic Amazonka.StorageGateway.ListVolumeRecoveryPoints.ListVolumeRecoveryPointsResponse
+ Amazonka.StorageGateway.ListVolumeRecoveryPoints: instance GHC.Read.Read Amazonka.StorageGateway.ListVolumeRecoveryPoints.ListVolumeRecoveryPoints
+ Amazonka.StorageGateway.ListVolumeRecoveryPoints: instance GHC.Read.Read Amazonka.StorageGateway.ListVolumeRecoveryPoints.ListVolumeRecoveryPointsResponse
+ Amazonka.StorageGateway.ListVolumeRecoveryPoints: instance GHC.Show.Show Amazonka.StorageGateway.ListVolumeRecoveryPoints.ListVolumeRecoveryPoints
+ Amazonka.StorageGateway.ListVolumeRecoveryPoints: instance GHC.Show.Show Amazonka.StorageGateway.ListVolumeRecoveryPoints.ListVolumeRecoveryPointsResponse
+ Amazonka.StorageGateway.ListVolumeRecoveryPoints: listVolumeRecoveryPointsResponse_gatewayARN :: Lens' ListVolumeRecoveryPointsResponse (Maybe Text)
+ Amazonka.StorageGateway.ListVolumeRecoveryPoints: listVolumeRecoveryPointsResponse_httpStatus :: Lens' ListVolumeRecoveryPointsResponse Int
+ Amazonka.StorageGateway.ListVolumeRecoveryPoints: listVolumeRecoveryPointsResponse_volumeRecoveryPointInfos :: Lens' ListVolumeRecoveryPointsResponse (Maybe [VolumeRecoveryPointInfo])
+ Amazonka.StorageGateway.ListVolumeRecoveryPoints: listVolumeRecoveryPoints_gatewayARN :: Lens' ListVolumeRecoveryPoints Text
+ Amazonka.StorageGateway.ListVolumeRecoveryPoints: newListVolumeRecoveryPoints :: Text -> ListVolumeRecoveryPoints
+ Amazonka.StorageGateway.ListVolumeRecoveryPoints: newListVolumeRecoveryPointsResponse :: Int -> ListVolumeRecoveryPointsResponse
+ Amazonka.StorageGateway.ListVolumes: ListVolumes' :: Maybe Text -> Maybe Natural -> Maybe Text -> ListVolumes
+ Amazonka.StorageGateway.ListVolumes: ListVolumesResponse' :: Maybe Text -> Maybe Text -> Maybe [VolumeInfo] -> Int -> ListVolumesResponse
+ Amazonka.StorageGateway.ListVolumes: [$sel:gatewayARN:ListVolumes'] :: ListVolumes -> Maybe Text
+ Amazonka.StorageGateway.ListVolumes: [$sel:gatewayARN:ListVolumesResponse'] :: ListVolumesResponse -> Maybe Text
+ Amazonka.StorageGateway.ListVolumes: [$sel:httpStatus:ListVolumesResponse'] :: ListVolumesResponse -> Int
+ Amazonka.StorageGateway.ListVolumes: [$sel:limit:ListVolumes'] :: ListVolumes -> Maybe Natural
+ Amazonka.StorageGateway.ListVolumes: [$sel:marker:ListVolumes'] :: ListVolumes -> Maybe Text
+ Amazonka.StorageGateway.ListVolumes: [$sel:marker:ListVolumesResponse'] :: ListVolumesResponse -> Maybe Text
+ Amazonka.StorageGateway.ListVolumes: [$sel:volumeInfos:ListVolumesResponse'] :: ListVolumesResponse -> Maybe [VolumeInfo]
+ Amazonka.StorageGateway.ListVolumes: data ListVolumes
+ Amazonka.StorageGateway.ListVolumes: data ListVolumesResponse
+ Amazonka.StorageGateway.ListVolumes: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.ListVolumes.ListVolumes
+ Amazonka.StorageGateway.ListVolumes: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.ListVolumes.ListVolumes
+ Amazonka.StorageGateway.ListVolumes: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.ListVolumes.ListVolumes
+ Amazonka.StorageGateway.ListVolumes: instance Amazonka.Pager.AWSPager Amazonka.StorageGateway.ListVolumes.ListVolumes
+ Amazonka.StorageGateway.ListVolumes: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.ListVolumes.ListVolumes
+ Amazonka.StorageGateway.ListVolumes: instance Control.DeepSeq.NFData Amazonka.StorageGateway.ListVolumes.ListVolumes
+ Amazonka.StorageGateway.ListVolumes: instance Control.DeepSeq.NFData Amazonka.StorageGateway.ListVolumes.ListVolumesResponse
+ Amazonka.StorageGateway.ListVolumes: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.ListVolumes.ListVolumes
+ Amazonka.StorageGateway.ListVolumes: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.ListVolumes.ListVolumes
+ Amazonka.StorageGateway.ListVolumes: instance GHC.Classes.Eq Amazonka.StorageGateway.ListVolumes.ListVolumes
+ Amazonka.StorageGateway.ListVolumes: instance GHC.Classes.Eq Amazonka.StorageGateway.ListVolumes.ListVolumesResponse
+ Amazonka.StorageGateway.ListVolumes: instance GHC.Generics.Generic Amazonka.StorageGateway.ListVolumes.ListVolumes
+ Amazonka.StorageGateway.ListVolumes: instance GHC.Generics.Generic Amazonka.StorageGateway.ListVolumes.ListVolumesResponse
+ Amazonka.StorageGateway.ListVolumes: instance GHC.Read.Read Amazonka.StorageGateway.ListVolumes.ListVolumes
+ Amazonka.StorageGateway.ListVolumes: instance GHC.Read.Read Amazonka.StorageGateway.ListVolumes.ListVolumesResponse
+ Amazonka.StorageGateway.ListVolumes: instance GHC.Show.Show Amazonka.StorageGateway.ListVolumes.ListVolumes
+ Amazonka.StorageGateway.ListVolumes: instance GHC.Show.Show Amazonka.StorageGateway.ListVolumes.ListVolumesResponse
+ Amazonka.StorageGateway.ListVolumes: listVolumesResponse_gatewayARN :: Lens' ListVolumesResponse (Maybe Text)
+ Amazonka.StorageGateway.ListVolumes: listVolumesResponse_httpStatus :: Lens' ListVolumesResponse Int
+ Amazonka.StorageGateway.ListVolumes: listVolumesResponse_marker :: Lens' ListVolumesResponse (Maybe Text)
+ Amazonka.StorageGateway.ListVolumes: listVolumesResponse_volumeInfos :: Lens' ListVolumesResponse (Maybe [VolumeInfo])
+ Amazonka.StorageGateway.ListVolumes: listVolumes_gatewayARN :: Lens' ListVolumes (Maybe Text)
+ Amazonka.StorageGateway.ListVolumes: listVolumes_limit :: Lens' ListVolumes (Maybe Natural)
+ Amazonka.StorageGateway.ListVolumes: listVolumes_marker :: Lens' ListVolumes (Maybe Text)
+ Amazonka.StorageGateway.ListVolumes: newListVolumes :: ListVolumes
+ Amazonka.StorageGateway.ListVolumes: newListVolumesResponse :: Int -> ListVolumesResponse
+ Amazonka.StorageGateway.NotifyWhenUploaded: NotifyWhenUploaded' :: Text -> NotifyWhenUploaded
+ Amazonka.StorageGateway.NotifyWhenUploaded: NotifyWhenUploadedResponse' :: Maybe Text -> Maybe Text -> Int -> NotifyWhenUploadedResponse
+ Amazonka.StorageGateway.NotifyWhenUploaded: [$sel:fileShareARN:NotifyWhenUploaded'] :: NotifyWhenUploaded -> Text
+ Amazonka.StorageGateway.NotifyWhenUploaded: [$sel:fileShareARN:NotifyWhenUploadedResponse'] :: NotifyWhenUploadedResponse -> Maybe Text
+ Amazonka.StorageGateway.NotifyWhenUploaded: [$sel:httpStatus:NotifyWhenUploadedResponse'] :: NotifyWhenUploadedResponse -> Int
+ Amazonka.StorageGateway.NotifyWhenUploaded: [$sel:notificationId:NotifyWhenUploadedResponse'] :: NotifyWhenUploadedResponse -> Maybe Text
+ Amazonka.StorageGateway.NotifyWhenUploaded: data NotifyWhenUploaded
+ Amazonka.StorageGateway.NotifyWhenUploaded: data NotifyWhenUploadedResponse
+ Amazonka.StorageGateway.NotifyWhenUploaded: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.NotifyWhenUploaded.NotifyWhenUploaded
+ Amazonka.StorageGateway.NotifyWhenUploaded: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.NotifyWhenUploaded.NotifyWhenUploaded
+ Amazonka.StorageGateway.NotifyWhenUploaded: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.NotifyWhenUploaded.NotifyWhenUploaded
+ Amazonka.StorageGateway.NotifyWhenUploaded: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.NotifyWhenUploaded.NotifyWhenUploaded
+ Amazonka.StorageGateway.NotifyWhenUploaded: instance Control.DeepSeq.NFData Amazonka.StorageGateway.NotifyWhenUploaded.NotifyWhenUploaded
+ Amazonka.StorageGateway.NotifyWhenUploaded: instance Control.DeepSeq.NFData Amazonka.StorageGateway.NotifyWhenUploaded.NotifyWhenUploadedResponse
+ Amazonka.StorageGateway.NotifyWhenUploaded: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.NotifyWhenUploaded.NotifyWhenUploaded
+ Amazonka.StorageGateway.NotifyWhenUploaded: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.NotifyWhenUploaded.NotifyWhenUploaded
+ Amazonka.StorageGateway.NotifyWhenUploaded: instance GHC.Classes.Eq Amazonka.StorageGateway.NotifyWhenUploaded.NotifyWhenUploaded
+ Amazonka.StorageGateway.NotifyWhenUploaded: instance GHC.Classes.Eq Amazonka.StorageGateway.NotifyWhenUploaded.NotifyWhenUploadedResponse
+ Amazonka.StorageGateway.NotifyWhenUploaded: instance GHC.Generics.Generic Amazonka.StorageGateway.NotifyWhenUploaded.NotifyWhenUploaded
+ Amazonka.StorageGateway.NotifyWhenUploaded: instance GHC.Generics.Generic Amazonka.StorageGateway.NotifyWhenUploaded.NotifyWhenUploadedResponse
+ Amazonka.StorageGateway.NotifyWhenUploaded: instance GHC.Read.Read Amazonka.StorageGateway.NotifyWhenUploaded.NotifyWhenUploaded
+ Amazonka.StorageGateway.NotifyWhenUploaded: instance GHC.Read.Read Amazonka.StorageGateway.NotifyWhenUploaded.NotifyWhenUploadedResponse
+ Amazonka.StorageGateway.NotifyWhenUploaded: instance GHC.Show.Show Amazonka.StorageGateway.NotifyWhenUploaded.NotifyWhenUploaded
+ Amazonka.StorageGateway.NotifyWhenUploaded: instance GHC.Show.Show Amazonka.StorageGateway.NotifyWhenUploaded.NotifyWhenUploadedResponse
+ Amazonka.StorageGateway.NotifyWhenUploaded: newNotifyWhenUploaded :: Text -> NotifyWhenUploaded
+ Amazonka.StorageGateway.NotifyWhenUploaded: newNotifyWhenUploadedResponse :: Int -> NotifyWhenUploadedResponse
+ Amazonka.StorageGateway.NotifyWhenUploaded: notifyWhenUploadedResponse_fileShareARN :: Lens' NotifyWhenUploadedResponse (Maybe Text)
+ Amazonka.StorageGateway.NotifyWhenUploaded: notifyWhenUploadedResponse_httpStatus :: Lens' NotifyWhenUploadedResponse Int
+ Amazonka.StorageGateway.NotifyWhenUploaded: notifyWhenUploadedResponse_notificationId :: Lens' NotifyWhenUploadedResponse (Maybe Text)
+ Amazonka.StorageGateway.NotifyWhenUploaded: notifyWhenUploaded_fileShareARN :: Lens' NotifyWhenUploaded Text
+ Amazonka.StorageGateway.RefreshCache: RefreshCache' :: Maybe (NonEmpty Text) -> Maybe Bool -> Text -> RefreshCache
+ Amazonka.StorageGateway.RefreshCache: RefreshCacheResponse' :: Maybe Text -> Maybe Text -> Int -> RefreshCacheResponse
+ Amazonka.StorageGateway.RefreshCache: [$sel:fileShareARN:RefreshCache'] :: RefreshCache -> Text
+ Amazonka.StorageGateway.RefreshCache: [$sel:fileShareARN:RefreshCacheResponse'] :: RefreshCacheResponse -> Maybe Text
+ Amazonka.StorageGateway.RefreshCache: [$sel:folderList:RefreshCache'] :: RefreshCache -> Maybe (NonEmpty Text)
+ Amazonka.StorageGateway.RefreshCache: [$sel:httpStatus:RefreshCacheResponse'] :: RefreshCacheResponse -> Int
+ Amazonka.StorageGateway.RefreshCache: [$sel:notificationId:RefreshCacheResponse'] :: RefreshCacheResponse -> Maybe Text
+ Amazonka.StorageGateway.RefreshCache: [$sel:recursive:RefreshCache'] :: RefreshCache -> Maybe Bool
+ Amazonka.StorageGateway.RefreshCache: data RefreshCache
+ Amazonka.StorageGateway.RefreshCache: data RefreshCacheResponse
+ Amazonka.StorageGateway.RefreshCache: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.RefreshCache.RefreshCache
+ Amazonka.StorageGateway.RefreshCache: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.RefreshCache.RefreshCache
+ Amazonka.StorageGateway.RefreshCache: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.RefreshCache.RefreshCache
+ Amazonka.StorageGateway.RefreshCache: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.RefreshCache.RefreshCache
+ Amazonka.StorageGateway.RefreshCache: instance Control.DeepSeq.NFData Amazonka.StorageGateway.RefreshCache.RefreshCache
+ Amazonka.StorageGateway.RefreshCache: instance Control.DeepSeq.NFData Amazonka.StorageGateway.RefreshCache.RefreshCacheResponse
+ Amazonka.StorageGateway.RefreshCache: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.RefreshCache.RefreshCache
+ Amazonka.StorageGateway.RefreshCache: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.RefreshCache.RefreshCache
+ Amazonka.StorageGateway.RefreshCache: instance GHC.Classes.Eq Amazonka.StorageGateway.RefreshCache.RefreshCache
+ Amazonka.StorageGateway.RefreshCache: instance GHC.Classes.Eq Amazonka.StorageGateway.RefreshCache.RefreshCacheResponse
+ Amazonka.StorageGateway.RefreshCache: instance GHC.Generics.Generic Amazonka.StorageGateway.RefreshCache.RefreshCache
+ Amazonka.StorageGateway.RefreshCache: instance GHC.Generics.Generic Amazonka.StorageGateway.RefreshCache.RefreshCacheResponse
+ Amazonka.StorageGateway.RefreshCache: instance GHC.Read.Read Amazonka.StorageGateway.RefreshCache.RefreshCache
+ Amazonka.StorageGateway.RefreshCache: instance GHC.Read.Read Amazonka.StorageGateway.RefreshCache.RefreshCacheResponse
+ Amazonka.StorageGateway.RefreshCache: instance GHC.Show.Show Amazonka.StorageGateway.RefreshCache.RefreshCache
+ Amazonka.StorageGateway.RefreshCache: instance GHC.Show.Show Amazonka.StorageGateway.RefreshCache.RefreshCacheResponse
+ Amazonka.StorageGateway.RefreshCache: newRefreshCache :: Text -> RefreshCache
+ Amazonka.StorageGateway.RefreshCache: newRefreshCacheResponse :: Int -> RefreshCacheResponse
+ Amazonka.StorageGateway.RefreshCache: refreshCacheResponse_fileShareARN :: Lens' RefreshCacheResponse (Maybe Text)
+ Amazonka.StorageGateway.RefreshCache: refreshCacheResponse_httpStatus :: Lens' RefreshCacheResponse Int
+ Amazonka.StorageGateway.RefreshCache: refreshCacheResponse_notificationId :: Lens' RefreshCacheResponse (Maybe Text)
+ Amazonka.StorageGateway.RefreshCache: refreshCache_fileShareARN :: Lens' RefreshCache Text
+ Amazonka.StorageGateway.RefreshCache: refreshCache_folderList :: Lens' RefreshCache (Maybe (NonEmpty Text))
+ Amazonka.StorageGateway.RefreshCache: refreshCache_recursive :: Lens' RefreshCache (Maybe Bool)
+ Amazonka.StorageGateway.RemoveTagsFromResource: RemoveTagsFromResource' :: Text -> [Text] -> RemoveTagsFromResource
+ Amazonka.StorageGateway.RemoveTagsFromResource: RemoveTagsFromResourceResponse' :: Maybe Text -> Int -> RemoveTagsFromResourceResponse
+ Amazonka.StorageGateway.RemoveTagsFromResource: [$sel:httpStatus:RemoveTagsFromResourceResponse'] :: RemoveTagsFromResourceResponse -> Int
+ Amazonka.StorageGateway.RemoveTagsFromResource: [$sel:resourceARN:RemoveTagsFromResource'] :: RemoveTagsFromResource -> Text
+ Amazonka.StorageGateway.RemoveTagsFromResource: [$sel:resourceARN:RemoveTagsFromResourceResponse'] :: RemoveTagsFromResourceResponse -> Maybe Text
+ Amazonka.StorageGateway.RemoveTagsFromResource: [$sel:tagKeys:RemoveTagsFromResource'] :: RemoveTagsFromResource -> [Text]
+ Amazonka.StorageGateway.RemoveTagsFromResource: data RemoveTagsFromResource
+ Amazonka.StorageGateway.RemoveTagsFromResource: data RemoveTagsFromResourceResponse
+ Amazonka.StorageGateway.RemoveTagsFromResource: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.RemoveTagsFromResource.RemoveTagsFromResource
+ Amazonka.StorageGateway.RemoveTagsFromResource: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.RemoveTagsFromResource.RemoveTagsFromResource
+ Amazonka.StorageGateway.RemoveTagsFromResource: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.RemoveTagsFromResource.RemoveTagsFromResource
+ Amazonka.StorageGateway.RemoveTagsFromResource: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.RemoveTagsFromResource.RemoveTagsFromResource
+ Amazonka.StorageGateway.RemoveTagsFromResource: instance Control.DeepSeq.NFData Amazonka.StorageGateway.RemoveTagsFromResource.RemoveTagsFromResource
+ Amazonka.StorageGateway.RemoveTagsFromResource: instance Control.DeepSeq.NFData Amazonka.StorageGateway.RemoveTagsFromResource.RemoveTagsFromResourceResponse
+ Amazonka.StorageGateway.RemoveTagsFromResource: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.RemoveTagsFromResource.RemoveTagsFromResource
+ Amazonka.StorageGateway.RemoveTagsFromResource: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.RemoveTagsFromResource.RemoveTagsFromResource
+ Amazonka.StorageGateway.RemoveTagsFromResource: instance GHC.Classes.Eq Amazonka.StorageGateway.RemoveTagsFromResource.RemoveTagsFromResource
+ Amazonka.StorageGateway.RemoveTagsFromResource: instance GHC.Classes.Eq Amazonka.StorageGateway.RemoveTagsFromResource.RemoveTagsFromResourceResponse
+ Amazonka.StorageGateway.RemoveTagsFromResource: instance GHC.Generics.Generic Amazonka.StorageGateway.RemoveTagsFromResource.RemoveTagsFromResource
+ Amazonka.StorageGateway.RemoveTagsFromResource: instance GHC.Generics.Generic Amazonka.StorageGateway.RemoveTagsFromResource.RemoveTagsFromResourceResponse
+ Amazonka.StorageGateway.RemoveTagsFromResource: instance GHC.Read.Read Amazonka.StorageGateway.RemoveTagsFromResource.RemoveTagsFromResource
+ Amazonka.StorageGateway.RemoveTagsFromResource: instance GHC.Read.Read Amazonka.StorageGateway.RemoveTagsFromResource.RemoveTagsFromResourceResponse
+ Amazonka.StorageGateway.RemoveTagsFromResource: instance GHC.Show.Show Amazonka.StorageGateway.RemoveTagsFromResource.RemoveTagsFromResource
+ Amazonka.StorageGateway.RemoveTagsFromResource: instance GHC.Show.Show Amazonka.StorageGateway.RemoveTagsFromResource.RemoveTagsFromResourceResponse
+ Amazonka.StorageGateway.RemoveTagsFromResource: newRemoveTagsFromResource :: Text -> RemoveTagsFromResource
+ Amazonka.StorageGateway.RemoveTagsFromResource: newRemoveTagsFromResourceResponse :: Int -> RemoveTagsFromResourceResponse
+ Amazonka.StorageGateway.RemoveTagsFromResource: removeTagsFromResourceResponse_httpStatus :: Lens' RemoveTagsFromResourceResponse Int
+ Amazonka.StorageGateway.RemoveTagsFromResource: removeTagsFromResourceResponse_resourceARN :: Lens' RemoveTagsFromResourceResponse (Maybe Text)
+ Amazonka.StorageGateway.RemoveTagsFromResource: removeTagsFromResource_resourceARN :: Lens' RemoveTagsFromResource Text
+ Amazonka.StorageGateway.RemoveTagsFromResource: removeTagsFromResource_tagKeys :: Lens' RemoveTagsFromResource [Text]
+ Amazonka.StorageGateway.ResetCache: ResetCache' :: Text -> ResetCache
+ Amazonka.StorageGateway.ResetCache: ResetCacheResponse' :: Maybe Text -> Int -> ResetCacheResponse
+ Amazonka.StorageGateway.ResetCache: [$sel:gatewayARN:ResetCache'] :: ResetCache -> Text
+ Amazonka.StorageGateway.ResetCache: [$sel:gatewayARN:ResetCacheResponse'] :: ResetCacheResponse -> Maybe Text
+ Amazonka.StorageGateway.ResetCache: [$sel:httpStatus:ResetCacheResponse'] :: ResetCacheResponse -> Int
+ Amazonka.StorageGateway.ResetCache: data ResetCache
+ Amazonka.StorageGateway.ResetCache: data ResetCacheResponse
+ Amazonka.StorageGateway.ResetCache: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.ResetCache.ResetCache
+ Amazonka.StorageGateway.ResetCache: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.ResetCache.ResetCache
+ Amazonka.StorageGateway.ResetCache: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.ResetCache.ResetCache
+ Amazonka.StorageGateway.ResetCache: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.ResetCache.ResetCache
+ Amazonka.StorageGateway.ResetCache: instance Control.DeepSeq.NFData Amazonka.StorageGateway.ResetCache.ResetCache
+ Amazonka.StorageGateway.ResetCache: instance Control.DeepSeq.NFData Amazonka.StorageGateway.ResetCache.ResetCacheResponse
+ Amazonka.StorageGateway.ResetCache: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.ResetCache.ResetCache
+ Amazonka.StorageGateway.ResetCache: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.ResetCache.ResetCache
+ Amazonka.StorageGateway.ResetCache: instance GHC.Classes.Eq Amazonka.StorageGateway.ResetCache.ResetCache
+ Amazonka.StorageGateway.ResetCache: instance GHC.Classes.Eq Amazonka.StorageGateway.ResetCache.ResetCacheResponse
+ Amazonka.StorageGateway.ResetCache: instance GHC.Generics.Generic Amazonka.StorageGateway.ResetCache.ResetCache
+ Amazonka.StorageGateway.ResetCache: instance GHC.Generics.Generic Amazonka.StorageGateway.ResetCache.ResetCacheResponse
+ Amazonka.StorageGateway.ResetCache: instance GHC.Read.Read Amazonka.StorageGateway.ResetCache.ResetCache
+ Amazonka.StorageGateway.ResetCache: instance GHC.Read.Read Amazonka.StorageGateway.ResetCache.ResetCacheResponse
+ Amazonka.StorageGateway.ResetCache: instance GHC.Show.Show Amazonka.StorageGateway.ResetCache.ResetCache
+ Amazonka.StorageGateway.ResetCache: instance GHC.Show.Show Amazonka.StorageGateway.ResetCache.ResetCacheResponse
+ Amazonka.StorageGateway.ResetCache: newResetCache :: Text -> ResetCache
+ Amazonka.StorageGateway.ResetCache: newResetCacheResponse :: Int -> ResetCacheResponse
+ Amazonka.StorageGateway.ResetCache: resetCacheResponse_gatewayARN :: Lens' ResetCacheResponse (Maybe Text)
+ Amazonka.StorageGateway.ResetCache: resetCacheResponse_httpStatus :: Lens' ResetCacheResponse Int
+ Amazonka.StorageGateway.ResetCache: resetCache_gatewayARN :: Lens' ResetCache Text
+ Amazonka.StorageGateway.RetrieveTapeArchive: RetrieveTapeArchive' :: Text -> Text -> RetrieveTapeArchive
+ Amazonka.StorageGateway.RetrieveTapeArchive: RetrieveTapeArchiveResponse' :: Maybe Text -> Int -> RetrieveTapeArchiveResponse
+ Amazonka.StorageGateway.RetrieveTapeArchive: [$sel:gatewayARN:RetrieveTapeArchive'] :: RetrieveTapeArchive -> Text
+ Amazonka.StorageGateway.RetrieveTapeArchive: [$sel:httpStatus:RetrieveTapeArchiveResponse'] :: RetrieveTapeArchiveResponse -> Int
+ Amazonka.StorageGateway.RetrieveTapeArchive: [$sel:tapeARN:RetrieveTapeArchive'] :: RetrieveTapeArchive -> Text
+ Amazonka.StorageGateway.RetrieveTapeArchive: [$sel:tapeARN:RetrieveTapeArchiveResponse'] :: RetrieveTapeArchiveResponse -> Maybe Text
+ Amazonka.StorageGateway.RetrieveTapeArchive: data RetrieveTapeArchive
+ Amazonka.StorageGateway.RetrieveTapeArchive: data RetrieveTapeArchiveResponse
+ Amazonka.StorageGateway.RetrieveTapeArchive: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.RetrieveTapeArchive.RetrieveTapeArchive
+ Amazonka.StorageGateway.RetrieveTapeArchive: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.RetrieveTapeArchive.RetrieveTapeArchive
+ Amazonka.StorageGateway.RetrieveTapeArchive: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.RetrieveTapeArchive.RetrieveTapeArchive
+ Amazonka.StorageGateway.RetrieveTapeArchive: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.RetrieveTapeArchive.RetrieveTapeArchive
+ Amazonka.StorageGateway.RetrieveTapeArchive: instance Control.DeepSeq.NFData Amazonka.StorageGateway.RetrieveTapeArchive.RetrieveTapeArchive
+ Amazonka.StorageGateway.RetrieveTapeArchive: instance Control.DeepSeq.NFData Amazonka.StorageGateway.RetrieveTapeArchive.RetrieveTapeArchiveResponse
+ Amazonka.StorageGateway.RetrieveTapeArchive: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.RetrieveTapeArchive.RetrieveTapeArchive
+ Amazonka.StorageGateway.RetrieveTapeArchive: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.RetrieveTapeArchive.RetrieveTapeArchive
+ Amazonka.StorageGateway.RetrieveTapeArchive: instance GHC.Classes.Eq Amazonka.StorageGateway.RetrieveTapeArchive.RetrieveTapeArchive
+ Amazonka.StorageGateway.RetrieveTapeArchive: instance GHC.Classes.Eq Amazonka.StorageGateway.RetrieveTapeArchive.RetrieveTapeArchiveResponse
+ Amazonka.StorageGateway.RetrieveTapeArchive: instance GHC.Generics.Generic Amazonka.StorageGateway.RetrieveTapeArchive.RetrieveTapeArchive
+ Amazonka.StorageGateway.RetrieveTapeArchive: instance GHC.Generics.Generic Amazonka.StorageGateway.RetrieveTapeArchive.RetrieveTapeArchiveResponse
+ Amazonka.StorageGateway.RetrieveTapeArchive: instance GHC.Read.Read Amazonka.StorageGateway.RetrieveTapeArchive.RetrieveTapeArchive
+ Amazonka.StorageGateway.RetrieveTapeArchive: instance GHC.Read.Read Amazonka.StorageGateway.RetrieveTapeArchive.RetrieveTapeArchiveResponse
+ Amazonka.StorageGateway.RetrieveTapeArchive: instance GHC.Show.Show Amazonka.StorageGateway.RetrieveTapeArchive.RetrieveTapeArchive
+ Amazonka.StorageGateway.RetrieveTapeArchive: instance GHC.Show.Show Amazonka.StorageGateway.RetrieveTapeArchive.RetrieveTapeArchiveResponse
+ Amazonka.StorageGateway.RetrieveTapeArchive: newRetrieveTapeArchive :: Text -> Text -> RetrieveTapeArchive
+ Amazonka.StorageGateway.RetrieveTapeArchive: newRetrieveTapeArchiveResponse :: Int -> RetrieveTapeArchiveResponse
+ Amazonka.StorageGateway.RetrieveTapeArchive: retrieveTapeArchiveResponse_httpStatus :: Lens' RetrieveTapeArchiveResponse Int
+ Amazonka.StorageGateway.RetrieveTapeArchive: retrieveTapeArchiveResponse_tapeARN :: Lens' RetrieveTapeArchiveResponse (Maybe Text)
+ Amazonka.StorageGateway.RetrieveTapeArchive: retrieveTapeArchive_gatewayARN :: Lens' RetrieveTapeArchive Text
+ Amazonka.StorageGateway.RetrieveTapeArchive: retrieveTapeArchive_tapeARN :: Lens' RetrieveTapeArchive Text
+ Amazonka.StorageGateway.RetrieveTapeRecoveryPoint: RetrieveTapeRecoveryPoint' :: Text -> Text -> RetrieveTapeRecoveryPoint
+ Amazonka.StorageGateway.RetrieveTapeRecoveryPoint: RetrieveTapeRecoveryPointResponse' :: Maybe Text -> Int -> RetrieveTapeRecoveryPointResponse
+ Amazonka.StorageGateway.RetrieveTapeRecoveryPoint: [$sel:gatewayARN:RetrieveTapeRecoveryPoint'] :: RetrieveTapeRecoveryPoint -> Text
+ Amazonka.StorageGateway.RetrieveTapeRecoveryPoint: [$sel:httpStatus:RetrieveTapeRecoveryPointResponse'] :: RetrieveTapeRecoveryPointResponse -> Int
+ Amazonka.StorageGateway.RetrieveTapeRecoveryPoint: [$sel:tapeARN:RetrieveTapeRecoveryPoint'] :: RetrieveTapeRecoveryPoint -> Text
+ Amazonka.StorageGateway.RetrieveTapeRecoveryPoint: [$sel:tapeARN:RetrieveTapeRecoveryPointResponse'] :: RetrieveTapeRecoveryPointResponse -> Maybe Text
+ Amazonka.StorageGateway.RetrieveTapeRecoveryPoint: data RetrieveTapeRecoveryPoint
+ Amazonka.StorageGateway.RetrieveTapeRecoveryPoint: data RetrieveTapeRecoveryPointResponse
+ Amazonka.StorageGateway.RetrieveTapeRecoveryPoint: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.RetrieveTapeRecoveryPoint.RetrieveTapeRecoveryPoint
+ Amazonka.StorageGateway.RetrieveTapeRecoveryPoint: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.RetrieveTapeRecoveryPoint.RetrieveTapeRecoveryPoint
+ Amazonka.StorageGateway.RetrieveTapeRecoveryPoint: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.RetrieveTapeRecoveryPoint.RetrieveTapeRecoveryPoint
+ Amazonka.StorageGateway.RetrieveTapeRecoveryPoint: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.RetrieveTapeRecoveryPoint.RetrieveTapeRecoveryPoint
+ Amazonka.StorageGateway.RetrieveTapeRecoveryPoint: instance Control.DeepSeq.NFData Amazonka.StorageGateway.RetrieveTapeRecoveryPoint.RetrieveTapeRecoveryPoint
+ Amazonka.StorageGateway.RetrieveTapeRecoveryPoint: instance Control.DeepSeq.NFData Amazonka.StorageGateway.RetrieveTapeRecoveryPoint.RetrieveTapeRecoveryPointResponse
+ Amazonka.StorageGateway.RetrieveTapeRecoveryPoint: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.RetrieveTapeRecoveryPoint.RetrieveTapeRecoveryPoint
+ Amazonka.StorageGateway.RetrieveTapeRecoveryPoint: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.RetrieveTapeRecoveryPoint.RetrieveTapeRecoveryPoint
+ Amazonka.StorageGateway.RetrieveTapeRecoveryPoint: instance GHC.Classes.Eq Amazonka.StorageGateway.RetrieveTapeRecoveryPoint.RetrieveTapeRecoveryPoint
+ Amazonka.StorageGateway.RetrieveTapeRecoveryPoint: instance GHC.Classes.Eq Amazonka.StorageGateway.RetrieveTapeRecoveryPoint.RetrieveTapeRecoveryPointResponse
+ Amazonka.StorageGateway.RetrieveTapeRecoveryPoint: instance GHC.Generics.Generic Amazonka.StorageGateway.RetrieveTapeRecoveryPoint.RetrieveTapeRecoveryPoint
+ Amazonka.StorageGateway.RetrieveTapeRecoveryPoint: instance GHC.Generics.Generic Amazonka.StorageGateway.RetrieveTapeRecoveryPoint.RetrieveTapeRecoveryPointResponse
+ Amazonka.StorageGateway.RetrieveTapeRecoveryPoint: instance GHC.Read.Read Amazonka.StorageGateway.RetrieveTapeRecoveryPoint.RetrieveTapeRecoveryPoint
+ Amazonka.StorageGateway.RetrieveTapeRecoveryPoint: instance GHC.Read.Read Amazonka.StorageGateway.RetrieveTapeRecoveryPoint.RetrieveTapeRecoveryPointResponse
+ Amazonka.StorageGateway.RetrieveTapeRecoveryPoint: instance GHC.Show.Show Amazonka.StorageGateway.RetrieveTapeRecoveryPoint.RetrieveTapeRecoveryPoint
+ Amazonka.StorageGateway.RetrieveTapeRecoveryPoint: instance GHC.Show.Show Amazonka.StorageGateway.RetrieveTapeRecoveryPoint.RetrieveTapeRecoveryPointResponse
+ Amazonka.StorageGateway.RetrieveTapeRecoveryPoint: newRetrieveTapeRecoveryPoint :: Text -> Text -> RetrieveTapeRecoveryPoint
+ Amazonka.StorageGateway.RetrieveTapeRecoveryPoint: newRetrieveTapeRecoveryPointResponse :: Int -> RetrieveTapeRecoveryPointResponse
+ Amazonka.StorageGateway.RetrieveTapeRecoveryPoint: retrieveTapeRecoveryPointResponse_httpStatus :: Lens' RetrieveTapeRecoveryPointResponse Int
+ Amazonka.StorageGateway.RetrieveTapeRecoveryPoint: retrieveTapeRecoveryPointResponse_tapeARN :: Lens' RetrieveTapeRecoveryPointResponse (Maybe Text)
+ Amazonka.StorageGateway.RetrieveTapeRecoveryPoint: retrieveTapeRecoveryPoint_gatewayARN :: Lens' RetrieveTapeRecoveryPoint Text
+ Amazonka.StorageGateway.RetrieveTapeRecoveryPoint: retrieveTapeRecoveryPoint_tapeARN :: Lens' RetrieveTapeRecoveryPoint Text
+ Amazonka.StorageGateway.SetLocalConsolePassword: SetLocalConsolePassword' :: Text -> Sensitive Text -> SetLocalConsolePassword
+ Amazonka.StorageGateway.SetLocalConsolePassword: SetLocalConsolePasswordResponse' :: Maybe Text -> Int -> SetLocalConsolePasswordResponse
+ Amazonka.StorageGateway.SetLocalConsolePassword: [$sel:gatewayARN:SetLocalConsolePassword'] :: SetLocalConsolePassword -> Text
+ Amazonka.StorageGateway.SetLocalConsolePassword: [$sel:gatewayARN:SetLocalConsolePasswordResponse'] :: SetLocalConsolePasswordResponse -> Maybe Text
+ Amazonka.StorageGateway.SetLocalConsolePassword: [$sel:httpStatus:SetLocalConsolePasswordResponse'] :: SetLocalConsolePasswordResponse -> Int
+ Amazonka.StorageGateway.SetLocalConsolePassword: [$sel:localConsolePassword:SetLocalConsolePassword'] :: SetLocalConsolePassword -> Sensitive Text
+ Amazonka.StorageGateway.SetLocalConsolePassword: data SetLocalConsolePassword
+ Amazonka.StorageGateway.SetLocalConsolePassword: data SetLocalConsolePasswordResponse
+ Amazonka.StorageGateway.SetLocalConsolePassword: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.SetLocalConsolePassword.SetLocalConsolePassword
+ Amazonka.StorageGateway.SetLocalConsolePassword: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.SetLocalConsolePassword.SetLocalConsolePassword
+ Amazonka.StorageGateway.SetLocalConsolePassword: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.SetLocalConsolePassword.SetLocalConsolePassword
+ Amazonka.StorageGateway.SetLocalConsolePassword: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.SetLocalConsolePassword.SetLocalConsolePassword
+ Amazonka.StorageGateway.SetLocalConsolePassword: instance Control.DeepSeq.NFData Amazonka.StorageGateway.SetLocalConsolePassword.SetLocalConsolePassword
+ Amazonka.StorageGateway.SetLocalConsolePassword: instance Control.DeepSeq.NFData Amazonka.StorageGateway.SetLocalConsolePassword.SetLocalConsolePasswordResponse
+ Amazonka.StorageGateway.SetLocalConsolePassword: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.SetLocalConsolePassword.SetLocalConsolePassword
+ Amazonka.StorageGateway.SetLocalConsolePassword: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.SetLocalConsolePassword.SetLocalConsolePassword
+ Amazonka.StorageGateway.SetLocalConsolePassword: instance GHC.Classes.Eq Amazonka.StorageGateway.SetLocalConsolePassword.SetLocalConsolePassword
+ Amazonka.StorageGateway.SetLocalConsolePassword: instance GHC.Classes.Eq Amazonka.StorageGateway.SetLocalConsolePassword.SetLocalConsolePasswordResponse
+ Amazonka.StorageGateway.SetLocalConsolePassword: instance GHC.Generics.Generic Amazonka.StorageGateway.SetLocalConsolePassword.SetLocalConsolePassword
+ Amazonka.StorageGateway.SetLocalConsolePassword: instance GHC.Generics.Generic Amazonka.StorageGateway.SetLocalConsolePassword.SetLocalConsolePasswordResponse
+ Amazonka.StorageGateway.SetLocalConsolePassword: instance GHC.Read.Read Amazonka.StorageGateway.SetLocalConsolePassword.SetLocalConsolePasswordResponse
+ Amazonka.StorageGateway.SetLocalConsolePassword: instance GHC.Show.Show Amazonka.StorageGateway.SetLocalConsolePassword.SetLocalConsolePassword
+ Amazonka.StorageGateway.SetLocalConsolePassword: instance GHC.Show.Show Amazonka.StorageGateway.SetLocalConsolePassword.SetLocalConsolePasswordResponse
+ Amazonka.StorageGateway.SetLocalConsolePassword: newSetLocalConsolePassword :: Text -> Text -> SetLocalConsolePassword
+ Amazonka.StorageGateway.SetLocalConsolePassword: newSetLocalConsolePasswordResponse :: Int -> SetLocalConsolePasswordResponse
+ Amazonka.StorageGateway.SetLocalConsolePassword: setLocalConsolePasswordResponse_gatewayARN :: Lens' SetLocalConsolePasswordResponse (Maybe Text)
+ Amazonka.StorageGateway.SetLocalConsolePassword: setLocalConsolePasswordResponse_httpStatus :: Lens' SetLocalConsolePasswordResponse Int
+ Amazonka.StorageGateway.SetLocalConsolePassword: setLocalConsolePassword_gatewayARN :: Lens' SetLocalConsolePassword Text
+ Amazonka.StorageGateway.SetLocalConsolePassword: setLocalConsolePassword_localConsolePassword :: Lens' SetLocalConsolePassword Text
+ Amazonka.StorageGateway.SetSMBGuestPassword: SetSMBGuestPassword' :: Text -> Sensitive Text -> SetSMBGuestPassword
+ Amazonka.StorageGateway.SetSMBGuestPassword: SetSMBGuestPasswordResponse' :: Maybe Text -> Int -> SetSMBGuestPasswordResponse
+ Amazonka.StorageGateway.SetSMBGuestPassword: [$sel:gatewayARN:SetSMBGuestPassword'] :: SetSMBGuestPassword -> Text
+ Amazonka.StorageGateway.SetSMBGuestPassword: [$sel:gatewayARN:SetSMBGuestPasswordResponse'] :: SetSMBGuestPasswordResponse -> Maybe Text
+ Amazonka.StorageGateway.SetSMBGuestPassword: [$sel:httpStatus:SetSMBGuestPasswordResponse'] :: SetSMBGuestPasswordResponse -> Int
+ Amazonka.StorageGateway.SetSMBGuestPassword: [$sel:password:SetSMBGuestPassword'] :: SetSMBGuestPassword -> Sensitive Text
+ Amazonka.StorageGateway.SetSMBGuestPassword: data SetSMBGuestPassword
+ Amazonka.StorageGateway.SetSMBGuestPassword: data SetSMBGuestPasswordResponse
+ Amazonka.StorageGateway.SetSMBGuestPassword: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.SetSMBGuestPassword.SetSMBGuestPassword
+ Amazonka.StorageGateway.SetSMBGuestPassword: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.SetSMBGuestPassword.SetSMBGuestPassword
+ Amazonka.StorageGateway.SetSMBGuestPassword: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.SetSMBGuestPassword.SetSMBGuestPassword
+ Amazonka.StorageGateway.SetSMBGuestPassword: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.SetSMBGuestPassword.SetSMBGuestPassword
+ Amazonka.StorageGateway.SetSMBGuestPassword: instance Control.DeepSeq.NFData Amazonka.StorageGateway.SetSMBGuestPassword.SetSMBGuestPassword
+ Amazonka.StorageGateway.SetSMBGuestPassword: instance Control.DeepSeq.NFData Amazonka.StorageGateway.SetSMBGuestPassword.SetSMBGuestPasswordResponse
+ Amazonka.StorageGateway.SetSMBGuestPassword: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.SetSMBGuestPassword.SetSMBGuestPassword
+ Amazonka.StorageGateway.SetSMBGuestPassword: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.SetSMBGuestPassword.SetSMBGuestPassword
+ Amazonka.StorageGateway.SetSMBGuestPassword: instance GHC.Classes.Eq Amazonka.StorageGateway.SetSMBGuestPassword.SetSMBGuestPassword
+ Amazonka.StorageGateway.SetSMBGuestPassword: instance GHC.Classes.Eq Amazonka.StorageGateway.SetSMBGuestPassword.SetSMBGuestPasswordResponse
+ Amazonka.StorageGateway.SetSMBGuestPassword: instance GHC.Generics.Generic Amazonka.StorageGateway.SetSMBGuestPassword.SetSMBGuestPassword
+ Amazonka.StorageGateway.SetSMBGuestPassword: instance GHC.Generics.Generic Amazonka.StorageGateway.SetSMBGuestPassword.SetSMBGuestPasswordResponse
+ Amazonka.StorageGateway.SetSMBGuestPassword: instance GHC.Read.Read Amazonka.StorageGateway.SetSMBGuestPassword.SetSMBGuestPasswordResponse
+ Amazonka.StorageGateway.SetSMBGuestPassword: instance GHC.Show.Show Amazonka.StorageGateway.SetSMBGuestPassword.SetSMBGuestPassword
+ Amazonka.StorageGateway.SetSMBGuestPassword: instance GHC.Show.Show Amazonka.StorageGateway.SetSMBGuestPassword.SetSMBGuestPasswordResponse
+ Amazonka.StorageGateway.SetSMBGuestPassword: newSetSMBGuestPassword :: Text -> Text -> SetSMBGuestPassword
+ Amazonka.StorageGateway.SetSMBGuestPassword: newSetSMBGuestPasswordResponse :: Int -> SetSMBGuestPasswordResponse
+ Amazonka.StorageGateway.SetSMBGuestPassword: setSMBGuestPasswordResponse_gatewayARN :: Lens' SetSMBGuestPasswordResponse (Maybe Text)
+ Amazonka.StorageGateway.SetSMBGuestPassword: setSMBGuestPasswordResponse_httpStatus :: Lens' SetSMBGuestPasswordResponse Int
+ Amazonka.StorageGateway.SetSMBGuestPassword: setSMBGuestPassword_gatewayARN :: Lens' SetSMBGuestPassword Text
+ Amazonka.StorageGateway.SetSMBGuestPassword: setSMBGuestPassword_password :: Lens' SetSMBGuestPassword Text
+ Amazonka.StorageGateway.ShutdownGateway: ShutdownGateway' :: Text -> ShutdownGateway
+ Amazonka.StorageGateway.ShutdownGateway: ShutdownGatewayResponse' :: Maybe Text -> Int -> ShutdownGatewayResponse
+ Amazonka.StorageGateway.ShutdownGateway: [$sel:gatewayARN:ShutdownGateway'] :: ShutdownGateway -> Text
+ Amazonka.StorageGateway.ShutdownGateway: [$sel:gatewayARN:ShutdownGatewayResponse'] :: ShutdownGatewayResponse -> Maybe Text
+ Amazonka.StorageGateway.ShutdownGateway: [$sel:httpStatus:ShutdownGatewayResponse'] :: ShutdownGatewayResponse -> Int
+ Amazonka.StorageGateway.ShutdownGateway: data ShutdownGateway
+ Amazonka.StorageGateway.ShutdownGateway: data ShutdownGatewayResponse
+ Amazonka.StorageGateway.ShutdownGateway: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.ShutdownGateway.ShutdownGateway
+ Amazonka.StorageGateway.ShutdownGateway: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.ShutdownGateway.ShutdownGateway
+ Amazonka.StorageGateway.ShutdownGateway: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.ShutdownGateway.ShutdownGateway
+ Amazonka.StorageGateway.ShutdownGateway: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.ShutdownGateway.ShutdownGateway
+ Amazonka.StorageGateway.ShutdownGateway: instance Control.DeepSeq.NFData Amazonka.StorageGateway.ShutdownGateway.ShutdownGateway
+ Amazonka.StorageGateway.ShutdownGateway: instance Control.DeepSeq.NFData Amazonka.StorageGateway.ShutdownGateway.ShutdownGatewayResponse
+ Amazonka.StorageGateway.ShutdownGateway: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.ShutdownGateway.ShutdownGateway
+ Amazonka.StorageGateway.ShutdownGateway: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.ShutdownGateway.ShutdownGateway
+ Amazonka.StorageGateway.ShutdownGateway: instance GHC.Classes.Eq Amazonka.StorageGateway.ShutdownGateway.ShutdownGateway
+ Amazonka.StorageGateway.ShutdownGateway: instance GHC.Classes.Eq Amazonka.StorageGateway.ShutdownGateway.ShutdownGatewayResponse
+ Amazonka.StorageGateway.ShutdownGateway: instance GHC.Generics.Generic Amazonka.StorageGateway.ShutdownGateway.ShutdownGateway
+ Amazonka.StorageGateway.ShutdownGateway: instance GHC.Generics.Generic Amazonka.StorageGateway.ShutdownGateway.ShutdownGatewayResponse
+ Amazonka.StorageGateway.ShutdownGateway: instance GHC.Read.Read Amazonka.StorageGateway.ShutdownGateway.ShutdownGateway
+ Amazonka.StorageGateway.ShutdownGateway: instance GHC.Read.Read Amazonka.StorageGateway.ShutdownGateway.ShutdownGatewayResponse
+ Amazonka.StorageGateway.ShutdownGateway: instance GHC.Show.Show Amazonka.StorageGateway.ShutdownGateway.ShutdownGateway
+ Amazonka.StorageGateway.ShutdownGateway: instance GHC.Show.Show Amazonka.StorageGateway.ShutdownGateway.ShutdownGatewayResponse
+ Amazonka.StorageGateway.ShutdownGateway: newShutdownGateway :: Text -> ShutdownGateway
+ Amazonka.StorageGateway.ShutdownGateway: newShutdownGatewayResponse :: Int -> ShutdownGatewayResponse
+ Amazonka.StorageGateway.ShutdownGateway: shutdownGatewayResponse_gatewayARN :: Lens' ShutdownGatewayResponse (Maybe Text)
+ Amazonka.StorageGateway.ShutdownGateway: shutdownGatewayResponse_httpStatus :: Lens' ShutdownGatewayResponse Int
+ Amazonka.StorageGateway.ShutdownGateway: shutdownGateway_gatewayARN :: Lens' ShutdownGateway Text
+ Amazonka.StorageGateway.StartAvailabilityMonitorTest: StartAvailabilityMonitorTest' :: Text -> StartAvailabilityMonitorTest
+ Amazonka.StorageGateway.StartAvailabilityMonitorTest: StartAvailabilityMonitorTestResponse' :: Maybe Text -> Int -> StartAvailabilityMonitorTestResponse
+ Amazonka.StorageGateway.StartAvailabilityMonitorTest: [$sel:gatewayARN:StartAvailabilityMonitorTest'] :: StartAvailabilityMonitorTest -> Text
+ Amazonka.StorageGateway.StartAvailabilityMonitorTest: [$sel:gatewayARN:StartAvailabilityMonitorTestResponse'] :: StartAvailabilityMonitorTestResponse -> Maybe Text
+ Amazonka.StorageGateway.StartAvailabilityMonitorTest: [$sel:httpStatus:StartAvailabilityMonitorTestResponse'] :: StartAvailabilityMonitorTestResponse -> Int
+ Amazonka.StorageGateway.StartAvailabilityMonitorTest: data StartAvailabilityMonitorTest
+ Amazonka.StorageGateway.StartAvailabilityMonitorTest: data StartAvailabilityMonitorTestResponse
+ Amazonka.StorageGateway.StartAvailabilityMonitorTest: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.StartAvailabilityMonitorTest.StartAvailabilityMonitorTest
+ Amazonka.StorageGateway.StartAvailabilityMonitorTest: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.StartAvailabilityMonitorTest.StartAvailabilityMonitorTest
+ Amazonka.StorageGateway.StartAvailabilityMonitorTest: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.StartAvailabilityMonitorTest.StartAvailabilityMonitorTest
+ Amazonka.StorageGateway.StartAvailabilityMonitorTest: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.StartAvailabilityMonitorTest.StartAvailabilityMonitorTest
+ Amazonka.StorageGateway.StartAvailabilityMonitorTest: instance Control.DeepSeq.NFData Amazonka.StorageGateway.StartAvailabilityMonitorTest.StartAvailabilityMonitorTest
+ Amazonka.StorageGateway.StartAvailabilityMonitorTest: instance Control.DeepSeq.NFData Amazonka.StorageGateway.StartAvailabilityMonitorTest.StartAvailabilityMonitorTestResponse
+ Amazonka.StorageGateway.StartAvailabilityMonitorTest: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.StartAvailabilityMonitorTest.StartAvailabilityMonitorTest
+ Amazonka.StorageGateway.StartAvailabilityMonitorTest: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.StartAvailabilityMonitorTest.StartAvailabilityMonitorTest
+ Amazonka.StorageGateway.StartAvailabilityMonitorTest: instance GHC.Classes.Eq Amazonka.StorageGateway.StartAvailabilityMonitorTest.StartAvailabilityMonitorTest
+ Amazonka.StorageGateway.StartAvailabilityMonitorTest: instance GHC.Classes.Eq Amazonka.StorageGateway.StartAvailabilityMonitorTest.StartAvailabilityMonitorTestResponse
+ Amazonka.StorageGateway.StartAvailabilityMonitorTest: instance GHC.Generics.Generic Amazonka.StorageGateway.StartAvailabilityMonitorTest.StartAvailabilityMonitorTest
+ Amazonka.StorageGateway.StartAvailabilityMonitorTest: instance GHC.Generics.Generic Amazonka.StorageGateway.StartAvailabilityMonitorTest.StartAvailabilityMonitorTestResponse
+ Amazonka.StorageGateway.StartAvailabilityMonitorTest: instance GHC.Read.Read Amazonka.StorageGateway.StartAvailabilityMonitorTest.StartAvailabilityMonitorTest
+ Amazonka.StorageGateway.StartAvailabilityMonitorTest: instance GHC.Read.Read Amazonka.StorageGateway.StartAvailabilityMonitorTest.StartAvailabilityMonitorTestResponse
+ Amazonka.StorageGateway.StartAvailabilityMonitorTest: instance GHC.Show.Show Amazonka.StorageGateway.StartAvailabilityMonitorTest.StartAvailabilityMonitorTest
+ Amazonka.StorageGateway.StartAvailabilityMonitorTest: instance GHC.Show.Show Amazonka.StorageGateway.StartAvailabilityMonitorTest.StartAvailabilityMonitorTestResponse
+ Amazonka.StorageGateway.StartAvailabilityMonitorTest: newStartAvailabilityMonitorTest :: Text -> StartAvailabilityMonitorTest
+ Amazonka.StorageGateway.StartAvailabilityMonitorTest: newStartAvailabilityMonitorTestResponse :: Int -> StartAvailabilityMonitorTestResponse
+ Amazonka.StorageGateway.StartAvailabilityMonitorTest: startAvailabilityMonitorTestResponse_gatewayARN :: Lens' StartAvailabilityMonitorTestResponse (Maybe Text)
+ Amazonka.StorageGateway.StartAvailabilityMonitorTest: startAvailabilityMonitorTestResponse_httpStatus :: Lens' StartAvailabilityMonitorTestResponse Int
+ Amazonka.StorageGateway.StartAvailabilityMonitorTest: startAvailabilityMonitorTest_gatewayARN :: Lens' StartAvailabilityMonitorTest Text
+ Amazonka.StorageGateway.StartGateway: StartGateway' :: Text -> StartGateway
+ Amazonka.StorageGateway.StartGateway: StartGatewayResponse' :: Maybe Text -> Int -> StartGatewayResponse
+ Amazonka.StorageGateway.StartGateway: [$sel:gatewayARN:StartGateway'] :: StartGateway -> Text
+ Amazonka.StorageGateway.StartGateway: [$sel:gatewayARN:StartGatewayResponse'] :: StartGatewayResponse -> Maybe Text
+ Amazonka.StorageGateway.StartGateway: [$sel:httpStatus:StartGatewayResponse'] :: StartGatewayResponse -> Int
+ Amazonka.StorageGateway.StartGateway: data StartGateway
+ Amazonka.StorageGateway.StartGateway: data StartGatewayResponse
+ Amazonka.StorageGateway.StartGateway: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.StartGateway.StartGateway
+ Amazonka.StorageGateway.StartGateway: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.StartGateway.StartGateway
+ Amazonka.StorageGateway.StartGateway: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.StartGateway.StartGateway
+ Amazonka.StorageGateway.StartGateway: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.StartGateway.StartGateway
+ Amazonka.StorageGateway.StartGateway: instance Control.DeepSeq.NFData Amazonka.StorageGateway.StartGateway.StartGateway
+ Amazonka.StorageGateway.StartGateway: instance Control.DeepSeq.NFData Amazonka.StorageGateway.StartGateway.StartGatewayResponse
+ Amazonka.StorageGateway.StartGateway: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.StartGateway.StartGateway
+ Amazonka.StorageGateway.StartGateway: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.StartGateway.StartGateway
+ Amazonka.StorageGateway.StartGateway: instance GHC.Classes.Eq Amazonka.StorageGateway.StartGateway.StartGateway
+ Amazonka.StorageGateway.StartGateway: instance GHC.Classes.Eq Amazonka.StorageGateway.StartGateway.StartGatewayResponse
+ Amazonka.StorageGateway.StartGateway: instance GHC.Generics.Generic Amazonka.StorageGateway.StartGateway.StartGateway
+ Amazonka.StorageGateway.StartGateway: instance GHC.Generics.Generic Amazonka.StorageGateway.StartGateway.StartGatewayResponse
+ Amazonka.StorageGateway.StartGateway: instance GHC.Read.Read Amazonka.StorageGateway.StartGateway.StartGateway
+ Amazonka.StorageGateway.StartGateway: instance GHC.Read.Read Amazonka.StorageGateway.StartGateway.StartGatewayResponse
+ Amazonka.StorageGateway.StartGateway: instance GHC.Show.Show Amazonka.StorageGateway.StartGateway.StartGateway
+ Amazonka.StorageGateway.StartGateway: instance GHC.Show.Show Amazonka.StorageGateway.StartGateway.StartGatewayResponse
+ Amazonka.StorageGateway.StartGateway: newStartGateway :: Text -> StartGateway
+ Amazonka.StorageGateway.StartGateway: newStartGatewayResponse :: Int -> StartGatewayResponse
+ Amazonka.StorageGateway.StartGateway: startGatewayResponse_gatewayARN :: Lens' StartGatewayResponse (Maybe Text)
+ Amazonka.StorageGateway.StartGateway: startGatewayResponse_httpStatus :: Lens' StartGatewayResponse Int
+ Amazonka.StorageGateway.StartGateway: startGateway_gatewayARN :: Lens' StartGateway Text
+ Amazonka.StorageGateway.Types: ActiveDirectoryStatus' :: Text -> ActiveDirectoryStatus
+ Amazonka.StorageGateway.Types: AutomaticTapeCreationPolicyInfo' :: Maybe (NonEmpty AutomaticTapeCreationRule) -> Maybe Text -> AutomaticTapeCreationPolicyInfo
+ Amazonka.StorageGateway.Types: AutomaticTapeCreationRule' :: Maybe Bool -> Text -> Text -> Integer -> Natural -> AutomaticTapeCreationRule
+ Amazonka.StorageGateway.Types: AvailabilityMonitorTestStatus' :: Text -> AvailabilityMonitorTestStatus
+ Amazonka.StorageGateway.Types: BandwidthRateLimitInterval' :: Maybe Natural -> Maybe Natural -> Natural -> Natural -> Natural -> Natural -> NonEmpty Natural -> BandwidthRateLimitInterval
+ Amazonka.StorageGateway.Types: CacheAttributes' :: Maybe Int -> CacheAttributes
+ Amazonka.StorageGateway.Types: CachediSCSIVolume' :: Maybe POSIX -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Double -> Maybe Integer -> Maybe Text -> Maybe Text -> Maybe Integer -> Maybe VolumeiSCSIAttributes -> CachediSCSIVolume
+ Amazonka.StorageGateway.Types: CaseSensitivity' :: Text -> CaseSensitivity
+ Amazonka.StorageGateway.Types: ChapInfo' :: Maybe Text -> Maybe (Sensitive Text) -> Maybe (Sensitive Text) -> Maybe Text -> ChapInfo
+ Amazonka.StorageGateway.Types: DeviceiSCSIAttributes' :: Maybe Bool -> Maybe Text -> Maybe Int -> Maybe Text -> DeviceiSCSIAttributes
+ Amazonka.StorageGateway.Types: Disk' :: Maybe Text -> Maybe Text -> Maybe [Text] -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Integer -> Maybe Text -> Disk
+ Amazonka.StorageGateway.Types: EndpointNetworkConfiguration' :: Maybe [Text] -> EndpointNetworkConfiguration
+ Amazonka.StorageGateway.Types: FileShareInfo' :: Maybe Text -> Maybe Text -> Maybe Text -> Maybe FileShareType -> Maybe Text -> FileShareInfo
+ Amazonka.StorageGateway.Types: FileShareType' :: Text -> FileShareType
+ Amazonka.StorageGateway.Types: FileSystemAssociationInfo' :: Maybe Text -> Maybe CacheAttributes -> Maybe EndpointNetworkConfiguration -> Maybe Text -> Maybe Text -> Maybe [FileSystemAssociationStatusDetail] -> Maybe Text -> Maybe Text -> Maybe [Tag] -> FileSystemAssociationInfo
+ Amazonka.StorageGateway.Types: FileSystemAssociationStatusDetail' :: Maybe Text -> FileSystemAssociationStatusDetail
+ Amazonka.StorageGateway.Types: FileSystemAssociationSummary' :: Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> FileSystemAssociationSummary
+ Amazonka.StorageGateway.Types: GatewayCapacity' :: Text -> GatewayCapacity
+ Amazonka.StorageGateway.Types: GatewayInfo' :: Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe HostEnvironment -> Maybe Text -> GatewayInfo
+ Amazonka.StorageGateway.Types: HostEnvironment' :: Text -> HostEnvironment
+ Amazonka.StorageGateway.Types: NFSFileShareDefaults' :: Maybe Text -> Maybe Text -> Maybe Natural -> Maybe Natural -> NFSFileShareDefaults
+ Amazonka.StorageGateway.Types: NFSFileShareInfo' :: Maybe Text -> Maybe Text -> Maybe CacheAttributes -> Maybe (NonEmpty Text) -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Bool -> Maybe Bool -> Maybe Text -> Maybe Text -> Maybe NFSFileShareDefaults -> Maybe Text -> Maybe ObjectACL -> Maybe Text -> Maybe Bool -> Maybe Bool -> Maybe Text -> Maybe Text -> Maybe [Tag] -> Maybe Text -> NFSFileShareInfo
+ Amazonka.StorageGateway.Types: NetworkInterface' :: Maybe Text -> Maybe Text -> Maybe Text -> NetworkInterface
+ Amazonka.StorageGateway.Types: ObjectACL' :: Text -> ObjectACL
+ Amazonka.StorageGateway.Types: PoolInfo' :: Maybe Text -> Maybe Text -> Maybe PoolStatus -> Maybe Natural -> Maybe RetentionLockType -> Maybe TapeStorageClass -> PoolInfo
+ Amazonka.StorageGateway.Types: PoolStatus' :: Text -> PoolStatus
+ Amazonka.StorageGateway.Types: RetentionLockType' :: Text -> RetentionLockType
+ Amazonka.StorageGateway.Types: SMBFileShareInfo' :: Maybe Bool -> Maybe [Text] -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe CacheAttributes -> Maybe CaseSensitivity -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Bool -> Maybe [Text] -> Maybe Bool -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe ObjectACL -> Maybe Bool -> Maybe Text -> Maybe Bool -> Maybe Bool -> Maybe Text -> Maybe Bool -> Maybe [Tag] -> Maybe Text -> Maybe [Text] -> SMBFileShareInfo
+ Amazonka.StorageGateway.Types: SMBLocalGroups' :: Maybe [Text] -> SMBLocalGroups
+ Amazonka.StorageGateway.Types: SMBSecurityStrategy' :: Text -> SMBSecurityStrategy
+ Amazonka.StorageGateway.Types: StorediSCSIVolume' :: Maybe POSIX -> Maybe Text -> Maybe Bool -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Double -> Maybe Integer -> Maybe Text -> Maybe Text -> Maybe Integer -> Maybe VolumeiSCSIAttributes -> StorediSCSIVolume
+ Amazonka.StorageGateway.Types: Tag' :: Text -> Text -> Tag
+ Amazonka.StorageGateway.Types: Tape' :: Maybe Text -> Maybe POSIX -> Maybe Text -> Maybe Double -> Maybe POSIX -> Maybe Text -> Maybe Text -> Maybe POSIX -> Maybe Integer -> Maybe Text -> Maybe Integer -> Maybe Text -> Maybe Bool -> Tape
+ Amazonka.StorageGateway.Types: TapeArchive' :: Maybe POSIX -> Maybe Text -> Maybe POSIX -> Maybe Text -> Maybe POSIX -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe POSIX -> Maybe Integer -> Maybe Text -> Maybe Integer -> Maybe Bool -> TapeArchive
+ Amazonka.StorageGateway.Types: TapeInfo' :: Maybe Text -> Maybe POSIX -> Maybe Text -> Maybe POSIX -> Maybe Text -> Maybe Text -> Maybe Integer -> Maybe Text -> TapeInfo
+ Amazonka.StorageGateway.Types: TapeRecoveryPointInfo' :: Maybe Text -> Maybe POSIX -> Maybe Integer -> Maybe Text -> TapeRecoveryPointInfo
+ Amazonka.StorageGateway.Types: TapeStorageClass' :: Text -> TapeStorageClass
+ Amazonka.StorageGateway.Types: VTLDevice' :: Maybe DeviceiSCSIAttributes -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> VTLDevice
+ Amazonka.StorageGateway.Types: VolumeInfo' :: Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Integer -> Maybe Text -> VolumeInfo
+ Amazonka.StorageGateway.Types: VolumeRecoveryPointInfo' :: Maybe Text -> Maybe Text -> Maybe Integer -> Maybe Integer -> VolumeRecoveryPointInfo
+ Amazonka.StorageGateway.Types: VolumeiSCSIAttributes' :: Maybe Bool -> Maybe Natural -> Maybe Text -> Maybe Int -> Maybe Text -> VolumeiSCSIAttributes
+ Amazonka.StorageGateway.Types: [$sel:accessBasedEnumeration:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe Bool
+ Amazonka.StorageGateway.Types: [$sel:adminUserList:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe [Text]
+ Amazonka.StorageGateway.Types: [$sel:auditDestinationARN:FileSystemAssociationInfo'] :: FileSystemAssociationInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:auditDestinationARN:NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:auditDestinationARN:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:authentication:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:automaticTapeCreationRules:AutomaticTapeCreationPolicyInfo'] :: AutomaticTapeCreationPolicyInfo -> Maybe (NonEmpty AutomaticTapeCreationRule)
+ Amazonka.StorageGateway.Types: [$sel:averageDownloadRateLimitInBitsPerSec:BandwidthRateLimitInterval'] :: BandwidthRateLimitInterval -> Maybe Natural
+ Amazonka.StorageGateway.Types: [$sel:averageUploadRateLimitInBitsPerSec:BandwidthRateLimitInterval'] :: BandwidthRateLimitInterval -> Maybe Natural
+ Amazonka.StorageGateway.Types: [$sel:bucketRegion:NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:bucketRegion:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:cacheAttributes:FileSystemAssociationInfo'] :: FileSystemAssociationInfo -> Maybe CacheAttributes
+ Amazonka.StorageGateway.Types: [$sel:cacheAttributes:NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe CacheAttributes
+ Amazonka.StorageGateway.Types: [$sel:cacheAttributes:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe CacheAttributes
+ Amazonka.StorageGateway.Types: [$sel:cacheStaleTimeoutInSeconds:CacheAttributes'] :: CacheAttributes -> Maybe Int
+ Amazonka.StorageGateway.Types: [$sel:caseSensitivity:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe CaseSensitivity
+ Amazonka.StorageGateway.Types: [$sel:chapEnabled:DeviceiSCSIAttributes'] :: DeviceiSCSIAttributes -> Maybe Bool
+ Amazonka.StorageGateway.Types: [$sel:chapEnabled:VolumeiSCSIAttributes'] :: VolumeiSCSIAttributes -> Maybe Bool
+ Amazonka.StorageGateway.Types: [$sel:clientList:NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe (NonEmpty Text)
+ Amazonka.StorageGateway.Types: [$sel:completionTime:TapeArchive'] :: TapeArchive -> Maybe POSIX
+ Amazonka.StorageGateway.Types: [$sel:createdDate:CachediSCSIVolume'] :: CachediSCSIVolume -> Maybe POSIX
+ Amazonka.StorageGateway.Types: [$sel:createdDate:StorediSCSIVolume'] :: StorediSCSIVolume -> Maybe POSIX
+ Amazonka.StorageGateway.Types: [$sel:daysOfWeek:BandwidthRateLimitInterval'] :: BandwidthRateLimitInterval -> NonEmpty Natural
+ Amazonka.StorageGateway.Types: [$sel:defaultStorageClass:NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:defaultStorageClass:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:deviceiSCSIAttributes:VTLDevice'] :: VTLDevice -> Maybe DeviceiSCSIAttributes
+ Amazonka.StorageGateway.Types: [$sel:directoryMode:NFSFileShareDefaults'] :: NFSFileShareDefaults -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:diskAllocationResource:Disk'] :: Disk -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:diskAllocationType:Disk'] :: Disk -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:diskAttributeList:Disk'] :: Disk -> Maybe [Text]
+ Amazonka.StorageGateway.Types: [$sel:diskId:Disk'] :: Disk -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:diskNode:Disk'] :: Disk -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:diskPath:Disk'] :: Disk -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:diskSizeInBytes:Disk'] :: Disk -> Maybe Integer
+ Amazonka.StorageGateway.Types: [$sel:diskStatus:Disk'] :: Disk -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:ec2InstanceId:GatewayInfo'] :: GatewayInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:ec2InstanceRegion:GatewayInfo'] :: GatewayInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:endHourOfDay:BandwidthRateLimitInterval'] :: BandwidthRateLimitInterval -> Natural
+ Amazonka.StorageGateway.Types: [$sel:endMinuteOfHour:BandwidthRateLimitInterval'] :: BandwidthRateLimitInterval -> Natural
+ Amazonka.StorageGateway.Types: [$sel:endpointNetworkConfiguration:FileSystemAssociationInfo'] :: FileSystemAssociationInfo -> Maybe EndpointNetworkConfiguration
+ Amazonka.StorageGateway.Types: [$sel:errorCode:FileSystemAssociationStatusDetail'] :: FileSystemAssociationStatusDetail -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:fileMode:NFSFileShareDefaults'] :: NFSFileShareDefaults -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:fileShareARN:FileShareInfo'] :: FileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:fileShareARN:NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:fileShareARN:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:fileShareId:FileShareInfo'] :: FileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:fileShareId:NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:fileShareId:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:fileShareName:NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:fileShareName:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:fileShareStatus:FileShareInfo'] :: FileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:fileShareStatus:NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:fileShareStatus:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:fileShareType:FileShareInfo'] :: FileShareInfo -> Maybe FileShareType
+ Amazonka.StorageGateway.Types: [$sel:fileSystemAssociationARN:FileSystemAssociationInfo'] :: FileSystemAssociationInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:fileSystemAssociationARN:FileSystemAssociationSummary'] :: FileSystemAssociationSummary -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:fileSystemAssociationId:FileSystemAssociationSummary'] :: FileSystemAssociationSummary -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:fileSystemAssociationStatus:FileSystemAssociationInfo'] :: FileSystemAssociationInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:fileSystemAssociationStatus:FileSystemAssociationSummary'] :: FileSystemAssociationSummary -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:fileSystemAssociationStatusDetails:FileSystemAssociationInfo'] :: FileSystemAssociationInfo -> Maybe [FileSystemAssociationStatusDetail]
+ Amazonka.StorageGateway.Types: [$sel:gatewayARN:AutomaticTapeCreationPolicyInfo'] :: AutomaticTapeCreationPolicyInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:gatewayARN:FileShareInfo'] :: FileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:gatewayARN:FileSystemAssociationInfo'] :: FileSystemAssociationInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:gatewayARN:FileSystemAssociationSummary'] :: FileSystemAssociationSummary -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:gatewayARN:GatewayInfo'] :: GatewayInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:gatewayARN:NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:gatewayARN:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:gatewayARN:TapeInfo'] :: TapeInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:gatewayARN:VolumeInfo'] :: VolumeInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:gatewayAdmins:SMBLocalGroups'] :: SMBLocalGroups -> Maybe [Text]
+ Amazonka.StorageGateway.Types: [$sel:gatewayId:GatewayInfo'] :: GatewayInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:gatewayId:VolumeInfo'] :: VolumeInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:gatewayName:GatewayInfo'] :: GatewayInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:gatewayOperationalState:GatewayInfo'] :: GatewayInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:gatewayType:GatewayInfo'] :: GatewayInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:groupId:NFSFileShareDefaults'] :: NFSFileShareDefaults -> Maybe Natural
+ Amazonka.StorageGateway.Types: [$sel:guessMIMETypeEnabled:NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe Bool
+ Amazonka.StorageGateway.Types: [$sel:guessMIMETypeEnabled:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe Bool
+ Amazonka.StorageGateway.Types: [$sel:hostEnvironment:GatewayInfo'] :: GatewayInfo -> Maybe HostEnvironment
+ Amazonka.StorageGateway.Types: [$sel:hostEnvironmentId:GatewayInfo'] :: GatewayInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:initiatorName:ChapInfo'] :: ChapInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:invalidUserList:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe [Text]
+ Amazonka.StorageGateway.Types: [$sel:ipAddresses:EndpointNetworkConfiguration'] :: EndpointNetworkConfiguration -> Maybe [Text]
+ Amazonka.StorageGateway.Types: [$sel:ipv4Address:NetworkInterface'] :: NetworkInterface -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:ipv6Address:NetworkInterface'] :: NetworkInterface -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:key:Tag'] :: Tag -> Text
+ Amazonka.StorageGateway.Types: [$sel:kmsEncrypted:NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe Bool
+ Amazonka.StorageGateway.Types: [$sel:kmsEncrypted:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe Bool
+ Amazonka.StorageGateway.Types: [$sel:kmsKey:CachediSCSIVolume'] :: CachediSCSIVolume -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:kmsKey:NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:kmsKey:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:kmsKey:StorediSCSIVolume'] :: StorediSCSIVolume -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:kmsKey:Tape'] :: Tape -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:kmsKey:TapeArchive'] :: TapeArchive -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:locationARN:FileSystemAssociationInfo'] :: FileSystemAssociationInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:locationARN:NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:locationARN:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:lunNumber:VolumeiSCSIAttributes'] :: VolumeiSCSIAttributes -> Maybe Natural
+ Amazonka.StorageGateway.Types: [$sel:macAddress:NetworkInterface'] :: NetworkInterface -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:minimumNumTapes:AutomaticTapeCreationRule'] :: AutomaticTapeCreationRule -> Natural
+ Amazonka.StorageGateway.Types: [$sel:nFSFileShareDefaults:NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe NFSFileShareDefaults
+ Amazonka.StorageGateway.Types: [$sel:networkInterfaceId:DeviceiSCSIAttributes'] :: DeviceiSCSIAttributes -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:networkInterfaceId:VolumeiSCSIAttributes'] :: VolumeiSCSIAttributes -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:networkInterfacePort:DeviceiSCSIAttributes'] :: DeviceiSCSIAttributes -> Maybe Int
+ Amazonka.StorageGateway.Types: [$sel:networkInterfacePort:VolumeiSCSIAttributes'] :: VolumeiSCSIAttributes -> Maybe Int
+ Amazonka.StorageGateway.Types: [$sel:notificationPolicy:NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:notificationPolicy:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:objectACL:NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe ObjectACL
+ Amazonka.StorageGateway.Types: [$sel:objectACL:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe ObjectACL
+ Amazonka.StorageGateway.Types: [$sel:oplocksEnabled:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe Bool
+ Amazonka.StorageGateway.Types: [$sel:ownerId:NFSFileShareDefaults'] :: NFSFileShareDefaults -> Maybe Natural
+ Amazonka.StorageGateway.Types: [$sel:path:NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:path:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:poolARN:PoolInfo'] :: PoolInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:poolEntryDate:Tape'] :: Tape -> Maybe POSIX
+ Amazonka.StorageGateway.Types: [$sel:poolEntryDate:TapeArchive'] :: TapeArchive -> Maybe POSIX
+ Amazonka.StorageGateway.Types: [$sel:poolEntryDate:TapeInfo'] :: TapeInfo -> Maybe POSIX
+ Amazonka.StorageGateway.Types: [$sel:poolId:AutomaticTapeCreationRule'] :: AutomaticTapeCreationRule -> Text
+ Amazonka.StorageGateway.Types: [$sel:poolId:Tape'] :: Tape -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:poolId:TapeArchive'] :: TapeArchive -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:poolId:TapeInfo'] :: TapeInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:poolName:PoolInfo'] :: PoolInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:poolStatus:PoolInfo'] :: PoolInfo -> Maybe PoolStatus
+ Amazonka.StorageGateway.Types: [$sel:preservedExistingData:StorediSCSIVolume'] :: StorediSCSIVolume -> Maybe Bool
+ Amazonka.StorageGateway.Types: [$sel:progress:Tape'] :: Tape -> Maybe Double
+ Amazonka.StorageGateway.Types: [$sel:readOnly:NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe Bool
+ Amazonka.StorageGateway.Types: [$sel:readOnly:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe Bool
+ Amazonka.StorageGateway.Types: [$sel:requesterPays:NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe Bool
+ Amazonka.StorageGateway.Types: [$sel:requesterPays:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe Bool
+ Amazonka.StorageGateway.Types: [$sel:retentionLockTimeInDays:PoolInfo'] :: PoolInfo -> Maybe Natural
+ Amazonka.StorageGateway.Types: [$sel:retentionLockType:PoolInfo'] :: PoolInfo -> Maybe RetentionLockType
+ Amazonka.StorageGateway.Types: [$sel:retentionStartDate:Tape'] :: Tape -> Maybe POSIX
+ Amazonka.StorageGateway.Types: [$sel:retentionStartDate:TapeArchive'] :: TapeArchive -> Maybe POSIX
+ Amazonka.StorageGateway.Types: [$sel:retentionStartDate:TapeInfo'] :: TapeInfo -> Maybe POSIX
+ Amazonka.StorageGateway.Types: [$sel:retrievedTo:TapeArchive'] :: TapeArchive -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:role':NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:role':SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:sMBACLEnabled:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe Bool
+ Amazonka.StorageGateway.Types: [$sel:secretToAuthenticateInitiator:ChapInfo'] :: ChapInfo -> Maybe (Sensitive Text)
+ Amazonka.StorageGateway.Types: [$sel:secretToAuthenticateTarget:ChapInfo'] :: ChapInfo -> Maybe (Sensitive Text)
+ Amazonka.StorageGateway.Types: [$sel:sourceSnapshotId:CachediSCSIVolume'] :: CachediSCSIVolume -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:sourceSnapshotId:StorediSCSIVolume'] :: StorediSCSIVolume -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:squash:NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:startHourOfDay:BandwidthRateLimitInterval'] :: BandwidthRateLimitInterval -> Natural
+ Amazonka.StorageGateway.Types: [$sel:startMinuteOfHour:BandwidthRateLimitInterval'] :: BandwidthRateLimitInterval -> Natural
+ Amazonka.StorageGateway.Types: [$sel:storageClass:PoolInfo'] :: PoolInfo -> Maybe TapeStorageClass
+ Amazonka.StorageGateway.Types: [$sel:tags:FileSystemAssociationInfo'] :: FileSystemAssociationInfo -> Maybe [Tag]
+ Amazonka.StorageGateway.Types: [$sel:tags:NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe [Tag]
+ Amazonka.StorageGateway.Types: [$sel:tags:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe [Tag]
+ Amazonka.StorageGateway.Types: [$sel:tapeARN:Tape'] :: Tape -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:tapeARN:TapeArchive'] :: TapeArchive -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:tapeARN:TapeInfo'] :: TapeInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:tapeARN:TapeRecoveryPointInfo'] :: TapeRecoveryPointInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:tapeBarcode:Tape'] :: Tape -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:tapeBarcode:TapeArchive'] :: TapeArchive -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:tapeBarcode:TapeInfo'] :: TapeInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:tapeBarcodePrefix:AutomaticTapeCreationRule'] :: AutomaticTapeCreationRule -> Text
+ Amazonka.StorageGateway.Types: [$sel:tapeCreatedDate:Tape'] :: Tape -> Maybe POSIX
+ Amazonka.StorageGateway.Types: [$sel:tapeCreatedDate:TapeArchive'] :: TapeArchive -> Maybe POSIX
+ Amazonka.StorageGateway.Types: [$sel:tapeRecoveryPointTime:TapeRecoveryPointInfo'] :: TapeRecoveryPointInfo -> Maybe POSIX
+ Amazonka.StorageGateway.Types: [$sel:tapeSizeInBytes:AutomaticTapeCreationRule'] :: AutomaticTapeCreationRule -> Integer
+ Amazonka.StorageGateway.Types: [$sel:tapeSizeInBytes:Tape'] :: Tape -> Maybe Integer
+ Amazonka.StorageGateway.Types: [$sel:tapeSizeInBytes:TapeArchive'] :: TapeArchive -> Maybe Integer
+ Amazonka.StorageGateway.Types: [$sel:tapeSizeInBytes:TapeInfo'] :: TapeInfo -> Maybe Integer
+ Amazonka.StorageGateway.Types: [$sel:tapeSizeInBytes:TapeRecoveryPointInfo'] :: TapeRecoveryPointInfo -> Maybe Integer
+ Amazonka.StorageGateway.Types: [$sel:tapeStatus:Tape'] :: Tape -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:tapeStatus:TapeArchive'] :: TapeArchive -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:tapeStatus:TapeInfo'] :: TapeInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:tapeStatus:TapeRecoveryPointInfo'] :: TapeRecoveryPointInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:tapeUsedInBytes:Tape'] :: Tape -> Maybe Integer
+ Amazonka.StorageGateway.Types: [$sel:tapeUsedInBytes:TapeArchive'] :: TapeArchive -> Maybe Integer
+ Amazonka.StorageGateway.Types: [$sel:targetARN:ChapInfo'] :: ChapInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:targetARN:DeviceiSCSIAttributes'] :: DeviceiSCSIAttributes -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:targetARN:VolumeiSCSIAttributes'] :: VolumeiSCSIAttributes -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:targetName:CachediSCSIVolume'] :: CachediSCSIVolume -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:targetName:StorediSCSIVolume'] :: StorediSCSIVolume -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:vPCEndpointDNSName:NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:vPCEndpointDNSName:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:vTLDevice:Tape'] :: Tape -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:vTLDeviceARN:VTLDevice'] :: VTLDevice -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:vTLDeviceProductIdentifier:VTLDevice'] :: VTLDevice -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:vTLDeviceType:VTLDevice'] :: VTLDevice -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:vTLDeviceVendor:VTLDevice'] :: VTLDevice -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:validUserList:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe [Text]
+ Amazonka.StorageGateway.Types: [$sel:value:Tag'] :: Tag -> Text
+ Amazonka.StorageGateway.Types: [$sel:volumeARN:CachediSCSIVolume'] :: CachediSCSIVolume -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:volumeARN:StorediSCSIVolume'] :: StorediSCSIVolume -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:volumeARN:VolumeInfo'] :: VolumeInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:volumeARN:VolumeRecoveryPointInfo'] :: VolumeRecoveryPointInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:volumeAttachmentStatus:CachediSCSIVolume'] :: CachediSCSIVolume -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:volumeAttachmentStatus:StorediSCSIVolume'] :: StorediSCSIVolume -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:volumeAttachmentStatus:VolumeInfo'] :: VolumeInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:volumeDiskId:StorediSCSIVolume'] :: StorediSCSIVolume -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:volumeId:CachediSCSIVolume'] :: CachediSCSIVolume -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:volumeId:StorediSCSIVolume'] :: StorediSCSIVolume -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:volumeId:VolumeInfo'] :: VolumeInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:volumeProgress:CachediSCSIVolume'] :: CachediSCSIVolume -> Maybe Double
+ Amazonka.StorageGateway.Types: [$sel:volumeProgress:StorediSCSIVolume'] :: StorediSCSIVolume -> Maybe Double
+ Amazonka.StorageGateway.Types: [$sel:volumeRecoveryPointTime:VolumeRecoveryPointInfo'] :: VolumeRecoveryPointInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:volumeSizeInBytes:CachediSCSIVolume'] :: CachediSCSIVolume -> Maybe Integer
+ Amazonka.StorageGateway.Types: [$sel:volumeSizeInBytes:StorediSCSIVolume'] :: StorediSCSIVolume -> Maybe Integer
+ Amazonka.StorageGateway.Types: [$sel:volumeSizeInBytes:VolumeInfo'] :: VolumeInfo -> Maybe Integer
+ Amazonka.StorageGateway.Types: [$sel:volumeSizeInBytes:VolumeRecoveryPointInfo'] :: VolumeRecoveryPointInfo -> Maybe Integer
+ Amazonka.StorageGateway.Types: [$sel:volumeStatus:CachediSCSIVolume'] :: CachediSCSIVolume -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:volumeStatus:StorediSCSIVolume'] :: StorediSCSIVolume -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:volumeType:CachediSCSIVolume'] :: CachediSCSIVolume -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:volumeType:StorediSCSIVolume'] :: StorediSCSIVolume -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:volumeType:VolumeInfo'] :: VolumeInfo -> Maybe Text
+ Amazonka.StorageGateway.Types: [$sel:volumeUsageInBytes:VolumeRecoveryPointInfo'] :: VolumeRecoveryPointInfo -> Maybe Integer
+ Amazonka.StorageGateway.Types: [$sel:volumeUsedInBytes:CachediSCSIVolume'] :: CachediSCSIVolume -> Maybe Integer
+ Amazonka.StorageGateway.Types: [$sel:volumeUsedInBytes:StorediSCSIVolume'] :: StorediSCSIVolume -> Maybe Integer
+ Amazonka.StorageGateway.Types: [$sel:volumeiSCSIAttributes:CachediSCSIVolume'] :: CachediSCSIVolume -> Maybe VolumeiSCSIAttributes
+ Amazonka.StorageGateway.Types: [$sel:volumeiSCSIAttributes:StorediSCSIVolume'] :: StorediSCSIVolume -> Maybe VolumeiSCSIAttributes
+ Amazonka.StorageGateway.Types: [$sel:worm:AutomaticTapeCreationRule'] :: AutomaticTapeCreationRule -> Maybe Bool
+ Amazonka.StorageGateway.Types: [$sel:worm:Tape'] :: Tape -> Maybe Bool
+ Amazonka.StorageGateway.Types: [$sel:worm:TapeArchive'] :: TapeArchive -> Maybe Bool
+ Amazonka.StorageGateway.Types: [fromActiveDirectoryStatus] :: ActiveDirectoryStatus -> Text
+ Amazonka.StorageGateway.Types: [fromAvailabilityMonitorTestStatus] :: AvailabilityMonitorTestStatus -> Text
+ Amazonka.StorageGateway.Types: [fromCaseSensitivity] :: CaseSensitivity -> Text
+ Amazonka.StorageGateway.Types: [fromFileShareType] :: FileShareType -> Text
+ Amazonka.StorageGateway.Types: [fromGatewayCapacity] :: GatewayCapacity -> Text
+ Amazonka.StorageGateway.Types: [fromHostEnvironment] :: HostEnvironment -> Text
+ Amazonka.StorageGateway.Types: [fromObjectACL] :: ObjectACL -> Text
+ Amazonka.StorageGateway.Types: [fromPoolStatus] :: PoolStatus -> Text
+ Amazonka.StorageGateway.Types: [fromRetentionLockType] :: RetentionLockType -> Text
+ Amazonka.StorageGateway.Types: [fromSMBSecurityStrategy] :: SMBSecurityStrategy -> Text
+ Amazonka.StorageGateway.Types: [fromTapeStorageClass] :: TapeStorageClass -> Text
+ Amazonka.StorageGateway.Types: _InternalServerError :: AsError a => Fold a ServiceError
+ Amazonka.StorageGateway.Types: _InvalidGatewayRequestException :: AsError a => Fold a ServiceError
+ Amazonka.StorageGateway.Types: _ServiceUnavailableError :: AsError a => Fold a ServiceError
+ Amazonka.StorageGateway.Types: automaticTapeCreationPolicyInfo_automaticTapeCreationRules :: Lens' AutomaticTapeCreationPolicyInfo (Maybe (NonEmpty AutomaticTapeCreationRule))
+ Amazonka.StorageGateway.Types: automaticTapeCreationPolicyInfo_gatewayARN :: Lens' AutomaticTapeCreationPolicyInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: automaticTapeCreationRule_minimumNumTapes :: Lens' AutomaticTapeCreationRule Natural
+ Amazonka.StorageGateway.Types: automaticTapeCreationRule_poolId :: Lens' AutomaticTapeCreationRule Text
+ Amazonka.StorageGateway.Types: automaticTapeCreationRule_tapeBarcodePrefix :: Lens' AutomaticTapeCreationRule Text
+ Amazonka.StorageGateway.Types: automaticTapeCreationRule_tapeSizeInBytes :: Lens' AutomaticTapeCreationRule Integer
+ Amazonka.StorageGateway.Types: automaticTapeCreationRule_worm :: Lens' AutomaticTapeCreationRule (Maybe Bool)
+ Amazonka.StorageGateway.Types: bandwidthRateLimitInterval_averageDownloadRateLimitInBitsPerSec :: Lens' BandwidthRateLimitInterval (Maybe Natural)
+ Amazonka.StorageGateway.Types: bandwidthRateLimitInterval_averageUploadRateLimitInBitsPerSec :: Lens' BandwidthRateLimitInterval (Maybe Natural)
+ Amazonka.StorageGateway.Types: bandwidthRateLimitInterval_daysOfWeek :: Lens' BandwidthRateLimitInterval (NonEmpty Natural)
+ Amazonka.StorageGateway.Types: bandwidthRateLimitInterval_endHourOfDay :: Lens' BandwidthRateLimitInterval Natural
+ Amazonka.StorageGateway.Types: bandwidthRateLimitInterval_endMinuteOfHour :: Lens' BandwidthRateLimitInterval Natural
+ Amazonka.StorageGateway.Types: bandwidthRateLimitInterval_startHourOfDay :: Lens' BandwidthRateLimitInterval Natural
+ Amazonka.StorageGateway.Types: bandwidthRateLimitInterval_startMinuteOfHour :: Lens' BandwidthRateLimitInterval Natural
+ Amazonka.StorageGateway.Types: cacheAttributes_cacheStaleTimeoutInSeconds :: Lens' CacheAttributes (Maybe Int)
+ Amazonka.StorageGateway.Types: cachediSCSIVolume_createdDate :: Lens' CachediSCSIVolume (Maybe UTCTime)
+ Amazonka.StorageGateway.Types: cachediSCSIVolume_kmsKey :: Lens' CachediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Types: cachediSCSIVolume_sourceSnapshotId :: Lens' CachediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Types: cachediSCSIVolume_targetName :: Lens' CachediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Types: cachediSCSIVolume_volumeARN :: Lens' CachediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Types: cachediSCSIVolume_volumeAttachmentStatus :: Lens' CachediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Types: cachediSCSIVolume_volumeId :: Lens' CachediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Types: cachediSCSIVolume_volumeProgress :: Lens' CachediSCSIVolume (Maybe Double)
+ Amazonka.StorageGateway.Types: cachediSCSIVolume_volumeSizeInBytes :: Lens' CachediSCSIVolume (Maybe Integer)
+ Amazonka.StorageGateway.Types: cachediSCSIVolume_volumeStatus :: Lens' CachediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Types: cachediSCSIVolume_volumeType :: Lens' CachediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Types: cachediSCSIVolume_volumeUsedInBytes :: Lens' CachediSCSIVolume (Maybe Integer)
+ Amazonka.StorageGateway.Types: cachediSCSIVolume_volumeiSCSIAttributes :: Lens' CachediSCSIVolume (Maybe VolumeiSCSIAttributes)
+ Amazonka.StorageGateway.Types: chapInfo_initiatorName :: Lens' ChapInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: chapInfo_secretToAuthenticateInitiator :: Lens' ChapInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: chapInfo_secretToAuthenticateTarget :: Lens' ChapInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: chapInfo_targetARN :: Lens' ChapInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: data AutomaticTapeCreationPolicyInfo
+ Amazonka.StorageGateway.Types: data AutomaticTapeCreationRule
+ Amazonka.StorageGateway.Types: data BandwidthRateLimitInterval
+ Amazonka.StorageGateway.Types: data CacheAttributes
+ Amazonka.StorageGateway.Types: data CachediSCSIVolume
+ Amazonka.StorageGateway.Types: data ChapInfo
+ Amazonka.StorageGateway.Types: data DeviceiSCSIAttributes
+ Amazonka.StorageGateway.Types: data Disk
+ Amazonka.StorageGateway.Types: data EndpointNetworkConfiguration
+ Amazonka.StorageGateway.Types: data FileShareInfo
+ Amazonka.StorageGateway.Types: data FileSystemAssociationInfo
+ Amazonka.StorageGateway.Types: data FileSystemAssociationStatusDetail
+ Amazonka.StorageGateway.Types: data FileSystemAssociationSummary
+ Amazonka.StorageGateway.Types: data GatewayInfo
+ Amazonka.StorageGateway.Types: data NFSFileShareDefaults
+ Amazonka.StorageGateway.Types: data NFSFileShareInfo
+ Amazonka.StorageGateway.Types: data NetworkInterface
+ Amazonka.StorageGateway.Types: data PoolInfo
+ Amazonka.StorageGateway.Types: data SMBFileShareInfo
+ Amazonka.StorageGateway.Types: data SMBLocalGroups
+ Amazonka.StorageGateway.Types: data StorediSCSIVolume
+ Amazonka.StorageGateway.Types: data Tag
+ Amazonka.StorageGateway.Types: data Tape
+ Amazonka.StorageGateway.Types: data TapeArchive
+ Amazonka.StorageGateway.Types: data TapeInfo
+ Amazonka.StorageGateway.Types: data TapeRecoveryPointInfo
+ Amazonka.StorageGateway.Types: data VTLDevice
+ Amazonka.StorageGateway.Types: data VolumeInfo
+ Amazonka.StorageGateway.Types: data VolumeRecoveryPointInfo
+ Amazonka.StorageGateway.Types: data VolumeiSCSIAttributes
+ Amazonka.StorageGateway.Types: defaultService :: Service
+ Amazonka.StorageGateway.Types: deviceiSCSIAttributes_chapEnabled :: Lens' DeviceiSCSIAttributes (Maybe Bool)
+ Amazonka.StorageGateway.Types: deviceiSCSIAttributes_networkInterfaceId :: Lens' DeviceiSCSIAttributes (Maybe Text)
+ Amazonka.StorageGateway.Types: deviceiSCSIAttributes_networkInterfacePort :: Lens' DeviceiSCSIAttributes (Maybe Int)
+ Amazonka.StorageGateway.Types: deviceiSCSIAttributes_targetARN :: Lens' DeviceiSCSIAttributes (Maybe Text)
+ Amazonka.StorageGateway.Types: disk_diskAllocationResource :: Lens' Disk (Maybe Text)
+ Amazonka.StorageGateway.Types: disk_diskAllocationType :: Lens' Disk (Maybe Text)
+ Amazonka.StorageGateway.Types: disk_diskAttributeList :: Lens' Disk (Maybe [Text])
+ Amazonka.StorageGateway.Types: disk_diskId :: Lens' Disk (Maybe Text)
+ Amazonka.StorageGateway.Types: disk_diskNode :: Lens' Disk (Maybe Text)
+ Amazonka.StorageGateway.Types: disk_diskPath :: Lens' Disk (Maybe Text)
+ Amazonka.StorageGateway.Types: disk_diskSizeInBytes :: Lens' Disk (Maybe Integer)
+ Amazonka.StorageGateway.Types: disk_diskStatus :: Lens' Disk (Maybe Text)
+ Amazonka.StorageGateway.Types: endpointNetworkConfiguration_ipAddresses :: Lens' EndpointNetworkConfiguration (Maybe [Text])
+ Amazonka.StorageGateway.Types: fileShareInfo_fileShareARN :: Lens' FileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: fileShareInfo_fileShareId :: Lens' FileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: fileShareInfo_fileShareStatus :: Lens' FileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: fileShareInfo_fileShareType :: Lens' FileShareInfo (Maybe FileShareType)
+ Amazonka.StorageGateway.Types: fileShareInfo_gatewayARN :: Lens' FileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: fileSystemAssociationInfo_auditDestinationARN :: Lens' FileSystemAssociationInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: fileSystemAssociationInfo_cacheAttributes :: Lens' FileSystemAssociationInfo (Maybe CacheAttributes)
+ Amazonka.StorageGateway.Types: fileSystemAssociationInfo_endpointNetworkConfiguration :: Lens' FileSystemAssociationInfo (Maybe EndpointNetworkConfiguration)
+ Amazonka.StorageGateway.Types: fileSystemAssociationInfo_fileSystemAssociationARN :: Lens' FileSystemAssociationInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: fileSystemAssociationInfo_fileSystemAssociationStatus :: Lens' FileSystemAssociationInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: fileSystemAssociationInfo_fileSystemAssociationStatusDetails :: Lens' FileSystemAssociationInfo (Maybe [FileSystemAssociationStatusDetail])
+ Amazonka.StorageGateway.Types: fileSystemAssociationInfo_gatewayARN :: Lens' FileSystemAssociationInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: fileSystemAssociationInfo_locationARN :: Lens' FileSystemAssociationInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: fileSystemAssociationInfo_tags :: Lens' FileSystemAssociationInfo (Maybe [Tag])
+ Amazonka.StorageGateway.Types: fileSystemAssociationStatusDetail_errorCode :: Lens' FileSystemAssociationStatusDetail (Maybe Text)
+ Amazonka.StorageGateway.Types: fileSystemAssociationSummary_fileSystemAssociationARN :: Lens' FileSystemAssociationSummary (Maybe Text)
+ Amazonka.StorageGateway.Types: fileSystemAssociationSummary_fileSystemAssociationId :: Lens' FileSystemAssociationSummary (Maybe Text)
+ Amazonka.StorageGateway.Types: fileSystemAssociationSummary_fileSystemAssociationStatus :: Lens' FileSystemAssociationSummary (Maybe Text)
+ Amazonka.StorageGateway.Types: fileSystemAssociationSummary_gatewayARN :: Lens' FileSystemAssociationSummary (Maybe Text)
+ Amazonka.StorageGateway.Types: gatewayInfo_ec2InstanceId :: Lens' GatewayInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: gatewayInfo_ec2InstanceRegion :: Lens' GatewayInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: gatewayInfo_gatewayARN :: Lens' GatewayInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: gatewayInfo_gatewayId :: Lens' GatewayInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: gatewayInfo_gatewayName :: Lens' GatewayInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: gatewayInfo_gatewayOperationalState :: Lens' GatewayInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: gatewayInfo_gatewayType :: Lens' GatewayInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: gatewayInfo_hostEnvironment :: Lens' GatewayInfo (Maybe HostEnvironment)
+ Amazonka.StorageGateway.Types: gatewayInfo_hostEnvironmentId :: Lens' GatewayInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: nFSFileShareDefaults_directoryMode :: Lens' NFSFileShareDefaults (Maybe Text)
+ Amazonka.StorageGateway.Types: nFSFileShareDefaults_fileMode :: Lens' NFSFileShareDefaults (Maybe Text)
+ Amazonka.StorageGateway.Types: nFSFileShareDefaults_groupId :: Lens' NFSFileShareDefaults (Maybe Natural)
+ Amazonka.StorageGateway.Types: nFSFileShareDefaults_ownerId :: Lens' NFSFileShareDefaults (Maybe Natural)
+ Amazonka.StorageGateway.Types: nFSFileShareInfo_auditDestinationARN :: Lens' NFSFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: nFSFileShareInfo_bucketRegion :: Lens' NFSFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: nFSFileShareInfo_cacheAttributes :: Lens' NFSFileShareInfo (Maybe CacheAttributes)
+ Amazonka.StorageGateway.Types: nFSFileShareInfo_clientList :: Lens' NFSFileShareInfo (Maybe (NonEmpty Text))
+ Amazonka.StorageGateway.Types: nFSFileShareInfo_defaultStorageClass :: Lens' NFSFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: nFSFileShareInfo_fileShareARN :: Lens' NFSFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: nFSFileShareInfo_fileShareId :: Lens' NFSFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: nFSFileShareInfo_fileShareName :: Lens' NFSFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: nFSFileShareInfo_fileShareStatus :: Lens' NFSFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: nFSFileShareInfo_gatewayARN :: Lens' NFSFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: nFSFileShareInfo_guessMIMETypeEnabled :: Lens' NFSFileShareInfo (Maybe Bool)
+ Amazonka.StorageGateway.Types: nFSFileShareInfo_kmsEncrypted :: Lens' NFSFileShareInfo (Maybe Bool)
+ Amazonka.StorageGateway.Types: nFSFileShareInfo_kmsKey :: Lens' NFSFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: nFSFileShareInfo_locationARN :: Lens' NFSFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: nFSFileShareInfo_nFSFileShareDefaults :: Lens' NFSFileShareInfo (Maybe NFSFileShareDefaults)
+ Amazonka.StorageGateway.Types: nFSFileShareInfo_notificationPolicy :: Lens' NFSFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: nFSFileShareInfo_objectACL :: Lens' NFSFileShareInfo (Maybe ObjectACL)
+ Amazonka.StorageGateway.Types: nFSFileShareInfo_path :: Lens' NFSFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: nFSFileShareInfo_readOnly :: Lens' NFSFileShareInfo (Maybe Bool)
+ Amazonka.StorageGateway.Types: nFSFileShareInfo_requesterPays :: Lens' NFSFileShareInfo (Maybe Bool)
+ Amazonka.StorageGateway.Types: nFSFileShareInfo_role :: Lens' NFSFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: nFSFileShareInfo_squash :: Lens' NFSFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: nFSFileShareInfo_tags :: Lens' NFSFileShareInfo (Maybe [Tag])
+ Amazonka.StorageGateway.Types: nFSFileShareInfo_vPCEndpointDNSName :: Lens' NFSFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: networkInterface_ipv4Address :: Lens' NetworkInterface (Maybe Text)
+ Amazonka.StorageGateway.Types: networkInterface_ipv6Address :: Lens' NetworkInterface (Maybe Text)
+ Amazonka.StorageGateway.Types: networkInterface_macAddress :: Lens' NetworkInterface (Maybe Text)
+ Amazonka.StorageGateway.Types: newAutomaticTapeCreationPolicyInfo :: AutomaticTapeCreationPolicyInfo
+ Amazonka.StorageGateway.Types: newAutomaticTapeCreationRule :: Text -> Text -> Integer -> Natural -> AutomaticTapeCreationRule
+ Amazonka.StorageGateway.Types: newBandwidthRateLimitInterval :: Natural -> Natural -> Natural -> Natural -> NonEmpty Natural -> BandwidthRateLimitInterval
+ Amazonka.StorageGateway.Types: newCacheAttributes :: CacheAttributes
+ Amazonka.StorageGateway.Types: newCachediSCSIVolume :: CachediSCSIVolume
+ Amazonka.StorageGateway.Types: newChapInfo :: ChapInfo
+ Amazonka.StorageGateway.Types: newDeviceiSCSIAttributes :: DeviceiSCSIAttributes
+ Amazonka.StorageGateway.Types: newDisk :: Disk
+ Amazonka.StorageGateway.Types: newEndpointNetworkConfiguration :: EndpointNetworkConfiguration
+ Amazonka.StorageGateway.Types: newFileShareInfo :: FileShareInfo
+ Amazonka.StorageGateway.Types: newFileSystemAssociationInfo :: FileSystemAssociationInfo
+ Amazonka.StorageGateway.Types: newFileSystemAssociationStatusDetail :: FileSystemAssociationStatusDetail
+ Amazonka.StorageGateway.Types: newFileSystemAssociationSummary :: FileSystemAssociationSummary
+ Amazonka.StorageGateway.Types: newGatewayInfo :: GatewayInfo
+ Amazonka.StorageGateway.Types: newNFSFileShareDefaults :: NFSFileShareDefaults
+ Amazonka.StorageGateway.Types: newNFSFileShareInfo :: NFSFileShareInfo
+ Amazonka.StorageGateway.Types: newNetworkInterface :: NetworkInterface
+ Amazonka.StorageGateway.Types: newPoolInfo :: PoolInfo
+ Amazonka.StorageGateway.Types: newSMBFileShareInfo :: SMBFileShareInfo
+ Amazonka.StorageGateway.Types: newSMBLocalGroups :: SMBLocalGroups
+ Amazonka.StorageGateway.Types: newStorediSCSIVolume :: StorediSCSIVolume
+ Amazonka.StorageGateway.Types: newTag :: Text -> Text -> Tag
+ Amazonka.StorageGateway.Types: newTape :: Tape
+ Amazonka.StorageGateway.Types: newTapeArchive :: TapeArchive
+ Amazonka.StorageGateway.Types: newTapeInfo :: TapeInfo
+ Amazonka.StorageGateway.Types: newTapeRecoveryPointInfo :: TapeRecoveryPointInfo
+ Amazonka.StorageGateway.Types: newVTLDevice :: VTLDevice
+ Amazonka.StorageGateway.Types: newVolumeInfo :: VolumeInfo
+ Amazonka.StorageGateway.Types: newVolumeRecoveryPointInfo :: VolumeRecoveryPointInfo
+ Amazonka.StorageGateway.Types: newVolumeiSCSIAttributes :: VolumeiSCSIAttributes
+ Amazonka.StorageGateway.Types: newtype ActiveDirectoryStatus
+ Amazonka.StorageGateway.Types: newtype AvailabilityMonitorTestStatus
+ Amazonka.StorageGateway.Types: newtype CaseSensitivity
+ Amazonka.StorageGateway.Types: newtype FileShareType
+ Amazonka.StorageGateway.Types: newtype GatewayCapacity
+ Amazonka.StorageGateway.Types: newtype HostEnvironment
+ Amazonka.StorageGateway.Types: newtype ObjectACL
+ Amazonka.StorageGateway.Types: newtype PoolStatus
+ Amazonka.StorageGateway.Types: newtype RetentionLockType
+ Amazonka.StorageGateway.Types: newtype SMBSecurityStrategy
+ Amazonka.StorageGateway.Types: newtype TapeStorageClass
+ Amazonka.StorageGateway.Types: pattern ActiveDirectoryStatus_ACCESS_DENIED :: ActiveDirectoryStatus
+ Amazonka.StorageGateway.Types: pattern ActiveDirectoryStatus_DETACHED :: ActiveDirectoryStatus
+ Amazonka.StorageGateway.Types: pattern ActiveDirectoryStatus_JOINED :: ActiveDirectoryStatus
+ Amazonka.StorageGateway.Types: pattern ActiveDirectoryStatus_JOINING :: ActiveDirectoryStatus
+ Amazonka.StorageGateway.Types: pattern ActiveDirectoryStatus_NETWORK_ERROR :: ActiveDirectoryStatus
+ Amazonka.StorageGateway.Types: pattern ActiveDirectoryStatus_TIMEOUT :: ActiveDirectoryStatus
+ Amazonka.StorageGateway.Types: pattern ActiveDirectoryStatus_UNKNOWN_ERROR :: ActiveDirectoryStatus
+ Amazonka.StorageGateway.Types: pattern AvailabilityMonitorTestStatus_COMPLETE :: AvailabilityMonitorTestStatus
+ Amazonka.StorageGateway.Types: pattern AvailabilityMonitorTestStatus_FAILED :: AvailabilityMonitorTestStatus
+ Amazonka.StorageGateway.Types: pattern AvailabilityMonitorTestStatus_PENDING :: AvailabilityMonitorTestStatus
+ Amazonka.StorageGateway.Types: pattern CaseSensitivity_CaseSensitive :: CaseSensitivity
+ Amazonka.StorageGateway.Types: pattern CaseSensitivity_ClientSpecified :: CaseSensitivity
+ Amazonka.StorageGateway.Types: pattern FileShareType_NFS :: FileShareType
+ Amazonka.StorageGateway.Types: pattern FileShareType_SMB :: FileShareType
+ Amazonka.StorageGateway.Types: pattern GatewayCapacity_Large :: GatewayCapacity
+ Amazonka.StorageGateway.Types: pattern GatewayCapacity_Medium :: GatewayCapacity
+ Amazonka.StorageGateway.Types: pattern GatewayCapacity_Small :: GatewayCapacity
+ Amazonka.StorageGateway.Types: pattern HostEnvironment_EC2 :: HostEnvironment
+ Amazonka.StorageGateway.Types: pattern HostEnvironment_HYPER_V :: HostEnvironment
+ Amazonka.StorageGateway.Types: pattern HostEnvironment_KVM :: HostEnvironment
+ Amazonka.StorageGateway.Types: pattern HostEnvironment_OTHER :: HostEnvironment
+ Amazonka.StorageGateway.Types: pattern HostEnvironment_SNOWBALL :: HostEnvironment
+ Amazonka.StorageGateway.Types: pattern HostEnvironment_VMWARE :: HostEnvironment
+ Amazonka.StorageGateway.Types: pattern ObjectACL_Authenticated_read :: ObjectACL
+ Amazonka.StorageGateway.Types: pattern ObjectACL_Aws_exec_read :: ObjectACL
+ Amazonka.StorageGateway.Types: pattern ObjectACL_Bucket_owner_full_control :: ObjectACL
+ Amazonka.StorageGateway.Types: pattern ObjectACL_Bucket_owner_read :: ObjectACL
+ Amazonka.StorageGateway.Types: pattern ObjectACL_Private :: ObjectACL
+ Amazonka.StorageGateway.Types: pattern ObjectACL_Public_read :: ObjectACL
+ Amazonka.StorageGateway.Types: pattern ObjectACL_Public_read_write :: ObjectACL
+ Amazonka.StorageGateway.Types: pattern PoolStatus_ACTIVE :: PoolStatus
+ Amazonka.StorageGateway.Types: pattern PoolStatus_DELETED :: PoolStatus
+ Amazonka.StorageGateway.Types: pattern RetentionLockType_COMPLIANCE :: RetentionLockType
+ Amazonka.StorageGateway.Types: pattern RetentionLockType_GOVERNANCE :: RetentionLockType
+ Amazonka.StorageGateway.Types: pattern RetentionLockType_NONE :: RetentionLockType
+ Amazonka.StorageGateway.Types: pattern SMBSecurityStrategy_ClientSpecified :: SMBSecurityStrategy
+ Amazonka.StorageGateway.Types: pattern SMBSecurityStrategy_MandatoryEncryption :: SMBSecurityStrategy
+ Amazonka.StorageGateway.Types: pattern SMBSecurityStrategy_MandatorySigning :: SMBSecurityStrategy
+ Amazonka.StorageGateway.Types: pattern TapeStorageClass_DEEP_ARCHIVE :: TapeStorageClass
+ Amazonka.StorageGateway.Types: pattern TapeStorageClass_GLACIER :: TapeStorageClass
+ Amazonka.StorageGateway.Types: poolInfo_poolARN :: Lens' PoolInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: poolInfo_poolName :: Lens' PoolInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: poolInfo_poolStatus :: Lens' PoolInfo (Maybe PoolStatus)
+ Amazonka.StorageGateway.Types: poolInfo_retentionLockTimeInDays :: Lens' PoolInfo (Maybe Natural)
+ Amazonka.StorageGateway.Types: poolInfo_retentionLockType :: Lens' PoolInfo (Maybe RetentionLockType)
+ Amazonka.StorageGateway.Types: poolInfo_storageClass :: Lens' PoolInfo (Maybe TapeStorageClass)
+ Amazonka.StorageGateway.Types: sMBFileShareInfo_accessBasedEnumeration :: Lens' SMBFileShareInfo (Maybe Bool)
+ Amazonka.StorageGateway.Types: sMBFileShareInfo_adminUserList :: Lens' SMBFileShareInfo (Maybe [Text])
+ Amazonka.StorageGateway.Types: sMBFileShareInfo_auditDestinationARN :: Lens' SMBFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: sMBFileShareInfo_authentication :: Lens' SMBFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: sMBFileShareInfo_bucketRegion :: Lens' SMBFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: sMBFileShareInfo_cacheAttributes :: Lens' SMBFileShareInfo (Maybe CacheAttributes)
+ Amazonka.StorageGateway.Types: sMBFileShareInfo_caseSensitivity :: Lens' SMBFileShareInfo (Maybe CaseSensitivity)
+ Amazonka.StorageGateway.Types: sMBFileShareInfo_defaultStorageClass :: Lens' SMBFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: sMBFileShareInfo_fileShareARN :: Lens' SMBFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: sMBFileShareInfo_fileShareId :: Lens' SMBFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: sMBFileShareInfo_fileShareName :: Lens' SMBFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: sMBFileShareInfo_fileShareStatus :: Lens' SMBFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: sMBFileShareInfo_gatewayARN :: Lens' SMBFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: sMBFileShareInfo_guessMIMETypeEnabled :: Lens' SMBFileShareInfo (Maybe Bool)
+ Amazonka.StorageGateway.Types: sMBFileShareInfo_invalidUserList :: Lens' SMBFileShareInfo (Maybe [Text])
+ Amazonka.StorageGateway.Types: sMBFileShareInfo_kmsEncrypted :: Lens' SMBFileShareInfo (Maybe Bool)
+ Amazonka.StorageGateway.Types: sMBFileShareInfo_kmsKey :: Lens' SMBFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: sMBFileShareInfo_locationARN :: Lens' SMBFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: sMBFileShareInfo_notificationPolicy :: Lens' SMBFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: sMBFileShareInfo_objectACL :: Lens' SMBFileShareInfo (Maybe ObjectACL)
+ Amazonka.StorageGateway.Types: sMBFileShareInfo_oplocksEnabled :: Lens' SMBFileShareInfo (Maybe Bool)
+ Amazonka.StorageGateway.Types: sMBFileShareInfo_path :: Lens' SMBFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: sMBFileShareInfo_readOnly :: Lens' SMBFileShareInfo (Maybe Bool)
+ Amazonka.StorageGateway.Types: sMBFileShareInfo_requesterPays :: Lens' SMBFileShareInfo (Maybe Bool)
+ Amazonka.StorageGateway.Types: sMBFileShareInfo_role :: Lens' SMBFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: sMBFileShareInfo_sMBACLEnabled :: Lens' SMBFileShareInfo (Maybe Bool)
+ Amazonka.StorageGateway.Types: sMBFileShareInfo_tags :: Lens' SMBFileShareInfo (Maybe [Tag])
+ Amazonka.StorageGateway.Types: sMBFileShareInfo_vPCEndpointDNSName :: Lens' SMBFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: sMBFileShareInfo_validUserList :: Lens' SMBFileShareInfo (Maybe [Text])
+ Amazonka.StorageGateway.Types: sMBLocalGroups_gatewayAdmins :: Lens' SMBLocalGroups (Maybe [Text])
+ Amazonka.StorageGateway.Types: storediSCSIVolume_createdDate :: Lens' StorediSCSIVolume (Maybe UTCTime)
+ Amazonka.StorageGateway.Types: storediSCSIVolume_kmsKey :: Lens' StorediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Types: storediSCSIVolume_preservedExistingData :: Lens' StorediSCSIVolume (Maybe Bool)
+ Amazonka.StorageGateway.Types: storediSCSIVolume_sourceSnapshotId :: Lens' StorediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Types: storediSCSIVolume_targetName :: Lens' StorediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Types: storediSCSIVolume_volumeARN :: Lens' StorediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Types: storediSCSIVolume_volumeAttachmentStatus :: Lens' StorediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Types: storediSCSIVolume_volumeDiskId :: Lens' StorediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Types: storediSCSIVolume_volumeId :: Lens' StorediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Types: storediSCSIVolume_volumeProgress :: Lens' StorediSCSIVolume (Maybe Double)
+ Amazonka.StorageGateway.Types: storediSCSIVolume_volumeSizeInBytes :: Lens' StorediSCSIVolume (Maybe Integer)
+ Amazonka.StorageGateway.Types: storediSCSIVolume_volumeStatus :: Lens' StorediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Types: storediSCSIVolume_volumeType :: Lens' StorediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Types: storediSCSIVolume_volumeUsedInBytes :: Lens' StorediSCSIVolume (Maybe Integer)
+ Amazonka.StorageGateway.Types: storediSCSIVolume_volumeiSCSIAttributes :: Lens' StorediSCSIVolume (Maybe VolumeiSCSIAttributes)
+ Amazonka.StorageGateway.Types: tag_key :: Lens' Tag Text
+ Amazonka.StorageGateway.Types: tag_value :: Lens' Tag Text
+ Amazonka.StorageGateway.Types: tapeArchive_completionTime :: Lens' TapeArchive (Maybe UTCTime)
+ Amazonka.StorageGateway.Types: tapeArchive_kmsKey :: Lens' TapeArchive (Maybe Text)
+ Amazonka.StorageGateway.Types: tapeArchive_poolEntryDate :: Lens' TapeArchive (Maybe UTCTime)
+ Amazonka.StorageGateway.Types: tapeArchive_poolId :: Lens' TapeArchive (Maybe Text)
+ Amazonka.StorageGateway.Types: tapeArchive_retentionStartDate :: Lens' TapeArchive (Maybe UTCTime)
+ Amazonka.StorageGateway.Types: tapeArchive_retrievedTo :: Lens' TapeArchive (Maybe Text)
+ Amazonka.StorageGateway.Types: tapeArchive_tapeARN :: Lens' TapeArchive (Maybe Text)
+ Amazonka.StorageGateway.Types: tapeArchive_tapeBarcode :: Lens' TapeArchive (Maybe Text)
+ Amazonka.StorageGateway.Types: tapeArchive_tapeCreatedDate :: Lens' TapeArchive (Maybe UTCTime)
+ Amazonka.StorageGateway.Types: tapeArchive_tapeSizeInBytes :: Lens' TapeArchive (Maybe Integer)
+ Amazonka.StorageGateway.Types: tapeArchive_tapeStatus :: Lens' TapeArchive (Maybe Text)
+ Amazonka.StorageGateway.Types: tapeArchive_tapeUsedInBytes :: Lens' TapeArchive (Maybe Integer)
+ Amazonka.StorageGateway.Types: tapeArchive_worm :: Lens' TapeArchive (Maybe Bool)
+ Amazonka.StorageGateway.Types: tapeInfo_gatewayARN :: Lens' TapeInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: tapeInfo_poolEntryDate :: Lens' TapeInfo (Maybe UTCTime)
+ Amazonka.StorageGateway.Types: tapeInfo_poolId :: Lens' TapeInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: tapeInfo_retentionStartDate :: Lens' TapeInfo (Maybe UTCTime)
+ Amazonka.StorageGateway.Types: tapeInfo_tapeARN :: Lens' TapeInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: tapeInfo_tapeBarcode :: Lens' TapeInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: tapeInfo_tapeSizeInBytes :: Lens' TapeInfo (Maybe Integer)
+ Amazonka.StorageGateway.Types: tapeInfo_tapeStatus :: Lens' TapeInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: tapeRecoveryPointInfo_tapeARN :: Lens' TapeRecoveryPointInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: tapeRecoveryPointInfo_tapeRecoveryPointTime :: Lens' TapeRecoveryPointInfo (Maybe UTCTime)
+ Amazonka.StorageGateway.Types: tapeRecoveryPointInfo_tapeSizeInBytes :: Lens' TapeRecoveryPointInfo (Maybe Integer)
+ Amazonka.StorageGateway.Types: tapeRecoveryPointInfo_tapeStatus :: Lens' TapeRecoveryPointInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: tape_kmsKey :: Lens' Tape (Maybe Text)
+ Amazonka.StorageGateway.Types: tape_poolEntryDate :: Lens' Tape (Maybe UTCTime)
+ Amazonka.StorageGateway.Types: tape_poolId :: Lens' Tape (Maybe Text)
+ Amazonka.StorageGateway.Types: tape_progress :: Lens' Tape (Maybe Double)
+ Amazonka.StorageGateway.Types: tape_retentionStartDate :: Lens' Tape (Maybe UTCTime)
+ Amazonka.StorageGateway.Types: tape_tapeARN :: Lens' Tape (Maybe Text)
+ Amazonka.StorageGateway.Types: tape_tapeBarcode :: Lens' Tape (Maybe Text)
+ Amazonka.StorageGateway.Types: tape_tapeCreatedDate :: Lens' Tape (Maybe UTCTime)
+ Amazonka.StorageGateway.Types: tape_tapeSizeInBytes :: Lens' Tape (Maybe Integer)
+ Amazonka.StorageGateway.Types: tape_tapeStatus :: Lens' Tape (Maybe Text)
+ Amazonka.StorageGateway.Types: tape_tapeUsedInBytes :: Lens' Tape (Maybe Integer)
+ Amazonka.StorageGateway.Types: tape_vTLDevice :: Lens' Tape (Maybe Text)
+ Amazonka.StorageGateway.Types: tape_worm :: Lens' Tape (Maybe Bool)
+ Amazonka.StorageGateway.Types: vTLDevice_deviceiSCSIAttributes :: Lens' VTLDevice (Maybe DeviceiSCSIAttributes)
+ Amazonka.StorageGateway.Types: vTLDevice_vTLDeviceARN :: Lens' VTLDevice (Maybe Text)
+ Amazonka.StorageGateway.Types: vTLDevice_vTLDeviceProductIdentifier :: Lens' VTLDevice (Maybe Text)
+ Amazonka.StorageGateway.Types: vTLDevice_vTLDeviceType :: Lens' VTLDevice (Maybe Text)
+ Amazonka.StorageGateway.Types: vTLDevice_vTLDeviceVendor :: Lens' VTLDevice (Maybe Text)
+ Amazonka.StorageGateway.Types: volumeInfo_gatewayARN :: Lens' VolumeInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: volumeInfo_gatewayId :: Lens' VolumeInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: volumeInfo_volumeARN :: Lens' VolumeInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: volumeInfo_volumeAttachmentStatus :: Lens' VolumeInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: volumeInfo_volumeId :: Lens' VolumeInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: volumeInfo_volumeSizeInBytes :: Lens' VolumeInfo (Maybe Integer)
+ Amazonka.StorageGateway.Types: volumeInfo_volumeType :: Lens' VolumeInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: volumeRecoveryPointInfo_volumeARN :: Lens' VolumeRecoveryPointInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: volumeRecoveryPointInfo_volumeRecoveryPointTime :: Lens' VolumeRecoveryPointInfo (Maybe Text)
+ Amazonka.StorageGateway.Types: volumeRecoveryPointInfo_volumeSizeInBytes :: Lens' VolumeRecoveryPointInfo (Maybe Integer)
+ Amazonka.StorageGateway.Types: volumeRecoveryPointInfo_volumeUsageInBytes :: Lens' VolumeRecoveryPointInfo (Maybe Integer)
+ Amazonka.StorageGateway.Types: volumeiSCSIAttributes_chapEnabled :: Lens' VolumeiSCSIAttributes (Maybe Bool)
+ Amazonka.StorageGateway.Types: volumeiSCSIAttributes_lunNumber :: Lens' VolumeiSCSIAttributes (Maybe Natural)
+ Amazonka.StorageGateway.Types: volumeiSCSIAttributes_networkInterfaceId :: Lens' VolumeiSCSIAttributes (Maybe Text)
+ Amazonka.StorageGateway.Types: volumeiSCSIAttributes_networkInterfacePort :: Lens' VolumeiSCSIAttributes (Maybe Int)
+ Amazonka.StorageGateway.Types: volumeiSCSIAttributes_targetARN :: Lens' VolumeiSCSIAttributes (Maybe Text)
+ Amazonka.StorageGateway.Types.ActiveDirectoryStatus: ActiveDirectoryStatus' :: Text -> ActiveDirectoryStatus
+ Amazonka.StorageGateway.Types.ActiveDirectoryStatus: [fromActiveDirectoryStatus] :: ActiveDirectoryStatus -> Text
+ Amazonka.StorageGateway.Types.ActiveDirectoryStatus: instance Amazonka.Data.ByteString.ToByteString Amazonka.StorageGateway.Types.ActiveDirectoryStatus.ActiveDirectoryStatus
+ Amazonka.StorageGateway.Types.ActiveDirectoryStatus: instance Amazonka.Data.Headers.ToHeader Amazonka.StorageGateway.Types.ActiveDirectoryStatus.ActiveDirectoryStatus
+ Amazonka.StorageGateway.Types.ActiveDirectoryStatus: instance Amazonka.Data.Log.ToLog Amazonka.StorageGateway.Types.ActiveDirectoryStatus.ActiveDirectoryStatus
+ Amazonka.StorageGateway.Types.ActiveDirectoryStatus: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.Types.ActiveDirectoryStatus.ActiveDirectoryStatus
+ Amazonka.StorageGateway.Types.ActiveDirectoryStatus: instance Amazonka.Data.Text.FromText Amazonka.StorageGateway.Types.ActiveDirectoryStatus.ActiveDirectoryStatus
+ Amazonka.StorageGateway.Types.ActiveDirectoryStatus: instance Amazonka.Data.Text.ToText Amazonka.StorageGateway.Types.ActiveDirectoryStatus.ActiveDirectoryStatus
+ Amazonka.StorageGateway.Types.ActiveDirectoryStatus: instance Amazonka.Data.XML.FromXML Amazonka.StorageGateway.Types.ActiveDirectoryStatus.ActiveDirectoryStatus
+ Amazonka.StorageGateway.Types.ActiveDirectoryStatus: instance Amazonka.Data.XML.ToXML Amazonka.StorageGateway.Types.ActiveDirectoryStatus.ActiveDirectoryStatus
+ Amazonka.StorageGateway.Types.ActiveDirectoryStatus: instance Control.DeepSeq.NFData Amazonka.StorageGateway.Types.ActiveDirectoryStatus.ActiveDirectoryStatus
+ Amazonka.StorageGateway.Types.ActiveDirectoryStatus: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.StorageGateway.Types.ActiveDirectoryStatus.ActiveDirectoryStatus
+ Amazonka.StorageGateway.Types.ActiveDirectoryStatus: instance Data.Aeson.Types.FromJSON.FromJSONKey Amazonka.StorageGateway.Types.ActiveDirectoryStatus.ActiveDirectoryStatus
+ Amazonka.StorageGateway.Types.ActiveDirectoryStatus: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.Types.ActiveDirectoryStatus.ActiveDirectoryStatus
+ Amazonka.StorageGateway.Types.ActiveDirectoryStatus: instance Data.Aeson.Types.ToJSON.ToJSONKey Amazonka.StorageGateway.Types.ActiveDirectoryStatus.ActiveDirectoryStatus
+ Amazonka.StorageGateway.Types.ActiveDirectoryStatus: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.Types.ActiveDirectoryStatus.ActiveDirectoryStatus
+ Amazonka.StorageGateway.Types.ActiveDirectoryStatus: instance GHC.Classes.Eq Amazonka.StorageGateway.Types.ActiveDirectoryStatus.ActiveDirectoryStatus
+ Amazonka.StorageGateway.Types.ActiveDirectoryStatus: instance GHC.Classes.Ord Amazonka.StorageGateway.Types.ActiveDirectoryStatus.ActiveDirectoryStatus
+ Amazonka.StorageGateway.Types.ActiveDirectoryStatus: instance GHC.Generics.Generic Amazonka.StorageGateway.Types.ActiveDirectoryStatus.ActiveDirectoryStatus
+ Amazonka.StorageGateway.Types.ActiveDirectoryStatus: instance GHC.Read.Read Amazonka.StorageGateway.Types.ActiveDirectoryStatus.ActiveDirectoryStatus
+ Amazonka.StorageGateway.Types.ActiveDirectoryStatus: instance GHC.Show.Show Amazonka.StorageGateway.Types.ActiveDirectoryStatus.ActiveDirectoryStatus
+ Amazonka.StorageGateway.Types.ActiveDirectoryStatus: newtype ActiveDirectoryStatus
+ Amazonka.StorageGateway.Types.ActiveDirectoryStatus: pattern ActiveDirectoryStatus_ACCESS_DENIED :: ActiveDirectoryStatus
+ Amazonka.StorageGateway.Types.ActiveDirectoryStatus: pattern ActiveDirectoryStatus_DETACHED :: ActiveDirectoryStatus
+ Amazonka.StorageGateway.Types.ActiveDirectoryStatus: pattern ActiveDirectoryStatus_JOINED :: ActiveDirectoryStatus
+ Amazonka.StorageGateway.Types.ActiveDirectoryStatus: pattern ActiveDirectoryStatus_JOINING :: ActiveDirectoryStatus
+ Amazonka.StorageGateway.Types.ActiveDirectoryStatus: pattern ActiveDirectoryStatus_NETWORK_ERROR :: ActiveDirectoryStatus
+ Amazonka.StorageGateway.Types.ActiveDirectoryStatus: pattern ActiveDirectoryStatus_TIMEOUT :: ActiveDirectoryStatus
+ Amazonka.StorageGateway.Types.ActiveDirectoryStatus: pattern ActiveDirectoryStatus_UNKNOWN_ERROR :: ActiveDirectoryStatus
+ Amazonka.StorageGateway.Types.AutomaticTapeCreationPolicyInfo: AutomaticTapeCreationPolicyInfo' :: Maybe (NonEmpty AutomaticTapeCreationRule) -> Maybe Text -> AutomaticTapeCreationPolicyInfo
+ Amazonka.StorageGateway.Types.AutomaticTapeCreationPolicyInfo: [$sel:automaticTapeCreationRules:AutomaticTapeCreationPolicyInfo'] :: AutomaticTapeCreationPolicyInfo -> Maybe (NonEmpty AutomaticTapeCreationRule)
+ Amazonka.StorageGateway.Types.AutomaticTapeCreationPolicyInfo: [$sel:gatewayARN:AutomaticTapeCreationPolicyInfo'] :: AutomaticTapeCreationPolicyInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.AutomaticTapeCreationPolicyInfo: automaticTapeCreationPolicyInfo_automaticTapeCreationRules :: Lens' AutomaticTapeCreationPolicyInfo (Maybe (NonEmpty AutomaticTapeCreationRule))
+ Amazonka.StorageGateway.Types.AutomaticTapeCreationPolicyInfo: automaticTapeCreationPolicyInfo_gatewayARN :: Lens' AutomaticTapeCreationPolicyInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.AutomaticTapeCreationPolicyInfo: data AutomaticTapeCreationPolicyInfo
+ Amazonka.StorageGateway.Types.AutomaticTapeCreationPolicyInfo: instance Control.DeepSeq.NFData Amazonka.StorageGateway.Types.AutomaticTapeCreationPolicyInfo.AutomaticTapeCreationPolicyInfo
+ Amazonka.StorageGateway.Types.AutomaticTapeCreationPolicyInfo: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.StorageGateway.Types.AutomaticTapeCreationPolicyInfo.AutomaticTapeCreationPolicyInfo
+ Amazonka.StorageGateway.Types.AutomaticTapeCreationPolicyInfo: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.Types.AutomaticTapeCreationPolicyInfo.AutomaticTapeCreationPolicyInfo
+ Amazonka.StorageGateway.Types.AutomaticTapeCreationPolicyInfo: instance GHC.Classes.Eq Amazonka.StorageGateway.Types.AutomaticTapeCreationPolicyInfo.AutomaticTapeCreationPolicyInfo
+ Amazonka.StorageGateway.Types.AutomaticTapeCreationPolicyInfo: instance GHC.Generics.Generic Amazonka.StorageGateway.Types.AutomaticTapeCreationPolicyInfo.AutomaticTapeCreationPolicyInfo
+ Amazonka.StorageGateway.Types.AutomaticTapeCreationPolicyInfo: instance GHC.Read.Read Amazonka.StorageGateway.Types.AutomaticTapeCreationPolicyInfo.AutomaticTapeCreationPolicyInfo
+ Amazonka.StorageGateway.Types.AutomaticTapeCreationPolicyInfo: instance GHC.Show.Show Amazonka.StorageGateway.Types.AutomaticTapeCreationPolicyInfo.AutomaticTapeCreationPolicyInfo
+ Amazonka.StorageGateway.Types.AutomaticTapeCreationPolicyInfo: newAutomaticTapeCreationPolicyInfo :: AutomaticTapeCreationPolicyInfo
+ Amazonka.StorageGateway.Types.AutomaticTapeCreationRule: AutomaticTapeCreationRule' :: Maybe Bool -> Text -> Text -> Integer -> Natural -> AutomaticTapeCreationRule
+ Amazonka.StorageGateway.Types.AutomaticTapeCreationRule: [$sel:minimumNumTapes:AutomaticTapeCreationRule'] :: AutomaticTapeCreationRule -> Natural
+ Amazonka.StorageGateway.Types.AutomaticTapeCreationRule: [$sel:poolId:AutomaticTapeCreationRule'] :: AutomaticTapeCreationRule -> Text
+ Amazonka.StorageGateway.Types.AutomaticTapeCreationRule: [$sel:tapeBarcodePrefix:AutomaticTapeCreationRule'] :: AutomaticTapeCreationRule -> Text
+ Amazonka.StorageGateway.Types.AutomaticTapeCreationRule: [$sel:tapeSizeInBytes:AutomaticTapeCreationRule'] :: AutomaticTapeCreationRule -> Integer
+ Amazonka.StorageGateway.Types.AutomaticTapeCreationRule: [$sel:worm:AutomaticTapeCreationRule'] :: AutomaticTapeCreationRule -> Maybe Bool
+ Amazonka.StorageGateway.Types.AutomaticTapeCreationRule: automaticTapeCreationRule_minimumNumTapes :: Lens' AutomaticTapeCreationRule Natural
+ Amazonka.StorageGateway.Types.AutomaticTapeCreationRule: automaticTapeCreationRule_poolId :: Lens' AutomaticTapeCreationRule Text
+ Amazonka.StorageGateway.Types.AutomaticTapeCreationRule: automaticTapeCreationRule_tapeBarcodePrefix :: Lens' AutomaticTapeCreationRule Text
+ Amazonka.StorageGateway.Types.AutomaticTapeCreationRule: automaticTapeCreationRule_tapeSizeInBytes :: Lens' AutomaticTapeCreationRule Integer
+ Amazonka.StorageGateway.Types.AutomaticTapeCreationRule: automaticTapeCreationRule_worm :: Lens' AutomaticTapeCreationRule (Maybe Bool)
+ Amazonka.StorageGateway.Types.AutomaticTapeCreationRule: data AutomaticTapeCreationRule
+ Amazonka.StorageGateway.Types.AutomaticTapeCreationRule: instance Control.DeepSeq.NFData Amazonka.StorageGateway.Types.AutomaticTapeCreationRule.AutomaticTapeCreationRule
+ Amazonka.StorageGateway.Types.AutomaticTapeCreationRule: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.StorageGateway.Types.AutomaticTapeCreationRule.AutomaticTapeCreationRule
+ Amazonka.StorageGateway.Types.AutomaticTapeCreationRule: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.Types.AutomaticTapeCreationRule.AutomaticTapeCreationRule
+ Amazonka.StorageGateway.Types.AutomaticTapeCreationRule: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.Types.AutomaticTapeCreationRule.AutomaticTapeCreationRule
+ Amazonka.StorageGateway.Types.AutomaticTapeCreationRule: instance GHC.Classes.Eq Amazonka.StorageGateway.Types.AutomaticTapeCreationRule.AutomaticTapeCreationRule
+ Amazonka.StorageGateway.Types.AutomaticTapeCreationRule: instance GHC.Generics.Generic Amazonka.StorageGateway.Types.AutomaticTapeCreationRule.AutomaticTapeCreationRule
+ Amazonka.StorageGateway.Types.AutomaticTapeCreationRule: instance GHC.Read.Read Amazonka.StorageGateway.Types.AutomaticTapeCreationRule.AutomaticTapeCreationRule
+ Amazonka.StorageGateway.Types.AutomaticTapeCreationRule: instance GHC.Show.Show Amazonka.StorageGateway.Types.AutomaticTapeCreationRule.AutomaticTapeCreationRule
+ Amazonka.StorageGateway.Types.AutomaticTapeCreationRule: newAutomaticTapeCreationRule :: Text -> Text -> Integer -> Natural -> AutomaticTapeCreationRule
+ Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus: AvailabilityMonitorTestStatus' :: Text -> AvailabilityMonitorTestStatus
+ Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus: [fromAvailabilityMonitorTestStatus] :: AvailabilityMonitorTestStatus -> Text
+ Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus: instance Amazonka.Data.ByteString.ToByteString Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus.AvailabilityMonitorTestStatus
+ Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus: instance Amazonka.Data.Headers.ToHeader Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus.AvailabilityMonitorTestStatus
+ Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus: instance Amazonka.Data.Log.ToLog Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus.AvailabilityMonitorTestStatus
+ Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus.AvailabilityMonitorTestStatus
+ Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus: instance Amazonka.Data.Text.FromText Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus.AvailabilityMonitorTestStatus
+ Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus: instance Amazonka.Data.Text.ToText Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus.AvailabilityMonitorTestStatus
+ Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus: instance Amazonka.Data.XML.FromXML Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus.AvailabilityMonitorTestStatus
+ Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus: instance Amazonka.Data.XML.ToXML Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus.AvailabilityMonitorTestStatus
+ Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus: instance Control.DeepSeq.NFData Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus.AvailabilityMonitorTestStatus
+ Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus.AvailabilityMonitorTestStatus
+ Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus: instance Data.Aeson.Types.FromJSON.FromJSONKey Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus.AvailabilityMonitorTestStatus
+ Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus.AvailabilityMonitorTestStatus
+ Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus: instance Data.Aeson.Types.ToJSON.ToJSONKey Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus.AvailabilityMonitorTestStatus
+ Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus.AvailabilityMonitorTestStatus
+ Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus: instance GHC.Classes.Eq Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus.AvailabilityMonitorTestStatus
+ Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus: instance GHC.Classes.Ord Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus.AvailabilityMonitorTestStatus
+ Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus: instance GHC.Generics.Generic Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus.AvailabilityMonitorTestStatus
+ Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus: instance GHC.Read.Read Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus.AvailabilityMonitorTestStatus
+ Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus: instance GHC.Show.Show Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus.AvailabilityMonitorTestStatus
+ Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus: newtype AvailabilityMonitorTestStatus
+ Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus: pattern AvailabilityMonitorTestStatus_COMPLETE :: AvailabilityMonitorTestStatus
+ Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus: pattern AvailabilityMonitorTestStatus_FAILED :: AvailabilityMonitorTestStatus
+ Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus: pattern AvailabilityMonitorTestStatus_PENDING :: AvailabilityMonitorTestStatus
+ Amazonka.StorageGateway.Types.BandwidthRateLimitInterval: BandwidthRateLimitInterval' :: Maybe Natural -> Maybe Natural -> Natural -> Natural -> Natural -> Natural -> NonEmpty Natural -> BandwidthRateLimitInterval
+ Amazonka.StorageGateway.Types.BandwidthRateLimitInterval: [$sel:averageDownloadRateLimitInBitsPerSec:BandwidthRateLimitInterval'] :: BandwidthRateLimitInterval -> Maybe Natural
+ Amazonka.StorageGateway.Types.BandwidthRateLimitInterval: [$sel:averageUploadRateLimitInBitsPerSec:BandwidthRateLimitInterval'] :: BandwidthRateLimitInterval -> Maybe Natural
+ Amazonka.StorageGateway.Types.BandwidthRateLimitInterval: [$sel:daysOfWeek:BandwidthRateLimitInterval'] :: BandwidthRateLimitInterval -> NonEmpty Natural
+ Amazonka.StorageGateway.Types.BandwidthRateLimitInterval: [$sel:endHourOfDay:BandwidthRateLimitInterval'] :: BandwidthRateLimitInterval -> Natural
+ Amazonka.StorageGateway.Types.BandwidthRateLimitInterval: [$sel:endMinuteOfHour:BandwidthRateLimitInterval'] :: BandwidthRateLimitInterval -> Natural
+ Amazonka.StorageGateway.Types.BandwidthRateLimitInterval: [$sel:startHourOfDay:BandwidthRateLimitInterval'] :: BandwidthRateLimitInterval -> Natural
+ Amazonka.StorageGateway.Types.BandwidthRateLimitInterval: [$sel:startMinuteOfHour:BandwidthRateLimitInterval'] :: BandwidthRateLimitInterval -> Natural
+ Amazonka.StorageGateway.Types.BandwidthRateLimitInterval: bandwidthRateLimitInterval_averageDownloadRateLimitInBitsPerSec :: Lens' BandwidthRateLimitInterval (Maybe Natural)
+ Amazonka.StorageGateway.Types.BandwidthRateLimitInterval: bandwidthRateLimitInterval_averageUploadRateLimitInBitsPerSec :: Lens' BandwidthRateLimitInterval (Maybe Natural)
+ Amazonka.StorageGateway.Types.BandwidthRateLimitInterval: bandwidthRateLimitInterval_daysOfWeek :: Lens' BandwidthRateLimitInterval (NonEmpty Natural)
+ Amazonka.StorageGateway.Types.BandwidthRateLimitInterval: bandwidthRateLimitInterval_endHourOfDay :: Lens' BandwidthRateLimitInterval Natural
+ Amazonka.StorageGateway.Types.BandwidthRateLimitInterval: bandwidthRateLimitInterval_endMinuteOfHour :: Lens' BandwidthRateLimitInterval Natural
+ Amazonka.StorageGateway.Types.BandwidthRateLimitInterval: bandwidthRateLimitInterval_startHourOfDay :: Lens' BandwidthRateLimitInterval Natural
+ Amazonka.StorageGateway.Types.BandwidthRateLimitInterval: bandwidthRateLimitInterval_startMinuteOfHour :: Lens' BandwidthRateLimitInterval Natural
+ Amazonka.StorageGateway.Types.BandwidthRateLimitInterval: data BandwidthRateLimitInterval
+ Amazonka.StorageGateway.Types.BandwidthRateLimitInterval: instance Control.DeepSeq.NFData Amazonka.StorageGateway.Types.BandwidthRateLimitInterval.BandwidthRateLimitInterval
+ Amazonka.StorageGateway.Types.BandwidthRateLimitInterval: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.StorageGateway.Types.BandwidthRateLimitInterval.BandwidthRateLimitInterval
+ Amazonka.StorageGateway.Types.BandwidthRateLimitInterval: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.Types.BandwidthRateLimitInterval.BandwidthRateLimitInterval
+ Amazonka.StorageGateway.Types.BandwidthRateLimitInterval: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.Types.BandwidthRateLimitInterval.BandwidthRateLimitInterval
+ Amazonka.StorageGateway.Types.BandwidthRateLimitInterval: instance GHC.Classes.Eq Amazonka.StorageGateway.Types.BandwidthRateLimitInterval.BandwidthRateLimitInterval
+ Amazonka.StorageGateway.Types.BandwidthRateLimitInterval: instance GHC.Generics.Generic Amazonka.StorageGateway.Types.BandwidthRateLimitInterval.BandwidthRateLimitInterval
+ Amazonka.StorageGateway.Types.BandwidthRateLimitInterval: instance GHC.Read.Read Amazonka.StorageGateway.Types.BandwidthRateLimitInterval.BandwidthRateLimitInterval
+ Amazonka.StorageGateway.Types.BandwidthRateLimitInterval: instance GHC.Show.Show Amazonka.StorageGateway.Types.BandwidthRateLimitInterval.BandwidthRateLimitInterval
+ Amazonka.StorageGateway.Types.BandwidthRateLimitInterval: newBandwidthRateLimitInterval :: Natural -> Natural -> Natural -> Natural -> NonEmpty Natural -> BandwidthRateLimitInterval
+ Amazonka.StorageGateway.Types.CacheAttributes: CacheAttributes' :: Maybe Int -> CacheAttributes
+ Amazonka.StorageGateway.Types.CacheAttributes: [$sel:cacheStaleTimeoutInSeconds:CacheAttributes'] :: CacheAttributes -> Maybe Int
+ Amazonka.StorageGateway.Types.CacheAttributes: cacheAttributes_cacheStaleTimeoutInSeconds :: Lens' CacheAttributes (Maybe Int)
+ Amazonka.StorageGateway.Types.CacheAttributes: data CacheAttributes
+ Amazonka.StorageGateway.Types.CacheAttributes: instance Control.DeepSeq.NFData Amazonka.StorageGateway.Types.CacheAttributes.CacheAttributes
+ Amazonka.StorageGateway.Types.CacheAttributes: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.StorageGateway.Types.CacheAttributes.CacheAttributes
+ Amazonka.StorageGateway.Types.CacheAttributes: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.Types.CacheAttributes.CacheAttributes
+ Amazonka.StorageGateway.Types.CacheAttributes: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.Types.CacheAttributes.CacheAttributes
+ Amazonka.StorageGateway.Types.CacheAttributes: instance GHC.Classes.Eq Amazonka.StorageGateway.Types.CacheAttributes.CacheAttributes
+ Amazonka.StorageGateway.Types.CacheAttributes: instance GHC.Generics.Generic Amazonka.StorageGateway.Types.CacheAttributes.CacheAttributes
+ Amazonka.StorageGateway.Types.CacheAttributes: instance GHC.Read.Read Amazonka.StorageGateway.Types.CacheAttributes.CacheAttributes
+ Amazonka.StorageGateway.Types.CacheAttributes: instance GHC.Show.Show Amazonka.StorageGateway.Types.CacheAttributes.CacheAttributes
+ Amazonka.StorageGateway.Types.CacheAttributes: newCacheAttributes :: CacheAttributes
+ Amazonka.StorageGateway.Types.CachediSCSIVolume: CachediSCSIVolume' :: Maybe POSIX -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Double -> Maybe Integer -> Maybe Text -> Maybe Text -> Maybe Integer -> Maybe VolumeiSCSIAttributes -> CachediSCSIVolume
+ Amazonka.StorageGateway.Types.CachediSCSIVolume: [$sel:createdDate:CachediSCSIVolume'] :: CachediSCSIVolume -> Maybe POSIX
+ Amazonka.StorageGateway.Types.CachediSCSIVolume: [$sel:kmsKey:CachediSCSIVolume'] :: CachediSCSIVolume -> Maybe Text
+ Amazonka.StorageGateway.Types.CachediSCSIVolume: [$sel:sourceSnapshotId:CachediSCSIVolume'] :: CachediSCSIVolume -> Maybe Text
+ Amazonka.StorageGateway.Types.CachediSCSIVolume: [$sel:targetName:CachediSCSIVolume'] :: CachediSCSIVolume -> Maybe Text
+ Amazonka.StorageGateway.Types.CachediSCSIVolume: [$sel:volumeARN:CachediSCSIVolume'] :: CachediSCSIVolume -> Maybe Text
+ Amazonka.StorageGateway.Types.CachediSCSIVolume: [$sel:volumeAttachmentStatus:CachediSCSIVolume'] :: CachediSCSIVolume -> Maybe Text
+ Amazonka.StorageGateway.Types.CachediSCSIVolume: [$sel:volumeId:CachediSCSIVolume'] :: CachediSCSIVolume -> Maybe Text
+ Amazonka.StorageGateway.Types.CachediSCSIVolume: [$sel:volumeProgress:CachediSCSIVolume'] :: CachediSCSIVolume -> Maybe Double
+ Amazonka.StorageGateway.Types.CachediSCSIVolume: [$sel:volumeSizeInBytes:CachediSCSIVolume'] :: CachediSCSIVolume -> Maybe Integer
+ Amazonka.StorageGateway.Types.CachediSCSIVolume: [$sel:volumeStatus:CachediSCSIVolume'] :: CachediSCSIVolume -> Maybe Text
+ Amazonka.StorageGateway.Types.CachediSCSIVolume: [$sel:volumeType:CachediSCSIVolume'] :: CachediSCSIVolume -> Maybe Text
+ Amazonka.StorageGateway.Types.CachediSCSIVolume: [$sel:volumeUsedInBytes:CachediSCSIVolume'] :: CachediSCSIVolume -> Maybe Integer
+ Amazonka.StorageGateway.Types.CachediSCSIVolume: [$sel:volumeiSCSIAttributes:CachediSCSIVolume'] :: CachediSCSIVolume -> Maybe VolumeiSCSIAttributes
+ Amazonka.StorageGateway.Types.CachediSCSIVolume: cachediSCSIVolume_createdDate :: Lens' CachediSCSIVolume (Maybe UTCTime)
+ Amazonka.StorageGateway.Types.CachediSCSIVolume: cachediSCSIVolume_kmsKey :: Lens' CachediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Types.CachediSCSIVolume: cachediSCSIVolume_sourceSnapshotId :: Lens' CachediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Types.CachediSCSIVolume: cachediSCSIVolume_targetName :: Lens' CachediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Types.CachediSCSIVolume: cachediSCSIVolume_volumeARN :: Lens' CachediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Types.CachediSCSIVolume: cachediSCSIVolume_volumeAttachmentStatus :: Lens' CachediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Types.CachediSCSIVolume: cachediSCSIVolume_volumeId :: Lens' CachediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Types.CachediSCSIVolume: cachediSCSIVolume_volumeProgress :: Lens' CachediSCSIVolume (Maybe Double)
+ Amazonka.StorageGateway.Types.CachediSCSIVolume: cachediSCSIVolume_volumeSizeInBytes :: Lens' CachediSCSIVolume (Maybe Integer)
+ Amazonka.StorageGateway.Types.CachediSCSIVolume: cachediSCSIVolume_volumeStatus :: Lens' CachediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Types.CachediSCSIVolume: cachediSCSIVolume_volumeType :: Lens' CachediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Types.CachediSCSIVolume: cachediSCSIVolume_volumeUsedInBytes :: Lens' CachediSCSIVolume (Maybe Integer)
+ Amazonka.StorageGateway.Types.CachediSCSIVolume: cachediSCSIVolume_volumeiSCSIAttributes :: Lens' CachediSCSIVolume (Maybe VolumeiSCSIAttributes)
+ Amazonka.StorageGateway.Types.CachediSCSIVolume: data CachediSCSIVolume
+ Amazonka.StorageGateway.Types.CachediSCSIVolume: instance Control.DeepSeq.NFData Amazonka.StorageGateway.Types.CachediSCSIVolume.CachediSCSIVolume
+ Amazonka.StorageGateway.Types.CachediSCSIVolume: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.StorageGateway.Types.CachediSCSIVolume.CachediSCSIVolume
+ Amazonka.StorageGateway.Types.CachediSCSIVolume: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.Types.CachediSCSIVolume.CachediSCSIVolume
+ Amazonka.StorageGateway.Types.CachediSCSIVolume: instance GHC.Classes.Eq Amazonka.StorageGateway.Types.CachediSCSIVolume.CachediSCSIVolume
+ Amazonka.StorageGateway.Types.CachediSCSIVolume: instance GHC.Generics.Generic Amazonka.StorageGateway.Types.CachediSCSIVolume.CachediSCSIVolume
+ Amazonka.StorageGateway.Types.CachediSCSIVolume: instance GHC.Read.Read Amazonka.StorageGateway.Types.CachediSCSIVolume.CachediSCSIVolume
+ Amazonka.StorageGateway.Types.CachediSCSIVolume: instance GHC.Show.Show Amazonka.StorageGateway.Types.CachediSCSIVolume.CachediSCSIVolume
+ Amazonka.StorageGateway.Types.CachediSCSIVolume: newCachediSCSIVolume :: CachediSCSIVolume
+ Amazonka.StorageGateway.Types.CaseSensitivity: CaseSensitivity' :: Text -> CaseSensitivity
+ Amazonka.StorageGateway.Types.CaseSensitivity: [fromCaseSensitivity] :: CaseSensitivity -> Text
+ Amazonka.StorageGateway.Types.CaseSensitivity: instance Amazonka.Data.ByteString.ToByteString Amazonka.StorageGateway.Types.CaseSensitivity.CaseSensitivity
+ Amazonka.StorageGateway.Types.CaseSensitivity: instance Amazonka.Data.Headers.ToHeader Amazonka.StorageGateway.Types.CaseSensitivity.CaseSensitivity
+ Amazonka.StorageGateway.Types.CaseSensitivity: instance Amazonka.Data.Log.ToLog Amazonka.StorageGateway.Types.CaseSensitivity.CaseSensitivity
+ Amazonka.StorageGateway.Types.CaseSensitivity: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.Types.CaseSensitivity.CaseSensitivity
+ Amazonka.StorageGateway.Types.CaseSensitivity: instance Amazonka.Data.Text.FromText Amazonka.StorageGateway.Types.CaseSensitivity.CaseSensitivity
+ Amazonka.StorageGateway.Types.CaseSensitivity: instance Amazonka.Data.Text.ToText Amazonka.StorageGateway.Types.CaseSensitivity.CaseSensitivity
+ Amazonka.StorageGateway.Types.CaseSensitivity: instance Amazonka.Data.XML.FromXML Amazonka.StorageGateway.Types.CaseSensitivity.CaseSensitivity
+ Amazonka.StorageGateway.Types.CaseSensitivity: instance Amazonka.Data.XML.ToXML Amazonka.StorageGateway.Types.CaseSensitivity.CaseSensitivity
+ Amazonka.StorageGateway.Types.CaseSensitivity: instance Control.DeepSeq.NFData Amazonka.StorageGateway.Types.CaseSensitivity.CaseSensitivity
+ Amazonka.StorageGateway.Types.CaseSensitivity: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.StorageGateway.Types.CaseSensitivity.CaseSensitivity
+ Amazonka.StorageGateway.Types.CaseSensitivity: instance Data.Aeson.Types.FromJSON.FromJSONKey Amazonka.StorageGateway.Types.CaseSensitivity.CaseSensitivity
+ Amazonka.StorageGateway.Types.CaseSensitivity: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.Types.CaseSensitivity.CaseSensitivity
+ Amazonka.StorageGateway.Types.CaseSensitivity: instance Data.Aeson.Types.ToJSON.ToJSONKey Amazonka.StorageGateway.Types.CaseSensitivity.CaseSensitivity
+ Amazonka.StorageGateway.Types.CaseSensitivity: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.Types.CaseSensitivity.CaseSensitivity
+ Amazonka.StorageGateway.Types.CaseSensitivity: instance GHC.Classes.Eq Amazonka.StorageGateway.Types.CaseSensitivity.CaseSensitivity
+ Amazonka.StorageGateway.Types.CaseSensitivity: instance GHC.Classes.Ord Amazonka.StorageGateway.Types.CaseSensitivity.CaseSensitivity
+ Amazonka.StorageGateway.Types.CaseSensitivity: instance GHC.Generics.Generic Amazonka.StorageGateway.Types.CaseSensitivity.CaseSensitivity
+ Amazonka.StorageGateway.Types.CaseSensitivity: instance GHC.Read.Read Amazonka.StorageGateway.Types.CaseSensitivity.CaseSensitivity
+ Amazonka.StorageGateway.Types.CaseSensitivity: instance GHC.Show.Show Amazonka.StorageGateway.Types.CaseSensitivity.CaseSensitivity
+ Amazonka.StorageGateway.Types.CaseSensitivity: newtype CaseSensitivity
+ Amazonka.StorageGateway.Types.CaseSensitivity: pattern CaseSensitivity_CaseSensitive :: CaseSensitivity
+ Amazonka.StorageGateway.Types.CaseSensitivity: pattern CaseSensitivity_ClientSpecified :: CaseSensitivity
+ Amazonka.StorageGateway.Types.ChapInfo: ChapInfo' :: Maybe Text -> Maybe (Sensitive Text) -> Maybe (Sensitive Text) -> Maybe Text -> ChapInfo
+ Amazonka.StorageGateway.Types.ChapInfo: [$sel:initiatorName:ChapInfo'] :: ChapInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.ChapInfo: [$sel:secretToAuthenticateInitiator:ChapInfo'] :: ChapInfo -> Maybe (Sensitive Text)
+ Amazonka.StorageGateway.Types.ChapInfo: [$sel:secretToAuthenticateTarget:ChapInfo'] :: ChapInfo -> Maybe (Sensitive Text)
+ Amazonka.StorageGateway.Types.ChapInfo: [$sel:targetARN:ChapInfo'] :: ChapInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.ChapInfo: chapInfo_initiatorName :: Lens' ChapInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.ChapInfo: chapInfo_secretToAuthenticateInitiator :: Lens' ChapInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.ChapInfo: chapInfo_secretToAuthenticateTarget :: Lens' ChapInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.ChapInfo: chapInfo_targetARN :: Lens' ChapInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.ChapInfo: data ChapInfo
+ Amazonka.StorageGateway.Types.ChapInfo: instance Control.DeepSeq.NFData Amazonka.StorageGateway.Types.ChapInfo.ChapInfo
+ Amazonka.StorageGateway.Types.ChapInfo: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.StorageGateway.Types.ChapInfo.ChapInfo
+ Amazonka.StorageGateway.Types.ChapInfo: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.Types.ChapInfo.ChapInfo
+ Amazonka.StorageGateway.Types.ChapInfo: instance GHC.Classes.Eq Amazonka.StorageGateway.Types.ChapInfo.ChapInfo
+ Amazonka.StorageGateway.Types.ChapInfo: instance GHC.Generics.Generic Amazonka.StorageGateway.Types.ChapInfo.ChapInfo
+ Amazonka.StorageGateway.Types.ChapInfo: instance GHC.Show.Show Amazonka.StorageGateway.Types.ChapInfo.ChapInfo
+ Amazonka.StorageGateway.Types.ChapInfo: newChapInfo :: ChapInfo
+ Amazonka.StorageGateway.Types.DeviceiSCSIAttributes: DeviceiSCSIAttributes' :: Maybe Bool -> Maybe Text -> Maybe Int -> Maybe Text -> DeviceiSCSIAttributes
+ Amazonka.StorageGateway.Types.DeviceiSCSIAttributes: [$sel:chapEnabled:DeviceiSCSIAttributes'] :: DeviceiSCSIAttributes -> Maybe Bool
+ Amazonka.StorageGateway.Types.DeviceiSCSIAttributes: [$sel:networkInterfaceId:DeviceiSCSIAttributes'] :: DeviceiSCSIAttributes -> Maybe Text
+ Amazonka.StorageGateway.Types.DeviceiSCSIAttributes: [$sel:networkInterfacePort:DeviceiSCSIAttributes'] :: DeviceiSCSIAttributes -> Maybe Int
+ Amazonka.StorageGateway.Types.DeviceiSCSIAttributes: [$sel:targetARN:DeviceiSCSIAttributes'] :: DeviceiSCSIAttributes -> Maybe Text
+ Amazonka.StorageGateway.Types.DeviceiSCSIAttributes: data DeviceiSCSIAttributes
+ Amazonka.StorageGateway.Types.DeviceiSCSIAttributes: deviceiSCSIAttributes_chapEnabled :: Lens' DeviceiSCSIAttributes (Maybe Bool)
+ Amazonka.StorageGateway.Types.DeviceiSCSIAttributes: deviceiSCSIAttributes_networkInterfaceId :: Lens' DeviceiSCSIAttributes (Maybe Text)
+ Amazonka.StorageGateway.Types.DeviceiSCSIAttributes: deviceiSCSIAttributes_networkInterfacePort :: Lens' DeviceiSCSIAttributes (Maybe Int)
+ Amazonka.StorageGateway.Types.DeviceiSCSIAttributes: deviceiSCSIAttributes_targetARN :: Lens' DeviceiSCSIAttributes (Maybe Text)
+ Amazonka.StorageGateway.Types.DeviceiSCSIAttributes: instance Control.DeepSeq.NFData Amazonka.StorageGateway.Types.DeviceiSCSIAttributes.DeviceiSCSIAttributes
+ Amazonka.StorageGateway.Types.DeviceiSCSIAttributes: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.StorageGateway.Types.DeviceiSCSIAttributes.DeviceiSCSIAttributes
+ Amazonka.StorageGateway.Types.DeviceiSCSIAttributes: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.Types.DeviceiSCSIAttributes.DeviceiSCSIAttributes
+ Amazonka.StorageGateway.Types.DeviceiSCSIAttributes: instance GHC.Classes.Eq Amazonka.StorageGateway.Types.DeviceiSCSIAttributes.DeviceiSCSIAttributes
+ Amazonka.StorageGateway.Types.DeviceiSCSIAttributes: instance GHC.Generics.Generic Amazonka.StorageGateway.Types.DeviceiSCSIAttributes.DeviceiSCSIAttributes
+ Amazonka.StorageGateway.Types.DeviceiSCSIAttributes: instance GHC.Read.Read Amazonka.StorageGateway.Types.DeviceiSCSIAttributes.DeviceiSCSIAttributes
+ Amazonka.StorageGateway.Types.DeviceiSCSIAttributes: instance GHC.Show.Show Amazonka.StorageGateway.Types.DeviceiSCSIAttributes.DeviceiSCSIAttributes
+ Amazonka.StorageGateway.Types.DeviceiSCSIAttributes: newDeviceiSCSIAttributes :: DeviceiSCSIAttributes
+ Amazonka.StorageGateway.Types.Disk: Disk' :: Maybe Text -> Maybe Text -> Maybe [Text] -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Integer -> Maybe Text -> Disk
+ Amazonka.StorageGateway.Types.Disk: [$sel:diskAllocationResource:Disk'] :: Disk -> Maybe Text
+ Amazonka.StorageGateway.Types.Disk: [$sel:diskAllocationType:Disk'] :: Disk -> Maybe Text
+ Amazonka.StorageGateway.Types.Disk: [$sel:diskAttributeList:Disk'] :: Disk -> Maybe [Text]
+ Amazonka.StorageGateway.Types.Disk: [$sel:diskId:Disk'] :: Disk -> Maybe Text
+ Amazonka.StorageGateway.Types.Disk: [$sel:diskNode:Disk'] :: Disk -> Maybe Text
+ Amazonka.StorageGateway.Types.Disk: [$sel:diskPath:Disk'] :: Disk -> Maybe Text
+ Amazonka.StorageGateway.Types.Disk: [$sel:diskSizeInBytes:Disk'] :: Disk -> Maybe Integer
+ Amazonka.StorageGateway.Types.Disk: [$sel:diskStatus:Disk'] :: Disk -> Maybe Text
+ Amazonka.StorageGateway.Types.Disk: data Disk
+ Amazonka.StorageGateway.Types.Disk: disk_diskAllocationResource :: Lens' Disk (Maybe Text)
+ Amazonka.StorageGateway.Types.Disk: disk_diskAllocationType :: Lens' Disk (Maybe Text)
+ Amazonka.StorageGateway.Types.Disk: disk_diskAttributeList :: Lens' Disk (Maybe [Text])
+ Amazonka.StorageGateway.Types.Disk: disk_diskId :: Lens' Disk (Maybe Text)
+ Amazonka.StorageGateway.Types.Disk: disk_diskNode :: Lens' Disk (Maybe Text)
+ Amazonka.StorageGateway.Types.Disk: disk_diskPath :: Lens' Disk (Maybe Text)
+ Amazonka.StorageGateway.Types.Disk: disk_diskSizeInBytes :: Lens' Disk (Maybe Integer)
+ Amazonka.StorageGateway.Types.Disk: disk_diskStatus :: Lens' Disk (Maybe Text)
+ Amazonka.StorageGateway.Types.Disk: instance Control.DeepSeq.NFData Amazonka.StorageGateway.Types.Disk.Disk
+ Amazonka.StorageGateway.Types.Disk: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.StorageGateway.Types.Disk.Disk
+ Amazonka.StorageGateway.Types.Disk: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.Types.Disk.Disk
+ Amazonka.StorageGateway.Types.Disk: instance GHC.Classes.Eq Amazonka.StorageGateway.Types.Disk.Disk
+ Amazonka.StorageGateway.Types.Disk: instance GHC.Generics.Generic Amazonka.StorageGateway.Types.Disk.Disk
+ Amazonka.StorageGateway.Types.Disk: instance GHC.Read.Read Amazonka.StorageGateway.Types.Disk.Disk
+ Amazonka.StorageGateway.Types.Disk: instance GHC.Show.Show Amazonka.StorageGateway.Types.Disk.Disk
+ Amazonka.StorageGateway.Types.Disk: newDisk :: Disk
+ Amazonka.StorageGateway.Types.EndpointNetworkConfiguration: EndpointNetworkConfiguration' :: Maybe [Text] -> EndpointNetworkConfiguration
+ Amazonka.StorageGateway.Types.EndpointNetworkConfiguration: [$sel:ipAddresses:EndpointNetworkConfiguration'] :: EndpointNetworkConfiguration -> Maybe [Text]
+ Amazonka.StorageGateway.Types.EndpointNetworkConfiguration: data EndpointNetworkConfiguration
+ Amazonka.StorageGateway.Types.EndpointNetworkConfiguration: endpointNetworkConfiguration_ipAddresses :: Lens' EndpointNetworkConfiguration (Maybe [Text])
+ Amazonka.StorageGateway.Types.EndpointNetworkConfiguration: instance Control.DeepSeq.NFData Amazonka.StorageGateway.Types.EndpointNetworkConfiguration.EndpointNetworkConfiguration
+ Amazonka.StorageGateway.Types.EndpointNetworkConfiguration: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.StorageGateway.Types.EndpointNetworkConfiguration.EndpointNetworkConfiguration
+ Amazonka.StorageGateway.Types.EndpointNetworkConfiguration: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.Types.EndpointNetworkConfiguration.EndpointNetworkConfiguration
+ Amazonka.StorageGateway.Types.EndpointNetworkConfiguration: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.Types.EndpointNetworkConfiguration.EndpointNetworkConfiguration
+ Amazonka.StorageGateway.Types.EndpointNetworkConfiguration: instance GHC.Classes.Eq Amazonka.StorageGateway.Types.EndpointNetworkConfiguration.EndpointNetworkConfiguration
+ Amazonka.StorageGateway.Types.EndpointNetworkConfiguration: instance GHC.Generics.Generic Amazonka.StorageGateway.Types.EndpointNetworkConfiguration.EndpointNetworkConfiguration
+ Amazonka.StorageGateway.Types.EndpointNetworkConfiguration: instance GHC.Read.Read Amazonka.StorageGateway.Types.EndpointNetworkConfiguration.EndpointNetworkConfiguration
+ Amazonka.StorageGateway.Types.EndpointNetworkConfiguration: instance GHC.Show.Show Amazonka.StorageGateway.Types.EndpointNetworkConfiguration.EndpointNetworkConfiguration
+ Amazonka.StorageGateway.Types.EndpointNetworkConfiguration: newEndpointNetworkConfiguration :: EndpointNetworkConfiguration
+ Amazonka.StorageGateway.Types.FileShareInfo: FileShareInfo' :: Maybe Text -> Maybe Text -> Maybe Text -> Maybe FileShareType -> Maybe Text -> FileShareInfo
+ Amazonka.StorageGateway.Types.FileShareInfo: [$sel:fileShareARN:FileShareInfo'] :: FileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.FileShareInfo: [$sel:fileShareId:FileShareInfo'] :: FileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.FileShareInfo: [$sel:fileShareStatus:FileShareInfo'] :: FileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.FileShareInfo: [$sel:fileShareType:FileShareInfo'] :: FileShareInfo -> Maybe FileShareType
+ Amazonka.StorageGateway.Types.FileShareInfo: [$sel:gatewayARN:FileShareInfo'] :: FileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.FileShareInfo: data FileShareInfo
+ Amazonka.StorageGateway.Types.FileShareInfo: fileShareInfo_fileShareARN :: Lens' FileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.FileShareInfo: fileShareInfo_fileShareId :: Lens' FileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.FileShareInfo: fileShareInfo_fileShareStatus :: Lens' FileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.FileShareInfo: fileShareInfo_fileShareType :: Lens' FileShareInfo (Maybe FileShareType)
+ Amazonka.StorageGateway.Types.FileShareInfo: fileShareInfo_gatewayARN :: Lens' FileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.FileShareInfo: instance Control.DeepSeq.NFData Amazonka.StorageGateway.Types.FileShareInfo.FileShareInfo
+ Amazonka.StorageGateway.Types.FileShareInfo: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.StorageGateway.Types.FileShareInfo.FileShareInfo
+ Amazonka.StorageGateway.Types.FileShareInfo: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.Types.FileShareInfo.FileShareInfo
+ Amazonka.StorageGateway.Types.FileShareInfo: instance GHC.Classes.Eq Amazonka.StorageGateway.Types.FileShareInfo.FileShareInfo
+ Amazonka.StorageGateway.Types.FileShareInfo: instance GHC.Generics.Generic Amazonka.StorageGateway.Types.FileShareInfo.FileShareInfo
+ Amazonka.StorageGateway.Types.FileShareInfo: instance GHC.Read.Read Amazonka.StorageGateway.Types.FileShareInfo.FileShareInfo
+ Amazonka.StorageGateway.Types.FileShareInfo: instance GHC.Show.Show Amazonka.StorageGateway.Types.FileShareInfo.FileShareInfo
+ Amazonka.StorageGateway.Types.FileShareInfo: newFileShareInfo :: FileShareInfo
+ Amazonka.StorageGateway.Types.FileShareType: FileShareType' :: Text -> FileShareType
+ Amazonka.StorageGateway.Types.FileShareType: [fromFileShareType] :: FileShareType -> Text
+ Amazonka.StorageGateway.Types.FileShareType: instance Amazonka.Data.ByteString.ToByteString Amazonka.StorageGateway.Types.FileShareType.FileShareType
+ Amazonka.StorageGateway.Types.FileShareType: instance Amazonka.Data.Headers.ToHeader Amazonka.StorageGateway.Types.FileShareType.FileShareType
+ Amazonka.StorageGateway.Types.FileShareType: instance Amazonka.Data.Log.ToLog Amazonka.StorageGateway.Types.FileShareType.FileShareType
+ Amazonka.StorageGateway.Types.FileShareType: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.Types.FileShareType.FileShareType
+ Amazonka.StorageGateway.Types.FileShareType: instance Amazonka.Data.Text.FromText Amazonka.StorageGateway.Types.FileShareType.FileShareType
+ Amazonka.StorageGateway.Types.FileShareType: instance Amazonka.Data.Text.ToText Amazonka.StorageGateway.Types.FileShareType.FileShareType
+ Amazonka.StorageGateway.Types.FileShareType: instance Amazonka.Data.XML.FromXML Amazonka.StorageGateway.Types.FileShareType.FileShareType
+ Amazonka.StorageGateway.Types.FileShareType: instance Amazonka.Data.XML.ToXML Amazonka.StorageGateway.Types.FileShareType.FileShareType
+ Amazonka.StorageGateway.Types.FileShareType: instance Control.DeepSeq.NFData Amazonka.StorageGateway.Types.FileShareType.FileShareType
+ Amazonka.StorageGateway.Types.FileShareType: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.StorageGateway.Types.FileShareType.FileShareType
+ Amazonka.StorageGateway.Types.FileShareType: instance Data.Aeson.Types.FromJSON.FromJSONKey Amazonka.StorageGateway.Types.FileShareType.FileShareType
+ Amazonka.StorageGateway.Types.FileShareType: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.Types.FileShareType.FileShareType
+ Amazonka.StorageGateway.Types.FileShareType: instance Data.Aeson.Types.ToJSON.ToJSONKey Amazonka.StorageGateway.Types.FileShareType.FileShareType
+ Amazonka.StorageGateway.Types.FileShareType: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.Types.FileShareType.FileShareType
+ Amazonka.StorageGateway.Types.FileShareType: instance GHC.Classes.Eq Amazonka.StorageGateway.Types.FileShareType.FileShareType
+ Amazonka.StorageGateway.Types.FileShareType: instance GHC.Classes.Ord Amazonka.StorageGateway.Types.FileShareType.FileShareType
+ Amazonka.StorageGateway.Types.FileShareType: instance GHC.Generics.Generic Amazonka.StorageGateway.Types.FileShareType.FileShareType
+ Amazonka.StorageGateway.Types.FileShareType: instance GHC.Read.Read Amazonka.StorageGateway.Types.FileShareType.FileShareType
+ Amazonka.StorageGateway.Types.FileShareType: instance GHC.Show.Show Amazonka.StorageGateway.Types.FileShareType.FileShareType
+ Amazonka.StorageGateway.Types.FileShareType: newtype FileShareType
+ Amazonka.StorageGateway.Types.FileShareType: pattern FileShareType_NFS :: FileShareType
+ Amazonka.StorageGateway.Types.FileShareType: pattern FileShareType_SMB :: FileShareType
+ Amazonka.StorageGateway.Types.FileSystemAssociationInfo: FileSystemAssociationInfo' :: Maybe Text -> Maybe CacheAttributes -> Maybe EndpointNetworkConfiguration -> Maybe Text -> Maybe Text -> Maybe [FileSystemAssociationStatusDetail] -> Maybe Text -> Maybe Text -> Maybe [Tag] -> FileSystemAssociationInfo
+ Amazonka.StorageGateway.Types.FileSystemAssociationInfo: [$sel:auditDestinationARN:FileSystemAssociationInfo'] :: FileSystemAssociationInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.FileSystemAssociationInfo: [$sel:cacheAttributes:FileSystemAssociationInfo'] :: FileSystemAssociationInfo -> Maybe CacheAttributes
+ Amazonka.StorageGateway.Types.FileSystemAssociationInfo: [$sel:endpointNetworkConfiguration:FileSystemAssociationInfo'] :: FileSystemAssociationInfo -> Maybe EndpointNetworkConfiguration
+ Amazonka.StorageGateway.Types.FileSystemAssociationInfo: [$sel:fileSystemAssociationARN:FileSystemAssociationInfo'] :: FileSystemAssociationInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.FileSystemAssociationInfo: [$sel:fileSystemAssociationStatus:FileSystemAssociationInfo'] :: FileSystemAssociationInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.FileSystemAssociationInfo: [$sel:fileSystemAssociationStatusDetails:FileSystemAssociationInfo'] :: FileSystemAssociationInfo -> Maybe [FileSystemAssociationStatusDetail]
+ Amazonka.StorageGateway.Types.FileSystemAssociationInfo: [$sel:gatewayARN:FileSystemAssociationInfo'] :: FileSystemAssociationInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.FileSystemAssociationInfo: [$sel:locationARN:FileSystemAssociationInfo'] :: FileSystemAssociationInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.FileSystemAssociationInfo: [$sel:tags:FileSystemAssociationInfo'] :: FileSystemAssociationInfo -> Maybe [Tag]
+ Amazonka.StorageGateway.Types.FileSystemAssociationInfo: data FileSystemAssociationInfo
+ Amazonka.StorageGateway.Types.FileSystemAssociationInfo: fileSystemAssociationInfo_auditDestinationARN :: Lens' FileSystemAssociationInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.FileSystemAssociationInfo: fileSystemAssociationInfo_cacheAttributes :: Lens' FileSystemAssociationInfo (Maybe CacheAttributes)
+ Amazonka.StorageGateway.Types.FileSystemAssociationInfo: fileSystemAssociationInfo_endpointNetworkConfiguration :: Lens' FileSystemAssociationInfo (Maybe EndpointNetworkConfiguration)
+ Amazonka.StorageGateway.Types.FileSystemAssociationInfo: fileSystemAssociationInfo_fileSystemAssociationARN :: Lens' FileSystemAssociationInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.FileSystemAssociationInfo: fileSystemAssociationInfo_fileSystemAssociationStatus :: Lens' FileSystemAssociationInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.FileSystemAssociationInfo: fileSystemAssociationInfo_fileSystemAssociationStatusDetails :: Lens' FileSystemAssociationInfo (Maybe [FileSystemAssociationStatusDetail])
+ Amazonka.StorageGateway.Types.FileSystemAssociationInfo: fileSystemAssociationInfo_gatewayARN :: Lens' FileSystemAssociationInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.FileSystemAssociationInfo: fileSystemAssociationInfo_locationARN :: Lens' FileSystemAssociationInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.FileSystemAssociationInfo: fileSystemAssociationInfo_tags :: Lens' FileSystemAssociationInfo (Maybe [Tag])
+ Amazonka.StorageGateway.Types.FileSystemAssociationInfo: instance Control.DeepSeq.NFData Amazonka.StorageGateway.Types.FileSystemAssociationInfo.FileSystemAssociationInfo
+ Amazonka.StorageGateway.Types.FileSystemAssociationInfo: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.StorageGateway.Types.FileSystemAssociationInfo.FileSystemAssociationInfo
+ Amazonka.StorageGateway.Types.FileSystemAssociationInfo: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.Types.FileSystemAssociationInfo.FileSystemAssociationInfo
+ Amazonka.StorageGateway.Types.FileSystemAssociationInfo: instance GHC.Classes.Eq Amazonka.StorageGateway.Types.FileSystemAssociationInfo.FileSystemAssociationInfo
+ Amazonka.StorageGateway.Types.FileSystemAssociationInfo: instance GHC.Generics.Generic Amazonka.StorageGateway.Types.FileSystemAssociationInfo.FileSystemAssociationInfo
+ Amazonka.StorageGateway.Types.FileSystemAssociationInfo: instance GHC.Read.Read Amazonka.StorageGateway.Types.FileSystemAssociationInfo.FileSystemAssociationInfo
+ Amazonka.StorageGateway.Types.FileSystemAssociationInfo: instance GHC.Show.Show Amazonka.StorageGateway.Types.FileSystemAssociationInfo.FileSystemAssociationInfo
+ Amazonka.StorageGateway.Types.FileSystemAssociationInfo: newFileSystemAssociationInfo :: FileSystemAssociationInfo
+ Amazonka.StorageGateway.Types.FileSystemAssociationStatusDetail: FileSystemAssociationStatusDetail' :: Maybe Text -> FileSystemAssociationStatusDetail
+ Amazonka.StorageGateway.Types.FileSystemAssociationStatusDetail: [$sel:errorCode:FileSystemAssociationStatusDetail'] :: FileSystemAssociationStatusDetail -> Maybe Text
+ Amazonka.StorageGateway.Types.FileSystemAssociationStatusDetail: data FileSystemAssociationStatusDetail
+ Amazonka.StorageGateway.Types.FileSystemAssociationStatusDetail: fileSystemAssociationStatusDetail_errorCode :: Lens' FileSystemAssociationStatusDetail (Maybe Text)
+ Amazonka.StorageGateway.Types.FileSystemAssociationStatusDetail: instance Control.DeepSeq.NFData Amazonka.StorageGateway.Types.FileSystemAssociationStatusDetail.FileSystemAssociationStatusDetail
+ Amazonka.StorageGateway.Types.FileSystemAssociationStatusDetail: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.StorageGateway.Types.FileSystemAssociationStatusDetail.FileSystemAssociationStatusDetail
+ Amazonka.StorageGateway.Types.FileSystemAssociationStatusDetail: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.Types.FileSystemAssociationStatusDetail.FileSystemAssociationStatusDetail
+ Amazonka.StorageGateway.Types.FileSystemAssociationStatusDetail: instance GHC.Classes.Eq Amazonka.StorageGateway.Types.FileSystemAssociationStatusDetail.FileSystemAssociationStatusDetail
+ Amazonka.StorageGateway.Types.FileSystemAssociationStatusDetail: instance GHC.Generics.Generic Amazonka.StorageGateway.Types.FileSystemAssociationStatusDetail.FileSystemAssociationStatusDetail
+ Amazonka.StorageGateway.Types.FileSystemAssociationStatusDetail: instance GHC.Read.Read Amazonka.StorageGateway.Types.FileSystemAssociationStatusDetail.FileSystemAssociationStatusDetail
+ Amazonka.StorageGateway.Types.FileSystemAssociationStatusDetail: instance GHC.Show.Show Amazonka.StorageGateway.Types.FileSystemAssociationStatusDetail.FileSystemAssociationStatusDetail
+ Amazonka.StorageGateway.Types.FileSystemAssociationStatusDetail: newFileSystemAssociationStatusDetail :: FileSystemAssociationStatusDetail
+ Amazonka.StorageGateway.Types.FileSystemAssociationSummary: FileSystemAssociationSummary' :: Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> FileSystemAssociationSummary
+ Amazonka.StorageGateway.Types.FileSystemAssociationSummary: [$sel:fileSystemAssociationARN:FileSystemAssociationSummary'] :: FileSystemAssociationSummary -> Maybe Text
+ Amazonka.StorageGateway.Types.FileSystemAssociationSummary: [$sel:fileSystemAssociationId:FileSystemAssociationSummary'] :: FileSystemAssociationSummary -> Maybe Text
+ Amazonka.StorageGateway.Types.FileSystemAssociationSummary: [$sel:fileSystemAssociationStatus:FileSystemAssociationSummary'] :: FileSystemAssociationSummary -> Maybe Text
+ Amazonka.StorageGateway.Types.FileSystemAssociationSummary: [$sel:gatewayARN:FileSystemAssociationSummary'] :: FileSystemAssociationSummary -> Maybe Text
+ Amazonka.StorageGateway.Types.FileSystemAssociationSummary: data FileSystemAssociationSummary
+ Amazonka.StorageGateway.Types.FileSystemAssociationSummary: fileSystemAssociationSummary_fileSystemAssociationARN :: Lens' FileSystemAssociationSummary (Maybe Text)
+ Amazonka.StorageGateway.Types.FileSystemAssociationSummary: fileSystemAssociationSummary_fileSystemAssociationId :: Lens' FileSystemAssociationSummary (Maybe Text)
+ Amazonka.StorageGateway.Types.FileSystemAssociationSummary: fileSystemAssociationSummary_fileSystemAssociationStatus :: Lens' FileSystemAssociationSummary (Maybe Text)
+ Amazonka.StorageGateway.Types.FileSystemAssociationSummary: fileSystemAssociationSummary_gatewayARN :: Lens' FileSystemAssociationSummary (Maybe Text)
+ Amazonka.StorageGateway.Types.FileSystemAssociationSummary: instance Control.DeepSeq.NFData Amazonka.StorageGateway.Types.FileSystemAssociationSummary.FileSystemAssociationSummary
+ Amazonka.StorageGateway.Types.FileSystemAssociationSummary: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.StorageGateway.Types.FileSystemAssociationSummary.FileSystemAssociationSummary
+ Amazonka.StorageGateway.Types.FileSystemAssociationSummary: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.Types.FileSystemAssociationSummary.FileSystemAssociationSummary
+ Amazonka.StorageGateway.Types.FileSystemAssociationSummary: instance GHC.Classes.Eq Amazonka.StorageGateway.Types.FileSystemAssociationSummary.FileSystemAssociationSummary
+ Amazonka.StorageGateway.Types.FileSystemAssociationSummary: instance GHC.Generics.Generic Amazonka.StorageGateway.Types.FileSystemAssociationSummary.FileSystemAssociationSummary
+ Amazonka.StorageGateway.Types.FileSystemAssociationSummary: instance GHC.Read.Read Amazonka.StorageGateway.Types.FileSystemAssociationSummary.FileSystemAssociationSummary
+ Amazonka.StorageGateway.Types.FileSystemAssociationSummary: instance GHC.Show.Show Amazonka.StorageGateway.Types.FileSystemAssociationSummary.FileSystemAssociationSummary
+ Amazonka.StorageGateway.Types.FileSystemAssociationSummary: newFileSystemAssociationSummary :: FileSystemAssociationSummary
+ Amazonka.StorageGateway.Types.GatewayCapacity: GatewayCapacity' :: Text -> GatewayCapacity
+ Amazonka.StorageGateway.Types.GatewayCapacity: [fromGatewayCapacity] :: GatewayCapacity -> Text
+ Amazonka.StorageGateway.Types.GatewayCapacity: instance Amazonka.Data.ByteString.ToByteString Amazonka.StorageGateway.Types.GatewayCapacity.GatewayCapacity
+ Amazonka.StorageGateway.Types.GatewayCapacity: instance Amazonka.Data.Headers.ToHeader Amazonka.StorageGateway.Types.GatewayCapacity.GatewayCapacity
+ Amazonka.StorageGateway.Types.GatewayCapacity: instance Amazonka.Data.Log.ToLog Amazonka.StorageGateway.Types.GatewayCapacity.GatewayCapacity
+ Amazonka.StorageGateway.Types.GatewayCapacity: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.Types.GatewayCapacity.GatewayCapacity
+ Amazonka.StorageGateway.Types.GatewayCapacity: instance Amazonka.Data.Text.FromText Amazonka.StorageGateway.Types.GatewayCapacity.GatewayCapacity
+ Amazonka.StorageGateway.Types.GatewayCapacity: instance Amazonka.Data.Text.ToText Amazonka.StorageGateway.Types.GatewayCapacity.GatewayCapacity
+ Amazonka.StorageGateway.Types.GatewayCapacity: instance Amazonka.Data.XML.FromXML Amazonka.StorageGateway.Types.GatewayCapacity.GatewayCapacity
+ Amazonka.StorageGateway.Types.GatewayCapacity: instance Amazonka.Data.XML.ToXML Amazonka.StorageGateway.Types.GatewayCapacity.GatewayCapacity
+ Amazonka.StorageGateway.Types.GatewayCapacity: instance Control.DeepSeq.NFData Amazonka.StorageGateway.Types.GatewayCapacity.GatewayCapacity
+ Amazonka.StorageGateway.Types.GatewayCapacity: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.StorageGateway.Types.GatewayCapacity.GatewayCapacity
+ Amazonka.StorageGateway.Types.GatewayCapacity: instance Data.Aeson.Types.FromJSON.FromJSONKey Amazonka.StorageGateway.Types.GatewayCapacity.GatewayCapacity
+ Amazonka.StorageGateway.Types.GatewayCapacity: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.Types.GatewayCapacity.GatewayCapacity
+ Amazonka.StorageGateway.Types.GatewayCapacity: instance Data.Aeson.Types.ToJSON.ToJSONKey Amazonka.StorageGateway.Types.GatewayCapacity.GatewayCapacity
+ Amazonka.StorageGateway.Types.GatewayCapacity: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.Types.GatewayCapacity.GatewayCapacity
+ Amazonka.StorageGateway.Types.GatewayCapacity: instance GHC.Classes.Eq Amazonka.StorageGateway.Types.GatewayCapacity.GatewayCapacity
+ Amazonka.StorageGateway.Types.GatewayCapacity: instance GHC.Classes.Ord Amazonka.StorageGateway.Types.GatewayCapacity.GatewayCapacity
+ Amazonka.StorageGateway.Types.GatewayCapacity: instance GHC.Generics.Generic Amazonka.StorageGateway.Types.GatewayCapacity.GatewayCapacity
+ Amazonka.StorageGateway.Types.GatewayCapacity: instance GHC.Read.Read Amazonka.StorageGateway.Types.GatewayCapacity.GatewayCapacity
+ Amazonka.StorageGateway.Types.GatewayCapacity: instance GHC.Show.Show Amazonka.StorageGateway.Types.GatewayCapacity.GatewayCapacity
+ Amazonka.StorageGateway.Types.GatewayCapacity: newtype GatewayCapacity
+ Amazonka.StorageGateway.Types.GatewayCapacity: pattern GatewayCapacity_Large :: GatewayCapacity
+ Amazonka.StorageGateway.Types.GatewayCapacity: pattern GatewayCapacity_Medium :: GatewayCapacity
+ Amazonka.StorageGateway.Types.GatewayCapacity: pattern GatewayCapacity_Small :: GatewayCapacity
+ Amazonka.StorageGateway.Types.GatewayInfo: GatewayInfo' :: Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe HostEnvironment -> Maybe Text -> GatewayInfo
+ Amazonka.StorageGateway.Types.GatewayInfo: [$sel:ec2InstanceId:GatewayInfo'] :: GatewayInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.GatewayInfo: [$sel:ec2InstanceRegion:GatewayInfo'] :: GatewayInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.GatewayInfo: [$sel:gatewayARN:GatewayInfo'] :: GatewayInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.GatewayInfo: [$sel:gatewayId:GatewayInfo'] :: GatewayInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.GatewayInfo: [$sel:gatewayName:GatewayInfo'] :: GatewayInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.GatewayInfo: [$sel:gatewayOperationalState:GatewayInfo'] :: GatewayInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.GatewayInfo: [$sel:gatewayType:GatewayInfo'] :: GatewayInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.GatewayInfo: [$sel:hostEnvironment:GatewayInfo'] :: GatewayInfo -> Maybe HostEnvironment
+ Amazonka.StorageGateway.Types.GatewayInfo: [$sel:hostEnvironmentId:GatewayInfo'] :: GatewayInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.GatewayInfo: data GatewayInfo
+ Amazonka.StorageGateway.Types.GatewayInfo: gatewayInfo_ec2InstanceId :: Lens' GatewayInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.GatewayInfo: gatewayInfo_ec2InstanceRegion :: Lens' GatewayInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.GatewayInfo: gatewayInfo_gatewayARN :: Lens' GatewayInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.GatewayInfo: gatewayInfo_gatewayId :: Lens' GatewayInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.GatewayInfo: gatewayInfo_gatewayName :: Lens' GatewayInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.GatewayInfo: gatewayInfo_gatewayOperationalState :: Lens' GatewayInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.GatewayInfo: gatewayInfo_gatewayType :: Lens' GatewayInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.GatewayInfo: gatewayInfo_hostEnvironment :: Lens' GatewayInfo (Maybe HostEnvironment)
+ Amazonka.StorageGateway.Types.GatewayInfo: gatewayInfo_hostEnvironmentId :: Lens' GatewayInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.GatewayInfo: instance Control.DeepSeq.NFData Amazonka.StorageGateway.Types.GatewayInfo.GatewayInfo
+ Amazonka.StorageGateway.Types.GatewayInfo: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.StorageGateway.Types.GatewayInfo.GatewayInfo
+ Amazonka.StorageGateway.Types.GatewayInfo: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.Types.GatewayInfo.GatewayInfo
+ Amazonka.StorageGateway.Types.GatewayInfo: instance GHC.Classes.Eq Amazonka.StorageGateway.Types.GatewayInfo.GatewayInfo
+ Amazonka.StorageGateway.Types.GatewayInfo: instance GHC.Generics.Generic Amazonka.StorageGateway.Types.GatewayInfo.GatewayInfo
+ Amazonka.StorageGateway.Types.GatewayInfo: instance GHC.Read.Read Amazonka.StorageGateway.Types.GatewayInfo.GatewayInfo
+ Amazonka.StorageGateway.Types.GatewayInfo: instance GHC.Show.Show Amazonka.StorageGateway.Types.GatewayInfo.GatewayInfo
+ Amazonka.StorageGateway.Types.GatewayInfo: newGatewayInfo :: GatewayInfo
+ Amazonka.StorageGateway.Types.HostEnvironment: HostEnvironment' :: Text -> HostEnvironment
+ Amazonka.StorageGateway.Types.HostEnvironment: [fromHostEnvironment] :: HostEnvironment -> Text
+ Amazonka.StorageGateway.Types.HostEnvironment: instance Amazonka.Data.ByteString.ToByteString Amazonka.StorageGateway.Types.HostEnvironment.HostEnvironment
+ Amazonka.StorageGateway.Types.HostEnvironment: instance Amazonka.Data.Headers.ToHeader Amazonka.StorageGateway.Types.HostEnvironment.HostEnvironment
+ Amazonka.StorageGateway.Types.HostEnvironment: instance Amazonka.Data.Log.ToLog Amazonka.StorageGateway.Types.HostEnvironment.HostEnvironment
+ Amazonka.StorageGateway.Types.HostEnvironment: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.Types.HostEnvironment.HostEnvironment
+ Amazonka.StorageGateway.Types.HostEnvironment: instance Amazonka.Data.Text.FromText Amazonka.StorageGateway.Types.HostEnvironment.HostEnvironment
+ Amazonka.StorageGateway.Types.HostEnvironment: instance Amazonka.Data.Text.ToText Amazonka.StorageGateway.Types.HostEnvironment.HostEnvironment
+ Amazonka.StorageGateway.Types.HostEnvironment: instance Amazonka.Data.XML.FromXML Amazonka.StorageGateway.Types.HostEnvironment.HostEnvironment
+ Amazonka.StorageGateway.Types.HostEnvironment: instance Amazonka.Data.XML.ToXML Amazonka.StorageGateway.Types.HostEnvironment.HostEnvironment
+ Amazonka.StorageGateway.Types.HostEnvironment: instance Control.DeepSeq.NFData Amazonka.StorageGateway.Types.HostEnvironment.HostEnvironment
+ Amazonka.StorageGateway.Types.HostEnvironment: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.StorageGateway.Types.HostEnvironment.HostEnvironment
+ Amazonka.StorageGateway.Types.HostEnvironment: instance Data.Aeson.Types.FromJSON.FromJSONKey Amazonka.StorageGateway.Types.HostEnvironment.HostEnvironment
+ Amazonka.StorageGateway.Types.HostEnvironment: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.Types.HostEnvironment.HostEnvironment
+ Amazonka.StorageGateway.Types.HostEnvironment: instance Data.Aeson.Types.ToJSON.ToJSONKey Amazonka.StorageGateway.Types.HostEnvironment.HostEnvironment
+ Amazonka.StorageGateway.Types.HostEnvironment: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.Types.HostEnvironment.HostEnvironment
+ Amazonka.StorageGateway.Types.HostEnvironment: instance GHC.Classes.Eq Amazonka.StorageGateway.Types.HostEnvironment.HostEnvironment
+ Amazonka.StorageGateway.Types.HostEnvironment: instance GHC.Classes.Ord Amazonka.StorageGateway.Types.HostEnvironment.HostEnvironment
+ Amazonka.StorageGateway.Types.HostEnvironment: instance GHC.Generics.Generic Amazonka.StorageGateway.Types.HostEnvironment.HostEnvironment
+ Amazonka.StorageGateway.Types.HostEnvironment: instance GHC.Read.Read Amazonka.StorageGateway.Types.HostEnvironment.HostEnvironment
+ Amazonka.StorageGateway.Types.HostEnvironment: instance GHC.Show.Show Amazonka.StorageGateway.Types.HostEnvironment.HostEnvironment
+ Amazonka.StorageGateway.Types.HostEnvironment: newtype HostEnvironment
+ Amazonka.StorageGateway.Types.HostEnvironment: pattern HostEnvironment_EC2 :: HostEnvironment
+ Amazonka.StorageGateway.Types.HostEnvironment: pattern HostEnvironment_HYPER_V :: HostEnvironment
+ Amazonka.StorageGateway.Types.HostEnvironment: pattern HostEnvironment_KVM :: HostEnvironment
+ Amazonka.StorageGateway.Types.HostEnvironment: pattern HostEnvironment_OTHER :: HostEnvironment
+ Amazonka.StorageGateway.Types.HostEnvironment: pattern HostEnvironment_SNOWBALL :: HostEnvironment
+ Amazonka.StorageGateway.Types.HostEnvironment: pattern HostEnvironment_VMWARE :: HostEnvironment
+ Amazonka.StorageGateway.Types.NFSFileShareDefaults: NFSFileShareDefaults' :: Maybe Text -> Maybe Text -> Maybe Natural -> Maybe Natural -> NFSFileShareDefaults
+ Amazonka.StorageGateway.Types.NFSFileShareDefaults: [$sel:directoryMode:NFSFileShareDefaults'] :: NFSFileShareDefaults -> Maybe Text
+ Amazonka.StorageGateway.Types.NFSFileShareDefaults: [$sel:fileMode:NFSFileShareDefaults'] :: NFSFileShareDefaults -> Maybe Text
+ Amazonka.StorageGateway.Types.NFSFileShareDefaults: [$sel:groupId:NFSFileShareDefaults'] :: NFSFileShareDefaults -> Maybe Natural
+ Amazonka.StorageGateway.Types.NFSFileShareDefaults: [$sel:ownerId:NFSFileShareDefaults'] :: NFSFileShareDefaults -> Maybe Natural
+ Amazonka.StorageGateway.Types.NFSFileShareDefaults: data NFSFileShareDefaults
+ Amazonka.StorageGateway.Types.NFSFileShareDefaults: instance Control.DeepSeq.NFData Amazonka.StorageGateway.Types.NFSFileShareDefaults.NFSFileShareDefaults
+ Amazonka.StorageGateway.Types.NFSFileShareDefaults: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.StorageGateway.Types.NFSFileShareDefaults.NFSFileShareDefaults
+ Amazonka.StorageGateway.Types.NFSFileShareDefaults: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.Types.NFSFileShareDefaults.NFSFileShareDefaults
+ Amazonka.StorageGateway.Types.NFSFileShareDefaults: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.Types.NFSFileShareDefaults.NFSFileShareDefaults
+ Amazonka.StorageGateway.Types.NFSFileShareDefaults: instance GHC.Classes.Eq Amazonka.StorageGateway.Types.NFSFileShareDefaults.NFSFileShareDefaults
+ Amazonka.StorageGateway.Types.NFSFileShareDefaults: instance GHC.Generics.Generic Amazonka.StorageGateway.Types.NFSFileShareDefaults.NFSFileShareDefaults
+ Amazonka.StorageGateway.Types.NFSFileShareDefaults: instance GHC.Read.Read Amazonka.StorageGateway.Types.NFSFileShareDefaults.NFSFileShareDefaults
+ Amazonka.StorageGateway.Types.NFSFileShareDefaults: instance GHC.Show.Show Amazonka.StorageGateway.Types.NFSFileShareDefaults.NFSFileShareDefaults
+ Amazonka.StorageGateway.Types.NFSFileShareDefaults: nFSFileShareDefaults_directoryMode :: Lens' NFSFileShareDefaults (Maybe Text)
+ Amazonka.StorageGateway.Types.NFSFileShareDefaults: nFSFileShareDefaults_fileMode :: Lens' NFSFileShareDefaults (Maybe Text)
+ Amazonka.StorageGateway.Types.NFSFileShareDefaults: nFSFileShareDefaults_groupId :: Lens' NFSFileShareDefaults (Maybe Natural)
+ Amazonka.StorageGateway.Types.NFSFileShareDefaults: nFSFileShareDefaults_ownerId :: Lens' NFSFileShareDefaults (Maybe Natural)
+ Amazonka.StorageGateway.Types.NFSFileShareDefaults: newNFSFileShareDefaults :: NFSFileShareDefaults
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: NFSFileShareInfo' :: Maybe Text -> Maybe Text -> Maybe CacheAttributes -> Maybe (NonEmpty Text) -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Bool -> Maybe Bool -> Maybe Text -> Maybe Text -> Maybe NFSFileShareDefaults -> Maybe Text -> Maybe ObjectACL -> Maybe Text -> Maybe Bool -> Maybe Bool -> Maybe Text -> Maybe Text -> Maybe [Tag] -> Maybe Text -> NFSFileShareInfo
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: [$sel:auditDestinationARN:NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: [$sel:bucketRegion:NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: [$sel:cacheAttributes:NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe CacheAttributes
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: [$sel:clientList:NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe (NonEmpty Text)
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: [$sel:defaultStorageClass:NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: [$sel:fileShareARN:NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: [$sel:fileShareId:NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: [$sel:fileShareName:NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: [$sel:fileShareStatus:NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: [$sel:gatewayARN:NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: [$sel:guessMIMETypeEnabled:NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe Bool
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: [$sel:kmsEncrypted:NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe Bool
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: [$sel:kmsKey:NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: [$sel:locationARN:NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: [$sel:nFSFileShareDefaults:NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe NFSFileShareDefaults
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: [$sel:notificationPolicy:NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: [$sel:objectACL:NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe ObjectACL
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: [$sel:path:NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: [$sel:readOnly:NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe Bool
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: [$sel:requesterPays:NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe Bool
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: [$sel:role':NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: [$sel:squash:NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: [$sel:tags:NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe [Tag]
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: [$sel:vPCEndpointDNSName:NFSFileShareInfo'] :: NFSFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: data NFSFileShareInfo
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: instance Control.DeepSeq.NFData Amazonka.StorageGateway.Types.NFSFileShareInfo.NFSFileShareInfo
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.StorageGateway.Types.NFSFileShareInfo.NFSFileShareInfo
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.Types.NFSFileShareInfo.NFSFileShareInfo
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: instance GHC.Classes.Eq Amazonka.StorageGateway.Types.NFSFileShareInfo.NFSFileShareInfo
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: instance GHC.Generics.Generic Amazonka.StorageGateway.Types.NFSFileShareInfo.NFSFileShareInfo
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: instance GHC.Read.Read Amazonka.StorageGateway.Types.NFSFileShareInfo.NFSFileShareInfo
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: instance GHC.Show.Show Amazonka.StorageGateway.Types.NFSFileShareInfo.NFSFileShareInfo
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: nFSFileShareInfo_auditDestinationARN :: Lens' NFSFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: nFSFileShareInfo_bucketRegion :: Lens' NFSFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: nFSFileShareInfo_cacheAttributes :: Lens' NFSFileShareInfo (Maybe CacheAttributes)
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: nFSFileShareInfo_clientList :: Lens' NFSFileShareInfo (Maybe (NonEmpty Text))
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: nFSFileShareInfo_defaultStorageClass :: Lens' NFSFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: nFSFileShareInfo_fileShareARN :: Lens' NFSFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: nFSFileShareInfo_fileShareId :: Lens' NFSFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: nFSFileShareInfo_fileShareName :: Lens' NFSFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: nFSFileShareInfo_fileShareStatus :: Lens' NFSFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: nFSFileShareInfo_gatewayARN :: Lens' NFSFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: nFSFileShareInfo_guessMIMETypeEnabled :: Lens' NFSFileShareInfo (Maybe Bool)
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: nFSFileShareInfo_kmsEncrypted :: Lens' NFSFileShareInfo (Maybe Bool)
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: nFSFileShareInfo_kmsKey :: Lens' NFSFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: nFSFileShareInfo_locationARN :: Lens' NFSFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: nFSFileShareInfo_nFSFileShareDefaults :: Lens' NFSFileShareInfo (Maybe NFSFileShareDefaults)
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: nFSFileShareInfo_notificationPolicy :: Lens' NFSFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: nFSFileShareInfo_objectACL :: Lens' NFSFileShareInfo (Maybe ObjectACL)
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: nFSFileShareInfo_path :: Lens' NFSFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: nFSFileShareInfo_readOnly :: Lens' NFSFileShareInfo (Maybe Bool)
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: nFSFileShareInfo_requesterPays :: Lens' NFSFileShareInfo (Maybe Bool)
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: nFSFileShareInfo_role :: Lens' NFSFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: nFSFileShareInfo_squash :: Lens' NFSFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: nFSFileShareInfo_tags :: Lens' NFSFileShareInfo (Maybe [Tag])
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: nFSFileShareInfo_vPCEndpointDNSName :: Lens' NFSFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.NFSFileShareInfo: newNFSFileShareInfo :: NFSFileShareInfo
+ Amazonka.StorageGateway.Types.NetworkInterface: NetworkInterface' :: Maybe Text -> Maybe Text -> Maybe Text -> NetworkInterface
+ Amazonka.StorageGateway.Types.NetworkInterface: [$sel:ipv4Address:NetworkInterface'] :: NetworkInterface -> Maybe Text
+ Amazonka.StorageGateway.Types.NetworkInterface: [$sel:ipv6Address:NetworkInterface'] :: NetworkInterface -> Maybe Text
+ Amazonka.StorageGateway.Types.NetworkInterface: [$sel:macAddress:NetworkInterface'] :: NetworkInterface -> Maybe Text
+ Amazonka.StorageGateway.Types.NetworkInterface: data NetworkInterface
+ Amazonka.StorageGateway.Types.NetworkInterface: instance Control.DeepSeq.NFData Amazonka.StorageGateway.Types.NetworkInterface.NetworkInterface
+ Amazonka.StorageGateway.Types.NetworkInterface: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.StorageGateway.Types.NetworkInterface.NetworkInterface
+ Amazonka.StorageGateway.Types.NetworkInterface: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.Types.NetworkInterface.NetworkInterface
+ Amazonka.StorageGateway.Types.NetworkInterface: instance GHC.Classes.Eq Amazonka.StorageGateway.Types.NetworkInterface.NetworkInterface
+ Amazonka.StorageGateway.Types.NetworkInterface: instance GHC.Generics.Generic Amazonka.StorageGateway.Types.NetworkInterface.NetworkInterface
+ Amazonka.StorageGateway.Types.NetworkInterface: instance GHC.Read.Read Amazonka.StorageGateway.Types.NetworkInterface.NetworkInterface
+ Amazonka.StorageGateway.Types.NetworkInterface: instance GHC.Show.Show Amazonka.StorageGateway.Types.NetworkInterface.NetworkInterface
+ Amazonka.StorageGateway.Types.NetworkInterface: networkInterface_ipv4Address :: Lens' NetworkInterface (Maybe Text)
+ Amazonka.StorageGateway.Types.NetworkInterface: networkInterface_ipv6Address :: Lens' NetworkInterface (Maybe Text)
+ Amazonka.StorageGateway.Types.NetworkInterface: networkInterface_macAddress :: Lens' NetworkInterface (Maybe Text)
+ Amazonka.StorageGateway.Types.NetworkInterface: newNetworkInterface :: NetworkInterface
+ Amazonka.StorageGateway.Types.ObjectACL: ObjectACL' :: Text -> ObjectACL
+ Amazonka.StorageGateway.Types.ObjectACL: [fromObjectACL] :: ObjectACL -> Text
+ Amazonka.StorageGateway.Types.ObjectACL: instance Amazonka.Data.ByteString.ToByteString Amazonka.StorageGateway.Types.ObjectACL.ObjectACL
+ Amazonka.StorageGateway.Types.ObjectACL: instance Amazonka.Data.Headers.ToHeader Amazonka.StorageGateway.Types.ObjectACL.ObjectACL
+ Amazonka.StorageGateway.Types.ObjectACL: instance Amazonka.Data.Log.ToLog Amazonka.StorageGateway.Types.ObjectACL.ObjectACL
+ Amazonka.StorageGateway.Types.ObjectACL: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.Types.ObjectACL.ObjectACL
+ Amazonka.StorageGateway.Types.ObjectACL: instance Amazonka.Data.Text.FromText Amazonka.StorageGateway.Types.ObjectACL.ObjectACL
+ Amazonka.StorageGateway.Types.ObjectACL: instance Amazonka.Data.Text.ToText Amazonka.StorageGateway.Types.ObjectACL.ObjectACL
+ Amazonka.StorageGateway.Types.ObjectACL: instance Amazonka.Data.XML.FromXML Amazonka.StorageGateway.Types.ObjectACL.ObjectACL
+ Amazonka.StorageGateway.Types.ObjectACL: instance Amazonka.Data.XML.ToXML Amazonka.StorageGateway.Types.ObjectACL.ObjectACL
+ Amazonka.StorageGateway.Types.ObjectACL: instance Control.DeepSeq.NFData Amazonka.StorageGateway.Types.ObjectACL.ObjectACL
+ Amazonka.StorageGateway.Types.ObjectACL: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.StorageGateway.Types.ObjectACL.ObjectACL
+ Amazonka.StorageGateway.Types.ObjectACL: instance Data.Aeson.Types.FromJSON.FromJSONKey Amazonka.StorageGateway.Types.ObjectACL.ObjectACL
+ Amazonka.StorageGateway.Types.ObjectACL: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.Types.ObjectACL.ObjectACL
+ Amazonka.StorageGateway.Types.ObjectACL: instance Data.Aeson.Types.ToJSON.ToJSONKey Amazonka.StorageGateway.Types.ObjectACL.ObjectACL
+ Amazonka.StorageGateway.Types.ObjectACL: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.Types.ObjectACL.ObjectACL
+ Amazonka.StorageGateway.Types.ObjectACL: instance GHC.Classes.Eq Amazonka.StorageGateway.Types.ObjectACL.ObjectACL
+ Amazonka.StorageGateway.Types.ObjectACL: instance GHC.Classes.Ord Amazonka.StorageGateway.Types.ObjectACL.ObjectACL
+ Amazonka.StorageGateway.Types.ObjectACL: instance GHC.Generics.Generic Amazonka.StorageGateway.Types.ObjectACL.ObjectACL
+ Amazonka.StorageGateway.Types.ObjectACL: instance GHC.Read.Read Amazonka.StorageGateway.Types.ObjectACL.ObjectACL
+ Amazonka.StorageGateway.Types.ObjectACL: instance GHC.Show.Show Amazonka.StorageGateway.Types.ObjectACL.ObjectACL
+ Amazonka.StorageGateway.Types.ObjectACL: newtype ObjectACL
+ Amazonka.StorageGateway.Types.ObjectACL: pattern ObjectACL_Authenticated_read :: ObjectACL
+ Amazonka.StorageGateway.Types.ObjectACL: pattern ObjectACL_Aws_exec_read :: ObjectACL
+ Amazonka.StorageGateway.Types.ObjectACL: pattern ObjectACL_Bucket_owner_full_control :: ObjectACL
+ Amazonka.StorageGateway.Types.ObjectACL: pattern ObjectACL_Bucket_owner_read :: ObjectACL
+ Amazonka.StorageGateway.Types.ObjectACL: pattern ObjectACL_Private :: ObjectACL
+ Amazonka.StorageGateway.Types.ObjectACL: pattern ObjectACL_Public_read :: ObjectACL
+ Amazonka.StorageGateway.Types.ObjectACL: pattern ObjectACL_Public_read_write :: ObjectACL
+ Amazonka.StorageGateway.Types.PoolInfo: PoolInfo' :: Maybe Text -> Maybe Text -> Maybe PoolStatus -> Maybe Natural -> Maybe RetentionLockType -> Maybe TapeStorageClass -> PoolInfo
+ Amazonka.StorageGateway.Types.PoolInfo: [$sel:poolARN:PoolInfo'] :: PoolInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.PoolInfo: [$sel:poolName:PoolInfo'] :: PoolInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.PoolInfo: [$sel:poolStatus:PoolInfo'] :: PoolInfo -> Maybe PoolStatus
+ Amazonka.StorageGateway.Types.PoolInfo: [$sel:retentionLockTimeInDays:PoolInfo'] :: PoolInfo -> Maybe Natural
+ Amazonka.StorageGateway.Types.PoolInfo: [$sel:retentionLockType:PoolInfo'] :: PoolInfo -> Maybe RetentionLockType
+ Amazonka.StorageGateway.Types.PoolInfo: [$sel:storageClass:PoolInfo'] :: PoolInfo -> Maybe TapeStorageClass
+ Amazonka.StorageGateway.Types.PoolInfo: data PoolInfo
+ Amazonka.StorageGateway.Types.PoolInfo: instance Control.DeepSeq.NFData Amazonka.StorageGateway.Types.PoolInfo.PoolInfo
+ Amazonka.StorageGateway.Types.PoolInfo: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.StorageGateway.Types.PoolInfo.PoolInfo
+ Amazonka.StorageGateway.Types.PoolInfo: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.Types.PoolInfo.PoolInfo
+ Amazonka.StorageGateway.Types.PoolInfo: instance GHC.Classes.Eq Amazonka.StorageGateway.Types.PoolInfo.PoolInfo
+ Amazonka.StorageGateway.Types.PoolInfo: instance GHC.Generics.Generic Amazonka.StorageGateway.Types.PoolInfo.PoolInfo
+ Amazonka.StorageGateway.Types.PoolInfo: instance GHC.Read.Read Amazonka.StorageGateway.Types.PoolInfo.PoolInfo
+ Amazonka.StorageGateway.Types.PoolInfo: instance GHC.Show.Show Amazonka.StorageGateway.Types.PoolInfo.PoolInfo
+ Amazonka.StorageGateway.Types.PoolInfo: newPoolInfo :: PoolInfo
+ Amazonka.StorageGateway.Types.PoolInfo: poolInfo_poolARN :: Lens' PoolInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.PoolInfo: poolInfo_poolName :: Lens' PoolInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.PoolInfo: poolInfo_poolStatus :: Lens' PoolInfo (Maybe PoolStatus)
+ Amazonka.StorageGateway.Types.PoolInfo: poolInfo_retentionLockTimeInDays :: Lens' PoolInfo (Maybe Natural)
+ Amazonka.StorageGateway.Types.PoolInfo: poolInfo_retentionLockType :: Lens' PoolInfo (Maybe RetentionLockType)
+ Amazonka.StorageGateway.Types.PoolInfo: poolInfo_storageClass :: Lens' PoolInfo (Maybe TapeStorageClass)
+ Amazonka.StorageGateway.Types.PoolStatus: PoolStatus' :: Text -> PoolStatus
+ Amazonka.StorageGateway.Types.PoolStatus: [fromPoolStatus] :: PoolStatus -> Text
+ Amazonka.StorageGateway.Types.PoolStatus: instance Amazonka.Data.ByteString.ToByteString Amazonka.StorageGateway.Types.PoolStatus.PoolStatus
+ Amazonka.StorageGateway.Types.PoolStatus: instance Amazonka.Data.Headers.ToHeader Amazonka.StorageGateway.Types.PoolStatus.PoolStatus
+ Amazonka.StorageGateway.Types.PoolStatus: instance Amazonka.Data.Log.ToLog Amazonka.StorageGateway.Types.PoolStatus.PoolStatus
+ Amazonka.StorageGateway.Types.PoolStatus: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.Types.PoolStatus.PoolStatus
+ Amazonka.StorageGateway.Types.PoolStatus: instance Amazonka.Data.Text.FromText Amazonka.StorageGateway.Types.PoolStatus.PoolStatus
+ Amazonka.StorageGateway.Types.PoolStatus: instance Amazonka.Data.Text.ToText Amazonka.StorageGateway.Types.PoolStatus.PoolStatus
+ Amazonka.StorageGateway.Types.PoolStatus: instance Amazonka.Data.XML.FromXML Amazonka.StorageGateway.Types.PoolStatus.PoolStatus
+ Amazonka.StorageGateway.Types.PoolStatus: instance Amazonka.Data.XML.ToXML Amazonka.StorageGateway.Types.PoolStatus.PoolStatus
+ Amazonka.StorageGateway.Types.PoolStatus: instance Control.DeepSeq.NFData Amazonka.StorageGateway.Types.PoolStatus.PoolStatus
+ Amazonka.StorageGateway.Types.PoolStatus: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.StorageGateway.Types.PoolStatus.PoolStatus
+ Amazonka.StorageGateway.Types.PoolStatus: instance Data.Aeson.Types.FromJSON.FromJSONKey Amazonka.StorageGateway.Types.PoolStatus.PoolStatus
+ Amazonka.StorageGateway.Types.PoolStatus: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.Types.PoolStatus.PoolStatus
+ Amazonka.StorageGateway.Types.PoolStatus: instance Data.Aeson.Types.ToJSON.ToJSONKey Amazonka.StorageGateway.Types.PoolStatus.PoolStatus
+ Amazonka.StorageGateway.Types.PoolStatus: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.Types.PoolStatus.PoolStatus
+ Amazonka.StorageGateway.Types.PoolStatus: instance GHC.Classes.Eq Amazonka.StorageGateway.Types.PoolStatus.PoolStatus
+ Amazonka.StorageGateway.Types.PoolStatus: instance GHC.Classes.Ord Amazonka.StorageGateway.Types.PoolStatus.PoolStatus
+ Amazonka.StorageGateway.Types.PoolStatus: instance GHC.Generics.Generic Amazonka.StorageGateway.Types.PoolStatus.PoolStatus
+ Amazonka.StorageGateway.Types.PoolStatus: instance GHC.Read.Read Amazonka.StorageGateway.Types.PoolStatus.PoolStatus
+ Amazonka.StorageGateway.Types.PoolStatus: instance GHC.Show.Show Amazonka.StorageGateway.Types.PoolStatus.PoolStatus
+ Amazonka.StorageGateway.Types.PoolStatus: newtype PoolStatus
+ Amazonka.StorageGateway.Types.PoolStatus: pattern PoolStatus_ACTIVE :: PoolStatus
+ Amazonka.StorageGateway.Types.PoolStatus: pattern PoolStatus_DELETED :: PoolStatus
+ Amazonka.StorageGateway.Types.RetentionLockType: RetentionLockType' :: Text -> RetentionLockType
+ Amazonka.StorageGateway.Types.RetentionLockType: [fromRetentionLockType] :: RetentionLockType -> Text
+ Amazonka.StorageGateway.Types.RetentionLockType: instance Amazonka.Data.ByteString.ToByteString Amazonka.StorageGateway.Types.RetentionLockType.RetentionLockType
+ Amazonka.StorageGateway.Types.RetentionLockType: instance Amazonka.Data.Headers.ToHeader Amazonka.StorageGateway.Types.RetentionLockType.RetentionLockType
+ Amazonka.StorageGateway.Types.RetentionLockType: instance Amazonka.Data.Log.ToLog Amazonka.StorageGateway.Types.RetentionLockType.RetentionLockType
+ Amazonka.StorageGateway.Types.RetentionLockType: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.Types.RetentionLockType.RetentionLockType
+ Amazonka.StorageGateway.Types.RetentionLockType: instance Amazonka.Data.Text.FromText Amazonka.StorageGateway.Types.RetentionLockType.RetentionLockType
+ Amazonka.StorageGateway.Types.RetentionLockType: instance Amazonka.Data.Text.ToText Amazonka.StorageGateway.Types.RetentionLockType.RetentionLockType
+ Amazonka.StorageGateway.Types.RetentionLockType: instance Amazonka.Data.XML.FromXML Amazonka.StorageGateway.Types.RetentionLockType.RetentionLockType
+ Amazonka.StorageGateway.Types.RetentionLockType: instance Amazonka.Data.XML.ToXML Amazonka.StorageGateway.Types.RetentionLockType.RetentionLockType
+ Amazonka.StorageGateway.Types.RetentionLockType: instance Control.DeepSeq.NFData Amazonka.StorageGateway.Types.RetentionLockType.RetentionLockType
+ Amazonka.StorageGateway.Types.RetentionLockType: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.StorageGateway.Types.RetentionLockType.RetentionLockType
+ Amazonka.StorageGateway.Types.RetentionLockType: instance Data.Aeson.Types.FromJSON.FromJSONKey Amazonka.StorageGateway.Types.RetentionLockType.RetentionLockType
+ Amazonka.StorageGateway.Types.RetentionLockType: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.Types.RetentionLockType.RetentionLockType
+ Amazonka.StorageGateway.Types.RetentionLockType: instance Data.Aeson.Types.ToJSON.ToJSONKey Amazonka.StorageGateway.Types.RetentionLockType.RetentionLockType
+ Amazonka.StorageGateway.Types.RetentionLockType: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.Types.RetentionLockType.RetentionLockType
+ Amazonka.StorageGateway.Types.RetentionLockType: instance GHC.Classes.Eq Amazonka.StorageGateway.Types.RetentionLockType.RetentionLockType
+ Amazonka.StorageGateway.Types.RetentionLockType: instance GHC.Classes.Ord Amazonka.StorageGateway.Types.RetentionLockType.RetentionLockType
+ Amazonka.StorageGateway.Types.RetentionLockType: instance GHC.Generics.Generic Amazonka.StorageGateway.Types.RetentionLockType.RetentionLockType
+ Amazonka.StorageGateway.Types.RetentionLockType: instance GHC.Read.Read Amazonka.StorageGateway.Types.RetentionLockType.RetentionLockType
+ Amazonka.StorageGateway.Types.RetentionLockType: instance GHC.Show.Show Amazonka.StorageGateway.Types.RetentionLockType.RetentionLockType
+ Amazonka.StorageGateway.Types.RetentionLockType: newtype RetentionLockType
+ Amazonka.StorageGateway.Types.RetentionLockType: pattern RetentionLockType_COMPLIANCE :: RetentionLockType
+ Amazonka.StorageGateway.Types.RetentionLockType: pattern RetentionLockType_GOVERNANCE :: RetentionLockType
+ Amazonka.StorageGateway.Types.RetentionLockType: pattern RetentionLockType_NONE :: RetentionLockType
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: SMBFileShareInfo' :: Maybe Bool -> Maybe [Text] -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe CacheAttributes -> Maybe CaseSensitivity -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Bool -> Maybe [Text] -> Maybe Bool -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe ObjectACL -> Maybe Bool -> Maybe Text -> Maybe Bool -> Maybe Bool -> Maybe Text -> Maybe Bool -> Maybe [Tag] -> Maybe Text -> Maybe [Text] -> SMBFileShareInfo
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: [$sel:accessBasedEnumeration:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe Bool
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: [$sel:adminUserList:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe [Text]
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: [$sel:auditDestinationARN:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: [$sel:authentication:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: [$sel:bucketRegion:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: [$sel:cacheAttributes:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe CacheAttributes
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: [$sel:caseSensitivity:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe CaseSensitivity
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: [$sel:defaultStorageClass:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: [$sel:fileShareARN:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: [$sel:fileShareId:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: [$sel:fileShareName:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: [$sel:fileShareStatus:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: [$sel:gatewayARN:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: [$sel:guessMIMETypeEnabled:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe Bool
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: [$sel:invalidUserList:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe [Text]
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: [$sel:kmsEncrypted:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe Bool
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: [$sel:kmsKey:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: [$sel:locationARN:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: [$sel:notificationPolicy:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: [$sel:objectACL:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe ObjectACL
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: [$sel:oplocksEnabled:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe Bool
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: [$sel:path:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: [$sel:readOnly:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe Bool
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: [$sel:requesterPays:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe Bool
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: [$sel:role':SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: [$sel:sMBACLEnabled:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe Bool
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: [$sel:tags:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe [Tag]
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: [$sel:vPCEndpointDNSName:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: [$sel:validUserList:SMBFileShareInfo'] :: SMBFileShareInfo -> Maybe [Text]
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: data SMBFileShareInfo
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: instance Control.DeepSeq.NFData Amazonka.StorageGateway.Types.SMBFileShareInfo.SMBFileShareInfo
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.StorageGateway.Types.SMBFileShareInfo.SMBFileShareInfo
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.Types.SMBFileShareInfo.SMBFileShareInfo
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: instance GHC.Classes.Eq Amazonka.StorageGateway.Types.SMBFileShareInfo.SMBFileShareInfo
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: instance GHC.Generics.Generic Amazonka.StorageGateway.Types.SMBFileShareInfo.SMBFileShareInfo
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: instance GHC.Read.Read Amazonka.StorageGateway.Types.SMBFileShareInfo.SMBFileShareInfo
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: instance GHC.Show.Show Amazonka.StorageGateway.Types.SMBFileShareInfo.SMBFileShareInfo
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: newSMBFileShareInfo :: SMBFileShareInfo
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: sMBFileShareInfo_accessBasedEnumeration :: Lens' SMBFileShareInfo (Maybe Bool)
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: sMBFileShareInfo_adminUserList :: Lens' SMBFileShareInfo (Maybe [Text])
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: sMBFileShareInfo_auditDestinationARN :: Lens' SMBFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: sMBFileShareInfo_authentication :: Lens' SMBFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: sMBFileShareInfo_bucketRegion :: Lens' SMBFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: sMBFileShareInfo_cacheAttributes :: Lens' SMBFileShareInfo (Maybe CacheAttributes)
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: sMBFileShareInfo_caseSensitivity :: Lens' SMBFileShareInfo (Maybe CaseSensitivity)
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: sMBFileShareInfo_defaultStorageClass :: Lens' SMBFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: sMBFileShareInfo_fileShareARN :: Lens' SMBFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: sMBFileShareInfo_fileShareId :: Lens' SMBFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: sMBFileShareInfo_fileShareName :: Lens' SMBFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: sMBFileShareInfo_fileShareStatus :: Lens' SMBFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: sMBFileShareInfo_gatewayARN :: Lens' SMBFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: sMBFileShareInfo_guessMIMETypeEnabled :: Lens' SMBFileShareInfo (Maybe Bool)
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: sMBFileShareInfo_invalidUserList :: Lens' SMBFileShareInfo (Maybe [Text])
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: sMBFileShareInfo_kmsEncrypted :: Lens' SMBFileShareInfo (Maybe Bool)
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: sMBFileShareInfo_kmsKey :: Lens' SMBFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: sMBFileShareInfo_locationARN :: Lens' SMBFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: sMBFileShareInfo_notificationPolicy :: Lens' SMBFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: sMBFileShareInfo_objectACL :: Lens' SMBFileShareInfo (Maybe ObjectACL)
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: sMBFileShareInfo_oplocksEnabled :: Lens' SMBFileShareInfo (Maybe Bool)
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: sMBFileShareInfo_path :: Lens' SMBFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: sMBFileShareInfo_readOnly :: Lens' SMBFileShareInfo (Maybe Bool)
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: sMBFileShareInfo_requesterPays :: Lens' SMBFileShareInfo (Maybe Bool)
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: sMBFileShareInfo_role :: Lens' SMBFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: sMBFileShareInfo_sMBACLEnabled :: Lens' SMBFileShareInfo (Maybe Bool)
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: sMBFileShareInfo_tags :: Lens' SMBFileShareInfo (Maybe [Tag])
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: sMBFileShareInfo_vPCEndpointDNSName :: Lens' SMBFileShareInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.SMBFileShareInfo: sMBFileShareInfo_validUserList :: Lens' SMBFileShareInfo (Maybe [Text])
+ Amazonka.StorageGateway.Types.SMBLocalGroups: SMBLocalGroups' :: Maybe [Text] -> SMBLocalGroups
+ Amazonka.StorageGateway.Types.SMBLocalGroups: [$sel:gatewayAdmins:SMBLocalGroups'] :: SMBLocalGroups -> Maybe [Text]
+ Amazonka.StorageGateway.Types.SMBLocalGroups: data SMBLocalGroups
+ Amazonka.StorageGateway.Types.SMBLocalGroups: instance Control.DeepSeq.NFData Amazonka.StorageGateway.Types.SMBLocalGroups.SMBLocalGroups
+ Amazonka.StorageGateway.Types.SMBLocalGroups: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.StorageGateway.Types.SMBLocalGroups.SMBLocalGroups
+ Amazonka.StorageGateway.Types.SMBLocalGroups: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.Types.SMBLocalGroups.SMBLocalGroups
+ Amazonka.StorageGateway.Types.SMBLocalGroups: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.Types.SMBLocalGroups.SMBLocalGroups
+ Amazonka.StorageGateway.Types.SMBLocalGroups: instance GHC.Classes.Eq Amazonka.StorageGateway.Types.SMBLocalGroups.SMBLocalGroups
+ Amazonka.StorageGateway.Types.SMBLocalGroups: instance GHC.Generics.Generic Amazonka.StorageGateway.Types.SMBLocalGroups.SMBLocalGroups
+ Amazonka.StorageGateway.Types.SMBLocalGroups: instance GHC.Read.Read Amazonka.StorageGateway.Types.SMBLocalGroups.SMBLocalGroups
+ Amazonka.StorageGateway.Types.SMBLocalGroups: instance GHC.Show.Show Amazonka.StorageGateway.Types.SMBLocalGroups.SMBLocalGroups
+ Amazonka.StorageGateway.Types.SMBLocalGroups: newSMBLocalGroups :: SMBLocalGroups
+ Amazonka.StorageGateway.Types.SMBLocalGroups: sMBLocalGroups_gatewayAdmins :: Lens' SMBLocalGroups (Maybe [Text])
+ Amazonka.StorageGateway.Types.SMBSecurityStrategy: SMBSecurityStrategy' :: Text -> SMBSecurityStrategy
+ Amazonka.StorageGateway.Types.SMBSecurityStrategy: [fromSMBSecurityStrategy] :: SMBSecurityStrategy -> Text
+ Amazonka.StorageGateway.Types.SMBSecurityStrategy: instance Amazonka.Data.ByteString.ToByteString Amazonka.StorageGateway.Types.SMBSecurityStrategy.SMBSecurityStrategy
+ Amazonka.StorageGateway.Types.SMBSecurityStrategy: instance Amazonka.Data.Headers.ToHeader Amazonka.StorageGateway.Types.SMBSecurityStrategy.SMBSecurityStrategy
+ Amazonka.StorageGateway.Types.SMBSecurityStrategy: instance Amazonka.Data.Log.ToLog Amazonka.StorageGateway.Types.SMBSecurityStrategy.SMBSecurityStrategy
+ Amazonka.StorageGateway.Types.SMBSecurityStrategy: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.Types.SMBSecurityStrategy.SMBSecurityStrategy
+ Amazonka.StorageGateway.Types.SMBSecurityStrategy: instance Amazonka.Data.Text.FromText Amazonka.StorageGateway.Types.SMBSecurityStrategy.SMBSecurityStrategy
+ Amazonka.StorageGateway.Types.SMBSecurityStrategy: instance Amazonka.Data.Text.ToText Amazonka.StorageGateway.Types.SMBSecurityStrategy.SMBSecurityStrategy
+ Amazonka.StorageGateway.Types.SMBSecurityStrategy: instance Amazonka.Data.XML.FromXML Amazonka.StorageGateway.Types.SMBSecurityStrategy.SMBSecurityStrategy
+ Amazonka.StorageGateway.Types.SMBSecurityStrategy: instance Amazonka.Data.XML.ToXML Amazonka.StorageGateway.Types.SMBSecurityStrategy.SMBSecurityStrategy
+ Amazonka.StorageGateway.Types.SMBSecurityStrategy: instance Control.DeepSeq.NFData Amazonka.StorageGateway.Types.SMBSecurityStrategy.SMBSecurityStrategy
+ Amazonka.StorageGateway.Types.SMBSecurityStrategy: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.StorageGateway.Types.SMBSecurityStrategy.SMBSecurityStrategy
+ Amazonka.StorageGateway.Types.SMBSecurityStrategy: instance Data.Aeson.Types.FromJSON.FromJSONKey Amazonka.StorageGateway.Types.SMBSecurityStrategy.SMBSecurityStrategy
+ Amazonka.StorageGateway.Types.SMBSecurityStrategy: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.Types.SMBSecurityStrategy.SMBSecurityStrategy
+ Amazonka.StorageGateway.Types.SMBSecurityStrategy: instance Data.Aeson.Types.ToJSON.ToJSONKey Amazonka.StorageGateway.Types.SMBSecurityStrategy.SMBSecurityStrategy
+ Amazonka.StorageGateway.Types.SMBSecurityStrategy: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.Types.SMBSecurityStrategy.SMBSecurityStrategy
+ Amazonka.StorageGateway.Types.SMBSecurityStrategy: instance GHC.Classes.Eq Amazonka.StorageGateway.Types.SMBSecurityStrategy.SMBSecurityStrategy
+ Amazonka.StorageGateway.Types.SMBSecurityStrategy: instance GHC.Classes.Ord Amazonka.StorageGateway.Types.SMBSecurityStrategy.SMBSecurityStrategy
+ Amazonka.StorageGateway.Types.SMBSecurityStrategy: instance GHC.Generics.Generic Amazonka.StorageGateway.Types.SMBSecurityStrategy.SMBSecurityStrategy
+ Amazonka.StorageGateway.Types.SMBSecurityStrategy: instance GHC.Read.Read Amazonka.StorageGateway.Types.SMBSecurityStrategy.SMBSecurityStrategy
+ Amazonka.StorageGateway.Types.SMBSecurityStrategy: instance GHC.Show.Show Amazonka.StorageGateway.Types.SMBSecurityStrategy.SMBSecurityStrategy
+ Amazonka.StorageGateway.Types.SMBSecurityStrategy: newtype SMBSecurityStrategy
+ Amazonka.StorageGateway.Types.SMBSecurityStrategy: pattern SMBSecurityStrategy_ClientSpecified :: SMBSecurityStrategy
+ Amazonka.StorageGateway.Types.SMBSecurityStrategy: pattern SMBSecurityStrategy_MandatoryEncryption :: SMBSecurityStrategy
+ Amazonka.StorageGateway.Types.SMBSecurityStrategy: pattern SMBSecurityStrategy_MandatorySigning :: SMBSecurityStrategy
+ Amazonka.StorageGateway.Types.StorediSCSIVolume: StorediSCSIVolume' :: Maybe POSIX -> Maybe Text -> Maybe Bool -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Double -> Maybe Integer -> Maybe Text -> Maybe Text -> Maybe Integer -> Maybe VolumeiSCSIAttributes -> StorediSCSIVolume
+ Amazonka.StorageGateway.Types.StorediSCSIVolume: [$sel:createdDate:StorediSCSIVolume'] :: StorediSCSIVolume -> Maybe POSIX
+ Amazonka.StorageGateway.Types.StorediSCSIVolume: [$sel:kmsKey:StorediSCSIVolume'] :: StorediSCSIVolume -> Maybe Text
+ Amazonka.StorageGateway.Types.StorediSCSIVolume: [$sel:preservedExistingData:StorediSCSIVolume'] :: StorediSCSIVolume -> Maybe Bool
+ Amazonka.StorageGateway.Types.StorediSCSIVolume: [$sel:sourceSnapshotId:StorediSCSIVolume'] :: StorediSCSIVolume -> Maybe Text
+ Amazonka.StorageGateway.Types.StorediSCSIVolume: [$sel:targetName:StorediSCSIVolume'] :: StorediSCSIVolume -> Maybe Text
+ Amazonka.StorageGateway.Types.StorediSCSIVolume: [$sel:volumeARN:StorediSCSIVolume'] :: StorediSCSIVolume -> Maybe Text
+ Amazonka.StorageGateway.Types.StorediSCSIVolume: [$sel:volumeAttachmentStatus:StorediSCSIVolume'] :: StorediSCSIVolume -> Maybe Text
+ Amazonka.StorageGateway.Types.StorediSCSIVolume: [$sel:volumeDiskId:StorediSCSIVolume'] :: StorediSCSIVolume -> Maybe Text
+ Amazonka.StorageGateway.Types.StorediSCSIVolume: [$sel:volumeId:StorediSCSIVolume'] :: StorediSCSIVolume -> Maybe Text
+ Amazonka.StorageGateway.Types.StorediSCSIVolume: [$sel:volumeProgress:StorediSCSIVolume'] :: StorediSCSIVolume -> Maybe Double
+ Amazonka.StorageGateway.Types.StorediSCSIVolume: [$sel:volumeSizeInBytes:StorediSCSIVolume'] :: StorediSCSIVolume -> Maybe Integer
+ Amazonka.StorageGateway.Types.StorediSCSIVolume: [$sel:volumeStatus:StorediSCSIVolume'] :: StorediSCSIVolume -> Maybe Text
+ Amazonka.StorageGateway.Types.StorediSCSIVolume: [$sel:volumeType:StorediSCSIVolume'] :: StorediSCSIVolume -> Maybe Text
+ Amazonka.StorageGateway.Types.StorediSCSIVolume: [$sel:volumeUsedInBytes:StorediSCSIVolume'] :: StorediSCSIVolume -> Maybe Integer
+ Amazonka.StorageGateway.Types.StorediSCSIVolume: [$sel:volumeiSCSIAttributes:StorediSCSIVolume'] :: StorediSCSIVolume -> Maybe VolumeiSCSIAttributes
+ Amazonka.StorageGateway.Types.StorediSCSIVolume: data StorediSCSIVolume
+ Amazonka.StorageGateway.Types.StorediSCSIVolume: instance Control.DeepSeq.NFData Amazonka.StorageGateway.Types.StorediSCSIVolume.StorediSCSIVolume
+ Amazonka.StorageGateway.Types.StorediSCSIVolume: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.StorageGateway.Types.StorediSCSIVolume.StorediSCSIVolume
+ Amazonka.StorageGateway.Types.StorediSCSIVolume: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.Types.StorediSCSIVolume.StorediSCSIVolume
+ Amazonka.StorageGateway.Types.StorediSCSIVolume: instance GHC.Classes.Eq Amazonka.StorageGateway.Types.StorediSCSIVolume.StorediSCSIVolume
+ Amazonka.StorageGateway.Types.StorediSCSIVolume: instance GHC.Generics.Generic Amazonka.StorageGateway.Types.StorediSCSIVolume.StorediSCSIVolume
+ Amazonka.StorageGateway.Types.StorediSCSIVolume: instance GHC.Read.Read Amazonka.StorageGateway.Types.StorediSCSIVolume.StorediSCSIVolume
+ Amazonka.StorageGateway.Types.StorediSCSIVolume: instance GHC.Show.Show Amazonka.StorageGateway.Types.StorediSCSIVolume.StorediSCSIVolume
+ Amazonka.StorageGateway.Types.StorediSCSIVolume: newStorediSCSIVolume :: StorediSCSIVolume
+ Amazonka.StorageGateway.Types.StorediSCSIVolume: storediSCSIVolume_createdDate :: Lens' StorediSCSIVolume (Maybe UTCTime)
+ Amazonka.StorageGateway.Types.StorediSCSIVolume: storediSCSIVolume_kmsKey :: Lens' StorediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Types.StorediSCSIVolume: storediSCSIVolume_preservedExistingData :: Lens' StorediSCSIVolume (Maybe Bool)
+ Amazonka.StorageGateway.Types.StorediSCSIVolume: storediSCSIVolume_sourceSnapshotId :: Lens' StorediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Types.StorediSCSIVolume: storediSCSIVolume_targetName :: Lens' StorediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Types.StorediSCSIVolume: storediSCSIVolume_volumeARN :: Lens' StorediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Types.StorediSCSIVolume: storediSCSIVolume_volumeAttachmentStatus :: Lens' StorediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Types.StorediSCSIVolume: storediSCSIVolume_volumeDiskId :: Lens' StorediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Types.StorediSCSIVolume: storediSCSIVolume_volumeId :: Lens' StorediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Types.StorediSCSIVolume: storediSCSIVolume_volumeProgress :: Lens' StorediSCSIVolume (Maybe Double)
+ Amazonka.StorageGateway.Types.StorediSCSIVolume: storediSCSIVolume_volumeSizeInBytes :: Lens' StorediSCSIVolume (Maybe Integer)
+ Amazonka.StorageGateway.Types.StorediSCSIVolume: storediSCSIVolume_volumeStatus :: Lens' StorediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Types.StorediSCSIVolume: storediSCSIVolume_volumeType :: Lens' StorediSCSIVolume (Maybe Text)
+ Amazonka.StorageGateway.Types.StorediSCSIVolume: storediSCSIVolume_volumeUsedInBytes :: Lens' StorediSCSIVolume (Maybe Integer)
+ Amazonka.StorageGateway.Types.StorediSCSIVolume: storediSCSIVolume_volumeiSCSIAttributes :: Lens' StorediSCSIVolume (Maybe VolumeiSCSIAttributes)
+ Amazonka.StorageGateway.Types.Tag: Tag' :: Text -> Text -> Tag
+ Amazonka.StorageGateway.Types.Tag: [$sel:key:Tag'] :: Tag -> Text
+ Amazonka.StorageGateway.Types.Tag: [$sel:value:Tag'] :: Tag -> Text
+ Amazonka.StorageGateway.Types.Tag: data Tag
+ Amazonka.StorageGateway.Types.Tag: instance Control.DeepSeq.NFData Amazonka.StorageGateway.Types.Tag.Tag
+ Amazonka.StorageGateway.Types.Tag: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.StorageGateway.Types.Tag.Tag
+ Amazonka.StorageGateway.Types.Tag: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.Types.Tag.Tag
+ Amazonka.StorageGateway.Types.Tag: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.Types.Tag.Tag
+ Amazonka.StorageGateway.Types.Tag: instance GHC.Classes.Eq Amazonka.StorageGateway.Types.Tag.Tag
+ Amazonka.StorageGateway.Types.Tag: instance GHC.Generics.Generic Amazonka.StorageGateway.Types.Tag.Tag
+ Amazonka.StorageGateway.Types.Tag: instance GHC.Read.Read Amazonka.StorageGateway.Types.Tag.Tag
+ Amazonka.StorageGateway.Types.Tag: instance GHC.Show.Show Amazonka.StorageGateway.Types.Tag.Tag
+ Amazonka.StorageGateway.Types.Tag: newTag :: Text -> Text -> Tag
+ Amazonka.StorageGateway.Types.Tag: tag_key :: Lens' Tag Text
+ Amazonka.StorageGateway.Types.Tag: tag_value :: Lens' Tag Text
+ Amazonka.StorageGateway.Types.Tape: Tape' :: Maybe Text -> Maybe POSIX -> Maybe Text -> Maybe Double -> Maybe POSIX -> Maybe Text -> Maybe Text -> Maybe POSIX -> Maybe Integer -> Maybe Text -> Maybe Integer -> Maybe Text -> Maybe Bool -> Tape
+ Amazonka.StorageGateway.Types.Tape: [$sel:kmsKey:Tape'] :: Tape -> Maybe Text
+ Amazonka.StorageGateway.Types.Tape: [$sel:poolEntryDate:Tape'] :: Tape -> Maybe POSIX
+ Amazonka.StorageGateway.Types.Tape: [$sel:poolId:Tape'] :: Tape -> Maybe Text
+ Amazonka.StorageGateway.Types.Tape: [$sel:progress:Tape'] :: Tape -> Maybe Double
+ Amazonka.StorageGateway.Types.Tape: [$sel:retentionStartDate:Tape'] :: Tape -> Maybe POSIX
+ Amazonka.StorageGateway.Types.Tape: [$sel:tapeARN:Tape'] :: Tape -> Maybe Text
+ Amazonka.StorageGateway.Types.Tape: [$sel:tapeBarcode:Tape'] :: Tape -> Maybe Text
+ Amazonka.StorageGateway.Types.Tape: [$sel:tapeCreatedDate:Tape'] :: Tape -> Maybe POSIX
+ Amazonka.StorageGateway.Types.Tape: [$sel:tapeSizeInBytes:Tape'] :: Tape -> Maybe Integer
+ Amazonka.StorageGateway.Types.Tape: [$sel:tapeStatus:Tape'] :: Tape -> Maybe Text
+ Amazonka.StorageGateway.Types.Tape: [$sel:tapeUsedInBytes:Tape'] :: Tape -> Maybe Integer
+ Amazonka.StorageGateway.Types.Tape: [$sel:vTLDevice:Tape'] :: Tape -> Maybe Text
+ Amazonka.StorageGateway.Types.Tape: [$sel:worm:Tape'] :: Tape -> Maybe Bool
+ Amazonka.StorageGateway.Types.Tape: data Tape
+ Amazonka.StorageGateway.Types.Tape: instance Control.DeepSeq.NFData Amazonka.StorageGateway.Types.Tape.Tape
+ Amazonka.StorageGateway.Types.Tape: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.StorageGateway.Types.Tape.Tape
+ Amazonka.StorageGateway.Types.Tape: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.Types.Tape.Tape
+ Amazonka.StorageGateway.Types.Tape: instance GHC.Classes.Eq Amazonka.StorageGateway.Types.Tape.Tape
+ Amazonka.StorageGateway.Types.Tape: instance GHC.Generics.Generic Amazonka.StorageGateway.Types.Tape.Tape
+ Amazonka.StorageGateway.Types.Tape: instance GHC.Read.Read Amazonka.StorageGateway.Types.Tape.Tape
+ Amazonka.StorageGateway.Types.Tape: instance GHC.Show.Show Amazonka.StorageGateway.Types.Tape.Tape
+ Amazonka.StorageGateway.Types.Tape: newTape :: Tape
+ Amazonka.StorageGateway.Types.Tape: tape_kmsKey :: Lens' Tape (Maybe Text)
+ Amazonka.StorageGateway.Types.Tape: tape_poolEntryDate :: Lens' Tape (Maybe UTCTime)
+ Amazonka.StorageGateway.Types.Tape: tape_poolId :: Lens' Tape (Maybe Text)
+ Amazonka.StorageGateway.Types.Tape: tape_progress :: Lens' Tape (Maybe Double)
+ Amazonka.StorageGateway.Types.Tape: tape_retentionStartDate :: Lens' Tape (Maybe UTCTime)
+ Amazonka.StorageGateway.Types.Tape: tape_tapeARN :: Lens' Tape (Maybe Text)
+ Amazonka.StorageGateway.Types.Tape: tape_tapeBarcode :: Lens' Tape (Maybe Text)
+ Amazonka.StorageGateway.Types.Tape: tape_tapeCreatedDate :: Lens' Tape (Maybe UTCTime)
+ Amazonka.StorageGateway.Types.Tape: tape_tapeSizeInBytes :: Lens' Tape (Maybe Integer)
+ Amazonka.StorageGateway.Types.Tape: tape_tapeStatus :: Lens' Tape (Maybe Text)
+ Amazonka.StorageGateway.Types.Tape: tape_tapeUsedInBytes :: Lens' Tape (Maybe Integer)
+ Amazonka.StorageGateway.Types.Tape: tape_vTLDevice :: Lens' Tape (Maybe Text)
+ Amazonka.StorageGateway.Types.Tape: tape_worm :: Lens' Tape (Maybe Bool)
+ Amazonka.StorageGateway.Types.TapeArchive: TapeArchive' :: Maybe POSIX -> Maybe Text -> Maybe POSIX -> Maybe Text -> Maybe POSIX -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe POSIX -> Maybe Integer -> Maybe Text -> Maybe Integer -> Maybe Bool -> TapeArchive
+ Amazonka.StorageGateway.Types.TapeArchive: [$sel:completionTime:TapeArchive'] :: TapeArchive -> Maybe POSIX
+ Amazonka.StorageGateway.Types.TapeArchive: [$sel:kmsKey:TapeArchive'] :: TapeArchive -> Maybe Text
+ Amazonka.StorageGateway.Types.TapeArchive: [$sel:poolEntryDate:TapeArchive'] :: TapeArchive -> Maybe POSIX
+ Amazonka.StorageGateway.Types.TapeArchive: [$sel:poolId:TapeArchive'] :: TapeArchive -> Maybe Text
+ Amazonka.StorageGateway.Types.TapeArchive: [$sel:retentionStartDate:TapeArchive'] :: TapeArchive -> Maybe POSIX
+ Amazonka.StorageGateway.Types.TapeArchive: [$sel:retrievedTo:TapeArchive'] :: TapeArchive -> Maybe Text
+ Amazonka.StorageGateway.Types.TapeArchive: [$sel:tapeARN:TapeArchive'] :: TapeArchive -> Maybe Text
+ Amazonka.StorageGateway.Types.TapeArchive: [$sel:tapeBarcode:TapeArchive'] :: TapeArchive -> Maybe Text
+ Amazonka.StorageGateway.Types.TapeArchive: [$sel:tapeCreatedDate:TapeArchive'] :: TapeArchive -> Maybe POSIX
+ Amazonka.StorageGateway.Types.TapeArchive: [$sel:tapeSizeInBytes:TapeArchive'] :: TapeArchive -> Maybe Integer
+ Amazonka.StorageGateway.Types.TapeArchive: [$sel:tapeStatus:TapeArchive'] :: TapeArchive -> Maybe Text
+ Amazonka.StorageGateway.Types.TapeArchive: [$sel:tapeUsedInBytes:TapeArchive'] :: TapeArchive -> Maybe Integer
+ Amazonka.StorageGateway.Types.TapeArchive: [$sel:worm:TapeArchive'] :: TapeArchive -> Maybe Bool
+ Amazonka.StorageGateway.Types.TapeArchive: data TapeArchive
+ Amazonka.StorageGateway.Types.TapeArchive: instance Control.DeepSeq.NFData Amazonka.StorageGateway.Types.TapeArchive.TapeArchive
+ Amazonka.StorageGateway.Types.TapeArchive: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.StorageGateway.Types.TapeArchive.TapeArchive
+ Amazonka.StorageGateway.Types.TapeArchive: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.Types.TapeArchive.TapeArchive
+ Amazonka.StorageGateway.Types.TapeArchive: instance GHC.Classes.Eq Amazonka.StorageGateway.Types.TapeArchive.TapeArchive
+ Amazonka.StorageGateway.Types.TapeArchive: instance GHC.Generics.Generic Amazonka.StorageGateway.Types.TapeArchive.TapeArchive
+ Amazonka.StorageGateway.Types.TapeArchive: instance GHC.Read.Read Amazonka.StorageGateway.Types.TapeArchive.TapeArchive
+ Amazonka.StorageGateway.Types.TapeArchive: instance GHC.Show.Show Amazonka.StorageGateway.Types.TapeArchive.TapeArchive
+ Amazonka.StorageGateway.Types.TapeArchive: newTapeArchive :: TapeArchive
+ Amazonka.StorageGateway.Types.TapeArchive: tapeArchive_completionTime :: Lens' TapeArchive (Maybe UTCTime)
+ Amazonka.StorageGateway.Types.TapeArchive: tapeArchive_kmsKey :: Lens' TapeArchive (Maybe Text)
+ Amazonka.StorageGateway.Types.TapeArchive: tapeArchive_poolEntryDate :: Lens' TapeArchive (Maybe UTCTime)
+ Amazonka.StorageGateway.Types.TapeArchive: tapeArchive_poolId :: Lens' TapeArchive (Maybe Text)
+ Amazonka.StorageGateway.Types.TapeArchive: tapeArchive_retentionStartDate :: Lens' TapeArchive (Maybe UTCTime)
+ Amazonka.StorageGateway.Types.TapeArchive: tapeArchive_retrievedTo :: Lens' TapeArchive (Maybe Text)
+ Amazonka.StorageGateway.Types.TapeArchive: tapeArchive_tapeARN :: Lens' TapeArchive (Maybe Text)
+ Amazonka.StorageGateway.Types.TapeArchive: tapeArchive_tapeBarcode :: Lens' TapeArchive (Maybe Text)
+ Amazonka.StorageGateway.Types.TapeArchive: tapeArchive_tapeCreatedDate :: Lens' TapeArchive (Maybe UTCTime)
+ Amazonka.StorageGateway.Types.TapeArchive: tapeArchive_tapeSizeInBytes :: Lens' TapeArchive (Maybe Integer)
+ Amazonka.StorageGateway.Types.TapeArchive: tapeArchive_tapeStatus :: Lens' TapeArchive (Maybe Text)
+ Amazonka.StorageGateway.Types.TapeArchive: tapeArchive_tapeUsedInBytes :: Lens' TapeArchive (Maybe Integer)
+ Amazonka.StorageGateway.Types.TapeArchive: tapeArchive_worm :: Lens' TapeArchive (Maybe Bool)
+ Amazonka.StorageGateway.Types.TapeInfo: TapeInfo' :: Maybe Text -> Maybe POSIX -> Maybe Text -> Maybe POSIX -> Maybe Text -> Maybe Text -> Maybe Integer -> Maybe Text -> TapeInfo
+ Amazonka.StorageGateway.Types.TapeInfo: [$sel:gatewayARN:TapeInfo'] :: TapeInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.TapeInfo: [$sel:poolEntryDate:TapeInfo'] :: TapeInfo -> Maybe POSIX
+ Amazonka.StorageGateway.Types.TapeInfo: [$sel:poolId:TapeInfo'] :: TapeInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.TapeInfo: [$sel:retentionStartDate:TapeInfo'] :: TapeInfo -> Maybe POSIX
+ Amazonka.StorageGateway.Types.TapeInfo: [$sel:tapeARN:TapeInfo'] :: TapeInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.TapeInfo: [$sel:tapeBarcode:TapeInfo'] :: TapeInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.TapeInfo: [$sel:tapeSizeInBytes:TapeInfo'] :: TapeInfo -> Maybe Integer
+ Amazonka.StorageGateway.Types.TapeInfo: [$sel:tapeStatus:TapeInfo'] :: TapeInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.TapeInfo: data TapeInfo
+ Amazonka.StorageGateway.Types.TapeInfo: instance Control.DeepSeq.NFData Amazonka.StorageGateway.Types.TapeInfo.TapeInfo
+ Amazonka.StorageGateway.Types.TapeInfo: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.StorageGateway.Types.TapeInfo.TapeInfo
+ Amazonka.StorageGateway.Types.TapeInfo: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.Types.TapeInfo.TapeInfo
+ Amazonka.StorageGateway.Types.TapeInfo: instance GHC.Classes.Eq Amazonka.StorageGateway.Types.TapeInfo.TapeInfo
+ Amazonka.StorageGateway.Types.TapeInfo: instance GHC.Generics.Generic Amazonka.StorageGateway.Types.TapeInfo.TapeInfo
+ Amazonka.StorageGateway.Types.TapeInfo: instance GHC.Read.Read Amazonka.StorageGateway.Types.TapeInfo.TapeInfo
+ Amazonka.StorageGateway.Types.TapeInfo: instance GHC.Show.Show Amazonka.StorageGateway.Types.TapeInfo.TapeInfo
+ Amazonka.StorageGateway.Types.TapeInfo: newTapeInfo :: TapeInfo
+ Amazonka.StorageGateway.Types.TapeInfo: tapeInfo_gatewayARN :: Lens' TapeInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.TapeInfo: tapeInfo_poolEntryDate :: Lens' TapeInfo (Maybe UTCTime)
+ Amazonka.StorageGateway.Types.TapeInfo: tapeInfo_poolId :: Lens' TapeInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.TapeInfo: tapeInfo_retentionStartDate :: Lens' TapeInfo (Maybe UTCTime)
+ Amazonka.StorageGateway.Types.TapeInfo: tapeInfo_tapeARN :: Lens' TapeInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.TapeInfo: tapeInfo_tapeBarcode :: Lens' TapeInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.TapeInfo: tapeInfo_tapeSizeInBytes :: Lens' TapeInfo (Maybe Integer)
+ Amazonka.StorageGateway.Types.TapeInfo: tapeInfo_tapeStatus :: Lens' TapeInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.TapeRecoveryPointInfo: TapeRecoveryPointInfo' :: Maybe Text -> Maybe POSIX -> Maybe Integer -> Maybe Text -> TapeRecoveryPointInfo
+ Amazonka.StorageGateway.Types.TapeRecoveryPointInfo: [$sel:tapeARN:TapeRecoveryPointInfo'] :: TapeRecoveryPointInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.TapeRecoveryPointInfo: [$sel:tapeRecoveryPointTime:TapeRecoveryPointInfo'] :: TapeRecoveryPointInfo -> Maybe POSIX
+ Amazonka.StorageGateway.Types.TapeRecoveryPointInfo: [$sel:tapeSizeInBytes:TapeRecoveryPointInfo'] :: TapeRecoveryPointInfo -> Maybe Integer
+ Amazonka.StorageGateway.Types.TapeRecoveryPointInfo: [$sel:tapeStatus:TapeRecoveryPointInfo'] :: TapeRecoveryPointInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.TapeRecoveryPointInfo: data TapeRecoveryPointInfo
+ Amazonka.StorageGateway.Types.TapeRecoveryPointInfo: instance Control.DeepSeq.NFData Amazonka.StorageGateway.Types.TapeRecoveryPointInfo.TapeRecoveryPointInfo
+ Amazonka.StorageGateway.Types.TapeRecoveryPointInfo: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.StorageGateway.Types.TapeRecoveryPointInfo.TapeRecoveryPointInfo
+ Amazonka.StorageGateway.Types.TapeRecoveryPointInfo: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.Types.TapeRecoveryPointInfo.TapeRecoveryPointInfo
+ Amazonka.StorageGateway.Types.TapeRecoveryPointInfo: instance GHC.Classes.Eq Amazonka.StorageGateway.Types.TapeRecoveryPointInfo.TapeRecoveryPointInfo
+ Amazonka.StorageGateway.Types.TapeRecoveryPointInfo: instance GHC.Generics.Generic Amazonka.StorageGateway.Types.TapeRecoveryPointInfo.TapeRecoveryPointInfo
+ Amazonka.StorageGateway.Types.TapeRecoveryPointInfo: instance GHC.Read.Read Amazonka.StorageGateway.Types.TapeRecoveryPointInfo.TapeRecoveryPointInfo
+ Amazonka.StorageGateway.Types.TapeRecoveryPointInfo: instance GHC.Show.Show Amazonka.StorageGateway.Types.TapeRecoveryPointInfo.TapeRecoveryPointInfo
+ Amazonka.StorageGateway.Types.TapeRecoveryPointInfo: newTapeRecoveryPointInfo :: TapeRecoveryPointInfo
+ Amazonka.StorageGateway.Types.TapeRecoveryPointInfo: tapeRecoveryPointInfo_tapeARN :: Lens' TapeRecoveryPointInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.TapeRecoveryPointInfo: tapeRecoveryPointInfo_tapeRecoveryPointTime :: Lens' TapeRecoveryPointInfo (Maybe UTCTime)
+ Amazonka.StorageGateway.Types.TapeRecoveryPointInfo: tapeRecoveryPointInfo_tapeSizeInBytes :: Lens' TapeRecoveryPointInfo (Maybe Integer)
+ Amazonka.StorageGateway.Types.TapeRecoveryPointInfo: tapeRecoveryPointInfo_tapeStatus :: Lens' TapeRecoveryPointInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.TapeStorageClass: TapeStorageClass' :: Text -> TapeStorageClass
+ Amazonka.StorageGateway.Types.TapeStorageClass: [fromTapeStorageClass] :: TapeStorageClass -> Text
+ Amazonka.StorageGateway.Types.TapeStorageClass: instance Amazonka.Data.ByteString.ToByteString Amazonka.StorageGateway.Types.TapeStorageClass.TapeStorageClass
+ Amazonka.StorageGateway.Types.TapeStorageClass: instance Amazonka.Data.Headers.ToHeader Amazonka.StorageGateway.Types.TapeStorageClass.TapeStorageClass
+ Amazonka.StorageGateway.Types.TapeStorageClass: instance Amazonka.Data.Log.ToLog Amazonka.StorageGateway.Types.TapeStorageClass.TapeStorageClass
+ Amazonka.StorageGateway.Types.TapeStorageClass: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.Types.TapeStorageClass.TapeStorageClass
+ Amazonka.StorageGateway.Types.TapeStorageClass: instance Amazonka.Data.Text.FromText Amazonka.StorageGateway.Types.TapeStorageClass.TapeStorageClass
+ Amazonka.StorageGateway.Types.TapeStorageClass: instance Amazonka.Data.Text.ToText Amazonka.StorageGateway.Types.TapeStorageClass.TapeStorageClass
+ Amazonka.StorageGateway.Types.TapeStorageClass: instance Amazonka.Data.XML.FromXML Amazonka.StorageGateway.Types.TapeStorageClass.TapeStorageClass
+ Amazonka.StorageGateway.Types.TapeStorageClass: instance Amazonka.Data.XML.ToXML Amazonka.StorageGateway.Types.TapeStorageClass.TapeStorageClass
+ Amazonka.StorageGateway.Types.TapeStorageClass: instance Control.DeepSeq.NFData Amazonka.StorageGateway.Types.TapeStorageClass.TapeStorageClass
+ Amazonka.StorageGateway.Types.TapeStorageClass: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.StorageGateway.Types.TapeStorageClass.TapeStorageClass
+ Amazonka.StorageGateway.Types.TapeStorageClass: instance Data.Aeson.Types.FromJSON.FromJSONKey Amazonka.StorageGateway.Types.TapeStorageClass.TapeStorageClass
+ Amazonka.StorageGateway.Types.TapeStorageClass: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.Types.TapeStorageClass.TapeStorageClass
+ Amazonka.StorageGateway.Types.TapeStorageClass: instance Data.Aeson.Types.ToJSON.ToJSONKey Amazonka.StorageGateway.Types.TapeStorageClass.TapeStorageClass
+ Amazonka.StorageGateway.Types.TapeStorageClass: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.Types.TapeStorageClass.TapeStorageClass
+ Amazonka.StorageGateway.Types.TapeStorageClass: instance GHC.Classes.Eq Amazonka.StorageGateway.Types.TapeStorageClass.TapeStorageClass
+ Amazonka.StorageGateway.Types.TapeStorageClass: instance GHC.Classes.Ord Amazonka.StorageGateway.Types.TapeStorageClass.TapeStorageClass
+ Amazonka.StorageGateway.Types.TapeStorageClass: instance GHC.Generics.Generic Amazonka.StorageGateway.Types.TapeStorageClass.TapeStorageClass
+ Amazonka.StorageGateway.Types.TapeStorageClass: instance GHC.Read.Read Amazonka.StorageGateway.Types.TapeStorageClass.TapeStorageClass
+ Amazonka.StorageGateway.Types.TapeStorageClass: instance GHC.Show.Show Amazonka.StorageGateway.Types.TapeStorageClass.TapeStorageClass
+ Amazonka.StorageGateway.Types.TapeStorageClass: newtype TapeStorageClass
+ Amazonka.StorageGateway.Types.TapeStorageClass: pattern TapeStorageClass_DEEP_ARCHIVE :: TapeStorageClass
+ Amazonka.StorageGateway.Types.TapeStorageClass: pattern TapeStorageClass_GLACIER :: TapeStorageClass
+ Amazonka.StorageGateway.Types.VTLDevice: VTLDevice' :: Maybe DeviceiSCSIAttributes -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> VTLDevice
+ Amazonka.StorageGateway.Types.VTLDevice: [$sel:deviceiSCSIAttributes:VTLDevice'] :: VTLDevice -> Maybe DeviceiSCSIAttributes
+ Amazonka.StorageGateway.Types.VTLDevice: [$sel:vTLDeviceARN:VTLDevice'] :: VTLDevice -> Maybe Text
+ Amazonka.StorageGateway.Types.VTLDevice: [$sel:vTLDeviceProductIdentifier:VTLDevice'] :: VTLDevice -> Maybe Text
+ Amazonka.StorageGateway.Types.VTLDevice: [$sel:vTLDeviceType:VTLDevice'] :: VTLDevice -> Maybe Text
+ Amazonka.StorageGateway.Types.VTLDevice: [$sel:vTLDeviceVendor:VTLDevice'] :: VTLDevice -> Maybe Text
+ Amazonka.StorageGateway.Types.VTLDevice: data VTLDevice
+ Amazonka.StorageGateway.Types.VTLDevice: instance Control.DeepSeq.NFData Amazonka.StorageGateway.Types.VTLDevice.VTLDevice
+ Amazonka.StorageGateway.Types.VTLDevice: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.StorageGateway.Types.VTLDevice.VTLDevice
+ Amazonka.StorageGateway.Types.VTLDevice: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.Types.VTLDevice.VTLDevice
+ Amazonka.StorageGateway.Types.VTLDevice: instance GHC.Classes.Eq Amazonka.StorageGateway.Types.VTLDevice.VTLDevice
+ Amazonka.StorageGateway.Types.VTLDevice: instance GHC.Generics.Generic Amazonka.StorageGateway.Types.VTLDevice.VTLDevice
+ Amazonka.StorageGateway.Types.VTLDevice: instance GHC.Read.Read Amazonka.StorageGateway.Types.VTLDevice.VTLDevice
+ Amazonka.StorageGateway.Types.VTLDevice: instance GHC.Show.Show Amazonka.StorageGateway.Types.VTLDevice.VTLDevice
+ Amazonka.StorageGateway.Types.VTLDevice: newVTLDevice :: VTLDevice
+ Amazonka.StorageGateway.Types.VTLDevice: vTLDevice_deviceiSCSIAttributes :: Lens' VTLDevice (Maybe DeviceiSCSIAttributes)
+ Amazonka.StorageGateway.Types.VTLDevice: vTLDevice_vTLDeviceARN :: Lens' VTLDevice (Maybe Text)
+ Amazonka.StorageGateway.Types.VTLDevice: vTLDevice_vTLDeviceProductIdentifier :: Lens' VTLDevice (Maybe Text)
+ Amazonka.StorageGateway.Types.VTLDevice: vTLDevice_vTLDeviceType :: Lens' VTLDevice (Maybe Text)
+ Amazonka.StorageGateway.Types.VTLDevice: vTLDevice_vTLDeviceVendor :: Lens' VTLDevice (Maybe Text)
+ Amazonka.StorageGateway.Types.VolumeInfo: VolumeInfo' :: Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Text -> Maybe Integer -> Maybe Text -> VolumeInfo
+ Amazonka.StorageGateway.Types.VolumeInfo: [$sel:gatewayARN:VolumeInfo'] :: VolumeInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.VolumeInfo: [$sel:gatewayId:VolumeInfo'] :: VolumeInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.VolumeInfo: [$sel:volumeARN:VolumeInfo'] :: VolumeInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.VolumeInfo: [$sel:volumeAttachmentStatus:VolumeInfo'] :: VolumeInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.VolumeInfo: [$sel:volumeId:VolumeInfo'] :: VolumeInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.VolumeInfo: [$sel:volumeSizeInBytes:VolumeInfo'] :: VolumeInfo -> Maybe Integer
+ Amazonka.StorageGateway.Types.VolumeInfo: [$sel:volumeType:VolumeInfo'] :: VolumeInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.VolumeInfo: data VolumeInfo
+ Amazonka.StorageGateway.Types.VolumeInfo: instance Control.DeepSeq.NFData Amazonka.StorageGateway.Types.VolumeInfo.VolumeInfo
+ Amazonka.StorageGateway.Types.VolumeInfo: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.StorageGateway.Types.VolumeInfo.VolumeInfo
+ Amazonka.StorageGateway.Types.VolumeInfo: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.Types.VolumeInfo.VolumeInfo
+ Amazonka.StorageGateway.Types.VolumeInfo: instance GHC.Classes.Eq Amazonka.StorageGateway.Types.VolumeInfo.VolumeInfo
+ Amazonka.StorageGateway.Types.VolumeInfo: instance GHC.Generics.Generic Amazonka.StorageGateway.Types.VolumeInfo.VolumeInfo
+ Amazonka.StorageGateway.Types.VolumeInfo: instance GHC.Read.Read Amazonka.StorageGateway.Types.VolumeInfo.VolumeInfo
+ Amazonka.StorageGateway.Types.VolumeInfo: instance GHC.Show.Show Amazonka.StorageGateway.Types.VolumeInfo.VolumeInfo
+ Amazonka.StorageGateway.Types.VolumeInfo: newVolumeInfo :: VolumeInfo
+ Amazonka.StorageGateway.Types.VolumeInfo: volumeInfo_gatewayARN :: Lens' VolumeInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.VolumeInfo: volumeInfo_gatewayId :: Lens' VolumeInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.VolumeInfo: volumeInfo_volumeARN :: Lens' VolumeInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.VolumeInfo: volumeInfo_volumeAttachmentStatus :: Lens' VolumeInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.VolumeInfo: volumeInfo_volumeId :: Lens' VolumeInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.VolumeInfo: volumeInfo_volumeSizeInBytes :: Lens' VolumeInfo (Maybe Integer)
+ Amazonka.StorageGateway.Types.VolumeInfo: volumeInfo_volumeType :: Lens' VolumeInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.VolumeRecoveryPointInfo: VolumeRecoveryPointInfo' :: Maybe Text -> Maybe Text -> Maybe Integer -> Maybe Integer -> VolumeRecoveryPointInfo
+ Amazonka.StorageGateway.Types.VolumeRecoveryPointInfo: [$sel:volumeARN:VolumeRecoveryPointInfo'] :: VolumeRecoveryPointInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.VolumeRecoveryPointInfo: [$sel:volumeRecoveryPointTime:VolumeRecoveryPointInfo'] :: VolumeRecoveryPointInfo -> Maybe Text
+ Amazonka.StorageGateway.Types.VolumeRecoveryPointInfo: [$sel:volumeSizeInBytes:VolumeRecoveryPointInfo'] :: VolumeRecoveryPointInfo -> Maybe Integer
+ Amazonka.StorageGateway.Types.VolumeRecoveryPointInfo: [$sel:volumeUsageInBytes:VolumeRecoveryPointInfo'] :: VolumeRecoveryPointInfo -> Maybe Integer
+ Amazonka.StorageGateway.Types.VolumeRecoveryPointInfo: data VolumeRecoveryPointInfo
+ Amazonka.StorageGateway.Types.VolumeRecoveryPointInfo: instance Control.DeepSeq.NFData Amazonka.StorageGateway.Types.VolumeRecoveryPointInfo.VolumeRecoveryPointInfo
+ Amazonka.StorageGateway.Types.VolumeRecoveryPointInfo: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.StorageGateway.Types.VolumeRecoveryPointInfo.VolumeRecoveryPointInfo
+ Amazonka.StorageGateway.Types.VolumeRecoveryPointInfo: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.Types.VolumeRecoveryPointInfo.VolumeRecoveryPointInfo
+ Amazonka.StorageGateway.Types.VolumeRecoveryPointInfo: instance GHC.Classes.Eq Amazonka.StorageGateway.Types.VolumeRecoveryPointInfo.VolumeRecoveryPointInfo
+ Amazonka.StorageGateway.Types.VolumeRecoveryPointInfo: instance GHC.Generics.Generic Amazonka.StorageGateway.Types.VolumeRecoveryPointInfo.VolumeRecoveryPointInfo
+ Amazonka.StorageGateway.Types.VolumeRecoveryPointInfo: instance GHC.Read.Read Amazonka.StorageGateway.Types.VolumeRecoveryPointInfo.VolumeRecoveryPointInfo
+ Amazonka.StorageGateway.Types.VolumeRecoveryPointInfo: instance GHC.Show.Show Amazonka.StorageGateway.Types.VolumeRecoveryPointInfo.VolumeRecoveryPointInfo
+ Amazonka.StorageGateway.Types.VolumeRecoveryPointInfo: newVolumeRecoveryPointInfo :: VolumeRecoveryPointInfo
+ Amazonka.StorageGateway.Types.VolumeRecoveryPointInfo: volumeRecoveryPointInfo_volumeARN :: Lens' VolumeRecoveryPointInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.VolumeRecoveryPointInfo: volumeRecoveryPointInfo_volumeRecoveryPointTime :: Lens' VolumeRecoveryPointInfo (Maybe Text)
+ Amazonka.StorageGateway.Types.VolumeRecoveryPointInfo: volumeRecoveryPointInfo_volumeSizeInBytes :: Lens' VolumeRecoveryPointInfo (Maybe Integer)
+ Amazonka.StorageGateway.Types.VolumeRecoveryPointInfo: volumeRecoveryPointInfo_volumeUsageInBytes :: Lens' VolumeRecoveryPointInfo (Maybe Integer)
+ Amazonka.StorageGateway.Types.VolumeiSCSIAttributes: VolumeiSCSIAttributes' :: Maybe Bool -> Maybe Natural -> Maybe Text -> Maybe Int -> Maybe Text -> VolumeiSCSIAttributes
+ Amazonka.StorageGateway.Types.VolumeiSCSIAttributes: [$sel:chapEnabled:VolumeiSCSIAttributes'] :: VolumeiSCSIAttributes -> Maybe Bool
+ Amazonka.StorageGateway.Types.VolumeiSCSIAttributes: [$sel:lunNumber:VolumeiSCSIAttributes'] :: VolumeiSCSIAttributes -> Maybe Natural
+ Amazonka.StorageGateway.Types.VolumeiSCSIAttributes: [$sel:networkInterfaceId:VolumeiSCSIAttributes'] :: VolumeiSCSIAttributes -> Maybe Text
+ Amazonka.StorageGateway.Types.VolumeiSCSIAttributes: [$sel:networkInterfacePort:VolumeiSCSIAttributes'] :: VolumeiSCSIAttributes -> Maybe Int
+ Amazonka.StorageGateway.Types.VolumeiSCSIAttributes: [$sel:targetARN:VolumeiSCSIAttributes'] :: VolumeiSCSIAttributes -> Maybe Text
+ Amazonka.StorageGateway.Types.VolumeiSCSIAttributes: data VolumeiSCSIAttributes
+ Amazonka.StorageGateway.Types.VolumeiSCSIAttributes: instance Control.DeepSeq.NFData Amazonka.StorageGateway.Types.VolumeiSCSIAttributes.VolumeiSCSIAttributes
+ Amazonka.StorageGateway.Types.VolumeiSCSIAttributes: instance Data.Aeson.Types.FromJSON.FromJSON Amazonka.StorageGateway.Types.VolumeiSCSIAttributes.VolumeiSCSIAttributes
+ Amazonka.StorageGateway.Types.VolumeiSCSIAttributes: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.Types.VolumeiSCSIAttributes.VolumeiSCSIAttributes
+ Amazonka.StorageGateway.Types.VolumeiSCSIAttributes: instance GHC.Classes.Eq Amazonka.StorageGateway.Types.VolumeiSCSIAttributes.VolumeiSCSIAttributes
+ Amazonka.StorageGateway.Types.VolumeiSCSIAttributes: instance GHC.Generics.Generic Amazonka.StorageGateway.Types.VolumeiSCSIAttributes.VolumeiSCSIAttributes
+ Amazonka.StorageGateway.Types.VolumeiSCSIAttributes: instance GHC.Read.Read Amazonka.StorageGateway.Types.VolumeiSCSIAttributes.VolumeiSCSIAttributes
+ Amazonka.StorageGateway.Types.VolumeiSCSIAttributes: instance GHC.Show.Show Amazonka.StorageGateway.Types.VolumeiSCSIAttributes.VolumeiSCSIAttributes
+ Amazonka.StorageGateway.Types.VolumeiSCSIAttributes: newVolumeiSCSIAttributes :: VolumeiSCSIAttributes
+ Amazonka.StorageGateway.Types.VolumeiSCSIAttributes: volumeiSCSIAttributes_chapEnabled :: Lens' VolumeiSCSIAttributes (Maybe Bool)
+ Amazonka.StorageGateway.Types.VolumeiSCSIAttributes: volumeiSCSIAttributes_lunNumber :: Lens' VolumeiSCSIAttributes (Maybe Natural)
+ Amazonka.StorageGateway.Types.VolumeiSCSIAttributes: volumeiSCSIAttributes_networkInterfaceId :: Lens' VolumeiSCSIAttributes (Maybe Text)
+ Amazonka.StorageGateway.Types.VolumeiSCSIAttributes: volumeiSCSIAttributes_networkInterfacePort :: Lens' VolumeiSCSIAttributes (Maybe Int)
+ Amazonka.StorageGateway.Types.VolumeiSCSIAttributes: volumeiSCSIAttributes_targetARN :: Lens' VolumeiSCSIAttributes (Maybe Text)
+ Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy: UpdateAutomaticTapeCreationPolicy' :: NonEmpty AutomaticTapeCreationRule -> Text -> UpdateAutomaticTapeCreationPolicy
+ Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy: UpdateAutomaticTapeCreationPolicyResponse' :: Maybe Text -> Int -> UpdateAutomaticTapeCreationPolicyResponse
+ Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy: [$sel:automaticTapeCreationRules:UpdateAutomaticTapeCreationPolicy'] :: UpdateAutomaticTapeCreationPolicy -> NonEmpty AutomaticTapeCreationRule
+ Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy: [$sel:gatewayARN:UpdateAutomaticTapeCreationPolicy'] :: UpdateAutomaticTapeCreationPolicy -> Text
+ Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy: [$sel:gatewayARN:UpdateAutomaticTapeCreationPolicyResponse'] :: UpdateAutomaticTapeCreationPolicyResponse -> Maybe Text
+ Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy: [$sel:httpStatus:UpdateAutomaticTapeCreationPolicyResponse'] :: UpdateAutomaticTapeCreationPolicyResponse -> Int
+ Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy: data UpdateAutomaticTapeCreationPolicy
+ Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy: data UpdateAutomaticTapeCreationPolicyResponse
+ Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy.UpdateAutomaticTapeCreationPolicy
+ Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy.UpdateAutomaticTapeCreationPolicy
+ Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy.UpdateAutomaticTapeCreationPolicy
+ Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy.UpdateAutomaticTapeCreationPolicy
+ Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy: instance Control.DeepSeq.NFData Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy.UpdateAutomaticTapeCreationPolicy
+ Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy: instance Control.DeepSeq.NFData Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy.UpdateAutomaticTapeCreationPolicyResponse
+ Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy.UpdateAutomaticTapeCreationPolicy
+ Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy.UpdateAutomaticTapeCreationPolicy
+ Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy: instance GHC.Classes.Eq Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy.UpdateAutomaticTapeCreationPolicy
+ Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy: instance GHC.Classes.Eq Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy.UpdateAutomaticTapeCreationPolicyResponse
+ Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy: instance GHC.Generics.Generic Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy.UpdateAutomaticTapeCreationPolicy
+ Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy: instance GHC.Generics.Generic Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy.UpdateAutomaticTapeCreationPolicyResponse
+ Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy: instance GHC.Read.Read Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy.UpdateAutomaticTapeCreationPolicy
+ Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy: instance GHC.Read.Read Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy.UpdateAutomaticTapeCreationPolicyResponse
+ Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy: instance GHC.Show.Show Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy.UpdateAutomaticTapeCreationPolicy
+ Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy: instance GHC.Show.Show Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy.UpdateAutomaticTapeCreationPolicyResponse
+ Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy: newUpdateAutomaticTapeCreationPolicy :: NonEmpty AutomaticTapeCreationRule -> Text -> UpdateAutomaticTapeCreationPolicy
+ Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy: newUpdateAutomaticTapeCreationPolicyResponse :: Int -> UpdateAutomaticTapeCreationPolicyResponse
+ Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy: updateAutomaticTapeCreationPolicyResponse_gatewayARN :: Lens' UpdateAutomaticTapeCreationPolicyResponse (Maybe Text)
+ Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy: updateAutomaticTapeCreationPolicyResponse_httpStatus :: Lens' UpdateAutomaticTapeCreationPolicyResponse Int
+ Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy: updateAutomaticTapeCreationPolicy_automaticTapeCreationRules :: Lens' UpdateAutomaticTapeCreationPolicy (NonEmpty AutomaticTapeCreationRule)
+ Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy: updateAutomaticTapeCreationPolicy_gatewayARN :: Lens' UpdateAutomaticTapeCreationPolicy Text
+ Amazonka.StorageGateway.UpdateBandwidthRateLimit: UpdateBandwidthRateLimit' :: Maybe Natural -> Maybe Natural -> Text -> UpdateBandwidthRateLimit
+ Amazonka.StorageGateway.UpdateBandwidthRateLimit: UpdateBandwidthRateLimitResponse' :: Maybe Text -> Int -> UpdateBandwidthRateLimitResponse
+ Amazonka.StorageGateway.UpdateBandwidthRateLimit: [$sel:averageDownloadRateLimitInBitsPerSec:UpdateBandwidthRateLimit'] :: UpdateBandwidthRateLimit -> Maybe Natural
+ Amazonka.StorageGateway.UpdateBandwidthRateLimit: [$sel:averageUploadRateLimitInBitsPerSec:UpdateBandwidthRateLimit'] :: UpdateBandwidthRateLimit -> Maybe Natural
+ Amazonka.StorageGateway.UpdateBandwidthRateLimit: [$sel:gatewayARN:UpdateBandwidthRateLimit'] :: UpdateBandwidthRateLimit -> Text
+ Amazonka.StorageGateway.UpdateBandwidthRateLimit: [$sel:gatewayARN:UpdateBandwidthRateLimitResponse'] :: UpdateBandwidthRateLimitResponse -> Maybe Text
+ Amazonka.StorageGateway.UpdateBandwidthRateLimit: [$sel:httpStatus:UpdateBandwidthRateLimitResponse'] :: UpdateBandwidthRateLimitResponse -> Int
+ Amazonka.StorageGateway.UpdateBandwidthRateLimit: data UpdateBandwidthRateLimit
+ Amazonka.StorageGateway.UpdateBandwidthRateLimit: data UpdateBandwidthRateLimitResponse
+ Amazonka.StorageGateway.UpdateBandwidthRateLimit: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.UpdateBandwidthRateLimit.UpdateBandwidthRateLimit
+ Amazonka.StorageGateway.UpdateBandwidthRateLimit: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.UpdateBandwidthRateLimit.UpdateBandwidthRateLimit
+ Amazonka.StorageGateway.UpdateBandwidthRateLimit: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.UpdateBandwidthRateLimit.UpdateBandwidthRateLimit
+ Amazonka.StorageGateway.UpdateBandwidthRateLimit: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.UpdateBandwidthRateLimit.UpdateBandwidthRateLimit
+ Amazonka.StorageGateway.UpdateBandwidthRateLimit: instance Control.DeepSeq.NFData Amazonka.StorageGateway.UpdateBandwidthRateLimit.UpdateBandwidthRateLimit
+ Amazonka.StorageGateway.UpdateBandwidthRateLimit: instance Control.DeepSeq.NFData Amazonka.StorageGateway.UpdateBandwidthRateLimit.UpdateBandwidthRateLimitResponse
+ Amazonka.StorageGateway.UpdateBandwidthRateLimit: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.UpdateBandwidthRateLimit.UpdateBandwidthRateLimit
+ Amazonka.StorageGateway.UpdateBandwidthRateLimit: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.UpdateBandwidthRateLimit.UpdateBandwidthRateLimit
+ Amazonka.StorageGateway.UpdateBandwidthRateLimit: instance GHC.Classes.Eq Amazonka.StorageGateway.UpdateBandwidthRateLimit.UpdateBandwidthRateLimit
+ Amazonka.StorageGateway.UpdateBandwidthRateLimit: instance GHC.Classes.Eq Amazonka.StorageGateway.UpdateBandwidthRateLimit.UpdateBandwidthRateLimitResponse
+ Amazonka.StorageGateway.UpdateBandwidthRateLimit: instance GHC.Generics.Generic Amazonka.StorageGateway.UpdateBandwidthRateLimit.UpdateBandwidthRateLimit
+ Amazonka.StorageGateway.UpdateBandwidthRateLimit: instance GHC.Generics.Generic Amazonka.StorageGateway.UpdateBandwidthRateLimit.UpdateBandwidthRateLimitResponse
+ Amazonka.StorageGateway.UpdateBandwidthRateLimit: instance GHC.Read.Read Amazonka.StorageGateway.UpdateBandwidthRateLimit.UpdateBandwidthRateLimit
+ Amazonka.StorageGateway.UpdateBandwidthRateLimit: instance GHC.Read.Read Amazonka.StorageGateway.UpdateBandwidthRateLimit.UpdateBandwidthRateLimitResponse
+ Amazonka.StorageGateway.UpdateBandwidthRateLimit: instance GHC.Show.Show Amazonka.StorageGateway.UpdateBandwidthRateLimit.UpdateBandwidthRateLimit
+ Amazonka.StorageGateway.UpdateBandwidthRateLimit: instance GHC.Show.Show Amazonka.StorageGateway.UpdateBandwidthRateLimit.UpdateBandwidthRateLimitResponse
+ Amazonka.StorageGateway.UpdateBandwidthRateLimit: newUpdateBandwidthRateLimit :: Text -> UpdateBandwidthRateLimit
+ Amazonka.StorageGateway.UpdateBandwidthRateLimit: newUpdateBandwidthRateLimitResponse :: Int -> UpdateBandwidthRateLimitResponse
+ Amazonka.StorageGateway.UpdateBandwidthRateLimit: updateBandwidthRateLimitResponse_gatewayARN :: Lens' UpdateBandwidthRateLimitResponse (Maybe Text)
+ Amazonka.StorageGateway.UpdateBandwidthRateLimit: updateBandwidthRateLimitResponse_httpStatus :: Lens' UpdateBandwidthRateLimitResponse Int
+ Amazonka.StorageGateway.UpdateBandwidthRateLimit: updateBandwidthRateLimit_averageDownloadRateLimitInBitsPerSec :: Lens' UpdateBandwidthRateLimit (Maybe Natural)
+ Amazonka.StorageGateway.UpdateBandwidthRateLimit: updateBandwidthRateLimit_averageUploadRateLimitInBitsPerSec :: Lens' UpdateBandwidthRateLimit (Maybe Natural)
+ Amazonka.StorageGateway.UpdateBandwidthRateLimit: updateBandwidthRateLimit_gatewayARN :: Lens' UpdateBandwidthRateLimit Text
+ Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule: UpdateBandwidthRateLimitSchedule' :: Text -> [BandwidthRateLimitInterval] -> UpdateBandwidthRateLimitSchedule
+ Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule: UpdateBandwidthRateLimitScheduleResponse' :: Maybe Text -> Int -> UpdateBandwidthRateLimitScheduleResponse
+ Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule: [$sel:bandwidthRateLimitIntervals:UpdateBandwidthRateLimitSchedule'] :: UpdateBandwidthRateLimitSchedule -> [BandwidthRateLimitInterval]
+ Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule: [$sel:gatewayARN:UpdateBandwidthRateLimitSchedule'] :: UpdateBandwidthRateLimitSchedule -> Text
+ Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule: [$sel:gatewayARN:UpdateBandwidthRateLimitScheduleResponse'] :: UpdateBandwidthRateLimitScheduleResponse -> Maybe Text
+ Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule: [$sel:httpStatus:UpdateBandwidthRateLimitScheduleResponse'] :: UpdateBandwidthRateLimitScheduleResponse -> Int
+ Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule: data UpdateBandwidthRateLimitSchedule
+ Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule: data UpdateBandwidthRateLimitScheduleResponse
+ Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule.UpdateBandwidthRateLimitSchedule
+ Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule.UpdateBandwidthRateLimitSchedule
+ Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule.UpdateBandwidthRateLimitSchedule
+ Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule.UpdateBandwidthRateLimitSchedule
+ Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule: instance Control.DeepSeq.NFData Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule.UpdateBandwidthRateLimitSchedule
+ Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule: instance Control.DeepSeq.NFData Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule.UpdateBandwidthRateLimitScheduleResponse
+ Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule.UpdateBandwidthRateLimitSchedule
+ Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule.UpdateBandwidthRateLimitSchedule
+ Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule: instance GHC.Classes.Eq Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule.UpdateBandwidthRateLimitSchedule
+ Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule: instance GHC.Classes.Eq Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule.UpdateBandwidthRateLimitScheduleResponse
+ Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule: instance GHC.Generics.Generic Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule.UpdateBandwidthRateLimitSchedule
+ Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule: instance GHC.Generics.Generic Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule.UpdateBandwidthRateLimitScheduleResponse
+ Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule: instance GHC.Read.Read Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule.UpdateBandwidthRateLimitSchedule
+ Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule: instance GHC.Read.Read Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule.UpdateBandwidthRateLimitScheduleResponse
+ Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule: instance GHC.Show.Show Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule.UpdateBandwidthRateLimitSchedule
+ Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule: instance GHC.Show.Show Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule.UpdateBandwidthRateLimitScheduleResponse
+ Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule: newUpdateBandwidthRateLimitSchedule :: Text -> UpdateBandwidthRateLimitSchedule
+ Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule: newUpdateBandwidthRateLimitScheduleResponse :: Int -> UpdateBandwidthRateLimitScheduleResponse
+ Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule: updateBandwidthRateLimitScheduleResponse_gatewayARN :: Lens' UpdateBandwidthRateLimitScheduleResponse (Maybe Text)
+ Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule: updateBandwidthRateLimitScheduleResponse_httpStatus :: Lens' UpdateBandwidthRateLimitScheduleResponse Int
+ Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule: updateBandwidthRateLimitSchedule_bandwidthRateLimitIntervals :: Lens' UpdateBandwidthRateLimitSchedule [BandwidthRateLimitInterval]
+ Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule: updateBandwidthRateLimitSchedule_gatewayARN :: Lens' UpdateBandwidthRateLimitSchedule Text
+ Amazonka.StorageGateway.UpdateChapCredentials: UpdateChapCredentials' :: Maybe (Sensitive Text) -> Text -> Sensitive Text -> Text -> UpdateChapCredentials
+ Amazonka.StorageGateway.UpdateChapCredentials: UpdateChapCredentialsResponse' :: Maybe Text -> Maybe Text -> Int -> UpdateChapCredentialsResponse
+ Amazonka.StorageGateway.UpdateChapCredentials: [$sel:httpStatus:UpdateChapCredentialsResponse'] :: UpdateChapCredentialsResponse -> Int
+ Amazonka.StorageGateway.UpdateChapCredentials: [$sel:initiatorName:UpdateChapCredentials'] :: UpdateChapCredentials -> Text
+ Amazonka.StorageGateway.UpdateChapCredentials: [$sel:initiatorName:UpdateChapCredentialsResponse'] :: UpdateChapCredentialsResponse -> Maybe Text
+ Amazonka.StorageGateway.UpdateChapCredentials: [$sel:secretToAuthenticateInitiator:UpdateChapCredentials'] :: UpdateChapCredentials -> Sensitive Text
+ Amazonka.StorageGateway.UpdateChapCredentials: [$sel:secretToAuthenticateTarget:UpdateChapCredentials'] :: UpdateChapCredentials -> Maybe (Sensitive Text)
+ Amazonka.StorageGateway.UpdateChapCredentials: [$sel:targetARN:UpdateChapCredentials'] :: UpdateChapCredentials -> Text
+ Amazonka.StorageGateway.UpdateChapCredentials: [$sel:targetARN:UpdateChapCredentialsResponse'] :: UpdateChapCredentialsResponse -> Maybe Text
+ Amazonka.StorageGateway.UpdateChapCredentials: data UpdateChapCredentials
+ Amazonka.StorageGateway.UpdateChapCredentials: data UpdateChapCredentialsResponse
+ Amazonka.StorageGateway.UpdateChapCredentials: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.UpdateChapCredentials.UpdateChapCredentials
+ Amazonka.StorageGateway.UpdateChapCredentials: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.UpdateChapCredentials.UpdateChapCredentials
+ Amazonka.StorageGateway.UpdateChapCredentials: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.UpdateChapCredentials.UpdateChapCredentials
+ Amazonka.StorageGateway.UpdateChapCredentials: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.UpdateChapCredentials.UpdateChapCredentials
+ Amazonka.StorageGateway.UpdateChapCredentials: instance Control.DeepSeq.NFData Amazonka.StorageGateway.UpdateChapCredentials.UpdateChapCredentials
+ Amazonka.StorageGateway.UpdateChapCredentials: instance Control.DeepSeq.NFData Amazonka.StorageGateway.UpdateChapCredentials.UpdateChapCredentialsResponse
+ Amazonka.StorageGateway.UpdateChapCredentials: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.UpdateChapCredentials.UpdateChapCredentials
+ Amazonka.StorageGateway.UpdateChapCredentials: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.UpdateChapCredentials.UpdateChapCredentials
+ Amazonka.StorageGateway.UpdateChapCredentials: instance GHC.Classes.Eq Amazonka.StorageGateway.UpdateChapCredentials.UpdateChapCredentials
+ Amazonka.StorageGateway.UpdateChapCredentials: instance GHC.Classes.Eq Amazonka.StorageGateway.UpdateChapCredentials.UpdateChapCredentialsResponse
+ Amazonka.StorageGateway.UpdateChapCredentials: instance GHC.Generics.Generic Amazonka.StorageGateway.UpdateChapCredentials.UpdateChapCredentials
+ Amazonka.StorageGateway.UpdateChapCredentials: instance GHC.Generics.Generic Amazonka.StorageGateway.UpdateChapCredentials.UpdateChapCredentialsResponse
+ Amazonka.StorageGateway.UpdateChapCredentials: instance GHC.Read.Read Amazonka.StorageGateway.UpdateChapCredentials.UpdateChapCredentialsResponse
+ Amazonka.StorageGateway.UpdateChapCredentials: instance GHC.Show.Show Amazonka.StorageGateway.UpdateChapCredentials.UpdateChapCredentials
+ Amazonka.StorageGateway.UpdateChapCredentials: instance GHC.Show.Show Amazonka.StorageGateway.UpdateChapCredentials.UpdateChapCredentialsResponse
+ Amazonka.StorageGateway.UpdateChapCredentials: newUpdateChapCredentials :: Text -> Text -> Text -> UpdateChapCredentials
+ Amazonka.StorageGateway.UpdateChapCredentials: newUpdateChapCredentialsResponse :: Int -> UpdateChapCredentialsResponse
+ Amazonka.StorageGateway.UpdateChapCredentials: updateChapCredentialsResponse_httpStatus :: Lens' UpdateChapCredentialsResponse Int
+ Amazonka.StorageGateway.UpdateChapCredentials: updateChapCredentialsResponse_initiatorName :: Lens' UpdateChapCredentialsResponse (Maybe Text)
+ Amazonka.StorageGateway.UpdateChapCredentials: updateChapCredentialsResponse_targetARN :: Lens' UpdateChapCredentialsResponse (Maybe Text)
+ Amazonka.StorageGateway.UpdateChapCredentials: updateChapCredentials_initiatorName :: Lens' UpdateChapCredentials Text
+ Amazonka.StorageGateway.UpdateChapCredentials: updateChapCredentials_secretToAuthenticateInitiator :: Lens' UpdateChapCredentials Text
+ Amazonka.StorageGateway.UpdateChapCredentials: updateChapCredentials_secretToAuthenticateTarget :: Lens' UpdateChapCredentials (Maybe Text)
+ Amazonka.StorageGateway.UpdateChapCredentials: updateChapCredentials_targetARN :: Lens' UpdateChapCredentials Text
+ Amazonka.StorageGateway.UpdateFileSystemAssociation: UpdateFileSystemAssociation' :: Maybe Text -> Maybe CacheAttributes -> Maybe (Sensitive Text) -> Maybe Text -> Text -> UpdateFileSystemAssociation
+ Amazonka.StorageGateway.UpdateFileSystemAssociation: UpdateFileSystemAssociationResponse' :: Maybe Text -> Int -> UpdateFileSystemAssociationResponse
+ Amazonka.StorageGateway.UpdateFileSystemAssociation: [$sel:auditDestinationARN:UpdateFileSystemAssociation'] :: UpdateFileSystemAssociation -> Maybe Text
+ Amazonka.StorageGateway.UpdateFileSystemAssociation: [$sel:cacheAttributes:UpdateFileSystemAssociation'] :: UpdateFileSystemAssociation -> Maybe CacheAttributes
+ Amazonka.StorageGateway.UpdateFileSystemAssociation: [$sel:fileSystemAssociationARN:UpdateFileSystemAssociation'] :: UpdateFileSystemAssociation -> Text
+ Amazonka.StorageGateway.UpdateFileSystemAssociation: [$sel:fileSystemAssociationARN:UpdateFileSystemAssociationResponse'] :: UpdateFileSystemAssociationResponse -> Maybe Text
+ Amazonka.StorageGateway.UpdateFileSystemAssociation: [$sel:httpStatus:UpdateFileSystemAssociationResponse'] :: UpdateFileSystemAssociationResponse -> Int
+ Amazonka.StorageGateway.UpdateFileSystemAssociation: [$sel:password:UpdateFileSystemAssociation'] :: UpdateFileSystemAssociation -> Maybe (Sensitive Text)
+ Amazonka.StorageGateway.UpdateFileSystemAssociation: [$sel:userName:UpdateFileSystemAssociation'] :: UpdateFileSystemAssociation -> Maybe Text
+ Amazonka.StorageGateway.UpdateFileSystemAssociation: data UpdateFileSystemAssociation
+ Amazonka.StorageGateway.UpdateFileSystemAssociation: data UpdateFileSystemAssociationResponse
+ Amazonka.StorageGateway.UpdateFileSystemAssociation: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.UpdateFileSystemAssociation.UpdateFileSystemAssociation
+ Amazonka.StorageGateway.UpdateFileSystemAssociation: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.UpdateFileSystemAssociation.UpdateFileSystemAssociation
+ Amazonka.StorageGateway.UpdateFileSystemAssociation: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.UpdateFileSystemAssociation.UpdateFileSystemAssociation
+ Amazonka.StorageGateway.UpdateFileSystemAssociation: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.UpdateFileSystemAssociation.UpdateFileSystemAssociation
+ Amazonka.StorageGateway.UpdateFileSystemAssociation: instance Control.DeepSeq.NFData Amazonka.StorageGateway.UpdateFileSystemAssociation.UpdateFileSystemAssociation
+ Amazonka.StorageGateway.UpdateFileSystemAssociation: instance Control.DeepSeq.NFData Amazonka.StorageGateway.UpdateFileSystemAssociation.UpdateFileSystemAssociationResponse
+ Amazonka.StorageGateway.UpdateFileSystemAssociation: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.UpdateFileSystemAssociation.UpdateFileSystemAssociation
+ Amazonka.StorageGateway.UpdateFileSystemAssociation: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.UpdateFileSystemAssociation.UpdateFileSystemAssociation
+ Amazonka.StorageGateway.UpdateFileSystemAssociation: instance GHC.Classes.Eq Amazonka.StorageGateway.UpdateFileSystemAssociation.UpdateFileSystemAssociation
+ Amazonka.StorageGateway.UpdateFileSystemAssociation: instance GHC.Classes.Eq Amazonka.StorageGateway.UpdateFileSystemAssociation.UpdateFileSystemAssociationResponse
+ Amazonka.StorageGateway.UpdateFileSystemAssociation: instance GHC.Generics.Generic Amazonka.StorageGateway.UpdateFileSystemAssociation.UpdateFileSystemAssociation
+ Amazonka.StorageGateway.UpdateFileSystemAssociation: instance GHC.Generics.Generic Amazonka.StorageGateway.UpdateFileSystemAssociation.UpdateFileSystemAssociationResponse
+ Amazonka.StorageGateway.UpdateFileSystemAssociation: instance GHC.Read.Read Amazonka.StorageGateway.UpdateFileSystemAssociation.UpdateFileSystemAssociationResponse
+ Amazonka.StorageGateway.UpdateFileSystemAssociation: instance GHC.Show.Show Amazonka.StorageGateway.UpdateFileSystemAssociation.UpdateFileSystemAssociation
+ Amazonka.StorageGateway.UpdateFileSystemAssociation: instance GHC.Show.Show Amazonka.StorageGateway.UpdateFileSystemAssociation.UpdateFileSystemAssociationResponse
+ Amazonka.StorageGateway.UpdateFileSystemAssociation: newUpdateFileSystemAssociation :: Text -> UpdateFileSystemAssociation
+ Amazonka.StorageGateway.UpdateFileSystemAssociation: newUpdateFileSystemAssociationResponse :: Int -> UpdateFileSystemAssociationResponse
+ Amazonka.StorageGateway.UpdateFileSystemAssociation: updateFileSystemAssociationResponse_fileSystemAssociationARN :: Lens' UpdateFileSystemAssociationResponse (Maybe Text)
+ Amazonka.StorageGateway.UpdateFileSystemAssociation: updateFileSystemAssociationResponse_httpStatus :: Lens' UpdateFileSystemAssociationResponse Int
+ Amazonka.StorageGateway.UpdateFileSystemAssociation: updateFileSystemAssociation_auditDestinationARN :: Lens' UpdateFileSystemAssociation (Maybe Text)
+ Amazonka.StorageGateway.UpdateFileSystemAssociation: updateFileSystemAssociation_cacheAttributes :: Lens' UpdateFileSystemAssociation (Maybe CacheAttributes)
+ Amazonka.StorageGateway.UpdateFileSystemAssociation: updateFileSystemAssociation_fileSystemAssociationARN :: Lens' UpdateFileSystemAssociation Text
+ Amazonka.StorageGateway.UpdateFileSystemAssociation: updateFileSystemAssociation_password :: Lens' UpdateFileSystemAssociation (Maybe Text)
+ Amazonka.StorageGateway.UpdateFileSystemAssociation: updateFileSystemAssociation_userName :: Lens' UpdateFileSystemAssociation (Maybe Text)
+ Amazonka.StorageGateway.UpdateGatewayInformation: UpdateGatewayInformation' :: Maybe Text -> Maybe GatewayCapacity -> Maybe Text -> Maybe Text -> Text -> UpdateGatewayInformation
+ Amazonka.StorageGateway.UpdateGatewayInformation: UpdateGatewayInformationResponse' :: Maybe Text -> Maybe Text -> Int -> UpdateGatewayInformationResponse
+ Amazonka.StorageGateway.UpdateGatewayInformation: [$sel:cloudWatchLogGroupARN:UpdateGatewayInformation'] :: UpdateGatewayInformation -> Maybe Text
+ Amazonka.StorageGateway.UpdateGatewayInformation: [$sel:gatewayARN:UpdateGatewayInformation'] :: UpdateGatewayInformation -> Text
+ Amazonka.StorageGateway.UpdateGatewayInformation: [$sel:gatewayARN:UpdateGatewayInformationResponse'] :: UpdateGatewayInformationResponse -> Maybe Text
+ Amazonka.StorageGateway.UpdateGatewayInformation: [$sel:gatewayCapacity:UpdateGatewayInformation'] :: UpdateGatewayInformation -> Maybe GatewayCapacity
+ Amazonka.StorageGateway.UpdateGatewayInformation: [$sel:gatewayName:UpdateGatewayInformation'] :: UpdateGatewayInformation -> Maybe Text
+ Amazonka.StorageGateway.UpdateGatewayInformation: [$sel:gatewayName:UpdateGatewayInformationResponse'] :: UpdateGatewayInformationResponse -> Maybe Text
+ Amazonka.StorageGateway.UpdateGatewayInformation: [$sel:gatewayTimezone:UpdateGatewayInformation'] :: UpdateGatewayInformation -> Maybe Text
+ Amazonka.StorageGateway.UpdateGatewayInformation: [$sel:httpStatus:UpdateGatewayInformationResponse'] :: UpdateGatewayInformationResponse -> Int
+ Amazonka.StorageGateway.UpdateGatewayInformation: data UpdateGatewayInformation
+ Amazonka.StorageGateway.UpdateGatewayInformation: data UpdateGatewayInformationResponse
+ Amazonka.StorageGateway.UpdateGatewayInformation: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.UpdateGatewayInformation.UpdateGatewayInformation
+ Amazonka.StorageGateway.UpdateGatewayInformation: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.UpdateGatewayInformation.UpdateGatewayInformation
+ Amazonka.StorageGateway.UpdateGatewayInformation: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.UpdateGatewayInformation.UpdateGatewayInformation
+ Amazonka.StorageGateway.UpdateGatewayInformation: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.UpdateGatewayInformation.UpdateGatewayInformation
+ Amazonka.StorageGateway.UpdateGatewayInformation: instance Control.DeepSeq.NFData Amazonka.StorageGateway.UpdateGatewayInformation.UpdateGatewayInformation
+ Amazonka.StorageGateway.UpdateGatewayInformation: instance Control.DeepSeq.NFData Amazonka.StorageGateway.UpdateGatewayInformation.UpdateGatewayInformationResponse
+ Amazonka.StorageGateway.UpdateGatewayInformation: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.UpdateGatewayInformation.UpdateGatewayInformation
+ Amazonka.StorageGateway.UpdateGatewayInformation: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.UpdateGatewayInformation.UpdateGatewayInformation
+ Amazonka.StorageGateway.UpdateGatewayInformation: instance GHC.Classes.Eq Amazonka.StorageGateway.UpdateGatewayInformation.UpdateGatewayInformation
+ Amazonka.StorageGateway.UpdateGatewayInformation: instance GHC.Classes.Eq Amazonka.StorageGateway.UpdateGatewayInformation.UpdateGatewayInformationResponse
+ Amazonka.StorageGateway.UpdateGatewayInformation: instance GHC.Generics.Generic Amazonka.StorageGateway.UpdateGatewayInformation.UpdateGatewayInformation
+ Amazonka.StorageGateway.UpdateGatewayInformation: instance GHC.Generics.Generic Amazonka.StorageGateway.UpdateGatewayInformation.UpdateGatewayInformationResponse
+ Amazonka.StorageGateway.UpdateGatewayInformation: instance GHC.Read.Read Amazonka.StorageGateway.UpdateGatewayInformation.UpdateGatewayInformation
+ Amazonka.StorageGateway.UpdateGatewayInformation: instance GHC.Read.Read Amazonka.StorageGateway.UpdateGatewayInformation.UpdateGatewayInformationResponse
+ Amazonka.StorageGateway.UpdateGatewayInformation: instance GHC.Show.Show Amazonka.StorageGateway.UpdateGatewayInformation.UpdateGatewayInformation
+ Amazonka.StorageGateway.UpdateGatewayInformation: instance GHC.Show.Show Amazonka.StorageGateway.UpdateGatewayInformation.UpdateGatewayInformationResponse
+ Amazonka.StorageGateway.UpdateGatewayInformation: newUpdateGatewayInformation :: Text -> UpdateGatewayInformation
+ Amazonka.StorageGateway.UpdateGatewayInformation: newUpdateGatewayInformationResponse :: Int -> UpdateGatewayInformationResponse
+ Amazonka.StorageGateway.UpdateGatewayInformation: updateGatewayInformationResponse_gatewayARN :: Lens' UpdateGatewayInformationResponse (Maybe Text)
+ Amazonka.StorageGateway.UpdateGatewayInformation: updateGatewayInformationResponse_gatewayName :: Lens' UpdateGatewayInformationResponse (Maybe Text)
+ Amazonka.StorageGateway.UpdateGatewayInformation: updateGatewayInformationResponse_httpStatus :: Lens' UpdateGatewayInformationResponse Int
+ Amazonka.StorageGateway.UpdateGatewayInformation: updateGatewayInformation_cloudWatchLogGroupARN :: Lens' UpdateGatewayInformation (Maybe Text)
+ Amazonka.StorageGateway.UpdateGatewayInformation: updateGatewayInformation_gatewayARN :: Lens' UpdateGatewayInformation Text
+ Amazonka.StorageGateway.UpdateGatewayInformation: updateGatewayInformation_gatewayCapacity :: Lens' UpdateGatewayInformation (Maybe GatewayCapacity)
+ Amazonka.StorageGateway.UpdateGatewayInformation: updateGatewayInformation_gatewayName :: Lens' UpdateGatewayInformation (Maybe Text)
+ Amazonka.StorageGateway.UpdateGatewayInformation: updateGatewayInformation_gatewayTimezone :: Lens' UpdateGatewayInformation (Maybe Text)
+ Amazonka.StorageGateway.UpdateGatewaySoftwareNow: UpdateGatewaySoftwareNow' :: Text -> UpdateGatewaySoftwareNow
+ Amazonka.StorageGateway.UpdateGatewaySoftwareNow: UpdateGatewaySoftwareNowResponse' :: Maybe Text -> Int -> UpdateGatewaySoftwareNowResponse
+ Amazonka.StorageGateway.UpdateGatewaySoftwareNow: [$sel:gatewayARN:UpdateGatewaySoftwareNow'] :: UpdateGatewaySoftwareNow -> Text
+ Amazonka.StorageGateway.UpdateGatewaySoftwareNow: [$sel:gatewayARN:UpdateGatewaySoftwareNowResponse'] :: UpdateGatewaySoftwareNowResponse -> Maybe Text
+ Amazonka.StorageGateway.UpdateGatewaySoftwareNow: [$sel:httpStatus:UpdateGatewaySoftwareNowResponse'] :: UpdateGatewaySoftwareNowResponse -> Int
+ Amazonka.StorageGateway.UpdateGatewaySoftwareNow: data UpdateGatewaySoftwareNow
+ Amazonka.StorageGateway.UpdateGatewaySoftwareNow: data UpdateGatewaySoftwareNowResponse
+ Amazonka.StorageGateway.UpdateGatewaySoftwareNow: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.UpdateGatewaySoftwareNow.UpdateGatewaySoftwareNow
+ Amazonka.StorageGateway.UpdateGatewaySoftwareNow: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.UpdateGatewaySoftwareNow.UpdateGatewaySoftwareNow
+ Amazonka.StorageGateway.UpdateGatewaySoftwareNow: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.UpdateGatewaySoftwareNow.UpdateGatewaySoftwareNow
+ Amazonka.StorageGateway.UpdateGatewaySoftwareNow: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.UpdateGatewaySoftwareNow.UpdateGatewaySoftwareNow
+ Amazonka.StorageGateway.UpdateGatewaySoftwareNow: instance Control.DeepSeq.NFData Amazonka.StorageGateway.UpdateGatewaySoftwareNow.UpdateGatewaySoftwareNow
+ Amazonka.StorageGateway.UpdateGatewaySoftwareNow: instance Control.DeepSeq.NFData Amazonka.StorageGateway.UpdateGatewaySoftwareNow.UpdateGatewaySoftwareNowResponse
+ Amazonka.StorageGateway.UpdateGatewaySoftwareNow: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.UpdateGatewaySoftwareNow.UpdateGatewaySoftwareNow
+ Amazonka.StorageGateway.UpdateGatewaySoftwareNow: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.UpdateGatewaySoftwareNow.UpdateGatewaySoftwareNow
+ Amazonka.StorageGateway.UpdateGatewaySoftwareNow: instance GHC.Classes.Eq Amazonka.StorageGateway.UpdateGatewaySoftwareNow.UpdateGatewaySoftwareNow
+ Amazonka.StorageGateway.UpdateGatewaySoftwareNow: instance GHC.Classes.Eq Amazonka.StorageGateway.UpdateGatewaySoftwareNow.UpdateGatewaySoftwareNowResponse
+ Amazonka.StorageGateway.UpdateGatewaySoftwareNow: instance GHC.Generics.Generic Amazonka.StorageGateway.UpdateGatewaySoftwareNow.UpdateGatewaySoftwareNow
+ Amazonka.StorageGateway.UpdateGatewaySoftwareNow: instance GHC.Generics.Generic Amazonka.StorageGateway.UpdateGatewaySoftwareNow.UpdateGatewaySoftwareNowResponse
+ Amazonka.StorageGateway.UpdateGatewaySoftwareNow: instance GHC.Read.Read Amazonka.StorageGateway.UpdateGatewaySoftwareNow.UpdateGatewaySoftwareNow
+ Amazonka.StorageGateway.UpdateGatewaySoftwareNow: instance GHC.Read.Read Amazonka.StorageGateway.UpdateGatewaySoftwareNow.UpdateGatewaySoftwareNowResponse
+ Amazonka.StorageGateway.UpdateGatewaySoftwareNow: instance GHC.Show.Show Amazonka.StorageGateway.UpdateGatewaySoftwareNow.UpdateGatewaySoftwareNow
+ Amazonka.StorageGateway.UpdateGatewaySoftwareNow: instance GHC.Show.Show Amazonka.StorageGateway.UpdateGatewaySoftwareNow.UpdateGatewaySoftwareNowResponse
+ Amazonka.StorageGateway.UpdateGatewaySoftwareNow: newUpdateGatewaySoftwareNow :: Text -> UpdateGatewaySoftwareNow
+ Amazonka.StorageGateway.UpdateGatewaySoftwareNow: newUpdateGatewaySoftwareNowResponse :: Int -> UpdateGatewaySoftwareNowResponse
+ Amazonka.StorageGateway.UpdateGatewaySoftwareNow: updateGatewaySoftwareNowResponse_gatewayARN :: Lens' UpdateGatewaySoftwareNowResponse (Maybe Text)
+ Amazonka.StorageGateway.UpdateGatewaySoftwareNow: updateGatewaySoftwareNowResponse_httpStatus :: Lens' UpdateGatewaySoftwareNowResponse Int
+ Amazonka.StorageGateway.UpdateGatewaySoftwareNow: updateGatewaySoftwareNow_gatewayARN :: Lens' UpdateGatewaySoftwareNow Text
+ Amazonka.StorageGateway.UpdateMaintenanceStartTime: UpdateMaintenanceStartTime' :: Maybe Natural -> Maybe Natural -> Text -> Natural -> Natural -> UpdateMaintenanceStartTime
+ Amazonka.StorageGateway.UpdateMaintenanceStartTime: UpdateMaintenanceStartTimeResponse' :: Maybe Text -> Int -> UpdateMaintenanceStartTimeResponse
+ Amazonka.StorageGateway.UpdateMaintenanceStartTime: [$sel:dayOfMonth:UpdateMaintenanceStartTime'] :: UpdateMaintenanceStartTime -> Maybe Natural
+ Amazonka.StorageGateway.UpdateMaintenanceStartTime: [$sel:dayOfWeek:UpdateMaintenanceStartTime'] :: UpdateMaintenanceStartTime -> Maybe Natural
+ Amazonka.StorageGateway.UpdateMaintenanceStartTime: [$sel:gatewayARN:UpdateMaintenanceStartTime'] :: UpdateMaintenanceStartTime -> Text
+ Amazonka.StorageGateway.UpdateMaintenanceStartTime: [$sel:gatewayARN:UpdateMaintenanceStartTimeResponse'] :: UpdateMaintenanceStartTimeResponse -> Maybe Text
+ Amazonka.StorageGateway.UpdateMaintenanceStartTime: [$sel:hourOfDay:UpdateMaintenanceStartTime'] :: UpdateMaintenanceStartTime -> Natural
+ Amazonka.StorageGateway.UpdateMaintenanceStartTime: [$sel:httpStatus:UpdateMaintenanceStartTimeResponse'] :: UpdateMaintenanceStartTimeResponse -> Int
+ Amazonka.StorageGateway.UpdateMaintenanceStartTime: [$sel:minuteOfHour:UpdateMaintenanceStartTime'] :: UpdateMaintenanceStartTime -> Natural
+ Amazonka.StorageGateway.UpdateMaintenanceStartTime: data UpdateMaintenanceStartTime
+ Amazonka.StorageGateway.UpdateMaintenanceStartTime: data UpdateMaintenanceStartTimeResponse
+ Amazonka.StorageGateway.UpdateMaintenanceStartTime: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.UpdateMaintenanceStartTime.UpdateMaintenanceStartTime
+ Amazonka.StorageGateway.UpdateMaintenanceStartTime: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.UpdateMaintenanceStartTime.UpdateMaintenanceStartTime
+ Amazonka.StorageGateway.UpdateMaintenanceStartTime: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.UpdateMaintenanceStartTime.UpdateMaintenanceStartTime
+ Amazonka.StorageGateway.UpdateMaintenanceStartTime: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.UpdateMaintenanceStartTime.UpdateMaintenanceStartTime
+ Amazonka.StorageGateway.UpdateMaintenanceStartTime: instance Control.DeepSeq.NFData Amazonka.StorageGateway.UpdateMaintenanceStartTime.UpdateMaintenanceStartTime
+ Amazonka.StorageGateway.UpdateMaintenanceStartTime: instance Control.DeepSeq.NFData Amazonka.StorageGateway.UpdateMaintenanceStartTime.UpdateMaintenanceStartTimeResponse
+ Amazonka.StorageGateway.UpdateMaintenanceStartTime: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.UpdateMaintenanceStartTime.UpdateMaintenanceStartTime
+ Amazonka.StorageGateway.UpdateMaintenanceStartTime: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.UpdateMaintenanceStartTime.UpdateMaintenanceStartTime
+ Amazonka.StorageGateway.UpdateMaintenanceStartTime: instance GHC.Classes.Eq Amazonka.StorageGateway.UpdateMaintenanceStartTime.UpdateMaintenanceStartTime
+ Amazonka.StorageGateway.UpdateMaintenanceStartTime: instance GHC.Classes.Eq Amazonka.StorageGateway.UpdateMaintenanceStartTime.UpdateMaintenanceStartTimeResponse
+ Amazonka.StorageGateway.UpdateMaintenanceStartTime: instance GHC.Generics.Generic Amazonka.StorageGateway.UpdateMaintenanceStartTime.UpdateMaintenanceStartTime
+ Amazonka.StorageGateway.UpdateMaintenanceStartTime: instance GHC.Generics.Generic Amazonka.StorageGateway.UpdateMaintenanceStartTime.UpdateMaintenanceStartTimeResponse
+ Amazonka.StorageGateway.UpdateMaintenanceStartTime: instance GHC.Read.Read Amazonka.StorageGateway.UpdateMaintenanceStartTime.UpdateMaintenanceStartTime
+ Amazonka.StorageGateway.UpdateMaintenanceStartTime: instance GHC.Read.Read Amazonka.StorageGateway.UpdateMaintenanceStartTime.UpdateMaintenanceStartTimeResponse
+ Amazonka.StorageGateway.UpdateMaintenanceStartTime: instance GHC.Show.Show Amazonka.StorageGateway.UpdateMaintenanceStartTime.UpdateMaintenanceStartTime
+ Amazonka.StorageGateway.UpdateMaintenanceStartTime: instance GHC.Show.Show Amazonka.StorageGateway.UpdateMaintenanceStartTime.UpdateMaintenanceStartTimeResponse
+ Amazonka.StorageGateway.UpdateMaintenanceStartTime: newUpdateMaintenanceStartTime :: Text -> Natural -> Natural -> UpdateMaintenanceStartTime
+ Amazonka.StorageGateway.UpdateMaintenanceStartTime: newUpdateMaintenanceStartTimeResponse :: Int -> UpdateMaintenanceStartTimeResponse
+ Amazonka.StorageGateway.UpdateMaintenanceStartTime: updateMaintenanceStartTimeResponse_gatewayARN :: Lens' UpdateMaintenanceStartTimeResponse (Maybe Text)
+ Amazonka.StorageGateway.UpdateMaintenanceStartTime: updateMaintenanceStartTimeResponse_httpStatus :: Lens' UpdateMaintenanceStartTimeResponse Int
+ Amazonka.StorageGateway.UpdateMaintenanceStartTime: updateMaintenanceStartTime_dayOfMonth :: Lens' UpdateMaintenanceStartTime (Maybe Natural)
+ Amazonka.StorageGateway.UpdateMaintenanceStartTime: updateMaintenanceStartTime_dayOfWeek :: Lens' UpdateMaintenanceStartTime (Maybe Natural)
+ Amazonka.StorageGateway.UpdateMaintenanceStartTime: updateMaintenanceStartTime_gatewayARN :: Lens' UpdateMaintenanceStartTime Text
+ Amazonka.StorageGateway.UpdateMaintenanceStartTime: updateMaintenanceStartTime_hourOfDay :: Lens' UpdateMaintenanceStartTime Natural
+ Amazonka.StorageGateway.UpdateMaintenanceStartTime: updateMaintenanceStartTime_minuteOfHour :: Lens' UpdateMaintenanceStartTime Natural
+ Amazonka.StorageGateway.UpdateNFSFileShare: UpdateNFSFileShare' :: Maybe Text -> Maybe CacheAttributes -> Maybe (NonEmpty Text) -> Maybe Text -> Maybe Text -> Maybe Bool -> Maybe Bool -> Maybe Text -> Maybe NFSFileShareDefaults -> Maybe Text -> Maybe ObjectACL -> Maybe Bool -> Maybe Bool -> Maybe Text -> Text -> UpdateNFSFileShare
+ Amazonka.StorageGateway.UpdateNFSFileShare: UpdateNFSFileShareResponse' :: Maybe Text -> Int -> UpdateNFSFileShareResponse
+ Amazonka.StorageGateway.UpdateNFSFileShare: [$sel:auditDestinationARN:UpdateNFSFileShare'] :: UpdateNFSFileShare -> Maybe Text
+ Amazonka.StorageGateway.UpdateNFSFileShare: [$sel:cacheAttributes:UpdateNFSFileShare'] :: UpdateNFSFileShare -> Maybe CacheAttributes
+ Amazonka.StorageGateway.UpdateNFSFileShare: [$sel:clientList:UpdateNFSFileShare'] :: UpdateNFSFileShare -> Maybe (NonEmpty Text)
+ Amazonka.StorageGateway.UpdateNFSFileShare: [$sel:defaultStorageClass:UpdateNFSFileShare'] :: UpdateNFSFileShare -> Maybe Text
+ Amazonka.StorageGateway.UpdateNFSFileShare: [$sel:fileShareARN:UpdateNFSFileShare'] :: UpdateNFSFileShare -> Text
+ Amazonka.StorageGateway.UpdateNFSFileShare: [$sel:fileShareARN:UpdateNFSFileShareResponse'] :: UpdateNFSFileShareResponse -> Maybe Text
+ Amazonka.StorageGateway.UpdateNFSFileShare: [$sel:fileShareName:UpdateNFSFileShare'] :: UpdateNFSFileShare -> Maybe Text
+ Amazonka.StorageGateway.UpdateNFSFileShare: [$sel:guessMIMETypeEnabled:UpdateNFSFileShare'] :: UpdateNFSFileShare -> Maybe Bool
+ Amazonka.StorageGateway.UpdateNFSFileShare: [$sel:httpStatus:UpdateNFSFileShareResponse'] :: UpdateNFSFileShareResponse -> Int
+ Amazonka.StorageGateway.UpdateNFSFileShare: [$sel:kmsEncrypted:UpdateNFSFileShare'] :: UpdateNFSFileShare -> Maybe Bool
+ Amazonka.StorageGateway.UpdateNFSFileShare: [$sel:kmsKey:UpdateNFSFileShare'] :: UpdateNFSFileShare -> Maybe Text
+ Amazonka.StorageGateway.UpdateNFSFileShare: [$sel:nFSFileShareDefaults:UpdateNFSFileShare'] :: UpdateNFSFileShare -> Maybe NFSFileShareDefaults
+ Amazonka.StorageGateway.UpdateNFSFileShare: [$sel:notificationPolicy:UpdateNFSFileShare'] :: UpdateNFSFileShare -> Maybe Text
+ Amazonka.StorageGateway.UpdateNFSFileShare: [$sel:objectACL:UpdateNFSFileShare'] :: UpdateNFSFileShare -> Maybe ObjectACL
+ Amazonka.StorageGateway.UpdateNFSFileShare: [$sel:readOnly:UpdateNFSFileShare'] :: UpdateNFSFileShare -> Maybe Bool
+ Amazonka.StorageGateway.UpdateNFSFileShare: [$sel:requesterPays:UpdateNFSFileShare'] :: UpdateNFSFileShare -> Maybe Bool
+ Amazonka.StorageGateway.UpdateNFSFileShare: [$sel:squash:UpdateNFSFileShare'] :: UpdateNFSFileShare -> Maybe Text
+ Amazonka.StorageGateway.UpdateNFSFileShare: data UpdateNFSFileShare
+ Amazonka.StorageGateway.UpdateNFSFileShare: data UpdateNFSFileShareResponse
+ Amazonka.StorageGateway.UpdateNFSFileShare: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.UpdateNFSFileShare.UpdateNFSFileShare
+ Amazonka.StorageGateway.UpdateNFSFileShare: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.UpdateNFSFileShare.UpdateNFSFileShare
+ Amazonka.StorageGateway.UpdateNFSFileShare: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.UpdateNFSFileShare.UpdateNFSFileShare
+ Amazonka.StorageGateway.UpdateNFSFileShare: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.UpdateNFSFileShare.UpdateNFSFileShare
+ Amazonka.StorageGateway.UpdateNFSFileShare: instance Control.DeepSeq.NFData Amazonka.StorageGateway.UpdateNFSFileShare.UpdateNFSFileShare
+ Amazonka.StorageGateway.UpdateNFSFileShare: instance Control.DeepSeq.NFData Amazonka.StorageGateway.UpdateNFSFileShare.UpdateNFSFileShareResponse
+ Amazonka.StorageGateway.UpdateNFSFileShare: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.UpdateNFSFileShare.UpdateNFSFileShare
+ Amazonka.StorageGateway.UpdateNFSFileShare: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.UpdateNFSFileShare.UpdateNFSFileShare
+ Amazonka.StorageGateway.UpdateNFSFileShare: instance GHC.Classes.Eq Amazonka.StorageGateway.UpdateNFSFileShare.UpdateNFSFileShare
+ Amazonka.StorageGateway.UpdateNFSFileShare: instance GHC.Classes.Eq Amazonka.StorageGateway.UpdateNFSFileShare.UpdateNFSFileShareResponse
+ Amazonka.StorageGateway.UpdateNFSFileShare: instance GHC.Generics.Generic Amazonka.StorageGateway.UpdateNFSFileShare.UpdateNFSFileShare
+ Amazonka.StorageGateway.UpdateNFSFileShare: instance GHC.Generics.Generic Amazonka.StorageGateway.UpdateNFSFileShare.UpdateNFSFileShareResponse
+ Amazonka.StorageGateway.UpdateNFSFileShare: instance GHC.Read.Read Amazonka.StorageGateway.UpdateNFSFileShare.UpdateNFSFileShare
+ Amazonka.StorageGateway.UpdateNFSFileShare: instance GHC.Read.Read Amazonka.StorageGateway.UpdateNFSFileShare.UpdateNFSFileShareResponse
+ Amazonka.StorageGateway.UpdateNFSFileShare: instance GHC.Show.Show Amazonka.StorageGateway.UpdateNFSFileShare.UpdateNFSFileShare
+ Amazonka.StorageGateway.UpdateNFSFileShare: instance GHC.Show.Show Amazonka.StorageGateway.UpdateNFSFileShare.UpdateNFSFileShareResponse
+ Amazonka.StorageGateway.UpdateNFSFileShare: newUpdateNFSFileShare :: Text -> UpdateNFSFileShare
+ Amazonka.StorageGateway.UpdateNFSFileShare: newUpdateNFSFileShareResponse :: Int -> UpdateNFSFileShareResponse
+ Amazonka.StorageGateway.UpdateNFSFileShare: updateNFSFileShareResponse_fileShareARN :: Lens' UpdateNFSFileShareResponse (Maybe Text)
+ Amazonka.StorageGateway.UpdateNFSFileShare: updateNFSFileShareResponse_httpStatus :: Lens' UpdateNFSFileShareResponse Int
+ Amazonka.StorageGateway.UpdateNFSFileShare: updateNFSFileShare_auditDestinationARN :: Lens' UpdateNFSFileShare (Maybe Text)
+ Amazonka.StorageGateway.UpdateNFSFileShare: updateNFSFileShare_cacheAttributes :: Lens' UpdateNFSFileShare (Maybe CacheAttributes)
+ Amazonka.StorageGateway.UpdateNFSFileShare: updateNFSFileShare_clientList :: Lens' UpdateNFSFileShare (Maybe (NonEmpty Text))
+ Amazonka.StorageGateway.UpdateNFSFileShare: updateNFSFileShare_defaultStorageClass :: Lens' UpdateNFSFileShare (Maybe Text)
+ Amazonka.StorageGateway.UpdateNFSFileShare: updateNFSFileShare_fileShareARN :: Lens' UpdateNFSFileShare Text
+ Amazonka.StorageGateway.UpdateNFSFileShare: updateNFSFileShare_fileShareName :: Lens' UpdateNFSFileShare (Maybe Text)
+ Amazonka.StorageGateway.UpdateNFSFileShare: updateNFSFileShare_guessMIMETypeEnabled :: Lens' UpdateNFSFileShare (Maybe Bool)
+ Amazonka.StorageGateway.UpdateNFSFileShare: updateNFSFileShare_kmsEncrypted :: Lens' UpdateNFSFileShare (Maybe Bool)
+ Amazonka.StorageGateway.UpdateNFSFileShare: updateNFSFileShare_kmsKey :: Lens' UpdateNFSFileShare (Maybe Text)
+ Amazonka.StorageGateway.UpdateNFSFileShare: updateNFSFileShare_nFSFileShareDefaults :: Lens' UpdateNFSFileShare (Maybe NFSFileShareDefaults)
+ Amazonka.StorageGateway.UpdateNFSFileShare: updateNFSFileShare_notificationPolicy :: Lens' UpdateNFSFileShare (Maybe Text)
+ Amazonka.StorageGateway.UpdateNFSFileShare: updateNFSFileShare_objectACL :: Lens' UpdateNFSFileShare (Maybe ObjectACL)
+ Amazonka.StorageGateway.UpdateNFSFileShare: updateNFSFileShare_readOnly :: Lens' UpdateNFSFileShare (Maybe Bool)
+ Amazonka.StorageGateway.UpdateNFSFileShare: updateNFSFileShare_requesterPays :: Lens' UpdateNFSFileShare (Maybe Bool)
+ Amazonka.StorageGateway.UpdateNFSFileShare: updateNFSFileShare_squash :: Lens' UpdateNFSFileShare (Maybe Text)
+ Amazonka.StorageGateway.UpdateSMBFileShare: UpdateSMBFileShare' :: Maybe Bool -> Maybe [Text] -> Maybe Text -> Maybe CacheAttributes -> Maybe CaseSensitivity -> Maybe Text -> Maybe Text -> Maybe Bool -> Maybe [Text] -> Maybe Bool -> Maybe Text -> Maybe Text -> Maybe ObjectACL -> Maybe Bool -> Maybe Bool -> Maybe Bool -> Maybe Bool -> Maybe [Text] -> Text -> UpdateSMBFileShare
+ Amazonka.StorageGateway.UpdateSMBFileShare: UpdateSMBFileShareResponse' :: Maybe Text -> Int -> UpdateSMBFileShareResponse
+ Amazonka.StorageGateway.UpdateSMBFileShare: [$sel:accessBasedEnumeration:UpdateSMBFileShare'] :: UpdateSMBFileShare -> Maybe Bool
+ Amazonka.StorageGateway.UpdateSMBFileShare: [$sel:adminUserList:UpdateSMBFileShare'] :: UpdateSMBFileShare -> Maybe [Text]
+ Amazonka.StorageGateway.UpdateSMBFileShare: [$sel:auditDestinationARN:UpdateSMBFileShare'] :: UpdateSMBFileShare -> Maybe Text
+ Amazonka.StorageGateway.UpdateSMBFileShare: [$sel:cacheAttributes:UpdateSMBFileShare'] :: UpdateSMBFileShare -> Maybe CacheAttributes
+ Amazonka.StorageGateway.UpdateSMBFileShare: [$sel:caseSensitivity:UpdateSMBFileShare'] :: UpdateSMBFileShare -> Maybe CaseSensitivity
+ Amazonka.StorageGateway.UpdateSMBFileShare: [$sel:defaultStorageClass:UpdateSMBFileShare'] :: UpdateSMBFileShare -> Maybe Text
+ Amazonka.StorageGateway.UpdateSMBFileShare: [$sel:fileShareARN:UpdateSMBFileShare'] :: UpdateSMBFileShare -> Text
+ Amazonka.StorageGateway.UpdateSMBFileShare: [$sel:fileShareARN:UpdateSMBFileShareResponse'] :: UpdateSMBFileShareResponse -> Maybe Text
+ Amazonka.StorageGateway.UpdateSMBFileShare: [$sel:fileShareName:UpdateSMBFileShare'] :: UpdateSMBFileShare -> Maybe Text
+ Amazonka.StorageGateway.UpdateSMBFileShare: [$sel:guessMIMETypeEnabled:UpdateSMBFileShare'] :: UpdateSMBFileShare -> Maybe Bool
+ Amazonka.StorageGateway.UpdateSMBFileShare: [$sel:httpStatus:UpdateSMBFileShareResponse'] :: UpdateSMBFileShareResponse -> Int
+ Amazonka.StorageGateway.UpdateSMBFileShare: [$sel:invalidUserList:UpdateSMBFileShare'] :: UpdateSMBFileShare -> Maybe [Text]
+ Amazonka.StorageGateway.UpdateSMBFileShare: [$sel:kmsEncrypted:UpdateSMBFileShare'] :: UpdateSMBFileShare -> Maybe Bool
+ Amazonka.StorageGateway.UpdateSMBFileShare: [$sel:kmsKey:UpdateSMBFileShare'] :: UpdateSMBFileShare -> Maybe Text
+ Amazonka.StorageGateway.UpdateSMBFileShare: [$sel:notificationPolicy:UpdateSMBFileShare'] :: UpdateSMBFileShare -> Maybe Text
+ Amazonka.StorageGateway.UpdateSMBFileShare: [$sel:objectACL:UpdateSMBFileShare'] :: UpdateSMBFileShare -> Maybe ObjectACL
+ Amazonka.StorageGateway.UpdateSMBFileShare: [$sel:oplocksEnabled:UpdateSMBFileShare'] :: UpdateSMBFileShare -> Maybe Bool
+ Amazonka.StorageGateway.UpdateSMBFileShare: [$sel:readOnly:UpdateSMBFileShare'] :: UpdateSMBFileShare -> Maybe Bool
+ Amazonka.StorageGateway.UpdateSMBFileShare: [$sel:requesterPays:UpdateSMBFileShare'] :: UpdateSMBFileShare -> Maybe Bool
+ Amazonka.StorageGateway.UpdateSMBFileShare: [$sel:sMBACLEnabled:UpdateSMBFileShare'] :: UpdateSMBFileShare -> Maybe Bool
+ Amazonka.StorageGateway.UpdateSMBFileShare: [$sel:validUserList:UpdateSMBFileShare'] :: UpdateSMBFileShare -> Maybe [Text]
+ Amazonka.StorageGateway.UpdateSMBFileShare: data UpdateSMBFileShare
+ Amazonka.StorageGateway.UpdateSMBFileShare: data UpdateSMBFileShareResponse
+ Amazonka.StorageGateway.UpdateSMBFileShare: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.UpdateSMBFileShare.UpdateSMBFileShare
+ Amazonka.StorageGateway.UpdateSMBFileShare: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.UpdateSMBFileShare.UpdateSMBFileShare
+ Amazonka.StorageGateway.UpdateSMBFileShare: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.UpdateSMBFileShare.UpdateSMBFileShare
+ Amazonka.StorageGateway.UpdateSMBFileShare: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.UpdateSMBFileShare.UpdateSMBFileShare
+ Amazonka.StorageGateway.UpdateSMBFileShare: instance Control.DeepSeq.NFData Amazonka.StorageGateway.UpdateSMBFileShare.UpdateSMBFileShare
+ Amazonka.StorageGateway.UpdateSMBFileShare: instance Control.DeepSeq.NFData Amazonka.StorageGateway.UpdateSMBFileShare.UpdateSMBFileShareResponse
+ Amazonka.StorageGateway.UpdateSMBFileShare: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.UpdateSMBFileShare.UpdateSMBFileShare
+ Amazonka.StorageGateway.UpdateSMBFileShare: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.UpdateSMBFileShare.UpdateSMBFileShare
+ Amazonka.StorageGateway.UpdateSMBFileShare: instance GHC.Classes.Eq Amazonka.StorageGateway.UpdateSMBFileShare.UpdateSMBFileShare
+ Amazonka.StorageGateway.UpdateSMBFileShare: instance GHC.Classes.Eq Amazonka.StorageGateway.UpdateSMBFileShare.UpdateSMBFileShareResponse
+ Amazonka.StorageGateway.UpdateSMBFileShare: instance GHC.Generics.Generic Amazonka.StorageGateway.UpdateSMBFileShare.UpdateSMBFileShare
+ Amazonka.StorageGateway.UpdateSMBFileShare: instance GHC.Generics.Generic Amazonka.StorageGateway.UpdateSMBFileShare.UpdateSMBFileShareResponse
+ Amazonka.StorageGateway.UpdateSMBFileShare: instance GHC.Read.Read Amazonka.StorageGateway.UpdateSMBFileShare.UpdateSMBFileShare
+ Amazonka.StorageGateway.UpdateSMBFileShare: instance GHC.Read.Read Amazonka.StorageGateway.UpdateSMBFileShare.UpdateSMBFileShareResponse
+ Amazonka.StorageGateway.UpdateSMBFileShare: instance GHC.Show.Show Amazonka.StorageGateway.UpdateSMBFileShare.UpdateSMBFileShare
+ Amazonka.StorageGateway.UpdateSMBFileShare: instance GHC.Show.Show Amazonka.StorageGateway.UpdateSMBFileShare.UpdateSMBFileShareResponse
+ Amazonka.StorageGateway.UpdateSMBFileShare: newUpdateSMBFileShare :: Text -> UpdateSMBFileShare
+ Amazonka.StorageGateway.UpdateSMBFileShare: newUpdateSMBFileShareResponse :: Int -> UpdateSMBFileShareResponse
+ Amazonka.StorageGateway.UpdateSMBFileShare: updateSMBFileShareResponse_fileShareARN :: Lens' UpdateSMBFileShareResponse (Maybe Text)
+ Amazonka.StorageGateway.UpdateSMBFileShare: updateSMBFileShareResponse_httpStatus :: Lens' UpdateSMBFileShareResponse Int
+ Amazonka.StorageGateway.UpdateSMBFileShare: updateSMBFileShare_accessBasedEnumeration :: Lens' UpdateSMBFileShare (Maybe Bool)
+ Amazonka.StorageGateway.UpdateSMBFileShare: updateSMBFileShare_adminUserList :: Lens' UpdateSMBFileShare (Maybe [Text])
+ Amazonka.StorageGateway.UpdateSMBFileShare: updateSMBFileShare_auditDestinationARN :: Lens' UpdateSMBFileShare (Maybe Text)
+ Amazonka.StorageGateway.UpdateSMBFileShare: updateSMBFileShare_cacheAttributes :: Lens' UpdateSMBFileShare (Maybe CacheAttributes)
+ Amazonka.StorageGateway.UpdateSMBFileShare: updateSMBFileShare_caseSensitivity :: Lens' UpdateSMBFileShare (Maybe CaseSensitivity)
+ Amazonka.StorageGateway.UpdateSMBFileShare: updateSMBFileShare_defaultStorageClass :: Lens' UpdateSMBFileShare (Maybe Text)
+ Amazonka.StorageGateway.UpdateSMBFileShare: updateSMBFileShare_fileShareARN :: Lens' UpdateSMBFileShare Text
+ Amazonka.StorageGateway.UpdateSMBFileShare: updateSMBFileShare_fileShareName :: Lens' UpdateSMBFileShare (Maybe Text)
+ Amazonka.StorageGateway.UpdateSMBFileShare: updateSMBFileShare_guessMIMETypeEnabled :: Lens' UpdateSMBFileShare (Maybe Bool)
+ Amazonka.StorageGateway.UpdateSMBFileShare: updateSMBFileShare_invalidUserList :: Lens' UpdateSMBFileShare (Maybe [Text])
+ Amazonka.StorageGateway.UpdateSMBFileShare: updateSMBFileShare_kmsEncrypted :: Lens' UpdateSMBFileShare (Maybe Bool)
+ Amazonka.StorageGateway.UpdateSMBFileShare: updateSMBFileShare_kmsKey :: Lens' UpdateSMBFileShare (Maybe Text)
+ Amazonka.StorageGateway.UpdateSMBFileShare: updateSMBFileShare_notificationPolicy :: Lens' UpdateSMBFileShare (Maybe Text)
+ Amazonka.StorageGateway.UpdateSMBFileShare: updateSMBFileShare_objectACL :: Lens' UpdateSMBFileShare (Maybe ObjectACL)
+ Amazonka.StorageGateway.UpdateSMBFileShare: updateSMBFileShare_oplocksEnabled :: Lens' UpdateSMBFileShare (Maybe Bool)
+ Amazonka.StorageGateway.UpdateSMBFileShare: updateSMBFileShare_readOnly :: Lens' UpdateSMBFileShare (Maybe Bool)
+ Amazonka.StorageGateway.UpdateSMBFileShare: updateSMBFileShare_requesterPays :: Lens' UpdateSMBFileShare (Maybe Bool)
+ Amazonka.StorageGateway.UpdateSMBFileShare: updateSMBFileShare_sMBACLEnabled :: Lens' UpdateSMBFileShare (Maybe Bool)
+ Amazonka.StorageGateway.UpdateSMBFileShare: updateSMBFileShare_validUserList :: Lens' UpdateSMBFileShare (Maybe [Text])
+ Amazonka.StorageGateway.UpdateSMBFileShareVisibility: UpdateSMBFileShareVisibility' :: Text -> Bool -> UpdateSMBFileShareVisibility
+ Amazonka.StorageGateway.UpdateSMBFileShareVisibility: UpdateSMBFileShareVisibilityResponse' :: Maybe Text -> Int -> UpdateSMBFileShareVisibilityResponse
+ Amazonka.StorageGateway.UpdateSMBFileShareVisibility: [$sel:fileSharesVisible:UpdateSMBFileShareVisibility'] :: UpdateSMBFileShareVisibility -> Bool
+ Amazonka.StorageGateway.UpdateSMBFileShareVisibility: [$sel:gatewayARN:UpdateSMBFileShareVisibility'] :: UpdateSMBFileShareVisibility -> Text
+ Amazonka.StorageGateway.UpdateSMBFileShareVisibility: [$sel:gatewayARN:UpdateSMBFileShareVisibilityResponse'] :: UpdateSMBFileShareVisibilityResponse -> Maybe Text
+ Amazonka.StorageGateway.UpdateSMBFileShareVisibility: [$sel:httpStatus:UpdateSMBFileShareVisibilityResponse'] :: UpdateSMBFileShareVisibilityResponse -> Int
+ Amazonka.StorageGateway.UpdateSMBFileShareVisibility: data UpdateSMBFileShareVisibility
+ Amazonka.StorageGateway.UpdateSMBFileShareVisibility: data UpdateSMBFileShareVisibilityResponse
+ Amazonka.StorageGateway.UpdateSMBFileShareVisibility: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.UpdateSMBFileShareVisibility.UpdateSMBFileShareVisibility
+ Amazonka.StorageGateway.UpdateSMBFileShareVisibility: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.UpdateSMBFileShareVisibility.UpdateSMBFileShareVisibility
+ Amazonka.StorageGateway.UpdateSMBFileShareVisibility: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.UpdateSMBFileShareVisibility.UpdateSMBFileShareVisibility
+ Amazonka.StorageGateway.UpdateSMBFileShareVisibility: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.UpdateSMBFileShareVisibility.UpdateSMBFileShareVisibility
+ Amazonka.StorageGateway.UpdateSMBFileShareVisibility: instance Control.DeepSeq.NFData Amazonka.StorageGateway.UpdateSMBFileShareVisibility.UpdateSMBFileShareVisibility
+ Amazonka.StorageGateway.UpdateSMBFileShareVisibility: instance Control.DeepSeq.NFData Amazonka.StorageGateway.UpdateSMBFileShareVisibility.UpdateSMBFileShareVisibilityResponse
+ Amazonka.StorageGateway.UpdateSMBFileShareVisibility: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.UpdateSMBFileShareVisibility.UpdateSMBFileShareVisibility
+ Amazonka.StorageGateway.UpdateSMBFileShareVisibility: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.UpdateSMBFileShareVisibility.UpdateSMBFileShareVisibility
+ Amazonka.StorageGateway.UpdateSMBFileShareVisibility: instance GHC.Classes.Eq Amazonka.StorageGateway.UpdateSMBFileShareVisibility.UpdateSMBFileShareVisibility
+ Amazonka.StorageGateway.UpdateSMBFileShareVisibility: instance GHC.Classes.Eq Amazonka.StorageGateway.UpdateSMBFileShareVisibility.UpdateSMBFileShareVisibilityResponse
+ Amazonka.StorageGateway.UpdateSMBFileShareVisibility: instance GHC.Generics.Generic Amazonka.StorageGateway.UpdateSMBFileShareVisibility.UpdateSMBFileShareVisibility
+ Amazonka.StorageGateway.UpdateSMBFileShareVisibility: instance GHC.Generics.Generic Amazonka.StorageGateway.UpdateSMBFileShareVisibility.UpdateSMBFileShareVisibilityResponse
+ Amazonka.StorageGateway.UpdateSMBFileShareVisibility: instance GHC.Read.Read Amazonka.StorageGateway.UpdateSMBFileShareVisibility.UpdateSMBFileShareVisibility
+ Amazonka.StorageGateway.UpdateSMBFileShareVisibility: instance GHC.Read.Read Amazonka.StorageGateway.UpdateSMBFileShareVisibility.UpdateSMBFileShareVisibilityResponse
+ Amazonka.StorageGateway.UpdateSMBFileShareVisibility: instance GHC.Show.Show Amazonka.StorageGateway.UpdateSMBFileShareVisibility.UpdateSMBFileShareVisibility
+ Amazonka.StorageGateway.UpdateSMBFileShareVisibility: instance GHC.Show.Show Amazonka.StorageGateway.UpdateSMBFileShareVisibility.UpdateSMBFileShareVisibilityResponse
+ Amazonka.StorageGateway.UpdateSMBFileShareVisibility: newUpdateSMBFileShareVisibility :: Text -> Bool -> UpdateSMBFileShareVisibility
+ Amazonka.StorageGateway.UpdateSMBFileShareVisibility: newUpdateSMBFileShareVisibilityResponse :: Int -> UpdateSMBFileShareVisibilityResponse
+ Amazonka.StorageGateway.UpdateSMBFileShareVisibility: updateSMBFileShareVisibilityResponse_gatewayARN :: Lens' UpdateSMBFileShareVisibilityResponse (Maybe Text)
+ Amazonka.StorageGateway.UpdateSMBFileShareVisibility: updateSMBFileShareVisibilityResponse_httpStatus :: Lens' UpdateSMBFileShareVisibilityResponse Int
+ Amazonka.StorageGateway.UpdateSMBFileShareVisibility: updateSMBFileShareVisibility_fileSharesVisible :: Lens' UpdateSMBFileShareVisibility Bool
+ Amazonka.StorageGateway.UpdateSMBFileShareVisibility: updateSMBFileShareVisibility_gatewayARN :: Lens' UpdateSMBFileShareVisibility Text
+ Amazonka.StorageGateway.UpdateSMBLocalGroups: UpdateSMBLocalGroups' :: Text -> SMBLocalGroups -> UpdateSMBLocalGroups
+ Amazonka.StorageGateway.UpdateSMBLocalGroups: UpdateSMBLocalGroupsResponse' :: Maybe Text -> Int -> UpdateSMBLocalGroupsResponse
+ Amazonka.StorageGateway.UpdateSMBLocalGroups: [$sel:gatewayARN:UpdateSMBLocalGroups'] :: UpdateSMBLocalGroups -> Text
+ Amazonka.StorageGateway.UpdateSMBLocalGroups: [$sel:gatewayARN:UpdateSMBLocalGroupsResponse'] :: UpdateSMBLocalGroupsResponse -> Maybe Text
+ Amazonka.StorageGateway.UpdateSMBLocalGroups: [$sel:httpStatus:UpdateSMBLocalGroupsResponse'] :: UpdateSMBLocalGroupsResponse -> Int
+ Amazonka.StorageGateway.UpdateSMBLocalGroups: [$sel:sMBLocalGroups:UpdateSMBLocalGroups'] :: UpdateSMBLocalGroups -> SMBLocalGroups
+ Amazonka.StorageGateway.UpdateSMBLocalGroups: data UpdateSMBLocalGroups
+ Amazonka.StorageGateway.UpdateSMBLocalGroups: data UpdateSMBLocalGroupsResponse
+ Amazonka.StorageGateway.UpdateSMBLocalGroups: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.UpdateSMBLocalGroups.UpdateSMBLocalGroups
+ Amazonka.StorageGateway.UpdateSMBLocalGroups: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.UpdateSMBLocalGroups.UpdateSMBLocalGroups
+ Amazonka.StorageGateway.UpdateSMBLocalGroups: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.UpdateSMBLocalGroups.UpdateSMBLocalGroups
+ Amazonka.StorageGateway.UpdateSMBLocalGroups: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.UpdateSMBLocalGroups.UpdateSMBLocalGroups
+ Amazonka.StorageGateway.UpdateSMBLocalGroups: instance Control.DeepSeq.NFData Amazonka.StorageGateway.UpdateSMBLocalGroups.UpdateSMBLocalGroups
+ Amazonka.StorageGateway.UpdateSMBLocalGroups: instance Control.DeepSeq.NFData Amazonka.StorageGateway.UpdateSMBLocalGroups.UpdateSMBLocalGroupsResponse
+ Amazonka.StorageGateway.UpdateSMBLocalGroups: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.UpdateSMBLocalGroups.UpdateSMBLocalGroups
+ Amazonka.StorageGateway.UpdateSMBLocalGroups: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.UpdateSMBLocalGroups.UpdateSMBLocalGroups
+ Amazonka.StorageGateway.UpdateSMBLocalGroups: instance GHC.Classes.Eq Amazonka.StorageGateway.UpdateSMBLocalGroups.UpdateSMBLocalGroups
+ Amazonka.StorageGateway.UpdateSMBLocalGroups: instance GHC.Classes.Eq Amazonka.StorageGateway.UpdateSMBLocalGroups.UpdateSMBLocalGroupsResponse
+ Amazonka.StorageGateway.UpdateSMBLocalGroups: instance GHC.Generics.Generic Amazonka.StorageGateway.UpdateSMBLocalGroups.UpdateSMBLocalGroups
+ Amazonka.StorageGateway.UpdateSMBLocalGroups: instance GHC.Generics.Generic Amazonka.StorageGateway.UpdateSMBLocalGroups.UpdateSMBLocalGroupsResponse
+ Amazonka.StorageGateway.UpdateSMBLocalGroups: instance GHC.Read.Read Amazonka.StorageGateway.UpdateSMBLocalGroups.UpdateSMBLocalGroups
+ Amazonka.StorageGateway.UpdateSMBLocalGroups: instance GHC.Read.Read Amazonka.StorageGateway.UpdateSMBLocalGroups.UpdateSMBLocalGroupsResponse
+ Amazonka.StorageGateway.UpdateSMBLocalGroups: instance GHC.Show.Show Amazonka.StorageGateway.UpdateSMBLocalGroups.UpdateSMBLocalGroups
+ Amazonka.StorageGateway.UpdateSMBLocalGroups: instance GHC.Show.Show Amazonka.StorageGateway.UpdateSMBLocalGroups.UpdateSMBLocalGroupsResponse
+ Amazonka.StorageGateway.UpdateSMBLocalGroups: newUpdateSMBLocalGroups :: Text -> SMBLocalGroups -> UpdateSMBLocalGroups
+ Amazonka.StorageGateway.UpdateSMBLocalGroups: newUpdateSMBLocalGroupsResponse :: Int -> UpdateSMBLocalGroupsResponse
+ Amazonka.StorageGateway.UpdateSMBLocalGroups: updateSMBLocalGroupsResponse_gatewayARN :: Lens' UpdateSMBLocalGroupsResponse (Maybe Text)
+ Amazonka.StorageGateway.UpdateSMBLocalGroups: updateSMBLocalGroupsResponse_httpStatus :: Lens' UpdateSMBLocalGroupsResponse Int
+ Amazonka.StorageGateway.UpdateSMBLocalGroups: updateSMBLocalGroups_gatewayARN :: Lens' UpdateSMBLocalGroups Text
+ Amazonka.StorageGateway.UpdateSMBLocalGroups: updateSMBLocalGroups_sMBLocalGroups :: Lens' UpdateSMBLocalGroups SMBLocalGroups
+ Amazonka.StorageGateway.UpdateSMBSecurityStrategy: UpdateSMBSecurityStrategy' :: Text -> SMBSecurityStrategy -> UpdateSMBSecurityStrategy
+ Amazonka.StorageGateway.UpdateSMBSecurityStrategy: UpdateSMBSecurityStrategyResponse' :: Maybe Text -> Int -> UpdateSMBSecurityStrategyResponse
+ Amazonka.StorageGateway.UpdateSMBSecurityStrategy: [$sel:gatewayARN:UpdateSMBSecurityStrategy'] :: UpdateSMBSecurityStrategy -> Text
+ Amazonka.StorageGateway.UpdateSMBSecurityStrategy: [$sel:gatewayARN:UpdateSMBSecurityStrategyResponse'] :: UpdateSMBSecurityStrategyResponse -> Maybe Text
+ Amazonka.StorageGateway.UpdateSMBSecurityStrategy: [$sel:httpStatus:UpdateSMBSecurityStrategyResponse'] :: UpdateSMBSecurityStrategyResponse -> Int
+ Amazonka.StorageGateway.UpdateSMBSecurityStrategy: [$sel:sMBSecurityStrategy:UpdateSMBSecurityStrategy'] :: UpdateSMBSecurityStrategy -> SMBSecurityStrategy
+ Amazonka.StorageGateway.UpdateSMBSecurityStrategy: data UpdateSMBSecurityStrategy
+ Amazonka.StorageGateway.UpdateSMBSecurityStrategy: data UpdateSMBSecurityStrategyResponse
+ Amazonka.StorageGateway.UpdateSMBSecurityStrategy: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.UpdateSMBSecurityStrategy.UpdateSMBSecurityStrategy
+ Amazonka.StorageGateway.UpdateSMBSecurityStrategy: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.UpdateSMBSecurityStrategy.UpdateSMBSecurityStrategy
+ Amazonka.StorageGateway.UpdateSMBSecurityStrategy: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.UpdateSMBSecurityStrategy.UpdateSMBSecurityStrategy
+ Amazonka.StorageGateway.UpdateSMBSecurityStrategy: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.UpdateSMBSecurityStrategy.UpdateSMBSecurityStrategy
+ Amazonka.StorageGateway.UpdateSMBSecurityStrategy: instance Control.DeepSeq.NFData Amazonka.StorageGateway.UpdateSMBSecurityStrategy.UpdateSMBSecurityStrategy
+ Amazonka.StorageGateway.UpdateSMBSecurityStrategy: instance Control.DeepSeq.NFData Amazonka.StorageGateway.UpdateSMBSecurityStrategy.UpdateSMBSecurityStrategyResponse
+ Amazonka.StorageGateway.UpdateSMBSecurityStrategy: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.UpdateSMBSecurityStrategy.UpdateSMBSecurityStrategy
+ Amazonka.StorageGateway.UpdateSMBSecurityStrategy: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.UpdateSMBSecurityStrategy.UpdateSMBSecurityStrategy
+ Amazonka.StorageGateway.UpdateSMBSecurityStrategy: instance GHC.Classes.Eq Amazonka.StorageGateway.UpdateSMBSecurityStrategy.UpdateSMBSecurityStrategy
+ Amazonka.StorageGateway.UpdateSMBSecurityStrategy: instance GHC.Classes.Eq Amazonka.StorageGateway.UpdateSMBSecurityStrategy.UpdateSMBSecurityStrategyResponse
+ Amazonka.StorageGateway.UpdateSMBSecurityStrategy: instance GHC.Generics.Generic Amazonka.StorageGateway.UpdateSMBSecurityStrategy.UpdateSMBSecurityStrategy
+ Amazonka.StorageGateway.UpdateSMBSecurityStrategy: instance GHC.Generics.Generic Amazonka.StorageGateway.UpdateSMBSecurityStrategy.UpdateSMBSecurityStrategyResponse
+ Amazonka.StorageGateway.UpdateSMBSecurityStrategy: instance GHC.Read.Read Amazonka.StorageGateway.UpdateSMBSecurityStrategy.UpdateSMBSecurityStrategy
+ Amazonka.StorageGateway.UpdateSMBSecurityStrategy: instance GHC.Read.Read Amazonka.StorageGateway.UpdateSMBSecurityStrategy.UpdateSMBSecurityStrategyResponse
+ Amazonka.StorageGateway.UpdateSMBSecurityStrategy: instance GHC.Show.Show Amazonka.StorageGateway.UpdateSMBSecurityStrategy.UpdateSMBSecurityStrategy
+ Amazonka.StorageGateway.UpdateSMBSecurityStrategy: instance GHC.Show.Show Amazonka.StorageGateway.UpdateSMBSecurityStrategy.UpdateSMBSecurityStrategyResponse
+ Amazonka.StorageGateway.UpdateSMBSecurityStrategy: newUpdateSMBSecurityStrategy :: Text -> SMBSecurityStrategy -> UpdateSMBSecurityStrategy
+ Amazonka.StorageGateway.UpdateSMBSecurityStrategy: newUpdateSMBSecurityStrategyResponse :: Int -> UpdateSMBSecurityStrategyResponse
+ Amazonka.StorageGateway.UpdateSMBSecurityStrategy: updateSMBSecurityStrategyResponse_gatewayARN :: Lens' UpdateSMBSecurityStrategyResponse (Maybe Text)
+ Amazonka.StorageGateway.UpdateSMBSecurityStrategy: updateSMBSecurityStrategyResponse_httpStatus :: Lens' UpdateSMBSecurityStrategyResponse Int
+ Amazonka.StorageGateway.UpdateSMBSecurityStrategy: updateSMBSecurityStrategy_gatewayARN :: Lens' UpdateSMBSecurityStrategy Text
+ Amazonka.StorageGateway.UpdateSMBSecurityStrategy: updateSMBSecurityStrategy_sMBSecurityStrategy :: Lens' UpdateSMBSecurityStrategy SMBSecurityStrategy
+ Amazonka.StorageGateway.UpdateSnapshotSchedule: UpdateSnapshotSchedule' :: Maybe Text -> Maybe [Tag] -> Text -> Natural -> Natural -> UpdateSnapshotSchedule
+ Amazonka.StorageGateway.UpdateSnapshotSchedule: UpdateSnapshotScheduleResponse' :: Maybe Text -> Int -> UpdateSnapshotScheduleResponse
+ Amazonka.StorageGateway.UpdateSnapshotSchedule: [$sel:description:UpdateSnapshotSchedule'] :: UpdateSnapshotSchedule -> Maybe Text
+ Amazonka.StorageGateway.UpdateSnapshotSchedule: [$sel:httpStatus:UpdateSnapshotScheduleResponse'] :: UpdateSnapshotScheduleResponse -> Int
+ Amazonka.StorageGateway.UpdateSnapshotSchedule: [$sel:recurrenceInHours:UpdateSnapshotSchedule'] :: UpdateSnapshotSchedule -> Natural
+ Amazonka.StorageGateway.UpdateSnapshotSchedule: [$sel:startAt:UpdateSnapshotSchedule'] :: UpdateSnapshotSchedule -> Natural
+ Amazonka.StorageGateway.UpdateSnapshotSchedule: [$sel:tags:UpdateSnapshotSchedule'] :: UpdateSnapshotSchedule -> Maybe [Tag]
+ Amazonka.StorageGateway.UpdateSnapshotSchedule: [$sel:volumeARN:UpdateSnapshotSchedule'] :: UpdateSnapshotSchedule -> Text
+ Amazonka.StorageGateway.UpdateSnapshotSchedule: [$sel:volumeARN:UpdateSnapshotScheduleResponse'] :: UpdateSnapshotScheduleResponse -> Maybe Text
+ Amazonka.StorageGateway.UpdateSnapshotSchedule: data UpdateSnapshotSchedule
+ Amazonka.StorageGateway.UpdateSnapshotSchedule: data UpdateSnapshotScheduleResponse
+ Amazonka.StorageGateway.UpdateSnapshotSchedule: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.UpdateSnapshotSchedule.UpdateSnapshotSchedule
+ Amazonka.StorageGateway.UpdateSnapshotSchedule: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.UpdateSnapshotSchedule.UpdateSnapshotSchedule
+ Amazonka.StorageGateway.UpdateSnapshotSchedule: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.UpdateSnapshotSchedule.UpdateSnapshotSchedule
+ Amazonka.StorageGateway.UpdateSnapshotSchedule: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.UpdateSnapshotSchedule.UpdateSnapshotSchedule
+ Amazonka.StorageGateway.UpdateSnapshotSchedule: instance Control.DeepSeq.NFData Amazonka.StorageGateway.UpdateSnapshotSchedule.UpdateSnapshotSchedule
+ Amazonka.StorageGateway.UpdateSnapshotSchedule: instance Control.DeepSeq.NFData Amazonka.StorageGateway.UpdateSnapshotSchedule.UpdateSnapshotScheduleResponse
+ Amazonka.StorageGateway.UpdateSnapshotSchedule: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.UpdateSnapshotSchedule.UpdateSnapshotSchedule
+ Amazonka.StorageGateway.UpdateSnapshotSchedule: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.UpdateSnapshotSchedule.UpdateSnapshotSchedule
+ Amazonka.StorageGateway.UpdateSnapshotSchedule: instance GHC.Classes.Eq Amazonka.StorageGateway.UpdateSnapshotSchedule.UpdateSnapshotSchedule
+ Amazonka.StorageGateway.UpdateSnapshotSchedule: instance GHC.Classes.Eq Amazonka.StorageGateway.UpdateSnapshotSchedule.UpdateSnapshotScheduleResponse
+ Amazonka.StorageGateway.UpdateSnapshotSchedule: instance GHC.Generics.Generic Amazonka.StorageGateway.UpdateSnapshotSchedule.UpdateSnapshotSchedule
+ Amazonka.StorageGateway.UpdateSnapshotSchedule: instance GHC.Generics.Generic Amazonka.StorageGateway.UpdateSnapshotSchedule.UpdateSnapshotScheduleResponse
+ Amazonka.StorageGateway.UpdateSnapshotSchedule: instance GHC.Read.Read Amazonka.StorageGateway.UpdateSnapshotSchedule.UpdateSnapshotSchedule
+ Amazonka.StorageGateway.UpdateSnapshotSchedule: instance GHC.Read.Read Amazonka.StorageGateway.UpdateSnapshotSchedule.UpdateSnapshotScheduleResponse
+ Amazonka.StorageGateway.UpdateSnapshotSchedule: instance GHC.Show.Show Amazonka.StorageGateway.UpdateSnapshotSchedule.UpdateSnapshotSchedule
+ Amazonka.StorageGateway.UpdateSnapshotSchedule: instance GHC.Show.Show Amazonka.StorageGateway.UpdateSnapshotSchedule.UpdateSnapshotScheduleResponse
+ Amazonka.StorageGateway.UpdateSnapshotSchedule: newUpdateSnapshotSchedule :: Text -> Natural -> Natural -> UpdateSnapshotSchedule
+ Amazonka.StorageGateway.UpdateSnapshotSchedule: newUpdateSnapshotScheduleResponse :: Int -> UpdateSnapshotScheduleResponse
+ Amazonka.StorageGateway.UpdateSnapshotSchedule: updateSnapshotScheduleResponse_httpStatus :: Lens' UpdateSnapshotScheduleResponse Int
+ Amazonka.StorageGateway.UpdateSnapshotSchedule: updateSnapshotScheduleResponse_volumeARN :: Lens' UpdateSnapshotScheduleResponse (Maybe Text)
+ Amazonka.StorageGateway.UpdateSnapshotSchedule: updateSnapshotSchedule_description :: Lens' UpdateSnapshotSchedule (Maybe Text)
+ Amazonka.StorageGateway.UpdateSnapshotSchedule: updateSnapshotSchedule_recurrenceInHours :: Lens' UpdateSnapshotSchedule Natural
+ Amazonka.StorageGateway.UpdateSnapshotSchedule: updateSnapshotSchedule_startAt :: Lens' UpdateSnapshotSchedule Natural
+ Amazonka.StorageGateway.UpdateSnapshotSchedule: updateSnapshotSchedule_tags :: Lens' UpdateSnapshotSchedule (Maybe [Tag])
+ Amazonka.StorageGateway.UpdateSnapshotSchedule: updateSnapshotSchedule_volumeARN :: Lens' UpdateSnapshotSchedule Text
+ Amazonka.StorageGateway.UpdateVTLDeviceType: UpdateVTLDeviceType' :: Text -> Text -> UpdateVTLDeviceType
+ Amazonka.StorageGateway.UpdateVTLDeviceType: UpdateVTLDeviceTypeResponse' :: Maybe Text -> Int -> UpdateVTLDeviceTypeResponse
+ Amazonka.StorageGateway.UpdateVTLDeviceType: [$sel:deviceType:UpdateVTLDeviceType'] :: UpdateVTLDeviceType -> Text
+ Amazonka.StorageGateway.UpdateVTLDeviceType: [$sel:httpStatus:UpdateVTLDeviceTypeResponse'] :: UpdateVTLDeviceTypeResponse -> Int
+ Amazonka.StorageGateway.UpdateVTLDeviceType: [$sel:vTLDeviceARN:UpdateVTLDeviceType'] :: UpdateVTLDeviceType -> Text
+ Amazonka.StorageGateway.UpdateVTLDeviceType: [$sel:vTLDeviceARN:UpdateVTLDeviceTypeResponse'] :: UpdateVTLDeviceTypeResponse -> Maybe Text
+ Amazonka.StorageGateway.UpdateVTLDeviceType: data UpdateVTLDeviceType
+ Amazonka.StorageGateway.UpdateVTLDeviceType: data UpdateVTLDeviceTypeResponse
+ Amazonka.StorageGateway.UpdateVTLDeviceType: instance Amazonka.Data.Headers.ToHeaders Amazonka.StorageGateway.UpdateVTLDeviceType.UpdateVTLDeviceType
+ Amazonka.StorageGateway.UpdateVTLDeviceType: instance Amazonka.Data.Path.ToPath Amazonka.StorageGateway.UpdateVTLDeviceType.UpdateVTLDeviceType
+ Amazonka.StorageGateway.UpdateVTLDeviceType: instance Amazonka.Data.Query.ToQuery Amazonka.StorageGateway.UpdateVTLDeviceType.UpdateVTLDeviceType
+ Amazonka.StorageGateway.UpdateVTLDeviceType: instance Amazonka.Types.AWSRequest Amazonka.StorageGateway.UpdateVTLDeviceType.UpdateVTLDeviceType
+ Amazonka.StorageGateway.UpdateVTLDeviceType: instance Control.DeepSeq.NFData Amazonka.StorageGateway.UpdateVTLDeviceType.UpdateVTLDeviceType
+ Amazonka.StorageGateway.UpdateVTLDeviceType: instance Control.DeepSeq.NFData Amazonka.StorageGateway.UpdateVTLDeviceType.UpdateVTLDeviceTypeResponse
+ Amazonka.StorageGateway.UpdateVTLDeviceType: instance Data.Aeson.Types.ToJSON.ToJSON Amazonka.StorageGateway.UpdateVTLDeviceType.UpdateVTLDeviceType
+ Amazonka.StorageGateway.UpdateVTLDeviceType: instance Data.Hashable.Class.Hashable Amazonka.StorageGateway.UpdateVTLDeviceType.UpdateVTLDeviceType
+ Amazonka.StorageGateway.UpdateVTLDeviceType: instance GHC.Classes.Eq Amazonka.StorageGateway.UpdateVTLDeviceType.UpdateVTLDeviceType
+ Amazonka.StorageGateway.UpdateVTLDeviceType: instance GHC.Classes.Eq Amazonka.StorageGateway.UpdateVTLDeviceType.UpdateVTLDeviceTypeResponse
+ Amazonka.StorageGateway.UpdateVTLDeviceType: instance GHC.Generics.Generic Amazonka.StorageGateway.UpdateVTLDeviceType.UpdateVTLDeviceType
+ Amazonka.StorageGateway.UpdateVTLDeviceType: instance GHC.Generics.Generic Amazonka.StorageGateway.UpdateVTLDeviceType.UpdateVTLDeviceTypeResponse
+ Amazonka.StorageGateway.UpdateVTLDeviceType: instance GHC.Read.Read Amazonka.StorageGateway.UpdateVTLDeviceType.UpdateVTLDeviceType
+ Amazonka.StorageGateway.UpdateVTLDeviceType: instance GHC.Read.Read Amazonka.StorageGateway.UpdateVTLDeviceType.UpdateVTLDeviceTypeResponse
+ Amazonka.StorageGateway.UpdateVTLDeviceType: instance GHC.Show.Show Amazonka.StorageGateway.UpdateVTLDeviceType.UpdateVTLDeviceType
+ Amazonka.StorageGateway.UpdateVTLDeviceType: instance GHC.Show.Show Amazonka.StorageGateway.UpdateVTLDeviceType.UpdateVTLDeviceTypeResponse
+ Amazonka.StorageGateway.UpdateVTLDeviceType: newUpdateVTLDeviceType :: Text -> Text -> UpdateVTLDeviceType
+ Amazonka.StorageGateway.UpdateVTLDeviceType: newUpdateVTLDeviceTypeResponse :: Int -> UpdateVTLDeviceTypeResponse
+ Amazonka.StorageGateway.UpdateVTLDeviceType: updateVTLDeviceTypeResponse_httpStatus :: Lens' UpdateVTLDeviceTypeResponse Int
+ Amazonka.StorageGateway.UpdateVTLDeviceType: updateVTLDeviceTypeResponse_vTLDeviceARN :: Lens' UpdateVTLDeviceTypeResponse (Maybe Text)
+ Amazonka.StorageGateway.UpdateVTLDeviceType: updateVTLDeviceType_deviceType :: Lens' UpdateVTLDeviceType Text
+ Amazonka.StorageGateway.UpdateVTLDeviceType: updateVTLDeviceType_vTLDeviceARN :: Lens' UpdateVTLDeviceType Text
Files
- README.md +3/−4
- Setup.hs +0/−2
- amazonka-storagegateway.cabal +203/−137
- fixture/ActivateGateway.yaml +10/−0
- fixture/AddCache.yaml +10/−0
- fixture/AddTagsToResource.yaml +10/−0
- fixture/AddUploadBuffer.yaml +10/−0
- fixture/AddWorkingStorage.yaml +10/−0
- fixture/AssignTapePool.yaml +10/−0
- fixture/AssignTapePoolResponse.proto +0/−0
- fixture/AssociateFileSystem.yaml +10/−0
- fixture/AssociateFileSystemResponse.proto +0/−0
- fixture/AttachVolume.yaml +10/−0
- fixture/AttachVolumeResponse.proto +0/−0
- fixture/CancelArchival.yaml +10/−0
- fixture/CancelRetrieval.yaml +10/−0
- fixture/CreateCachediSCSIVolume.yaml +10/−0
- fixture/CreateSMBFileShare.yaml +10/−0
- fixture/CreateSMBFileShareResponse.proto +0/−0
- fixture/CreateSnapshot.yaml +10/−0
- fixture/CreateSnapshotFromVolumeRecoveryPoint.yaml +10/−0
- fixture/CreateStorediSCSIVolume.yaml +10/−0
- fixture/CreateTapePool.yaml +10/−0
- fixture/CreateTapePoolResponse.proto +0/−0
- fixture/CreateTapeWithBarcode.yaml +10/−0
- fixture/CreateTapes.yaml +10/−0
- fixture/DeleteAutomaticTapeCreationPolicy.yaml +10/−0
- fixture/DeleteAutomaticTapeCreationPolicyResponse.proto +0/−0
- fixture/DeleteBandwidthRateLimit.yaml +10/−0
- fixture/DeleteChapCredentials.yaml +10/−0
- fixture/DeleteGateway.yaml +10/−0
- fixture/DeleteSnapshotSchedule.yaml +10/−0
- fixture/DeleteTape.yaml +10/−0
- fixture/DeleteTapeArchive.yaml +10/−0
- fixture/DeleteTapePool.yaml +10/−0
- fixture/DeleteTapePoolResponse.proto +0/−0
- fixture/DeleteVolume.yaml +10/−0
- fixture/DescribeAvailabilityMonitorTest.yaml +10/−0
- fixture/DescribeAvailabilityMonitorTestResponse.proto +0/−0
- fixture/DescribeBandwidthRateLimit.yaml +10/−0
- fixture/DescribeBandwidthRateLimitSchedule.yaml +10/−0
- fixture/DescribeBandwidthRateLimitScheduleResponse.proto +0/−0
- fixture/DescribeCache.yaml +10/−0
- fixture/DescribeCachediSCSIVolumes.yaml +10/−0
- fixture/DescribeChapCredentials.yaml +10/−0
- fixture/DescribeFileSystemAssociations.yaml +10/−0
- fixture/DescribeFileSystemAssociationsResponse.proto +0/−0
- fixture/DescribeGatewayInformation.yaml +10/−0
- fixture/DescribeMaintenanceStartTime.yaml +10/−0
- fixture/DescribeSMBFileShares.yaml +10/−0
- fixture/DescribeSMBFileSharesResponse.proto +0/−0
- fixture/DescribeSMBSettings.yaml +10/−0
- fixture/DescribeSMBSettingsResponse.proto +0/−0
- fixture/DescribeSnapshotSchedule.yaml +10/−0
- fixture/DescribeStorediSCSIVolumes.yaml +10/−0
- fixture/DescribeTapeArchives.yaml +10/−0
- fixture/DescribeTapeRecoveryPoints.yaml +10/−0
- fixture/DescribeTapes.yaml +10/−0
- fixture/DescribeUploadBuffer.yaml +10/−0
- fixture/DescribeVTLDevices.yaml +10/−0
- fixture/DescribeWorkingStorage.yaml +10/−0
- fixture/DetachVolume.yaml +10/−0
- fixture/DetachVolumeResponse.proto +0/−0
- fixture/DisableGateway.yaml +10/−0
- fixture/DisassociateFileSystem.yaml +10/−0
- fixture/DisassociateFileSystemResponse.proto +0/−0
- fixture/JoinDomain.yaml +10/−0
- fixture/JoinDomainResponse.proto +0/−0
- fixture/ListAutomaticTapeCreationPolicies.yaml +10/−0
- fixture/ListAutomaticTapeCreationPoliciesResponse.proto +0/−0
- fixture/ListFileSystemAssociations.yaml +10/−0
- fixture/ListFileSystemAssociationsResponse.proto +0/−0
- fixture/ListGateways.yaml +10/−0
- fixture/ListLocalDisks.yaml +10/−0
- fixture/ListTagsForResource.yaml +10/−0
- fixture/ListTapePools.yaml +10/−0
- fixture/ListTapePoolsResponse.proto +0/−0
- fixture/ListTapes.yaml +10/−0
- fixture/ListVolumeInitiators.yaml +10/−0
- fixture/ListVolumeRecoveryPoints.yaml +10/−0
- fixture/ListVolumes.yaml +10/−0
- fixture/RemoveTagsFromResource.yaml +10/−0
- fixture/ResetCache.yaml +10/−0
- fixture/RetrieveTapeArchive.yaml +10/−0
- fixture/RetrieveTapeRecoveryPoint.yaml +10/−0
- fixture/SetLocalConsolePassword.yaml +10/−0
- fixture/SetSMBGuestPassword.yaml +10/−0
- fixture/SetSMBGuestPasswordResponse.proto +0/−0
- fixture/ShutdownGateway.yaml +10/−0
- fixture/StartAvailabilityMonitorTest.yaml +10/−0
- fixture/StartAvailabilityMonitorTestResponse.proto +0/−0
- fixture/StartGateway.yaml +10/−0
- fixture/UpdateAutomaticTapeCreationPolicy.yaml +10/−0
- fixture/UpdateAutomaticTapeCreationPolicyResponse.proto +0/−0
- fixture/UpdateBandwidthRateLimit.yaml +10/−0
- fixture/UpdateBandwidthRateLimitSchedule.yaml +10/−0
- fixture/UpdateBandwidthRateLimitScheduleResponse.proto +0/−0
- fixture/UpdateChapCredentials.yaml +10/−0
- fixture/UpdateFileSystemAssociation.yaml +10/−0
- fixture/UpdateFileSystemAssociationResponse.proto +0/−0
- fixture/UpdateGatewayInformation.yaml +10/−0
- fixture/UpdateGatewaySoftwareNow.yaml +10/−0
- fixture/UpdateMaintenanceStartTime.yaml +10/−0
- fixture/UpdateSMBFileShare.yaml +10/−0
- fixture/UpdateSMBFileShareResponse.proto +0/−0
- fixture/UpdateSMBFileShareVisibility.yaml +10/−0
- fixture/UpdateSMBFileShareVisibilityResponse.proto +0/−0
- fixture/UpdateSMBLocalGroups.yaml +10/−0
- fixture/UpdateSMBLocalGroupsResponse.proto +0/−0
- fixture/UpdateSMBSecurityStrategy.yaml +10/−0
- fixture/UpdateSMBSecurityStrategyResponse.proto +0/−0
- fixture/UpdateSnapshotSchedule.yaml +10/−0
- fixture/UpdateVTLDeviceType.yaml +10/−0
- gen/Amazonka/StorageGateway.hs +910/−0
- gen/Amazonka/StorageGateway/ActivateGateway.hs +442/−0
- gen/Amazonka/StorageGateway/AddCache.hs +194/−0
- gen/Amazonka/StorageGateway/AddTagsToResource.hs +225/−0
- gen/Amazonka/StorageGateway/AddUploadBuffer.hs +196/−0
- gen/Amazonka/StorageGateway/AddWorkingStorage.hs +208/−0
- gen/Amazonka/StorageGateway/AssignTapePool.hs +245/−0
- gen/Amazonka/StorageGateway/AssociateFileSystem.hs +322/−0
- gen/Amazonka/StorageGateway/AttachVolume.hs +301/−0
- gen/Amazonka/StorageGateway/CancelArchival.hs +198/−0
- gen/Amazonka/StorageGateway/CancelRetrieval.hs +199/−0
- gen/Amazonka/StorageGateway/CreateCachediSCSIVolume.hs +441/−0
- gen/Amazonka/StorageGateway/CreateNFSFileShare.hs +765/−0
- gen/Amazonka/StorageGateway/CreateSMBFileShare.hs +914/−0
- gen/Amazonka/StorageGateway/CreateSnapshot.hs +293/−0
- gen/Amazonka/StorageGateway/CreateSnapshotFromVolumeRecoveryPoint.hs +321/−0
- gen/Amazonka/StorageGateway/CreateStorediSCSIVolume.hs +452/−0
- gen/Amazonka/StorageGateway/CreateTapePool.hs +281/−0
- gen/Amazonka/StorageGateway/CreateTapeWithBarcode.hs +363/−0
- gen/Amazonka/StorageGateway/CreateTapes.hs +406/−0
- gen/Amazonka/StorageGateway/DeleteAutomaticTapeCreationPolicy.hs +199/−0
- gen/Amazonka/StorageGateway/DeleteBandwidthRateLimit.hs +214/−0
- gen/Amazonka/StorageGateway/DeleteChapCredentials.hs +217/−0
- gen/Amazonka/StorageGateway/DeleteFileShare.hs +209/−0
- gen/Amazonka/StorageGateway/DeleteGateway.hs +187/−0
- gen/Amazonka/StorageGateway/DeleteSnapshotSchedule.hs +185/−0
- gen/Amazonka/StorageGateway/DeleteTape.hs +223/−0
- gen/Amazonka/StorageGateway/DeleteTapeArchive.hs +208/−0
- gen/Amazonka/StorageGateway/DeleteTapePool.hs +169/−0
- gen/Amazonka/StorageGateway/DeleteVolume.hs +192/−0
- gen/Amazonka/StorageGateway/DescribeAvailabilityMonitorTest.hs +220/−0
- gen/Amazonka/StorageGateway/DescribeBandwidthRateLimit.hs +218/−0
- gen/Amazonka/StorageGateway/DescribeBandwidthRateLimitSchedule.hs +234/−0
- gen/Amazonka/StorageGateway/DescribeCache.hs +272/−0
- gen/Amazonka/StorageGateway/DescribeCachediSCSIVolumes.hs +195/−0
- gen/Amazonka/StorageGateway/DescribeChapCredentials.hs +237/−0
- gen/Amazonka/StorageGateway/DescribeFileSystemAssociations.hs +207/−0
- gen/Amazonka/StorageGateway/DescribeGatewayInformation.hs +504/−0
- gen/Amazonka/StorageGateway/DescribeMaintenanceStartTime.hs +282/−0
- gen/Amazonka/StorageGateway/DescribeNFSFileShares.hs +186/−0
- gen/Amazonka/StorageGateway/DescribeSMBFileShares.hs +186/−0
- gen/Amazonka/StorageGateway/DescribeSMBSettings.hs +362/−0
- gen/Amazonka/StorageGateway/DescribeSnapshotSchedule.hs +259/−0
- gen/Amazonka/StorageGateway/DescribeStorediSCSIVolumes.hs +336/−0
- gen/Amazonka/StorageGateway/DescribeTapeArchives.hs +275/−0
- gen/Amazonka/StorageGateway/DescribeTapeRecoveryPoints.hs +287/−0
- gen/Amazonka/StorageGateway/DescribeTapes.hs +292/−0
- gen/Amazonka/StorageGateway/DescribeUploadBuffer.hs +219/−0
- gen/Amazonka/StorageGateway/DescribeVTLDevices.hs +302/−0
- gen/Amazonka/StorageGateway/DescribeWorkingStorage.hs +236/−0
- gen/Amazonka/StorageGateway/DetachVolume.hs +207/−0
- gen/Amazonka/StorageGateway/DisableGateway.hs +178/−0
- gen/Amazonka/StorageGateway/DisassociateFileSystem.hs +212/−0
- gen/Amazonka/StorageGateway/JoinDomain.hs +378/−0
- gen/Amazonka/StorageGateway/Lens.hs +1167/−0
- gen/Amazonka/StorageGateway/ListAutomaticTapeCreationPolicies.hs +209/−0
- gen/Amazonka/StorageGateway/ListFileShares.hs +278/−0
- gen/Amazonka/StorageGateway/ListFileSystemAssociations.hs +280/−0
- gen/Amazonka/StorageGateway/ListGateways.hs +245/−0
- gen/Amazonka/StorageGateway/ListLocalDisks.hs +194/−0
- gen/Amazonka/StorageGateway/ListTagsForResource.hs +267/−0
- gen/Amazonka/StorageGateway/ListTapePools.hs +268/−0
- gen/Amazonka/StorageGateway/ListTapes.hs +268/−0
- gen/Amazonka/StorageGateway/ListVolumeInitiators.hs +181/−0
- gen/Amazonka/StorageGateway/ListVolumeRecoveryPoints.hs +196/−0
- gen/Amazonka/StorageGateway/ListVolumes.hs +284/−0
- gen/Amazonka/StorageGateway/NotifyWhenUploaded.hs +192/−0
- gen/Amazonka/StorageGateway/RefreshCache.hs +289/−0
- gen/Amazonka/StorageGateway/RemoveTagsFromResource.hs +204/−0
- gen/Amazonka/StorageGateway/ResetCache.hs +176/−0
- gen/Amazonka/StorageGateway/RetrieveTapeArchive.hs +219/−0
- gen/Amazonka/StorageGateway/RetrieveTapeRecoveryPoint.hs +209/−0
- gen/Amazonka/StorageGateway/SetLocalConsolePassword.hs +200/−0
- gen/Amazonka/StorageGateway/SetSMBGuestPassword.hs +194/−0
- gen/Amazonka/StorageGateway/ShutdownGateway.hs +194/−0
- gen/Amazonka/StorageGateway/StartAvailabilityMonitorTest.hs +183/−0
- gen/Amazonka/StorageGateway/StartGateway.hs +181/−0
- gen/Amazonka/StorageGateway/Types.hs +534/−0
- gen/Amazonka/StorageGateway/Types/ActiveDirectoryStatus.hs +96/−0
- gen/Amazonka/StorageGateway/Types/AutomaticTapeCreationPolicyInfo.hs +104/−0
- gen/Amazonka/StorageGateway/Types/AutomaticTapeCreationRule.hs +195/−0
- gen/Amazonka/StorageGateway/Types/AvailabilityMonitorTestStatus.hs +76/−0
- gen/Amazonka/StorageGateway/Types/BandwidthRateLimitInterval.hs +217/−0
- gen/Amazonka/StorageGateway/Types/CacheAttributes.hs +100/−0
- gen/Amazonka/StorageGateway/Types/CachediSCSIVolume.hs +312/−0
- gen/Amazonka/StorageGateway/Types/CaseSensitivity.hs +71/−0
- gen/Amazonka/StorageGateway/Types/ChapInfo.hs +124/−0
- gen/Amazonka/StorageGateway/Types/DeviceiSCSIAttributes.hs +112/−0
- gen/Amazonka/StorageGateway/Types/Disk.hs +172/−0
- gen/Amazonka/StorageGateway/Types/EndpointNetworkConfiguration.hs +95/−0
- gen/Amazonka/StorageGateway/Types/FileShareInfo.hs +116/−0
- gen/Amazonka/StorageGateway/Types/FileShareType.hs +72/−0
- gen/Amazonka/StorageGateway/Types/FileSystemAssociationInfo.hs +206/−0
- gen/Amazonka/StorageGateway/Types/FileSystemAssociationStatusDetail.hs +83/−0
- gen/Amazonka/StorageGateway/Types/FileSystemAssociationSummary.hs +115/−0
- gen/Amazonka/StorageGateway/Types/GatewayCapacity.hs +76/−0
- gen/Amazonka/StorageGateway/Types/GatewayInfo.hs +196/−0
- gen/Amazonka/StorageGateway/Types/HostEnvironment.hs +91/−0
- gen/Amazonka/StorageGateway/Types/NFSFileShareDefaults.hs +143/−0
- gen/Amazonka/StorageGateway/Types/NFSFileShareInfo.hs +512/−0
- gen/Amazonka/StorageGateway/Types/NetworkInterface.hs +105/−0
- gen/Amazonka/StorageGateway/Types/ObjectACL.hs +99/−0
- gen/Amazonka/StorageGateway/Types/PoolInfo.hs +171/−0
- gen/Amazonka/StorageGateway/Types/PoolStatus.hs +71/−0
- gen/Amazonka/StorageGateway/Types/RetentionLockType.hs +76/−0
- gen/Amazonka/StorageGateway/Types/SMBFileShareInfo.hs +668/−0
- gen/Amazonka/StorageGateway/Types/SMBLocalGroups.hs +93/−0
- gen/Amazonka/StorageGateway/Types/SMBSecurityStrategy.hs +76/−0
- gen/Amazonka/StorageGateway/Types/StorediSCSIVolume.hs +333/−0
- gen/Amazonka/StorageGateway/Types/Tag.hs +95/−0
- gen/Amazonka/StorageGateway/Types/Tape.hs +251/−0
- gen/Amazonka/StorageGateway/Types/TapeArchive.hs +261/−0
- gen/Amazonka/StorageGateway/Types/TapeInfo.hs +177/−0
- gen/Amazonka/StorageGateway/Types/TapeRecoveryPointInfo.hs +120/−0
- gen/Amazonka/StorageGateway/Types/TapeStorageClass.hs +71/−0
- gen/Amazonka/StorageGateway/Types/VTLDevice.hs +124/−0
- gen/Amazonka/StorageGateway/Types/VolumeInfo.hs +206/−0
- gen/Amazonka/StorageGateway/Types/VolumeRecoveryPointInfo.hs +118/−0
- gen/Amazonka/StorageGateway/Types/VolumeiSCSIAttributes.hs +121/−0
- gen/Amazonka/StorageGateway/UpdateAutomaticTapeCreationPolicy.hs +232/−0
- gen/Amazonka/StorageGateway/UpdateBandwidthRateLimit.hs +226/−0
- gen/Amazonka/StorageGateway/UpdateBandwidthRateLimitSchedule.hs +221/−0
- gen/Amazonka/StorageGateway/UpdateChapCredentials.hs +293/−0
- gen/Amazonka/StorageGateway/UpdateFileSystemAssociation.hs +245/−0
- gen/Amazonka/StorageGateway/UpdateGatewayInformation.hs +262/−0
- gen/Amazonka/StorageGateway/UpdateGatewaySoftwareNow.hs +194/−0
- gen/Amazonka/StorageGateway/UpdateMaintenanceStartTime.hs +273/−0
- gen/Amazonka/StorageGateway/UpdateNFSFileShare.hs +553/−0
- gen/Amazonka/StorageGateway/UpdateSMBFileShare.hs +677/−0
- gen/Amazonka/StorageGateway/UpdateSMBFileShareVisibility.hs +198/−0
- gen/Amazonka/StorageGateway/UpdateSMBLocalGroups.hs +191/−0
- gen/Amazonka/StorageGateway/UpdateSMBSecurityStrategy.hs +246/−0
- gen/Amazonka/StorageGateway/UpdateSnapshotSchedule.hs +294/−0
- gen/Amazonka/StorageGateway/UpdateVTLDeviceType.hs +200/−0
- gen/Amazonka/StorageGateway/Waiters.hs +24/−0
- gen/Network/AWS/StorageGateway.hs +0/−547
- gen/Network/AWS/StorageGateway/ActivateGateway.hs +0/−223
- gen/Network/AWS/StorageGateway/AddCache.hs +0/−144
- gen/Network/AWS/StorageGateway/AddTagsToResource.hs +0/−165
- gen/Network/AWS/StorageGateway/AddUploadBuffer.hs +0/−145
- gen/Network/AWS/StorageGateway/AddWorkingStorage.hs +0/−157
- gen/Network/AWS/StorageGateway/CancelArchival.hs +0/−152
- gen/Network/AWS/StorageGateway/CancelRetrieval.hs +0/−152
- gen/Network/AWS/StorageGateway/CreateCachediSCSIVolume.hs +0/−219
- gen/Network/AWS/StorageGateway/CreateNFSFileShare.hs +0/−287
- gen/Network/AWS/StorageGateway/CreateSnapshot.hs +0/−178
- gen/Network/AWS/StorageGateway/CreateSnapshotFromVolumeRecoveryPoint.hs +0/−190
- gen/Network/AWS/StorageGateway/CreateStorediSCSIVolume.hs +0/−241
- gen/Network/AWS/StorageGateway/CreateTapeWithBarcode.hs +0/−167
- gen/Network/AWS/StorageGateway/CreateTapes.hs +0/−189
- gen/Network/AWS/StorageGateway/DeleteBandwidthRateLimit.hs +0/−159
- gen/Network/AWS/StorageGateway/DeleteChapCredentials.hs +0/−172
- gen/Network/AWS/StorageGateway/DeleteFileShare.hs +0/−152
- gen/Network/AWS/StorageGateway/DeleteGateway.hs +0/−144
- gen/Network/AWS/StorageGateway/DeleteSnapshotSchedule.hs +0/−136
- gen/Network/AWS/StorageGateway/DeleteTape.hs +0/−151
- gen/Network/AWS/StorageGateway/DeleteTapeArchive.hs +0/−140
- gen/Network/AWS/StorageGateway/DeleteVolume.hs +0/−144
- gen/Network/AWS/StorageGateway/DescribeBandwidthRateLimit.hs +0/−168
- gen/Network/AWS/StorageGateway/DescribeCache.hs +0/−196
- gen/Network/AWS/StorageGateway/DescribeCachediSCSIVolumes.hs +0/−144
- gen/Network/AWS/StorageGateway/DescribeChapCredentials.hs +0/−143
- gen/Network/AWS/StorageGateway/DescribeGatewayInformation.hs +0/−225
- gen/Network/AWS/StorageGateway/DescribeMaintenanceStartTime.hs +0/−196
- gen/Network/AWS/StorageGateway/DescribeNFSFileShares.hs +0/−147
- gen/Network/AWS/StorageGateway/DescribeSnapshotSchedule.hs +0/−181
- gen/Network/AWS/StorageGateway/DescribeStorediSCSIVolumes.hs +0/−142
- gen/Network/AWS/StorageGateway/DescribeTapeArchives.hs +0/−186
- gen/Network/AWS/StorageGateway/DescribeTapeRecoveryPoints.hs +0/−201
- gen/Network/AWS/StorageGateway/DescribeTapes.hs +0/−196
- gen/Network/AWS/StorageGateway/DescribeUploadBuffer.hs +0/−169
- gen/Network/AWS/StorageGateway/DescribeVTLDevices.hs +0/−210
- gen/Network/AWS/StorageGateway/DescribeWorkingStorage.hs +0/−176
- gen/Network/AWS/StorageGateway/DisableGateway.hs +0/−144
- gen/Network/AWS/StorageGateway/ListFileShares.hs +0/−183
- gen/Network/AWS/StorageGateway/ListGateways.hs +0/−177
- gen/Network/AWS/StorageGateway/ListLocalDisks.hs +0/−150
- gen/Network/AWS/StorageGateway/ListTagsForResource.hs +0/−187
- gen/Network/AWS/StorageGateway/ListTapes.hs +0/−186
- gen/Network/AWS/StorageGateway/ListVolumeInitiators.hs +0/−143
- gen/Network/AWS/StorageGateway/ListVolumeRecoveryPoints.hs +0/−150
- gen/Network/AWS/StorageGateway/ListVolumes.hs +0/−196
- gen/Network/AWS/StorageGateway/NotifyWhenUploaded.hs +0/−151
- gen/Network/AWS/StorageGateway/RefreshCache.hs +0/−133
- gen/Network/AWS/StorageGateway/RemoveTagsFromResource.hs +0/−153
- gen/Network/AWS/StorageGateway/ResetCache.hs +0/−133
- gen/Network/AWS/StorageGateway/RetrieveTapeArchive.hs +0/−155
- gen/Network/AWS/StorageGateway/RetrieveTapeRecoveryPoint.hs +0/−157
- gen/Network/AWS/StorageGateway/SetLocalConsolePassword.hs +0/−154
- gen/Network/AWS/StorageGateway/ShutdownGateway.hs +0/−146
- gen/Network/AWS/StorageGateway/StartGateway.hs +0/−142
- gen/Network/AWS/StorageGateway/Types.hs +0/−286
- gen/Network/AWS/StorageGateway/Types/Product.hs +0/−1615
- gen/Network/AWS/StorageGateway/Types/Sum.hs +0/−68
- gen/Network/AWS/StorageGateway/UpdateBandwidthRateLimit.hs +0/−178
- gen/Network/AWS/StorageGateway/UpdateChapCredentials.hs +0/−204
- gen/Network/AWS/StorageGateway/UpdateGatewayInformation.hs +0/−174
- gen/Network/AWS/StorageGateway/UpdateGatewaySoftwareNow.hs +0/−145
- gen/Network/AWS/StorageGateway/UpdateMaintenanceStartTime.hs +0/−187
- gen/Network/AWS/StorageGateway/UpdateNFSFileShare.hs +0/−264
- gen/Network/AWS/StorageGateway/UpdateSnapshotSchedule.hs +0/−191
- gen/Network/AWS/StorageGateway/UpdateVTLDeviceType.hs +0/−152
- gen/Network/AWS/StorageGateway/Waiters.hs +0/−21
- test/Main.hs +11/−9
- test/Test/AWS/Gen/StorageGateway.hs +0/−1173
- test/Test/AWS/StorageGateway.hs +0/−26
- test/Test/AWS/StorageGateway/Internal.hs +0/−16
- test/Test/Amazonka/Gen/StorageGateway.hs +1838/−0
- test/Test/Amazonka/StorageGateway.hs +20/−0
- test/Test/Amazonka/StorageGateway/Internal.hs +8/−0
README.md view
@@ -7,9 +7,8 @@ ## Version--`1.6.1`-+ +`2.0` - Derived from API version @2013-06-30@ of the AWS service descriptions, licensed under Apache 2.0. ## Description @@ -26,7 +25,7 @@ The provided lenses should be compatible with any of the major lens libraries [lens](http://hackage.haskell.org/package/lens) or [lens-family-core](http://hackage.haskell.org/package/lens-family-core). -See [Network.AWS.StorageGateway](http://hackage.haskell.org/package/amazonka-storagegateway/docs/Network-AWS-StorageGateway.html)+See [Amazonka.StorageGateway](http://hackage.haskell.org/package/amazonka-storagegateway/docs/Amazonka-StorageGateway.html) or [the AWS documentation](https://aws.amazon.com/documentation/) to get started.
− Setup.hs
@@ -1,2 +0,0 @@-import Distribution.Simple-main = defaultMain
amazonka-storagegateway.cabal view
@@ -1,148 +1,214 @@-name: amazonka-storagegateway-version: 1.6.1-synopsis: Amazon Storage Gateway SDK.-homepage: https://github.com/brendanhay/amazonka-bug-reports: https://github.com/brendanhay/amazonka/issues-license: MPL-2.0-license-file: LICENSE-author: Brendan Hay-maintainer: Brendan Hay <brendan.g.hay+amazonka@gmail.com>-copyright: Copyright (c) 2013-2018 Brendan Hay-category: Network, AWS, Cloud, Distributed Computing-build-type: Simple-cabal-version: >= 1.10-extra-source-files: README.md fixture/*.yaml fixture/*.proto src/.gitkeep+cabal-version: 2.2+name: amazonka-storagegateway+version: 2.0+synopsis: Amazon Storage Gateway SDK.+homepage: https://github.com/brendanhay/amazonka+bug-reports: https://github.com/brendanhay/amazonka/issues+license: MPL-2.0+license-file: LICENSE+author: Brendan Hay+maintainer:+ Brendan Hay <brendan.g.hay+amazonka@gmail.com>, Jack Kelly <jack@jackkelly.name>++copyright: Copyright (c) 2013-2023 Brendan Hay+category: AWS+build-type: Simple+extra-source-files:+ fixture/*.proto+ fixture/*.yaml+ README.md+ src/.gitkeep+ description:- The types from this library are intended to be used with- <http://hackage.haskell.org/package/amazonka amazonka>, which provides- mechanisms for specifying AuthN/AuthZ information, sending requests,- and receiving responses.- .- Lenses are used for constructing and manipulating types,- due to the depth of nesting of AWS types and transparency regarding- de/serialisation into more palatable Haskell values.- The provided lenses should be compatible with any of the major lens libraries- such as <http://hackage.haskell.org/package/lens lens> or- <http://hackage.haskell.org/package/lens-family-core lens-family-core>.- .- See "Network.AWS.StorageGateway" or <https://aws.amazon.com/documentation/ the AWS documentation>- to get started.+ Derived from API version @2013-06-30@ of the AWS service descriptions, licensed under Apache 2.0.+ .+ The types from this library are intended to be used with <http://hackage.haskell.org/package/amazonka amazonka>,+ which provides mechanisms for specifying AuthN/AuthZ information, sending requests, and receiving responses.+ .+ It is recommended to use generic lenses or optics from packages such as <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify optional fields and deconstruct responses.+ .+ Generated lenses can be found in "Amazonka.StorageGateway.Lens" and are+ suitable for use with a lens package such as <http://hackage.haskell.org/package/lens lens> or <http://hackage.haskell.org/package/lens-family-core lens-family-core>.+ .+ See "Amazonka.StorageGateway" and the <https://aws.amazon.com/documentation/ AWS documentation> to get started. source-repository head- type: git- location: git://github.com/brendanhay/amazonka.git- subdir: amazonka-storagegateway+ type: git+ location: git://github.com/brendanhay/amazonka.git+ subdir: amazonka-storagegateway library- default-language: Haskell2010- hs-source-dirs: src gen-- ghc-options:- -Wall- -fwarn-incomplete-uni-patterns- -fwarn-incomplete-record-updates- -funbox-strict-fields-- exposed-modules:- Network.AWS.StorageGateway- , Network.AWS.StorageGateway.ActivateGateway- , Network.AWS.StorageGateway.AddCache- , Network.AWS.StorageGateway.AddTagsToResource- , Network.AWS.StorageGateway.AddUploadBuffer- , Network.AWS.StorageGateway.AddWorkingStorage- , Network.AWS.StorageGateway.CancelArchival- , Network.AWS.StorageGateway.CancelRetrieval- , Network.AWS.StorageGateway.CreateCachediSCSIVolume- , Network.AWS.StorageGateway.CreateNFSFileShare- , Network.AWS.StorageGateway.CreateSnapshot- , Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint- , Network.AWS.StorageGateway.CreateStorediSCSIVolume- , Network.AWS.StorageGateway.CreateTapeWithBarcode- , Network.AWS.StorageGateway.CreateTapes- , Network.AWS.StorageGateway.DeleteBandwidthRateLimit- , Network.AWS.StorageGateway.DeleteChapCredentials- , Network.AWS.StorageGateway.DeleteFileShare- , Network.AWS.StorageGateway.DeleteGateway- , Network.AWS.StorageGateway.DeleteSnapshotSchedule- , Network.AWS.StorageGateway.DeleteTape- , Network.AWS.StorageGateway.DeleteTapeArchive- , Network.AWS.StorageGateway.DeleteVolume- , Network.AWS.StorageGateway.DescribeBandwidthRateLimit- , Network.AWS.StorageGateway.DescribeCache- , Network.AWS.StorageGateway.DescribeCachediSCSIVolumes- , Network.AWS.StorageGateway.DescribeChapCredentials- , Network.AWS.StorageGateway.DescribeGatewayInformation- , Network.AWS.StorageGateway.DescribeMaintenanceStartTime- , Network.AWS.StorageGateway.DescribeNFSFileShares- , Network.AWS.StorageGateway.DescribeSnapshotSchedule- , Network.AWS.StorageGateway.DescribeStorediSCSIVolumes- , Network.AWS.StorageGateway.DescribeTapeArchives- , Network.AWS.StorageGateway.DescribeTapeRecoveryPoints- , Network.AWS.StorageGateway.DescribeTapes- , Network.AWS.StorageGateway.DescribeUploadBuffer- , Network.AWS.StorageGateway.DescribeVTLDevices- , Network.AWS.StorageGateway.DescribeWorkingStorage- , Network.AWS.StorageGateway.DisableGateway- , Network.AWS.StorageGateway.ListFileShares- , Network.AWS.StorageGateway.ListGateways- , Network.AWS.StorageGateway.ListLocalDisks- , Network.AWS.StorageGateway.ListTagsForResource- , Network.AWS.StorageGateway.ListTapes- , Network.AWS.StorageGateway.ListVolumeInitiators- , Network.AWS.StorageGateway.ListVolumeRecoveryPoints- , Network.AWS.StorageGateway.ListVolumes- , Network.AWS.StorageGateway.NotifyWhenUploaded- , Network.AWS.StorageGateway.RefreshCache- , Network.AWS.StorageGateway.RemoveTagsFromResource- , Network.AWS.StorageGateway.ResetCache- , Network.AWS.StorageGateway.RetrieveTapeArchive- , Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint- , Network.AWS.StorageGateway.SetLocalConsolePassword- , Network.AWS.StorageGateway.ShutdownGateway- , Network.AWS.StorageGateway.StartGateway- , Network.AWS.StorageGateway.Types- , Network.AWS.StorageGateway.UpdateBandwidthRateLimit- , Network.AWS.StorageGateway.UpdateChapCredentials- , Network.AWS.StorageGateway.UpdateGatewayInformation- , Network.AWS.StorageGateway.UpdateGatewaySoftwareNow- , Network.AWS.StorageGateway.UpdateMaintenanceStartTime- , Network.AWS.StorageGateway.UpdateNFSFileShare- , Network.AWS.StorageGateway.UpdateSnapshotSchedule- , Network.AWS.StorageGateway.UpdateVTLDeviceType- , Network.AWS.StorageGateway.Waiters+ default-language: Haskell2010+ hs-source-dirs: src gen+ ghc-options:+ -Wall -fwarn-incomplete-uni-patterns+ -fwarn-incomplete-record-updates -funbox-strict-fields - other-modules:- Network.AWS.StorageGateway.Types.Product- , Network.AWS.StorageGateway.Types.Sum+ exposed-modules:+ Amazonka.StorageGateway+ Amazonka.StorageGateway.ActivateGateway+ Amazonka.StorageGateway.AddCache+ Amazonka.StorageGateway.AddTagsToResource+ Amazonka.StorageGateway.AddUploadBuffer+ Amazonka.StorageGateway.AddWorkingStorage+ Amazonka.StorageGateway.AssignTapePool+ Amazonka.StorageGateway.AssociateFileSystem+ Amazonka.StorageGateway.AttachVolume+ Amazonka.StorageGateway.CancelArchival+ Amazonka.StorageGateway.CancelRetrieval+ Amazonka.StorageGateway.CreateCachediSCSIVolume+ Amazonka.StorageGateway.CreateNFSFileShare+ Amazonka.StorageGateway.CreateSMBFileShare+ Amazonka.StorageGateway.CreateSnapshot+ Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint+ Amazonka.StorageGateway.CreateStorediSCSIVolume+ Amazonka.StorageGateway.CreateTapePool+ Amazonka.StorageGateway.CreateTapes+ Amazonka.StorageGateway.CreateTapeWithBarcode+ Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy+ Amazonka.StorageGateway.DeleteBandwidthRateLimit+ Amazonka.StorageGateway.DeleteChapCredentials+ Amazonka.StorageGateway.DeleteFileShare+ Amazonka.StorageGateway.DeleteGateway+ Amazonka.StorageGateway.DeleteSnapshotSchedule+ Amazonka.StorageGateway.DeleteTape+ Amazonka.StorageGateway.DeleteTapeArchive+ Amazonka.StorageGateway.DeleteTapePool+ Amazonka.StorageGateway.DeleteVolume+ Amazonka.StorageGateway.DescribeAvailabilityMonitorTest+ Amazonka.StorageGateway.DescribeBandwidthRateLimit+ Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule+ Amazonka.StorageGateway.DescribeCache+ Amazonka.StorageGateway.DescribeCachediSCSIVolumes+ Amazonka.StorageGateway.DescribeChapCredentials+ Amazonka.StorageGateway.DescribeFileSystemAssociations+ Amazonka.StorageGateway.DescribeGatewayInformation+ Amazonka.StorageGateway.DescribeMaintenanceStartTime+ Amazonka.StorageGateway.DescribeNFSFileShares+ Amazonka.StorageGateway.DescribeSMBFileShares+ Amazonka.StorageGateway.DescribeSMBSettings+ Amazonka.StorageGateway.DescribeSnapshotSchedule+ Amazonka.StorageGateway.DescribeStorediSCSIVolumes+ Amazonka.StorageGateway.DescribeTapeArchives+ Amazonka.StorageGateway.DescribeTapeRecoveryPoints+ Amazonka.StorageGateway.DescribeTapes+ Amazonka.StorageGateway.DescribeUploadBuffer+ Amazonka.StorageGateway.DescribeVTLDevices+ Amazonka.StorageGateway.DescribeWorkingStorage+ Amazonka.StorageGateway.DetachVolume+ Amazonka.StorageGateway.DisableGateway+ Amazonka.StorageGateway.DisassociateFileSystem+ Amazonka.StorageGateway.JoinDomain+ Amazonka.StorageGateway.Lens+ Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies+ Amazonka.StorageGateway.ListFileShares+ Amazonka.StorageGateway.ListFileSystemAssociations+ Amazonka.StorageGateway.ListGateways+ Amazonka.StorageGateway.ListLocalDisks+ Amazonka.StorageGateway.ListTagsForResource+ Amazonka.StorageGateway.ListTapePools+ Amazonka.StorageGateway.ListTapes+ Amazonka.StorageGateway.ListVolumeInitiators+ Amazonka.StorageGateway.ListVolumeRecoveryPoints+ Amazonka.StorageGateway.ListVolumes+ Amazonka.StorageGateway.NotifyWhenUploaded+ Amazonka.StorageGateway.RefreshCache+ Amazonka.StorageGateway.RemoveTagsFromResource+ Amazonka.StorageGateway.ResetCache+ Amazonka.StorageGateway.RetrieveTapeArchive+ Amazonka.StorageGateway.RetrieveTapeRecoveryPoint+ Amazonka.StorageGateway.SetLocalConsolePassword+ Amazonka.StorageGateway.SetSMBGuestPassword+ Amazonka.StorageGateway.ShutdownGateway+ Amazonka.StorageGateway.StartAvailabilityMonitorTest+ Amazonka.StorageGateway.StartGateway+ Amazonka.StorageGateway.Types+ Amazonka.StorageGateway.Types.ActiveDirectoryStatus+ Amazonka.StorageGateway.Types.AutomaticTapeCreationPolicyInfo+ Amazonka.StorageGateway.Types.AutomaticTapeCreationRule+ Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus+ Amazonka.StorageGateway.Types.BandwidthRateLimitInterval+ Amazonka.StorageGateway.Types.CacheAttributes+ Amazonka.StorageGateway.Types.CachediSCSIVolume+ Amazonka.StorageGateway.Types.CaseSensitivity+ Amazonka.StorageGateway.Types.ChapInfo+ Amazonka.StorageGateway.Types.DeviceiSCSIAttributes+ Amazonka.StorageGateway.Types.Disk+ Amazonka.StorageGateway.Types.EndpointNetworkConfiguration+ Amazonka.StorageGateway.Types.FileShareInfo+ Amazonka.StorageGateway.Types.FileShareType+ Amazonka.StorageGateway.Types.FileSystemAssociationInfo+ Amazonka.StorageGateway.Types.FileSystemAssociationStatusDetail+ Amazonka.StorageGateway.Types.FileSystemAssociationSummary+ Amazonka.StorageGateway.Types.GatewayCapacity+ Amazonka.StorageGateway.Types.GatewayInfo+ Amazonka.StorageGateway.Types.HostEnvironment+ Amazonka.StorageGateway.Types.NetworkInterface+ Amazonka.StorageGateway.Types.NFSFileShareDefaults+ Amazonka.StorageGateway.Types.NFSFileShareInfo+ Amazonka.StorageGateway.Types.ObjectACL+ Amazonka.StorageGateway.Types.PoolInfo+ Amazonka.StorageGateway.Types.PoolStatus+ Amazonka.StorageGateway.Types.RetentionLockType+ Amazonka.StorageGateway.Types.SMBFileShareInfo+ Amazonka.StorageGateway.Types.SMBLocalGroups+ Amazonka.StorageGateway.Types.SMBSecurityStrategy+ Amazonka.StorageGateway.Types.StorediSCSIVolume+ Amazonka.StorageGateway.Types.Tag+ Amazonka.StorageGateway.Types.Tape+ Amazonka.StorageGateway.Types.TapeArchive+ Amazonka.StorageGateway.Types.TapeInfo+ Amazonka.StorageGateway.Types.TapeRecoveryPointInfo+ Amazonka.StorageGateway.Types.TapeStorageClass+ Amazonka.StorageGateway.Types.VolumeInfo+ Amazonka.StorageGateway.Types.VolumeiSCSIAttributes+ Amazonka.StorageGateway.Types.VolumeRecoveryPointInfo+ Amazonka.StorageGateway.Types.VTLDevice+ Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy+ Amazonka.StorageGateway.UpdateBandwidthRateLimit+ Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule+ Amazonka.StorageGateway.UpdateChapCredentials+ Amazonka.StorageGateway.UpdateFileSystemAssociation+ Amazonka.StorageGateway.UpdateGatewayInformation+ Amazonka.StorageGateway.UpdateGatewaySoftwareNow+ Amazonka.StorageGateway.UpdateMaintenanceStartTime+ Amazonka.StorageGateway.UpdateNFSFileShare+ Amazonka.StorageGateway.UpdateSMBFileShare+ Amazonka.StorageGateway.UpdateSMBFileShareVisibility+ Amazonka.StorageGateway.UpdateSMBLocalGroups+ Amazonka.StorageGateway.UpdateSMBSecurityStrategy+ Amazonka.StorageGateway.UpdateSnapshotSchedule+ Amazonka.StorageGateway.UpdateVTLDeviceType+ Amazonka.StorageGateway.Waiters - build-depends:- amazonka-core == 1.6.1.*- , base >= 4.7 && < 5+ build-depends:+ , amazonka-core >=2.0 && <2.1+ , base >=4.12 && <5 test-suite amazonka-storagegateway-test- type: exitcode-stdio-1.0- default-language: Haskell2010- hs-source-dirs: test- main-is: Main.hs-- ghc-options: -Wall -threaded+ type: exitcode-stdio-1.0+ default-language: Haskell2010+ hs-source-dirs: test+ main-is: Main.hs+ ghc-options: -Wall -threaded - -- This section is encoded by the template and any modules added by- -- hand outside these namespaces will not correctly be added to the- -- distribution package.- other-modules:- Test.AWS.StorageGateway- , Test.AWS.Gen.StorageGateway- , Test.AWS.StorageGateway.Internal+ -- This section is encoded by the template and any modules added by+ -- hand outside these namespaces will not correctly be added to the+ -- distribution package.+ other-modules:+ Test.Amazonka.Gen.StorageGateway+ Test.Amazonka.StorageGateway+ Test.Amazonka.StorageGateway.Internal - build-depends:- amazonka-core == 1.6.1.*- , amazonka-test == 1.6.1.*- , amazonka-storagegateway- , base- , bytestring- , tasty- , tasty-hunit- , text- , time- , unordered-containers+ build-depends:+ , amazonka-core >=2.0 && <2.1+ , amazonka-storagegateway+ , amazonka-test >=2.0 && <2.1+ , base+ , bytestring+ , case-insensitive+ , tasty+ , tasty-hunit+ , text+ , time+ , unordered-containers
fixture/ActivateGateway.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
fixture/AddCache.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
fixture/AddTagsToResource.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
fixture/AddUploadBuffer.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
fixture/AddWorkingStorage.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
+ fixture/AssignTapePool.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
+ fixture/AssignTapePoolResponse.proto view
+ fixture/AssociateFileSystem.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
+ fixture/AssociateFileSystemResponse.proto view
+ fixture/AttachVolume.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
+ fixture/AttachVolumeResponse.proto view
fixture/CancelArchival.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
fixture/CancelRetrieval.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
fixture/CreateCachediSCSIVolume.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
fixture/CreateSnapshot.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
fixture/CreateSnapshotFromVolumeRecoveryPoint.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
fixture/CreateStorediSCSIVolume.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
+ fixture/CreateTapePool.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
+ fixture/CreateTapePoolResponse.proto view
fixture/CreateTapeWithBarcode.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
fixture/CreateTapes.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
+ fixture/DeleteAutomaticTapeCreationPolicy.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
+ fixture/DeleteAutomaticTapeCreationPolicyResponse.proto view
fixture/DeleteBandwidthRateLimit.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
fixture/DeleteChapCredentials.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
fixture/DeleteGateway.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
fixture/DeleteSnapshotSchedule.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
fixture/DeleteTape.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
fixture/DeleteTapeArchive.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
+ fixture/DeleteTapePool.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
+ fixture/DeleteTapePoolResponse.proto view
fixture/DeleteVolume.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
+ fixture/DescribeAvailabilityMonitorTest.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
+ fixture/DescribeAvailabilityMonitorTestResponse.proto view
fixture/DescribeBandwidthRateLimit.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
+ fixture/DescribeBandwidthRateLimitSchedule.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
+ fixture/DescribeBandwidthRateLimitScheduleResponse.proto view
fixture/DescribeCache.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
fixture/DescribeCachediSCSIVolumes.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
fixture/DescribeChapCredentials.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
+ fixture/DescribeFileSystemAssociations.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
+ fixture/DescribeFileSystemAssociationsResponse.proto view
fixture/DescribeGatewayInformation.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
fixture/DescribeMaintenanceStartTime.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
+ fixture/DescribeSMBSettings.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
+ fixture/DescribeSMBSettingsResponse.proto view
fixture/DescribeSnapshotSchedule.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
fixture/DescribeStorediSCSIVolumes.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
fixture/DescribeTapeArchives.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
fixture/DescribeTapeRecoveryPoints.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
fixture/DescribeTapes.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
fixture/DescribeUploadBuffer.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
fixture/DescribeVTLDevices.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
fixture/DescribeWorkingStorage.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
+ fixture/DetachVolume.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
+ fixture/DetachVolumeResponse.proto view
fixture/DisableGateway.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
+ fixture/DisassociateFileSystem.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
+ fixture/DisassociateFileSystemResponse.proto view
+ fixture/JoinDomain.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
+ fixture/JoinDomainResponse.proto view
+ fixture/ListAutomaticTapeCreationPolicies.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
+ fixture/ListAutomaticTapeCreationPoliciesResponse.proto view
+ fixture/ListFileSystemAssociations.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
+ fixture/ListFileSystemAssociationsResponse.proto view
fixture/ListGateways.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
fixture/ListLocalDisks.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
fixture/ListTagsForResource.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
+ fixture/ListTapePools.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
+ fixture/ListTapePoolsResponse.proto view
fixture/ListTapes.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
fixture/ListVolumeInitiators.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
fixture/ListVolumeRecoveryPoints.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
fixture/ListVolumes.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
fixture/RemoveTagsFromResource.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
fixture/ResetCache.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
fixture/RetrieveTapeArchive.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
fixture/RetrieveTapeRecoveryPoint.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
fixture/SetLocalConsolePassword.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
+ fixture/SetSMBGuestPassword.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
+ fixture/SetSMBGuestPasswordResponse.proto view
fixture/ShutdownGateway.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
+ fixture/StartAvailabilityMonitorTest.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
+ fixture/StartAvailabilityMonitorTestResponse.proto view
fixture/StartGateway.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
+ fixture/UpdateAutomaticTapeCreationPolicy.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
+ fixture/UpdateAutomaticTapeCreationPolicyResponse.proto view
fixture/UpdateBandwidthRateLimit.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
+ fixture/UpdateBandwidthRateLimitSchedule.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
+ fixture/UpdateBandwidthRateLimitScheduleResponse.proto view
fixture/UpdateChapCredentials.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
+ fixture/UpdateFileSystemAssociation.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
+ fixture/UpdateFileSystemAssociationResponse.proto view
fixture/UpdateGatewayInformation.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
fixture/UpdateGatewaySoftwareNow.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
fixture/UpdateMaintenanceStartTime.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
+ fixture/UpdateSMBLocalGroups.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
+ fixture/UpdateSMBLocalGroupsResponse.proto view
+ fixture/UpdateSMBSecurityStrategy.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
+ fixture/UpdateSMBSecurityStrategyResponse.proto view
fixture/UpdateSnapshotSchedule.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
fixture/UpdateVTLDeviceType.yaml view
@@ -0,0 +1,10 @@+---+method: POST+headers:+ Authorization: AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/storagegateway/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+ Host: storagegateway.us-east-1.amazonaws.com+ Content-Type: application/x-www-form-urlencoded; charset=utf-8+ X-Amz-Content-SHA256: abcdef+ X-Amz-Date: 20091028T223200Z+body:+ ''
+ gen/Amazonka/StorageGateway.hs view
@@ -0,0 +1,910 @@+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}++-- |+-- Module : Amazonka.StorageGateway+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Derived from API version @2013-06-30@ of the AWS service descriptions, licensed under Apache 2.0.+--+-- Storage Gateway Service+--+-- Storage Gateway is the service that connects an on-premises software+-- appliance with cloud-based storage to provide seamless and secure+-- integration between an organization\'s on-premises IT environment and+-- the Amazon Web Services storage infrastructure. The service enables you+-- to securely upload data to the Amazon Web Services Cloud for cost+-- effective backup and rapid disaster recovery.+--+-- Use the following links to get started using the /Storage Gateway+-- Service API Reference/:+--+-- - <https://docs.aws.amazon.com/storagegateway/latest/userguide/AWSStorageGatewayAPI.html#AWSStorageGatewayHTTPRequestsHeaders Storage Gateway required request headers>:+-- Describes the required headers that you must send with every POST+-- request to Storage Gateway.+--+-- - <https://docs.aws.amazon.com/storagegateway/latest/userguide/AWSStorageGatewayAPI.html#AWSStorageGatewaySigningRequests Signing requests>:+-- Storage Gateway requires that you authenticate every request you+-- send; this topic describes how sign such a request.+--+-- - <https://docs.aws.amazon.com/storagegateway/latest/userguide/AWSStorageGatewayAPI.html#APIErrorResponses Error responses>:+-- Provides reference information about Storage Gateway errors.+--+-- - <https://docs.aws.amazon.com/storagegateway/latest/APIReference/API_Operations.html Operations in Storage Gateway>:+-- Contains detailed descriptions of all Storage Gateway operations,+-- their request parameters, response elements, possible errors, and+-- examples of requests and responses.+--+-- - <https://docs.aws.amazon.com/general/latest/gr/sg.html Storage Gateway endpoints and quotas>:+-- Provides a list of each Amazon Web Services Region and the endpoints+-- available for use with Storage Gateway.+--+-- Storage Gateway resource IDs are in uppercase. When you use these+-- resource IDs with the Amazon EC2 API, EC2 expects resource IDs in+-- lowercase. You must change your resource ID to lowercase to use it with+-- the EC2 API. For example, in Storage Gateway the ID for a volume might+-- be @vol-AA22BB012345DAF670@. When you use this ID with the EC2 API, you+-- must change it to @vol-aa22bb012345daf670@. Otherwise, the EC2 API might+-- not behave as expected.+--+-- IDs for Storage Gateway volumes and Amazon EBS snapshots created from+-- gateway volumes are changing to a longer format. Starting in December+-- 2016, all new volumes and snapshots will be created with a 17-character+-- string. Starting in April 2016, you will be able to use these longer IDs+-- so you can test your systems with the new format. For more information,+-- see+-- <http://aws.amazon.com/ec2/faqs/#longer-ids Longer EC2 and EBS resource IDs>.+--+-- For example, a volume Amazon Resource Name (ARN) with the longer volume+-- ID format looks like the following:+--+-- @arn:aws:storagegateway:us-west-2:111122223333:gateway\/sgw-12A3456B\/volume\/vol-1122AABBCCDDEEFFG@.+--+-- A snapshot ID with the longer ID format looks like the following:+-- @snap-78e226633445566ee@.+--+-- For more information, see+-- <http://forums.aws.amazon.com/ann.jspa?annID=3557 Announcement: Heads-up – Longer Storage Gateway volume and snapshot IDs coming in 2016>.+module Amazonka.StorageGateway+ ( -- * Service Configuration+ defaultService,++ -- * Errors+ -- $errors++ -- ** InternalServerError+ _InternalServerError,++ -- ** InvalidGatewayRequestException+ _InvalidGatewayRequestException,++ -- ** ServiceUnavailableError+ _ServiceUnavailableError,++ -- * Waiters+ -- $waiters++ -- * Operations+ -- $operations++ -- ** ActivateGateway+ ActivateGateway (ActivateGateway'),+ newActivateGateway,+ ActivateGatewayResponse (ActivateGatewayResponse'),+ newActivateGatewayResponse,++ -- ** AddCache+ AddCache (AddCache'),+ newAddCache,+ AddCacheResponse (AddCacheResponse'),+ newAddCacheResponse,++ -- ** AddTagsToResource+ AddTagsToResource (AddTagsToResource'),+ newAddTagsToResource,+ AddTagsToResourceResponse (AddTagsToResourceResponse'),+ newAddTagsToResourceResponse,++ -- ** AddUploadBuffer+ AddUploadBuffer (AddUploadBuffer'),+ newAddUploadBuffer,+ AddUploadBufferResponse (AddUploadBufferResponse'),+ newAddUploadBufferResponse,++ -- ** AddWorkingStorage+ AddWorkingStorage (AddWorkingStorage'),+ newAddWorkingStorage,+ AddWorkingStorageResponse (AddWorkingStorageResponse'),+ newAddWorkingStorageResponse,++ -- ** AssignTapePool+ AssignTapePool (AssignTapePool'),+ newAssignTapePool,+ AssignTapePoolResponse (AssignTapePoolResponse'),+ newAssignTapePoolResponse,++ -- ** AssociateFileSystem+ AssociateFileSystem (AssociateFileSystem'),+ newAssociateFileSystem,+ AssociateFileSystemResponse (AssociateFileSystemResponse'),+ newAssociateFileSystemResponse,++ -- ** AttachVolume+ AttachVolume (AttachVolume'),+ newAttachVolume,+ AttachVolumeResponse (AttachVolumeResponse'),+ newAttachVolumeResponse,++ -- ** CancelArchival+ CancelArchival (CancelArchival'),+ newCancelArchival,+ CancelArchivalResponse (CancelArchivalResponse'),+ newCancelArchivalResponse,++ -- ** CancelRetrieval+ CancelRetrieval (CancelRetrieval'),+ newCancelRetrieval,+ CancelRetrievalResponse (CancelRetrievalResponse'),+ newCancelRetrievalResponse,++ -- ** CreateCachediSCSIVolume+ CreateCachediSCSIVolume (CreateCachediSCSIVolume'),+ newCreateCachediSCSIVolume,+ CreateCachediSCSIVolumeResponse (CreateCachediSCSIVolumeResponse'),+ newCreateCachediSCSIVolumeResponse,++ -- ** CreateNFSFileShare+ CreateNFSFileShare (CreateNFSFileShare'),+ newCreateNFSFileShare,+ CreateNFSFileShareResponse (CreateNFSFileShareResponse'),+ newCreateNFSFileShareResponse,++ -- ** CreateSMBFileShare+ CreateSMBFileShare (CreateSMBFileShare'),+ newCreateSMBFileShare,+ CreateSMBFileShareResponse (CreateSMBFileShareResponse'),+ newCreateSMBFileShareResponse,++ -- ** CreateSnapshot+ CreateSnapshot (CreateSnapshot'),+ newCreateSnapshot,+ CreateSnapshotResponse (CreateSnapshotResponse'),+ newCreateSnapshotResponse,++ -- ** CreateSnapshotFromVolumeRecoveryPoint+ CreateSnapshotFromVolumeRecoveryPoint (CreateSnapshotFromVolumeRecoveryPoint'),+ newCreateSnapshotFromVolumeRecoveryPoint,+ CreateSnapshotFromVolumeRecoveryPointResponse (CreateSnapshotFromVolumeRecoveryPointResponse'),+ newCreateSnapshotFromVolumeRecoveryPointResponse,++ -- ** CreateStorediSCSIVolume+ CreateStorediSCSIVolume (CreateStorediSCSIVolume'),+ newCreateStorediSCSIVolume,+ CreateStorediSCSIVolumeResponse (CreateStorediSCSIVolumeResponse'),+ newCreateStorediSCSIVolumeResponse,++ -- ** CreateTapePool+ CreateTapePool (CreateTapePool'),+ newCreateTapePool,+ CreateTapePoolResponse (CreateTapePoolResponse'),+ newCreateTapePoolResponse,++ -- ** CreateTapeWithBarcode+ CreateTapeWithBarcode (CreateTapeWithBarcode'),+ newCreateTapeWithBarcode,+ CreateTapeWithBarcodeResponse (CreateTapeWithBarcodeResponse'),+ newCreateTapeWithBarcodeResponse,++ -- ** CreateTapes+ CreateTapes (CreateTapes'),+ newCreateTapes,+ CreateTapesResponse (CreateTapesResponse'),+ newCreateTapesResponse,++ -- ** DeleteAutomaticTapeCreationPolicy+ DeleteAutomaticTapeCreationPolicy (DeleteAutomaticTapeCreationPolicy'),+ newDeleteAutomaticTapeCreationPolicy,+ DeleteAutomaticTapeCreationPolicyResponse (DeleteAutomaticTapeCreationPolicyResponse'),+ newDeleteAutomaticTapeCreationPolicyResponse,++ -- ** DeleteBandwidthRateLimit+ DeleteBandwidthRateLimit (DeleteBandwidthRateLimit'),+ newDeleteBandwidthRateLimit,+ DeleteBandwidthRateLimitResponse (DeleteBandwidthRateLimitResponse'),+ newDeleteBandwidthRateLimitResponse,++ -- ** DeleteChapCredentials+ DeleteChapCredentials (DeleteChapCredentials'),+ newDeleteChapCredentials,+ DeleteChapCredentialsResponse (DeleteChapCredentialsResponse'),+ newDeleteChapCredentialsResponse,++ -- ** DeleteFileShare+ DeleteFileShare (DeleteFileShare'),+ newDeleteFileShare,+ DeleteFileShareResponse (DeleteFileShareResponse'),+ newDeleteFileShareResponse,++ -- ** DeleteGateway+ DeleteGateway (DeleteGateway'),+ newDeleteGateway,+ DeleteGatewayResponse (DeleteGatewayResponse'),+ newDeleteGatewayResponse,++ -- ** DeleteSnapshotSchedule+ DeleteSnapshotSchedule (DeleteSnapshotSchedule'),+ newDeleteSnapshotSchedule,+ DeleteSnapshotScheduleResponse (DeleteSnapshotScheduleResponse'),+ newDeleteSnapshotScheduleResponse,++ -- ** DeleteTape+ DeleteTape (DeleteTape'),+ newDeleteTape,+ DeleteTapeResponse (DeleteTapeResponse'),+ newDeleteTapeResponse,++ -- ** DeleteTapeArchive+ DeleteTapeArchive (DeleteTapeArchive'),+ newDeleteTapeArchive,+ DeleteTapeArchiveResponse (DeleteTapeArchiveResponse'),+ newDeleteTapeArchiveResponse,++ -- ** DeleteTapePool+ DeleteTapePool (DeleteTapePool'),+ newDeleteTapePool,+ DeleteTapePoolResponse (DeleteTapePoolResponse'),+ newDeleteTapePoolResponse,++ -- ** DeleteVolume+ DeleteVolume (DeleteVolume'),+ newDeleteVolume,+ DeleteVolumeResponse (DeleteVolumeResponse'),+ newDeleteVolumeResponse,++ -- ** DescribeAvailabilityMonitorTest+ DescribeAvailabilityMonitorTest (DescribeAvailabilityMonitorTest'),+ newDescribeAvailabilityMonitorTest,+ DescribeAvailabilityMonitorTestResponse (DescribeAvailabilityMonitorTestResponse'),+ newDescribeAvailabilityMonitorTestResponse,++ -- ** DescribeBandwidthRateLimit+ DescribeBandwidthRateLimit (DescribeBandwidthRateLimit'),+ newDescribeBandwidthRateLimit,+ DescribeBandwidthRateLimitResponse (DescribeBandwidthRateLimitResponse'),+ newDescribeBandwidthRateLimitResponse,++ -- ** DescribeBandwidthRateLimitSchedule+ DescribeBandwidthRateLimitSchedule (DescribeBandwidthRateLimitSchedule'),+ newDescribeBandwidthRateLimitSchedule,+ DescribeBandwidthRateLimitScheduleResponse (DescribeBandwidthRateLimitScheduleResponse'),+ newDescribeBandwidthRateLimitScheduleResponse,++ -- ** DescribeCache+ DescribeCache (DescribeCache'),+ newDescribeCache,+ DescribeCacheResponse (DescribeCacheResponse'),+ newDescribeCacheResponse,++ -- ** DescribeCachediSCSIVolumes+ DescribeCachediSCSIVolumes (DescribeCachediSCSIVolumes'),+ newDescribeCachediSCSIVolumes,+ DescribeCachediSCSIVolumesResponse (DescribeCachediSCSIVolumesResponse'),+ newDescribeCachediSCSIVolumesResponse,++ -- ** DescribeChapCredentials+ DescribeChapCredentials (DescribeChapCredentials'),+ newDescribeChapCredentials,+ DescribeChapCredentialsResponse (DescribeChapCredentialsResponse'),+ newDescribeChapCredentialsResponse,++ -- ** DescribeFileSystemAssociations+ DescribeFileSystemAssociations (DescribeFileSystemAssociations'),+ newDescribeFileSystemAssociations,+ DescribeFileSystemAssociationsResponse (DescribeFileSystemAssociationsResponse'),+ newDescribeFileSystemAssociationsResponse,++ -- ** DescribeGatewayInformation+ DescribeGatewayInformation (DescribeGatewayInformation'),+ newDescribeGatewayInformation,+ DescribeGatewayInformationResponse (DescribeGatewayInformationResponse'),+ newDescribeGatewayInformationResponse,++ -- ** DescribeMaintenanceStartTime+ DescribeMaintenanceStartTime (DescribeMaintenanceStartTime'),+ newDescribeMaintenanceStartTime,+ DescribeMaintenanceStartTimeResponse (DescribeMaintenanceStartTimeResponse'),+ newDescribeMaintenanceStartTimeResponse,++ -- ** DescribeNFSFileShares+ DescribeNFSFileShares (DescribeNFSFileShares'),+ newDescribeNFSFileShares,+ DescribeNFSFileSharesResponse (DescribeNFSFileSharesResponse'),+ newDescribeNFSFileSharesResponse,++ -- ** DescribeSMBFileShares+ DescribeSMBFileShares (DescribeSMBFileShares'),+ newDescribeSMBFileShares,+ DescribeSMBFileSharesResponse (DescribeSMBFileSharesResponse'),+ newDescribeSMBFileSharesResponse,++ -- ** DescribeSMBSettings+ DescribeSMBSettings (DescribeSMBSettings'),+ newDescribeSMBSettings,+ DescribeSMBSettingsResponse (DescribeSMBSettingsResponse'),+ newDescribeSMBSettingsResponse,++ -- ** DescribeSnapshotSchedule+ DescribeSnapshotSchedule (DescribeSnapshotSchedule'),+ newDescribeSnapshotSchedule,+ DescribeSnapshotScheduleResponse (DescribeSnapshotScheduleResponse'),+ newDescribeSnapshotScheduleResponse,++ -- ** DescribeStorediSCSIVolumes+ DescribeStorediSCSIVolumes (DescribeStorediSCSIVolumes'),+ newDescribeStorediSCSIVolumes,+ DescribeStorediSCSIVolumesResponse (DescribeStorediSCSIVolumesResponse'),+ newDescribeStorediSCSIVolumesResponse,++ -- ** DescribeTapeArchives (Paginated)+ DescribeTapeArchives (DescribeTapeArchives'),+ newDescribeTapeArchives,+ DescribeTapeArchivesResponse (DescribeTapeArchivesResponse'),+ newDescribeTapeArchivesResponse,++ -- ** DescribeTapeRecoveryPoints (Paginated)+ DescribeTapeRecoveryPoints (DescribeTapeRecoveryPoints'),+ newDescribeTapeRecoveryPoints,+ DescribeTapeRecoveryPointsResponse (DescribeTapeRecoveryPointsResponse'),+ newDescribeTapeRecoveryPointsResponse,++ -- ** DescribeTapes (Paginated)+ DescribeTapes (DescribeTapes'),+ newDescribeTapes,+ DescribeTapesResponse (DescribeTapesResponse'),+ newDescribeTapesResponse,++ -- ** DescribeUploadBuffer+ DescribeUploadBuffer (DescribeUploadBuffer'),+ newDescribeUploadBuffer,+ DescribeUploadBufferResponse (DescribeUploadBufferResponse'),+ newDescribeUploadBufferResponse,++ -- ** DescribeVTLDevices (Paginated)+ DescribeVTLDevices (DescribeVTLDevices'),+ newDescribeVTLDevices,+ DescribeVTLDevicesResponse (DescribeVTLDevicesResponse'),+ newDescribeVTLDevicesResponse,++ -- ** DescribeWorkingStorage+ DescribeWorkingStorage (DescribeWorkingStorage'),+ newDescribeWorkingStorage,+ DescribeWorkingStorageResponse (DescribeWorkingStorageResponse'),+ newDescribeWorkingStorageResponse,++ -- ** DetachVolume+ DetachVolume (DetachVolume'),+ newDetachVolume,+ DetachVolumeResponse (DetachVolumeResponse'),+ newDetachVolumeResponse,++ -- ** DisableGateway+ DisableGateway (DisableGateway'),+ newDisableGateway,+ DisableGatewayResponse (DisableGatewayResponse'),+ newDisableGatewayResponse,++ -- ** DisassociateFileSystem+ DisassociateFileSystem (DisassociateFileSystem'),+ newDisassociateFileSystem,+ DisassociateFileSystemResponse (DisassociateFileSystemResponse'),+ newDisassociateFileSystemResponse,++ -- ** JoinDomain+ JoinDomain (JoinDomain'),+ newJoinDomain,+ JoinDomainResponse (JoinDomainResponse'),+ newJoinDomainResponse,++ -- ** ListAutomaticTapeCreationPolicies+ ListAutomaticTapeCreationPolicies (ListAutomaticTapeCreationPolicies'),+ newListAutomaticTapeCreationPolicies,+ ListAutomaticTapeCreationPoliciesResponse (ListAutomaticTapeCreationPoliciesResponse'),+ newListAutomaticTapeCreationPoliciesResponse,++ -- ** ListFileShares (Paginated)+ ListFileShares (ListFileShares'),+ newListFileShares,+ ListFileSharesResponse (ListFileSharesResponse'),+ newListFileSharesResponse,++ -- ** ListFileSystemAssociations (Paginated)+ ListFileSystemAssociations (ListFileSystemAssociations'),+ newListFileSystemAssociations,+ ListFileSystemAssociationsResponse (ListFileSystemAssociationsResponse'),+ newListFileSystemAssociationsResponse,++ -- ** ListGateways (Paginated)+ ListGateways (ListGateways'),+ newListGateways,+ ListGatewaysResponse (ListGatewaysResponse'),+ newListGatewaysResponse,++ -- ** ListLocalDisks+ ListLocalDisks (ListLocalDisks'),+ newListLocalDisks,+ ListLocalDisksResponse (ListLocalDisksResponse'),+ newListLocalDisksResponse,++ -- ** ListTagsForResource (Paginated)+ ListTagsForResource (ListTagsForResource'),+ newListTagsForResource,+ ListTagsForResourceResponse (ListTagsForResourceResponse'),+ newListTagsForResourceResponse,++ -- ** ListTapePools (Paginated)+ ListTapePools (ListTapePools'),+ newListTapePools,+ ListTapePoolsResponse (ListTapePoolsResponse'),+ newListTapePoolsResponse,++ -- ** ListTapes (Paginated)+ ListTapes (ListTapes'),+ newListTapes,+ ListTapesResponse (ListTapesResponse'),+ newListTapesResponse,++ -- ** ListVolumeInitiators+ ListVolumeInitiators (ListVolumeInitiators'),+ newListVolumeInitiators,+ ListVolumeInitiatorsResponse (ListVolumeInitiatorsResponse'),+ newListVolumeInitiatorsResponse,++ -- ** ListVolumeRecoveryPoints+ ListVolumeRecoveryPoints (ListVolumeRecoveryPoints'),+ newListVolumeRecoveryPoints,+ ListVolumeRecoveryPointsResponse (ListVolumeRecoveryPointsResponse'),+ newListVolumeRecoveryPointsResponse,++ -- ** ListVolumes (Paginated)+ ListVolumes (ListVolumes'),+ newListVolumes,+ ListVolumesResponse (ListVolumesResponse'),+ newListVolumesResponse,++ -- ** NotifyWhenUploaded+ NotifyWhenUploaded (NotifyWhenUploaded'),+ newNotifyWhenUploaded,+ NotifyWhenUploadedResponse (NotifyWhenUploadedResponse'),+ newNotifyWhenUploadedResponse,++ -- ** RefreshCache+ RefreshCache (RefreshCache'),+ newRefreshCache,+ RefreshCacheResponse (RefreshCacheResponse'),+ newRefreshCacheResponse,++ -- ** RemoveTagsFromResource+ RemoveTagsFromResource (RemoveTagsFromResource'),+ newRemoveTagsFromResource,+ RemoveTagsFromResourceResponse (RemoveTagsFromResourceResponse'),+ newRemoveTagsFromResourceResponse,++ -- ** ResetCache+ ResetCache (ResetCache'),+ newResetCache,+ ResetCacheResponse (ResetCacheResponse'),+ newResetCacheResponse,++ -- ** RetrieveTapeArchive+ RetrieveTapeArchive (RetrieveTapeArchive'),+ newRetrieveTapeArchive,+ RetrieveTapeArchiveResponse (RetrieveTapeArchiveResponse'),+ newRetrieveTapeArchiveResponse,++ -- ** RetrieveTapeRecoveryPoint+ RetrieveTapeRecoveryPoint (RetrieveTapeRecoveryPoint'),+ newRetrieveTapeRecoveryPoint,+ RetrieveTapeRecoveryPointResponse (RetrieveTapeRecoveryPointResponse'),+ newRetrieveTapeRecoveryPointResponse,++ -- ** SetLocalConsolePassword+ SetLocalConsolePassword (SetLocalConsolePassword'),+ newSetLocalConsolePassword,+ SetLocalConsolePasswordResponse (SetLocalConsolePasswordResponse'),+ newSetLocalConsolePasswordResponse,++ -- ** SetSMBGuestPassword+ SetSMBGuestPassword (SetSMBGuestPassword'),+ newSetSMBGuestPassword,+ SetSMBGuestPasswordResponse (SetSMBGuestPasswordResponse'),+ newSetSMBGuestPasswordResponse,++ -- ** ShutdownGateway+ ShutdownGateway (ShutdownGateway'),+ newShutdownGateway,+ ShutdownGatewayResponse (ShutdownGatewayResponse'),+ newShutdownGatewayResponse,++ -- ** StartAvailabilityMonitorTest+ StartAvailabilityMonitorTest (StartAvailabilityMonitorTest'),+ newStartAvailabilityMonitorTest,+ StartAvailabilityMonitorTestResponse (StartAvailabilityMonitorTestResponse'),+ newStartAvailabilityMonitorTestResponse,++ -- ** StartGateway+ StartGateway (StartGateway'),+ newStartGateway,+ StartGatewayResponse (StartGatewayResponse'),+ newStartGatewayResponse,++ -- ** UpdateAutomaticTapeCreationPolicy+ UpdateAutomaticTapeCreationPolicy (UpdateAutomaticTapeCreationPolicy'),+ newUpdateAutomaticTapeCreationPolicy,+ UpdateAutomaticTapeCreationPolicyResponse (UpdateAutomaticTapeCreationPolicyResponse'),+ newUpdateAutomaticTapeCreationPolicyResponse,++ -- ** UpdateBandwidthRateLimit+ UpdateBandwidthRateLimit (UpdateBandwidthRateLimit'),+ newUpdateBandwidthRateLimit,+ UpdateBandwidthRateLimitResponse (UpdateBandwidthRateLimitResponse'),+ newUpdateBandwidthRateLimitResponse,++ -- ** UpdateBandwidthRateLimitSchedule+ UpdateBandwidthRateLimitSchedule (UpdateBandwidthRateLimitSchedule'),+ newUpdateBandwidthRateLimitSchedule,+ UpdateBandwidthRateLimitScheduleResponse (UpdateBandwidthRateLimitScheduleResponse'),+ newUpdateBandwidthRateLimitScheduleResponse,++ -- ** UpdateChapCredentials+ UpdateChapCredentials (UpdateChapCredentials'),+ newUpdateChapCredentials,+ UpdateChapCredentialsResponse (UpdateChapCredentialsResponse'),+ newUpdateChapCredentialsResponse,++ -- ** UpdateFileSystemAssociation+ UpdateFileSystemAssociation (UpdateFileSystemAssociation'),+ newUpdateFileSystemAssociation,+ UpdateFileSystemAssociationResponse (UpdateFileSystemAssociationResponse'),+ newUpdateFileSystemAssociationResponse,++ -- ** UpdateGatewayInformation+ UpdateGatewayInformation (UpdateGatewayInformation'),+ newUpdateGatewayInformation,+ UpdateGatewayInformationResponse (UpdateGatewayInformationResponse'),+ newUpdateGatewayInformationResponse,++ -- ** UpdateGatewaySoftwareNow+ UpdateGatewaySoftwareNow (UpdateGatewaySoftwareNow'),+ newUpdateGatewaySoftwareNow,+ UpdateGatewaySoftwareNowResponse (UpdateGatewaySoftwareNowResponse'),+ newUpdateGatewaySoftwareNowResponse,++ -- ** UpdateMaintenanceStartTime+ UpdateMaintenanceStartTime (UpdateMaintenanceStartTime'),+ newUpdateMaintenanceStartTime,+ UpdateMaintenanceStartTimeResponse (UpdateMaintenanceStartTimeResponse'),+ newUpdateMaintenanceStartTimeResponse,++ -- ** UpdateNFSFileShare+ UpdateNFSFileShare (UpdateNFSFileShare'),+ newUpdateNFSFileShare,+ UpdateNFSFileShareResponse (UpdateNFSFileShareResponse'),+ newUpdateNFSFileShareResponse,++ -- ** UpdateSMBFileShare+ UpdateSMBFileShare (UpdateSMBFileShare'),+ newUpdateSMBFileShare,+ UpdateSMBFileShareResponse (UpdateSMBFileShareResponse'),+ newUpdateSMBFileShareResponse,++ -- ** UpdateSMBFileShareVisibility+ UpdateSMBFileShareVisibility (UpdateSMBFileShareVisibility'),+ newUpdateSMBFileShareVisibility,+ UpdateSMBFileShareVisibilityResponse (UpdateSMBFileShareVisibilityResponse'),+ newUpdateSMBFileShareVisibilityResponse,++ -- ** UpdateSMBLocalGroups+ UpdateSMBLocalGroups (UpdateSMBLocalGroups'),+ newUpdateSMBLocalGroups,+ UpdateSMBLocalGroupsResponse (UpdateSMBLocalGroupsResponse'),+ newUpdateSMBLocalGroupsResponse,++ -- ** UpdateSMBSecurityStrategy+ UpdateSMBSecurityStrategy (UpdateSMBSecurityStrategy'),+ newUpdateSMBSecurityStrategy,+ UpdateSMBSecurityStrategyResponse (UpdateSMBSecurityStrategyResponse'),+ newUpdateSMBSecurityStrategyResponse,++ -- ** UpdateSnapshotSchedule+ UpdateSnapshotSchedule (UpdateSnapshotSchedule'),+ newUpdateSnapshotSchedule,+ UpdateSnapshotScheduleResponse (UpdateSnapshotScheduleResponse'),+ newUpdateSnapshotScheduleResponse,++ -- ** UpdateVTLDeviceType+ UpdateVTLDeviceType (UpdateVTLDeviceType'),+ newUpdateVTLDeviceType,+ UpdateVTLDeviceTypeResponse (UpdateVTLDeviceTypeResponse'),+ newUpdateVTLDeviceTypeResponse,++ -- * Types++ -- ** ActiveDirectoryStatus+ ActiveDirectoryStatus (..),++ -- ** AvailabilityMonitorTestStatus+ AvailabilityMonitorTestStatus (..),++ -- ** CaseSensitivity+ CaseSensitivity (..),++ -- ** FileShareType+ FileShareType (..),++ -- ** GatewayCapacity+ GatewayCapacity (..),++ -- ** HostEnvironment+ HostEnvironment (..),++ -- ** ObjectACL+ ObjectACL (..),++ -- ** PoolStatus+ PoolStatus (..),++ -- ** RetentionLockType+ RetentionLockType (..),++ -- ** SMBSecurityStrategy+ SMBSecurityStrategy (..),++ -- ** TapeStorageClass+ TapeStorageClass (..),++ -- ** AutomaticTapeCreationPolicyInfo+ AutomaticTapeCreationPolicyInfo (AutomaticTapeCreationPolicyInfo'),+ newAutomaticTapeCreationPolicyInfo,++ -- ** AutomaticTapeCreationRule+ AutomaticTapeCreationRule (AutomaticTapeCreationRule'),+ newAutomaticTapeCreationRule,++ -- ** BandwidthRateLimitInterval+ BandwidthRateLimitInterval (BandwidthRateLimitInterval'),+ newBandwidthRateLimitInterval,++ -- ** CacheAttributes+ CacheAttributes (CacheAttributes'),+ newCacheAttributes,++ -- ** CachediSCSIVolume+ CachediSCSIVolume (CachediSCSIVolume'),+ newCachediSCSIVolume,++ -- ** ChapInfo+ ChapInfo (ChapInfo'),+ newChapInfo,++ -- ** DeviceiSCSIAttributes+ DeviceiSCSIAttributes (DeviceiSCSIAttributes'),+ newDeviceiSCSIAttributes,++ -- ** Disk+ Disk (Disk'),+ newDisk,++ -- ** EndpointNetworkConfiguration+ EndpointNetworkConfiguration (EndpointNetworkConfiguration'),+ newEndpointNetworkConfiguration,++ -- ** FileShareInfo+ FileShareInfo (FileShareInfo'),+ newFileShareInfo,++ -- ** FileSystemAssociationInfo+ FileSystemAssociationInfo (FileSystemAssociationInfo'),+ newFileSystemAssociationInfo,++ -- ** FileSystemAssociationStatusDetail+ FileSystemAssociationStatusDetail (FileSystemAssociationStatusDetail'),+ newFileSystemAssociationStatusDetail,++ -- ** FileSystemAssociationSummary+ FileSystemAssociationSummary (FileSystemAssociationSummary'),+ newFileSystemAssociationSummary,++ -- ** GatewayInfo+ GatewayInfo (GatewayInfo'),+ newGatewayInfo,++ -- ** NFSFileShareDefaults+ NFSFileShareDefaults (NFSFileShareDefaults'),+ newNFSFileShareDefaults,++ -- ** NFSFileShareInfo+ NFSFileShareInfo (NFSFileShareInfo'),+ newNFSFileShareInfo,++ -- ** NetworkInterface+ NetworkInterface (NetworkInterface'),+ newNetworkInterface,++ -- ** PoolInfo+ PoolInfo (PoolInfo'),+ newPoolInfo,++ -- ** SMBFileShareInfo+ SMBFileShareInfo (SMBFileShareInfo'),+ newSMBFileShareInfo,++ -- ** SMBLocalGroups+ SMBLocalGroups (SMBLocalGroups'),+ newSMBLocalGroups,++ -- ** StorediSCSIVolume+ StorediSCSIVolume (StorediSCSIVolume'),+ newStorediSCSIVolume,++ -- ** Tag+ Tag (Tag'),+ newTag,++ -- ** Tape+ Tape (Tape'),+ newTape,++ -- ** TapeArchive+ TapeArchive (TapeArchive'),+ newTapeArchive,++ -- ** TapeInfo+ TapeInfo (TapeInfo'),+ newTapeInfo,++ -- ** TapeRecoveryPointInfo+ TapeRecoveryPointInfo (TapeRecoveryPointInfo'),+ newTapeRecoveryPointInfo,++ -- ** VTLDevice+ VTLDevice (VTLDevice'),+ newVTLDevice,++ -- ** VolumeInfo+ VolumeInfo (VolumeInfo'),+ newVolumeInfo,++ -- ** VolumeRecoveryPointInfo+ VolumeRecoveryPointInfo (VolumeRecoveryPointInfo'),+ newVolumeRecoveryPointInfo,++ -- ** VolumeiSCSIAttributes+ VolumeiSCSIAttributes (VolumeiSCSIAttributes'),+ newVolumeiSCSIAttributes,+ )+where++import Amazonka.StorageGateway.ActivateGateway+import Amazonka.StorageGateway.AddCache+import Amazonka.StorageGateway.AddTagsToResource+import Amazonka.StorageGateway.AddUploadBuffer+import Amazonka.StorageGateway.AddWorkingStorage+import Amazonka.StorageGateway.AssignTapePool+import Amazonka.StorageGateway.AssociateFileSystem+import Amazonka.StorageGateway.AttachVolume+import Amazonka.StorageGateway.CancelArchival+import Amazonka.StorageGateway.CancelRetrieval+import Amazonka.StorageGateway.CreateCachediSCSIVolume+import Amazonka.StorageGateway.CreateNFSFileShare+import Amazonka.StorageGateway.CreateSMBFileShare+import Amazonka.StorageGateway.CreateSnapshot+import Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint+import Amazonka.StorageGateway.CreateStorediSCSIVolume+import Amazonka.StorageGateway.CreateTapePool+import Amazonka.StorageGateway.CreateTapeWithBarcode+import Amazonka.StorageGateway.CreateTapes+import Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy+import Amazonka.StorageGateway.DeleteBandwidthRateLimit+import Amazonka.StorageGateway.DeleteChapCredentials+import Amazonka.StorageGateway.DeleteFileShare+import Amazonka.StorageGateway.DeleteGateway+import Amazonka.StorageGateway.DeleteSnapshotSchedule+import Amazonka.StorageGateway.DeleteTape+import Amazonka.StorageGateway.DeleteTapeArchive+import Amazonka.StorageGateway.DeleteTapePool+import Amazonka.StorageGateway.DeleteVolume+import Amazonka.StorageGateway.DescribeAvailabilityMonitorTest+import Amazonka.StorageGateway.DescribeBandwidthRateLimit+import Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule+import Amazonka.StorageGateway.DescribeCache+import Amazonka.StorageGateway.DescribeCachediSCSIVolumes+import Amazonka.StorageGateway.DescribeChapCredentials+import Amazonka.StorageGateway.DescribeFileSystemAssociations+import Amazonka.StorageGateway.DescribeGatewayInformation+import Amazonka.StorageGateway.DescribeMaintenanceStartTime+import Amazonka.StorageGateway.DescribeNFSFileShares+import Amazonka.StorageGateway.DescribeSMBFileShares+import Amazonka.StorageGateway.DescribeSMBSettings+import Amazonka.StorageGateway.DescribeSnapshotSchedule+import Amazonka.StorageGateway.DescribeStorediSCSIVolumes+import Amazonka.StorageGateway.DescribeTapeArchives+import Amazonka.StorageGateway.DescribeTapeRecoveryPoints+import Amazonka.StorageGateway.DescribeTapes+import Amazonka.StorageGateway.DescribeUploadBuffer+import Amazonka.StorageGateway.DescribeVTLDevices+import Amazonka.StorageGateway.DescribeWorkingStorage+import Amazonka.StorageGateway.DetachVolume+import Amazonka.StorageGateway.DisableGateway+import Amazonka.StorageGateway.DisassociateFileSystem+import Amazonka.StorageGateway.JoinDomain+import Amazonka.StorageGateway.Lens+import Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies+import Amazonka.StorageGateway.ListFileShares+import Amazonka.StorageGateway.ListFileSystemAssociations+import Amazonka.StorageGateway.ListGateways+import Amazonka.StorageGateway.ListLocalDisks+import Amazonka.StorageGateway.ListTagsForResource+import Amazonka.StorageGateway.ListTapePools+import Amazonka.StorageGateway.ListTapes+import Amazonka.StorageGateway.ListVolumeInitiators+import Amazonka.StorageGateway.ListVolumeRecoveryPoints+import Amazonka.StorageGateway.ListVolumes+import Amazonka.StorageGateway.NotifyWhenUploaded+import Amazonka.StorageGateway.RefreshCache+import Amazonka.StorageGateway.RemoveTagsFromResource+import Amazonka.StorageGateway.ResetCache+import Amazonka.StorageGateway.RetrieveTapeArchive+import Amazonka.StorageGateway.RetrieveTapeRecoveryPoint+import Amazonka.StorageGateway.SetLocalConsolePassword+import Amazonka.StorageGateway.SetSMBGuestPassword+import Amazonka.StorageGateway.ShutdownGateway+import Amazonka.StorageGateway.StartAvailabilityMonitorTest+import Amazonka.StorageGateway.StartGateway+import Amazonka.StorageGateway.Types+import Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy+import Amazonka.StorageGateway.UpdateBandwidthRateLimit+import Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule+import Amazonka.StorageGateway.UpdateChapCredentials+import Amazonka.StorageGateway.UpdateFileSystemAssociation+import Amazonka.StorageGateway.UpdateGatewayInformation+import Amazonka.StorageGateway.UpdateGatewaySoftwareNow+import Amazonka.StorageGateway.UpdateMaintenanceStartTime+import Amazonka.StorageGateway.UpdateNFSFileShare+import Amazonka.StorageGateway.UpdateSMBFileShare+import Amazonka.StorageGateway.UpdateSMBFileShareVisibility+import Amazonka.StorageGateway.UpdateSMBLocalGroups+import Amazonka.StorageGateway.UpdateSMBSecurityStrategy+import Amazonka.StorageGateway.UpdateSnapshotSchedule+import Amazonka.StorageGateway.UpdateVTLDeviceType+import Amazonka.StorageGateway.Waiters++-- $errors+-- Error matchers are designed for use with the functions provided by+-- <http://hackage.haskell.org/package/lens/docs/Control-Exception-Lens.html Control.Exception.Lens>.+-- This allows catching (and rethrowing) service specific errors returned+-- by 'StorageGateway'.++-- $operations+-- Some AWS operations return results that are incomplete and require subsequent+-- requests in order to obtain the entire result set. The process of sending+-- subsequent requests to continue where a previous request left off is called+-- pagination. For example, the 'ListObjects' operation of Amazon S3 returns up to+-- 1000 objects at a time, and you must send subsequent requests with the+-- appropriate Marker in order to retrieve the next page of results.+--+-- Operations that have an 'AWSPager' instance can transparently perform subsequent+-- requests, correctly setting Markers and other request facets to iterate through+-- the entire result set of a truncated API operation. Operations which support+-- this have an additional note in the documentation.+--+-- Many operations have the ability to filter results on the server side. See the+-- individual operation parameters for details.++-- $waiters+-- Waiters poll by repeatedly sending a request until some remote success condition+-- configured by the 'Wait' specification is fulfilled. The 'Wait' specification+-- determines how many attempts should be made, in addition to delay and retry strategies.
+ gen/Amazonka/StorageGateway/ActivateGateway.hs view
@@ -0,0 +1,442 @@+{-# 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.ActivateGateway+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Activates the gateway you previously deployed on your host. In the+-- activation process, you specify information such as the Amazon Web+-- Services Region that you want to use for storing snapshots or tapes, the+-- time zone for scheduled snapshots the gateway snapshot schedule window,+-- an activation key, and a name for your gateway. The activation process+-- also associates your gateway with your account. For more information,+-- see UpdateGatewayInformation.+--+-- You must turn on the gateway VM before you can activate your gateway.+module Amazonka.StorageGateway.ActivateGateway+ ( -- * Creating a Request+ ActivateGateway (..),+ newActivateGateway,++ -- * Request Lenses+ activateGateway_gatewayType,+ activateGateway_mediumChangerType,+ activateGateway_tags,+ activateGateway_tapeDriveType,+ activateGateway_activationKey,+ activateGateway_gatewayName,+ activateGateway_gatewayTimezone,+ activateGateway_gatewayRegion,++ -- * Destructuring the Response+ ActivateGatewayResponse (..),+ newActivateGatewayResponse,++ -- * Response Lenses+ activateGatewayResponse_gatewayARN,+ activateGatewayResponse_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++-- | A JSON object containing one or more of the following fields:+--+-- - ActivateGatewayInput$ActivationKey+--+-- - ActivateGatewayInput$GatewayName+--+-- - ActivateGatewayInput$GatewayRegion+--+-- - ActivateGatewayInput$GatewayTimezone+--+-- - ActivateGatewayInput$GatewayType+--+-- - ActivateGatewayInput$MediumChangerType+--+-- - ActivateGatewayInput$TapeDriveType+--+-- /See:/ 'newActivateGateway' smart constructor.+data ActivateGateway = ActivateGateway'+ { -- | A value that defines the type of gateway to activate. The type specified+ -- is critical to all later functions of the gateway and cannot be changed+ -- after activation. The default value is @CACHED@.+ --+ -- Valid Values: @STORED@ | @CACHED@ | @VTL@ | @VTL_SNOW@ | @FILE_S3@ |+ -- @FILE_FSX_SMB@+ gatewayType :: Prelude.Maybe Prelude.Text,+ -- | The value that indicates the type of medium changer to use for tape+ -- gateway. This field is optional.+ --+ -- Valid Values: @STK-L700@ | @AWS-Gateway-VTL@ | @IBM-03584L32-0402@+ mediumChangerType :: Prelude.Maybe Prelude.Text,+ -- | A list of up to 50 tags that you can assign to the gateway. Each tag is+ -- a key-value pair.+ --+ -- Valid characters for key and value are letters, spaces, and numbers that+ -- can be represented in UTF-8 format, and the following special+ -- characters: + - = . _ : \/ \@. The maximum length of a tag\'s key is 128+ -- characters, and the maximum length for a tag\'s value is 256 characters.+ tags :: Prelude.Maybe [Tag],+ -- | The value that indicates the type of tape drive to use for tape gateway.+ -- This field is optional.+ --+ -- Valid Values: @IBM-ULT3580-TD5@+ tapeDriveType :: Prelude.Maybe Prelude.Text,+ -- | Your gateway activation key. You can obtain the activation key by+ -- sending an HTTP GET request with redirects enabled to the gateway IP+ -- address (port 80). The redirect URL returned in the response provides+ -- you the activation key for your gateway in the query string parameter+ -- @activationKey@. It may also include other activation-related+ -- parameters, however, these are merely defaults -- the arguments you pass+ -- to the @ActivateGateway@ API call determine the actual configuration of+ -- your gateway.+ --+ -- For more information, see+ -- <https://docs.aws.amazon.com/storagegateway/latest/userguide/get-activation-key.html Getting activation key>+ -- in the /Storage Gateway User Guide/.+ activationKey :: Prelude.Text,+ -- | The name you configured for your gateway.+ gatewayName :: Prelude.Text,+ -- | A value that indicates the time zone you want to set for the gateway.+ -- The time zone is of the format \"GMT-hr:mm\" or \"GMT+hr:mm\". For+ -- example, GMT-4:00 indicates the time is 4 hours behind GMT. GMT+2:00+ -- indicates the time is 2 hours ahead of GMT. The time zone is used, for+ -- example, for scheduling snapshots and your gateway\'s maintenance+ -- schedule.+ gatewayTimezone :: Prelude.Text,+ -- | A value that indicates the Amazon Web Services Region where you want to+ -- store your data. The gateway Amazon Web Services Region specified must+ -- be the same Amazon Web Services Region as the Amazon Web Services Region+ -- in your @Host@ header in the request. For more information about+ -- available Amazon Web Services Regions and endpoints for Storage Gateway,+ -- see+ -- <https://docs.aws.amazon.com/general/latest/gr/sg.html Storage Gateway endpoints and quotas>+ -- in the /Amazon Web Services General Reference/.+ --+ -- Valid Values: See+ -- <https://docs.aws.amazon.com/general/latest/gr/sg.html Storage Gateway endpoints and quotas>+ -- in the /Amazon Web Services General Reference/.+ gatewayRegion :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'ActivateGateway' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayType', 'activateGateway_gatewayType' - A value that defines the type of gateway to activate. The type specified+-- is critical to all later functions of the gateway and cannot be changed+-- after activation. The default value is @CACHED@.+--+-- Valid Values: @STORED@ | @CACHED@ | @VTL@ | @VTL_SNOW@ | @FILE_S3@ |+-- @FILE_FSX_SMB@+--+-- 'mediumChangerType', 'activateGateway_mediumChangerType' - The value that indicates the type of medium changer to use for tape+-- gateway. This field is optional.+--+-- Valid Values: @STK-L700@ | @AWS-Gateway-VTL@ | @IBM-03584L32-0402@+--+-- 'tags', 'activateGateway_tags' - A list of up to 50 tags that you can assign to the gateway. Each tag is+-- a key-value pair.+--+-- Valid characters for key and value are letters, spaces, and numbers that+-- can be represented in UTF-8 format, and the following special+-- characters: + - = . _ : \/ \@. The maximum length of a tag\'s key is 128+-- characters, and the maximum length for a tag\'s value is 256 characters.+--+-- 'tapeDriveType', 'activateGateway_tapeDriveType' - The value that indicates the type of tape drive to use for tape gateway.+-- This field is optional.+--+-- Valid Values: @IBM-ULT3580-TD5@+--+-- 'activationKey', 'activateGateway_activationKey' - Your gateway activation key. You can obtain the activation key by+-- sending an HTTP GET request with redirects enabled to the gateway IP+-- address (port 80). The redirect URL returned in the response provides+-- you the activation key for your gateway in the query string parameter+-- @activationKey@. It may also include other activation-related+-- parameters, however, these are merely defaults -- the arguments you pass+-- to the @ActivateGateway@ API call determine the actual configuration of+-- your gateway.+--+-- For more information, see+-- <https://docs.aws.amazon.com/storagegateway/latest/userguide/get-activation-key.html Getting activation key>+-- in the /Storage Gateway User Guide/.+--+-- 'gatewayName', 'activateGateway_gatewayName' - The name you configured for your gateway.+--+-- 'gatewayTimezone', 'activateGateway_gatewayTimezone' - A value that indicates the time zone you want to set for the gateway.+-- The time zone is of the format \"GMT-hr:mm\" or \"GMT+hr:mm\". For+-- example, GMT-4:00 indicates the time is 4 hours behind GMT. GMT+2:00+-- indicates the time is 2 hours ahead of GMT. The time zone is used, for+-- example, for scheduling snapshots and your gateway\'s maintenance+-- schedule.+--+-- 'gatewayRegion', 'activateGateway_gatewayRegion' - A value that indicates the Amazon Web Services Region where you want to+-- store your data. The gateway Amazon Web Services Region specified must+-- be the same Amazon Web Services Region as the Amazon Web Services Region+-- in your @Host@ header in the request. For more information about+-- available Amazon Web Services Regions and endpoints for Storage Gateway,+-- see+-- <https://docs.aws.amazon.com/general/latest/gr/sg.html Storage Gateway endpoints and quotas>+-- in the /Amazon Web Services General Reference/.+--+-- Valid Values: See+-- <https://docs.aws.amazon.com/general/latest/gr/sg.html Storage Gateway endpoints and quotas>+-- in the /Amazon Web Services General Reference/.+newActivateGateway ::+ -- | 'activationKey'+ Prelude.Text ->+ -- | 'gatewayName'+ Prelude.Text ->+ -- | 'gatewayTimezone'+ Prelude.Text ->+ -- | 'gatewayRegion'+ Prelude.Text ->+ ActivateGateway+newActivateGateway+ pActivationKey_+ pGatewayName_+ pGatewayTimezone_+ pGatewayRegion_ =+ ActivateGateway'+ { gatewayType = Prelude.Nothing,+ mediumChangerType = Prelude.Nothing,+ tags = Prelude.Nothing,+ tapeDriveType = Prelude.Nothing,+ activationKey = pActivationKey_,+ gatewayName = pGatewayName_,+ gatewayTimezone = pGatewayTimezone_,+ gatewayRegion = pGatewayRegion_+ }++-- | A value that defines the type of gateway to activate. The type specified+-- is critical to all later functions of the gateway and cannot be changed+-- after activation. The default value is @CACHED@.+--+-- Valid Values: @STORED@ | @CACHED@ | @VTL@ | @VTL_SNOW@ | @FILE_S3@ |+-- @FILE_FSX_SMB@+activateGateway_gatewayType :: Lens.Lens' ActivateGateway (Prelude.Maybe Prelude.Text)+activateGateway_gatewayType = Lens.lens (\ActivateGateway' {gatewayType} -> gatewayType) (\s@ActivateGateway' {} a -> s {gatewayType = a} :: ActivateGateway)++-- | The value that indicates the type of medium changer to use for tape+-- gateway. This field is optional.+--+-- Valid Values: @STK-L700@ | @AWS-Gateway-VTL@ | @IBM-03584L32-0402@+activateGateway_mediumChangerType :: Lens.Lens' ActivateGateway (Prelude.Maybe Prelude.Text)+activateGateway_mediumChangerType = Lens.lens (\ActivateGateway' {mediumChangerType} -> mediumChangerType) (\s@ActivateGateway' {} a -> s {mediumChangerType = a} :: ActivateGateway)++-- | A list of up to 50 tags that you can assign to the gateway. Each tag is+-- a key-value pair.+--+-- Valid characters for key and value are letters, spaces, and numbers that+-- can be represented in UTF-8 format, and the following special+-- characters: + - = . _ : \/ \@. The maximum length of a tag\'s key is 128+-- characters, and the maximum length for a tag\'s value is 256 characters.+activateGateway_tags :: Lens.Lens' ActivateGateway (Prelude.Maybe [Tag])+activateGateway_tags = Lens.lens (\ActivateGateway' {tags} -> tags) (\s@ActivateGateway' {} a -> s {tags = a} :: ActivateGateway) Prelude.. Lens.mapping Lens.coerced++-- | The value that indicates the type of tape drive to use for tape gateway.+-- This field is optional.+--+-- Valid Values: @IBM-ULT3580-TD5@+activateGateway_tapeDriveType :: Lens.Lens' ActivateGateway (Prelude.Maybe Prelude.Text)+activateGateway_tapeDriveType = Lens.lens (\ActivateGateway' {tapeDriveType} -> tapeDriveType) (\s@ActivateGateway' {} a -> s {tapeDriveType = a} :: ActivateGateway)++-- | Your gateway activation key. You can obtain the activation key by+-- sending an HTTP GET request with redirects enabled to the gateway IP+-- address (port 80). The redirect URL returned in the response provides+-- you the activation key for your gateway in the query string parameter+-- @activationKey@. It may also include other activation-related+-- parameters, however, these are merely defaults -- the arguments you pass+-- to the @ActivateGateway@ API call determine the actual configuration of+-- your gateway.+--+-- For more information, see+-- <https://docs.aws.amazon.com/storagegateway/latest/userguide/get-activation-key.html Getting activation key>+-- in the /Storage Gateway User Guide/.+activateGateway_activationKey :: Lens.Lens' ActivateGateway Prelude.Text+activateGateway_activationKey = Lens.lens (\ActivateGateway' {activationKey} -> activationKey) (\s@ActivateGateway' {} a -> s {activationKey = a} :: ActivateGateway)++-- | The name you configured for your gateway.+activateGateway_gatewayName :: Lens.Lens' ActivateGateway Prelude.Text+activateGateway_gatewayName = Lens.lens (\ActivateGateway' {gatewayName} -> gatewayName) (\s@ActivateGateway' {} a -> s {gatewayName = a} :: ActivateGateway)++-- | A value that indicates the time zone you want to set for the gateway.+-- The time zone is of the format \"GMT-hr:mm\" or \"GMT+hr:mm\". For+-- example, GMT-4:00 indicates the time is 4 hours behind GMT. GMT+2:00+-- indicates the time is 2 hours ahead of GMT. The time zone is used, for+-- example, for scheduling snapshots and your gateway\'s maintenance+-- schedule.+activateGateway_gatewayTimezone :: Lens.Lens' ActivateGateway Prelude.Text+activateGateway_gatewayTimezone = Lens.lens (\ActivateGateway' {gatewayTimezone} -> gatewayTimezone) (\s@ActivateGateway' {} a -> s {gatewayTimezone = a} :: ActivateGateway)++-- | A value that indicates the Amazon Web Services Region where you want to+-- store your data. The gateway Amazon Web Services Region specified must+-- be the same Amazon Web Services Region as the Amazon Web Services Region+-- in your @Host@ header in the request. For more information about+-- available Amazon Web Services Regions and endpoints for Storage Gateway,+-- see+-- <https://docs.aws.amazon.com/general/latest/gr/sg.html Storage Gateway endpoints and quotas>+-- in the /Amazon Web Services General Reference/.+--+-- Valid Values: See+-- <https://docs.aws.amazon.com/general/latest/gr/sg.html Storage Gateway endpoints and quotas>+-- in the /Amazon Web Services General Reference/.+activateGateway_gatewayRegion :: Lens.Lens' ActivateGateway Prelude.Text+activateGateway_gatewayRegion = Lens.lens (\ActivateGateway' {gatewayRegion} -> gatewayRegion) (\s@ActivateGateway' {} a -> s {gatewayRegion = a} :: ActivateGateway)++instance Core.AWSRequest ActivateGateway where+ type+ AWSResponse ActivateGateway =+ ActivateGatewayResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ ActivateGatewayResponse'+ Prelude.<$> (x Data..?> "GatewayARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable ActivateGateway where+ hashWithSalt _salt ActivateGateway' {..} =+ _salt+ `Prelude.hashWithSalt` gatewayType+ `Prelude.hashWithSalt` mediumChangerType+ `Prelude.hashWithSalt` tags+ `Prelude.hashWithSalt` tapeDriveType+ `Prelude.hashWithSalt` activationKey+ `Prelude.hashWithSalt` gatewayName+ `Prelude.hashWithSalt` gatewayTimezone+ `Prelude.hashWithSalt` gatewayRegion++instance Prelude.NFData ActivateGateway where+ rnf ActivateGateway' {..} =+ Prelude.rnf gatewayType+ `Prelude.seq` Prelude.rnf mediumChangerType+ `Prelude.seq` Prelude.rnf tags+ `Prelude.seq` Prelude.rnf tapeDriveType+ `Prelude.seq` Prelude.rnf activationKey+ `Prelude.seq` Prelude.rnf gatewayName+ `Prelude.seq` Prelude.rnf gatewayTimezone+ `Prelude.seq` Prelude.rnf gatewayRegion++instance Data.ToHeaders ActivateGateway where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.ActivateGateway" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON ActivateGateway where+ toJSON ActivateGateway' {..} =+ Data.object+ ( Prelude.catMaybes+ [ ("GatewayType" Data..=) Prelude.<$> gatewayType,+ ("MediumChangerType" Data..=)+ Prelude.<$> mediumChangerType,+ ("Tags" Data..=) Prelude.<$> tags,+ ("TapeDriveType" Data..=) Prelude.<$> tapeDriveType,+ Prelude.Just ("ActivationKey" Data..= activationKey),+ Prelude.Just ("GatewayName" Data..= gatewayName),+ Prelude.Just+ ("GatewayTimezone" Data..= gatewayTimezone),+ Prelude.Just+ ("GatewayRegion" Data..= gatewayRegion)+ ]+ )++instance Data.ToPath ActivateGateway where+ toPath = Prelude.const "/"++instance Data.ToQuery ActivateGateway where+ toQuery = Prelude.const Prelude.mempty++-- | Storage Gateway returns the Amazon Resource Name (ARN) of the activated+-- gateway. It is a string made of information such as your account,+-- gateway name, and Amazon Web Services Region. This ARN is used to+-- reference the gateway in other API operations as well as resource-based+-- authorization.+--+-- For gateways activated prior to September 02, 2015, the gateway ARN+-- contains the gateway name rather than the gateway ID. Changing the name+-- of the gateway has no effect on the gateway ARN.+--+-- /See:/ 'newActivateGatewayResponse' smart constructor.+data ActivateGatewayResponse = ActivateGatewayResponse'+ { gatewayARN :: 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 'ActivateGatewayResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'activateGatewayResponse_gatewayARN' - Undocumented member.+--+-- 'httpStatus', 'activateGatewayResponse_httpStatus' - The response's http status code.+newActivateGatewayResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ ActivateGatewayResponse+newActivateGatewayResponse pHttpStatus_ =+ ActivateGatewayResponse'+ { gatewayARN =+ Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | Undocumented member.+activateGatewayResponse_gatewayARN :: Lens.Lens' ActivateGatewayResponse (Prelude.Maybe Prelude.Text)+activateGatewayResponse_gatewayARN = Lens.lens (\ActivateGatewayResponse' {gatewayARN} -> gatewayARN) (\s@ActivateGatewayResponse' {} a -> s {gatewayARN = a} :: ActivateGatewayResponse)++-- | The response's http status code.+activateGatewayResponse_httpStatus :: Lens.Lens' ActivateGatewayResponse Prelude.Int+activateGatewayResponse_httpStatus = Lens.lens (\ActivateGatewayResponse' {httpStatus} -> httpStatus) (\s@ActivateGatewayResponse' {} a -> s {httpStatus = a} :: ActivateGatewayResponse)++instance Prelude.NFData ActivateGatewayResponse where+ rnf ActivateGatewayResponse' {..} =+ Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/AddCache.hs view
@@ -0,0 +1,194 @@+{-# 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.AddCache+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Configures one or more gateway local disks as cache for a gateway. This+-- operation is only supported in the cached volume, tape, and file gateway+-- type (see+-- <https://docs.aws.amazon.com/storagegateway/latest/userguide/StorageGatewayConcepts.html How Storage Gateway works (architecture)>.+--+-- In the request, you specify the gateway Amazon Resource Name (ARN) to+-- which you want to add cache, and one or more disk IDs that you want to+-- configure as cache.+module Amazonka.StorageGateway.AddCache+ ( -- * Creating a Request+ AddCache (..),+ newAddCache,++ -- * Request Lenses+ addCache_gatewayARN,+ addCache_diskIds,++ -- * Destructuring the Response+ AddCacheResponse (..),+ newAddCacheResponse,++ -- * Response Lenses+ addCacheResponse_gatewayARN,+ addCacheResponse_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++-- | /See:/ 'newAddCache' smart constructor.+data AddCache = AddCache'+ { gatewayARN :: Prelude.Text,+ -- | An array of strings that identify disks that are to be configured as+ -- working storage. Each string has a minimum length of 1 and maximum+ -- length of 300. You can get the disk IDs from the ListLocalDisks API.+ diskIds :: [Prelude.Text]+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'AddCache' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'addCache_gatewayARN' - Undocumented member.+--+-- 'diskIds', 'addCache_diskIds' - An array of strings that identify disks that are to be configured as+-- working storage. Each string has a minimum length of 1 and maximum+-- length of 300. You can get the disk IDs from the ListLocalDisks API.+newAddCache ::+ -- | 'gatewayARN'+ Prelude.Text ->+ AddCache+newAddCache pGatewayARN_ =+ AddCache'+ { gatewayARN = pGatewayARN_,+ diskIds = Prelude.mempty+ }++-- | Undocumented member.+addCache_gatewayARN :: Lens.Lens' AddCache Prelude.Text+addCache_gatewayARN = Lens.lens (\AddCache' {gatewayARN} -> gatewayARN) (\s@AddCache' {} a -> s {gatewayARN = a} :: AddCache)++-- | An array of strings that identify disks that are to be configured as+-- working storage. Each string has a minimum length of 1 and maximum+-- length of 300. You can get the disk IDs from the ListLocalDisks API.+addCache_diskIds :: Lens.Lens' AddCache [Prelude.Text]+addCache_diskIds = Lens.lens (\AddCache' {diskIds} -> diskIds) (\s@AddCache' {} a -> s {diskIds = a} :: AddCache) Prelude.. Lens.coerced++instance Core.AWSRequest AddCache where+ type AWSResponse AddCache = AddCacheResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ AddCacheResponse'+ Prelude.<$> (x Data..?> "GatewayARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable AddCache where+ hashWithSalt _salt AddCache' {..} =+ _salt+ `Prelude.hashWithSalt` gatewayARN+ `Prelude.hashWithSalt` diskIds++instance Prelude.NFData AddCache where+ rnf AddCache' {..} =+ Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf diskIds++instance Data.ToHeaders AddCache where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.AddCache" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON AddCache where+ toJSON AddCache' {..} =+ Data.object+ ( Prelude.catMaybes+ [ Prelude.Just ("GatewayARN" Data..= gatewayARN),+ Prelude.Just ("DiskIds" Data..= diskIds)+ ]+ )++instance Data.ToPath AddCache where+ toPath = Prelude.const "/"++instance Data.ToQuery AddCache where+ toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newAddCacheResponse' smart constructor.+data AddCacheResponse = AddCacheResponse'+ { gatewayARN :: 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 'AddCacheResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'addCacheResponse_gatewayARN' - Undocumented member.+--+-- 'httpStatus', 'addCacheResponse_httpStatus' - The response's http status code.+newAddCacheResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ AddCacheResponse+newAddCacheResponse pHttpStatus_ =+ AddCacheResponse'+ { gatewayARN = Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | Undocumented member.+addCacheResponse_gatewayARN :: Lens.Lens' AddCacheResponse (Prelude.Maybe Prelude.Text)+addCacheResponse_gatewayARN = Lens.lens (\AddCacheResponse' {gatewayARN} -> gatewayARN) (\s@AddCacheResponse' {} a -> s {gatewayARN = a} :: AddCacheResponse)++-- | The response's http status code.+addCacheResponse_httpStatus :: Lens.Lens' AddCacheResponse Prelude.Int+addCacheResponse_httpStatus = Lens.lens (\AddCacheResponse' {httpStatus} -> httpStatus) (\s@AddCacheResponse' {} a -> s {httpStatus = a} :: AddCacheResponse)++instance Prelude.NFData AddCacheResponse where+ rnf AddCacheResponse' {..} =+ Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/AddTagsToResource.hs view
@@ -0,0 +1,225 @@+{-# 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.AddTagsToResource+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Adds one or more tags to the specified resource. You use tags to add+-- metadata to resources, which you can use to categorize these resources.+-- For example, you can categorize resources by purpose, owner,+-- environment, or team. Each tag consists of a key and a value, which you+-- define. You can add tags to the following Storage Gateway resources:+--+-- - Storage gateways of all types+--+-- - Storage volumes+--+-- - Virtual tapes+--+-- - NFS and SMB file shares+--+-- - File System associations+--+-- You can create a maximum of 50 tags for each resource. Virtual tapes and+-- storage volumes that are recovered to a new gateway maintain their tags.+module Amazonka.StorageGateway.AddTagsToResource+ ( -- * Creating a Request+ AddTagsToResource (..),+ newAddTagsToResource,++ -- * Request Lenses+ addTagsToResource_resourceARN,+ addTagsToResource_tags,++ -- * Destructuring the Response+ AddTagsToResourceResponse (..),+ newAddTagsToResourceResponse,++ -- * Response Lenses+ addTagsToResourceResponse_resourceARN,+ addTagsToResourceResponse_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++-- | AddTagsToResourceInput+--+-- /See:/ 'newAddTagsToResource' smart constructor.+data AddTagsToResource = AddTagsToResource'+ { -- | The Amazon Resource Name (ARN) of the resource you want to add tags to.+ resourceARN :: Prelude.Text,+ -- | The key-value pair that represents the tag you want to add to the+ -- resource. The value can be an empty string.+ --+ -- Valid characters for key and value are letters, spaces, and numbers+ -- representable in UTF-8 format, and the following special characters: + -+ -- = . _ : \/ \@. The maximum length of a tag\'s key is 128 characters, and+ -- the maximum length for a tag\'s value is 256.+ tags :: [Tag]+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'AddTagsToResource' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'resourceARN', 'addTagsToResource_resourceARN' - The Amazon Resource Name (ARN) of the resource you want to add tags to.+--+-- 'tags', 'addTagsToResource_tags' - The key-value pair that represents the tag you want to add to the+-- resource. The value can be an empty string.+--+-- Valid characters for key and value are letters, spaces, and numbers+-- representable in UTF-8 format, and the following special characters: + -+-- = . _ : \/ \@. The maximum length of a tag\'s key is 128 characters, and+-- the maximum length for a tag\'s value is 256.+newAddTagsToResource ::+ -- | 'resourceARN'+ Prelude.Text ->+ AddTagsToResource+newAddTagsToResource pResourceARN_ =+ AddTagsToResource'+ { resourceARN = pResourceARN_,+ tags = Prelude.mempty+ }++-- | The Amazon Resource Name (ARN) of the resource you want to add tags to.+addTagsToResource_resourceARN :: Lens.Lens' AddTagsToResource Prelude.Text+addTagsToResource_resourceARN = Lens.lens (\AddTagsToResource' {resourceARN} -> resourceARN) (\s@AddTagsToResource' {} a -> s {resourceARN = a} :: AddTagsToResource)++-- | The key-value pair that represents the tag you want to add to the+-- resource. The value can be an empty string.+--+-- Valid characters for key and value are letters, spaces, and numbers+-- representable in UTF-8 format, and the following special characters: + -+-- = . _ : \/ \@. The maximum length of a tag\'s key is 128 characters, and+-- the maximum length for a tag\'s value is 256.+addTagsToResource_tags :: Lens.Lens' AddTagsToResource [Tag]+addTagsToResource_tags = Lens.lens (\AddTagsToResource' {tags} -> tags) (\s@AddTagsToResource' {} a -> s {tags = a} :: AddTagsToResource) Prelude.. Lens.coerced++instance Core.AWSRequest AddTagsToResource where+ type+ AWSResponse AddTagsToResource =+ AddTagsToResourceResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ AddTagsToResourceResponse'+ Prelude.<$> (x Data..?> "ResourceARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable AddTagsToResource where+ hashWithSalt _salt AddTagsToResource' {..} =+ _salt+ `Prelude.hashWithSalt` resourceARN+ `Prelude.hashWithSalt` tags++instance Prelude.NFData AddTagsToResource where+ rnf AddTagsToResource' {..} =+ Prelude.rnf resourceARN+ `Prelude.seq` Prelude.rnf tags++instance Data.ToHeaders AddTagsToResource where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.AddTagsToResource" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON AddTagsToResource where+ toJSON AddTagsToResource' {..} =+ Data.object+ ( Prelude.catMaybes+ [ Prelude.Just ("ResourceARN" Data..= resourceARN),+ Prelude.Just ("Tags" Data..= tags)+ ]+ )++instance Data.ToPath AddTagsToResource where+ toPath = Prelude.const "/"++instance Data.ToQuery AddTagsToResource where+ toQuery = Prelude.const Prelude.mempty++-- | AddTagsToResourceOutput+--+-- /See:/ 'newAddTagsToResourceResponse' smart constructor.+data AddTagsToResourceResponse = AddTagsToResourceResponse'+ { -- | The Amazon Resource Name (ARN) of the resource you want to add tags to.+ resourceARN :: 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 'AddTagsToResourceResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'resourceARN', 'addTagsToResourceResponse_resourceARN' - The Amazon Resource Name (ARN) of the resource you want to add tags to.+--+-- 'httpStatus', 'addTagsToResourceResponse_httpStatus' - The response's http status code.+newAddTagsToResourceResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ AddTagsToResourceResponse+newAddTagsToResourceResponse pHttpStatus_ =+ AddTagsToResourceResponse'+ { resourceARN =+ Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | The Amazon Resource Name (ARN) of the resource you want to add tags to.+addTagsToResourceResponse_resourceARN :: Lens.Lens' AddTagsToResourceResponse (Prelude.Maybe Prelude.Text)+addTagsToResourceResponse_resourceARN = Lens.lens (\AddTagsToResourceResponse' {resourceARN} -> resourceARN) (\s@AddTagsToResourceResponse' {} a -> s {resourceARN = a} :: AddTagsToResourceResponse)++-- | The response's http status code.+addTagsToResourceResponse_httpStatus :: Lens.Lens' AddTagsToResourceResponse Prelude.Int+addTagsToResourceResponse_httpStatus = Lens.lens (\AddTagsToResourceResponse' {httpStatus} -> httpStatus) (\s@AddTagsToResourceResponse' {} a -> s {httpStatus = a} :: AddTagsToResourceResponse)++instance Prelude.NFData AddTagsToResourceResponse where+ rnf AddTagsToResourceResponse' {..} =+ Prelude.rnf resourceARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/AddUploadBuffer.hs view
@@ -0,0 +1,196 @@+{-# 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.AddUploadBuffer+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Configures one or more gateway local disks as upload buffer for a+-- specified gateway. This operation is supported for the stored volume,+-- cached volume, and tape gateway types.+--+-- In the request, you specify the gateway Amazon Resource Name (ARN) to+-- which you want to add upload buffer, and one or more disk IDs that you+-- want to configure as upload buffer.+module Amazonka.StorageGateway.AddUploadBuffer+ ( -- * Creating a Request+ AddUploadBuffer (..),+ newAddUploadBuffer,++ -- * Request Lenses+ addUploadBuffer_gatewayARN,+ addUploadBuffer_diskIds,++ -- * Destructuring the Response+ AddUploadBufferResponse (..),+ newAddUploadBufferResponse,++ -- * Response Lenses+ addUploadBufferResponse_gatewayARN,+ addUploadBufferResponse_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++-- | /See:/ 'newAddUploadBuffer' smart constructor.+data AddUploadBuffer = AddUploadBuffer'+ { gatewayARN :: Prelude.Text,+ -- | An array of strings that identify disks that are to be configured as+ -- working storage. Each string has a minimum length of 1 and maximum+ -- length of 300. You can get the disk IDs from the ListLocalDisks API.+ diskIds :: [Prelude.Text]+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'AddUploadBuffer' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'addUploadBuffer_gatewayARN' - Undocumented member.+--+-- 'diskIds', 'addUploadBuffer_diskIds' - An array of strings that identify disks that are to be configured as+-- working storage. Each string has a minimum length of 1 and maximum+-- length of 300. You can get the disk IDs from the ListLocalDisks API.+newAddUploadBuffer ::+ -- | 'gatewayARN'+ Prelude.Text ->+ AddUploadBuffer+newAddUploadBuffer pGatewayARN_ =+ AddUploadBuffer'+ { gatewayARN = pGatewayARN_,+ diskIds = Prelude.mempty+ }++-- | Undocumented member.+addUploadBuffer_gatewayARN :: Lens.Lens' AddUploadBuffer Prelude.Text+addUploadBuffer_gatewayARN = Lens.lens (\AddUploadBuffer' {gatewayARN} -> gatewayARN) (\s@AddUploadBuffer' {} a -> s {gatewayARN = a} :: AddUploadBuffer)++-- | An array of strings that identify disks that are to be configured as+-- working storage. Each string has a minimum length of 1 and maximum+-- length of 300. You can get the disk IDs from the ListLocalDisks API.+addUploadBuffer_diskIds :: Lens.Lens' AddUploadBuffer [Prelude.Text]+addUploadBuffer_diskIds = Lens.lens (\AddUploadBuffer' {diskIds} -> diskIds) (\s@AddUploadBuffer' {} a -> s {diskIds = a} :: AddUploadBuffer) Prelude.. Lens.coerced++instance Core.AWSRequest AddUploadBuffer where+ type+ AWSResponse AddUploadBuffer =+ AddUploadBufferResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ AddUploadBufferResponse'+ Prelude.<$> (x Data..?> "GatewayARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable AddUploadBuffer where+ hashWithSalt _salt AddUploadBuffer' {..} =+ _salt+ `Prelude.hashWithSalt` gatewayARN+ `Prelude.hashWithSalt` diskIds++instance Prelude.NFData AddUploadBuffer where+ rnf AddUploadBuffer' {..} =+ Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf diskIds++instance Data.ToHeaders AddUploadBuffer where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.AddUploadBuffer" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON AddUploadBuffer where+ toJSON AddUploadBuffer' {..} =+ Data.object+ ( Prelude.catMaybes+ [ Prelude.Just ("GatewayARN" Data..= gatewayARN),+ Prelude.Just ("DiskIds" Data..= diskIds)+ ]+ )++instance Data.ToPath AddUploadBuffer where+ toPath = Prelude.const "/"++instance Data.ToQuery AddUploadBuffer where+ toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newAddUploadBufferResponse' smart constructor.+data AddUploadBufferResponse = AddUploadBufferResponse'+ { gatewayARN :: 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 'AddUploadBufferResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'addUploadBufferResponse_gatewayARN' - Undocumented member.+--+-- 'httpStatus', 'addUploadBufferResponse_httpStatus' - The response's http status code.+newAddUploadBufferResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ AddUploadBufferResponse+newAddUploadBufferResponse pHttpStatus_ =+ AddUploadBufferResponse'+ { gatewayARN =+ Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | Undocumented member.+addUploadBufferResponse_gatewayARN :: Lens.Lens' AddUploadBufferResponse (Prelude.Maybe Prelude.Text)+addUploadBufferResponse_gatewayARN = Lens.lens (\AddUploadBufferResponse' {gatewayARN} -> gatewayARN) (\s@AddUploadBufferResponse' {} a -> s {gatewayARN = a} :: AddUploadBufferResponse)++-- | The response's http status code.+addUploadBufferResponse_httpStatus :: Lens.Lens' AddUploadBufferResponse Prelude.Int+addUploadBufferResponse_httpStatus = Lens.lens (\AddUploadBufferResponse' {httpStatus} -> httpStatus) (\s@AddUploadBufferResponse' {} a -> s {httpStatus = a} :: AddUploadBufferResponse)++instance Prelude.NFData AddUploadBufferResponse where+ rnf AddUploadBufferResponse' {..} =+ Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/AddWorkingStorage.hs view
@@ -0,0 +1,208 @@+{-# 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.AddWorkingStorage+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Configures one or more gateway local disks as working storage for a+-- gateway. This operation is only supported in the stored volume gateway+-- type. This operation is deprecated in cached volume API version+-- 20120630. Use AddUploadBuffer instead.+--+-- Working storage is also referred to as upload buffer. You can also use+-- the AddUploadBuffer operation to add upload buffer to a stored volume+-- gateway.+--+-- In the request, you specify the gateway Amazon Resource Name (ARN) to+-- which you want to add working storage, and one or more disk IDs that you+-- want to configure as working storage.+module Amazonka.StorageGateway.AddWorkingStorage+ ( -- * Creating a Request+ AddWorkingStorage (..),+ newAddWorkingStorage,++ -- * Request Lenses+ addWorkingStorage_gatewayARN,+ addWorkingStorage_diskIds,++ -- * Destructuring the Response+ AddWorkingStorageResponse (..),+ newAddWorkingStorageResponse,++ -- * Response Lenses+ addWorkingStorageResponse_gatewayARN,+ addWorkingStorageResponse_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++-- | A JSON object containing one or more of the following fields:+--+-- - AddWorkingStorageInput$DiskIds+--+-- /See:/ 'newAddWorkingStorage' smart constructor.+data AddWorkingStorage = AddWorkingStorage'+ { gatewayARN :: Prelude.Text,+ -- | An array of strings that identify disks that are to be configured as+ -- working storage. Each string has a minimum length of 1 and maximum+ -- length of 300. You can get the disk IDs from the ListLocalDisks API.+ diskIds :: [Prelude.Text]+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'AddWorkingStorage' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'addWorkingStorage_gatewayARN' - Undocumented member.+--+-- 'diskIds', 'addWorkingStorage_diskIds' - An array of strings that identify disks that are to be configured as+-- working storage. Each string has a minimum length of 1 and maximum+-- length of 300. You can get the disk IDs from the ListLocalDisks API.+newAddWorkingStorage ::+ -- | 'gatewayARN'+ Prelude.Text ->+ AddWorkingStorage+newAddWorkingStorage pGatewayARN_ =+ AddWorkingStorage'+ { gatewayARN = pGatewayARN_,+ diskIds = Prelude.mempty+ }++-- | Undocumented member.+addWorkingStorage_gatewayARN :: Lens.Lens' AddWorkingStorage Prelude.Text+addWorkingStorage_gatewayARN = Lens.lens (\AddWorkingStorage' {gatewayARN} -> gatewayARN) (\s@AddWorkingStorage' {} a -> s {gatewayARN = a} :: AddWorkingStorage)++-- | An array of strings that identify disks that are to be configured as+-- working storage. Each string has a minimum length of 1 and maximum+-- length of 300. You can get the disk IDs from the ListLocalDisks API.+addWorkingStorage_diskIds :: Lens.Lens' AddWorkingStorage [Prelude.Text]+addWorkingStorage_diskIds = Lens.lens (\AddWorkingStorage' {diskIds} -> diskIds) (\s@AddWorkingStorage' {} a -> s {diskIds = a} :: AddWorkingStorage) Prelude.. Lens.coerced++instance Core.AWSRequest AddWorkingStorage where+ type+ AWSResponse AddWorkingStorage =+ AddWorkingStorageResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ AddWorkingStorageResponse'+ Prelude.<$> (x Data..?> "GatewayARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable AddWorkingStorage where+ hashWithSalt _salt AddWorkingStorage' {..} =+ _salt+ `Prelude.hashWithSalt` gatewayARN+ `Prelude.hashWithSalt` diskIds++instance Prelude.NFData AddWorkingStorage where+ rnf AddWorkingStorage' {..} =+ Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf diskIds++instance Data.ToHeaders AddWorkingStorage where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.AddWorkingStorage" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON AddWorkingStorage where+ toJSON AddWorkingStorage' {..} =+ Data.object+ ( Prelude.catMaybes+ [ Prelude.Just ("GatewayARN" Data..= gatewayARN),+ Prelude.Just ("DiskIds" Data..= diskIds)+ ]+ )++instance Data.ToPath AddWorkingStorage where+ toPath = Prelude.const "/"++instance Data.ToQuery AddWorkingStorage where+ toQuery = Prelude.const Prelude.mempty++-- | A JSON object containing the Amazon Resource Name (ARN) of the gateway+-- for which working storage was configured.+--+-- /See:/ 'newAddWorkingStorageResponse' smart constructor.+data AddWorkingStorageResponse = AddWorkingStorageResponse'+ { gatewayARN :: 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 'AddWorkingStorageResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'addWorkingStorageResponse_gatewayARN' - Undocumented member.+--+-- 'httpStatus', 'addWorkingStorageResponse_httpStatus' - The response's http status code.+newAddWorkingStorageResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ AddWorkingStorageResponse+newAddWorkingStorageResponse pHttpStatus_ =+ AddWorkingStorageResponse'+ { gatewayARN =+ Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | Undocumented member.+addWorkingStorageResponse_gatewayARN :: Lens.Lens' AddWorkingStorageResponse (Prelude.Maybe Prelude.Text)+addWorkingStorageResponse_gatewayARN = Lens.lens (\AddWorkingStorageResponse' {gatewayARN} -> gatewayARN) (\s@AddWorkingStorageResponse' {} a -> s {gatewayARN = a} :: AddWorkingStorageResponse)++-- | The response's http status code.+addWorkingStorageResponse_httpStatus :: Lens.Lens' AddWorkingStorageResponse Prelude.Int+addWorkingStorageResponse_httpStatus = Lens.lens (\AddWorkingStorageResponse' {httpStatus} -> httpStatus) (\s@AddWorkingStorageResponse' {} a -> s {httpStatus = a} :: AddWorkingStorageResponse)++instance Prelude.NFData AddWorkingStorageResponse where+ rnf AddWorkingStorageResponse' {..} =+ Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/AssignTapePool.hs view
@@ -0,0 +1,245 @@+{-# 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.AssignTapePool+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Assigns a tape to a tape pool for archiving. The tape assigned to a pool+-- is archived in the S3 storage class that is associated with the pool.+-- When you use your backup application to eject the tape, the tape is+-- archived directly into the S3 storage class (S3 Glacier or S3 Glacier+-- Deep Archive) that corresponds to the pool.+module Amazonka.StorageGateway.AssignTapePool+ ( -- * Creating a Request+ AssignTapePool (..),+ newAssignTapePool,++ -- * Request Lenses+ assignTapePool_bypassGovernanceRetention,+ assignTapePool_tapeARN,+ assignTapePool_poolId,++ -- * Destructuring the Response+ AssignTapePoolResponse (..),+ newAssignTapePoolResponse,++ -- * Response Lenses+ assignTapePoolResponse_tapeARN,+ assignTapePoolResponse_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++-- | /See:/ 'newAssignTapePool' smart constructor.+data AssignTapePool = AssignTapePool'+ { -- | Set permissions to bypass governance retention. If the lock type of the+ -- archived tape is @Governance@, the tape\'s archived age is not older+ -- than @RetentionLockInDays@, and the user does not already have+ -- @BypassGovernanceRetention@, setting this to TRUE enables the user to+ -- bypass the retention lock. This parameter is set to true by default for+ -- calls from the console.+ --+ -- Valid values: @TRUE@ | @FALSE@+ bypassGovernanceRetention :: Prelude.Maybe Prelude.Bool,+ -- | The unique Amazon Resource Name (ARN) of the virtual tape that you want+ -- to add to the tape pool.+ tapeARN :: Prelude.Text,+ -- | The ID of the pool that you want to add your tape to for archiving. The+ -- tape in this pool is archived in the S3 storage class that is associated+ -- with the pool. When you use your backup application to eject the tape,+ -- the tape is archived directly into the storage class (S3 Glacier or S3+ -- Glacier Deep Archive) that corresponds to the pool.+ poolId :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'AssignTapePool' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'bypassGovernanceRetention', 'assignTapePool_bypassGovernanceRetention' - Set permissions to bypass governance retention. If the lock type of the+-- archived tape is @Governance@, the tape\'s archived age is not older+-- than @RetentionLockInDays@, and the user does not already have+-- @BypassGovernanceRetention@, setting this to TRUE enables the user to+-- bypass the retention lock. This parameter is set to true by default for+-- calls from the console.+--+-- Valid values: @TRUE@ | @FALSE@+--+-- 'tapeARN', 'assignTapePool_tapeARN' - The unique Amazon Resource Name (ARN) of the virtual tape that you want+-- to add to the tape pool.+--+-- 'poolId', 'assignTapePool_poolId' - The ID of the pool that you want to add your tape to for archiving. The+-- tape in this pool is archived in the S3 storage class that is associated+-- with the pool. When you use your backup application to eject the tape,+-- the tape is archived directly into the storage class (S3 Glacier or S3+-- Glacier Deep Archive) that corresponds to the pool.+newAssignTapePool ::+ -- | 'tapeARN'+ Prelude.Text ->+ -- | 'poolId'+ Prelude.Text ->+ AssignTapePool+newAssignTapePool pTapeARN_ pPoolId_ =+ AssignTapePool'+ { bypassGovernanceRetention =+ Prelude.Nothing,+ tapeARN = pTapeARN_,+ poolId = pPoolId_+ }++-- | Set permissions to bypass governance retention. If the lock type of the+-- archived tape is @Governance@, the tape\'s archived age is not older+-- than @RetentionLockInDays@, and the user does not already have+-- @BypassGovernanceRetention@, setting this to TRUE enables the user to+-- bypass the retention lock. This parameter is set to true by default for+-- calls from the console.+--+-- Valid values: @TRUE@ | @FALSE@+assignTapePool_bypassGovernanceRetention :: Lens.Lens' AssignTapePool (Prelude.Maybe Prelude.Bool)+assignTapePool_bypassGovernanceRetention = Lens.lens (\AssignTapePool' {bypassGovernanceRetention} -> bypassGovernanceRetention) (\s@AssignTapePool' {} a -> s {bypassGovernanceRetention = a} :: AssignTapePool)++-- | The unique Amazon Resource Name (ARN) of the virtual tape that you want+-- to add to the tape pool.+assignTapePool_tapeARN :: Lens.Lens' AssignTapePool Prelude.Text+assignTapePool_tapeARN = Lens.lens (\AssignTapePool' {tapeARN} -> tapeARN) (\s@AssignTapePool' {} a -> s {tapeARN = a} :: AssignTapePool)++-- | The ID of the pool that you want to add your tape to for archiving. The+-- tape in this pool is archived in the S3 storage class that is associated+-- with the pool. When you use your backup application to eject the tape,+-- the tape is archived directly into the storage class (S3 Glacier or S3+-- Glacier Deep Archive) that corresponds to the pool.+assignTapePool_poolId :: Lens.Lens' AssignTapePool Prelude.Text+assignTapePool_poolId = Lens.lens (\AssignTapePool' {poolId} -> poolId) (\s@AssignTapePool' {} a -> s {poolId = a} :: AssignTapePool)++instance Core.AWSRequest AssignTapePool where+ type+ AWSResponse AssignTapePool =+ AssignTapePoolResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ AssignTapePoolResponse'+ Prelude.<$> (x Data..?> "TapeARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable AssignTapePool where+ hashWithSalt _salt AssignTapePool' {..} =+ _salt+ `Prelude.hashWithSalt` bypassGovernanceRetention+ `Prelude.hashWithSalt` tapeARN+ `Prelude.hashWithSalt` poolId++instance Prelude.NFData AssignTapePool where+ rnf AssignTapePool' {..} =+ Prelude.rnf bypassGovernanceRetention+ `Prelude.seq` Prelude.rnf tapeARN+ `Prelude.seq` Prelude.rnf poolId++instance Data.ToHeaders AssignTapePool where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.AssignTapePool" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON AssignTapePool where+ toJSON AssignTapePool' {..} =+ Data.object+ ( Prelude.catMaybes+ [ ("BypassGovernanceRetention" Data..=)+ Prelude.<$> bypassGovernanceRetention,+ Prelude.Just ("TapeARN" Data..= tapeARN),+ Prelude.Just ("PoolId" Data..= poolId)+ ]+ )++instance Data.ToPath AssignTapePool where+ toPath = Prelude.const "/"++instance Data.ToQuery AssignTapePool where+ toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newAssignTapePoolResponse' smart constructor.+data AssignTapePoolResponse = AssignTapePoolResponse'+ { -- | The unique Amazon Resource Names (ARN) of the virtual tape that was+ -- added to the tape pool.+ tapeARN :: 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 'AssignTapePoolResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'tapeARN', 'assignTapePoolResponse_tapeARN' - The unique Amazon Resource Names (ARN) of the virtual tape that was+-- added to the tape pool.+--+-- 'httpStatus', 'assignTapePoolResponse_httpStatus' - The response's http status code.+newAssignTapePoolResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ AssignTapePoolResponse+newAssignTapePoolResponse pHttpStatus_ =+ AssignTapePoolResponse'+ { tapeARN = Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | The unique Amazon Resource Names (ARN) of the virtual tape that was+-- added to the tape pool.+assignTapePoolResponse_tapeARN :: Lens.Lens' AssignTapePoolResponse (Prelude.Maybe Prelude.Text)+assignTapePoolResponse_tapeARN = Lens.lens (\AssignTapePoolResponse' {tapeARN} -> tapeARN) (\s@AssignTapePoolResponse' {} a -> s {tapeARN = a} :: AssignTapePoolResponse)++-- | The response's http status code.+assignTapePoolResponse_httpStatus :: Lens.Lens' AssignTapePoolResponse Prelude.Int+assignTapePoolResponse_httpStatus = Lens.lens (\AssignTapePoolResponse' {httpStatus} -> httpStatus) (\s@AssignTapePoolResponse' {} a -> s {httpStatus = a} :: AssignTapePoolResponse)++instance Prelude.NFData AssignTapePoolResponse where+ rnf AssignTapePoolResponse' {..} =+ Prelude.rnf tapeARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/AssociateFileSystem.hs view
@@ -0,0 +1,322 @@+{-# 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.AssociateFileSystem+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Associate an Amazon FSx file system with the FSx File Gateway. After the+-- association process is complete, the file shares on the Amazon FSx file+-- system are available for access through the gateway. This operation only+-- supports the FSx File Gateway type.+module Amazonka.StorageGateway.AssociateFileSystem+ ( -- * Creating a Request+ AssociateFileSystem (..),+ newAssociateFileSystem,++ -- * Request Lenses+ associateFileSystem_auditDestinationARN,+ associateFileSystem_cacheAttributes,+ associateFileSystem_endpointNetworkConfiguration,+ associateFileSystem_tags,+ associateFileSystem_userName,+ associateFileSystem_password,+ associateFileSystem_clientToken,+ associateFileSystem_gatewayARN,+ associateFileSystem_locationARN,++ -- * Destructuring the Response+ AssociateFileSystemResponse (..),+ newAssociateFileSystemResponse,++ -- * Response Lenses+ associateFileSystemResponse_fileSystemAssociationARN,+ associateFileSystemResponse_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++-- | /See:/ 'newAssociateFileSystem' smart constructor.+data AssociateFileSystem = AssociateFileSystem'+ { -- | The Amazon Resource Name (ARN) of the storage used for the audit logs.+ auditDestinationARN :: Prelude.Maybe Prelude.Text,+ cacheAttributes :: Prelude.Maybe CacheAttributes,+ -- | Specifies the network configuration information for the gateway+ -- associated with the Amazon FSx file system.+ --+ -- If multiple file systems are associated with this gateway, this+ -- parameter\'s @IpAddresses@ field is required.+ endpointNetworkConfiguration :: Prelude.Maybe EndpointNetworkConfiguration,+ -- | A list of up to 50 tags that can be assigned to the file system+ -- association. Each tag is a key-value pair.+ tags :: Prelude.Maybe [Tag],+ -- | The user name of the user credential that has permission to access the+ -- root share D$ of the Amazon FSx file system. The user account must+ -- belong to the Amazon FSx delegated admin user group.+ userName :: Prelude.Text,+ -- | The password of the user credential.+ password :: Data.Sensitive Prelude.Text,+ -- | A unique string value that you supply that is used by the FSx File+ -- Gateway to ensure idempotent file system association creation.+ clientToken :: Prelude.Text,+ gatewayARN :: Prelude.Text,+ -- | The Amazon Resource Name (ARN) of the Amazon FSx file system to+ -- associate with the FSx File Gateway.+ locationARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'AssociateFileSystem' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'auditDestinationARN', 'associateFileSystem_auditDestinationARN' - The Amazon Resource Name (ARN) of the storage used for the audit logs.+--+-- 'cacheAttributes', 'associateFileSystem_cacheAttributes' - Undocumented member.+--+-- 'endpointNetworkConfiguration', 'associateFileSystem_endpointNetworkConfiguration' - Specifies the network configuration information for the gateway+-- associated with the Amazon FSx file system.+--+-- If multiple file systems are associated with this gateway, this+-- parameter\'s @IpAddresses@ field is required.+--+-- 'tags', 'associateFileSystem_tags' - A list of up to 50 tags that can be assigned to the file system+-- association. Each tag is a key-value pair.+--+-- 'userName', 'associateFileSystem_userName' - The user name of the user credential that has permission to access the+-- root share D$ of the Amazon FSx file system. The user account must+-- belong to the Amazon FSx delegated admin user group.+--+-- 'password', 'associateFileSystem_password' - The password of the user credential.+--+-- 'clientToken', 'associateFileSystem_clientToken' - A unique string value that you supply that is used by the FSx File+-- Gateway to ensure idempotent file system association creation.+--+-- 'gatewayARN', 'associateFileSystem_gatewayARN' - Undocumented member.+--+-- 'locationARN', 'associateFileSystem_locationARN' - The Amazon Resource Name (ARN) of the Amazon FSx file system to+-- associate with the FSx File Gateway.+newAssociateFileSystem ::+ -- | 'userName'+ Prelude.Text ->+ -- | 'password'+ Prelude.Text ->+ -- | 'clientToken'+ Prelude.Text ->+ -- | 'gatewayARN'+ Prelude.Text ->+ -- | 'locationARN'+ Prelude.Text ->+ AssociateFileSystem+newAssociateFileSystem+ pUserName_+ pPassword_+ pClientToken_+ pGatewayARN_+ pLocationARN_ =+ AssociateFileSystem'+ { auditDestinationARN =+ Prelude.Nothing,+ cacheAttributes = Prelude.Nothing,+ endpointNetworkConfiguration = Prelude.Nothing,+ tags = Prelude.Nothing,+ userName = pUserName_,+ password = Data._Sensitive Lens.# pPassword_,+ clientToken = pClientToken_,+ gatewayARN = pGatewayARN_,+ locationARN = pLocationARN_+ }++-- | The Amazon Resource Name (ARN) of the storage used for the audit logs.+associateFileSystem_auditDestinationARN :: Lens.Lens' AssociateFileSystem (Prelude.Maybe Prelude.Text)+associateFileSystem_auditDestinationARN = Lens.lens (\AssociateFileSystem' {auditDestinationARN} -> auditDestinationARN) (\s@AssociateFileSystem' {} a -> s {auditDestinationARN = a} :: AssociateFileSystem)++-- | Undocumented member.+associateFileSystem_cacheAttributes :: Lens.Lens' AssociateFileSystem (Prelude.Maybe CacheAttributes)+associateFileSystem_cacheAttributes = Lens.lens (\AssociateFileSystem' {cacheAttributes} -> cacheAttributes) (\s@AssociateFileSystem' {} a -> s {cacheAttributes = a} :: AssociateFileSystem)++-- | Specifies the network configuration information for the gateway+-- associated with the Amazon FSx file system.+--+-- If multiple file systems are associated with this gateway, this+-- parameter\'s @IpAddresses@ field is required.+associateFileSystem_endpointNetworkConfiguration :: Lens.Lens' AssociateFileSystem (Prelude.Maybe EndpointNetworkConfiguration)+associateFileSystem_endpointNetworkConfiguration = Lens.lens (\AssociateFileSystem' {endpointNetworkConfiguration} -> endpointNetworkConfiguration) (\s@AssociateFileSystem' {} a -> s {endpointNetworkConfiguration = a} :: AssociateFileSystem)++-- | A list of up to 50 tags that can be assigned to the file system+-- association. Each tag is a key-value pair.+associateFileSystem_tags :: Lens.Lens' AssociateFileSystem (Prelude.Maybe [Tag])+associateFileSystem_tags = Lens.lens (\AssociateFileSystem' {tags} -> tags) (\s@AssociateFileSystem' {} a -> s {tags = a} :: AssociateFileSystem) Prelude.. Lens.mapping Lens.coerced++-- | The user name of the user credential that has permission to access the+-- root share D$ of the Amazon FSx file system. The user account must+-- belong to the Amazon FSx delegated admin user group.+associateFileSystem_userName :: Lens.Lens' AssociateFileSystem Prelude.Text+associateFileSystem_userName = Lens.lens (\AssociateFileSystem' {userName} -> userName) (\s@AssociateFileSystem' {} a -> s {userName = a} :: AssociateFileSystem)++-- | The password of the user credential.+associateFileSystem_password :: Lens.Lens' AssociateFileSystem Prelude.Text+associateFileSystem_password = Lens.lens (\AssociateFileSystem' {password} -> password) (\s@AssociateFileSystem' {} a -> s {password = a} :: AssociateFileSystem) Prelude.. Data._Sensitive++-- | A unique string value that you supply that is used by the FSx File+-- Gateway to ensure idempotent file system association creation.+associateFileSystem_clientToken :: Lens.Lens' AssociateFileSystem Prelude.Text+associateFileSystem_clientToken = Lens.lens (\AssociateFileSystem' {clientToken} -> clientToken) (\s@AssociateFileSystem' {} a -> s {clientToken = a} :: AssociateFileSystem)++-- | Undocumented member.+associateFileSystem_gatewayARN :: Lens.Lens' AssociateFileSystem Prelude.Text+associateFileSystem_gatewayARN = Lens.lens (\AssociateFileSystem' {gatewayARN} -> gatewayARN) (\s@AssociateFileSystem' {} a -> s {gatewayARN = a} :: AssociateFileSystem)++-- | The Amazon Resource Name (ARN) of the Amazon FSx file system to+-- associate with the FSx File Gateway.+associateFileSystem_locationARN :: Lens.Lens' AssociateFileSystem Prelude.Text+associateFileSystem_locationARN = Lens.lens (\AssociateFileSystem' {locationARN} -> locationARN) (\s@AssociateFileSystem' {} a -> s {locationARN = a} :: AssociateFileSystem)++instance Core.AWSRequest AssociateFileSystem where+ type+ AWSResponse AssociateFileSystem =+ AssociateFileSystemResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ AssociateFileSystemResponse'+ Prelude.<$> (x Data..?> "FileSystemAssociationARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable AssociateFileSystem where+ hashWithSalt _salt AssociateFileSystem' {..} =+ _salt+ `Prelude.hashWithSalt` auditDestinationARN+ `Prelude.hashWithSalt` cacheAttributes+ `Prelude.hashWithSalt` endpointNetworkConfiguration+ `Prelude.hashWithSalt` tags+ `Prelude.hashWithSalt` userName+ `Prelude.hashWithSalt` password+ `Prelude.hashWithSalt` clientToken+ `Prelude.hashWithSalt` gatewayARN+ `Prelude.hashWithSalt` locationARN++instance Prelude.NFData AssociateFileSystem where+ rnf AssociateFileSystem' {..} =+ Prelude.rnf auditDestinationARN+ `Prelude.seq` Prelude.rnf cacheAttributes+ `Prelude.seq` Prelude.rnf endpointNetworkConfiguration+ `Prelude.seq` Prelude.rnf tags+ `Prelude.seq` Prelude.rnf userName+ `Prelude.seq` Prelude.rnf password+ `Prelude.seq` Prelude.rnf clientToken+ `Prelude.seq` Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf locationARN++instance Data.ToHeaders AssociateFileSystem where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.AssociateFileSystem" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON AssociateFileSystem where+ toJSON AssociateFileSystem' {..} =+ Data.object+ ( Prelude.catMaybes+ [ ("AuditDestinationARN" Data..=)+ Prelude.<$> auditDestinationARN,+ ("CacheAttributes" Data..=)+ Prelude.<$> cacheAttributes,+ ("EndpointNetworkConfiguration" Data..=)+ Prelude.<$> endpointNetworkConfiguration,+ ("Tags" Data..=) Prelude.<$> tags,+ Prelude.Just ("UserName" Data..= userName),+ Prelude.Just ("Password" Data..= password),+ Prelude.Just ("ClientToken" Data..= clientToken),+ Prelude.Just ("GatewayARN" Data..= gatewayARN),+ Prelude.Just ("LocationARN" Data..= locationARN)+ ]+ )++instance Data.ToPath AssociateFileSystem where+ toPath = Prelude.const "/"++instance Data.ToQuery AssociateFileSystem where+ toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newAssociateFileSystemResponse' smart constructor.+data AssociateFileSystemResponse = AssociateFileSystemResponse'+ { -- | The ARN of the newly created file system association.+ fileSystemAssociationARN :: 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 'AssociateFileSystemResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'fileSystemAssociationARN', 'associateFileSystemResponse_fileSystemAssociationARN' - The ARN of the newly created file system association.+--+-- 'httpStatus', 'associateFileSystemResponse_httpStatus' - The response's http status code.+newAssociateFileSystemResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ AssociateFileSystemResponse+newAssociateFileSystemResponse pHttpStatus_ =+ AssociateFileSystemResponse'+ { fileSystemAssociationARN =+ Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | The ARN of the newly created file system association.+associateFileSystemResponse_fileSystemAssociationARN :: Lens.Lens' AssociateFileSystemResponse (Prelude.Maybe Prelude.Text)+associateFileSystemResponse_fileSystemAssociationARN = Lens.lens (\AssociateFileSystemResponse' {fileSystemAssociationARN} -> fileSystemAssociationARN) (\s@AssociateFileSystemResponse' {} a -> s {fileSystemAssociationARN = a} :: AssociateFileSystemResponse)++-- | The response's http status code.+associateFileSystemResponse_httpStatus :: Lens.Lens' AssociateFileSystemResponse Prelude.Int+associateFileSystemResponse_httpStatus = Lens.lens (\AssociateFileSystemResponse' {httpStatus} -> httpStatus) (\s@AssociateFileSystemResponse' {} a -> s {httpStatus = a} :: AssociateFileSystemResponse)++instance Prelude.NFData AssociateFileSystemResponse where+ rnf AssociateFileSystemResponse' {..} =+ Prelude.rnf fileSystemAssociationARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/AttachVolume.hs view
@@ -0,0 +1,301 @@+{-# 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.AttachVolume+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Connects a volume to an iSCSI connection and then attaches the volume to+-- the specified gateway. Detaching and attaching a volume enables you to+-- recover your data from one gateway to a different gateway without+-- creating a snapshot. It also makes it easier to move your volumes from+-- an on-premises gateway to a gateway hosted on an Amazon EC2 instance.+module Amazonka.StorageGateway.AttachVolume+ ( -- * Creating a Request+ AttachVolume (..),+ newAttachVolume,++ -- * Request Lenses+ attachVolume_diskId,+ attachVolume_targetName,+ attachVolume_gatewayARN,+ attachVolume_volumeARN,+ attachVolume_networkInterfaceId,++ -- * Destructuring the Response+ AttachVolumeResponse (..),+ newAttachVolumeResponse,++ -- * Response Lenses+ attachVolumeResponse_targetARN,+ attachVolumeResponse_volumeARN,+ attachVolumeResponse_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++-- | AttachVolumeInput+--+-- /See:/ 'newAttachVolume' smart constructor.+data AttachVolume = AttachVolume'+ { -- | The unique device ID or other distinguishing data that identifies the+ -- local disk used to create the volume. This value is only required when+ -- you are attaching a stored volume.+ diskId :: Prelude.Maybe Prelude.Text,+ -- | The name of the iSCSI target used by an initiator to connect to a volume+ -- and used as a suffix for the target ARN. For example, specifying+ -- @TargetName@ as /myvolume/ results in the target ARN of+ -- @arn:aws:storagegateway:us-east-2:111122223333:gateway\/sgw-12A3456B\/target\/iqn.1997-05.com.amazon:myvolume@.+ -- The target name must be unique across all volumes on a gateway.+ --+ -- If you don\'t specify a value, Storage Gateway uses the value that was+ -- previously used for this volume as the new target name.+ targetName :: Prelude.Maybe Prelude.Text,+ -- | The Amazon Resource Name (ARN) of the gateway that you want to attach+ -- the volume to.+ gatewayARN :: Prelude.Text,+ -- | The Amazon Resource Name (ARN) of the volume to attach to the specified+ -- gateway.+ volumeARN :: Prelude.Text,+ -- | The network interface of the gateway on which to expose the iSCSI+ -- target. Only IPv4 addresses are accepted. Use DescribeGatewayInformation+ -- to get a list of the network interfaces available on a gateway.+ --+ -- Valid Values: A valid IP address.+ networkInterfaceId :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'AttachVolume' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'diskId', 'attachVolume_diskId' - The unique device ID or other distinguishing data that identifies the+-- local disk used to create the volume. This value is only required when+-- you are attaching a stored volume.+--+-- 'targetName', 'attachVolume_targetName' - The name of the iSCSI target used by an initiator to connect to a volume+-- and used as a suffix for the target ARN. For example, specifying+-- @TargetName@ as /myvolume/ results in the target ARN of+-- @arn:aws:storagegateway:us-east-2:111122223333:gateway\/sgw-12A3456B\/target\/iqn.1997-05.com.amazon:myvolume@.+-- The target name must be unique across all volumes on a gateway.+--+-- If you don\'t specify a value, Storage Gateway uses the value that was+-- previously used for this volume as the new target name.+--+-- 'gatewayARN', 'attachVolume_gatewayARN' - The Amazon Resource Name (ARN) of the gateway that you want to attach+-- the volume to.+--+-- 'volumeARN', 'attachVolume_volumeARN' - The Amazon Resource Name (ARN) of the volume to attach to the specified+-- gateway.+--+-- 'networkInterfaceId', 'attachVolume_networkInterfaceId' - The network interface of the gateway on which to expose the iSCSI+-- target. Only IPv4 addresses are accepted. Use DescribeGatewayInformation+-- to get a list of the network interfaces available on a gateway.+--+-- Valid Values: A valid IP address.+newAttachVolume ::+ -- | 'gatewayARN'+ Prelude.Text ->+ -- | 'volumeARN'+ Prelude.Text ->+ -- | 'networkInterfaceId'+ Prelude.Text ->+ AttachVolume+newAttachVolume+ pGatewayARN_+ pVolumeARN_+ pNetworkInterfaceId_ =+ AttachVolume'+ { diskId = Prelude.Nothing,+ targetName = Prelude.Nothing,+ gatewayARN = pGatewayARN_,+ volumeARN = pVolumeARN_,+ networkInterfaceId = pNetworkInterfaceId_+ }++-- | The unique device ID or other distinguishing data that identifies the+-- local disk used to create the volume. This value is only required when+-- you are attaching a stored volume.+attachVolume_diskId :: Lens.Lens' AttachVolume (Prelude.Maybe Prelude.Text)+attachVolume_diskId = Lens.lens (\AttachVolume' {diskId} -> diskId) (\s@AttachVolume' {} a -> s {diskId = a} :: AttachVolume)++-- | The name of the iSCSI target used by an initiator to connect to a volume+-- and used as a suffix for the target ARN. For example, specifying+-- @TargetName@ as /myvolume/ results in the target ARN of+-- @arn:aws:storagegateway:us-east-2:111122223333:gateway\/sgw-12A3456B\/target\/iqn.1997-05.com.amazon:myvolume@.+-- The target name must be unique across all volumes on a gateway.+--+-- If you don\'t specify a value, Storage Gateway uses the value that was+-- previously used for this volume as the new target name.+attachVolume_targetName :: Lens.Lens' AttachVolume (Prelude.Maybe Prelude.Text)+attachVolume_targetName = Lens.lens (\AttachVolume' {targetName} -> targetName) (\s@AttachVolume' {} a -> s {targetName = a} :: AttachVolume)++-- | The Amazon Resource Name (ARN) of the gateway that you want to attach+-- the volume to.+attachVolume_gatewayARN :: Lens.Lens' AttachVolume Prelude.Text+attachVolume_gatewayARN = Lens.lens (\AttachVolume' {gatewayARN} -> gatewayARN) (\s@AttachVolume' {} a -> s {gatewayARN = a} :: AttachVolume)++-- | The Amazon Resource Name (ARN) of the volume to attach to the specified+-- gateway.+attachVolume_volumeARN :: Lens.Lens' AttachVolume Prelude.Text+attachVolume_volumeARN = Lens.lens (\AttachVolume' {volumeARN} -> volumeARN) (\s@AttachVolume' {} a -> s {volumeARN = a} :: AttachVolume)++-- | The network interface of the gateway on which to expose the iSCSI+-- target. Only IPv4 addresses are accepted. Use DescribeGatewayInformation+-- to get a list of the network interfaces available on a gateway.+--+-- Valid Values: A valid IP address.+attachVolume_networkInterfaceId :: Lens.Lens' AttachVolume Prelude.Text+attachVolume_networkInterfaceId = Lens.lens (\AttachVolume' {networkInterfaceId} -> networkInterfaceId) (\s@AttachVolume' {} a -> s {networkInterfaceId = a} :: AttachVolume)++instance Core.AWSRequest AttachVolume where+ type AWSResponse AttachVolume = AttachVolumeResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ AttachVolumeResponse'+ Prelude.<$> (x Data..?> "TargetARN")+ Prelude.<*> (x Data..?> "VolumeARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable AttachVolume where+ hashWithSalt _salt AttachVolume' {..} =+ _salt+ `Prelude.hashWithSalt` diskId+ `Prelude.hashWithSalt` targetName+ `Prelude.hashWithSalt` gatewayARN+ `Prelude.hashWithSalt` volumeARN+ `Prelude.hashWithSalt` networkInterfaceId++instance Prelude.NFData AttachVolume where+ rnf AttachVolume' {..} =+ Prelude.rnf diskId+ `Prelude.seq` Prelude.rnf targetName+ `Prelude.seq` Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf volumeARN+ `Prelude.seq` Prelude.rnf networkInterfaceId++instance Data.ToHeaders AttachVolume where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.AttachVolume" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON AttachVolume where+ toJSON AttachVolume' {..} =+ Data.object+ ( Prelude.catMaybes+ [ ("DiskId" Data..=) Prelude.<$> diskId,+ ("TargetName" Data..=) Prelude.<$> targetName,+ Prelude.Just ("GatewayARN" Data..= gatewayARN),+ Prelude.Just ("VolumeARN" Data..= volumeARN),+ Prelude.Just+ ("NetworkInterfaceId" Data..= networkInterfaceId)+ ]+ )++instance Data.ToPath AttachVolume where+ toPath = Prelude.const "/"++instance Data.ToQuery AttachVolume where+ toQuery = Prelude.const Prelude.mempty++-- | AttachVolumeOutput+--+-- /See:/ 'newAttachVolumeResponse' smart constructor.+data AttachVolumeResponse = AttachVolumeResponse'+ { -- | The Amazon Resource Name (ARN) of the volume target, which includes the+ -- iSCSI name for the initiator that was used to connect to the target.+ targetARN :: Prelude.Maybe Prelude.Text,+ -- | The Amazon Resource Name (ARN) of the volume that was attached to the+ -- gateway.+ volumeARN :: 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 'AttachVolumeResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'targetARN', 'attachVolumeResponse_targetARN' - The Amazon Resource Name (ARN) of the volume target, which includes the+-- iSCSI name for the initiator that was used to connect to the target.+--+-- 'volumeARN', 'attachVolumeResponse_volumeARN' - The Amazon Resource Name (ARN) of the volume that was attached to the+-- gateway.+--+-- 'httpStatus', 'attachVolumeResponse_httpStatus' - The response's http status code.+newAttachVolumeResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ AttachVolumeResponse+newAttachVolumeResponse pHttpStatus_ =+ AttachVolumeResponse'+ { targetARN = Prelude.Nothing,+ volumeARN = Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | The Amazon Resource Name (ARN) of the volume target, which includes the+-- iSCSI name for the initiator that was used to connect to the target.+attachVolumeResponse_targetARN :: Lens.Lens' AttachVolumeResponse (Prelude.Maybe Prelude.Text)+attachVolumeResponse_targetARN = Lens.lens (\AttachVolumeResponse' {targetARN} -> targetARN) (\s@AttachVolumeResponse' {} a -> s {targetARN = a} :: AttachVolumeResponse)++-- | The Amazon Resource Name (ARN) of the volume that was attached to the+-- gateway.+attachVolumeResponse_volumeARN :: Lens.Lens' AttachVolumeResponse (Prelude.Maybe Prelude.Text)+attachVolumeResponse_volumeARN = Lens.lens (\AttachVolumeResponse' {volumeARN} -> volumeARN) (\s@AttachVolumeResponse' {} a -> s {volumeARN = a} :: AttachVolumeResponse)++-- | The response's http status code.+attachVolumeResponse_httpStatus :: Lens.Lens' AttachVolumeResponse Prelude.Int+attachVolumeResponse_httpStatus = Lens.lens (\AttachVolumeResponse' {httpStatus} -> httpStatus) (\s@AttachVolumeResponse' {} a -> s {httpStatus = a} :: AttachVolumeResponse)++instance Prelude.NFData AttachVolumeResponse where+ rnf AttachVolumeResponse' {..} =+ Prelude.rnf targetARN+ `Prelude.seq` Prelude.rnf volumeARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/CancelArchival.hs view
@@ -0,0 +1,198 @@+{-# 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.CancelArchival+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Cancels archiving of a virtual tape to the virtual tape shelf (VTS)+-- after the archiving process is initiated. This operation is only+-- supported in the tape gateway type.+module Amazonka.StorageGateway.CancelArchival+ ( -- * Creating a Request+ CancelArchival (..),+ newCancelArchival,++ -- * Request Lenses+ cancelArchival_gatewayARN,+ cancelArchival_tapeARN,++ -- * Destructuring the Response+ CancelArchivalResponse (..),+ newCancelArchivalResponse,++ -- * Response Lenses+ cancelArchivalResponse_tapeARN,+ cancelArchivalResponse_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++-- | CancelArchivalInput+--+-- /See:/ 'newCancelArchival' smart constructor.+data CancelArchival = CancelArchival'+ { gatewayARN :: Prelude.Text,+ -- | The Amazon Resource Name (ARN) of the virtual tape you want to cancel+ -- archiving for.+ tapeARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'CancelArchival' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'cancelArchival_gatewayARN' - Undocumented member.+--+-- 'tapeARN', 'cancelArchival_tapeARN' - The Amazon Resource Name (ARN) of the virtual tape you want to cancel+-- archiving for.+newCancelArchival ::+ -- | 'gatewayARN'+ Prelude.Text ->+ -- | 'tapeARN'+ Prelude.Text ->+ CancelArchival+newCancelArchival pGatewayARN_ pTapeARN_ =+ CancelArchival'+ { gatewayARN = pGatewayARN_,+ tapeARN = pTapeARN_+ }++-- | Undocumented member.+cancelArchival_gatewayARN :: Lens.Lens' CancelArchival Prelude.Text+cancelArchival_gatewayARN = Lens.lens (\CancelArchival' {gatewayARN} -> gatewayARN) (\s@CancelArchival' {} a -> s {gatewayARN = a} :: CancelArchival)++-- | The Amazon Resource Name (ARN) of the virtual tape you want to cancel+-- archiving for.+cancelArchival_tapeARN :: Lens.Lens' CancelArchival Prelude.Text+cancelArchival_tapeARN = Lens.lens (\CancelArchival' {tapeARN} -> tapeARN) (\s@CancelArchival' {} a -> s {tapeARN = a} :: CancelArchival)++instance Core.AWSRequest CancelArchival where+ type+ AWSResponse CancelArchival =+ CancelArchivalResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ CancelArchivalResponse'+ Prelude.<$> (x Data..?> "TapeARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable CancelArchival where+ hashWithSalt _salt CancelArchival' {..} =+ _salt+ `Prelude.hashWithSalt` gatewayARN+ `Prelude.hashWithSalt` tapeARN++instance Prelude.NFData CancelArchival where+ rnf CancelArchival' {..} =+ Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf tapeARN++instance Data.ToHeaders CancelArchival where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.CancelArchival" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON CancelArchival where+ toJSON CancelArchival' {..} =+ Data.object+ ( Prelude.catMaybes+ [ Prelude.Just ("GatewayARN" Data..= gatewayARN),+ Prelude.Just ("TapeARN" Data..= tapeARN)+ ]+ )++instance Data.ToPath CancelArchival where+ toPath = Prelude.const "/"++instance Data.ToQuery CancelArchival where+ toQuery = Prelude.const Prelude.mempty++-- | CancelArchivalOutput+--+-- /See:/ 'newCancelArchivalResponse' smart constructor.+data CancelArchivalResponse = CancelArchivalResponse'+ { -- | The Amazon Resource Name (ARN) of the virtual tape for which archiving+ -- was canceled.+ tapeARN :: 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 'CancelArchivalResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'tapeARN', 'cancelArchivalResponse_tapeARN' - The Amazon Resource Name (ARN) of the virtual tape for which archiving+-- was canceled.+--+-- 'httpStatus', 'cancelArchivalResponse_httpStatus' - The response's http status code.+newCancelArchivalResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ CancelArchivalResponse+newCancelArchivalResponse pHttpStatus_ =+ CancelArchivalResponse'+ { tapeARN = Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | The Amazon Resource Name (ARN) of the virtual tape for which archiving+-- was canceled.+cancelArchivalResponse_tapeARN :: Lens.Lens' CancelArchivalResponse (Prelude.Maybe Prelude.Text)+cancelArchivalResponse_tapeARN = Lens.lens (\CancelArchivalResponse' {tapeARN} -> tapeARN) (\s@CancelArchivalResponse' {} a -> s {tapeARN = a} :: CancelArchivalResponse)++-- | The response's http status code.+cancelArchivalResponse_httpStatus :: Lens.Lens' CancelArchivalResponse Prelude.Int+cancelArchivalResponse_httpStatus = Lens.lens (\CancelArchivalResponse' {httpStatus} -> httpStatus) (\s@CancelArchivalResponse' {} a -> s {httpStatus = a} :: CancelArchivalResponse)++instance Prelude.NFData CancelArchivalResponse where+ rnf CancelArchivalResponse' {..} =+ Prelude.rnf tapeARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/CancelRetrieval.hs view
@@ -0,0 +1,199 @@+{-# 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.CancelRetrieval+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Cancels retrieval of a virtual tape from the virtual tape shelf (VTS) to+-- a gateway after the retrieval process is initiated. The virtual tape is+-- returned to the VTS. This operation is only supported in the tape+-- gateway type.+module Amazonka.StorageGateway.CancelRetrieval+ ( -- * Creating a Request+ CancelRetrieval (..),+ newCancelRetrieval,++ -- * Request Lenses+ cancelRetrieval_gatewayARN,+ cancelRetrieval_tapeARN,++ -- * Destructuring the Response+ CancelRetrievalResponse (..),+ newCancelRetrievalResponse,++ -- * Response Lenses+ cancelRetrievalResponse_tapeARN,+ cancelRetrievalResponse_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++-- | CancelRetrievalInput+--+-- /See:/ 'newCancelRetrieval' smart constructor.+data CancelRetrieval = CancelRetrieval'+ { gatewayARN :: Prelude.Text,+ -- | The Amazon Resource Name (ARN) of the virtual tape you want to cancel+ -- retrieval for.+ tapeARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'CancelRetrieval' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'cancelRetrieval_gatewayARN' - Undocumented member.+--+-- 'tapeARN', 'cancelRetrieval_tapeARN' - The Amazon Resource Name (ARN) of the virtual tape you want to cancel+-- retrieval for.+newCancelRetrieval ::+ -- | 'gatewayARN'+ Prelude.Text ->+ -- | 'tapeARN'+ Prelude.Text ->+ CancelRetrieval+newCancelRetrieval pGatewayARN_ pTapeARN_ =+ CancelRetrieval'+ { gatewayARN = pGatewayARN_,+ tapeARN = pTapeARN_+ }++-- | Undocumented member.+cancelRetrieval_gatewayARN :: Lens.Lens' CancelRetrieval Prelude.Text+cancelRetrieval_gatewayARN = Lens.lens (\CancelRetrieval' {gatewayARN} -> gatewayARN) (\s@CancelRetrieval' {} a -> s {gatewayARN = a} :: CancelRetrieval)++-- | The Amazon Resource Name (ARN) of the virtual tape you want to cancel+-- retrieval for.+cancelRetrieval_tapeARN :: Lens.Lens' CancelRetrieval Prelude.Text+cancelRetrieval_tapeARN = Lens.lens (\CancelRetrieval' {tapeARN} -> tapeARN) (\s@CancelRetrieval' {} a -> s {tapeARN = a} :: CancelRetrieval)++instance Core.AWSRequest CancelRetrieval where+ type+ AWSResponse CancelRetrieval =+ CancelRetrievalResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ CancelRetrievalResponse'+ Prelude.<$> (x Data..?> "TapeARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable CancelRetrieval where+ hashWithSalt _salt CancelRetrieval' {..} =+ _salt+ `Prelude.hashWithSalt` gatewayARN+ `Prelude.hashWithSalt` tapeARN++instance Prelude.NFData CancelRetrieval where+ rnf CancelRetrieval' {..} =+ Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf tapeARN++instance Data.ToHeaders CancelRetrieval where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.CancelRetrieval" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON CancelRetrieval where+ toJSON CancelRetrieval' {..} =+ Data.object+ ( Prelude.catMaybes+ [ Prelude.Just ("GatewayARN" Data..= gatewayARN),+ Prelude.Just ("TapeARN" Data..= tapeARN)+ ]+ )++instance Data.ToPath CancelRetrieval where+ toPath = Prelude.const "/"++instance Data.ToQuery CancelRetrieval where+ toQuery = Prelude.const Prelude.mempty++-- | CancelRetrievalOutput+--+-- /See:/ 'newCancelRetrievalResponse' smart constructor.+data CancelRetrievalResponse = CancelRetrievalResponse'+ { -- | The Amazon Resource Name (ARN) of the virtual tape for which retrieval+ -- was canceled.+ tapeARN :: 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 'CancelRetrievalResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'tapeARN', 'cancelRetrievalResponse_tapeARN' - The Amazon Resource Name (ARN) of the virtual tape for which retrieval+-- was canceled.+--+-- 'httpStatus', 'cancelRetrievalResponse_httpStatus' - The response's http status code.+newCancelRetrievalResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ CancelRetrievalResponse+newCancelRetrievalResponse pHttpStatus_ =+ CancelRetrievalResponse'+ { tapeARN = Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | The Amazon Resource Name (ARN) of the virtual tape for which retrieval+-- was canceled.+cancelRetrievalResponse_tapeARN :: Lens.Lens' CancelRetrievalResponse (Prelude.Maybe Prelude.Text)+cancelRetrievalResponse_tapeARN = Lens.lens (\CancelRetrievalResponse' {tapeARN} -> tapeARN) (\s@CancelRetrievalResponse' {} a -> s {tapeARN = a} :: CancelRetrievalResponse)++-- | The response's http status code.+cancelRetrievalResponse_httpStatus :: Lens.Lens' CancelRetrievalResponse Prelude.Int+cancelRetrievalResponse_httpStatus = Lens.lens (\CancelRetrievalResponse' {httpStatus} -> httpStatus) (\s@CancelRetrievalResponse' {} a -> s {httpStatus = a} :: CancelRetrievalResponse)++instance Prelude.NFData CancelRetrievalResponse where+ rnf CancelRetrievalResponse' {..} =+ Prelude.rnf tapeARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/CreateCachediSCSIVolume.hs view
@@ -0,0 +1,441 @@+{-# 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.CreateCachediSCSIVolume+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Creates a cached volume on a specified cached volume gateway. This+-- operation is only supported in the cached volume gateway type.+--+-- Cache storage must be allocated to the gateway before you can create a+-- cached volume. Use the AddCache operation to add cache storage to a+-- gateway.+--+-- In the request, you must specify the gateway, size of the volume in+-- bytes, the iSCSI target name, an IP address on which to expose the+-- target, and a unique client token. In response, the gateway creates the+-- volume and returns information about it. This information includes the+-- volume Amazon Resource Name (ARN), its size, and the iSCSI target ARN+-- that initiators can use to connect to the volume target.+--+-- Optionally, you can provide the ARN for an existing volume as the+-- @SourceVolumeARN@ for this cached volume, which creates an exact copy of+-- the existing volume’s latest recovery point. The @VolumeSizeInBytes@+-- value must be equal to or larger than the size of the copied volume, in+-- bytes.+module Amazonka.StorageGateway.CreateCachediSCSIVolume+ ( -- * Creating a Request+ CreateCachediSCSIVolume (..),+ newCreateCachediSCSIVolume,++ -- * Request Lenses+ createCachediSCSIVolume_kmsEncrypted,+ createCachediSCSIVolume_kmsKey,+ createCachediSCSIVolume_snapshotId,+ createCachediSCSIVolume_sourceVolumeARN,+ createCachediSCSIVolume_tags,+ createCachediSCSIVolume_gatewayARN,+ createCachediSCSIVolume_volumeSizeInBytes,+ createCachediSCSIVolume_targetName,+ createCachediSCSIVolume_networkInterfaceId,+ createCachediSCSIVolume_clientToken,++ -- * Destructuring the Response+ CreateCachediSCSIVolumeResponse (..),+ newCreateCachediSCSIVolumeResponse,++ -- * Response Lenses+ createCachediSCSIVolumeResponse_targetARN,+ createCachediSCSIVolumeResponse_volumeARN,+ createCachediSCSIVolumeResponse_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++-- | /See:/ 'newCreateCachediSCSIVolume' smart constructor.+data CreateCachediSCSIVolume = CreateCachediSCSIVolume'+ { -- | 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 snapshot ID (e.g. \"snap-1122aabb\") of the snapshot to restore as+ -- the new cached volume. Specify this field if you want to create the+ -- iSCSI storage volume from a snapshot; otherwise, do not include this+ -- field. To list snapshots for your account use+ -- <https://docs.aws.amazon.com/AWSEC2/latest/APIReference/ApiReference-query-DescribeSnapshots.html DescribeSnapshots>+ -- in the /Amazon Elastic Compute Cloud API Reference/.+ snapshotId :: Prelude.Maybe Prelude.Text,+ -- | The ARN for an existing volume. Specifying this ARN makes the new volume+ -- into an exact copy of the specified existing volume\'s latest recovery+ -- point. The @VolumeSizeInBytes@ value for this new volume must be equal+ -- to or larger than the size of the existing volume, in bytes.+ sourceVolumeARN :: Prelude.Maybe Prelude.Text,+ -- | A list of up to 50 tags that you can assign to a cached volume. Each tag+ -- is a key-value pair.+ --+ -- Valid characters for key and value are letters, spaces, and numbers that+ -- you can represent in UTF-8 format, and the following special characters:+ -- + - = . _ : \/ \@. The maximum length of a tag\'s key is 128 characters,+ -- and the maximum length for a tag\'s value is 256 characters.+ tags :: Prelude.Maybe [Tag],+ gatewayARN :: Prelude.Text,+ -- | The size of the volume in bytes.+ volumeSizeInBytes :: Prelude.Integer,+ -- | The name of the iSCSI target used by an initiator to connect to a volume+ -- and used as a suffix for the target ARN. For example, specifying+ -- @TargetName@ as /myvolume/ results in the target ARN of+ -- @arn:aws:storagegateway:us-east-2:111122223333:gateway\/sgw-12A3456B\/target\/iqn.1997-05.com.amazon:myvolume@.+ -- The target name must be unique across all volumes on a gateway.+ --+ -- If you don\'t specify a value, Storage Gateway uses the value that was+ -- previously used for this volume as the new target name.+ targetName :: Prelude.Text,+ -- | The network interface of the gateway on which to expose the iSCSI+ -- target. Only IPv4 addresses are accepted. Use DescribeGatewayInformation+ -- to get a list of the network interfaces available on a gateway.+ --+ -- Valid Values: A valid IP address.+ networkInterfaceId :: Prelude.Text,+ -- | A unique identifier that you use to retry a request. If you retry a+ -- request, use the same @ClientToken@ you specified in the initial+ -- request.+ clientToken :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'CreateCachediSCSIVolume' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'kmsEncrypted', 'createCachediSCSIVolume_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', 'createCachediSCSIVolume_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.+--+-- 'snapshotId', 'createCachediSCSIVolume_snapshotId' - The snapshot ID (e.g. \"snap-1122aabb\") of the snapshot to restore as+-- the new cached volume. Specify this field if you want to create the+-- iSCSI storage volume from a snapshot; otherwise, do not include this+-- field. To list snapshots for your account use+-- <https://docs.aws.amazon.com/AWSEC2/latest/APIReference/ApiReference-query-DescribeSnapshots.html DescribeSnapshots>+-- in the /Amazon Elastic Compute Cloud API Reference/.+--+-- 'sourceVolumeARN', 'createCachediSCSIVolume_sourceVolumeARN' - The ARN for an existing volume. Specifying this ARN makes the new volume+-- into an exact copy of the specified existing volume\'s latest recovery+-- point. The @VolumeSizeInBytes@ value for this new volume must be equal+-- to or larger than the size of the existing volume, in bytes.+--+-- 'tags', 'createCachediSCSIVolume_tags' - A list of up to 50 tags that you can assign to a cached volume. Each tag+-- is a key-value pair.+--+-- Valid characters for key and value are letters, spaces, and numbers that+-- you can represent in UTF-8 format, and the following special characters:+-- + - = . _ : \/ \@. The maximum length of a tag\'s key is 128 characters,+-- and the maximum length for a tag\'s value is 256 characters.+--+-- 'gatewayARN', 'createCachediSCSIVolume_gatewayARN' - Undocumented member.+--+-- 'volumeSizeInBytes', 'createCachediSCSIVolume_volumeSizeInBytes' - The size of the volume in bytes.+--+-- 'targetName', 'createCachediSCSIVolume_targetName' - The name of the iSCSI target used by an initiator to connect to a volume+-- and used as a suffix for the target ARN. For example, specifying+-- @TargetName@ as /myvolume/ results in the target ARN of+-- @arn:aws:storagegateway:us-east-2:111122223333:gateway\/sgw-12A3456B\/target\/iqn.1997-05.com.amazon:myvolume@.+-- The target name must be unique across all volumes on a gateway.+--+-- If you don\'t specify a value, Storage Gateway uses the value that was+-- previously used for this volume as the new target name.+--+-- 'networkInterfaceId', 'createCachediSCSIVolume_networkInterfaceId' - The network interface of the gateway on which to expose the iSCSI+-- target. Only IPv4 addresses are accepted. Use DescribeGatewayInformation+-- to get a list of the network interfaces available on a gateway.+--+-- Valid Values: A valid IP address.+--+-- 'clientToken', 'createCachediSCSIVolume_clientToken' - A unique identifier that you use to retry a request. If you retry a+-- request, use the same @ClientToken@ you specified in the initial+-- request.+newCreateCachediSCSIVolume ::+ -- | 'gatewayARN'+ Prelude.Text ->+ -- | 'volumeSizeInBytes'+ Prelude.Integer ->+ -- | 'targetName'+ Prelude.Text ->+ -- | 'networkInterfaceId'+ Prelude.Text ->+ -- | 'clientToken'+ Prelude.Text ->+ CreateCachediSCSIVolume+newCreateCachediSCSIVolume+ pGatewayARN_+ pVolumeSizeInBytes_+ pTargetName_+ pNetworkInterfaceId_+ pClientToken_ =+ CreateCachediSCSIVolume'+ { kmsEncrypted =+ Prelude.Nothing,+ kmsKey = Prelude.Nothing,+ snapshotId = Prelude.Nothing,+ sourceVolumeARN = Prelude.Nothing,+ tags = Prelude.Nothing,+ gatewayARN = pGatewayARN_,+ volumeSizeInBytes = pVolumeSizeInBytes_,+ targetName = pTargetName_,+ networkInterfaceId = pNetworkInterfaceId_,+ clientToken = pClientToken_+ }++-- | 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@+createCachediSCSIVolume_kmsEncrypted :: Lens.Lens' CreateCachediSCSIVolume (Prelude.Maybe Prelude.Bool)+createCachediSCSIVolume_kmsEncrypted = Lens.lens (\CreateCachediSCSIVolume' {kmsEncrypted} -> kmsEncrypted) (\s@CreateCachediSCSIVolume' {} a -> s {kmsEncrypted = a} :: CreateCachediSCSIVolume)++-- | 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.+createCachediSCSIVolume_kmsKey :: Lens.Lens' CreateCachediSCSIVolume (Prelude.Maybe Prelude.Text)+createCachediSCSIVolume_kmsKey = Lens.lens (\CreateCachediSCSIVolume' {kmsKey} -> kmsKey) (\s@CreateCachediSCSIVolume' {} a -> s {kmsKey = a} :: CreateCachediSCSIVolume)++-- | The snapshot ID (e.g. \"snap-1122aabb\") of the snapshot to restore as+-- the new cached volume. Specify this field if you want to create the+-- iSCSI storage volume from a snapshot; otherwise, do not include this+-- field. To list snapshots for your account use+-- <https://docs.aws.amazon.com/AWSEC2/latest/APIReference/ApiReference-query-DescribeSnapshots.html DescribeSnapshots>+-- in the /Amazon Elastic Compute Cloud API Reference/.+createCachediSCSIVolume_snapshotId :: Lens.Lens' CreateCachediSCSIVolume (Prelude.Maybe Prelude.Text)+createCachediSCSIVolume_snapshotId = Lens.lens (\CreateCachediSCSIVolume' {snapshotId} -> snapshotId) (\s@CreateCachediSCSIVolume' {} a -> s {snapshotId = a} :: CreateCachediSCSIVolume)++-- | The ARN for an existing volume. Specifying this ARN makes the new volume+-- into an exact copy of the specified existing volume\'s latest recovery+-- point. The @VolumeSizeInBytes@ value for this new volume must be equal+-- to or larger than the size of the existing volume, in bytes.+createCachediSCSIVolume_sourceVolumeARN :: Lens.Lens' CreateCachediSCSIVolume (Prelude.Maybe Prelude.Text)+createCachediSCSIVolume_sourceVolumeARN = Lens.lens (\CreateCachediSCSIVolume' {sourceVolumeARN} -> sourceVolumeARN) (\s@CreateCachediSCSIVolume' {} a -> s {sourceVolumeARN = a} :: CreateCachediSCSIVolume)++-- | A list of up to 50 tags that you can assign to a cached volume. Each tag+-- is a key-value pair.+--+-- Valid characters for key and value are letters, spaces, and numbers that+-- you can represent in UTF-8 format, and the following special characters:+-- + - = . _ : \/ \@. The maximum length of a tag\'s key is 128 characters,+-- and the maximum length for a tag\'s value is 256 characters.+createCachediSCSIVolume_tags :: Lens.Lens' CreateCachediSCSIVolume (Prelude.Maybe [Tag])+createCachediSCSIVolume_tags = Lens.lens (\CreateCachediSCSIVolume' {tags} -> tags) (\s@CreateCachediSCSIVolume' {} a -> s {tags = a} :: CreateCachediSCSIVolume) Prelude.. Lens.mapping Lens.coerced++-- | Undocumented member.+createCachediSCSIVolume_gatewayARN :: Lens.Lens' CreateCachediSCSIVolume Prelude.Text+createCachediSCSIVolume_gatewayARN = Lens.lens (\CreateCachediSCSIVolume' {gatewayARN} -> gatewayARN) (\s@CreateCachediSCSIVolume' {} a -> s {gatewayARN = a} :: CreateCachediSCSIVolume)++-- | The size of the volume in bytes.+createCachediSCSIVolume_volumeSizeInBytes :: Lens.Lens' CreateCachediSCSIVolume Prelude.Integer+createCachediSCSIVolume_volumeSizeInBytes = Lens.lens (\CreateCachediSCSIVolume' {volumeSizeInBytes} -> volumeSizeInBytes) (\s@CreateCachediSCSIVolume' {} a -> s {volumeSizeInBytes = a} :: CreateCachediSCSIVolume)++-- | The name of the iSCSI target used by an initiator to connect to a volume+-- and used as a suffix for the target ARN. For example, specifying+-- @TargetName@ as /myvolume/ results in the target ARN of+-- @arn:aws:storagegateway:us-east-2:111122223333:gateway\/sgw-12A3456B\/target\/iqn.1997-05.com.amazon:myvolume@.+-- The target name must be unique across all volumes on a gateway.+--+-- If you don\'t specify a value, Storage Gateway uses the value that was+-- previously used for this volume as the new target name.+createCachediSCSIVolume_targetName :: Lens.Lens' CreateCachediSCSIVolume Prelude.Text+createCachediSCSIVolume_targetName = Lens.lens (\CreateCachediSCSIVolume' {targetName} -> targetName) (\s@CreateCachediSCSIVolume' {} a -> s {targetName = a} :: CreateCachediSCSIVolume)++-- | The network interface of the gateway on which to expose the iSCSI+-- target. Only IPv4 addresses are accepted. Use DescribeGatewayInformation+-- to get a list of the network interfaces available on a gateway.+--+-- Valid Values: A valid IP address.+createCachediSCSIVolume_networkInterfaceId :: Lens.Lens' CreateCachediSCSIVolume Prelude.Text+createCachediSCSIVolume_networkInterfaceId = Lens.lens (\CreateCachediSCSIVolume' {networkInterfaceId} -> networkInterfaceId) (\s@CreateCachediSCSIVolume' {} a -> s {networkInterfaceId = a} :: CreateCachediSCSIVolume)++-- | A unique identifier that you use to retry a request. If you retry a+-- request, use the same @ClientToken@ you specified in the initial+-- request.+createCachediSCSIVolume_clientToken :: Lens.Lens' CreateCachediSCSIVolume Prelude.Text+createCachediSCSIVolume_clientToken = Lens.lens (\CreateCachediSCSIVolume' {clientToken} -> clientToken) (\s@CreateCachediSCSIVolume' {} a -> s {clientToken = a} :: CreateCachediSCSIVolume)++instance Core.AWSRequest CreateCachediSCSIVolume where+ type+ AWSResponse CreateCachediSCSIVolume =+ CreateCachediSCSIVolumeResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ CreateCachediSCSIVolumeResponse'+ Prelude.<$> (x Data..?> "TargetARN")+ Prelude.<*> (x Data..?> "VolumeARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable CreateCachediSCSIVolume where+ hashWithSalt _salt CreateCachediSCSIVolume' {..} =+ _salt+ `Prelude.hashWithSalt` kmsEncrypted+ `Prelude.hashWithSalt` kmsKey+ `Prelude.hashWithSalt` snapshotId+ `Prelude.hashWithSalt` sourceVolumeARN+ `Prelude.hashWithSalt` tags+ `Prelude.hashWithSalt` gatewayARN+ `Prelude.hashWithSalt` volumeSizeInBytes+ `Prelude.hashWithSalt` targetName+ `Prelude.hashWithSalt` networkInterfaceId+ `Prelude.hashWithSalt` clientToken++instance Prelude.NFData CreateCachediSCSIVolume where+ rnf CreateCachediSCSIVolume' {..} =+ Prelude.rnf kmsEncrypted+ `Prelude.seq` Prelude.rnf kmsKey+ `Prelude.seq` Prelude.rnf snapshotId+ `Prelude.seq` Prelude.rnf sourceVolumeARN+ `Prelude.seq` Prelude.rnf tags+ `Prelude.seq` Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf volumeSizeInBytes+ `Prelude.seq` Prelude.rnf targetName+ `Prelude.seq` Prelude.rnf networkInterfaceId+ `Prelude.seq` Prelude.rnf clientToken++instance Data.ToHeaders CreateCachediSCSIVolume where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.CreateCachediSCSIVolume" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON CreateCachediSCSIVolume where+ toJSON CreateCachediSCSIVolume' {..} =+ Data.object+ ( Prelude.catMaybes+ [ ("KMSEncrypted" Data..=) Prelude.<$> kmsEncrypted,+ ("KMSKey" Data..=) Prelude.<$> kmsKey,+ ("SnapshotId" Data..=) Prelude.<$> snapshotId,+ ("SourceVolumeARN" Data..=)+ Prelude.<$> sourceVolumeARN,+ ("Tags" Data..=) Prelude.<$> tags,+ Prelude.Just ("GatewayARN" Data..= gatewayARN),+ Prelude.Just+ ("VolumeSizeInBytes" Data..= volumeSizeInBytes),+ Prelude.Just ("TargetName" Data..= targetName),+ Prelude.Just+ ("NetworkInterfaceId" Data..= networkInterfaceId),+ Prelude.Just ("ClientToken" Data..= clientToken)+ ]+ )++instance Data.ToPath CreateCachediSCSIVolume where+ toPath = Prelude.const "/"++instance Data.ToQuery CreateCachediSCSIVolume where+ toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newCreateCachediSCSIVolumeResponse' smart constructor.+data CreateCachediSCSIVolumeResponse = CreateCachediSCSIVolumeResponse'+ { -- | The Amazon Resource Name (ARN) of the volume target, which includes the+ -- iSCSI name that initiators can use to connect to the target.+ targetARN :: Prelude.Maybe Prelude.Text,+ -- | The Amazon Resource Name (ARN) of the configured volume.+ volumeARN :: 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 'CreateCachediSCSIVolumeResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'targetARN', 'createCachediSCSIVolumeResponse_targetARN' - The Amazon Resource Name (ARN) of the volume target, which includes the+-- iSCSI name that initiators can use to connect to the target.+--+-- 'volumeARN', 'createCachediSCSIVolumeResponse_volumeARN' - The Amazon Resource Name (ARN) of the configured volume.+--+-- 'httpStatus', 'createCachediSCSIVolumeResponse_httpStatus' - The response's http status code.+newCreateCachediSCSIVolumeResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ CreateCachediSCSIVolumeResponse+newCreateCachediSCSIVolumeResponse pHttpStatus_ =+ CreateCachediSCSIVolumeResponse'+ { targetARN =+ Prelude.Nothing,+ volumeARN = Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | The Amazon Resource Name (ARN) of the volume target, which includes the+-- iSCSI name that initiators can use to connect to the target.+createCachediSCSIVolumeResponse_targetARN :: Lens.Lens' CreateCachediSCSIVolumeResponse (Prelude.Maybe Prelude.Text)+createCachediSCSIVolumeResponse_targetARN = Lens.lens (\CreateCachediSCSIVolumeResponse' {targetARN} -> targetARN) (\s@CreateCachediSCSIVolumeResponse' {} a -> s {targetARN = a} :: CreateCachediSCSIVolumeResponse)++-- | The Amazon Resource Name (ARN) of the configured volume.+createCachediSCSIVolumeResponse_volumeARN :: Lens.Lens' CreateCachediSCSIVolumeResponse (Prelude.Maybe Prelude.Text)+createCachediSCSIVolumeResponse_volumeARN = Lens.lens (\CreateCachediSCSIVolumeResponse' {volumeARN} -> volumeARN) (\s@CreateCachediSCSIVolumeResponse' {} a -> s {volumeARN = a} :: CreateCachediSCSIVolumeResponse)++-- | The response's http status code.+createCachediSCSIVolumeResponse_httpStatus :: Lens.Lens' CreateCachediSCSIVolumeResponse Prelude.Int+createCachediSCSIVolumeResponse_httpStatus = Lens.lens (\CreateCachediSCSIVolumeResponse' {httpStatus} -> httpStatus) (\s@CreateCachediSCSIVolumeResponse' {} a -> s {httpStatus = a} :: CreateCachediSCSIVolumeResponse)++instance+ Prelude.NFData+ CreateCachediSCSIVolumeResponse+ where+ rnf CreateCachediSCSIVolumeResponse' {..} =+ Prelude.rnf targetARN+ `Prelude.seq` Prelude.rnf volumeARN+ `Prelude.seq` Prelude.rnf httpStatus
@@ -0,0 +1,765 @@+{-# 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.CreateNFSFileShare+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Creates a Network File System (NFS) file share on an existing S3 File+-- Gateway. In Storage Gateway, a file share is a file system mount point+-- backed by Amazon S3 cloud storage. Storage Gateway exposes file shares+-- using an NFS interface. This operation is only supported for S3 File+-- Gateways.+--+-- S3 File gateway requires Security Token Service (Amazon Web Services+-- STS) to be activated to enable you to create a file share. Make sure+-- Amazon Web Services STS is activated in the Amazon Web Services Region+-- you are creating your S3 File Gateway in. If Amazon Web Services STS is+-- not activated in the Amazon Web Services Region, activate it. For+-- information about how to activate Amazon Web Services STS, see+-- <https://docs.aws.amazon.com/IAM/latest/UserGuide/id_credentials_temp_enable-regions.html Activating and deactivating Amazon Web Services STS in an Amazon Web Services Region>+-- in the /Identity and Access Management User Guide/.+--+-- S3 File Gateways do not support creating hard or symbolic links on a+-- file share.+module Amazonka.StorageGateway.CreateNFSFileShare+ ( -- * Creating a Request+ CreateNFSFileShare (..),+ newCreateNFSFileShare,++ -- * Request Lenses+ createNFSFileShare_auditDestinationARN,+ createNFSFileShare_bucketRegion,+ createNFSFileShare_cacheAttributes,+ createNFSFileShare_clientList,+ createNFSFileShare_defaultStorageClass,+ createNFSFileShare_fileShareName,+ createNFSFileShare_guessMIMETypeEnabled,+ createNFSFileShare_kmsEncrypted,+ createNFSFileShare_kmsKey,+ createNFSFileShare_nFSFileShareDefaults,+ createNFSFileShare_notificationPolicy,+ createNFSFileShare_objectACL,+ createNFSFileShare_readOnly,+ createNFSFileShare_requesterPays,+ createNFSFileShare_squash,+ createNFSFileShare_tags,+ createNFSFileShare_vPCEndpointDNSName,+ createNFSFileShare_clientToken,+ createNFSFileShare_gatewayARN,+ createNFSFileShare_role,+ createNFSFileShare_locationARN,++ -- * Destructuring the Response+ CreateNFSFileShareResponse (..),+ newCreateNFSFileShareResponse,++ -- * Response Lenses+ createNFSFileShareResponse_fileShareARN,+ createNFSFileShareResponse_httpStatus,+ )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Data as Data+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Request as Request+import qualified Amazonka.Response as Response+import Amazonka.StorageGateway.Types++-- | CreateNFSFileShareInput+--+-- /See:/ 'newCreateNFSFileShare' smart constructor.+data CreateNFSFileShare = CreateNFSFileShare'+ { -- | The Amazon Resource Name (ARN) of the storage used for audit logs.+ auditDestinationARN :: Prelude.Maybe Prelude.Text,+ -- | Specifies the Region of the S3 bucket where the NFS file share stores+ -- files.+ --+ -- This parameter is required for NFS file shares that connect to Amazon S3+ -- through a VPC endpoint, a VPC access point, or an access point alias+ -- that points to a VPC access point.+ bucketRegion :: 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,+ -- | File share default values. 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,+ -- | A value that maps a user 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,+ -- | A list of up to 50 tags that can be assigned to the NFS file share. Each+ -- tag is a key-value pair.+ --+ -- Valid characters for key and value are letters, spaces, and numbers+ -- representable in UTF-8 format, and the following special characters: + -+ -- = . _ : \/ \@. The maximum length of a tag\'s key is 128 characters, and+ -- the maximum length for a tag\'s value is 256.+ tags :: Prelude.Maybe [Tag],+ -- | Specifies the DNS name for the VPC endpoint that the NFS file share uses+ -- to connect to Amazon S3.+ --+ -- This parameter is required for NFS file shares that connect to Amazon S3+ -- through a VPC endpoint, a VPC access point, or an access point alias+ -- that points to a VPC access point.+ vPCEndpointDNSName :: Prelude.Maybe Prelude.Text,+ -- | A unique string value that you supply that is used by S3 File Gateway to+ -- ensure idempotent file share creation.+ clientToken :: Prelude.Text,+ -- | The Amazon Resource Name (ARN) of the S3 File Gateway on which you want+ -- to create a file share.+ gatewayARN :: Prelude.Text,+ -- | The ARN of the Identity and Access Management (IAM) role that an S3 File+ -- Gateway assumes when it accesses the underlying storage.+ role' :: Prelude.Text,+ -- | A custom ARN for the backend storage used for storing data for file+ -- shares. It includes a resource ARN with an optional prefix+ -- concatenation. The prefix must end with a forward slash (\/).+ --+ -- You can specify LocationARN as a bucket ARN, access point ARN or access+ -- point alias, as shown in the following examples.+ --+ -- Bucket ARN:+ --+ -- @arn:aws:s3:::my-bucket\/prefix\/@+ --+ -- Access point ARN:+ --+ -- @arn:aws:s3:region:account-id:accesspoint\/access-point-name\/prefix\/@+ --+ -- If you specify an access point, the bucket policy must be configured to+ -- delegate access control to the access point. For information, see+ -- <https://docs.aws.amazon.com/AmazonS3/latest/userguide/access-points-policies.html#access-points-delegating-control Delegating access control to access points>+ -- in the /Amazon S3 User Guide/.+ --+ -- Access point alias:+ --+ -- @test-ap-ab123cdef4gehijklmn5opqrstuvuse1a-s3alias@+ locationARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'CreateNFSFileShare' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'auditDestinationARN', 'createNFSFileShare_auditDestinationARN' - The Amazon Resource Name (ARN) of the storage used for audit logs.+--+-- 'bucketRegion', 'createNFSFileShare_bucketRegion' - Specifies the Region of the S3 bucket where the NFS file share stores+-- files.+--+-- This parameter is required for NFS file shares that connect to Amazon S3+-- through a VPC endpoint, a VPC access point, or an access point alias+-- that points to a VPC access point.+--+-- 'cacheAttributes', 'createNFSFileShare_cacheAttributes' - Specifies refresh cache information for the file share.+--+-- 'clientList', 'createNFSFileShare_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', 'createNFSFileShare_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', 'createNFSFileShare_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', 'createNFSFileShare_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', 'createNFSFileShare_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', 'createNFSFileShare_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', 'createNFSFileShare_nFSFileShareDefaults' - File share default values. Optional.+--+-- 'notificationPolicy', 'createNFSFileShare_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', 'createNFSFileShare_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', 'createNFSFileShare_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', 'createNFSFileShare_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', 'createNFSFileShare_squash' - A value that maps a user 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.+--+-- 'tags', 'createNFSFileShare_tags' - A list of up to 50 tags that can be assigned to the NFS file share. Each+-- tag is a key-value pair.+--+-- Valid characters for key and value are letters, spaces, and numbers+-- representable in UTF-8 format, and the following special characters: + -+-- = . _ : \/ \@. The maximum length of a tag\'s key is 128 characters, and+-- the maximum length for a tag\'s value is 256.+--+-- 'vPCEndpointDNSName', 'createNFSFileShare_vPCEndpointDNSName' - Specifies the DNS name for the VPC endpoint that the NFS file share uses+-- to connect to Amazon S3.+--+-- This parameter is required for NFS file shares that connect to Amazon S3+-- through a VPC endpoint, a VPC access point, or an access point alias+-- that points to a VPC access point.+--+-- 'clientToken', 'createNFSFileShare_clientToken' - A unique string value that you supply that is used by S3 File Gateway to+-- ensure idempotent file share creation.+--+-- 'gatewayARN', 'createNFSFileShare_gatewayARN' - The Amazon Resource Name (ARN) of the S3 File Gateway on which you want+-- to create a file share.+--+-- 'role'', 'createNFSFileShare_role' - The ARN of the Identity and Access Management (IAM) role that an S3 File+-- Gateway assumes when it accesses the underlying storage.+--+-- 'locationARN', 'createNFSFileShare_locationARN' - A custom ARN for the backend storage used for storing data for file+-- shares. It includes a resource ARN with an optional prefix+-- concatenation. The prefix must end with a forward slash (\/).+--+-- You can specify LocationARN as a bucket ARN, access point ARN or access+-- point alias, as shown in the following examples.+--+-- Bucket ARN:+--+-- @arn:aws:s3:::my-bucket\/prefix\/@+--+-- Access point ARN:+--+-- @arn:aws:s3:region:account-id:accesspoint\/access-point-name\/prefix\/@+--+-- If you specify an access point, the bucket policy must be configured to+-- delegate access control to the access point. For information, see+-- <https://docs.aws.amazon.com/AmazonS3/latest/userguide/access-points-policies.html#access-points-delegating-control Delegating access control to access points>+-- in the /Amazon S3 User Guide/.+--+-- Access point alias:+--+-- @test-ap-ab123cdef4gehijklmn5opqrstuvuse1a-s3alias@+newCreateNFSFileShare ::+ -- | 'clientToken'+ Prelude.Text ->+ -- | 'gatewayARN'+ Prelude.Text ->+ -- | 'role''+ Prelude.Text ->+ -- | 'locationARN'+ Prelude.Text ->+ CreateNFSFileShare+newCreateNFSFileShare+ pClientToken_+ pGatewayARN_+ pRole_+ pLocationARN_ =+ CreateNFSFileShare'+ { auditDestinationARN =+ Prelude.Nothing,+ bucketRegion = 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,+ tags = Prelude.Nothing,+ vPCEndpointDNSName = Prelude.Nothing,+ clientToken = pClientToken_,+ gatewayARN = pGatewayARN_,+ role' = pRole_,+ locationARN = pLocationARN_+ }++-- | The Amazon Resource Name (ARN) of the storage used for audit logs.+createNFSFileShare_auditDestinationARN :: Lens.Lens' CreateNFSFileShare (Prelude.Maybe Prelude.Text)+createNFSFileShare_auditDestinationARN = Lens.lens (\CreateNFSFileShare' {auditDestinationARN} -> auditDestinationARN) (\s@CreateNFSFileShare' {} a -> s {auditDestinationARN = a} :: CreateNFSFileShare)++-- | Specifies the Region of the S3 bucket where the NFS file share stores+-- files.+--+-- This parameter is required for NFS file shares that connect to Amazon S3+-- through a VPC endpoint, a VPC access point, or an access point alias+-- that points to a VPC access point.+createNFSFileShare_bucketRegion :: Lens.Lens' CreateNFSFileShare (Prelude.Maybe Prelude.Text)+createNFSFileShare_bucketRegion = Lens.lens (\CreateNFSFileShare' {bucketRegion} -> bucketRegion) (\s@CreateNFSFileShare' {} a -> s {bucketRegion = a} :: CreateNFSFileShare)++-- | Specifies refresh cache information for the file share.+createNFSFileShare_cacheAttributes :: Lens.Lens' CreateNFSFileShare (Prelude.Maybe CacheAttributes)+createNFSFileShare_cacheAttributes = Lens.lens (\CreateNFSFileShare' {cacheAttributes} -> cacheAttributes) (\s@CreateNFSFileShare' {} a -> s {cacheAttributes = a} :: CreateNFSFileShare)++-- | 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.+createNFSFileShare_clientList :: Lens.Lens' CreateNFSFileShare (Prelude.Maybe (Prelude.NonEmpty Prelude.Text))+createNFSFileShare_clientList = Lens.lens (\CreateNFSFileShare' {clientList} -> clientList) (\s@CreateNFSFileShare' {} a -> s {clientList = a} :: CreateNFSFileShare) 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@+createNFSFileShare_defaultStorageClass :: Lens.Lens' CreateNFSFileShare (Prelude.Maybe Prelude.Text)+createNFSFileShare_defaultStorageClass = Lens.lens (\CreateNFSFileShare' {defaultStorageClass} -> defaultStorageClass) (\s@CreateNFSFileShare' {} a -> s {defaultStorageClass = a} :: CreateNFSFileShare)++-- | 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.+createNFSFileShare_fileShareName :: Lens.Lens' CreateNFSFileShare (Prelude.Maybe Prelude.Text)+createNFSFileShare_fileShareName = Lens.lens (\CreateNFSFileShare' {fileShareName} -> fileShareName) (\s@CreateNFSFileShare' {} a -> s {fileShareName = a} :: CreateNFSFileShare)++-- | 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@+createNFSFileShare_guessMIMETypeEnabled :: Lens.Lens' CreateNFSFileShare (Prelude.Maybe Prelude.Bool)+createNFSFileShare_guessMIMETypeEnabled = Lens.lens (\CreateNFSFileShare' {guessMIMETypeEnabled} -> guessMIMETypeEnabled) (\s@CreateNFSFileShare' {} a -> s {guessMIMETypeEnabled = a} :: CreateNFSFileShare)++-- | 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@+createNFSFileShare_kmsEncrypted :: Lens.Lens' CreateNFSFileShare (Prelude.Maybe Prelude.Bool)+createNFSFileShare_kmsEncrypted = Lens.lens (\CreateNFSFileShare' {kmsEncrypted} -> kmsEncrypted) (\s@CreateNFSFileShare' {} a -> s {kmsEncrypted = a} :: CreateNFSFileShare)++-- | 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.+createNFSFileShare_kmsKey :: Lens.Lens' CreateNFSFileShare (Prelude.Maybe Prelude.Text)+createNFSFileShare_kmsKey = Lens.lens (\CreateNFSFileShare' {kmsKey} -> kmsKey) (\s@CreateNFSFileShare' {} a -> s {kmsKey = a} :: CreateNFSFileShare)++-- | File share default values. Optional.+createNFSFileShare_nFSFileShareDefaults :: Lens.Lens' CreateNFSFileShare (Prelude.Maybe NFSFileShareDefaults)+createNFSFileShare_nFSFileShareDefaults = Lens.lens (\CreateNFSFileShare' {nFSFileShareDefaults} -> nFSFileShareDefaults) (\s@CreateNFSFileShare' {} a -> s {nFSFileShareDefaults = a} :: CreateNFSFileShare)++-- | 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.+--+-- @{}@+createNFSFileShare_notificationPolicy :: Lens.Lens' CreateNFSFileShare (Prelude.Maybe Prelude.Text)+createNFSFileShare_notificationPolicy = Lens.lens (\CreateNFSFileShare' {notificationPolicy} -> notificationPolicy) (\s@CreateNFSFileShare' {} a -> s {notificationPolicy = a} :: CreateNFSFileShare)++-- | 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@.+createNFSFileShare_objectACL :: Lens.Lens' CreateNFSFileShare (Prelude.Maybe ObjectACL)+createNFSFileShare_objectACL = Lens.lens (\CreateNFSFileShare' {objectACL} -> objectACL) (\s@CreateNFSFileShare' {} a -> s {objectACL = a} :: CreateNFSFileShare)++-- | 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@+createNFSFileShare_readOnly :: Lens.Lens' CreateNFSFileShare (Prelude.Maybe Prelude.Bool)+createNFSFileShare_readOnly = Lens.lens (\CreateNFSFileShare' {readOnly} -> readOnly) (\s@CreateNFSFileShare' {} a -> s {readOnly = a} :: CreateNFSFileShare)++-- | 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@+createNFSFileShare_requesterPays :: Lens.Lens' CreateNFSFileShare (Prelude.Maybe Prelude.Bool)+createNFSFileShare_requesterPays = Lens.lens (\CreateNFSFileShare' {requesterPays} -> requesterPays) (\s@CreateNFSFileShare' {} a -> s {requesterPays = a} :: CreateNFSFileShare)++-- | A value that maps a user 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.+createNFSFileShare_squash :: Lens.Lens' CreateNFSFileShare (Prelude.Maybe Prelude.Text)+createNFSFileShare_squash = Lens.lens (\CreateNFSFileShare' {squash} -> squash) (\s@CreateNFSFileShare' {} a -> s {squash = a} :: CreateNFSFileShare)++-- | A list of up to 50 tags that can be assigned to the NFS file share. Each+-- tag is a key-value pair.+--+-- Valid characters for key and value are letters, spaces, and numbers+-- representable in UTF-8 format, and the following special characters: + -+-- = . _ : \/ \@. The maximum length of a tag\'s key is 128 characters, and+-- the maximum length for a tag\'s value is 256.+createNFSFileShare_tags :: Lens.Lens' CreateNFSFileShare (Prelude.Maybe [Tag])+createNFSFileShare_tags = Lens.lens (\CreateNFSFileShare' {tags} -> tags) (\s@CreateNFSFileShare' {} a -> s {tags = a} :: CreateNFSFileShare) Prelude.. Lens.mapping Lens.coerced++-- | Specifies the DNS name for the VPC endpoint that the NFS file share uses+-- to connect to Amazon S3.+--+-- This parameter is required for NFS file shares that connect to Amazon S3+-- through a VPC endpoint, a VPC access point, or an access point alias+-- that points to a VPC access point.+createNFSFileShare_vPCEndpointDNSName :: Lens.Lens' CreateNFSFileShare (Prelude.Maybe Prelude.Text)+createNFSFileShare_vPCEndpointDNSName = Lens.lens (\CreateNFSFileShare' {vPCEndpointDNSName} -> vPCEndpointDNSName) (\s@CreateNFSFileShare' {} a -> s {vPCEndpointDNSName = a} :: CreateNFSFileShare)++-- | A unique string value that you supply that is used by S3 File Gateway to+-- ensure idempotent file share creation.+createNFSFileShare_clientToken :: Lens.Lens' CreateNFSFileShare Prelude.Text+createNFSFileShare_clientToken = Lens.lens (\CreateNFSFileShare' {clientToken} -> clientToken) (\s@CreateNFSFileShare' {} a -> s {clientToken = a} :: CreateNFSFileShare)++-- | The Amazon Resource Name (ARN) of the S3 File Gateway on which you want+-- to create a file share.+createNFSFileShare_gatewayARN :: Lens.Lens' CreateNFSFileShare Prelude.Text+createNFSFileShare_gatewayARN = Lens.lens (\CreateNFSFileShare' {gatewayARN} -> gatewayARN) (\s@CreateNFSFileShare' {} a -> s {gatewayARN = a} :: CreateNFSFileShare)++-- | The ARN of the Identity and Access Management (IAM) role that an S3 File+-- Gateway assumes when it accesses the underlying storage.+createNFSFileShare_role :: Lens.Lens' CreateNFSFileShare Prelude.Text+createNFSFileShare_role = Lens.lens (\CreateNFSFileShare' {role'} -> role') (\s@CreateNFSFileShare' {} a -> s {role' = a} :: CreateNFSFileShare)++-- | A custom ARN for the backend storage used for storing data for file+-- shares. It includes a resource ARN with an optional prefix+-- concatenation. The prefix must end with a forward slash (\/).+--+-- You can specify LocationARN as a bucket ARN, access point ARN or access+-- point alias, as shown in the following examples.+--+-- Bucket ARN:+--+-- @arn:aws:s3:::my-bucket\/prefix\/@+--+-- Access point ARN:+--+-- @arn:aws:s3:region:account-id:accesspoint\/access-point-name\/prefix\/@+--+-- If you specify an access point, the bucket policy must be configured to+-- delegate access control to the access point. For information, see+-- <https://docs.aws.amazon.com/AmazonS3/latest/userguide/access-points-policies.html#access-points-delegating-control Delegating access control to access points>+-- in the /Amazon S3 User Guide/.+--+-- Access point alias:+--+-- @test-ap-ab123cdef4gehijklmn5opqrstuvuse1a-s3alias@+createNFSFileShare_locationARN :: Lens.Lens' CreateNFSFileShare Prelude.Text+createNFSFileShare_locationARN = Lens.lens (\CreateNFSFileShare' {locationARN} -> locationARN) (\s@CreateNFSFileShare' {} a -> s {locationARN = a} :: CreateNFSFileShare)++instance Core.AWSRequest CreateNFSFileShare where+ type+ AWSResponse CreateNFSFileShare =+ CreateNFSFileShareResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ CreateNFSFileShareResponse'+ Prelude.<$> (x Data..?> "FileShareARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable CreateNFSFileShare where+ hashWithSalt _salt CreateNFSFileShare' {..} =+ _salt+ `Prelude.hashWithSalt` auditDestinationARN+ `Prelude.hashWithSalt` bucketRegion+ `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` tags+ `Prelude.hashWithSalt` vPCEndpointDNSName+ `Prelude.hashWithSalt` clientToken+ `Prelude.hashWithSalt` gatewayARN+ `Prelude.hashWithSalt` role'+ `Prelude.hashWithSalt` locationARN++instance Prelude.NFData CreateNFSFileShare where+ rnf CreateNFSFileShare' {..} =+ Prelude.rnf auditDestinationARN+ `Prelude.seq` Prelude.rnf bucketRegion+ `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 tags+ `Prelude.seq` Prelude.rnf vPCEndpointDNSName+ `Prelude.seq` Prelude.rnf clientToken+ `Prelude.seq` Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf role'+ `Prelude.seq` Prelude.rnf locationARN++instance Data.ToHeaders CreateNFSFileShare where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.CreateNFSFileShare" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON CreateNFSFileShare where+ toJSON CreateNFSFileShare' {..} =+ Data.object+ ( Prelude.catMaybes+ [ ("AuditDestinationARN" Data..=)+ Prelude.<$> auditDestinationARN,+ ("BucketRegion" Data..=) Prelude.<$> bucketRegion,+ ("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,+ ("Tags" Data..=) Prelude.<$> tags,+ ("VPCEndpointDNSName" Data..=)+ Prelude.<$> vPCEndpointDNSName,+ Prelude.Just ("ClientToken" Data..= clientToken),+ Prelude.Just ("GatewayARN" Data..= gatewayARN),+ Prelude.Just ("Role" Data..= role'),+ Prelude.Just ("LocationARN" Data..= locationARN)+ ]+ )++instance Data.ToPath CreateNFSFileShare where+ toPath = Prelude.const "/"++instance Data.ToQuery CreateNFSFileShare where+ toQuery = Prelude.const Prelude.mempty++-- | CreateNFSFileShareOutput+--+-- /See:/ 'newCreateNFSFileShareResponse' smart constructor.+data CreateNFSFileShareResponse = CreateNFSFileShareResponse'+ { -- | The Amazon Resource Name (ARN) of the newly created 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 'CreateNFSFileShareResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'fileShareARN', 'createNFSFileShareResponse_fileShareARN' - The Amazon Resource Name (ARN) of the newly created file share.+--+-- 'httpStatus', 'createNFSFileShareResponse_httpStatus' - The response's http status code.+newCreateNFSFileShareResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ CreateNFSFileShareResponse+newCreateNFSFileShareResponse pHttpStatus_ =+ CreateNFSFileShareResponse'+ { fileShareARN =+ Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | The Amazon Resource Name (ARN) of the newly created file share.+createNFSFileShareResponse_fileShareARN :: Lens.Lens' CreateNFSFileShareResponse (Prelude.Maybe Prelude.Text)+createNFSFileShareResponse_fileShareARN = Lens.lens (\CreateNFSFileShareResponse' {fileShareARN} -> fileShareARN) (\s@CreateNFSFileShareResponse' {} a -> s {fileShareARN = a} :: CreateNFSFileShareResponse)++-- | The response's http status code.+createNFSFileShareResponse_httpStatus :: Lens.Lens' CreateNFSFileShareResponse Prelude.Int+createNFSFileShareResponse_httpStatus = Lens.lens (\CreateNFSFileShareResponse' {httpStatus} -> httpStatus) (\s@CreateNFSFileShareResponse' {} a -> s {httpStatus = a} :: CreateNFSFileShareResponse)++instance Prelude.NFData CreateNFSFileShareResponse where+ rnf CreateNFSFileShareResponse' {..} =+ Prelude.rnf fileShareARN+ `Prelude.seq` Prelude.rnf httpStatus
@@ -0,0 +1,914 @@+{-# 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.CreateSMBFileShare+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Creates a Server Message Block (SMB) file share on an existing S3 File+-- Gateway. In Storage Gateway, a file share is a file system mount point+-- backed by Amazon S3 cloud storage. Storage Gateway exposes file shares+-- using an SMB interface. This operation is only supported for S3 File+-- Gateways.+--+-- S3 File Gateways require Security Token Service (Amazon Web Services+-- STS) to be activated to enable you to create a file share. Make sure+-- that Amazon Web Services STS is activated in the Amazon Web Services+-- Region you are creating your S3 File Gateway in. If Amazon Web Services+-- STS is not activated in this Amazon Web Services Region, activate it.+-- For information about how to activate Amazon Web Services STS, see+-- <https://docs.aws.amazon.com/IAM/latest/UserGuide/id_credentials_temp_enable-regions.html Activating and deactivating Amazon Web Services STS in an Amazon Web Services Region>+-- in the /Identity and Access Management User Guide/.+--+-- File gateways don\'t support creating hard or symbolic links on a file+-- share.+module Amazonka.StorageGateway.CreateSMBFileShare+ ( -- * Creating a Request+ CreateSMBFileShare (..),+ newCreateSMBFileShare,++ -- * Request Lenses+ createSMBFileShare_accessBasedEnumeration,+ createSMBFileShare_adminUserList,+ createSMBFileShare_auditDestinationARN,+ createSMBFileShare_authentication,+ createSMBFileShare_bucketRegion,+ createSMBFileShare_cacheAttributes,+ createSMBFileShare_caseSensitivity,+ createSMBFileShare_defaultStorageClass,+ createSMBFileShare_fileShareName,+ createSMBFileShare_guessMIMETypeEnabled,+ createSMBFileShare_invalidUserList,+ createSMBFileShare_kmsEncrypted,+ createSMBFileShare_kmsKey,+ createSMBFileShare_notificationPolicy,+ createSMBFileShare_objectACL,+ createSMBFileShare_oplocksEnabled,+ createSMBFileShare_readOnly,+ createSMBFileShare_requesterPays,+ createSMBFileShare_sMBACLEnabled,+ createSMBFileShare_tags,+ createSMBFileShare_vPCEndpointDNSName,+ createSMBFileShare_validUserList,+ createSMBFileShare_clientToken,+ createSMBFileShare_gatewayARN,+ createSMBFileShare_role,+ createSMBFileShare_locationARN,++ -- * Destructuring the Response+ CreateSMBFileShareResponse (..),+ newCreateSMBFileShareResponse,++ -- * Response Lenses+ createSMBFileShareResponse_fileShareARN,+ createSMBFileShareResponse_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++-- | CreateSMBFileShareInput+--+-- /See:/ 'newCreateSMBFileShare' smart constructor.+data CreateSMBFileShare = CreateSMBFileShare'+ { -- | The files and folders on this share will only be visible to users with+ -- read access.+ accessBasedEnumeration :: Prelude.Maybe Prelude.Bool,+ -- | A list of users or groups in the Active Directory that will be granted+ -- administrator privileges on the file share. These users can do all file+ -- operations as the super-user. Acceptable formats include:+ -- @DOMAIN\\User1@, @user1@, @\@group1@, and @\@DOMAIN\\group1@.+ --+ -- Use this option very carefully, because any user in this list can do+ -- anything they like on the file share, regardless of file permissions.+ adminUserList :: Prelude.Maybe [Prelude.Text],+ -- | The Amazon Resource Name (ARN) of the storage used for audit logs.+ auditDestinationARN :: Prelude.Maybe Prelude.Text,+ -- | The authentication method that users use to access the file share. The+ -- default is @ActiveDirectory@.+ --+ -- Valid Values: @ActiveDirectory@ | @GuestAccess@+ authentication :: Prelude.Maybe Prelude.Text,+ -- | Specifies the Region of the S3 bucket where the SMB file share stores+ -- files.+ --+ -- This parameter is required for SMB file shares that connect to Amazon S3+ -- through a VPC endpoint, a VPC access point, or an access point alias+ -- that points to a VPC access point.+ bucketRegion :: Prelude.Maybe Prelude.Text,+ -- | Specifies refresh cache information for the file share.+ cacheAttributes :: Prelude.Maybe CacheAttributes,+ -- | The case of an object name in an Amazon S3 bucket. For+ -- @ClientSpecified@, the client determines the case sensitivity. For+ -- @CaseSensitive@, the gateway determines the case sensitivity. The+ -- default value is @ClientSpecified@.+ caseSensitivity :: Prelude.Maybe CaseSensitivity,+ -- | 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,+ -- | A list of users or groups in the Active Directory that are not allowed+ -- to access the file share. A group must be prefixed with the \@+ -- character. Acceptable formats include: @DOMAIN\\User1@, @user1@,+ -- @\@group1@, and @\@DOMAIN\\group1@. Can only be set if Authentication is+ -- set to @ActiveDirectory@.+ invalidUserList :: Prelude.Maybe [Prelude.Text],+ -- | 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 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,+ -- | Specifies whether opportunistic locking is enabled for the SMB file+ -- share.+ --+ -- Enabling opportunistic locking on case-sensitive shares is not+ -- recommended for workloads that involve access to files with the same+ -- name in different case.+ --+ -- Valid Values: @true@ | @false@+ oplocksEnabled :: Prelude.Maybe Prelude.Bool,+ -- | 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,+ -- | Set this value to @true@ to enable access control list (ACL) on the SMB+ -- file share. Set it to @false@ to map file and directory permissions to+ -- the POSIX permissions.+ --+ -- For more information, see+ -- <https://docs.aws.amazon.com/storagegateway/latest/userguide/smb-acl.html Using Microsoft Windows ACLs to control access to an SMB file share>+ -- in the /Storage Gateway User Guide/.+ --+ -- Valid Values: @true@ | @false@+ sMBACLEnabled :: Prelude.Maybe Prelude.Bool,+ -- | A list of up to 50 tags that can be assigned to the NFS file share. Each+ -- tag is a key-value pair.+ --+ -- Valid characters for key and value are letters, spaces, and numbers+ -- representable in UTF-8 format, and the following special characters: + -+ -- = . _ : \/ \@. The maximum length of a tag\'s key is 128 characters, and+ -- the maximum length for a tag\'s value is 256.+ tags :: Prelude.Maybe [Tag],+ -- | Specifies the DNS name for the VPC endpoint that the SMB file share uses+ -- to connect to Amazon S3.+ --+ -- This parameter is required for SMB file shares that connect to Amazon S3+ -- through a VPC endpoint, a VPC access point, or an access point alias+ -- that points to a VPC access point.+ vPCEndpointDNSName :: Prelude.Maybe Prelude.Text,+ -- | A list of users or groups in the Active Directory that are allowed to+ -- access the file < > share. A group must be prefixed with the \@+ -- character. Acceptable formats include: @DOMAIN\\User1@, @user1@,+ -- @\@group1@, and @\@DOMAIN\\group1@. Can only be set if Authentication is+ -- set to @ActiveDirectory@.+ validUserList :: Prelude.Maybe [Prelude.Text],+ -- | A unique string value that you supply that is used by S3 File Gateway to+ -- ensure idempotent file share creation.+ clientToken :: Prelude.Text,+ -- | The ARN of the S3 File Gateway on which you want to create a file share.+ gatewayARN :: Prelude.Text,+ -- | The ARN of the Identity and Access Management (IAM) role that an S3 File+ -- Gateway assumes when it accesses the underlying storage.+ role' :: Prelude.Text,+ -- | A custom ARN for the backend storage used for storing data for file+ -- shares. It includes a resource ARN with an optional prefix+ -- concatenation. The prefix must end with a forward slash (\/).+ --+ -- You can specify LocationARN as a bucket ARN, access point ARN or access+ -- point alias, as shown in the following examples.+ --+ -- Bucket ARN:+ --+ -- @arn:aws:s3:::my-bucket\/prefix\/@+ --+ -- Access point ARN:+ --+ -- @arn:aws:s3:region:account-id:accesspoint\/access-point-name\/prefix\/@+ --+ -- If you specify an access point, the bucket policy must be configured to+ -- delegate access control to the access point. For information, see+ -- <https://docs.aws.amazon.com/AmazonS3/latest/userguide/access-points-policies.html#access-points-delegating-control Delegating access control to access points>+ -- in the /Amazon S3 User Guide/.+ --+ -- Access point alias:+ --+ -- @test-ap-ab123cdef4gehijklmn5opqrstuvuse1a-s3alias@+ locationARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'CreateSMBFileShare' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'accessBasedEnumeration', 'createSMBFileShare_accessBasedEnumeration' - The files and folders on this share will only be visible to users with+-- read access.+--+-- 'adminUserList', 'createSMBFileShare_adminUserList' - A list of users or groups in the Active Directory that will be granted+-- administrator privileges on the file share. These users can do all file+-- operations as the super-user. Acceptable formats include:+-- @DOMAIN\\User1@, @user1@, @\@group1@, and @\@DOMAIN\\group1@.+--+-- Use this option very carefully, because any user in this list can do+-- anything they like on the file share, regardless of file permissions.+--+-- 'auditDestinationARN', 'createSMBFileShare_auditDestinationARN' - The Amazon Resource Name (ARN) of the storage used for audit logs.+--+-- 'authentication', 'createSMBFileShare_authentication' - The authentication method that users use to access the file share. The+-- default is @ActiveDirectory@.+--+-- Valid Values: @ActiveDirectory@ | @GuestAccess@+--+-- 'bucketRegion', 'createSMBFileShare_bucketRegion' - Specifies the Region of the S3 bucket where the SMB file share stores+-- files.+--+-- This parameter is required for SMB file shares that connect to Amazon S3+-- through a VPC endpoint, a VPC access point, or an access point alias+-- that points to a VPC access point.+--+-- 'cacheAttributes', 'createSMBFileShare_cacheAttributes' - Specifies refresh cache information for the file share.+--+-- 'caseSensitivity', 'createSMBFileShare_caseSensitivity' - The case of an object name in an Amazon S3 bucket. For+-- @ClientSpecified@, the client determines the case sensitivity. For+-- @CaseSensitive@, the gateway determines the case sensitivity. The+-- default value is @ClientSpecified@.+--+-- 'defaultStorageClass', 'createSMBFileShare_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', 'createSMBFileShare_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', 'createSMBFileShare_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@+--+-- 'invalidUserList', 'createSMBFileShare_invalidUserList' - A list of users or groups in the Active Directory that are not allowed+-- to access the file share. A group must be prefixed with the \@+-- character. Acceptable formats include: @DOMAIN\\User1@, @user1@,+-- @\@group1@, and @\@DOMAIN\\group1@. Can only be set if Authentication is+-- set to @ActiveDirectory@.+--+-- 'kmsEncrypted', 'createSMBFileShare_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', 'createSMBFileShare_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.+--+-- 'notificationPolicy', 'createSMBFileShare_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', 'createSMBFileShare_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@.+--+-- 'oplocksEnabled', 'createSMBFileShare_oplocksEnabled' - Specifies whether opportunistic locking is enabled for the SMB file+-- share.+--+-- Enabling opportunistic locking on case-sensitive shares is not+-- recommended for workloads that involve access to files with the same+-- name in different case.+--+-- Valid Values: @true@ | @false@+--+-- 'readOnly', 'createSMBFileShare_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', 'createSMBFileShare_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@+--+-- 'sMBACLEnabled', 'createSMBFileShare_sMBACLEnabled' - Set this value to @true@ to enable access control list (ACL) on the SMB+-- file share. Set it to @false@ to map file and directory permissions to+-- the POSIX permissions.+--+-- For more information, see+-- <https://docs.aws.amazon.com/storagegateway/latest/userguide/smb-acl.html Using Microsoft Windows ACLs to control access to an SMB file share>+-- in the /Storage Gateway User Guide/.+--+-- Valid Values: @true@ | @false@+--+-- 'tags', 'createSMBFileShare_tags' - A list of up to 50 tags that can be assigned to the NFS file share. Each+-- tag is a key-value pair.+--+-- Valid characters for key and value are letters, spaces, and numbers+-- representable in UTF-8 format, and the following special characters: + -+-- = . _ : \/ \@. The maximum length of a tag\'s key is 128 characters, and+-- the maximum length for a tag\'s value is 256.+--+-- 'vPCEndpointDNSName', 'createSMBFileShare_vPCEndpointDNSName' - Specifies the DNS name for the VPC endpoint that the SMB file share uses+-- to connect to Amazon S3.+--+-- This parameter is required for SMB file shares that connect to Amazon S3+-- through a VPC endpoint, a VPC access point, or an access point alias+-- that points to a VPC access point.+--+-- 'validUserList', 'createSMBFileShare_validUserList' - A list of users or groups in the Active Directory that are allowed to+-- access the file < > share. A group must be prefixed with the \@+-- character. Acceptable formats include: @DOMAIN\\User1@, @user1@,+-- @\@group1@, and @\@DOMAIN\\group1@. Can only be set if Authentication is+-- set to @ActiveDirectory@.+--+-- 'clientToken', 'createSMBFileShare_clientToken' - A unique string value that you supply that is used by S3 File Gateway to+-- ensure idempotent file share creation.+--+-- 'gatewayARN', 'createSMBFileShare_gatewayARN' - The ARN of the S3 File Gateway on which you want to create a file share.+--+-- 'role'', 'createSMBFileShare_role' - The ARN of the Identity and Access Management (IAM) role that an S3 File+-- Gateway assumes when it accesses the underlying storage.+--+-- 'locationARN', 'createSMBFileShare_locationARN' - A custom ARN for the backend storage used for storing data for file+-- shares. It includes a resource ARN with an optional prefix+-- concatenation. The prefix must end with a forward slash (\/).+--+-- You can specify LocationARN as a bucket ARN, access point ARN or access+-- point alias, as shown in the following examples.+--+-- Bucket ARN:+--+-- @arn:aws:s3:::my-bucket\/prefix\/@+--+-- Access point ARN:+--+-- @arn:aws:s3:region:account-id:accesspoint\/access-point-name\/prefix\/@+--+-- If you specify an access point, the bucket policy must be configured to+-- delegate access control to the access point. For information, see+-- <https://docs.aws.amazon.com/AmazonS3/latest/userguide/access-points-policies.html#access-points-delegating-control Delegating access control to access points>+-- in the /Amazon S3 User Guide/.+--+-- Access point alias:+--+-- @test-ap-ab123cdef4gehijklmn5opqrstuvuse1a-s3alias@+newCreateSMBFileShare ::+ -- | 'clientToken'+ Prelude.Text ->+ -- | 'gatewayARN'+ Prelude.Text ->+ -- | 'role''+ Prelude.Text ->+ -- | 'locationARN'+ Prelude.Text ->+ CreateSMBFileShare+newCreateSMBFileShare+ pClientToken_+ pGatewayARN_+ pRole_+ pLocationARN_ =+ CreateSMBFileShare'+ { accessBasedEnumeration =+ Prelude.Nothing,+ adminUserList = Prelude.Nothing,+ auditDestinationARN = Prelude.Nothing,+ authentication = Prelude.Nothing,+ bucketRegion = Prelude.Nothing,+ cacheAttributes = Prelude.Nothing,+ caseSensitivity = Prelude.Nothing,+ defaultStorageClass = Prelude.Nothing,+ fileShareName = Prelude.Nothing,+ guessMIMETypeEnabled = Prelude.Nothing,+ invalidUserList = Prelude.Nothing,+ kmsEncrypted = Prelude.Nothing,+ kmsKey = Prelude.Nothing,+ notificationPolicy = Prelude.Nothing,+ objectACL = Prelude.Nothing,+ oplocksEnabled = Prelude.Nothing,+ readOnly = Prelude.Nothing,+ requesterPays = Prelude.Nothing,+ sMBACLEnabled = Prelude.Nothing,+ tags = Prelude.Nothing,+ vPCEndpointDNSName = Prelude.Nothing,+ validUserList = Prelude.Nothing,+ clientToken = pClientToken_,+ gatewayARN = pGatewayARN_,+ role' = pRole_,+ locationARN = pLocationARN_+ }++-- | The files and folders on this share will only be visible to users with+-- read access.+createSMBFileShare_accessBasedEnumeration :: Lens.Lens' CreateSMBFileShare (Prelude.Maybe Prelude.Bool)+createSMBFileShare_accessBasedEnumeration = Lens.lens (\CreateSMBFileShare' {accessBasedEnumeration} -> accessBasedEnumeration) (\s@CreateSMBFileShare' {} a -> s {accessBasedEnumeration = a} :: CreateSMBFileShare)++-- | A list of users or groups in the Active Directory that will be granted+-- administrator privileges on the file share. These users can do all file+-- operations as the super-user. Acceptable formats include:+-- @DOMAIN\\User1@, @user1@, @\@group1@, and @\@DOMAIN\\group1@.+--+-- Use this option very carefully, because any user in this list can do+-- anything they like on the file share, regardless of file permissions.+createSMBFileShare_adminUserList :: Lens.Lens' CreateSMBFileShare (Prelude.Maybe [Prelude.Text])+createSMBFileShare_adminUserList = Lens.lens (\CreateSMBFileShare' {adminUserList} -> adminUserList) (\s@CreateSMBFileShare' {} a -> s {adminUserList = a} :: CreateSMBFileShare) Prelude.. Lens.mapping Lens.coerced++-- | The Amazon Resource Name (ARN) of the storage used for audit logs.+createSMBFileShare_auditDestinationARN :: Lens.Lens' CreateSMBFileShare (Prelude.Maybe Prelude.Text)+createSMBFileShare_auditDestinationARN = Lens.lens (\CreateSMBFileShare' {auditDestinationARN} -> auditDestinationARN) (\s@CreateSMBFileShare' {} a -> s {auditDestinationARN = a} :: CreateSMBFileShare)++-- | The authentication method that users use to access the file share. The+-- default is @ActiveDirectory@.+--+-- Valid Values: @ActiveDirectory@ | @GuestAccess@+createSMBFileShare_authentication :: Lens.Lens' CreateSMBFileShare (Prelude.Maybe Prelude.Text)+createSMBFileShare_authentication = Lens.lens (\CreateSMBFileShare' {authentication} -> authentication) (\s@CreateSMBFileShare' {} a -> s {authentication = a} :: CreateSMBFileShare)++-- | Specifies the Region of the S3 bucket where the SMB file share stores+-- files.+--+-- This parameter is required for SMB file shares that connect to Amazon S3+-- through a VPC endpoint, a VPC access point, or an access point alias+-- that points to a VPC access point.+createSMBFileShare_bucketRegion :: Lens.Lens' CreateSMBFileShare (Prelude.Maybe Prelude.Text)+createSMBFileShare_bucketRegion = Lens.lens (\CreateSMBFileShare' {bucketRegion} -> bucketRegion) (\s@CreateSMBFileShare' {} a -> s {bucketRegion = a} :: CreateSMBFileShare)++-- | Specifies refresh cache information for the file share.+createSMBFileShare_cacheAttributes :: Lens.Lens' CreateSMBFileShare (Prelude.Maybe CacheAttributes)+createSMBFileShare_cacheAttributes = Lens.lens (\CreateSMBFileShare' {cacheAttributes} -> cacheAttributes) (\s@CreateSMBFileShare' {} a -> s {cacheAttributes = a} :: CreateSMBFileShare)++-- | The case of an object name in an Amazon S3 bucket. For+-- @ClientSpecified@, the client determines the case sensitivity. For+-- @CaseSensitive@, the gateway determines the case sensitivity. The+-- default value is @ClientSpecified@.+createSMBFileShare_caseSensitivity :: Lens.Lens' CreateSMBFileShare (Prelude.Maybe CaseSensitivity)+createSMBFileShare_caseSensitivity = Lens.lens (\CreateSMBFileShare' {caseSensitivity} -> caseSensitivity) (\s@CreateSMBFileShare' {} a -> s {caseSensitivity = a} :: CreateSMBFileShare)++-- | 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@+createSMBFileShare_defaultStorageClass :: Lens.Lens' CreateSMBFileShare (Prelude.Maybe Prelude.Text)+createSMBFileShare_defaultStorageClass = Lens.lens (\CreateSMBFileShare' {defaultStorageClass} -> defaultStorageClass) (\s@CreateSMBFileShare' {} a -> s {defaultStorageClass = a} :: CreateSMBFileShare)++-- | 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.+createSMBFileShare_fileShareName :: Lens.Lens' CreateSMBFileShare (Prelude.Maybe Prelude.Text)+createSMBFileShare_fileShareName = Lens.lens (\CreateSMBFileShare' {fileShareName} -> fileShareName) (\s@CreateSMBFileShare' {} a -> s {fileShareName = a} :: CreateSMBFileShare)++-- | 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@+createSMBFileShare_guessMIMETypeEnabled :: Lens.Lens' CreateSMBFileShare (Prelude.Maybe Prelude.Bool)+createSMBFileShare_guessMIMETypeEnabled = Lens.lens (\CreateSMBFileShare' {guessMIMETypeEnabled} -> guessMIMETypeEnabled) (\s@CreateSMBFileShare' {} a -> s {guessMIMETypeEnabled = a} :: CreateSMBFileShare)++-- | A list of users or groups in the Active Directory that are not allowed+-- to access the file share. A group must be prefixed with the \@+-- character. Acceptable formats include: @DOMAIN\\User1@, @user1@,+-- @\@group1@, and @\@DOMAIN\\group1@. Can only be set if Authentication is+-- set to @ActiveDirectory@.+createSMBFileShare_invalidUserList :: Lens.Lens' CreateSMBFileShare (Prelude.Maybe [Prelude.Text])+createSMBFileShare_invalidUserList = Lens.lens (\CreateSMBFileShare' {invalidUserList} -> invalidUserList) (\s@CreateSMBFileShare' {} a -> s {invalidUserList = a} :: CreateSMBFileShare) Prelude.. Lens.mapping Lens.coerced++-- | 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@+createSMBFileShare_kmsEncrypted :: Lens.Lens' CreateSMBFileShare (Prelude.Maybe Prelude.Bool)+createSMBFileShare_kmsEncrypted = Lens.lens (\CreateSMBFileShare' {kmsEncrypted} -> kmsEncrypted) (\s@CreateSMBFileShare' {} a -> s {kmsEncrypted = a} :: CreateSMBFileShare)++-- | 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.+createSMBFileShare_kmsKey :: Lens.Lens' CreateSMBFileShare (Prelude.Maybe Prelude.Text)+createSMBFileShare_kmsKey = Lens.lens (\CreateSMBFileShare' {kmsKey} -> kmsKey) (\s@CreateSMBFileShare' {} a -> s {kmsKey = a} :: CreateSMBFileShare)++-- | 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.+--+-- @{}@+createSMBFileShare_notificationPolicy :: Lens.Lens' CreateSMBFileShare (Prelude.Maybe Prelude.Text)+createSMBFileShare_notificationPolicy = Lens.lens (\CreateSMBFileShare' {notificationPolicy} -> notificationPolicy) (\s@CreateSMBFileShare' {} a -> s {notificationPolicy = a} :: CreateSMBFileShare)++-- | 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@.+createSMBFileShare_objectACL :: Lens.Lens' CreateSMBFileShare (Prelude.Maybe ObjectACL)+createSMBFileShare_objectACL = Lens.lens (\CreateSMBFileShare' {objectACL} -> objectACL) (\s@CreateSMBFileShare' {} a -> s {objectACL = a} :: CreateSMBFileShare)++-- | Specifies whether opportunistic locking is enabled for the SMB file+-- share.+--+-- Enabling opportunistic locking on case-sensitive shares is not+-- recommended for workloads that involve access to files with the same+-- name in different case.+--+-- Valid Values: @true@ | @false@+createSMBFileShare_oplocksEnabled :: Lens.Lens' CreateSMBFileShare (Prelude.Maybe Prelude.Bool)+createSMBFileShare_oplocksEnabled = Lens.lens (\CreateSMBFileShare' {oplocksEnabled} -> oplocksEnabled) (\s@CreateSMBFileShare' {} a -> s {oplocksEnabled = a} :: CreateSMBFileShare)++-- | 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@+createSMBFileShare_readOnly :: Lens.Lens' CreateSMBFileShare (Prelude.Maybe Prelude.Bool)+createSMBFileShare_readOnly = Lens.lens (\CreateSMBFileShare' {readOnly} -> readOnly) (\s@CreateSMBFileShare' {} a -> s {readOnly = a} :: CreateSMBFileShare)++-- | 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@+createSMBFileShare_requesterPays :: Lens.Lens' CreateSMBFileShare (Prelude.Maybe Prelude.Bool)+createSMBFileShare_requesterPays = Lens.lens (\CreateSMBFileShare' {requesterPays} -> requesterPays) (\s@CreateSMBFileShare' {} a -> s {requesterPays = a} :: CreateSMBFileShare)++-- | Set this value to @true@ to enable access control list (ACL) on the SMB+-- file share. Set it to @false@ to map file and directory permissions to+-- the POSIX permissions.+--+-- For more information, see+-- <https://docs.aws.amazon.com/storagegateway/latest/userguide/smb-acl.html Using Microsoft Windows ACLs to control access to an SMB file share>+-- in the /Storage Gateway User Guide/.+--+-- Valid Values: @true@ | @false@+createSMBFileShare_sMBACLEnabled :: Lens.Lens' CreateSMBFileShare (Prelude.Maybe Prelude.Bool)+createSMBFileShare_sMBACLEnabled = Lens.lens (\CreateSMBFileShare' {sMBACLEnabled} -> sMBACLEnabled) (\s@CreateSMBFileShare' {} a -> s {sMBACLEnabled = a} :: CreateSMBFileShare)++-- | A list of up to 50 tags that can be assigned to the NFS file share. Each+-- tag is a key-value pair.+--+-- Valid characters for key and value are letters, spaces, and numbers+-- representable in UTF-8 format, and the following special characters: + -+-- = . _ : \/ \@. The maximum length of a tag\'s key is 128 characters, and+-- the maximum length for a tag\'s value is 256.+createSMBFileShare_tags :: Lens.Lens' CreateSMBFileShare (Prelude.Maybe [Tag])+createSMBFileShare_tags = Lens.lens (\CreateSMBFileShare' {tags} -> tags) (\s@CreateSMBFileShare' {} a -> s {tags = a} :: CreateSMBFileShare) Prelude.. Lens.mapping Lens.coerced++-- | Specifies the DNS name for the VPC endpoint that the SMB file share uses+-- to connect to Amazon S3.+--+-- This parameter is required for SMB file shares that connect to Amazon S3+-- through a VPC endpoint, a VPC access point, or an access point alias+-- that points to a VPC access point.+createSMBFileShare_vPCEndpointDNSName :: Lens.Lens' CreateSMBFileShare (Prelude.Maybe Prelude.Text)+createSMBFileShare_vPCEndpointDNSName = Lens.lens (\CreateSMBFileShare' {vPCEndpointDNSName} -> vPCEndpointDNSName) (\s@CreateSMBFileShare' {} a -> s {vPCEndpointDNSName = a} :: CreateSMBFileShare)++-- | A list of users or groups in the Active Directory that are allowed to+-- access the file < > share. A group must be prefixed with the \@+-- character. Acceptable formats include: @DOMAIN\\User1@, @user1@,+-- @\@group1@, and @\@DOMAIN\\group1@. Can only be set if Authentication is+-- set to @ActiveDirectory@.+createSMBFileShare_validUserList :: Lens.Lens' CreateSMBFileShare (Prelude.Maybe [Prelude.Text])+createSMBFileShare_validUserList = Lens.lens (\CreateSMBFileShare' {validUserList} -> validUserList) (\s@CreateSMBFileShare' {} a -> s {validUserList = a} :: CreateSMBFileShare) Prelude.. Lens.mapping Lens.coerced++-- | A unique string value that you supply that is used by S3 File Gateway to+-- ensure idempotent file share creation.+createSMBFileShare_clientToken :: Lens.Lens' CreateSMBFileShare Prelude.Text+createSMBFileShare_clientToken = Lens.lens (\CreateSMBFileShare' {clientToken} -> clientToken) (\s@CreateSMBFileShare' {} a -> s {clientToken = a} :: CreateSMBFileShare)++-- | The ARN of the S3 File Gateway on which you want to create a file share.+createSMBFileShare_gatewayARN :: Lens.Lens' CreateSMBFileShare Prelude.Text+createSMBFileShare_gatewayARN = Lens.lens (\CreateSMBFileShare' {gatewayARN} -> gatewayARN) (\s@CreateSMBFileShare' {} a -> s {gatewayARN = a} :: CreateSMBFileShare)++-- | The ARN of the Identity and Access Management (IAM) role that an S3 File+-- Gateway assumes when it accesses the underlying storage.+createSMBFileShare_role :: Lens.Lens' CreateSMBFileShare Prelude.Text+createSMBFileShare_role = Lens.lens (\CreateSMBFileShare' {role'} -> role') (\s@CreateSMBFileShare' {} a -> s {role' = a} :: CreateSMBFileShare)++-- | A custom ARN for the backend storage used for storing data for file+-- shares. It includes a resource ARN with an optional prefix+-- concatenation. The prefix must end with a forward slash (\/).+--+-- You can specify LocationARN as a bucket ARN, access point ARN or access+-- point alias, as shown in the following examples.+--+-- Bucket ARN:+--+-- @arn:aws:s3:::my-bucket\/prefix\/@+--+-- Access point ARN:+--+-- @arn:aws:s3:region:account-id:accesspoint\/access-point-name\/prefix\/@+--+-- If you specify an access point, the bucket policy must be configured to+-- delegate access control to the access point. For information, see+-- <https://docs.aws.amazon.com/AmazonS3/latest/userguide/access-points-policies.html#access-points-delegating-control Delegating access control to access points>+-- in the /Amazon S3 User Guide/.+--+-- Access point alias:+--+-- @test-ap-ab123cdef4gehijklmn5opqrstuvuse1a-s3alias@+createSMBFileShare_locationARN :: Lens.Lens' CreateSMBFileShare Prelude.Text+createSMBFileShare_locationARN = Lens.lens (\CreateSMBFileShare' {locationARN} -> locationARN) (\s@CreateSMBFileShare' {} a -> s {locationARN = a} :: CreateSMBFileShare)++instance Core.AWSRequest CreateSMBFileShare where+ type+ AWSResponse CreateSMBFileShare =+ CreateSMBFileShareResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ CreateSMBFileShareResponse'+ Prelude.<$> (x Data..?> "FileShareARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable CreateSMBFileShare where+ hashWithSalt _salt CreateSMBFileShare' {..} =+ _salt+ `Prelude.hashWithSalt` accessBasedEnumeration+ `Prelude.hashWithSalt` adminUserList+ `Prelude.hashWithSalt` auditDestinationARN+ `Prelude.hashWithSalt` authentication+ `Prelude.hashWithSalt` bucketRegion+ `Prelude.hashWithSalt` cacheAttributes+ `Prelude.hashWithSalt` caseSensitivity+ `Prelude.hashWithSalt` defaultStorageClass+ `Prelude.hashWithSalt` fileShareName+ `Prelude.hashWithSalt` guessMIMETypeEnabled+ `Prelude.hashWithSalt` invalidUserList+ `Prelude.hashWithSalt` kmsEncrypted+ `Prelude.hashWithSalt` kmsKey+ `Prelude.hashWithSalt` notificationPolicy+ `Prelude.hashWithSalt` objectACL+ `Prelude.hashWithSalt` oplocksEnabled+ `Prelude.hashWithSalt` readOnly+ `Prelude.hashWithSalt` requesterPays+ `Prelude.hashWithSalt` sMBACLEnabled+ `Prelude.hashWithSalt` tags+ `Prelude.hashWithSalt` vPCEndpointDNSName+ `Prelude.hashWithSalt` validUserList+ `Prelude.hashWithSalt` clientToken+ `Prelude.hashWithSalt` gatewayARN+ `Prelude.hashWithSalt` role'+ `Prelude.hashWithSalt` locationARN++instance Prelude.NFData CreateSMBFileShare where+ rnf CreateSMBFileShare' {..} =+ Prelude.rnf accessBasedEnumeration+ `Prelude.seq` Prelude.rnf adminUserList+ `Prelude.seq` Prelude.rnf auditDestinationARN+ `Prelude.seq` Prelude.rnf authentication+ `Prelude.seq` Prelude.rnf bucketRegion+ `Prelude.seq` Prelude.rnf cacheAttributes+ `Prelude.seq` Prelude.rnf caseSensitivity+ `Prelude.seq` Prelude.rnf defaultStorageClass+ `Prelude.seq` Prelude.rnf fileShareName+ `Prelude.seq` Prelude.rnf guessMIMETypeEnabled+ `Prelude.seq` Prelude.rnf invalidUserList+ `Prelude.seq` Prelude.rnf kmsEncrypted+ `Prelude.seq` Prelude.rnf kmsKey+ `Prelude.seq` Prelude.rnf notificationPolicy+ `Prelude.seq` Prelude.rnf objectACL+ `Prelude.seq` Prelude.rnf oplocksEnabled+ `Prelude.seq` Prelude.rnf readOnly+ `Prelude.seq` Prelude.rnf requesterPays+ `Prelude.seq` Prelude.rnf sMBACLEnabled+ `Prelude.seq` Prelude.rnf tags+ `Prelude.seq` Prelude.rnf+ vPCEndpointDNSName+ `Prelude.seq` Prelude.rnf validUserList+ `Prelude.seq` Prelude.rnf clientToken+ `Prelude.seq` Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf role'+ `Prelude.seq` Prelude.rnf+ locationARN++instance Data.ToHeaders CreateSMBFileShare where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.CreateSMBFileShare" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON CreateSMBFileShare where+ toJSON CreateSMBFileShare' {..} =+ Data.object+ ( Prelude.catMaybes+ [ ("AccessBasedEnumeration" Data..=)+ Prelude.<$> accessBasedEnumeration,+ ("AdminUserList" Data..=) Prelude.<$> adminUserList,+ ("AuditDestinationARN" Data..=)+ Prelude.<$> auditDestinationARN,+ ("Authentication" Data..=)+ Prelude.<$> authentication,+ ("BucketRegion" Data..=) Prelude.<$> bucketRegion,+ ("CacheAttributes" Data..=)+ Prelude.<$> cacheAttributes,+ ("CaseSensitivity" Data..=)+ Prelude.<$> caseSensitivity,+ ("DefaultStorageClass" Data..=)+ Prelude.<$> defaultStorageClass,+ ("FileShareName" Data..=) Prelude.<$> fileShareName,+ ("GuessMIMETypeEnabled" Data..=)+ Prelude.<$> guessMIMETypeEnabled,+ ("InvalidUserList" Data..=)+ Prelude.<$> invalidUserList,+ ("KMSEncrypted" Data..=) Prelude.<$> kmsEncrypted,+ ("KMSKey" Data..=) Prelude.<$> kmsKey,+ ("NotificationPolicy" Data..=)+ Prelude.<$> notificationPolicy,+ ("ObjectACL" Data..=) Prelude.<$> objectACL,+ ("OplocksEnabled" Data..=)+ Prelude.<$> oplocksEnabled,+ ("ReadOnly" Data..=) Prelude.<$> readOnly,+ ("RequesterPays" Data..=) Prelude.<$> requesterPays,+ ("SMBACLEnabled" Data..=) Prelude.<$> sMBACLEnabled,+ ("Tags" Data..=) Prelude.<$> tags,+ ("VPCEndpointDNSName" Data..=)+ Prelude.<$> vPCEndpointDNSName,+ ("ValidUserList" Data..=) Prelude.<$> validUserList,+ Prelude.Just ("ClientToken" Data..= clientToken),+ Prelude.Just ("GatewayARN" Data..= gatewayARN),+ Prelude.Just ("Role" Data..= role'),+ Prelude.Just ("LocationARN" Data..= locationARN)+ ]+ )++instance Data.ToPath CreateSMBFileShare where+ toPath = Prelude.const "/"++instance Data.ToQuery CreateSMBFileShare where+ toQuery = Prelude.const Prelude.mempty++-- | CreateSMBFileShareOutput+--+-- /See:/ 'newCreateSMBFileShareResponse' smart constructor.+data CreateSMBFileShareResponse = CreateSMBFileShareResponse'+ { -- | The Amazon Resource Name (ARN) of the newly created 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 'CreateSMBFileShareResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'fileShareARN', 'createSMBFileShareResponse_fileShareARN' - The Amazon Resource Name (ARN) of the newly created file share.+--+-- 'httpStatus', 'createSMBFileShareResponse_httpStatus' - The response's http status code.+newCreateSMBFileShareResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ CreateSMBFileShareResponse+newCreateSMBFileShareResponse pHttpStatus_ =+ CreateSMBFileShareResponse'+ { fileShareARN =+ Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | The Amazon Resource Name (ARN) of the newly created file share.+createSMBFileShareResponse_fileShareARN :: Lens.Lens' CreateSMBFileShareResponse (Prelude.Maybe Prelude.Text)+createSMBFileShareResponse_fileShareARN = Lens.lens (\CreateSMBFileShareResponse' {fileShareARN} -> fileShareARN) (\s@CreateSMBFileShareResponse' {} a -> s {fileShareARN = a} :: CreateSMBFileShareResponse)++-- | The response's http status code.+createSMBFileShareResponse_httpStatus :: Lens.Lens' CreateSMBFileShareResponse Prelude.Int+createSMBFileShareResponse_httpStatus = Lens.lens (\CreateSMBFileShareResponse' {httpStatus} -> httpStatus) (\s@CreateSMBFileShareResponse' {} a -> s {httpStatus = a} :: CreateSMBFileShareResponse)++instance Prelude.NFData CreateSMBFileShareResponse where+ rnf CreateSMBFileShareResponse' {..} =+ Prelude.rnf fileShareARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/CreateSnapshot.hs view
@@ -0,0 +1,293 @@+{-# 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.CreateSnapshot+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Initiates a snapshot of a volume.+--+-- Storage Gateway provides the ability to back up point-in-time snapshots+-- of your data to Amazon Simple Storage (Amazon S3) for durable off-site+-- recovery, and also import the data to an Amazon Elastic Block Store+-- (EBS) volume in Amazon Elastic Compute Cloud (EC2). You can take+-- snapshots of your gateway volume on a scheduled or ad hoc basis. This+-- API enables you to take an ad hoc snapshot. For more information, see+-- <https://docs.aws.amazon.com/storagegateway/latest/userguide/managing-volumes.html#SchedulingSnapshot Editing a snapshot schedule>.+--+-- In the @CreateSnapshot@ request, you identify the volume by providing+-- its Amazon Resource Name (ARN). You must also provide description for+-- the snapshot. When Storage Gateway takes the snapshot of specified+-- volume, the snapshot and description appears in the Storage Gateway+-- console. In response, Storage Gateway returns you a snapshot ID. You can+-- use this snapshot ID to check the snapshot progress or later use it when+-- you want to create a volume from a snapshot. This operation is only+-- supported in stored and cached volume gateway type.+--+-- To list or delete a snapshot, you must use the Amazon EC2 API. For more+-- information, see+-- <https://docs.aws.amazon.com/AWSEC2/latest/APIReference/API_DescribeSnapshots.html DescribeSnapshots>+-- or+-- <https://docs.aws.amazon.com/AWSEC2/latest/APIReference/API_DeleteSnapshot.html DeleteSnapshot>+-- in the /Amazon Elastic Compute Cloud API Reference/.+--+-- Volume and snapshot IDs are changing to a longer length ID format. For+-- more information, see the important note on the+-- <https://docs.aws.amazon.com/storagegateway/latest/APIReference/Welcome.html Welcome>+-- page.+module Amazonka.StorageGateway.CreateSnapshot+ ( -- * Creating a Request+ CreateSnapshot (..),+ newCreateSnapshot,++ -- * Request Lenses+ createSnapshot_tags,+ createSnapshot_volumeARN,+ createSnapshot_snapshotDescription,++ -- * Destructuring the Response+ CreateSnapshotResponse (..),+ newCreateSnapshotResponse,++ -- * Response Lenses+ createSnapshotResponse_snapshotId,+ createSnapshotResponse_volumeARN,+ createSnapshotResponse_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++-- | A JSON object containing one or more of the following fields:+--+-- - CreateSnapshotInput$SnapshotDescription+--+-- - CreateSnapshotInput$VolumeARN+--+-- /See:/ 'newCreateSnapshot' smart constructor.+data CreateSnapshot = CreateSnapshot'+ { -- | A list of up to 50 tags that can be assigned to a snapshot. Each tag is+ -- a key-value pair.+ --+ -- Valid characters for key and value are letters, spaces, and numbers+ -- representable in UTF-8 format, and the following special characters: + -+ -- = . _ : \/ \@. The maximum length of a tag\'s key is 128 characters, and+ -- the maximum length for a tag\'s value is 256.+ tags :: Prelude.Maybe [Tag],+ -- | The Amazon Resource Name (ARN) of the volume. Use the ListVolumes+ -- operation to return a list of gateway volumes.+ volumeARN :: Prelude.Text,+ -- | Textual description of the snapshot that appears in the Amazon EC2+ -- console, Elastic Block Store snapshots panel in the __Description__+ -- field, and in the Storage Gateway snapshot __Details__ pane,+ -- __Description__ field.+ snapshotDescription :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'CreateSnapshot' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'tags', 'createSnapshot_tags' - A list of up to 50 tags that can be assigned to a snapshot. Each tag is+-- a key-value pair.+--+-- Valid characters for key and value are letters, spaces, and numbers+-- representable in UTF-8 format, and the following special characters: + -+-- = . _ : \/ \@. The maximum length of a tag\'s key is 128 characters, and+-- the maximum length for a tag\'s value is 256.+--+-- 'volumeARN', 'createSnapshot_volumeARN' - The Amazon Resource Name (ARN) of the volume. Use the ListVolumes+-- operation to return a list of gateway volumes.+--+-- 'snapshotDescription', 'createSnapshot_snapshotDescription' - Textual description of the snapshot that appears in the Amazon EC2+-- console, Elastic Block Store snapshots panel in the __Description__+-- field, and in the Storage Gateway snapshot __Details__ pane,+-- __Description__ field.+newCreateSnapshot ::+ -- | 'volumeARN'+ Prelude.Text ->+ -- | 'snapshotDescription'+ Prelude.Text ->+ CreateSnapshot+newCreateSnapshot pVolumeARN_ pSnapshotDescription_ =+ CreateSnapshot'+ { tags = Prelude.Nothing,+ volumeARN = pVolumeARN_,+ snapshotDescription = pSnapshotDescription_+ }++-- | A list of up to 50 tags that can be assigned to a snapshot. Each tag is+-- a key-value pair.+--+-- Valid characters for key and value are letters, spaces, and numbers+-- representable in UTF-8 format, and the following special characters: + -+-- = . _ : \/ \@. The maximum length of a tag\'s key is 128 characters, and+-- the maximum length for a tag\'s value is 256.+createSnapshot_tags :: Lens.Lens' CreateSnapshot (Prelude.Maybe [Tag])+createSnapshot_tags = Lens.lens (\CreateSnapshot' {tags} -> tags) (\s@CreateSnapshot' {} a -> s {tags = a} :: CreateSnapshot) Prelude.. Lens.mapping Lens.coerced++-- | The Amazon Resource Name (ARN) of the volume. Use the ListVolumes+-- operation to return a list of gateway volumes.+createSnapshot_volumeARN :: Lens.Lens' CreateSnapshot Prelude.Text+createSnapshot_volumeARN = Lens.lens (\CreateSnapshot' {volumeARN} -> volumeARN) (\s@CreateSnapshot' {} a -> s {volumeARN = a} :: CreateSnapshot)++-- | Textual description of the snapshot that appears in the Amazon EC2+-- console, Elastic Block Store snapshots panel in the __Description__+-- field, and in the Storage Gateway snapshot __Details__ pane,+-- __Description__ field.+createSnapshot_snapshotDescription :: Lens.Lens' CreateSnapshot Prelude.Text+createSnapshot_snapshotDescription = Lens.lens (\CreateSnapshot' {snapshotDescription} -> snapshotDescription) (\s@CreateSnapshot' {} a -> s {snapshotDescription = a} :: CreateSnapshot)++instance Core.AWSRequest CreateSnapshot where+ type+ AWSResponse CreateSnapshot =+ CreateSnapshotResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ CreateSnapshotResponse'+ Prelude.<$> (x Data..?> "SnapshotId")+ Prelude.<*> (x Data..?> "VolumeARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable CreateSnapshot where+ hashWithSalt _salt CreateSnapshot' {..} =+ _salt+ `Prelude.hashWithSalt` tags+ `Prelude.hashWithSalt` volumeARN+ `Prelude.hashWithSalt` snapshotDescription++instance Prelude.NFData CreateSnapshot where+ rnf CreateSnapshot' {..} =+ Prelude.rnf tags+ `Prelude.seq` Prelude.rnf volumeARN+ `Prelude.seq` Prelude.rnf snapshotDescription++instance Data.ToHeaders CreateSnapshot where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.CreateSnapshot" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON CreateSnapshot where+ toJSON CreateSnapshot' {..} =+ Data.object+ ( Prelude.catMaybes+ [ ("Tags" Data..=) Prelude.<$> tags,+ Prelude.Just ("VolumeARN" Data..= volumeARN),+ Prelude.Just+ ("SnapshotDescription" Data..= snapshotDescription)+ ]+ )++instance Data.ToPath CreateSnapshot where+ toPath = Prelude.const "/"++instance Data.ToQuery CreateSnapshot where+ toQuery = Prelude.const Prelude.mempty++-- | A JSON object containing the following fields:+--+-- /See:/ 'newCreateSnapshotResponse' smart constructor.+data CreateSnapshotResponse = CreateSnapshotResponse'+ { -- | The snapshot ID that is used to refer to the snapshot in future+ -- operations such as describing snapshots (Amazon Elastic Compute Cloud+ -- API @DescribeSnapshots@) or creating a volume from a snapshot+ -- (CreateStorediSCSIVolume).+ snapshotId :: Prelude.Maybe Prelude.Text,+ -- | The Amazon Resource Name (ARN) of the volume of which the snapshot was+ -- taken.+ volumeARN :: 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 'CreateSnapshotResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'snapshotId', 'createSnapshotResponse_snapshotId' - The snapshot ID that is used to refer to the snapshot in future+-- operations such as describing snapshots (Amazon Elastic Compute Cloud+-- API @DescribeSnapshots@) or creating a volume from a snapshot+-- (CreateStorediSCSIVolume).+--+-- 'volumeARN', 'createSnapshotResponse_volumeARN' - The Amazon Resource Name (ARN) of the volume of which the snapshot was+-- taken.+--+-- 'httpStatus', 'createSnapshotResponse_httpStatus' - The response's http status code.+newCreateSnapshotResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ CreateSnapshotResponse+newCreateSnapshotResponse pHttpStatus_ =+ CreateSnapshotResponse'+ { snapshotId =+ Prelude.Nothing,+ volumeARN = Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | The snapshot ID that is used to refer to the snapshot in future+-- operations such as describing snapshots (Amazon Elastic Compute Cloud+-- API @DescribeSnapshots@) or creating a volume from a snapshot+-- (CreateStorediSCSIVolume).+createSnapshotResponse_snapshotId :: Lens.Lens' CreateSnapshotResponse (Prelude.Maybe Prelude.Text)+createSnapshotResponse_snapshotId = Lens.lens (\CreateSnapshotResponse' {snapshotId} -> snapshotId) (\s@CreateSnapshotResponse' {} a -> s {snapshotId = a} :: CreateSnapshotResponse)++-- | The Amazon Resource Name (ARN) of the volume of which the snapshot was+-- taken.+createSnapshotResponse_volumeARN :: Lens.Lens' CreateSnapshotResponse (Prelude.Maybe Prelude.Text)+createSnapshotResponse_volumeARN = Lens.lens (\CreateSnapshotResponse' {volumeARN} -> volumeARN) (\s@CreateSnapshotResponse' {} a -> s {volumeARN = a} :: CreateSnapshotResponse)++-- | The response's http status code.+createSnapshotResponse_httpStatus :: Lens.Lens' CreateSnapshotResponse Prelude.Int+createSnapshotResponse_httpStatus = Lens.lens (\CreateSnapshotResponse' {httpStatus} -> httpStatus) (\s@CreateSnapshotResponse' {} a -> s {httpStatus = a} :: CreateSnapshotResponse)++instance Prelude.NFData CreateSnapshotResponse where+ rnf CreateSnapshotResponse' {..} =+ Prelude.rnf snapshotId+ `Prelude.seq` Prelude.rnf volumeARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/CreateSnapshotFromVolumeRecoveryPoint.hs view
@@ -0,0 +1,321 @@+{-# 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.CreateSnapshotFromVolumeRecoveryPoint+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Initiates a snapshot of a gateway from a volume recovery point. This+-- operation is only supported in the cached volume gateway type.+--+-- A volume recovery point is a point in time at which all data of the+-- volume is consistent and from which you can create a snapshot. To get a+-- list of volume recovery point for cached volume gateway, use+-- ListVolumeRecoveryPoints.+--+-- In the @CreateSnapshotFromVolumeRecoveryPoint@ request, you identify the+-- volume by providing its Amazon Resource Name (ARN). You must also+-- provide a description for the snapshot. When the gateway takes a+-- snapshot of the specified volume, the snapshot and its description+-- appear in the Storage Gateway console. In response, the gateway returns+-- you a snapshot ID. You can use this snapshot ID to check the snapshot+-- progress or later use it when you want to create a volume from a+-- snapshot.+--+-- To list or delete a snapshot, you must use the Amazon EC2 API. For more+-- information, see+-- <https://docs.aws.amazon.com/AWSEC2/latest/APIReference/API_DescribeSnapshots.html DescribeSnapshots>+-- or+-- <https://docs.aws.amazon.com/AWSEC2/latest/APIReference/API_DeleteSnapshot.html DeleteSnapshot>+-- in the /Amazon Elastic Compute Cloud API Reference/.+module Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint+ ( -- * Creating a Request+ CreateSnapshotFromVolumeRecoveryPoint (..),+ newCreateSnapshotFromVolumeRecoveryPoint,++ -- * Request Lenses+ createSnapshotFromVolumeRecoveryPoint_tags,+ createSnapshotFromVolumeRecoveryPoint_volumeARN,+ createSnapshotFromVolumeRecoveryPoint_snapshotDescription,++ -- * Destructuring the Response+ CreateSnapshotFromVolumeRecoveryPointResponse (..),+ newCreateSnapshotFromVolumeRecoveryPointResponse,++ -- * Response Lenses+ createSnapshotFromVolumeRecoveryPointResponse_snapshotId,+ createSnapshotFromVolumeRecoveryPointResponse_volumeARN,+ createSnapshotFromVolumeRecoveryPointResponse_volumeRecoveryPointTime,+ createSnapshotFromVolumeRecoveryPointResponse_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++-- | /See:/ 'newCreateSnapshotFromVolumeRecoveryPoint' smart constructor.+data CreateSnapshotFromVolumeRecoveryPoint = CreateSnapshotFromVolumeRecoveryPoint'+ { -- | A list of up to 50 tags that can be assigned to a snapshot. Each tag is+ -- a key-value pair.+ --+ -- Valid characters for key and value are letters, spaces, and numbers+ -- representable in UTF-8 format, and the following special characters: + -+ -- = . _ : \/ \@. The maximum length of a tag\'s key is 128 characters, and+ -- the maximum length for a tag\'s value is 256.+ tags :: Prelude.Maybe [Tag],+ -- | The Amazon Resource Name (ARN) of the iSCSI volume target. Use the+ -- DescribeStorediSCSIVolumes operation to return to retrieve the TargetARN+ -- for specified VolumeARN.+ volumeARN :: Prelude.Text,+ -- | Textual description of the snapshot that appears in the Amazon EC2+ -- console, Elastic Block Store snapshots panel in the __Description__+ -- field, and in the Storage Gateway snapshot __Details__ pane,+ -- __Description__ field.+ snapshotDescription :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'CreateSnapshotFromVolumeRecoveryPoint' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'tags', 'createSnapshotFromVolumeRecoveryPoint_tags' - A list of up to 50 tags that can be assigned to a snapshot. Each tag is+-- a key-value pair.+--+-- Valid characters for key and value are letters, spaces, and numbers+-- representable in UTF-8 format, and the following special characters: + -+-- = . _ : \/ \@. The maximum length of a tag\'s key is 128 characters, and+-- the maximum length for a tag\'s value is 256.+--+-- 'volumeARN', 'createSnapshotFromVolumeRecoveryPoint_volumeARN' - The Amazon Resource Name (ARN) of the iSCSI volume target. Use the+-- DescribeStorediSCSIVolumes operation to return to retrieve the TargetARN+-- for specified VolumeARN.+--+-- 'snapshotDescription', 'createSnapshotFromVolumeRecoveryPoint_snapshotDescription' - Textual description of the snapshot that appears in the Amazon EC2+-- console, Elastic Block Store snapshots panel in the __Description__+-- field, and in the Storage Gateway snapshot __Details__ pane,+-- __Description__ field.+newCreateSnapshotFromVolumeRecoveryPoint ::+ -- | 'volumeARN'+ Prelude.Text ->+ -- | 'snapshotDescription'+ Prelude.Text ->+ CreateSnapshotFromVolumeRecoveryPoint+newCreateSnapshotFromVolumeRecoveryPoint+ pVolumeARN_+ pSnapshotDescription_ =+ CreateSnapshotFromVolumeRecoveryPoint'+ { tags =+ Prelude.Nothing,+ volumeARN = pVolumeARN_,+ snapshotDescription =+ pSnapshotDescription_+ }++-- | A list of up to 50 tags that can be assigned to a snapshot. Each tag is+-- a key-value pair.+--+-- Valid characters for key and value are letters, spaces, and numbers+-- representable in UTF-8 format, and the following special characters: + -+-- = . _ : \/ \@. The maximum length of a tag\'s key is 128 characters, and+-- the maximum length for a tag\'s value is 256.+createSnapshotFromVolumeRecoveryPoint_tags :: Lens.Lens' CreateSnapshotFromVolumeRecoveryPoint (Prelude.Maybe [Tag])+createSnapshotFromVolumeRecoveryPoint_tags = Lens.lens (\CreateSnapshotFromVolumeRecoveryPoint' {tags} -> tags) (\s@CreateSnapshotFromVolumeRecoveryPoint' {} a -> s {tags = a} :: CreateSnapshotFromVolumeRecoveryPoint) Prelude.. Lens.mapping Lens.coerced++-- | The Amazon Resource Name (ARN) of the iSCSI volume target. Use the+-- DescribeStorediSCSIVolumes operation to return to retrieve the TargetARN+-- for specified VolumeARN.+createSnapshotFromVolumeRecoveryPoint_volumeARN :: Lens.Lens' CreateSnapshotFromVolumeRecoveryPoint Prelude.Text+createSnapshotFromVolumeRecoveryPoint_volumeARN = Lens.lens (\CreateSnapshotFromVolumeRecoveryPoint' {volumeARN} -> volumeARN) (\s@CreateSnapshotFromVolumeRecoveryPoint' {} a -> s {volumeARN = a} :: CreateSnapshotFromVolumeRecoveryPoint)++-- | Textual description of the snapshot that appears in the Amazon EC2+-- console, Elastic Block Store snapshots panel in the __Description__+-- field, and in the Storage Gateway snapshot __Details__ pane,+-- __Description__ field.+createSnapshotFromVolumeRecoveryPoint_snapshotDescription :: Lens.Lens' CreateSnapshotFromVolumeRecoveryPoint Prelude.Text+createSnapshotFromVolumeRecoveryPoint_snapshotDescription = Lens.lens (\CreateSnapshotFromVolumeRecoveryPoint' {snapshotDescription} -> snapshotDescription) (\s@CreateSnapshotFromVolumeRecoveryPoint' {} a -> s {snapshotDescription = a} :: CreateSnapshotFromVolumeRecoveryPoint)++instance+ Core.AWSRequest+ CreateSnapshotFromVolumeRecoveryPoint+ where+ type+ AWSResponse+ CreateSnapshotFromVolumeRecoveryPoint =+ CreateSnapshotFromVolumeRecoveryPointResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ CreateSnapshotFromVolumeRecoveryPointResponse'+ Prelude.<$> (x Data..?> "SnapshotId")+ Prelude.<*> (x Data..?> "VolumeARN")+ Prelude.<*> (x Data..?> "VolumeRecoveryPointTime")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance+ Prelude.Hashable+ CreateSnapshotFromVolumeRecoveryPoint+ where+ hashWithSalt+ _salt+ CreateSnapshotFromVolumeRecoveryPoint' {..} =+ _salt+ `Prelude.hashWithSalt` tags+ `Prelude.hashWithSalt` volumeARN+ `Prelude.hashWithSalt` snapshotDescription++instance+ Prelude.NFData+ CreateSnapshotFromVolumeRecoveryPoint+ where+ rnf CreateSnapshotFromVolumeRecoveryPoint' {..} =+ Prelude.rnf tags+ `Prelude.seq` Prelude.rnf volumeARN+ `Prelude.seq` Prelude.rnf snapshotDescription++instance+ Data.ToHeaders+ CreateSnapshotFromVolumeRecoveryPoint+ where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.CreateSnapshotFromVolumeRecoveryPoint" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance+ Data.ToJSON+ CreateSnapshotFromVolumeRecoveryPoint+ where+ toJSON CreateSnapshotFromVolumeRecoveryPoint' {..} =+ Data.object+ ( Prelude.catMaybes+ [ ("Tags" Data..=) Prelude.<$> tags,+ Prelude.Just ("VolumeARN" Data..= volumeARN),+ Prelude.Just+ ("SnapshotDescription" Data..= snapshotDescription)+ ]+ )++instance+ Data.ToPath+ CreateSnapshotFromVolumeRecoveryPoint+ where+ toPath = Prelude.const "/"++instance+ Data.ToQuery+ CreateSnapshotFromVolumeRecoveryPoint+ where+ toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newCreateSnapshotFromVolumeRecoveryPointResponse' smart constructor.+data CreateSnapshotFromVolumeRecoveryPointResponse = CreateSnapshotFromVolumeRecoveryPointResponse'+ { -- | The ID of the snapshot.+ snapshotId :: Prelude.Maybe Prelude.Text,+ -- | The Amazon Resource Name (ARN) of the iSCSI volume target. Use the+ -- DescribeStorediSCSIVolumes operation to return to retrieve the TargetARN+ -- for specified VolumeARN.+ volumeARN :: Prelude.Maybe Prelude.Text,+ -- | The time the volume was created from the recovery point.+ volumeRecoveryPointTime :: 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 'CreateSnapshotFromVolumeRecoveryPointResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'snapshotId', 'createSnapshotFromVolumeRecoveryPointResponse_snapshotId' - The ID of the snapshot.+--+-- 'volumeARN', 'createSnapshotFromVolumeRecoveryPointResponse_volumeARN' - The Amazon Resource Name (ARN) of the iSCSI volume target. Use the+-- DescribeStorediSCSIVolumes operation to return to retrieve the TargetARN+-- for specified VolumeARN.+--+-- 'volumeRecoveryPointTime', 'createSnapshotFromVolumeRecoveryPointResponse_volumeRecoveryPointTime' - The time the volume was created from the recovery point.+--+-- 'httpStatus', 'createSnapshotFromVolumeRecoveryPointResponse_httpStatus' - The response's http status code.+newCreateSnapshotFromVolumeRecoveryPointResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ CreateSnapshotFromVolumeRecoveryPointResponse+newCreateSnapshotFromVolumeRecoveryPointResponse+ pHttpStatus_ =+ CreateSnapshotFromVolumeRecoveryPointResponse'+ { snapshotId =+ Prelude.Nothing,+ volumeARN = Prelude.Nothing,+ volumeRecoveryPointTime =+ Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | The ID of the snapshot.+createSnapshotFromVolumeRecoveryPointResponse_snapshotId :: Lens.Lens' CreateSnapshotFromVolumeRecoveryPointResponse (Prelude.Maybe Prelude.Text)+createSnapshotFromVolumeRecoveryPointResponse_snapshotId = Lens.lens (\CreateSnapshotFromVolumeRecoveryPointResponse' {snapshotId} -> snapshotId) (\s@CreateSnapshotFromVolumeRecoveryPointResponse' {} a -> s {snapshotId = a} :: CreateSnapshotFromVolumeRecoveryPointResponse)++-- | The Amazon Resource Name (ARN) of the iSCSI volume target. Use the+-- DescribeStorediSCSIVolumes operation to return to retrieve the TargetARN+-- for specified VolumeARN.+createSnapshotFromVolumeRecoveryPointResponse_volumeARN :: Lens.Lens' CreateSnapshotFromVolumeRecoveryPointResponse (Prelude.Maybe Prelude.Text)+createSnapshotFromVolumeRecoveryPointResponse_volumeARN = Lens.lens (\CreateSnapshotFromVolumeRecoveryPointResponse' {volumeARN} -> volumeARN) (\s@CreateSnapshotFromVolumeRecoveryPointResponse' {} a -> s {volumeARN = a} :: CreateSnapshotFromVolumeRecoveryPointResponse)++-- | The time the volume was created from the recovery point.+createSnapshotFromVolumeRecoveryPointResponse_volumeRecoveryPointTime :: Lens.Lens' CreateSnapshotFromVolumeRecoveryPointResponse (Prelude.Maybe Prelude.Text)+createSnapshotFromVolumeRecoveryPointResponse_volumeRecoveryPointTime = Lens.lens (\CreateSnapshotFromVolumeRecoveryPointResponse' {volumeRecoveryPointTime} -> volumeRecoveryPointTime) (\s@CreateSnapshotFromVolumeRecoveryPointResponse' {} a -> s {volumeRecoveryPointTime = a} :: CreateSnapshotFromVolumeRecoveryPointResponse)++-- | The response's http status code.+createSnapshotFromVolumeRecoveryPointResponse_httpStatus :: Lens.Lens' CreateSnapshotFromVolumeRecoveryPointResponse Prelude.Int+createSnapshotFromVolumeRecoveryPointResponse_httpStatus = Lens.lens (\CreateSnapshotFromVolumeRecoveryPointResponse' {httpStatus} -> httpStatus) (\s@CreateSnapshotFromVolumeRecoveryPointResponse' {} a -> s {httpStatus = a} :: CreateSnapshotFromVolumeRecoveryPointResponse)++instance+ Prelude.NFData+ CreateSnapshotFromVolumeRecoveryPointResponse+ where+ rnf+ CreateSnapshotFromVolumeRecoveryPointResponse' {..} =+ Prelude.rnf snapshotId+ `Prelude.seq` Prelude.rnf volumeARN+ `Prelude.seq` Prelude.rnf volumeRecoveryPointTime+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/CreateStorediSCSIVolume.hs view
@@ -0,0 +1,452 @@+{-# 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.CreateStorediSCSIVolume+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Creates a volume on a specified gateway. This operation is only+-- supported in the stored volume gateway type.+--+-- The size of the volume to create is inferred from the disk size. You can+-- choose to preserve existing data on the disk, create volume from an+-- existing snapshot, or create an empty volume. If you choose to create an+-- empty gateway volume, then any existing data on the disk is erased.+--+-- In the request, you must specify the gateway and the disk information on+-- which you are creating the volume. In response, the gateway creates the+-- volume and returns volume information such as the volume Amazon Resource+-- Name (ARN), its size, and the iSCSI target ARN that initiators can use+-- to connect to the volume target.+module Amazonka.StorageGateway.CreateStorediSCSIVolume+ ( -- * Creating a Request+ CreateStorediSCSIVolume (..),+ newCreateStorediSCSIVolume,++ -- * Request Lenses+ createStorediSCSIVolume_kmsEncrypted,+ createStorediSCSIVolume_kmsKey,+ createStorediSCSIVolume_snapshotId,+ createStorediSCSIVolume_tags,+ createStorediSCSIVolume_gatewayARN,+ createStorediSCSIVolume_diskId,+ createStorediSCSIVolume_preserveExistingData,+ createStorediSCSIVolume_targetName,+ createStorediSCSIVolume_networkInterfaceId,++ -- * Destructuring the Response+ CreateStorediSCSIVolumeResponse (..),+ newCreateStorediSCSIVolumeResponse,++ -- * Response Lenses+ createStorediSCSIVolumeResponse_targetARN,+ createStorediSCSIVolumeResponse_volumeARN,+ createStorediSCSIVolumeResponse_volumeSizeInBytes,+ createStorediSCSIVolumeResponse_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++-- | A JSON object containing one or more of the following fields:+--+-- - CreateStorediSCSIVolumeInput$DiskId+--+-- - CreateStorediSCSIVolumeInput$NetworkInterfaceId+--+-- - CreateStorediSCSIVolumeInput$PreserveExistingData+--+-- - CreateStorediSCSIVolumeInput$SnapshotId+--+-- - CreateStorediSCSIVolumeInput$TargetName+--+-- /See:/ 'newCreateStorediSCSIVolume' smart constructor.+data CreateStorediSCSIVolume = CreateStorediSCSIVolume'+ { -- | 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 snapshot ID (e.g., \"snap-1122aabb\") of the snapshot to restore as+ -- the new stored volume. Specify this field if you want to create the+ -- iSCSI storage volume from a snapshot; otherwise, do not include this+ -- field. To list snapshots for your account use+ -- <https://docs.aws.amazon.com/AWSEC2/latest/APIReference/ApiReference-query-DescribeSnapshots.html DescribeSnapshots>+ -- in the /Amazon Elastic Compute Cloud API Reference/.+ snapshotId :: Prelude.Maybe Prelude.Text,+ -- | A list of up to 50 tags that can be assigned to a stored volume. Each+ -- tag is a key-value pair.+ --+ -- Valid characters for key and value are letters, spaces, and numbers+ -- representable in UTF-8 format, and the following special characters: + -+ -- = . _ : \/ \@. The maximum length of a tag\'s key is 128 characters, and+ -- the maximum length for a tag\'s value is 256.+ tags :: Prelude.Maybe [Tag],+ gatewayARN :: Prelude.Text,+ -- | The unique identifier for the gateway local disk that is configured as a+ -- stored volume. Use+ -- <https://docs.aws.amazon.com/storagegateway/latest/userguide/API_ListLocalDisks.html ListLocalDisks>+ -- to list disk IDs for a gateway.+ diskId :: Prelude.Text,+ -- | Set to @true@ if you want to preserve the data on the local disk.+ -- Otherwise, set to @false@ to create an empty volume.+ --+ -- Valid Values: @true@ | @false@+ preserveExistingData :: Prelude.Bool,+ -- | The name of the iSCSI target used by an initiator to connect to a volume+ -- and used as a suffix for the target ARN. For example, specifying+ -- @TargetName@ as /myvolume/ results in the target ARN of+ -- @arn:aws:storagegateway:us-east-2:111122223333:gateway\/sgw-12A3456B\/target\/iqn.1997-05.com.amazon:myvolume@.+ -- The target name must be unique across all volumes on a gateway.+ --+ -- If you don\'t specify a value, Storage Gateway uses the value that was+ -- previously used for this volume as the new target name.+ targetName :: Prelude.Text,+ -- | The network interface of the gateway on which to expose the iSCSI+ -- target. Only IPv4 addresses are accepted. Use DescribeGatewayInformation+ -- to get a list of the network interfaces available on a gateway.+ --+ -- Valid Values: A valid IP address.+ networkInterfaceId :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'CreateStorediSCSIVolume' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'kmsEncrypted', 'createStorediSCSIVolume_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', 'createStorediSCSIVolume_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.+--+-- 'snapshotId', 'createStorediSCSIVolume_snapshotId' - The snapshot ID (e.g., \"snap-1122aabb\") of the snapshot to restore as+-- the new stored volume. Specify this field if you want to create the+-- iSCSI storage volume from a snapshot; otherwise, do not include this+-- field. To list snapshots for your account use+-- <https://docs.aws.amazon.com/AWSEC2/latest/APIReference/ApiReference-query-DescribeSnapshots.html DescribeSnapshots>+-- in the /Amazon Elastic Compute Cloud API Reference/.+--+-- 'tags', 'createStorediSCSIVolume_tags' - A list of up to 50 tags that can be assigned to a stored volume. Each+-- tag is a key-value pair.+--+-- Valid characters for key and value are letters, spaces, and numbers+-- representable in UTF-8 format, and the following special characters: + -+-- = . _ : \/ \@. The maximum length of a tag\'s key is 128 characters, and+-- the maximum length for a tag\'s value is 256.+--+-- 'gatewayARN', 'createStorediSCSIVolume_gatewayARN' - Undocumented member.+--+-- 'diskId', 'createStorediSCSIVolume_diskId' - The unique identifier for the gateway local disk that is configured as a+-- stored volume. Use+-- <https://docs.aws.amazon.com/storagegateway/latest/userguide/API_ListLocalDisks.html ListLocalDisks>+-- to list disk IDs for a gateway.+--+-- 'preserveExistingData', 'createStorediSCSIVolume_preserveExistingData' - Set to @true@ if you want to preserve the data on the local disk.+-- Otherwise, set to @false@ to create an empty volume.+--+-- Valid Values: @true@ | @false@+--+-- 'targetName', 'createStorediSCSIVolume_targetName' - The name of the iSCSI target used by an initiator to connect to a volume+-- and used as a suffix for the target ARN. For example, specifying+-- @TargetName@ as /myvolume/ results in the target ARN of+-- @arn:aws:storagegateway:us-east-2:111122223333:gateway\/sgw-12A3456B\/target\/iqn.1997-05.com.amazon:myvolume@.+-- The target name must be unique across all volumes on a gateway.+--+-- If you don\'t specify a value, Storage Gateway uses the value that was+-- previously used for this volume as the new target name.+--+-- 'networkInterfaceId', 'createStorediSCSIVolume_networkInterfaceId' - The network interface of the gateway on which to expose the iSCSI+-- target. Only IPv4 addresses are accepted. Use DescribeGatewayInformation+-- to get a list of the network interfaces available on a gateway.+--+-- Valid Values: A valid IP address.+newCreateStorediSCSIVolume ::+ -- | 'gatewayARN'+ Prelude.Text ->+ -- | 'diskId'+ Prelude.Text ->+ -- | 'preserveExistingData'+ Prelude.Bool ->+ -- | 'targetName'+ Prelude.Text ->+ -- | 'networkInterfaceId'+ Prelude.Text ->+ CreateStorediSCSIVolume+newCreateStorediSCSIVolume+ pGatewayARN_+ pDiskId_+ pPreserveExistingData_+ pTargetName_+ pNetworkInterfaceId_ =+ CreateStorediSCSIVolume'+ { kmsEncrypted =+ Prelude.Nothing,+ kmsKey = Prelude.Nothing,+ snapshotId = Prelude.Nothing,+ tags = Prelude.Nothing,+ gatewayARN = pGatewayARN_,+ diskId = pDiskId_,+ preserveExistingData = pPreserveExistingData_,+ targetName = pTargetName_,+ networkInterfaceId = pNetworkInterfaceId_+ }++-- | 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@+createStorediSCSIVolume_kmsEncrypted :: Lens.Lens' CreateStorediSCSIVolume (Prelude.Maybe Prelude.Bool)+createStorediSCSIVolume_kmsEncrypted = Lens.lens (\CreateStorediSCSIVolume' {kmsEncrypted} -> kmsEncrypted) (\s@CreateStorediSCSIVolume' {} a -> s {kmsEncrypted = a} :: CreateStorediSCSIVolume)++-- | 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.+createStorediSCSIVolume_kmsKey :: Lens.Lens' CreateStorediSCSIVolume (Prelude.Maybe Prelude.Text)+createStorediSCSIVolume_kmsKey = Lens.lens (\CreateStorediSCSIVolume' {kmsKey} -> kmsKey) (\s@CreateStorediSCSIVolume' {} a -> s {kmsKey = a} :: CreateStorediSCSIVolume)++-- | The snapshot ID (e.g., \"snap-1122aabb\") of the snapshot to restore as+-- the new stored volume. Specify this field if you want to create the+-- iSCSI storage volume from a snapshot; otherwise, do not include this+-- field. To list snapshots for your account use+-- <https://docs.aws.amazon.com/AWSEC2/latest/APIReference/ApiReference-query-DescribeSnapshots.html DescribeSnapshots>+-- in the /Amazon Elastic Compute Cloud API Reference/.+createStorediSCSIVolume_snapshotId :: Lens.Lens' CreateStorediSCSIVolume (Prelude.Maybe Prelude.Text)+createStorediSCSIVolume_snapshotId = Lens.lens (\CreateStorediSCSIVolume' {snapshotId} -> snapshotId) (\s@CreateStorediSCSIVolume' {} a -> s {snapshotId = a} :: CreateStorediSCSIVolume)++-- | A list of up to 50 tags that can be assigned to a stored volume. Each+-- tag is a key-value pair.+--+-- Valid characters for key and value are letters, spaces, and numbers+-- representable in UTF-8 format, and the following special characters: + -+-- = . _ : \/ \@. The maximum length of a tag\'s key is 128 characters, and+-- the maximum length for a tag\'s value is 256.+createStorediSCSIVolume_tags :: Lens.Lens' CreateStorediSCSIVolume (Prelude.Maybe [Tag])+createStorediSCSIVolume_tags = Lens.lens (\CreateStorediSCSIVolume' {tags} -> tags) (\s@CreateStorediSCSIVolume' {} a -> s {tags = a} :: CreateStorediSCSIVolume) Prelude.. Lens.mapping Lens.coerced++-- | Undocumented member.+createStorediSCSIVolume_gatewayARN :: Lens.Lens' CreateStorediSCSIVolume Prelude.Text+createStorediSCSIVolume_gatewayARN = Lens.lens (\CreateStorediSCSIVolume' {gatewayARN} -> gatewayARN) (\s@CreateStorediSCSIVolume' {} a -> s {gatewayARN = a} :: CreateStorediSCSIVolume)++-- | The unique identifier for the gateway local disk that is configured as a+-- stored volume. Use+-- <https://docs.aws.amazon.com/storagegateway/latest/userguide/API_ListLocalDisks.html ListLocalDisks>+-- to list disk IDs for a gateway.+createStorediSCSIVolume_diskId :: Lens.Lens' CreateStorediSCSIVolume Prelude.Text+createStorediSCSIVolume_diskId = Lens.lens (\CreateStorediSCSIVolume' {diskId} -> diskId) (\s@CreateStorediSCSIVolume' {} a -> s {diskId = a} :: CreateStorediSCSIVolume)++-- | Set to @true@ if you want to preserve the data on the local disk.+-- Otherwise, set to @false@ to create an empty volume.+--+-- Valid Values: @true@ | @false@+createStorediSCSIVolume_preserveExistingData :: Lens.Lens' CreateStorediSCSIVolume Prelude.Bool+createStorediSCSIVolume_preserveExistingData = Lens.lens (\CreateStorediSCSIVolume' {preserveExistingData} -> preserveExistingData) (\s@CreateStorediSCSIVolume' {} a -> s {preserveExistingData = a} :: CreateStorediSCSIVolume)++-- | The name of the iSCSI target used by an initiator to connect to a volume+-- and used as a suffix for the target ARN. For example, specifying+-- @TargetName@ as /myvolume/ results in the target ARN of+-- @arn:aws:storagegateway:us-east-2:111122223333:gateway\/sgw-12A3456B\/target\/iqn.1997-05.com.amazon:myvolume@.+-- The target name must be unique across all volumes on a gateway.+--+-- If you don\'t specify a value, Storage Gateway uses the value that was+-- previously used for this volume as the new target name.+createStorediSCSIVolume_targetName :: Lens.Lens' CreateStorediSCSIVolume Prelude.Text+createStorediSCSIVolume_targetName = Lens.lens (\CreateStorediSCSIVolume' {targetName} -> targetName) (\s@CreateStorediSCSIVolume' {} a -> s {targetName = a} :: CreateStorediSCSIVolume)++-- | The network interface of the gateway on which to expose the iSCSI+-- target. Only IPv4 addresses are accepted. Use DescribeGatewayInformation+-- to get a list of the network interfaces available on a gateway.+--+-- Valid Values: A valid IP address.+createStorediSCSIVolume_networkInterfaceId :: Lens.Lens' CreateStorediSCSIVolume Prelude.Text+createStorediSCSIVolume_networkInterfaceId = Lens.lens (\CreateStorediSCSIVolume' {networkInterfaceId} -> networkInterfaceId) (\s@CreateStorediSCSIVolume' {} a -> s {networkInterfaceId = a} :: CreateStorediSCSIVolume)++instance Core.AWSRequest CreateStorediSCSIVolume where+ type+ AWSResponse CreateStorediSCSIVolume =+ CreateStorediSCSIVolumeResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ CreateStorediSCSIVolumeResponse'+ Prelude.<$> (x Data..?> "TargetARN")+ Prelude.<*> (x Data..?> "VolumeARN")+ Prelude.<*> (x Data..?> "VolumeSizeInBytes")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable CreateStorediSCSIVolume where+ hashWithSalt _salt CreateStorediSCSIVolume' {..} =+ _salt+ `Prelude.hashWithSalt` kmsEncrypted+ `Prelude.hashWithSalt` kmsKey+ `Prelude.hashWithSalt` snapshotId+ `Prelude.hashWithSalt` tags+ `Prelude.hashWithSalt` gatewayARN+ `Prelude.hashWithSalt` diskId+ `Prelude.hashWithSalt` preserveExistingData+ `Prelude.hashWithSalt` targetName+ `Prelude.hashWithSalt` networkInterfaceId++instance Prelude.NFData CreateStorediSCSIVolume where+ rnf CreateStorediSCSIVolume' {..} =+ Prelude.rnf kmsEncrypted+ `Prelude.seq` Prelude.rnf kmsKey+ `Prelude.seq` Prelude.rnf snapshotId+ `Prelude.seq` Prelude.rnf tags+ `Prelude.seq` Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf diskId+ `Prelude.seq` Prelude.rnf preserveExistingData+ `Prelude.seq` Prelude.rnf targetName+ `Prelude.seq` Prelude.rnf networkInterfaceId++instance Data.ToHeaders CreateStorediSCSIVolume where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.CreateStorediSCSIVolume" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON CreateStorediSCSIVolume where+ toJSON CreateStorediSCSIVolume' {..} =+ Data.object+ ( Prelude.catMaybes+ [ ("KMSEncrypted" Data..=) Prelude.<$> kmsEncrypted,+ ("KMSKey" Data..=) Prelude.<$> kmsKey,+ ("SnapshotId" Data..=) Prelude.<$> snapshotId,+ ("Tags" Data..=) Prelude.<$> tags,+ Prelude.Just ("GatewayARN" Data..= gatewayARN),+ Prelude.Just ("DiskId" Data..= diskId),+ Prelude.Just+ ( "PreserveExistingData"+ Data..= preserveExistingData+ ),+ Prelude.Just ("TargetName" Data..= targetName),+ Prelude.Just+ ("NetworkInterfaceId" Data..= networkInterfaceId)+ ]+ )++instance Data.ToPath CreateStorediSCSIVolume where+ toPath = Prelude.const "/"++instance Data.ToQuery CreateStorediSCSIVolume where+ toQuery = Prelude.const Prelude.mempty++-- | A JSON object containing the following fields:+--+-- /See:/ 'newCreateStorediSCSIVolumeResponse' smart constructor.+data CreateStorediSCSIVolumeResponse = CreateStorediSCSIVolumeResponse'+ { -- | The Amazon Resource Name (ARN) of the volume target, which includes the+ -- iSCSI name that initiators can use to connect to the target.+ targetARN :: Prelude.Maybe Prelude.Text,+ -- | The Amazon Resource Name (ARN) of the configured volume.+ volumeARN :: Prelude.Maybe Prelude.Text,+ -- | The size of the volume in bytes.+ volumeSizeInBytes :: Prelude.Maybe Prelude.Integer,+ -- | The response's http status code.+ httpStatus :: Prelude.Int+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'CreateStorediSCSIVolumeResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'targetARN', 'createStorediSCSIVolumeResponse_targetARN' - The Amazon Resource Name (ARN) of the volume target, which includes the+-- iSCSI name that initiators can use to connect to the target.+--+-- 'volumeARN', 'createStorediSCSIVolumeResponse_volumeARN' - The Amazon Resource Name (ARN) of the configured volume.+--+-- 'volumeSizeInBytes', 'createStorediSCSIVolumeResponse_volumeSizeInBytes' - The size of the volume in bytes.+--+-- 'httpStatus', 'createStorediSCSIVolumeResponse_httpStatus' - The response's http status code.+newCreateStorediSCSIVolumeResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ CreateStorediSCSIVolumeResponse+newCreateStorediSCSIVolumeResponse pHttpStatus_ =+ CreateStorediSCSIVolumeResponse'+ { targetARN =+ Prelude.Nothing,+ volumeARN = Prelude.Nothing,+ volumeSizeInBytes = Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | The Amazon Resource Name (ARN) of the volume target, which includes the+-- iSCSI name that initiators can use to connect to the target.+createStorediSCSIVolumeResponse_targetARN :: Lens.Lens' CreateStorediSCSIVolumeResponse (Prelude.Maybe Prelude.Text)+createStorediSCSIVolumeResponse_targetARN = Lens.lens (\CreateStorediSCSIVolumeResponse' {targetARN} -> targetARN) (\s@CreateStorediSCSIVolumeResponse' {} a -> s {targetARN = a} :: CreateStorediSCSIVolumeResponse)++-- | The Amazon Resource Name (ARN) of the configured volume.+createStorediSCSIVolumeResponse_volumeARN :: Lens.Lens' CreateStorediSCSIVolumeResponse (Prelude.Maybe Prelude.Text)+createStorediSCSIVolumeResponse_volumeARN = Lens.lens (\CreateStorediSCSIVolumeResponse' {volumeARN} -> volumeARN) (\s@CreateStorediSCSIVolumeResponse' {} a -> s {volumeARN = a} :: CreateStorediSCSIVolumeResponse)++-- | The size of the volume in bytes.+createStorediSCSIVolumeResponse_volumeSizeInBytes :: Lens.Lens' CreateStorediSCSIVolumeResponse (Prelude.Maybe Prelude.Integer)+createStorediSCSIVolumeResponse_volumeSizeInBytes = Lens.lens (\CreateStorediSCSIVolumeResponse' {volumeSizeInBytes} -> volumeSizeInBytes) (\s@CreateStorediSCSIVolumeResponse' {} a -> s {volumeSizeInBytes = a} :: CreateStorediSCSIVolumeResponse)++-- | The response's http status code.+createStorediSCSIVolumeResponse_httpStatus :: Lens.Lens' CreateStorediSCSIVolumeResponse Prelude.Int+createStorediSCSIVolumeResponse_httpStatus = Lens.lens (\CreateStorediSCSIVolumeResponse' {httpStatus} -> httpStatus) (\s@CreateStorediSCSIVolumeResponse' {} a -> s {httpStatus = a} :: CreateStorediSCSIVolumeResponse)++instance+ Prelude.NFData+ CreateStorediSCSIVolumeResponse+ where+ rnf CreateStorediSCSIVolumeResponse' {..} =+ Prelude.rnf targetARN+ `Prelude.seq` Prelude.rnf volumeARN+ `Prelude.seq` Prelude.rnf volumeSizeInBytes+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/CreateTapePool.hs view
@@ -0,0 +1,281 @@+{-# 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.CreateTapePool+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Creates a new custom tape pool. You can use custom tape pool to enable+-- tape retention lock on tapes that are archived in the custom pool.+module Amazonka.StorageGateway.CreateTapePool+ ( -- * Creating a Request+ CreateTapePool (..),+ newCreateTapePool,++ -- * Request Lenses+ createTapePool_retentionLockTimeInDays,+ createTapePool_retentionLockType,+ createTapePool_tags,+ createTapePool_poolName,+ createTapePool_storageClass,++ -- * Destructuring the Response+ CreateTapePoolResponse (..),+ newCreateTapePoolResponse,++ -- * Response Lenses+ createTapePoolResponse_poolARN,+ createTapePoolResponse_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++-- | /See:/ 'newCreateTapePool' smart constructor.+data CreateTapePool = CreateTapePool'+ { -- | Tape retention lock time is set in days. Tape retention lock can be+ -- enabled for up to 100 years (36,500 days).+ retentionLockTimeInDays :: Prelude.Maybe Prelude.Natural,+ -- | Tape retention lock can be configured in two modes. When configured in+ -- governance mode, Amazon Web Services accounts with specific IAM+ -- permissions are authorized to remove the tape retention lock from+ -- archived virtual tapes. When configured in compliance mode, the tape+ -- retention lock cannot be removed by any user, including the root Amazon+ -- Web Services account.+ retentionLockType :: Prelude.Maybe RetentionLockType,+ -- | A list of up to 50 tags that can be assigned to tape pool. Each tag is a+ -- key-value pair.+ --+ -- Valid characters for key and value are letters, spaces, and numbers+ -- representable in UTF-8 format, and the following special characters: + -+ -- = . _ : \/ \@. The maximum length of a tag\'s key is 128 characters, and+ -- the maximum length for a tag\'s value is 256.+ tags :: Prelude.Maybe [Tag],+ -- | The name of the new custom tape pool.+ poolName :: Prelude.Text,+ -- | The storage class that is associated with the new custom pool. When you+ -- use your backup application to eject the tape, the tape is archived+ -- directly into the storage class (S3 Glacier or S3 Glacier Deep Archive)+ -- that corresponds to the pool.+ storageClass :: TapeStorageClass+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'CreateTapePool' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'retentionLockTimeInDays', 'createTapePool_retentionLockTimeInDays' - Tape retention lock time is set in days. Tape retention lock can be+-- enabled for up to 100 years (36,500 days).+--+-- 'retentionLockType', 'createTapePool_retentionLockType' - Tape retention lock can be configured in two modes. When configured in+-- governance mode, Amazon Web Services accounts with specific IAM+-- permissions are authorized to remove the tape retention lock from+-- archived virtual tapes. When configured in compliance mode, the tape+-- retention lock cannot be removed by any user, including the root Amazon+-- Web Services account.+--+-- 'tags', 'createTapePool_tags' - A list of up to 50 tags that can be assigned to tape pool. Each tag is a+-- key-value pair.+--+-- Valid characters for key and value are letters, spaces, and numbers+-- representable in UTF-8 format, and the following special characters: + -+-- = . _ : \/ \@. The maximum length of a tag\'s key is 128 characters, and+-- the maximum length for a tag\'s value is 256.+--+-- 'poolName', 'createTapePool_poolName' - The name of the new custom tape pool.+--+-- 'storageClass', 'createTapePool_storageClass' - The storage class that is associated with the new custom pool. When you+-- use your backup application to eject the tape, the tape is archived+-- directly into the storage class (S3 Glacier or S3 Glacier Deep Archive)+-- that corresponds to the pool.+newCreateTapePool ::+ -- | 'poolName'+ Prelude.Text ->+ -- | 'storageClass'+ TapeStorageClass ->+ CreateTapePool+newCreateTapePool pPoolName_ pStorageClass_ =+ CreateTapePool'+ { retentionLockTimeInDays =+ Prelude.Nothing,+ retentionLockType = Prelude.Nothing,+ tags = Prelude.Nothing,+ poolName = pPoolName_,+ storageClass = pStorageClass_+ }++-- | Tape retention lock time is set in days. Tape retention lock can be+-- enabled for up to 100 years (36,500 days).+createTapePool_retentionLockTimeInDays :: Lens.Lens' CreateTapePool (Prelude.Maybe Prelude.Natural)+createTapePool_retentionLockTimeInDays = Lens.lens (\CreateTapePool' {retentionLockTimeInDays} -> retentionLockTimeInDays) (\s@CreateTapePool' {} a -> s {retentionLockTimeInDays = a} :: CreateTapePool)++-- | Tape retention lock can be configured in two modes. When configured in+-- governance mode, Amazon Web Services accounts with specific IAM+-- permissions are authorized to remove the tape retention lock from+-- archived virtual tapes. When configured in compliance mode, the tape+-- retention lock cannot be removed by any user, including the root Amazon+-- Web Services account.+createTapePool_retentionLockType :: Lens.Lens' CreateTapePool (Prelude.Maybe RetentionLockType)+createTapePool_retentionLockType = Lens.lens (\CreateTapePool' {retentionLockType} -> retentionLockType) (\s@CreateTapePool' {} a -> s {retentionLockType = a} :: CreateTapePool)++-- | A list of up to 50 tags that can be assigned to tape pool. Each tag is a+-- key-value pair.+--+-- Valid characters for key and value are letters, spaces, and numbers+-- representable in UTF-8 format, and the following special characters: + -+-- = . _ : \/ \@. The maximum length of a tag\'s key is 128 characters, and+-- the maximum length for a tag\'s value is 256.+createTapePool_tags :: Lens.Lens' CreateTapePool (Prelude.Maybe [Tag])+createTapePool_tags = Lens.lens (\CreateTapePool' {tags} -> tags) (\s@CreateTapePool' {} a -> s {tags = a} :: CreateTapePool) Prelude.. Lens.mapping Lens.coerced++-- | The name of the new custom tape pool.+createTapePool_poolName :: Lens.Lens' CreateTapePool Prelude.Text+createTapePool_poolName = Lens.lens (\CreateTapePool' {poolName} -> poolName) (\s@CreateTapePool' {} a -> s {poolName = a} :: CreateTapePool)++-- | The storage class that is associated with the new custom pool. When you+-- use your backup application to eject the tape, the tape is archived+-- directly into the storage class (S3 Glacier or S3 Glacier Deep Archive)+-- that corresponds to the pool.+createTapePool_storageClass :: Lens.Lens' CreateTapePool TapeStorageClass+createTapePool_storageClass = Lens.lens (\CreateTapePool' {storageClass} -> storageClass) (\s@CreateTapePool' {} a -> s {storageClass = a} :: CreateTapePool)++instance Core.AWSRequest CreateTapePool where+ type+ AWSResponse CreateTapePool =+ CreateTapePoolResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ CreateTapePoolResponse'+ Prelude.<$> (x Data..?> "PoolARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable CreateTapePool where+ hashWithSalt _salt CreateTapePool' {..} =+ _salt+ `Prelude.hashWithSalt` retentionLockTimeInDays+ `Prelude.hashWithSalt` retentionLockType+ `Prelude.hashWithSalt` tags+ `Prelude.hashWithSalt` poolName+ `Prelude.hashWithSalt` storageClass++instance Prelude.NFData CreateTapePool where+ rnf CreateTapePool' {..} =+ Prelude.rnf retentionLockTimeInDays+ `Prelude.seq` Prelude.rnf retentionLockType+ `Prelude.seq` Prelude.rnf tags+ `Prelude.seq` Prelude.rnf poolName+ `Prelude.seq` Prelude.rnf storageClass++instance Data.ToHeaders CreateTapePool where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.CreateTapePool" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON CreateTapePool where+ toJSON CreateTapePool' {..} =+ Data.object+ ( Prelude.catMaybes+ [ ("RetentionLockTimeInDays" Data..=)+ Prelude.<$> retentionLockTimeInDays,+ ("RetentionLockType" Data..=)+ Prelude.<$> retentionLockType,+ ("Tags" Data..=) Prelude.<$> tags,+ Prelude.Just ("PoolName" Data..= poolName),+ Prelude.Just ("StorageClass" Data..= storageClass)+ ]+ )++instance Data.ToPath CreateTapePool where+ toPath = Prelude.const "/"++instance Data.ToQuery CreateTapePool where+ toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newCreateTapePoolResponse' smart constructor.+data CreateTapePoolResponse = CreateTapePoolResponse'+ { -- | The unique Amazon Resource Name (ARN) that represents the custom tape+ -- pool. Use the ListTapePools operation to return a list of tape pools for+ -- your account and Amazon Web Services Region.+ poolARN :: 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 'CreateTapePoolResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'poolARN', 'createTapePoolResponse_poolARN' - The unique Amazon Resource Name (ARN) that represents the custom tape+-- pool. Use the ListTapePools operation to return a list of tape pools for+-- your account and Amazon Web Services Region.+--+-- 'httpStatus', 'createTapePoolResponse_httpStatus' - The response's http status code.+newCreateTapePoolResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ CreateTapePoolResponse+newCreateTapePoolResponse pHttpStatus_ =+ CreateTapePoolResponse'+ { poolARN = Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | The unique Amazon Resource Name (ARN) that represents the custom tape+-- pool. Use the ListTapePools operation to return a list of tape pools for+-- your account and Amazon Web Services Region.+createTapePoolResponse_poolARN :: Lens.Lens' CreateTapePoolResponse (Prelude.Maybe Prelude.Text)+createTapePoolResponse_poolARN = Lens.lens (\CreateTapePoolResponse' {poolARN} -> poolARN) (\s@CreateTapePoolResponse' {} a -> s {poolARN = a} :: CreateTapePoolResponse)++-- | The response's http status code.+createTapePoolResponse_httpStatus :: Lens.Lens' CreateTapePoolResponse Prelude.Int+createTapePoolResponse_httpStatus = Lens.lens (\CreateTapePoolResponse' {httpStatus} -> httpStatus) (\s@CreateTapePoolResponse' {} a -> s {httpStatus = a} :: CreateTapePoolResponse)++instance Prelude.NFData CreateTapePoolResponse where+ rnf CreateTapePoolResponse' {..} =+ Prelude.rnf poolARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/CreateTapeWithBarcode.hs view
@@ -0,0 +1,363 @@+{-# 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.CreateTapeWithBarcode+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Creates a virtual tape by using your own barcode. You write data to the+-- virtual tape and then archive the tape. A barcode is unique and cannot+-- be reused if it has already been used on a tape. This applies to+-- barcodes used on deleted tapes. This operation is only supported in the+-- tape gateway type.+--+-- Cache storage must be allocated to the gateway before you can create a+-- virtual tape. Use the AddCache operation to add cache storage to a+-- gateway.+module Amazonka.StorageGateway.CreateTapeWithBarcode+ ( -- * Creating a Request+ CreateTapeWithBarcode (..),+ newCreateTapeWithBarcode,++ -- * Request Lenses+ createTapeWithBarcode_kmsEncrypted,+ createTapeWithBarcode_kmsKey,+ createTapeWithBarcode_poolId,+ createTapeWithBarcode_tags,+ createTapeWithBarcode_worm,+ createTapeWithBarcode_gatewayARN,+ createTapeWithBarcode_tapeSizeInBytes,+ createTapeWithBarcode_tapeBarcode,++ -- * Destructuring the Response+ CreateTapeWithBarcodeResponse (..),+ newCreateTapeWithBarcodeResponse,++ -- * Response Lenses+ createTapeWithBarcodeResponse_tapeARN,+ createTapeWithBarcodeResponse_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++-- | CreateTapeWithBarcodeInput+--+-- /See:/ 'newCreateTapeWithBarcode' smart constructor.+data CreateTapeWithBarcode = CreateTapeWithBarcode'+ { -- | 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 ID of the pool that you want to add your tape to for archiving. The+ -- tape in this pool is archived in the S3 storage class that is associated+ -- with the pool. When you use your backup application to eject the tape,+ -- the tape is archived directly into the storage class (S3 Glacier or S3+ -- Deep Archive) that corresponds to the pool.+ poolId :: Prelude.Maybe Prelude.Text,+ -- | A list of up to 50 tags that can be assigned to a virtual tape that has+ -- a barcode. Each tag is a key-value pair.+ --+ -- Valid characters for key and value are letters, spaces, and numbers+ -- representable in UTF-8 format, and the following special characters: + -+ -- = . _ : \/ \@. The maximum length of a tag\'s key is 128 characters, and+ -- the maximum length for a tag\'s value is 256.+ tags :: Prelude.Maybe [Tag],+ -- | Set to @TRUE@ if the tape you are creating is to be configured as a+ -- write-once-read-many (WORM) tape.+ worm :: Prelude.Maybe Prelude.Bool,+ -- | The unique Amazon Resource Name (ARN) that represents the gateway to+ -- associate the virtual tape with. Use the ListGateways operation to+ -- return a list of gateways for your account and Amazon Web Services+ -- Region.+ gatewayARN :: Prelude.Text,+ -- | The size, in bytes, of the virtual tape that you want to create.+ --+ -- The size must be aligned by gigabyte (1024*1024*1024 bytes).+ tapeSizeInBytes :: Prelude.Integer,+ -- | The barcode that you want to assign to the tape.+ --+ -- Barcodes cannot be reused. This includes barcodes used for tapes that+ -- have been deleted.+ tapeBarcode :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'CreateTapeWithBarcode' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'kmsEncrypted', 'createTapeWithBarcode_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', 'createTapeWithBarcode_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.+--+-- 'poolId', 'createTapeWithBarcode_poolId' - The ID of the pool that you want to add your tape to for archiving. The+-- tape in this pool is archived in the S3 storage class that is associated+-- with the pool. When you use your backup application to eject the tape,+-- the tape is archived directly into the storage class (S3 Glacier or S3+-- Deep Archive) that corresponds to the pool.+--+-- 'tags', 'createTapeWithBarcode_tags' - A list of up to 50 tags that can be assigned to a virtual tape that has+-- a barcode. Each tag is a key-value pair.+--+-- Valid characters for key and value are letters, spaces, and numbers+-- representable in UTF-8 format, and the following special characters: + -+-- = . _ : \/ \@. The maximum length of a tag\'s key is 128 characters, and+-- the maximum length for a tag\'s value is 256.+--+-- 'worm', 'createTapeWithBarcode_worm' - Set to @TRUE@ if the tape you are creating is to be configured as a+-- write-once-read-many (WORM) tape.+--+-- 'gatewayARN', 'createTapeWithBarcode_gatewayARN' - The unique Amazon Resource Name (ARN) that represents the gateway to+-- associate the virtual tape with. Use the ListGateways operation to+-- return a list of gateways for your account and Amazon Web Services+-- Region.+--+-- 'tapeSizeInBytes', 'createTapeWithBarcode_tapeSizeInBytes' - The size, in bytes, of the virtual tape that you want to create.+--+-- The size must be aligned by gigabyte (1024*1024*1024 bytes).+--+-- 'tapeBarcode', 'createTapeWithBarcode_tapeBarcode' - The barcode that you want to assign to the tape.+--+-- Barcodes cannot be reused. This includes barcodes used for tapes that+-- have been deleted.+newCreateTapeWithBarcode ::+ -- | 'gatewayARN'+ Prelude.Text ->+ -- | 'tapeSizeInBytes'+ Prelude.Integer ->+ -- | 'tapeBarcode'+ Prelude.Text ->+ CreateTapeWithBarcode+newCreateTapeWithBarcode+ pGatewayARN_+ pTapeSizeInBytes_+ pTapeBarcode_ =+ CreateTapeWithBarcode'+ { kmsEncrypted =+ Prelude.Nothing,+ kmsKey = Prelude.Nothing,+ poolId = Prelude.Nothing,+ tags = Prelude.Nothing,+ worm = Prelude.Nothing,+ gatewayARN = pGatewayARN_,+ tapeSizeInBytes = pTapeSizeInBytes_,+ tapeBarcode = pTapeBarcode_+ }++-- | 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@+createTapeWithBarcode_kmsEncrypted :: Lens.Lens' CreateTapeWithBarcode (Prelude.Maybe Prelude.Bool)+createTapeWithBarcode_kmsEncrypted = Lens.lens (\CreateTapeWithBarcode' {kmsEncrypted} -> kmsEncrypted) (\s@CreateTapeWithBarcode' {} a -> s {kmsEncrypted = a} :: CreateTapeWithBarcode)++-- | 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.+createTapeWithBarcode_kmsKey :: Lens.Lens' CreateTapeWithBarcode (Prelude.Maybe Prelude.Text)+createTapeWithBarcode_kmsKey = Lens.lens (\CreateTapeWithBarcode' {kmsKey} -> kmsKey) (\s@CreateTapeWithBarcode' {} a -> s {kmsKey = a} :: CreateTapeWithBarcode)++-- | The ID of the pool that you want to add your tape to for archiving. The+-- tape in this pool is archived in the S3 storage class that is associated+-- with the pool. When you use your backup application to eject the tape,+-- the tape is archived directly into the storage class (S3 Glacier or S3+-- Deep Archive) that corresponds to the pool.+createTapeWithBarcode_poolId :: Lens.Lens' CreateTapeWithBarcode (Prelude.Maybe Prelude.Text)+createTapeWithBarcode_poolId = Lens.lens (\CreateTapeWithBarcode' {poolId} -> poolId) (\s@CreateTapeWithBarcode' {} a -> s {poolId = a} :: CreateTapeWithBarcode)++-- | A list of up to 50 tags that can be assigned to a virtual tape that has+-- a barcode. Each tag is a key-value pair.+--+-- Valid characters for key and value are letters, spaces, and numbers+-- representable in UTF-8 format, and the following special characters: + -+-- = . _ : \/ \@. The maximum length of a tag\'s key is 128 characters, and+-- the maximum length for a tag\'s value is 256.+createTapeWithBarcode_tags :: Lens.Lens' CreateTapeWithBarcode (Prelude.Maybe [Tag])+createTapeWithBarcode_tags = Lens.lens (\CreateTapeWithBarcode' {tags} -> tags) (\s@CreateTapeWithBarcode' {} a -> s {tags = a} :: CreateTapeWithBarcode) Prelude.. Lens.mapping Lens.coerced++-- | Set to @TRUE@ if the tape you are creating is to be configured as a+-- write-once-read-many (WORM) tape.+createTapeWithBarcode_worm :: Lens.Lens' CreateTapeWithBarcode (Prelude.Maybe Prelude.Bool)+createTapeWithBarcode_worm = Lens.lens (\CreateTapeWithBarcode' {worm} -> worm) (\s@CreateTapeWithBarcode' {} a -> s {worm = a} :: CreateTapeWithBarcode)++-- | The unique Amazon Resource Name (ARN) that represents the gateway to+-- associate the virtual tape with. Use the ListGateways operation to+-- return a list of gateways for your account and Amazon Web Services+-- Region.+createTapeWithBarcode_gatewayARN :: Lens.Lens' CreateTapeWithBarcode Prelude.Text+createTapeWithBarcode_gatewayARN = Lens.lens (\CreateTapeWithBarcode' {gatewayARN} -> gatewayARN) (\s@CreateTapeWithBarcode' {} a -> s {gatewayARN = a} :: CreateTapeWithBarcode)++-- | The size, in bytes, of the virtual tape that you want to create.+--+-- The size must be aligned by gigabyte (1024*1024*1024 bytes).+createTapeWithBarcode_tapeSizeInBytes :: Lens.Lens' CreateTapeWithBarcode Prelude.Integer+createTapeWithBarcode_tapeSizeInBytes = Lens.lens (\CreateTapeWithBarcode' {tapeSizeInBytes} -> tapeSizeInBytes) (\s@CreateTapeWithBarcode' {} a -> s {tapeSizeInBytes = a} :: CreateTapeWithBarcode)++-- | The barcode that you want to assign to the tape.+--+-- Barcodes cannot be reused. This includes barcodes used for tapes that+-- have been deleted.+createTapeWithBarcode_tapeBarcode :: Lens.Lens' CreateTapeWithBarcode Prelude.Text+createTapeWithBarcode_tapeBarcode = Lens.lens (\CreateTapeWithBarcode' {tapeBarcode} -> tapeBarcode) (\s@CreateTapeWithBarcode' {} a -> s {tapeBarcode = a} :: CreateTapeWithBarcode)++instance Core.AWSRequest CreateTapeWithBarcode where+ type+ AWSResponse CreateTapeWithBarcode =+ CreateTapeWithBarcodeResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ CreateTapeWithBarcodeResponse'+ Prelude.<$> (x Data..?> "TapeARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable CreateTapeWithBarcode where+ hashWithSalt _salt CreateTapeWithBarcode' {..} =+ _salt+ `Prelude.hashWithSalt` kmsEncrypted+ `Prelude.hashWithSalt` kmsKey+ `Prelude.hashWithSalt` poolId+ `Prelude.hashWithSalt` tags+ `Prelude.hashWithSalt` worm+ `Prelude.hashWithSalt` gatewayARN+ `Prelude.hashWithSalt` tapeSizeInBytes+ `Prelude.hashWithSalt` tapeBarcode++instance Prelude.NFData CreateTapeWithBarcode where+ rnf CreateTapeWithBarcode' {..} =+ Prelude.rnf kmsEncrypted+ `Prelude.seq` Prelude.rnf kmsKey+ `Prelude.seq` Prelude.rnf poolId+ `Prelude.seq` Prelude.rnf tags+ `Prelude.seq` Prelude.rnf worm+ `Prelude.seq` Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf tapeSizeInBytes+ `Prelude.seq` Prelude.rnf tapeBarcode++instance Data.ToHeaders CreateTapeWithBarcode where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.CreateTapeWithBarcode" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON CreateTapeWithBarcode where+ toJSON CreateTapeWithBarcode' {..} =+ Data.object+ ( Prelude.catMaybes+ [ ("KMSEncrypted" Data..=) Prelude.<$> kmsEncrypted,+ ("KMSKey" Data..=) Prelude.<$> kmsKey,+ ("PoolId" Data..=) Prelude.<$> poolId,+ ("Tags" Data..=) Prelude.<$> tags,+ ("Worm" Data..=) Prelude.<$> worm,+ Prelude.Just ("GatewayARN" Data..= gatewayARN),+ Prelude.Just+ ("TapeSizeInBytes" Data..= tapeSizeInBytes),+ Prelude.Just ("TapeBarcode" Data..= tapeBarcode)+ ]+ )++instance Data.ToPath CreateTapeWithBarcode where+ toPath = Prelude.const "/"++instance Data.ToQuery CreateTapeWithBarcode where+ toQuery = Prelude.const Prelude.mempty++-- | CreateTapeOutput+--+-- /See:/ 'newCreateTapeWithBarcodeResponse' smart constructor.+data CreateTapeWithBarcodeResponse = CreateTapeWithBarcodeResponse'+ { -- | A unique Amazon Resource Name (ARN) that represents the virtual tape+ -- that was created.+ tapeARN :: 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 'CreateTapeWithBarcodeResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'tapeARN', 'createTapeWithBarcodeResponse_tapeARN' - A unique Amazon Resource Name (ARN) that represents the virtual tape+-- that was created.+--+-- 'httpStatus', 'createTapeWithBarcodeResponse_httpStatus' - The response's http status code.+newCreateTapeWithBarcodeResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ CreateTapeWithBarcodeResponse+newCreateTapeWithBarcodeResponse pHttpStatus_ =+ CreateTapeWithBarcodeResponse'+ { tapeARN =+ Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | A unique Amazon Resource Name (ARN) that represents the virtual tape+-- that was created.+createTapeWithBarcodeResponse_tapeARN :: Lens.Lens' CreateTapeWithBarcodeResponse (Prelude.Maybe Prelude.Text)+createTapeWithBarcodeResponse_tapeARN = Lens.lens (\CreateTapeWithBarcodeResponse' {tapeARN} -> tapeARN) (\s@CreateTapeWithBarcodeResponse' {} a -> s {tapeARN = a} :: CreateTapeWithBarcodeResponse)++-- | The response's http status code.+createTapeWithBarcodeResponse_httpStatus :: Lens.Lens' CreateTapeWithBarcodeResponse Prelude.Int+createTapeWithBarcodeResponse_httpStatus = Lens.lens (\CreateTapeWithBarcodeResponse' {httpStatus} -> httpStatus) (\s@CreateTapeWithBarcodeResponse' {} a -> s {httpStatus = a} :: CreateTapeWithBarcodeResponse)++instance Prelude.NFData CreateTapeWithBarcodeResponse where+ rnf CreateTapeWithBarcodeResponse' {..} =+ Prelude.rnf tapeARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/CreateTapes.hs view
@@ -0,0 +1,406 @@+{-# 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.CreateTapes+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Creates one or more virtual tapes. You write data to the virtual tapes+-- and then archive the tapes. This operation is only supported in the tape+-- gateway type.+--+-- Cache storage must be allocated to the gateway before you can create+-- virtual tapes. Use the AddCache operation to add cache storage to a+-- gateway.+module Amazonka.StorageGateway.CreateTapes+ ( -- * Creating a Request+ CreateTapes (..),+ newCreateTapes,++ -- * Request Lenses+ createTapes_kmsEncrypted,+ createTapes_kmsKey,+ createTapes_poolId,+ createTapes_tags,+ createTapes_worm,+ createTapes_gatewayARN,+ createTapes_tapeSizeInBytes,+ createTapes_clientToken,+ createTapes_numTapesToCreate,+ createTapes_tapeBarcodePrefix,++ -- * Destructuring the Response+ CreateTapesResponse (..),+ newCreateTapesResponse,++ -- * Response Lenses+ createTapesResponse_tapeARNs,+ createTapesResponse_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++-- | CreateTapesInput+--+-- /See:/ 'newCreateTapes' smart constructor.+data CreateTapes = CreateTapes'+ { -- | 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 ID of the pool that you want to add your tape to for archiving. The+ -- tape in this pool is archived in the S3 storage class that is associated+ -- with the pool. When you use your backup application to eject the tape,+ -- the tape is archived directly into the storage class (S3 Glacier or S3+ -- Glacier Deep Archive) that corresponds to the pool.+ poolId :: Prelude.Maybe Prelude.Text,+ -- | A list of up to 50 tags that can be assigned to a virtual tape. Each tag+ -- is a key-value pair.+ --+ -- Valid characters for key and value are letters, spaces, and numbers+ -- representable in UTF-8 format, and the following special characters: + -+ -- = . _ : \/ \@. The maximum length of a tag\'s key is 128 characters, and+ -- the maximum length for a tag\'s value is 256.+ tags :: Prelude.Maybe [Tag],+ -- | Set to @TRUE@ if the tape you are creating is to be configured as a+ -- write-once-read-many (WORM) tape.+ worm :: Prelude.Maybe Prelude.Bool,+ -- | The unique Amazon Resource Name (ARN) that represents the gateway to+ -- associate the virtual tapes with. Use the ListGateways operation to+ -- return a list of gateways for your account and Amazon Web Services+ -- Region.+ gatewayARN :: Prelude.Text,+ -- | The size, in bytes, of the virtual tapes that you want to create.+ --+ -- The size must be aligned by gigabyte (1024*1024*1024 bytes).+ tapeSizeInBytes :: Prelude.Integer,+ -- | A unique identifier that you use to retry a request. If you retry a+ -- request, use the same @ClientToken@ you specified in the initial+ -- request.+ --+ -- Using the same @ClientToken@ prevents creating the tape multiple times.+ clientToken :: Prelude.Text,+ -- | The number of virtual tapes that you want to create.+ numTapesToCreate :: Prelude.Natural,+ -- | A prefix that you append to the barcode of the virtual tape you are+ -- creating. This prefix makes the barcode unique.+ --+ -- The prefix must be 1-4 characters in length and must be one of the+ -- uppercase letters from A to Z.+ tapeBarcodePrefix :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'CreateTapes' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'kmsEncrypted', 'createTapes_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', 'createTapes_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.+--+-- 'poolId', 'createTapes_poolId' - The ID of the pool that you want to add your tape to for archiving. The+-- tape in this pool is archived in the S3 storage class that is associated+-- with the pool. When you use your backup application to eject the tape,+-- the tape is archived directly into the storage class (S3 Glacier or S3+-- Glacier Deep Archive) that corresponds to the pool.+--+-- 'tags', 'createTapes_tags' - A list of up to 50 tags that can be assigned to a virtual tape. Each tag+-- is a key-value pair.+--+-- Valid characters for key and value are letters, spaces, and numbers+-- representable in UTF-8 format, and the following special characters: + -+-- = . _ : \/ \@. The maximum length of a tag\'s key is 128 characters, and+-- the maximum length for a tag\'s value is 256.+--+-- 'worm', 'createTapes_worm' - Set to @TRUE@ if the tape you are creating is to be configured as a+-- write-once-read-many (WORM) tape.+--+-- 'gatewayARN', 'createTapes_gatewayARN' - The unique Amazon Resource Name (ARN) that represents the gateway to+-- associate the virtual tapes with. Use the ListGateways operation to+-- return a list of gateways for your account and Amazon Web Services+-- Region.+--+-- 'tapeSizeInBytes', 'createTapes_tapeSizeInBytes' - The size, in bytes, of the virtual tapes that you want to create.+--+-- The size must be aligned by gigabyte (1024*1024*1024 bytes).+--+-- 'clientToken', 'createTapes_clientToken' - A unique identifier that you use to retry a request. If you retry a+-- request, use the same @ClientToken@ you specified in the initial+-- request.+--+-- Using the same @ClientToken@ prevents creating the tape multiple times.+--+-- 'numTapesToCreate', 'createTapes_numTapesToCreate' - The number of virtual tapes that you want to create.+--+-- 'tapeBarcodePrefix', 'createTapes_tapeBarcodePrefix' - A prefix that you append to the barcode of the virtual tape you are+-- creating. This prefix makes the barcode unique.+--+-- The prefix must be 1-4 characters in length and must be one of the+-- uppercase letters from A to Z.+newCreateTapes ::+ -- | 'gatewayARN'+ Prelude.Text ->+ -- | 'tapeSizeInBytes'+ Prelude.Integer ->+ -- | 'clientToken'+ Prelude.Text ->+ -- | 'numTapesToCreate'+ Prelude.Natural ->+ -- | 'tapeBarcodePrefix'+ Prelude.Text ->+ CreateTapes+newCreateTapes+ pGatewayARN_+ pTapeSizeInBytes_+ pClientToken_+ pNumTapesToCreate_+ pTapeBarcodePrefix_ =+ CreateTapes'+ { kmsEncrypted = Prelude.Nothing,+ kmsKey = Prelude.Nothing,+ poolId = Prelude.Nothing,+ tags = Prelude.Nothing,+ worm = Prelude.Nothing,+ gatewayARN = pGatewayARN_,+ tapeSizeInBytes = pTapeSizeInBytes_,+ clientToken = pClientToken_,+ numTapesToCreate = pNumTapesToCreate_,+ tapeBarcodePrefix = pTapeBarcodePrefix_+ }++-- | 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@+createTapes_kmsEncrypted :: Lens.Lens' CreateTapes (Prelude.Maybe Prelude.Bool)+createTapes_kmsEncrypted = Lens.lens (\CreateTapes' {kmsEncrypted} -> kmsEncrypted) (\s@CreateTapes' {} a -> s {kmsEncrypted = a} :: CreateTapes)++-- | 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.+createTapes_kmsKey :: Lens.Lens' CreateTapes (Prelude.Maybe Prelude.Text)+createTapes_kmsKey = Lens.lens (\CreateTapes' {kmsKey} -> kmsKey) (\s@CreateTapes' {} a -> s {kmsKey = a} :: CreateTapes)++-- | The ID of the pool that you want to add your tape to for archiving. The+-- tape in this pool is archived in the S3 storage class that is associated+-- with the pool. When you use your backup application to eject the tape,+-- the tape is archived directly into the storage class (S3 Glacier or S3+-- Glacier Deep Archive) that corresponds to the pool.+createTapes_poolId :: Lens.Lens' CreateTapes (Prelude.Maybe Prelude.Text)+createTapes_poolId = Lens.lens (\CreateTapes' {poolId} -> poolId) (\s@CreateTapes' {} a -> s {poolId = a} :: CreateTapes)++-- | A list of up to 50 tags that can be assigned to a virtual tape. Each tag+-- is a key-value pair.+--+-- Valid characters for key and value are letters, spaces, and numbers+-- representable in UTF-8 format, and the following special characters: + -+-- = . _ : \/ \@. The maximum length of a tag\'s key is 128 characters, and+-- the maximum length for a tag\'s value is 256.+createTapes_tags :: Lens.Lens' CreateTapes (Prelude.Maybe [Tag])+createTapes_tags = Lens.lens (\CreateTapes' {tags} -> tags) (\s@CreateTapes' {} a -> s {tags = a} :: CreateTapes) Prelude.. Lens.mapping Lens.coerced++-- | Set to @TRUE@ if the tape you are creating is to be configured as a+-- write-once-read-many (WORM) tape.+createTapes_worm :: Lens.Lens' CreateTapes (Prelude.Maybe Prelude.Bool)+createTapes_worm = Lens.lens (\CreateTapes' {worm} -> worm) (\s@CreateTapes' {} a -> s {worm = a} :: CreateTapes)++-- | The unique Amazon Resource Name (ARN) that represents the gateway to+-- associate the virtual tapes with. Use the ListGateways operation to+-- return a list of gateways for your account and Amazon Web Services+-- Region.+createTapes_gatewayARN :: Lens.Lens' CreateTapes Prelude.Text+createTapes_gatewayARN = Lens.lens (\CreateTapes' {gatewayARN} -> gatewayARN) (\s@CreateTapes' {} a -> s {gatewayARN = a} :: CreateTapes)++-- | The size, in bytes, of the virtual tapes that you want to create.+--+-- The size must be aligned by gigabyte (1024*1024*1024 bytes).+createTapes_tapeSizeInBytes :: Lens.Lens' CreateTapes Prelude.Integer+createTapes_tapeSizeInBytes = Lens.lens (\CreateTapes' {tapeSizeInBytes} -> tapeSizeInBytes) (\s@CreateTapes' {} a -> s {tapeSizeInBytes = a} :: CreateTapes)++-- | A unique identifier that you use to retry a request. If you retry a+-- request, use the same @ClientToken@ you specified in the initial+-- request.+--+-- Using the same @ClientToken@ prevents creating the tape multiple times.+createTapes_clientToken :: Lens.Lens' CreateTapes Prelude.Text+createTapes_clientToken = Lens.lens (\CreateTapes' {clientToken} -> clientToken) (\s@CreateTapes' {} a -> s {clientToken = a} :: CreateTapes)++-- | The number of virtual tapes that you want to create.+createTapes_numTapesToCreate :: Lens.Lens' CreateTapes Prelude.Natural+createTapes_numTapesToCreate = Lens.lens (\CreateTapes' {numTapesToCreate} -> numTapesToCreate) (\s@CreateTapes' {} a -> s {numTapesToCreate = a} :: CreateTapes)++-- | A prefix that you append to the barcode of the virtual tape you are+-- creating. This prefix makes the barcode unique.+--+-- The prefix must be 1-4 characters in length and must be one of the+-- uppercase letters from A to Z.+createTapes_tapeBarcodePrefix :: Lens.Lens' CreateTapes Prelude.Text+createTapes_tapeBarcodePrefix = Lens.lens (\CreateTapes' {tapeBarcodePrefix} -> tapeBarcodePrefix) (\s@CreateTapes' {} a -> s {tapeBarcodePrefix = a} :: CreateTapes)++instance Core.AWSRequest CreateTapes where+ type AWSResponse CreateTapes = CreateTapesResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ CreateTapesResponse'+ Prelude.<$> (x Data..?> "TapeARNs" Core..!@ Prelude.mempty)+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable CreateTapes where+ hashWithSalt _salt CreateTapes' {..} =+ _salt+ `Prelude.hashWithSalt` kmsEncrypted+ `Prelude.hashWithSalt` kmsKey+ `Prelude.hashWithSalt` poolId+ `Prelude.hashWithSalt` tags+ `Prelude.hashWithSalt` worm+ `Prelude.hashWithSalt` gatewayARN+ `Prelude.hashWithSalt` tapeSizeInBytes+ `Prelude.hashWithSalt` clientToken+ `Prelude.hashWithSalt` numTapesToCreate+ `Prelude.hashWithSalt` tapeBarcodePrefix++instance Prelude.NFData CreateTapes where+ rnf CreateTapes' {..} =+ Prelude.rnf kmsEncrypted+ `Prelude.seq` Prelude.rnf kmsKey+ `Prelude.seq` Prelude.rnf poolId+ `Prelude.seq` Prelude.rnf tags+ `Prelude.seq` Prelude.rnf worm+ `Prelude.seq` Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf tapeSizeInBytes+ `Prelude.seq` Prelude.rnf clientToken+ `Prelude.seq` Prelude.rnf numTapesToCreate+ `Prelude.seq` Prelude.rnf tapeBarcodePrefix++instance Data.ToHeaders CreateTapes where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.CreateTapes" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON CreateTapes where+ toJSON CreateTapes' {..} =+ Data.object+ ( Prelude.catMaybes+ [ ("KMSEncrypted" Data..=) Prelude.<$> kmsEncrypted,+ ("KMSKey" Data..=) Prelude.<$> kmsKey,+ ("PoolId" Data..=) Prelude.<$> poolId,+ ("Tags" Data..=) Prelude.<$> tags,+ ("Worm" Data..=) Prelude.<$> worm,+ Prelude.Just ("GatewayARN" Data..= gatewayARN),+ Prelude.Just+ ("TapeSizeInBytes" Data..= tapeSizeInBytes),+ Prelude.Just ("ClientToken" Data..= clientToken),+ Prelude.Just+ ("NumTapesToCreate" Data..= numTapesToCreate),+ Prelude.Just+ ("TapeBarcodePrefix" Data..= tapeBarcodePrefix)+ ]+ )++instance Data.ToPath CreateTapes where+ toPath = Prelude.const "/"++instance Data.ToQuery CreateTapes where+ toQuery = Prelude.const Prelude.mempty++-- | CreateTapeOutput+--+-- /See:/ 'newCreateTapesResponse' smart constructor.+data CreateTapesResponse = CreateTapesResponse'+ { -- | A list of unique Amazon Resource Names (ARNs) that represents the+ -- virtual tapes that were created.+ tapeARNs :: 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 'CreateTapesResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'tapeARNs', 'createTapesResponse_tapeARNs' - A list of unique Amazon Resource Names (ARNs) that represents the+-- virtual tapes that were created.+--+-- 'httpStatus', 'createTapesResponse_httpStatus' - The response's http status code.+newCreateTapesResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ CreateTapesResponse+newCreateTapesResponse pHttpStatus_ =+ CreateTapesResponse'+ { tapeARNs = Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | A list of unique Amazon Resource Names (ARNs) that represents the+-- virtual tapes that were created.+createTapesResponse_tapeARNs :: Lens.Lens' CreateTapesResponse (Prelude.Maybe [Prelude.Text])+createTapesResponse_tapeARNs = Lens.lens (\CreateTapesResponse' {tapeARNs} -> tapeARNs) (\s@CreateTapesResponse' {} a -> s {tapeARNs = a} :: CreateTapesResponse) Prelude.. Lens.mapping Lens.coerced++-- | The response's http status code.+createTapesResponse_httpStatus :: Lens.Lens' CreateTapesResponse Prelude.Int+createTapesResponse_httpStatus = Lens.lens (\CreateTapesResponse' {httpStatus} -> httpStatus) (\s@CreateTapesResponse' {} a -> s {httpStatus = a} :: CreateTapesResponse)++instance Prelude.NFData CreateTapesResponse where+ rnf CreateTapesResponse' {..} =+ Prelude.rnf tapeARNs+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/DeleteAutomaticTapeCreationPolicy.hs view
@@ -0,0 +1,199 @@+{-# 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.DeleteAutomaticTapeCreationPolicy+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Deletes the automatic tape creation policy of a gateway. If you delete+-- this policy, new virtual tapes must be created manually. Use the Amazon+-- Resource Name (ARN) of the gateway in your request to remove the policy.+module Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy+ ( -- * Creating a Request+ DeleteAutomaticTapeCreationPolicy (..),+ newDeleteAutomaticTapeCreationPolicy,++ -- * Request Lenses+ deleteAutomaticTapeCreationPolicy_gatewayARN,++ -- * Destructuring the Response+ DeleteAutomaticTapeCreationPolicyResponse (..),+ newDeleteAutomaticTapeCreationPolicyResponse,++ -- * Response Lenses+ deleteAutomaticTapeCreationPolicyResponse_gatewayARN,+ deleteAutomaticTapeCreationPolicyResponse_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++-- | /See:/ 'newDeleteAutomaticTapeCreationPolicy' smart constructor.+data DeleteAutomaticTapeCreationPolicy = DeleteAutomaticTapeCreationPolicy'+ { gatewayARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DeleteAutomaticTapeCreationPolicy' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'deleteAutomaticTapeCreationPolicy_gatewayARN' - Undocumented member.+newDeleteAutomaticTapeCreationPolicy ::+ -- | 'gatewayARN'+ Prelude.Text ->+ DeleteAutomaticTapeCreationPolicy+newDeleteAutomaticTapeCreationPolicy pGatewayARN_ =+ DeleteAutomaticTapeCreationPolicy'+ { gatewayARN =+ pGatewayARN_+ }++-- | Undocumented member.+deleteAutomaticTapeCreationPolicy_gatewayARN :: Lens.Lens' DeleteAutomaticTapeCreationPolicy Prelude.Text+deleteAutomaticTapeCreationPolicy_gatewayARN = Lens.lens (\DeleteAutomaticTapeCreationPolicy' {gatewayARN} -> gatewayARN) (\s@DeleteAutomaticTapeCreationPolicy' {} a -> s {gatewayARN = a} :: DeleteAutomaticTapeCreationPolicy)++instance+ Core.AWSRequest+ DeleteAutomaticTapeCreationPolicy+ where+ type+ AWSResponse DeleteAutomaticTapeCreationPolicy =+ DeleteAutomaticTapeCreationPolicyResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ DeleteAutomaticTapeCreationPolicyResponse'+ Prelude.<$> (x Data..?> "GatewayARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance+ Prelude.Hashable+ DeleteAutomaticTapeCreationPolicy+ where+ hashWithSalt+ _salt+ DeleteAutomaticTapeCreationPolicy' {..} =+ _salt `Prelude.hashWithSalt` gatewayARN++instance+ Prelude.NFData+ DeleteAutomaticTapeCreationPolicy+ where+ rnf DeleteAutomaticTapeCreationPolicy' {..} =+ Prelude.rnf gatewayARN++instance+ Data.ToHeaders+ DeleteAutomaticTapeCreationPolicy+ where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.DeleteAutomaticTapeCreationPolicy" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance+ Data.ToJSON+ DeleteAutomaticTapeCreationPolicy+ where+ toJSON DeleteAutomaticTapeCreationPolicy' {..} =+ Data.object+ ( Prelude.catMaybes+ [Prelude.Just ("GatewayARN" Data..= gatewayARN)]+ )++instance+ Data.ToPath+ DeleteAutomaticTapeCreationPolicy+ where+ toPath = Prelude.const "/"++instance+ Data.ToQuery+ DeleteAutomaticTapeCreationPolicy+ where+ toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newDeleteAutomaticTapeCreationPolicyResponse' smart constructor.+data DeleteAutomaticTapeCreationPolicyResponse = DeleteAutomaticTapeCreationPolicyResponse'+ { gatewayARN :: 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 'DeleteAutomaticTapeCreationPolicyResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'deleteAutomaticTapeCreationPolicyResponse_gatewayARN' - Undocumented member.+--+-- 'httpStatus', 'deleteAutomaticTapeCreationPolicyResponse_httpStatus' - The response's http status code.+newDeleteAutomaticTapeCreationPolicyResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ DeleteAutomaticTapeCreationPolicyResponse+newDeleteAutomaticTapeCreationPolicyResponse+ pHttpStatus_ =+ DeleteAutomaticTapeCreationPolicyResponse'+ { gatewayARN =+ Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | Undocumented member.+deleteAutomaticTapeCreationPolicyResponse_gatewayARN :: Lens.Lens' DeleteAutomaticTapeCreationPolicyResponse (Prelude.Maybe Prelude.Text)+deleteAutomaticTapeCreationPolicyResponse_gatewayARN = Lens.lens (\DeleteAutomaticTapeCreationPolicyResponse' {gatewayARN} -> gatewayARN) (\s@DeleteAutomaticTapeCreationPolicyResponse' {} a -> s {gatewayARN = a} :: DeleteAutomaticTapeCreationPolicyResponse)++-- | The response's http status code.+deleteAutomaticTapeCreationPolicyResponse_httpStatus :: Lens.Lens' DeleteAutomaticTapeCreationPolicyResponse Prelude.Int+deleteAutomaticTapeCreationPolicyResponse_httpStatus = Lens.lens (\DeleteAutomaticTapeCreationPolicyResponse' {httpStatus} -> httpStatus) (\s@DeleteAutomaticTapeCreationPolicyResponse' {} a -> s {httpStatus = a} :: DeleteAutomaticTapeCreationPolicyResponse)++instance+ Prelude.NFData+ DeleteAutomaticTapeCreationPolicyResponse+ where+ rnf DeleteAutomaticTapeCreationPolicyResponse' {..} =+ Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/DeleteBandwidthRateLimit.hs view
@@ -0,0 +1,214 @@+{-# 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.DeleteBandwidthRateLimit+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Deletes the bandwidth rate limits of a gateway. You can delete either+-- the upload and download bandwidth rate limit, or you can delete both. If+-- you delete only one of the limits, the other limit remains unchanged. To+-- specify which gateway to work with, use the Amazon Resource Name (ARN)+-- of the gateway in your request. This operation is supported only for the+-- stored volume, cached volume, and tape gateway types.+module Amazonka.StorageGateway.DeleteBandwidthRateLimit+ ( -- * Creating a Request+ DeleteBandwidthRateLimit (..),+ newDeleteBandwidthRateLimit,++ -- * Request Lenses+ deleteBandwidthRateLimit_gatewayARN,+ deleteBandwidthRateLimit_bandwidthType,++ -- * Destructuring the Response+ DeleteBandwidthRateLimitResponse (..),+ newDeleteBandwidthRateLimitResponse,++ -- * Response Lenses+ deleteBandwidthRateLimitResponse_gatewayARN,+ deleteBandwidthRateLimitResponse_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++-- | A JSON object containing the following fields:+--+-- - DeleteBandwidthRateLimitInput$BandwidthType+--+-- /See:/ 'newDeleteBandwidthRateLimit' smart constructor.+data DeleteBandwidthRateLimit = DeleteBandwidthRateLimit'+ { gatewayARN :: Prelude.Text,+ -- | One of the BandwidthType values that indicates the gateway bandwidth+ -- rate limit to delete.+ --+ -- Valid Values: @UPLOAD@ | @DOWNLOAD@ | @ALL@+ bandwidthType :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DeleteBandwidthRateLimit' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'deleteBandwidthRateLimit_gatewayARN' - Undocumented member.+--+-- 'bandwidthType', 'deleteBandwidthRateLimit_bandwidthType' - One of the BandwidthType values that indicates the gateway bandwidth+-- rate limit to delete.+--+-- Valid Values: @UPLOAD@ | @DOWNLOAD@ | @ALL@+newDeleteBandwidthRateLimit ::+ -- | 'gatewayARN'+ Prelude.Text ->+ -- | 'bandwidthType'+ Prelude.Text ->+ DeleteBandwidthRateLimit+newDeleteBandwidthRateLimit+ pGatewayARN_+ pBandwidthType_ =+ DeleteBandwidthRateLimit'+ { gatewayARN =+ pGatewayARN_,+ bandwidthType = pBandwidthType_+ }++-- | Undocumented member.+deleteBandwidthRateLimit_gatewayARN :: Lens.Lens' DeleteBandwidthRateLimit Prelude.Text+deleteBandwidthRateLimit_gatewayARN = Lens.lens (\DeleteBandwidthRateLimit' {gatewayARN} -> gatewayARN) (\s@DeleteBandwidthRateLimit' {} a -> s {gatewayARN = a} :: DeleteBandwidthRateLimit)++-- | One of the BandwidthType values that indicates the gateway bandwidth+-- rate limit to delete.+--+-- Valid Values: @UPLOAD@ | @DOWNLOAD@ | @ALL@+deleteBandwidthRateLimit_bandwidthType :: Lens.Lens' DeleteBandwidthRateLimit Prelude.Text+deleteBandwidthRateLimit_bandwidthType = Lens.lens (\DeleteBandwidthRateLimit' {bandwidthType} -> bandwidthType) (\s@DeleteBandwidthRateLimit' {} a -> s {bandwidthType = a} :: DeleteBandwidthRateLimit)++instance Core.AWSRequest DeleteBandwidthRateLimit where+ type+ AWSResponse DeleteBandwidthRateLimit =+ DeleteBandwidthRateLimitResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ DeleteBandwidthRateLimitResponse'+ Prelude.<$> (x Data..?> "GatewayARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable DeleteBandwidthRateLimit where+ hashWithSalt _salt DeleteBandwidthRateLimit' {..} =+ _salt+ `Prelude.hashWithSalt` gatewayARN+ `Prelude.hashWithSalt` bandwidthType++instance Prelude.NFData DeleteBandwidthRateLimit where+ rnf DeleteBandwidthRateLimit' {..} =+ Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf bandwidthType++instance Data.ToHeaders DeleteBandwidthRateLimit where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.DeleteBandwidthRateLimit" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON DeleteBandwidthRateLimit where+ toJSON DeleteBandwidthRateLimit' {..} =+ Data.object+ ( Prelude.catMaybes+ [ Prelude.Just ("GatewayARN" Data..= gatewayARN),+ Prelude.Just+ ("BandwidthType" Data..= bandwidthType)+ ]+ )++instance Data.ToPath DeleteBandwidthRateLimit where+ toPath = Prelude.const "/"++instance Data.ToQuery DeleteBandwidthRateLimit where+ toQuery = Prelude.const Prelude.mempty++-- | A JSON object containing the Amazon Resource Name (ARN) of the gateway+-- whose bandwidth rate information was deleted.+--+-- /See:/ 'newDeleteBandwidthRateLimitResponse' smart constructor.+data DeleteBandwidthRateLimitResponse = DeleteBandwidthRateLimitResponse'+ { gatewayARN :: 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 'DeleteBandwidthRateLimitResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'deleteBandwidthRateLimitResponse_gatewayARN' - Undocumented member.+--+-- 'httpStatus', 'deleteBandwidthRateLimitResponse_httpStatus' - The response's http status code.+newDeleteBandwidthRateLimitResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ DeleteBandwidthRateLimitResponse+newDeleteBandwidthRateLimitResponse pHttpStatus_ =+ DeleteBandwidthRateLimitResponse'+ { gatewayARN =+ Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | Undocumented member.+deleteBandwidthRateLimitResponse_gatewayARN :: Lens.Lens' DeleteBandwidthRateLimitResponse (Prelude.Maybe Prelude.Text)+deleteBandwidthRateLimitResponse_gatewayARN = Lens.lens (\DeleteBandwidthRateLimitResponse' {gatewayARN} -> gatewayARN) (\s@DeleteBandwidthRateLimitResponse' {} a -> s {gatewayARN = a} :: DeleteBandwidthRateLimitResponse)++-- | The response's http status code.+deleteBandwidthRateLimitResponse_httpStatus :: Lens.Lens' DeleteBandwidthRateLimitResponse Prelude.Int+deleteBandwidthRateLimitResponse_httpStatus = Lens.lens (\DeleteBandwidthRateLimitResponse' {httpStatus} -> httpStatus) (\s@DeleteBandwidthRateLimitResponse' {} a -> s {httpStatus = a} :: DeleteBandwidthRateLimitResponse)++instance+ Prelude.NFData+ DeleteBandwidthRateLimitResponse+ where+ rnf DeleteBandwidthRateLimitResponse' {..} =+ Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/DeleteChapCredentials.hs view
@@ -0,0 +1,217 @@+{-# 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.DeleteChapCredentials+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Deletes Challenge-Handshake Authentication Protocol (CHAP) credentials+-- for a specified iSCSI target and initiator pair. This operation is+-- supported in volume and tape gateway types.+module Amazonka.StorageGateway.DeleteChapCredentials+ ( -- * Creating a Request+ DeleteChapCredentials (..),+ newDeleteChapCredentials,++ -- * Request Lenses+ deleteChapCredentials_targetARN,+ deleteChapCredentials_initiatorName,++ -- * Destructuring the Response+ DeleteChapCredentialsResponse (..),+ newDeleteChapCredentialsResponse,++ -- * Response Lenses+ deleteChapCredentialsResponse_initiatorName,+ deleteChapCredentialsResponse_targetARN,+ deleteChapCredentialsResponse_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++-- | A JSON object containing one or more of the following fields:+--+-- - DeleteChapCredentialsInput$InitiatorName+--+-- - DeleteChapCredentialsInput$TargetARN+--+-- /See:/ 'newDeleteChapCredentials' smart constructor.+data DeleteChapCredentials = DeleteChapCredentials'+ { -- | The Amazon Resource Name (ARN) of the iSCSI volume target. Use the+ -- DescribeStorediSCSIVolumes operation to return to retrieve the TargetARN+ -- for specified VolumeARN.+ targetARN :: Prelude.Text,+ -- | The iSCSI initiator that connects to the target.+ initiatorName :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DeleteChapCredentials' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'targetARN', 'deleteChapCredentials_targetARN' - The Amazon Resource Name (ARN) of the iSCSI volume target. Use the+-- DescribeStorediSCSIVolumes operation to return to retrieve the TargetARN+-- for specified VolumeARN.+--+-- 'initiatorName', 'deleteChapCredentials_initiatorName' - The iSCSI initiator that connects to the target.+newDeleteChapCredentials ::+ -- | 'targetARN'+ Prelude.Text ->+ -- | 'initiatorName'+ Prelude.Text ->+ DeleteChapCredentials+newDeleteChapCredentials pTargetARN_ pInitiatorName_ =+ DeleteChapCredentials'+ { targetARN = pTargetARN_,+ initiatorName = pInitiatorName_+ }++-- | The Amazon Resource Name (ARN) of the iSCSI volume target. Use the+-- DescribeStorediSCSIVolumes operation to return to retrieve the TargetARN+-- for specified VolumeARN.+deleteChapCredentials_targetARN :: Lens.Lens' DeleteChapCredentials Prelude.Text+deleteChapCredentials_targetARN = Lens.lens (\DeleteChapCredentials' {targetARN} -> targetARN) (\s@DeleteChapCredentials' {} a -> s {targetARN = a} :: DeleteChapCredentials)++-- | The iSCSI initiator that connects to the target.+deleteChapCredentials_initiatorName :: Lens.Lens' DeleteChapCredentials Prelude.Text+deleteChapCredentials_initiatorName = Lens.lens (\DeleteChapCredentials' {initiatorName} -> initiatorName) (\s@DeleteChapCredentials' {} a -> s {initiatorName = a} :: DeleteChapCredentials)++instance Core.AWSRequest DeleteChapCredentials where+ type+ AWSResponse DeleteChapCredentials =+ DeleteChapCredentialsResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ DeleteChapCredentialsResponse'+ Prelude.<$> (x Data..?> "InitiatorName")+ Prelude.<*> (x Data..?> "TargetARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable DeleteChapCredentials where+ hashWithSalt _salt DeleteChapCredentials' {..} =+ _salt+ `Prelude.hashWithSalt` targetARN+ `Prelude.hashWithSalt` initiatorName++instance Prelude.NFData DeleteChapCredentials where+ rnf DeleteChapCredentials' {..} =+ Prelude.rnf targetARN+ `Prelude.seq` Prelude.rnf initiatorName++instance Data.ToHeaders DeleteChapCredentials where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.DeleteChapCredentials" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON DeleteChapCredentials where+ toJSON DeleteChapCredentials' {..} =+ Data.object+ ( Prelude.catMaybes+ [ Prelude.Just ("TargetARN" Data..= targetARN),+ Prelude.Just+ ("InitiatorName" Data..= initiatorName)+ ]+ )++instance Data.ToPath DeleteChapCredentials where+ toPath = Prelude.const "/"++instance Data.ToQuery DeleteChapCredentials where+ toQuery = Prelude.const Prelude.mempty++-- | A JSON object containing the following fields:+--+-- /See:/ 'newDeleteChapCredentialsResponse' smart constructor.+data DeleteChapCredentialsResponse = DeleteChapCredentialsResponse'+ { -- | The iSCSI initiator that connects to the target.+ initiatorName :: Prelude.Maybe Prelude.Text,+ -- | The Amazon Resource Name (ARN) of the target.+ targetARN :: 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 'DeleteChapCredentialsResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'initiatorName', 'deleteChapCredentialsResponse_initiatorName' - The iSCSI initiator that connects to the target.+--+-- 'targetARN', 'deleteChapCredentialsResponse_targetARN' - The Amazon Resource Name (ARN) of the target.+--+-- 'httpStatus', 'deleteChapCredentialsResponse_httpStatus' - The response's http status code.+newDeleteChapCredentialsResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ DeleteChapCredentialsResponse+newDeleteChapCredentialsResponse pHttpStatus_ =+ DeleteChapCredentialsResponse'+ { initiatorName =+ Prelude.Nothing,+ targetARN = Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | The iSCSI initiator that connects to the target.+deleteChapCredentialsResponse_initiatorName :: Lens.Lens' DeleteChapCredentialsResponse (Prelude.Maybe Prelude.Text)+deleteChapCredentialsResponse_initiatorName = Lens.lens (\DeleteChapCredentialsResponse' {initiatorName} -> initiatorName) (\s@DeleteChapCredentialsResponse' {} a -> s {initiatorName = a} :: DeleteChapCredentialsResponse)++-- | The Amazon Resource Name (ARN) of the target.+deleteChapCredentialsResponse_targetARN :: Lens.Lens' DeleteChapCredentialsResponse (Prelude.Maybe Prelude.Text)+deleteChapCredentialsResponse_targetARN = Lens.lens (\DeleteChapCredentialsResponse' {targetARN} -> targetARN) (\s@DeleteChapCredentialsResponse' {} a -> s {targetARN = a} :: DeleteChapCredentialsResponse)++-- | The response's http status code.+deleteChapCredentialsResponse_httpStatus :: Lens.Lens' DeleteChapCredentialsResponse Prelude.Int+deleteChapCredentialsResponse_httpStatus = Lens.lens (\DeleteChapCredentialsResponse' {httpStatus} -> httpStatus) (\s@DeleteChapCredentialsResponse' {} a -> s {httpStatus = a} :: DeleteChapCredentialsResponse)++instance Prelude.NFData DeleteChapCredentialsResponse where+ rnf DeleteChapCredentialsResponse' {..} =+ Prelude.rnf initiatorName+ `Prelude.seq` Prelude.rnf targetARN+ `Prelude.seq` Prelude.rnf httpStatus
@@ -0,0 +1,209 @@+{-# 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.DeleteFileShare+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Deletes a file share from an S3 File Gateway. This operation is only+-- supported for S3 File Gateways.+module Amazonka.StorageGateway.DeleteFileShare+ ( -- * Creating a Request+ DeleteFileShare (..),+ newDeleteFileShare,++ -- * Request Lenses+ deleteFileShare_forceDelete,+ deleteFileShare_fileShareARN,++ -- * Destructuring the Response+ DeleteFileShareResponse (..),+ newDeleteFileShareResponse,++ -- * Response Lenses+ deleteFileShareResponse_fileShareARN,+ deleteFileShareResponse_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++-- | DeleteFileShareInput+--+-- /See:/ 'newDeleteFileShare' smart constructor.+data DeleteFileShare = DeleteFileShare'+ { -- | If this value is set to @true@, the operation deletes a file share+ -- immediately and aborts all data uploads to Amazon Web Services.+ -- Otherwise, the file share is not deleted until all data is uploaded to+ -- Amazon Web Services. This process aborts the data upload process, and+ -- the file share enters the @FORCE_DELETING@ status.+ --+ -- Valid Values: @true@ | @false@+ forceDelete :: Prelude.Maybe Prelude.Bool,+ -- | The Amazon Resource Name (ARN) of the file share to be deleted.+ fileShareARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DeleteFileShare' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'forceDelete', 'deleteFileShare_forceDelete' - If this value is set to @true@, the operation deletes a file share+-- immediately and aborts all data uploads to Amazon Web Services.+-- Otherwise, the file share is not deleted until all data is uploaded to+-- Amazon Web Services. This process aborts the data upload process, and+-- the file share enters the @FORCE_DELETING@ status.+--+-- Valid Values: @true@ | @false@+--+-- 'fileShareARN', 'deleteFileShare_fileShareARN' - The Amazon Resource Name (ARN) of the file share to be deleted.+newDeleteFileShare ::+ -- | 'fileShareARN'+ Prelude.Text ->+ DeleteFileShare+newDeleteFileShare pFileShareARN_ =+ DeleteFileShare'+ { forceDelete = Prelude.Nothing,+ fileShareARN = pFileShareARN_+ }++-- | If this value is set to @true@, the operation deletes a file share+-- immediately and aborts all data uploads to Amazon Web Services.+-- Otherwise, the file share is not deleted until all data is uploaded to+-- Amazon Web Services. This process aborts the data upload process, and+-- the file share enters the @FORCE_DELETING@ status.+--+-- Valid Values: @true@ | @false@+deleteFileShare_forceDelete :: Lens.Lens' DeleteFileShare (Prelude.Maybe Prelude.Bool)+deleteFileShare_forceDelete = Lens.lens (\DeleteFileShare' {forceDelete} -> forceDelete) (\s@DeleteFileShare' {} a -> s {forceDelete = a} :: DeleteFileShare)++-- | The Amazon Resource Name (ARN) of the file share to be deleted.+deleteFileShare_fileShareARN :: Lens.Lens' DeleteFileShare Prelude.Text+deleteFileShare_fileShareARN = Lens.lens (\DeleteFileShare' {fileShareARN} -> fileShareARN) (\s@DeleteFileShare' {} a -> s {fileShareARN = a} :: DeleteFileShare)++instance Core.AWSRequest DeleteFileShare where+ type+ AWSResponse DeleteFileShare =+ DeleteFileShareResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ DeleteFileShareResponse'+ Prelude.<$> (x Data..?> "FileShareARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable DeleteFileShare where+ hashWithSalt _salt DeleteFileShare' {..} =+ _salt+ `Prelude.hashWithSalt` forceDelete+ `Prelude.hashWithSalt` fileShareARN++instance Prelude.NFData DeleteFileShare where+ rnf DeleteFileShare' {..} =+ Prelude.rnf forceDelete+ `Prelude.seq` Prelude.rnf fileShareARN++instance Data.ToHeaders DeleteFileShare where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.DeleteFileShare" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON DeleteFileShare where+ toJSON DeleteFileShare' {..} =+ Data.object+ ( Prelude.catMaybes+ [ ("ForceDelete" Data..=) Prelude.<$> forceDelete,+ Prelude.Just ("FileShareARN" Data..= fileShareARN)+ ]+ )++instance Data.ToPath DeleteFileShare where+ toPath = Prelude.const "/"++instance Data.ToQuery DeleteFileShare where+ toQuery = Prelude.const Prelude.mempty++-- | DeleteFileShareOutput+--+-- /See:/ 'newDeleteFileShareResponse' smart constructor.+data DeleteFileShareResponse = DeleteFileShareResponse'+ { -- | The Amazon Resource Name (ARN) of the deleted 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 'DeleteFileShareResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'fileShareARN', 'deleteFileShareResponse_fileShareARN' - The Amazon Resource Name (ARN) of the deleted file share.+--+-- 'httpStatus', 'deleteFileShareResponse_httpStatus' - The response's http status code.+newDeleteFileShareResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ DeleteFileShareResponse+newDeleteFileShareResponse pHttpStatus_ =+ DeleteFileShareResponse'+ { fileShareARN =+ Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | The Amazon Resource Name (ARN) of the deleted file share.+deleteFileShareResponse_fileShareARN :: Lens.Lens' DeleteFileShareResponse (Prelude.Maybe Prelude.Text)+deleteFileShareResponse_fileShareARN = Lens.lens (\DeleteFileShareResponse' {fileShareARN} -> fileShareARN) (\s@DeleteFileShareResponse' {} a -> s {fileShareARN = a} :: DeleteFileShareResponse)++-- | The response's http status code.+deleteFileShareResponse_httpStatus :: Lens.Lens' DeleteFileShareResponse Prelude.Int+deleteFileShareResponse_httpStatus = Lens.lens (\DeleteFileShareResponse' {httpStatus} -> httpStatus) (\s@DeleteFileShareResponse' {} a -> s {httpStatus = a} :: DeleteFileShareResponse)++instance Prelude.NFData DeleteFileShareResponse where+ rnf DeleteFileShareResponse' {..} =+ Prelude.rnf fileShareARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/DeleteGateway.hs view
@@ -0,0 +1,187 @@+{-# 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.DeleteGateway+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Deletes a gateway. To specify which gateway to delete, use the Amazon+-- Resource Name (ARN) of the gateway in your request. The operation+-- deletes the gateway; however, it does not delete the gateway virtual+-- machine (VM) from your host computer.+--+-- After you delete a gateway, you cannot reactivate it. Completed+-- snapshots of the gateway volumes are not deleted upon deleting the+-- gateway, however, pending snapshots will not complete. After you delete+-- a gateway, your next step is to remove it from your environment.+--+-- You no longer pay software charges after the gateway is deleted;+-- however, your existing Amazon EBS snapshots persist and you will+-- continue to be billed for these snapshots. You can choose to remove all+-- remaining Amazon EBS snapshots by canceling your Amazon EC2+-- subscription. If you prefer not to cancel your Amazon EC2 subscription,+-- you can delete your snapshots using the Amazon EC2 console. For more+-- information, see the+-- <http://aws.amazon.com/storagegateway Storage Gateway detail page>.+module Amazonka.StorageGateway.DeleteGateway+ ( -- * Creating a Request+ DeleteGateway (..),+ newDeleteGateway,++ -- * Request Lenses+ deleteGateway_gatewayARN,++ -- * Destructuring the Response+ DeleteGatewayResponse (..),+ newDeleteGatewayResponse,++ -- * Response Lenses+ deleteGatewayResponse_gatewayARN,+ deleteGatewayResponse_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++-- | A JSON object containing the ID of the gateway to delete.+--+-- /See:/ 'newDeleteGateway' smart constructor.+data DeleteGateway = DeleteGateway'+ { gatewayARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DeleteGateway' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'deleteGateway_gatewayARN' - Undocumented member.+newDeleteGateway ::+ -- | 'gatewayARN'+ Prelude.Text ->+ DeleteGateway+newDeleteGateway pGatewayARN_ =+ DeleteGateway' {gatewayARN = pGatewayARN_}++-- | Undocumented member.+deleteGateway_gatewayARN :: Lens.Lens' DeleteGateway Prelude.Text+deleteGateway_gatewayARN = Lens.lens (\DeleteGateway' {gatewayARN} -> gatewayARN) (\s@DeleteGateway' {} a -> s {gatewayARN = a} :: DeleteGateway)++instance Core.AWSRequest DeleteGateway where+ type+ AWSResponse DeleteGateway =+ DeleteGatewayResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ DeleteGatewayResponse'+ Prelude.<$> (x Data..?> "GatewayARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable DeleteGateway where+ hashWithSalt _salt DeleteGateway' {..} =+ _salt `Prelude.hashWithSalt` gatewayARN++instance Prelude.NFData DeleteGateway where+ rnf DeleteGateway' {..} = Prelude.rnf gatewayARN++instance Data.ToHeaders DeleteGateway where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.DeleteGateway" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON DeleteGateway where+ toJSON DeleteGateway' {..} =+ Data.object+ ( Prelude.catMaybes+ [Prelude.Just ("GatewayARN" Data..= gatewayARN)]+ )++instance Data.ToPath DeleteGateway where+ toPath = Prelude.const "/"++instance Data.ToQuery DeleteGateway where+ toQuery = Prelude.const Prelude.mempty++-- | A JSON object containing the ID of the deleted gateway.+--+-- /See:/ 'newDeleteGatewayResponse' smart constructor.+data DeleteGatewayResponse = DeleteGatewayResponse'+ { gatewayARN :: 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 'DeleteGatewayResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'deleteGatewayResponse_gatewayARN' - Undocumented member.+--+-- 'httpStatus', 'deleteGatewayResponse_httpStatus' - The response's http status code.+newDeleteGatewayResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ DeleteGatewayResponse+newDeleteGatewayResponse pHttpStatus_ =+ DeleteGatewayResponse'+ { gatewayARN =+ Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | Undocumented member.+deleteGatewayResponse_gatewayARN :: Lens.Lens' DeleteGatewayResponse (Prelude.Maybe Prelude.Text)+deleteGatewayResponse_gatewayARN = Lens.lens (\DeleteGatewayResponse' {gatewayARN} -> gatewayARN) (\s@DeleteGatewayResponse' {} a -> s {gatewayARN = a} :: DeleteGatewayResponse)++-- | The response's http status code.+deleteGatewayResponse_httpStatus :: Lens.Lens' DeleteGatewayResponse Prelude.Int+deleteGatewayResponse_httpStatus = Lens.lens (\DeleteGatewayResponse' {httpStatus} -> httpStatus) (\s@DeleteGatewayResponse' {} a -> s {httpStatus = a} :: DeleteGatewayResponse)++instance Prelude.NFData DeleteGatewayResponse where+ rnf DeleteGatewayResponse' {..} =+ Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/DeleteSnapshotSchedule.hs view
@@ -0,0 +1,185 @@+{-# 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.DeleteSnapshotSchedule+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Deletes a snapshot of a volume.+--+-- You can take snapshots of your gateway volumes on a scheduled or ad hoc+-- basis. This API action enables you to delete a snapshot schedule for a+-- volume. For more information, see+-- <https://docs.aws.amazon.com/storagegateway/latest/userguide/backing-up-volumes.html Backing up your volumes>.+-- In the @DeleteSnapshotSchedule@ request, you identify the volume by+-- providing its Amazon Resource Name (ARN). This operation is only+-- supported for cached volume gateway types.+--+-- To list or delete a snapshot, you must use the Amazon EC2 API. For more+-- information, go to+-- <https://docs.aws.amazon.com/AWSEC2/latest/APIReference/API_DescribeSnapshots.html DescribeSnapshots>+-- in the /Amazon Elastic Compute Cloud API Reference/.+module Amazonka.StorageGateway.DeleteSnapshotSchedule+ ( -- * Creating a Request+ DeleteSnapshotSchedule (..),+ newDeleteSnapshotSchedule,++ -- * Request Lenses+ deleteSnapshotSchedule_volumeARN,++ -- * Destructuring the Response+ DeleteSnapshotScheduleResponse (..),+ newDeleteSnapshotScheduleResponse,++ -- * Response Lenses+ deleteSnapshotScheduleResponse_volumeARN,+ deleteSnapshotScheduleResponse_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++-- | /See:/ 'newDeleteSnapshotSchedule' smart constructor.+data DeleteSnapshotSchedule = DeleteSnapshotSchedule'+ { -- | The volume which snapshot schedule to delete.+ volumeARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DeleteSnapshotSchedule' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'volumeARN', 'deleteSnapshotSchedule_volumeARN' - The volume which snapshot schedule to delete.+newDeleteSnapshotSchedule ::+ -- | 'volumeARN'+ Prelude.Text ->+ DeleteSnapshotSchedule+newDeleteSnapshotSchedule pVolumeARN_ =+ DeleteSnapshotSchedule' {volumeARN = pVolumeARN_}++-- | The volume which snapshot schedule to delete.+deleteSnapshotSchedule_volumeARN :: Lens.Lens' DeleteSnapshotSchedule Prelude.Text+deleteSnapshotSchedule_volumeARN = Lens.lens (\DeleteSnapshotSchedule' {volumeARN} -> volumeARN) (\s@DeleteSnapshotSchedule' {} a -> s {volumeARN = a} :: DeleteSnapshotSchedule)++instance Core.AWSRequest DeleteSnapshotSchedule where+ type+ AWSResponse DeleteSnapshotSchedule =+ DeleteSnapshotScheduleResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ DeleteSnapshotScheduleResponse'+ Prelude.<$> (x Data..?> "VolumeARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable DeleteSnapshotSchedule where+ hashWithSalt _salt DeleteSnapshotSchedule' {..} =+ _salt `Prelude.hashWithSalt` volumeARN++instance Prelude.NFData DeleteSnapshotSchedule where+ rnf DeleteSnapshotSchedule' {..} =+ Prelude.rnf volumeARN++instance Data.ToHeaders DeleteSnapshotSchedule where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.DeleteSnapshotSchedule" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON DeleteSnapshotSchedule where+ toJSON DeleteSnapshotSchedule' {..} =+ Data.object+ ( Prelude.catMaybes+ [Prelude.Just ("VolumeARN" Data..= volumeARN)]+ )++instance Data.ToPath DeleteSnapshotSchedule where+ toPath = Prelude.const "/"++instance Data.ToQuery DeleteSnapshotSchedule where+ toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newDeleteSnapshotScheduleResponse' smart constructor.+data DeleteSnapshotScheduleResponse = DeleteSnapshotScheduleResponse'+ { -- | The volume which snapshot schedule was deleted.+ volumeARN :: 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 'DeleteSnapshotScheduleResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'volumeARN', 'deleteSnapshotScheduleResponse_volumeARN' - The volume which snapshot schedule was deleted.+--+-- 'httpStatus', 'deleteSnapshotScheduleResponse_httpStatus' - The response's http status code.+newDeleteSnapshotScheduleResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ DeleteSnapshotScheduleResponse+newDeleteSnapshotScheduleResponse pHttpStatus_ =+ DeleteSnapshotScheduleResponse'+ { volumeARN =+ Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | The volume which snapshot schedule was deleted.+deleteSnapshotScheduleResponse_volumeARN :: Lens.Lens' DeleteSnapshotScheduleResponse (Prelude.Maybe Prelude.Text)+deleteSnapshotScheduleResponse_volumeARN = Lens.lens (\DeleteSnapshotScheduleResponse' {volumeARN} -> volumeARN) (\s@DeleteSnapshotScheduleResponse' {} a -> s {volumeARN = a} :: DeleteSnapshotScheduleResponse)++-- | The response's http status code.+deleteSnapshotScheduleResponse_httpStatus :: Lens.Lens' DeleteSnapshotScheduleResponse Prelude.Int+deleteSnapshotScheduleResponse_httpStatus = Lens.lens (\DeleteSnapshotScheduleResponse' {httpStatus} -> httpStatus) (\s@DeleteSnapshotScheduleResponse' {} a -> s {httpStatus = a} :: DeleteSnapshotScheduleResponse)++instance+ Prelude.NFData+ DeleteSnapshotScheduleResponse+ where+ rnf DeleteSnapshotScheduleResponse' {..} =+ Prelude.rnf volumeARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/DeleteTape.hs view
@@ -0,0 +1,223 @@+{-# 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.DeleteTape+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Deletes the specified virtual tape. This operation is only supported in+-- the tape gateway type.+module Amazonka.StorageGateway.DeleteTape+ ( -- * Creating a Request+ DeleteTape (..),+ newDeleteTape,++ -- * Request Lenses+ deleteTape_bypassGovernanceRetention,+ deleteTape_gatewayARN,+ deleteTape_tapeARN,++ -- * Destructuring the Response+ DeleteTapeResponse (..),+ newDeleteTapeResponse,++ -- * Response Lenses+ deleteTapeResponse_tapeARN,+ deleteTapeResponse_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++-- | DeleteTapeInput+--+-- /See:/ 'newDeleteTape' smart constructor.+data DeleteTape = DeleteTape'+ { -- | Set to @TRUE@ to delete an archived tape that belongs to a custom pool+ -- with tape retention lock. Only archived tapes with tape retention lock+ -- set to @governance@ can be deleted. Archived tapes with tape retention+ -- lock set to @compliance@ can\'t be deleted.+ bypassGovernanceRetention :: Prelude.Maybe Prelude.Bool,+ -- | The unique Amazon Resource Name (ARN) of the gateway that the virtual+ -- tape to delete is associated with. Use the ListGateways operation to+ -- return a list of gateways for your account and Amazon Web Services+ -- Region.+ gatewayARN :: Prelude.Text,+ -- | The Amazon Resource Name (ARN) of the virtual tape to delete.+ tapeARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DeleteTape' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'bypassGovernanceRetention', 'deleteTape_bypassGovernanceRetention' - Set to @TRUE@ to delete an archived tape that belongs to a custom pool+-- with tape retention lock. Only archived tapes with tape retention lock+-- set to @governance@ can be deleted. Archived tapes with tape retention+-- lock set to @compliance@ can\'t be deleted.+--+-- 'gatewayARN', 'deleteTape_gatewayARN' - The unique Amazon Resource Name (ARN) of the gateway that the virtual+-- tape to delete is associated with. Use the ListGateways operation to+-- return a list of gateways for your account and Amazon Web Services+-- Region.+--+-- 'tapeARN', 'deleteTape_tapeARN' - The Amazon Resource Name (ARN) of the virtual tape to delete.+newDeleteTape ::+ -- | 'gatewayARN'+ Prelude.Text ->+ -- | 'tapeARN'+ Prelude.Text ->+ DeleteTape+newDeleteTape pGatewayARN_ pTapeARN_ =+ DeleteTape'+ { bypassGovernanceRetention =+ Prelude.Nothing,+ gatewayARN = pGatewayARN_,+ tapeARN = pTapeARN_+ }++-- | Set to @TRUE@ to delete an archived tape that belongs to a custom pool+-- with tape retention lock. Only archived tapes with tape retention lock+-- set to @governance@ can be deleted. Archived tapes with tape retention+-- lock set to @compliance@ can\'t be deleted.+deleteTape_bypassGovernanceRetention :: Lens.Lens' DeleteTape (Prelude.Maybe Prelude.Bool)+deleteTape_bypassGovernanceRetention = Lens.lens (\DeleteTape' {bypassGovernanceRetention} -> bypassGovernanceRetention) (\s@DeleteTape' {} a -> s {bypassGovernanceRetention = a} :: DeleteTape)++-- | The unique Amazon Resource Name (ARN) of the gateway that the virtual+-- tape to delete is associated with. Use the ListGateways operation to+-- return a list of gateways for your account and Amazon Web Services+-- Region.+deleteTape_gatewayARN :: Lens.Lens' DeleteTape Prelude.Text+deleteTape_gatewayARN = Lens.lens (\DeleteTape' {gatewayARN} -> gatewayARN) (\s@DeleteTape' {} a -> s {gatewayARN = a} :: DeleteTape)++-- | The Amazon Resource Name (ARN) of the virtual tape to delete.+deleteTape_tapeARN :: Lens.Lens' DeleteTape Prelude.Text+deleteTape_tapeARN = Lens.lens (\DeleteTape' {tapeARN} -> tapeARN) (\s@DeleteTape' {} a -> s {tapeARN = a} :: DeleteTape)++instance Core.AWSRequest DeleteTape where+ type AWSResponse DeleteTape = DeleteTapeResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ DeleteTapeResponse'+ Prelude.<$> (x Data..?> "TapeARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable DeleteTape where+ hashWithSalt _salt DeleteTape' {..} =+ _salt+ `Prelude.hashWithSalt` bypassGovernanceRetention+ `Prelude.hashWithSalt` gatewayARN+ `Prelude.hashWithSalt` tapeARN++instance Prelude.NFData DeleteTape where+ rnf DeleteTape' {..} =+ Prelude.rnf bypassGovernanceRetention+ `Prelude.seq` Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf tapeARN++instance Data.ToHeaders DeleteTape where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.DeleteTape" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON DeleteTape where+ toJSON DeleteTape' {..} =+ Data.object+ ( Prelude.catMaybes+ [ ("BypassGovernanceRetention" Data..=)+ Prelude.<$> bypassGovernanceRetention,+ Prelude.Just ("GatewayARN" Data..= gatewayARN),+ Prelude.Just ("TapeARN" Data..= tapeARN)+ ]+ )++instance Data.ToPath DeleteTape where+ toPath = Prelude.const "/"++instance Data.ToQuery DeleteTape where+ toQuery = Prelude.const Prelude.mempty++-- | DeleteTapeOutput+--+-- /See:/ 'newDeleteTapeResponse' smart constructor.+data DeleteTapeResponse = DeleteTapeResponse'+ { -- | The Amazon Resource Name (ARN) of the deleted virtual tape.+ tapeARN :: 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 'DeleteTapeResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'tapeARN', 'deleteTapeResponse_tapeARN' - The Amazon Resource Name (ARN) of the deleted virtual tape.+--+-- 'httpStatus', 'deleteTapeResponse_httpStatus' - The response's http status code.+newDeleteTapeResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ DeleteTapeResponse+newDeleteTapeResponse pHttpStatus_ =+ DeleteTapeResponse'+ { tapeARN = Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | The Amazon Resource Name (ARN) of the deleted virtual tape.+deleteTapeResponse_tapeARN :: Lens.Lens' DeleteTapeResponse (Prelude.Maybe Prelude.Text)+deleteTapeResponse_tapeARN = Lens.lens (\DeleteTapeResponse' {tapeARN} -> tapeARN) (\s@DeleteTapeResponse' {} a -> s {tapeARN = a} :: DeleteTapeResponse)++-- | The response's http status code.+deleteTapeResponse_httpStatus :: Lens.Lens' DeleteTapeResponse Prelude.Int+deleteTapeResponse_httpStatus = Lens.lens (\DeleteTapeResponse' {httpStatus} -> httpStatus) (\s@DeleteTapeResponse' {} a -> s {httpStatus = a} :: DeleteTapeResponse)++instance Prelude.NFData DeleteTapeResponse where+ rnf DeleteTapeResponse' {..} =+ Prelude.rnf tapeARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/DeleteTapeArchive.hs view
@@ -0,0 +1,208 @@+{-# 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.DeleteTapeArchive+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Deletes the specified virtual tape from the virtual tape shelf (VTS).+-- This operation is only supported in the tape gateway type.+module Amazonka.StorageGateway.DeleteTapeArchive+ ( -- * Creating a Request+ DeleteTapeArchive (..),+ newDeleteTapeArchive,++ -- * Request Lenses+ deleteTapeArchive_bypassGovernanceRetention,+ deleteTapeArchive_tapeARN,++ -- * Destructuring the Response+ DeleteTapeArchiveResponse (..),+ newDeleteTapeArchiveResponse,++ -- * Response Lenses+ deleteTapeArchiveResponse_tapeARN,+ deleteTapeArchiveResponse_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++-- | DeleteTapeArchiveInput+--+-- /See:/ 'newDeleteTapeArchive' smart constructor.+data DeleteTapeArchive = DeleteTapeArchive'+ { -- | Set to @TRUE@ to delete an archived tape that belongs to a custom pool+ -- with tape retention lock. Only archived tapes with tape retention lock+ -- set to @governance@ can be deleted. Archived tapes with tape retention+ -- lock set to @compliance@ can\'t be deleted.+ bypassGovernanceRetention :: Prelude.Maybe Prelude.Bool,+ -- | The Amazon Resource Name (ARN) of the virtual tape to delete from the+ -- virtual tape shelf (VTS).+ tapeARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DeleteTapeArchive' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'bypassGovernanceRetention', 'deleteTapeArchive_bypassGovernanceRetention' - Set to @TRUE@ to delete an archived tape that belongs to a custom pool+-- with tape retention lock. Only archived tapes with tape retention lock+-- set to @governance@ can be deleted. Archived tapes with tape retention+-- lock set to @compliance@ can\'t be deleted.+--+-- 'tapeARN', 'deleteTapeArchive_tapeARN' - The Amazon Resource Name (ARN) of the virtual tape to delete from the+-- virtual tape shelf (VTS).+newDeleteTapeArchive ::+ -- | 'tapeARN'+ Prelude.Text ->+ DeleteTapeArchive+newDeleteTapeArchive pTapeARN_ =+ DeleteTapeArchive'+ { bypassGovernanceRetention =+ Prelude.Nothing,+ tapeARN = pTapeARN_+ }++-- | Set to @TRUE@ to delete an archived tape that belongs to a custom pool+-- with tape retention lock. Only archived tapes with tape retention lock+-- set to @governance@ can be deleted. Archived tapes with tape retention+-- lock set to @compliance@ can\'t be deleted.+deleteTapeArchive_bypassGovernanceRetention :: Lens.Lens' DeleteTapeArchive (Prelude.Maybe Prelude.Bool)+deleteTapeArchive_bypassGovernanceRetention = Lens.lens (\DeleteTapeArchive' {bypassGovernanceRetention} -> bypassGovernanceRetention) (\s@DeleteTapeArchive' {} a -> s {bypassGovernanceRetention = a} :: DeleteTapeArchive)++-- | The Amazon Resource Name (ARN) of the virtual tape to delete from the+-- virtual tape shelf (VTS).+deleteTapeArchive_tapeARN :: Lens.Lens' DeleteTapeArchive Prelude.Text+deleteTapeArchive_tapeARN = Lens.lens (\DeleteTapeArchive' {tapeARN} -> tapeARN) (\s@DeleteTapeArchive' {} a -> s {tapeARN = a} :: DeleteTapeArchive)++instance Core.AWSRequest DeleteTapeArchive where+ type+ AWSResponse DeleteTapeArchive =+ DeleteTapeArchiveResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ DeleteTapeArchiveResponse'+ Prelude.<$> (x Data..?> "TapeARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable DeleteTapeArchive where+ hashWithSalt _salt DeleteTapeArchive' {..} =+ _salt+ `Prelude.hashWithSalt` bypassGovernanceRetention+ `Prelude.hashWithSalt` tapeARN++instance Prelude.NFData DeleteTapeArchive where+ rnf DeleteTapeArchive' {..} =+ Prelude.rnf bypassGovernanceRetention+ `Prelude.seq` Prelude.rnf tapeARN++instance Data.ToHeaders DeleteTapeArchive where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.DeleteTapeArchive" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON DeleteTapeArchive where+ toJSON DeleteTapeArchive' {..} =+ Data.object+ ( Prelude.catMaybes+ [ ("BypassGovernanceRetention" Data..=)+ Prelude.<$> bypassGovernanceRetention,+ Prelude.Just ("TapeARN" Data..= tapeARN)+ ]+ )++instance Data.ToPath DeleteTapeArchive where+ toPath = Prelude.const "/"++instance Data.ToQuery DeleteTapeArchive where+ toQuery = Prelude.const Prelude.mempty++-- | DeleteTapeArchiveOutput+--+-- /See:/ 'newDeleteTapeArchiveResponse' smart constructor.+data DeleteTapeArchiveResponse = DeleteTapeArchiveResponse'+ { -- | The Amazon Resource Name (ARN) of the virtual tape that was deleted from+ -- the virtual tape shelf (VTS).+ tapeARN :: 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 'DeleteTapeArchiveResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'tapeARN', 'deleteTapeArchiveResponse_tapeARN' - The Amazon Resource Name (ARN) of the virtual tape that was deleted from+-- the virtual tape shelf (VTS).+--+-- 'httpStatus', 'deleteTapeArchiveResponse_httpStatus' - The response's http status code.+newDeleteTapeArchiveResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ DeleteTapeArchiveResponse+newDeleteTapeArchiveResponse pHttpStatus_ =+ DeleteTapeArchiveResponse'+ { tapeARN =+ Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | The Amazon Resource Name (ARN) of the virtual tape that was deleted from+-- the virtual tape shelf (VTS).+deleteTapeArchiveResponse_tapeARN :: Lens.Lens' DeleteTapeArchiveResponse (Prelude.Maybe Prelude.Text)+deleteTapeArchiveResponse_tapeARN = Lens.lens (\DeleteTapeArchiveResponse' {tapeARN} -> tapeARN) (\s@DeleteTapeArchiveResponse' {} a -> s {tapeARN = a} :: DeleteTapeArchiveResponse)++-- | The response's http status code.+deleteTapeArchiveResponse_httpStatus :: Lens.Lens' DeleteTapeArchiveResponse Prelude.Int+deleteTapeArchiveResponse_httpStatus = Lens.lens (\DeleteTapeArchiveResponse' {httpStatus} -> httpStatus) (\s@DeleteTapeArchiveResponse' {} a -> s {httpStatus = a} :: DeleteTapeArchiveResponse)++instance Prelude.NFData DeleteTapeArchiveResponse where+ rnf DeleteTapeArchiveResponse' {..} =+ Prelude.rnf tapeARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/DeleteTapePool.hs view
@@ -0,0 +1,169 @@+{-# 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.DeleteTapePool+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Delete a custom tape pool. A custom tape pool can only be deleted if+-- there are no tapes in the pool and if there are no automatic tape+-- creation policies that reference the custom tape pool.+module Amazonka.StorageGateway.DeleteTapePool+ ( -- * Creating a Request+ DeleteTapePool (..),+ newDeleteTapePool,++ -- * Request Lenses+ deleteTapePool_poolARN,++ -- * Destructuring the Response+ DeleteTapePoolResponse (..),+ newDeleteTapePoolResponse,++ -- * Response Lenses+ deleteTapePoolResponse_poolARN,+ deleteTapePoolResponse_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++-- | /See:/ 'newDeleteTapePool' smart constructor.+data DeleteTapePool = DeleteTapePool'+ { -- | The Amazon Resource Name (ARN) of the custom tape pool to delete.+ poolARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DeleteTapePool' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'poolARN', 'deleteTapePool_poolARN' - The Amazon Resource Name (ARN) of the custom tape pool to delete.+newDeleteTapePool ::+ -- | 'poolARN'+ Prelude.Text ->+ DeleteTapePool+newDeleteTapePool pPoolARN_ =+ DeleteTapePool' {poolARN = pPoolARN_}++-- | The Amazon Resource Name (ARN) of the custom tape pool to delete.+deleteTapePool_poolARN :: Lens.Lens' DeleteTapePool Prelude.Text+deleteTapePool_poolARN = Lens.lens (\DeleteTapePool' {poolARN} -> poolARN) (\s@DeleteTapePool' {} a -> s {poolARN = a} :: DeleteTapePool)++instance Core.AWSRequest DeleteTapePool where+ type+ AWSResponse DeleteTapePool =+ DeleteTapePoolResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ DeleteTapePoolResponse'+ Prelude.<$> (x Data..?> "PoolARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable DeleteTapePool where+ hashWithSalt _salt DeleteTapePool' {..} =+ _salt `Prelude.hashWithSalt` poolARN++instance Prelude.NFData DeleteTapePool where+ rnf DeleteTapePool' {..} = Prelude.rnf poolARN++instance Data.ToHeaders DeleteTapePool where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.DeleteTapePool" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON DeleteTapePool where+ toJSON DeleteTapePool' {..} =+ Data.object+ ( Prelude.catMaybes+ [Prelude.Just ("PoolARN" Data..= poolARN)]+ )++instance Data.ToPath DeleteTapePool where+ toPath = Prelude.const "/"++instance Data.ToQuery DeleteTapePool where+ toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newDeleteTapePoolResponse' smart constructor.+data DeleteTapePoolResponse = DeleteTapePoolResponse'+ { -- | The Amazon Resource Name (ARN) of the custom tape pool being deleted.+ poolARN :: 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 'DeleteTapePoolResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'poolARN', 'deleteTapePoolResponse_poolARN' - The Amazon Resource Name (ARN) of the custom tape pool being deleted.+--+-- 'httpStatus', 'deleteTapePoolResponse_httpStatus' - The response's http status code.+newDeleteTapePoolResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ DeleteTapePoolResponse+newDeleteTapePoolResponse pHttpStatus_ =+ DeleteTapePoolResponse'+ { poolARN = Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | The Amazon Resource Name (ARN) of the custom tape pool being deleted.+deleteTapePoolResponse_poolARN :: Lens.Lens' DeleteTapePoolResponse (Prelude.Maybe Prelude.Text)+deleteTapePoolResponse_poolARN = Lens.lens (\DeleteTapePoolResponse' {poolARN} -> poolARN) (\s@DeleteTapePoolResponse' {} a -> s {poolARN = a} :: DeleteTapePoolResponse)++-- | The response's http status code.+deleteTapePoolResponse_httpStatus :: Lens.Lens' DeleteTapePoolResponse Prelude.Int+deleteTapePoolResponse_httpStatus = Lens.lens (\DeleteTapePoolResponse' {httpStatus} -> httpStatus) (\s@DeleteTapePoolResponse' {} a -> s {httpStatus = a} :: DeleteTapePoolResponse)++instance Prelude.NFData DeleteTapePoolResponse where+ rnf DeleteTapePoolResponse' {..} =+ Prelude.rnf poolARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/DeleteVolume.hs view
@@ -0,0 +1,192 @@+{-# 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.DeleteVolume+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Deletes the specified storage volume that you previously created using+-- the CreateCachediSCSIVolume or CreateStorediSCSIVolume API. This+-- operation is only supported in the cached volume and stored volume+-- types. For stored volume gateways, the local disk that was configured as+-- the storage volume is not deleted. You can reuse the local disk to+-- create another storage volume.+--+-- Before you delete a volume, make sure there are no iSCSI connections to+-- the volume you are deleting. You should also make sure there is no+-- snapshot in progress. You can use the Amazon Elastic Compute Cloud+-- (Amazon EC2) API to query snapshots on the volume you are deleting and+-- check the snapshot status. For more information, go to+-- <https://docs.aws.amazon.com/AWSEC2/latest/APIReference/ApiReference-query-DescribeSnapshots.html DescribeSnapshots>+-- in the /Amazon Elastic Compute Cloud API Reference/.+--+-- In the request, you must provide the Amazon Resource Name (ARN) of the+-- storage volume you want to delete.+module Amazonka.StorageGateway.DeleteVolume+ ( -- * Creating a Request+ DeleteVolume (..),+ newDeleteVolume,++ -- * Request Lenses+ deleteVolume_volumeARN,++ -- * Destructuring the Response+ DeleteVolumeResponse (..),+ newDeleteVolumeResponse,++ -- * Response Lenses+ deleteVolumeResponse_volumeARN,+ deleteVolumeResponse_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++-- | A JSON object containing the DeleteVolumeInput$VolumeARN to delete.+--+-- /See:/ 'newDeleteVolume' smart constructor.+data DeleteVolume = DeleteVolume'+ { -- | The Amazon Resource Name (ARN) of the volume. Use the ListVolumes+ -- operation to return a list of gateway volumes.+ volumeARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DeleteVolume' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'volumeARN', 'deleteVolume_volumeARN' - The Amazon Resource Name (ARN) of the volume. Use the ListVolumes+-- operation to return a list of gateway volumes.+newDeleteVolume ::+ -- | 'volumeARN'+ Prelude.Text ->+ DeleteVolume+newDeleteVolume pVolumeARN_ =+ DeleteVolume' {volumeARN = pVolumeARN_}++-- | The Amazon Resource Name (ARN) of the volume. Use the ListVolumes+-- operation to return a list of gateway volumes.+deleteVolume_volumeARN :: Lens.Lens' DeleteVolume Prelude.Text+deleteVolume_volumeARN = Lens.lens (\DeleteVolume' {volumeARN} -> volumeARN) (\s@DeleteVolume' {} a -> s {volumeARN = a} :: DeleteVolume)++instance Core.AWSRequest DeleteVolume where+ type AWSResponse DeleteVolume = DeleteVolumeResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ DeleteVolumeResponse'+ Prelude.<$> (x Data..?> "VolumeARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable DeleteVolume where+ hashWithSalt _salt DeleteVolume' {..} =+ _salt `Prelude.hashWithSalt` volumeARN++instance Prelude.NFData DeleteVolume where+ rnf DeleteVolume' {..} = Prelude.rnf volumeARN++instance Data.ToHeaders DeleteVolume where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.DeleteVolume" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON DeleteVolume where+ toJSON DeleteVolume' {..} =+ Data.object+ ( Prelude.catMaybes+ [Prelude.Just ("VolumeARN" Data..= volumeARN)]+ )++instance Data.ToPath DeleteVolume where+ toPath = Prelude.const "/"++instance Data.ToQuery DeleteVolume where+ toQuery = Prelude.const Prelude.mempty++-- | A JSON object containing the Amazon Resource Name (ARN) of the storage+-- volume that was deleted.+--+-- /See:/ 'newDeleteVolumeResponse' smart constructor.+data DeleteVolumeResponse = DeleteVolumeResponse'+ { -- | The Amazon Resource Name (ARN) of the storage volume that was deleted.+ -- It is the same ARN you provided in the request.+ volumeARN :: 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 'DeleteVolumeResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'volumeARN', 'deleteVolumeResponse_volumeARN' - The Amazon Resource Name (ARN) of the storage volume that was deleted.+-- It is the same ARN you provided in the request.+--+-- 'httpStatus', 'deleteVolumeResponse_httpStatus' - The response's http status code.+newDeleteVolumeResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ DeleteVolumeResponse+newDeleteVolumeResponse pHttpStatus_ =+ DeleteVolumeResponse'+ { volumeARN = Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | The Amazon Resource Name (ARN) of the storage volume that was deleted.+-- It is the same ARN you provided in the request.+deleteVolumeResponse_volumeARN :: Lens.Lens' DeleteVolumeResponse (Prelude.Maybe Prelude.Text)+deleteVolumeResponse_volumeARN = Lens.lens (\DeleteVolumeResponse' {volumeARN} -> volumeARN) (\s@DeleteVolumeResponse' {} a -> s {volumeARN = a} :: DeleteVolumeResponse)++-- | The response's http status code.+deleteVolumeResponse_httpStatus :: Lens.Lens' DeleteVolumeResponse Prelude.Int+deleteVolumeResponse_httpStatus = Lens.lens (\DeleteVolumeResponse' {httpStatus} -> httpStatus) (\s@DeleteVolumeResponse' {} a -> s {httpStatus = a} :: DeleteVolumeResponse)++instance Prelude.NFData DeleteVolumeResponse where+ rnf DeleteVolumeResponse' {..} =+ Prelude.rnf volumeARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/DescribeAvailabilityMonitorTest.hs view
@@ -0,0 +1,220 @@+{-# 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.DescribeAvailabilityMonitorTest+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Returns information about the most recent high availability monitoring+-- test that was performed on the host in a cluster. If a test isn\'t+-- performed, the status and start time in the response would be null.+module Amazonka.StorageGateway.DescribeAvailabilityMonitorTest+ ( -- * Creating a Request+ DescribeAvailabilityMonitorTest (..),+ newDescribeAvailabilityMonitorTest,++ -- * Request Lenses+ describeAvailabilityMonitorTest_gatewayARN,++ -- * Destructuring the Response+ DescribeAvailabilityMonitorTestResponse (..),+ newDescribeAvailabilityMonitorTestResponse,++ -- * Response Lenses+ describeAvailabilityMonitorTestResponse_gatewayARN,+ describeAvailabilityMonitorTestResponse_startTime,+ describeAvailabilityMonitorTestResponse_status,+ describeAvailabilityMonitorTestResponse_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++-- | /See:/ 'newDescribeAvailabilityMonitorTest' smart constructor.+data DescribeAvailabilityMonitorTest = DescribeAvailabilityMonitorTest'+ { gatewayARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeAvailabilityMonitorTest' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'describeAvailabilityMonitorTest_gatewayARN' - Undocumented member.+newDescribeAvailabilityMonitorTest ::+ -- | 'gatewayARN'+ Prelude.Text ->+ DescribeAvailabilityMonitorTest+newDescribeAvailabilityMonitorTest pGatewayARN_ =+ DescribeAvailabilityMonitorTest'+ { gatewayARN =+ pGatewayARN_+ }++-- | Undocumented member.+describeAvailabilityMonitorTest_gatewayARN :: Lens.Lens' DescribeAvailabilityMonitorTest Prelude.Text+describeAvailabilityMonitorTest_gatewayARN = Lens.lens (\DescribeAvailabilityMonitorTest' {gatewayARN} -> gatewayARN) (\s@DescribeAvailabilityMonitorTest' {} a -> s {gatewayARN = a} :: DescribeAvailabilityMonitorTest)++instance+ Core.AWSRequest+ DescribeAvailabilityMonitorTest+ where+ type+ AWSResponse DescribeAvailabilityMonitorTest =+ DescribeAvailabilityMonitorTestResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ DescribeAvailabilityMonitorTestResponse'+ Prelude.<$> (x Data..?> "GatewayARN")+ Prelude.<*> (x Data..?> "StartTime")+ Prelude.<*> (x Data..?> "Status")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance+ Prelude.Hashable+ DescribeAvailabilityMonitorTest+ where+ hashWithSalt+ _salt+ DescribeAvailabilityMonitorTest' {..} =+ _salt `Prelude.hashWithSalt` gatewayARN++instance+ Prelude.NFData+ DescribeAvailabilityMonitorTest+ where+ rnf DescribeAvailabilityMonitorTest' {..} =+ Prelude.rnf gatewayARN++instance+ Data.ToHeaders+ DescribeAvailabilityMonitorTest+ where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.DescribeAvailabilityMonitorTest" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON DescribeAvailabilityMonitorTest where+ toJSON DescribeAvailabilityMonitorTest' {..} =+ Data.object+ ( Prelude.catMaybes+ [Prelude.Just ("GatewayARN" Data..= gatewayARN)]+ )++instance Data.ToPath DescribeAvailabilityMonitorTest where+ toPath = Prelude.const "/"++instance Data.ToQuery DescribeAvailabilityMonitorTest where+ toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newDescribeAvailabilityMonitorTestResponse' smart constructor.+data DescribeAvailabilityMonitorTestResponse = DescribeAvailabilityMonitorTestResponse'+ { gatewayARN :: Prelude.Maybe Prelude.Text,+ -- | The time the high availability monitoring test was started. If a test+ -- hasn\'t been performed, the value of this field is null.+ startTime :: Prelude.Maybe Data.POSIX,+ -- | The status of the high availability monitoring test. If a test hasn\'t+ -- been performed, the value of this field is null.+ status :: Prelude.Maybe AvailabilityMonitorTestStatus,+ -- | The response's http status code.+ httpStatus :: Prelude.Int+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeAvailabilityMonitorTestResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'describeAvailabilityMonitorTestResponse_gatewayARN' - Undocumented member.+--+-- 'startTime', 'describeAvailabilityMonitorTestResponse_startTime' - The time the high availability monitoring test was started. If a test+-- hasn\'t been performed, the value of this field is null.+--+-- 'status', 'describeAvailabilityMonitorTestResponse_status' - The status of the high availability monitoring test. If a test hasn\'t+-- been performed, the value of this field is null.+--+-- 'httpStatus', 'describeAvailabilityMonitorTestResponse_httpStatus' - The response's http status code.+newDescribeAvailabilityMonitorTestResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ DescribeAvailabilityMonitorTestResponse+newDescribeAvailabilityMonitorTestResponse+ pHttpStatus_ =+ DescribeAvailabilityMonitorTestResponse'+ { gatewayARN =+ Prelude.Nothing,+ startTime = Prelude.Nothing,+ status = Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | Undocumented member.+describeAvailabilityMonitorTestResponse_gatewayARN :: Lens.Lens' DescribeAvailabilityMonitorTestResponse (Prelude.Maybe Prelude.Text)+describeAvailabilityMonitorTestResponse_gatewayARN = Lens.lens (\DescribeAvailabilityMonitorTestResponse' {gatewayARN} -> gatewayARN) (\s@DescribeAvailabilityMonitorTestResponse' {} a -> s {gatewayARN = a} :: DescribeAvailabilityMonitorTestResponse)++-- | The time the high availability monitoring test was started. If a test+-- hasn\'t been performed, the value of this field is null.+describeAvailabilityMonitorTestResponse_startTime :: Lens.Lens' DescribeAvailabilityMonitorTestResponse (Prelude.Maybe Prelude.UTCTime)+describeAvailabilityMonitorTestResponse_startTime = Lens.lens (\DescribeAvailabilityMonitorTestResponse' {startTime} -> startTime) (\s@DescribeAvailabilityMonitorTestResponse' {} a -> s {startTime = a} :: DescribeAvailabilityMonitorTestResponse) Prelude.. Lens.mapping Data._Time++-- | The status of the high availability monitoring test. If a test hasn\'t+-- been performed, the value of this field is null.+describeAvailabilityMonitorTestResponse_status :: Lens.Lens' DescribeAvailabilityMonitorTestResponse (Prelude.Maybe AvailabilityMonitorTestStatus)+describeAvailabilityMonitorTestResponse_status = Lens.lens (\DescribeAvailabilityMonitorTestResponse' {status} -> status) (\s@DescribeAvailabilityMonitorTestResponse' {} a -> s {status = a} :: DescribeAvailabilityMonitorTestResponse)++-- | The response's http status code.+describeAvailabilityMonitorTestResponse_httpStatus :: Lens.Lens' DescribeAvailabilityMonitorTestResponse Prelude.Int+describeAvailabilityMonitorTestResponse_httpStatus = Lens.lens (\DescribeAvailabilityMonitorTestResponse' {httpStatus} -> httpStatus) (\s@DescribeAvailabilityMonitorTestResponse' {} a -> s {httpStatus = a} :: DescribeAvailabilityMonitorTestResponse)++instance+ Prelude.NFData+ DescribeAvailabilityMonitorTestResponse+ where+ rnf DescribeAvailabilityMonitorTestResponse' {..} =+ Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf startTime+ `Prelude.seq` Prelude.rnf status+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/DescribeBandwidthRateLimit.hs view
@@ -0,0 +1,218 @@+{-# 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.DescribeBandwidthRateLimit+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Returns the bandwidth rate limits of a gateway. By default, these limits+-- are not set, which means no bandwidth rate limiting is in effect. This+-- operation is supported only for the stored volume, cached volume, and+-- tape gateway types. To describe bandwidth rate limits for S3 file+-- gateways, use DescribeBandwidthRateLimitSchedule.+--+-- This operation returns a value for a bandwidth rate limit only if the+-- limit is set. If no limits are set for the gateway, then this operation+-- returns only the gateway ARN in the response body. To specify which+-- gateway to describe, use the Amazon Resource Name (ARN) of the gateway+-- in your request.+module Amazonka.StorageGateway.DescribeBandwidthRateLimit+ ( -- * Creating a Request+ DescribeBandwidthRateLimit (..),+ newDescribeBandwidthRateLimit,++ -- * Request Lenses+ describeBandwidthRateLimit_gatewayARN,++ -- * Destructuring the Response+ DescribeBandwidthRateLimitResponse (..),+ newDescribeBandwidthRateLimitResponse,++ -- * Response Lenses+ describeBandwidthRateLimitResponse_averageDownloadRateLimitInBitsPerSec,+ describeBandwidthRateLimitResponse_averageUploadRateLimitInBitsPerSec,+ describeBandwidthRateLimitResponse_gatewayARN,+ describeBandwidthRateLimitResponse_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++-- | A JSON object containing the Amazon Resource Name (ARN) of the gateway.+--+-- /See:/ 'newDescribeBandwidthRateLimit' smart constructor.+data DescribeBandwidthRateLimit = DescribeBandwidthRateLimit'+ { gatewayARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeBandwidthRateLimit' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'describeBandwidthRateLimit_gatewayARN' - Undocumented member.+newDescribeBandwidthRateLimit ::+ -- | 'gatewayARN'+ Prelude.Text ->+ DescribeBandwidthRateLimit+newDescribeBandwidthRateLimit pGatewayARN_ =+ DescribeBandwidthRateLimit'+ { gatewayARN =+ pGatewayARN_+ }++-- | Undocumented member.+describeBandwidthRateLimit_gatewayARN :: Lens.Lens' DescribeBandwidthRateLimit Prelude.Text+describeBandwidthRateLimit_gatewayARN = Lens.lens (\DescribeBandwidthRateLimit' {gatewayARN} -> gatewayARN) (\s@DescribeBandwidthRateLimit' {} a -> s {gatewayARN = a} :: DescribeBandwidthRateLimit)++instance Core.AWSRequest DescribeBandwidthRateLimit where+ type+ AWSResponse DescribeBandwidthRateLimit =+ DescribeBandwidthRateLimitResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ DescribeBandwidthRateLimitResponse'+ Prelude.<$> (x Data..?> "AverageDownloadRateLimitInBitsPerSec")+ Prelude.<*> (x Data..?> "AverageUploadRateLimitInBitsPerSec")+ Prelude.<*> (x Data..?> "GatewayARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable DescribeBandwidthRateLimit where+ hashWithSalt _salt DescribeBandwidthRateLimit' {..} =+ _salt `Prelude.hashWithSalt` gatewayARN++instance Prelude.NFData DescribeBandwidthRateLimit where+ rnf DescribeBandwidthRateLimit' {..} =+ Prelude.rnf gatewayARN++instance Data.ToHeaders DescribeBandwidthRateLimit where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.DescribeBandwidthRateLimit" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON DescribeBandwidthRateLimit where+ toJSON DescribeBandwidthRateLimit' {..} =+ Data.object+ ( Prelude.catMaybes+ [Prelude.Just ("GatewayARN" Data..= gatewayARN)]+ )++instance Data.ToPath DescribeBandwidthRateLimit where+ toPath = Prelude.const "/"++instance Data.ToQuery DescribeBandwidthRateLimit where+ toQuery = Prelude.const Prelude.mempty++-- | A JSON object containing the following fields:+--+-- /See:/ 'newDescribeBandwidthRateLimitResponse' smart constructor.+data DescribeBandwidthRateLimitResponse = DescribeBandwidthRateLimitResponse'+ { -- | The average download bandwidth rate limit in bits per second. This field+ -- does not appear in the response if the download rate limit is not set.+ averageDownloadRateLimitInBitsPerSec :: Prelude.Maybe Prelude.Natural,+ -- | The average upload bandwidth rate limit in bits per second. This field+ -- does not appear in the response if the upload rate limit is not set.+ averageUploadRateLimitInBitsPerSec :: Prelude.Maybe Prelude.Natural,+ gatewayARN :: 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 'DescribeBandwidthRateLimitResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'averageDownloadRateLimitInBitsPerSec', 'describeBandwidthRateLimitResponse_averageDownloadRateLimitInBitsPerSec' - The average download bandwidth rate limit in bits per second. This field+-- does not appear in the response if the download rate limit is not set.+--+-- 'averageUploadRateLimitInBitsPerSec', 'describeBandwidthRateLimitResponse_averageUploadRateLimitInBitsPerSec' - The average upload bandwidth rate limit in bits per second. This field+-- does not appear in the response if the upload rate limit is not set.+--+-- 'gatewayARN', 'describeBandwidthRateLimitResponse_gatewayARN' - Undocumented member.+--+-- 'httpStatus', 'describeBandwidthRateLimitResponse_httpStatus' - The response's http status code.+newDescribeBandwidthRateLimitResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ DescribeBandwidthRateLimitResponse+newDescribeBandwidthRateLimitResponse pHttpStatus_ =+ DescribeBandwidthRateLimitResponse'+ { averageDownloadRateLimitInBitsPerSec =+ Prelude.Nothing,+ averageUploadRateLimitInBitsPerSec =+ Prelude.Nothing,+ gatewayARN = Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | The average download bandwidth rate limit in bits per second. This field+-- does not appear in the response if the download rate limit is not set.+describeBandwidthRateLimitResponse_averageDownloadRateLimitInBitsPerSec :: Lens.Lens' DescribeBandwidthRateLimitResponse (Prelude.Maybe Prelude.Natural)+describeBandwidthRateLimitResponse_averageDownloadRateLimitInBitsPerSec = Lens.lens (\DescribeBandwidthRateLimitResponse' {averageDownloadRateLimitInBitsPerSec} -> averageDownloadRateLimitInBitsPerSec) (\s@DescribeBandwidthRateLimitResponse' {} a -> s {averageDownloadRateLimitInBitsPerSec = a} :: DescribeBandwidthRateLimitResponse)++-- | The average upload bandwidth rate limit in bits per second. This field+-- does not appear in the response if the upload rate limit is not set.+describeBandwidthRateLimitResponse_averageUploadRateLimitInBitsPerSec :: Lens.Lens' DescribeBandwidthRateLimitResponse (Prelude.Maybe Prelude.Natural)+describeBandwidthRateLimitResponse_averageUploadRateLimitInBitsPerSec = Lens.lens (\DescribeBandwidthRateLimitResponse' {averageUploadRateLimitInBitsPerSec} -> averageUploadRateLimitInBitsPerSec) (\s@DescribeBandwidthRateLimitResponse' {} a -> s {averageUploadRateLimitInBitsPerSec = a} :: DescribeBandwidthRateLimitResponse)++-- | Undocumented member.+describeBandwidthRateLimitResponse_gatewayARN :: Lens.Lens' DescribeBandwidthRateLimitResponse (Prelude.Maybe Prelude.Text)+describeBandwidthRateLimitResponse_gatewayARN = Lens.lens (\DescribeBandwidthRateLimitResponse' {gatewayARN} -> gatewayARN) (\s@DescribeBandwidthRateLimitResponse' {} a -> s {gatewayARN = a} :: DescribeBandwidthRateLimitResponse)++-- | The response's http status code.+describeBandwidthRateLimitResponse_httpStatus :: Lens.Lens' DescribeBandwidthRateLimitResponse Prelude.Int+describeBandwidthRateLimitResponse_httpStatus = Lens.lens (\DescribeBandwidthRateLimitResponse' {httpStatus} -> httpStatus) (\s@DescribeBandwidthRateLimitResponse' {} a -> s {httpStatus = a} :: DescribeBandwidthRateLimitResponse)++instance+ Prelude.NFData+ DescribeBandwidthRateLimitResponse+ where+ rnf DescribeBandwidthRateLimitResponse' {..} =+ Prelude.rnf averageDownloadRateLimitInBitsPerSec+ `Prelude.seq` Prelude.rnf averageUploadRateLimitInBitsPerSec+ `Prelude.seq` Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/DescribeBandwidthRateLimitSchedule.hs view
@@ -0,0 +1,234 @@+{-# 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.DescribeBandwidthRateLimitSchedule+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Returns information about the bandwidth rate limit schedule of a+-- gateway. By default, gateways do not have bandwidth rate limit+-- schedules, which means no bandwidth rate limiting is in effect. This+-- operation is supported only for volume, tape and S3 file gateways. FSx+-- file gateways do not support bandwidth rate limits.+--+-- This operation returns information about a gateway\'s bandwidth rate+-- limit schedule. A bandwidth rate limit schedule consists of one or more+-- bandwidth rate limit intervals. A bandwidth rate limit interval defines+-- a period of time on one or more days of the week, during which bandwidth+-- rate limits are specified for uploading, downloading, or both.+--+-- A bandwidth rate limit interval consists of one or more days of the+-- week, a start hour and minute, an ending hour and minute, and bandwidth+-- rate limits for uploading and downloading+--+-- If no bandwidth rate limit schedule intervals are set for the gateway,+-- this operation returns an empty response. To specify which gateway to+-- describe, use the Amazon Resource Name (ARN) of the gateway in your+-- request.+module Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule+ ( -- * Creating a Request+ DescribeBandwidthRateLimitSchedule (..),+ newDescribeBandwidthRateLimitSchedule,++ -- * Request Lenses+ describeBandwidthRateLimitSchedule_gatewayARN,++ -- * Destructuring the Response+ DescribeBandwidthRateLimitScheduleResponse (..),+ newDescribeBandwidthRateLimitScheduleResponse,++ -- * Response Lenses+ describeBandwidthRateLimitScheduleResponse_bandwidthRateLimitIntervals,+ describeBandwidthRateLimitScheduleResponse_gatewayARN,+ describeBandwidthRateLimitScheduleResponse_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++-- | /See:/ 'newDescribeBandwidthRateLimitSchedule' smart constructor.+data DescribeBandwidthRateLimitSchedule = DescribeBandwidthRateLimitSchedule'+ { gatewayARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeBandwidthRateLimitSchedule' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'describeBandwidthRateLimitSchedule_gatewayARN' - Undocumented member.+newDescribeBandwidthRateLimitSchedule ::+ -- | 'gatewayARN'+ Prelude.Text ->+ DescribeBandwidthRateLimitSchedule+newDescribeBandwidthRateLimitSchedule pGatewayARN_ =+ DescribeBandwidthRateLimitSchedule'+ { gatewayARN =+ pGatewayARN_+ }++-- | Undocumented member.+describeBandwidthRateLimitSchedule_gatewayARN :: Lens.Lens' DescribeBandwidthRateLimitSchedule Prelude.Text+describeBandwidthRateLimitSchedule_gatewayARN = Lens.lens (\DescribeBandwidthRateLimitSchedule' {gatewayARN} -> gatewayARN) (\s@DescribeBandwidthRateLimitSchedule' {} a -> s {gatewayARN = a} :: DescribeBandwidthRateLimitSchedule)++instance+ Core.AWSRequest+ DescribeBandwidthRateLimitSchedule+ where+ type+ AWSResponse DescribeBandwidthRateLimitSchedule =+ DescribeBandwidthRateLimitScheduleResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ DescribeBandwidthRateLimitScheduleResponse'+ Prelude.<$> ( x+ Data..?> "BandwidthRateLimitIntervals"+ Core..!@ Prelude.mempty+ )+ Prelude.<*> (x Data..?> "GatewayARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance+ Prelude.Hashable+ DescribeBandwidthRateLimitSchedule+ where+ hashWithSalt+ _salt+ DescribeBandwidthRateLimitSchedule' {..} =+ _salt `Prelude.hashWithSalt` gatewayARN++instance+ Prelude.NFData+ DescribeBandwidthRateLimitSchedule+ where+ rnf DescribeBandwidthRateLimitSchedule' {..} =+ Prelude.rnf gatewayARN++instance+ Data.ToHeaders+ DescribeBandwidthRateLimitSchedule+ where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.DescribeBandwidthRateLimitSchedule" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance+ Data.ToJSON+ DescribeBandwidthRateLimitSchedule+ where+ toJSON DescribeBandwidthRateLimitSchedule' {..} =+ Data.object+ ( Prelude.catMaybes+ [Prelude.Just ("GatewayARN" Data..= gatewayARN)]+ )++instance+ Data.ToPath+ DescribeBandwidthRateLimitSchedule+ where+ toPath = Prelude.const "/"++instance+ Data.ToQuery+ DescribeBandwidthRateLimitSchedule+ where+ toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newDescribeBandwidthRateLimitScheduleResponse' smart constructor.+data DescribeBandwidthRateLimitScheduleResponse = DescribeBandwidthRateLimitScheduleResponse'+ { -- | An array that contains the bandwidth rate limit intervals for a tape or+ -- volume gateway.+ bandwidthRateLimitIntervals :: Prelude.Maybe [BandwidthRateLimitInterval],+ gatewayARN :: 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 'DescribeBandwidthRateLimitScheduleResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'bandwidthRateLimitIntervals', 'describeBandwidthRateLimitScheduleResponse_bandwidthRateLimitIntervals' - An array that contains the bandwidth rate limit intervals for a tape or+-- volume gateway.+--+-- 'gatewayARN', 'describeBandwidthRateLimitScheduleResponse_gatewayARN' - Undocumented member.+--+-- 'httpStatus', 'describeBandwidthRateLimitScheduleResponse_httpStatus' - The response's http status code.+newDescribeBandwidthRateLimitScheduleResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ DescribeBandwidthRateLimitScheduleResponse+newDescribeBandwidthRateLimitScheduleResponse+ pHttpStatus_ =+ DescribeBandwidthRateLimitScheduleResponse'+ { bandwidthRateLimitIntervals =+ Prelude.Nothing,+ gatewayARN = Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | An array that contains the bandwidth rate limit intervals for a tape or+-- volume gateway.+describeBandwidthRateLimitScheduleResponse_bandwidthRateLimitIntervals :: Lens.Lens' DescribeBandwidthRateLimitScheduleResponse (Prelude.Maybe [BandwidthRateLimitInterval])+describeBandwidthRateLimitScheduleResponse_bandwidthRateLimitIntervals = Lens.lens (\DescribeBandwidthRateLimitScheduleResponse' {bandwidthRateLimitIntervals} -> bandwidthRateLimitIntervals) (\s@DescribeBandwidthRateLimitScheduleResponse' {} a -> s {bandwidthRateLimitIntervals = a} :: DescribeBandwidthRateLimitScheduleResponse) Prelude.. Lens.mapping Lens.coerced++-- | Undocumented member.+describeBandwidthRateLimitScheduleResponse_gatewayARN :: Lens.Lens' DescribeBandwidthRateLimitScheduleResponse (Prelude.Maybe Prelude.Text)+describeBandwidthRateLimitScheduleResponse_gatewayARN = Lens.lens (\DescribeBandwidthRateLimitScheduleResponse' {gatewayARN} -> gatewayARN) (\s@DescribeBandwidthRateLimitScheduleResponse' {} a -> s {gatewayARN = a} :: DescribeBandwidthRateLimitScheduleResponse)++-- | The response's http status code.+describeBandwidthRateLimitScheduleResponse_httpStatus :: Lens.Lens' DescribeBandwidthRateLimitScheduleResponse Prelude.Int+describeBandwidthRateLimitScheduleResponse_httpStatus = Lens.lens (\DescribeBandwidthRateLimitScheduleResponse' {httpStatus} -> httpStatus) (\s@DescribeBandwidthRateLimitScheduleResponse' {} a -> s {httpStatus = a} :: DescribeBandwidthRateLimitScheduleResponse)++instance+ Prelude.NFData+ DescribeBandwidthRateLimitScheduleResponse+ where+ rnf DescribeBandwidthRateLimitScheduleResponse' {..} =+ Prelude.rnf bandwidthRateLimitIntervals+ `Prelude.seq` Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/DescribeCache.hs view
@@ -0,0 +1,272 @@+{-# 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.DescribeCache+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Returns information about the cache of a gateway. This operation is only+-- supported in the cached volume, tape, and file gateway types.+--+-- The response includes disk IDs that are configured as cache, and it+-- includes the amount of cache allocated and used.+module Amazonka.StorageGateway.DescribeCache+ ( -- * Creating a Request+ DescribeCache (..),+ newDescribeCache,++ -- * Request Lenses+ describeCache_gatewayARN,++ -- * Destructuring the Response+ DescribeCacheResponse (..),+ newDescribeCacheResponse,++ -- * Response Lenses+ describeCacheResponse_cacheAllocatedInBytes,+ describeCacheResponse_cacheDirtyPercentage,+ describeCacheResponse_cacheHitPercentage,+ describeCacheResponse_cacheMissPercentage,+ describeCacheResponse_cacheUsedPercentage,+ describeCacheResponse_diskIds,+ describeCacheResponse_gatewayARN,+ describeCacheResponse_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++-- | /See:/ 'newDescribeCache' smart constructor.+data DescribeCache = DescribeCache'+ { gatewayARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeCache' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'describeCache_gatewayARN' - Undocumented member.+newDescribeCache ::+ -- | 'gatewayARN'+ Prelude.Text ->+ DescribeCache+newDescribeCache pGatewayARN_ =+ DescribeCache' {gatewayARN = pGatewayARN_}++-- | Undocumented member.+describeCache_gatewayARN :: Lens.Lens' DescribeCache Prelude.Text+describeCache_gatewayARN = Lens.lens (\DescribeCache' {gatewayARN} -> gatewayARN) (\s@DescribeCache' {} a -> s {gatewayARN = a} :: DescribeCache)++instance Core.AWSRequest DescribeCache where+ type+ AWSResponse DescribeCache =+ DescribeCacheResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ DescribeCacheResponse'+ Prelude.<$> (x Data..?> "CacheAllocatedInBytes")+ Prelude.<*> (x Data..?> "CacheDirtyPercentage")+ Prelude.<*> (x Data..?> "CacheHitPercentage")+ Prelude.<*> (x Data..?> "CacheMissPercentage")+ Prelude.<*> (x Data..?> "CacheUsedPercentage")+ Prelude.<*> (x Data..?> "DiskIds" Core..!@ Prelude.mempty)+ Prelude.<*> (x Data..?> "GatewayARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable DescribeCache where+ hashWithSalt _salt DescribeCache' {..} =+ _salt `Prelude.hashWithSalt` gatewayARN++instance Prelude.NFData DescribeCache where+ rnf DescribeCache' {..} = Prelude.rnf gatewayARN++instance Data.ToHeaders DescribeCache where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.DescribeCache" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON DescribeCache where+ toJSON DescribeCache' {..} =+ Data.object+ ( Prelude.catMaybes+ [Prelude.Just ("GatewayARN" Data..= gatewayARN)]+ )++instance Data.ToPath DescribeCache where+ toPath = Prelude.const "/"++instance Data.ToQuery DescribeCache where+ toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newDescribeCacheResponse' smart constructor.+data DescribeCacheResponse = DescribeCacheResponse'+ { -- | The amount of cache in bytes allocated to a gateway.+ cacheAllocatedInBytes :: Prelude.Maybe Prelude.Integer,+ -- | The file share\'s contribution to the overall percentage of the+ -- gateway\'s cache that has not been persisted to Amazon Web Services. The+ -- sample is taken at the end of the reporting period.+ cacheDirtyPercentage :: Prelude.Maybe Prelude.Double,+ -- | Percent of application read operations from the file shares that are+ -- served from cache. The sample is taken at the end of the reporting+ -- period.+ cacheHitPercentage :: Prelude.Maybe Prelude.Double,+ -- | Percent of application read operations from the file shares that are not+ -- served from cache. The sample is taken at the end of the reporting+ -- period.+ cacheMissPercentage :: Prelude.Maybe Prelude.Double,+ -- | Percent use of the gateway\'s cache storage. This metric applies only to+ -- the gateway-cached volume setup. The sample is taken at the end of the+ -- reporting period.+ cacheUsedPercentage :: Prelude.Maybe Prelude.Double,+ -- | An array of strings that identify disks that are to be configured as+ -- working storage. Each string has a minimum length of 1 and maximum+ -- length of 300. You can get the disk IDs from the ListLocalDisks API.+ diskIds :: Prelude.Maybe [Prelude.Text],+ gatewayARN :: 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 'DescribeCacheResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'cacheAllocatedInBytes', 'describeCacheResponse_cacheAllocatedInBytes' - The amount of cache in bytes allocated to a gateway.+--+-- 'cacheDirtyPercentage', 'describeCacheResponse_cacheDirtyPercentage' - The file share\'s contribution to the overall percentage of the+-- gateway\'s cache that has not been persisted to Amazon Web Services. The+-- sample is taken at the end of the reporting period.+--+-- 'cacheHitPercentage', 'describeCacheResponse_cacheHitPercentage' - Percent of application read operations from the file shares that are+-- served from cache. The sample is taken at the end of the reporting+-- period.+--+-- 'cacheMissPercentage', 'describeCacheResponse_cacheMissPercentage' - Percent of application read operations from the file shares that are not+-- served from cache. The sample is taken at the end of the reporting+-- period.+--+-- 'cacheUsedPercentage', 'describeCacheResponse_cacheUsedPercentage' - Percent use of the gateway\'s cache storage. This metric applies only to+-- the gateway-cached volume setup. The sample is taken at the end of the+-- reporting period.+--+-- 'diskIds', 'describeCacheResponse_diskIds' - An array of strings that identify disks that are to be configured as+-- working storage. Each string has a minimum length of 1 and maximum+-- length of 300. You can get the disk IDs from the ListLocalDisks API.+--+-- 'gatewayARN', 'describeCacheResponse_gatewayARN' - Undocumented member.+--+-- 'httpStatus', 'describeCacheResponse_httpStatus' - The response's http status code.+newDescribeCacheResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ DescribeCacheResponse+newDescribeCacheResponse pHttpStatus_ =+ DescribeCacheResponse'+ { cacheAllocatedInBytes =+ Prelude.Nothing,+ cacheDirtyPercentage = Prelude.Nothing,+ cacheHitPercentage = Prelude.Nothing,+ cacheMissPercentage = Prelude.Nothing,+ cacheUsedPercentage = Prelude.Nothing,+ diskIds = Prelude.Nothing,+ gatewayARN = Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | The amount of cache in bytes allocated to a gateway.+describeCacheResponse_cacheAllocatedInBytes :: Lens.Lens' DescribeCacheResponse (Prelude.Maybe Prelude.Integer)+describeCacheResponse_cacheAllocatedInBytes = Lens.lens (\DescribeCacheResponse' {cacheAllocatedInBytes} -> cacheAllocatedInBytes) (\s@DescribeCacheResponse' {} a -> s {cacheAllocatedInBytes = a} :: DescribeCacheResponse)++-- | The file share\'s contribution to the overall percentage of the+-- gateway\'s cache that has not been persisted to Amazon Web Services. The+-- sample is taken at the end of the reporting period.+describeCacheResponse_cacheDirtyPercentage :: Lens.Lens' DescribeCacheResponse (Prelude.Maybe Prelude.Double)+describeCacheResponse_cacheDirtyPercentage = Lens.lens (\DescribeCacheResponse' {cacheDirtyPercentage} -> cacheDirtyPercentage) (\s@DescribeCacheResponse' {} a -> s {cacheDirtyPercentage = a} :: DescribeCacheResponse)++-- | Percent of application read operations from the file shares that are+-- served from cache. The sample is taken at the end of the reporting+-- period.+describeCacheResponse_cacheHitPercentage :: Lens.Lens' DescribeCacheResponse (Prelude.Maybe Prelude.Double)+describeCacheResponse_cacheHitPercentage = Lens.lens (\DescribeCacheResponse' {cacheHitPercentage} -> cacheHitPercentage) (\s@DescribeCacheResponse' {} a -> s {cacheHitPercentage = a} :: DescribeCacheResponse)++-- | Percent of application read operations from the file shares that are not+-- served from cache. The sample is taken at the end of the reporting+-- period.+describeCacheResponse_cacheMissPercentage :: Lens.Lens' DescribeCacheResponse (Prelude.Maybe Prelude.Double)+describeCacheResponse_cacheMissPercentage = Lens.lens (\DescribeCacheResponse' {cacheMissPercentage} -> cacheMissPercentage) (\s@DescribeCacheResponse' {} a -> s {cacheMissPercentage = a} :: DescribeCacheResponse)++-- | Percent use of the gateway\'s cache storage. This metric applies only to+-- the gateway-cached volume setup. The sample is taken at the end of the+-- reporting period.+describeCacheResponse_cacheUsedPercentage :: Lens.Lens' DescribeCacheResponse (Prelude.Maybe Prelude.Double)+describeCacheResponse_cacheUsedPercentage = Lens.lens (\DescribeCacheResponse' {cacheUsedPercentage} -> cacheUsedPercentage) (\s@DescribeCacheResponse' {} a -> s {cacheUsedPercentage = a} :: DescribeCacheResponse)++-- | An array of strings that identify disks that are to be configured as+-- working storage. Each string has a minimum length of 1 and maximum+-- length of 300. You can get the disk IDs from the ListLocalDisks API.+describeCacheResponse_diskIds :: Lens.Lens' DescribeCacheResponse (Prelude.Maybe [Prelude.Text])+describeCacheResponse_diskIds = Lens.lens (\DescribeCacheResponse' {diskIds} -> diskIds) (\s@DescribeCacheResponse' {} a -> s {diskIds = a} :: DescribeCacheResponse) Prelude.. Lens.mapping Lens.coerced++-- | Undocumented member.+describeCacheResponse_gatewayARN :: Lens.Lens' DescribeCacheResponse (Prelude.Maybe Prelude.Text)+describeCacheResponse_gatewayARN = Lens.lens (\DescribeCacheResponse' {gatewayARN} -> gatewayARN) (\s@DescribeCacheResponse' {} a -> s {gatewayARN = a} :: DescribeCacheResponse)++-- | The response's http status code.+describeCacheResponse_httpStatus :: Lens.Lens' DescribeCacheResponse Prelude.Int+describeCacheResponse_httpStatus = Lens.lens (\DescribeCacheResponse' {httpStatus} -> httpStatus) (\s@DescribeCacheResponse' {} a -> s {httpStatus = a} :: DescribeCacheResponse)++instance Prelude.NFData DescribeCacheResponse where+ rnf DescribeCacheResponse' {..} =+ Prelude.rnf cacheAllocatedInBytes+ `Prelude.seq` Prelude.rnf cacheDirtyPercentage+ `Prelude.seq` Prelude.rnf cacheHitPercentage+ `Prelude.seq` Prelude.rnf cacheMissPercentage+ `Prelude.seq` Prelude.rnf cacheUsedPercentage+ `Prelude.seq` Prelude.rnf diskIds+ `Prelude.seq` Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/DescribeCachediSCSIVolumes.hs view
@@ -0,0 +1,195 @@+{-# 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.DescribeCachediSCSIVolumes+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Returns a description of the gateway volumes specified in the request.+-- This operation is only supported in the cached volume gateway types.+--+-- The list of gateway volumes in the request must be from one gateway. In+-- the response, Storage Gateway returns volume information sorted by+-- volume Amazon Resource Name (ARN).+module Amazonka.StorageGateway.DescribeCachediSCSIVolumes+ ( -- * Creating a Request+ DescribeCachediSCSIVolumes (..),+ newDescribeCachediSCSIVolumes,++ -- * Request Lenses+ describeCachediSCSIVolumes_volumeARNs,++ -- * Destructuring the Response+ DescribeCachediSCSIVolumesResponse (..),+ newDescribeCachediSCSIVolumesResponse,++ -- * Response Lenses+ describeCachediSCSIVolumesResponse_cachediSCSIVolumes,+ describeCachediSCSIVolumesResponse_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++-- | /See:/ 'newDescribeCachediSCSIVolumes' smart constructor.+data DescribeCachediSCSIVolumes = DescribeCachediSCSIVolumes'+ { -- | An array of strings where each string represents the Amazon Resource+ -- Name (ARN) of a cached volume. All of the specified cached volumes must+ -- be from the same gateway. Use ListVolumes to get volume ARNs for a+ -- gateway.+ volumeARNs :: [Prelude.Text]+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeCachediSCSIVolumes' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'volumeARNs', 'describeCachediSCSIVolumes_volumeARNs' - An array of strings where each string represents the Amazon Resource+-- Name (ARN) of a cached volume. All of the specified cached volumes must+-- be from the same gateway. Use ListVolumes to get volume ARNs for a+-- gateway.+newDescribeCachediSCSIVolumes ::+ DescribeCachediSCSIVolumes+newDescribeCachediSCSIVolumes =+ DescribeCachediSCSIVolumes'+ { volumeARNs =+ Prelude.mempty+ }++-- | An array of strings where each string represents the Amazon Resource+-- Name (ARN) of a cached volume. All of the specified cached volumes must+-- be from the same gateway. Use ListVolumes to get volume ARNs for a+-- gateway.+describeCachediSCSIVolumes_volumeARNs :: Lens.Lens' DescribeCachediSCSIVolumes [Prelude.Text]+describeCachediSCSIVolumes_volumeARNs = Lens.lens (\DescribeCachediSCSIVolumes' {volumeARNs} -> volumeARNs) (\s@DescribeCachediSCSIVolumes' {} a -> s {volumeARNs = a} :: DescribeCachediSCSIVolumes) Prelude.. Lens.coerced++instance Core.AWSRequest DescribeCachediSCSIVolumes where+ type+ AWSResponse DescribeCachediSCSIVolumes =+ DescribeCachediSCSIVolumesResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ DescribeCachediSCSIVolumesResponse'+ Prelude.<$> ( x+ Data..?> "CachediSCSIVolumes"+ Core..!@ Prelude.mempty+ )+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable DescribeCachediSCSIVolumes where+ hashWithSalt _salt DescribeCachediSCSIVolumes' {..} =+ _salt `Prelude.hashWithSalt` volumeARNs++instance Prelude.NFData DescribeCachediSCSIVolumes where+ rnf DescribeCachediSCSIVolumes' {..} =+ Prelude.rnf volumeARNs++instance Data.ToHeaders DescribeCachediSCSIVolumes where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.DescribeCachediSCSIVolumes" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON DescribeCachediSCSIVolumes where+ toJSON DescribeCachediSCSIVolumes' {..} =+ Data.object+ ( Prelude.catMaybes+ [Prelude.Just ("VolumeARNs" Data..= volumeARNs)]+ )++instance Data.ToPath DescribeCachediSCSIVolumes where+ toPath = Prelude.const "/"++instance Data.ToQuery DescribeCachediSCSIVolumes where+ toQuery = Prelude.const Prelude.mempty++-- | A JSON object containing the following fields:+--+-- /See:/ 'newDescribeCachediSCSIVolumesResponse' smart constructor.+data DescribeCachediSCSIVolumesResponse = DescribeCachediSCSIVolumesResponse'+ { -- | An array of objects where each object contains metadata about one cached+ -- volume.+ cachediSCSIVolumes :: Prelude.Maybe [CachediSCSIVolume],+ -- | The response's http status code.+ httpStatus :: Prelude.Int+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeCachediSCSIVolumesResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'cachediSCSIVolumes', 'describeCachediSCSIVolumesResponse_cachediSCSIVolumes' - An array of objects where each object contains metadata about one cached+-- volume.+--+-- 'httpStatus', 'describeCachediSCSIVolumesResponse_httpStatus' - The response's http status code.+newDescribeCachediSCSIVolumesResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ DescribeCachediSCSIVolumesResponse+newDescribeCachediSCSIVolumesResponse pHttpStatus_ =+ DescribeCachediSCSIVolumesResponse'+ { cachediSCSIVolumes =+ Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | An array of objects where each object contains metadata about one cached+-- volume.+describeCachediSCSIVolumesResponse_cachediSCSIVolumes :: Lens.Lens' DescribeCachediSCSIVolumesResponse (Prelude.Maybe [CachediSCSIVolume])+describeCachediSCSIVolumesResponse_cachediSCSIVolumes = Lens.lens (\DescribeCachediSCSIVolumesResponse' {cachediSCSIVolumes} -> cachediSCSIVolumes) (\s@DescribeCachediSCSIVolumesResponse' {} a -> s {cachediSCSIVolumes = a} :: DescribeCachediSCSIVolumesResponse) Prelude.. Lens.mapping Lens.coerced++-- | The response's http status code.+describeCachediSCSIVolumesResponse_httpStatus :: Lens.Lens' DescribeCachediSCSIVolumesResponse Prelude.Int+describeCachediSCSIVolumesResponse_httpStatus = Lens.lens (\DescribeCachediSCSIVolumesResponse' {httpStatus} -> httpStatus) (\s@DescribeCachediSCSIVolumesResponse' {} a -> s {httpStatus = a} :: DescribeCachediSCSIVolumesResponse)++instance+ Prelude.NFData+ DescribeCachediSCSIVolumesResponse+ where+ rnf DescribeCachediSCSIVolumesResponse' {..} =+ Prelude.rnf cachediSCSIVolumes+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/DescribeChapCredentials.hs view
@@ -0,0 +1,237 @@+{-# 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.DescribeChapCredentials+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Returns an array of Challenge-Handshake Authentication Protocol (CHAP)+-- credentials information for a specified iSCSI target, one for each+-- target-initiator pair. This operation is supported in the volume and+-- tape gateway types.+module Amazonka.StorageGateway.DescribeChapCredentials+ ( -- * Creating a Request+ DescribeChapCredentials (..),+ newDescribeChapCredentials,++ -- * Request Lenses+ describeChapCredentials_targetARN,++ -- * Destructuring the Response+ DescribeChapCredentialsResponse (..),+ newDescribeChapCredentialsResponse,++ -- * Response Lenses+ describeChapCredentialsResponse_chapCredentials,+ describeChapCredentialsResponse_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++-- | A JSON object containing the Amazon Resource Name (ARN) of the iSCSI+-- volume target.+--+-- /See:/ 'newDescribeChapCredentials' smart constructor.+data DescribeChapCredentials = DescribeChapCredentials'+ { -- | The Amazon Resource Name (ARN) of the iSCSI volume target. Use the+ -- DescribeStorediSCSIVolumes operation to return to retrieve the TargetARN+ -- for specified VolumeARN.+ targetARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeChapCredentials' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'targetARN', 'describeChapCredentials_targetARN' - The Amazon Resource Name (ARN) of the iSCSI volume target. Use the+-- DescribeStorediSCSIVolumes operation to return to retrieve the TargetARN+-- for specified VolumeARN.+newDescribeChapCredentials ::+ -- | 'targetARN'+ Prelude.Text ->+ DescribeChapCredentials+newDescribeChapCredentials pTargetARN_ =+ DescribeChapCredentials' {targetARN = pTargetARN_}++-- | The Amazon Resource Name (ARN) of the iSCSI volume target. Use the+-- DescribeStorediSCSIVolumes operation to return to retrieve the TargetARN+-- for specified VolumeARN.+describeChapCredentials_targetARN :: Lens.Lens' DescribeChapCredentials Prelude.Text+describeChapCredentials_targetARN = Lens.lens (\DescribeChapCredentials' {targetARN} -> targetARN) (\s@DescribeChapCredentials' {} a -> s {targetARN = a} :: DescribeChapCredentials)++instance Core.AWSRequest DescribeChapCredentials where+ type+ AWSResponse DescribeChapCredentials =+ DescribeChapCredentialsResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ DescribeChapCredentialsResponse'+ Prelude.<$> ( x+ Data..?> "ChapCredentials"+ Core..!@ Prelude.mempty+ )+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable DescribeChapCredentials where+ hashWithSalt _salt DescribeChapCredentials' {..} =+ _salt `Prelude.hashWithSalt` targetARN++instance Prelude.NFData DescribeChapCredentials where+ rnf DescribeChapCredentials' {..} =+ Prelude.rnf targetARN++instance Data.ToHeaders DescribeChapCredentials where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.DescribeChapCredentials" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON DescribeChapCredentials where+ toJSON DescribeChapCredentials' {..} =+ Data.object+ ( Prelude.catMaybes+ [Prelude.Just ("TargetARN" Data..= targetARN)]+ )++instance Data.ToPath DescribeChapCredentials where+ toPath = Prelude.const "/"++instance Data.ToQuery DescribeChapCredentials where+ toQuery = Prelude.const Prelude.mempty++-- | A JSON object containing the following fields:+--+-- /See:/ 'newDescribeChapCredentialsResponse' smart constructor.+data DescribeChapCredentialsResponse = DescribeChapCredentialsResponse'+ { -- | An array of ChapInfo objects that represent CHAP credentials. Each+ -- object in the array contains CHAP credential information for one+ -- target-initiator pair. If no CHAP credentials are set, an empty array is+ -- returned. CHAP credential information is provided in a JSON object with+ -- the following fields:+ --+ -- - __InitiatorName__: The iSCSI initiator that connects to the target.+ --+ -- - __SecretToAuthenticateInitiator__: The secret key that the initiator+ -- (for example, the Windows client) must provide to participate in+ -- mutual CHAP with the target.+ --+ -- - __SecretToAuthenticateTarget__: The secret key that the target must+ -- provide to participate in mutual CHAP with the initiator (e.g.+ -- Windows client).+ --+ -- - __TargetARN__: The Amazon Resource Name (ARN) of the storage volume.+ chapCredentials :: Prelude.Maybe [ChapInfo],+ -- | The response's http status code.+ httpStatus :: Prelude.Int+ }+ deriving (Prelude.Eq, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeChapCredentialsResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'chapCredentials', 'describeChapCredentialsResponse_chapCredentials' - An array of ChapInfo objects that represent CHAP credentials. Each+-- object in the array contains CHAP credential information for one+-- target-initiator pair. If no CHAP credentials are set, an empty array is+-- returned. CHAP credential information is provided in a JSON object with+-- the following fields:+--+-- - __InitiatorName__: The iSCSI initiator that connects to the target.+--+-- - __SecretToAuthenticateInitiator__: The secret key that the initiator+-- (for example, the Windows client) must provide to participate in+-- mutual CHAP with the target.+--+-- - __SecretToAuthenticateTarget__: The secret key that the target must+-- provide to participate in mutual CHAP with the initiator (e.g.+-- Windows client).+--+-- - __TargetARN__: The Amazon Resource Name (ARN) of the storage volume.+--+-- 'httpStatus', 'describeChapCredentialsResponse_httpStatus' - The response's http status code.+newDescribeChapCredentialsResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ DescribeChapCredentialsResponse+newDescribeChapCredentialsResponse pHttpStatus_ =+ DescribeChapCredentialsResponse'+ { chapCredentials =+ Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | An array of ChapInfo objects that represent CHAP credentials. Each+-- object in the array contains CHAP credential information for one+-- target-initiator pair. If no CHAP credentials are set, an empty array is+-- returned. CHAP credential information is provided in a JSON object with+-- the following fields:+--+-- - __InitiatorName__: The iSCSI initiator that connects to the target.+--+-- - __SecretToAuthenticateInitiator__: The secret key that the initiator+-- (for example, the Windows client) must provide to participate in+-- mutual CHAP with the target.+--+-- - __SecretToAuthenticateTarget__: The secret key that the target must+-- provide to participate in mutual CHAP with the initiator (e.g.+-- Windows client).+--+-- - __TargetARN__: The Amazon Resource Name (ARN) of the storage volume.+describeChapCredentialsResponse_chapCredentials :: Lens.Lens' DescribeChapCredentialsResponse (Prelude.Maybe [ChapInfo])+describeChapCredentialsResponse_chapCredentials = Lens.lens (\DescribeChapCredentialsResponse' {chapCredentials} -> chapCredentials) (\s@DescribeChapCredentialsResponse' {} a -> s {chapCredentials = a} :: DescribeChapCredentialsResponse) Prelude.. Lens.mapping Lens.coerced++-- | The response's http status code.+describeChapCredentialsResponse_httpStatus :: Lens.Lens' DescribeChapCredentialsResponse Prelude.Int+describeChapCredentialsResponse_httpStatus = Lens.lens (\DescribeChapCredentialsResponse' {httpStatus} -> httpStatus) (\s@DescribeChapCredentialsResponse' {} a -> s {httpStatus = a} :: DescribeChapCredentialsResponse)++instance+ Prelude.NFData+ DescribeChapCredentialsResponse+ where+ rnf DescribeChapCredentialsResponse' {..} =+ Prelude.rnf chapCredentials+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/DescribeFileSystemAssociations.hs view
@@ -0,0 +1,207 @@+{-# 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.DescribeFileSystemAssociations+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Gets the file system association information. This operation is only+-- supported for FSx File Gateways.+module Amazonka.StorageGateway.DescribeFileSystemAssociations+ ( -- * Creating a Request+ DescribeFileSystemAssociations (..),+ newDescribeFileSystemAssociations,++ -- * Request Lenses+ describeFileSystemAssociations_fileSystemAssociationARNList,++ -- * Destructuring the Response+ DescribeFileSystemAssociationsResponse (..),+ newDescribeFileSystemAssociationsResponse,++ -- * Response Lenses+ describeFileSystemAssociationsResponse_fileSystemAssociationInfoList,+ describeFileSystemAssociationsResponse_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++-- | /See:/ 'newDescribeFileSystemAssociations' smart constructor.+data DescribeFileSystemAssociations = DescribeFileSystemAssociations'+ { -- | An array containing the Amazon Resource Name (ARN) of each file system+ -- association to be described.+ fileSystemAssociationARNList :: Prelude.NonEmpty Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeFileSystemAssociations' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'fileSystemAssociationARNList', 'describeFileSystemAssociations_fileSystemAssociationARNList' - An array containing the Amazon Resource Name (ARN) of each file system+-- association to be described.+newDescribeFileSystemAssociations ::+ -- | 'fileSystemAssociationARNList'+ Prelude.NonEmpty Prelude.Text ->+ DescribeFileSystemAssociations+newDescribeFileSystemAssociations+ pFileSystemAssociationARNList_ =+ DescribeFileSystemAssociations'+ { fileSystemAssociationARNList =+ Lens.coerced+ Lens.# pFileSystemAssociationARNList_+ }++-- | An array containing the Amazon Resource Name (ARN) of each file system+-- association to be described.+describeFileSystemAssociations_fileSystemAssociationARNList :: Lens.Lens' DescribeFileSystemAssociations (Prelude.NonEmpty Prelude.Text)+describeFileSystemAssociations_fileSystemAssociationARNList = Lens.lens (\DescribeFileSystemAssociations' {fileSystemAssociationARNList} -> fileSystemAssociationARNList) (\s@DescribeFileSystemAssociations' {} a -> s {fileSystemAssociationARNList = a} :: DescribeFileSystemAssociations) Prelude.. Lens.coerced++instance+ Core.AWSRequest+ DescribeFileSystemAssociations+ where+ type+ AWSResponse DescribeFileSystemAssociations =+ DescribeFileSystemAssociationsResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ DescribeFileSystemAssociationsResponse'+ Prelude.<$> ( x+ Data..?> "FileSystemAssociationInfoList"+ Core..!@ Prelude.mempty+ )+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance+ Prelude.Hashable+ DescribeFileSystemAssociations+ where+ hashWithSalt+ _salt+ DescribeFileSystemAssociations' {..} =+ _salt+ `Prelude.hashWithSalt` fileSystemAssociationARNList++instance+ Prelude.NFData+ DescribeFileSystemAssociations+ where+ rnf DescribeFileSystemAssociations' {..} =+ Prelude.rnf fileSystemAssociationARNList++instance+ Data.ToHeaders+ DescribeFileSystemAssociations+ where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.DescribeFileSystemAssociations" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON DescribeFileSystemAssociations where+ toJSON DescribeFileSystemAssociations' {..} =+ Data.object+ ( Prelude.catMaybes+ [ Prelude.Just+ ( "FileSystemAssociationARNList"+ Data..= fileSystemAssociationARNList+ )+ ]+ )++instance Data.ToPath DescribeFileSystemAssociations where+ toPath = Prelude.const "/"++instance Data.ToQuery DescribeFileSystemAssociations where+ toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newDescribeFileSystemAssociationsResponse' smart constructor.+data DescribeFileSystemAssociationsResponse = DescribeFileSystemAssociationsResponse'+ { -- | An array containing the @FileSystemAssociationInfo@ data type of each+ -- file system association to be described.+ fileSystemAssociationInfoList :: Prelude.Maybe [FileSystemAssociationInfo],+ -- | The response's http status code.+ httpStatus :: Prelude.Int+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeFileSystemAssociationsResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'fileSystemAssociationInfoList', 'describeFileSystemAssociationsResponse_fileSystemAssociationInfoList' - An array containing the @FileSystemAssociationInfo@ data type of each+-- file system association to be described.+--+-- 'httpStatus', 'describeFileSystemAssociationsResponse_httpStatus' - The response's http status code.+newDescribeFileSystemAssociationsResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ DescribeFileSystemAssociationsResponse+newDescribeFileSystemAssociationsResponse+ pHttpStatus_ =+ DescribeFileSystemAssociationsResponse'+ { fileSystemAssociationInfoList =+ Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | An array containing the @FileSystemAssociationInfo@ data type of each+-- file system association to be described.+describeFileSystemAssociationsResponse_fileSystemAssociationInfoList :: Lens.Lens' DescribeFileSystemAssociationsResponse (Prelude.Maybe [FileSystemAssociationInfo])+describeFileSystemAssociationsResponse_fileSystemAssociationInfoList = Lens.lens (\DescribeFileSystemAssociationsResponse' {fileSystemAssociationInfoList} -> fileSystemAssociationInfoList) (\s@DescribeFileSystemAssociationsResponse' {} a -> s {fileSystemAssociationInfoList = a} :: DescribeFileSystemAssociationsResponse) Prelude.. Lens.mapping Lens.coerced++-- | The response's http status code.+describeFileSystemAssociationsResponse_httpStatus :: Lens.Lens' DescribeFileSystemAssociationsResponse Prelude.Int+describeFileSystemAssociationsResponse_httpStatus = Lens.lens (\DescribeFileSystemAssociationsResponse' {httpStatus} -> httpStatus) (\s@DescribeFileSystemAssociationsResponse' {} a -> s {httpStatus = a} :: DescribeFileSystemAssociationsResponse)++instance+ Prelude.NFData+ DescribeFileSystemAssociationsResponse+ where+ rnf DescribeFileSystemAssociationsResponse' {..} =+ Prelude.rnf fileSystemAssociationInfoList+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/DescribeGatewayInformation.hs view
@@ -0,0 +1,504 @@+{-# 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.DescribeGatewayInformation+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Returns metadata about a gateway such as its name, network interfaces,+-- configured time zone, and the state (whether the gateway is running or+-- not). To specify which gateway to describe, use the Amazon Resource Name+-- (ARN) of the gateway in your request.+module Amazonka.StorageGateway.DescribeGatewayInformation+ ( -- * Creating a Request+ DescribeGatewayInformation (..),+ newDescribeGatewayInformation,++ -- * Request Lenses+ describeGatewayInformation_gatewayARN,++ -- * Destructuring the Response+ DescribeGatewayInformationResponse (..),+ newDescribeGatewayInformationResponse,++ -- * Response Lenses+ describeGatewayInformationResponse_cloudWatchLogGroupARN,+ describeGatewayInformationResponse_deprecationDate,+ describeGatewayInformationResponse_ec2InstanceId,+ describeGatewayInformationResponse_ec2InstanceRegion,+ describeGatewayInformationResponse_endpointType,+ describeGatewayInformationResponse_gatewayARN,+ describeGatewayInformationResponse_gatewayCapacity,+ describeGatewayInformationResponse_gatewayId,+ describeGatewayInformationResponse_gatewayName,+ describeGatewayInformationResponse_gatewayNetworkInterfaces,+ describeGatewayInformationResponse_gatewayState,+ describeGatewayInformationResponse_gatewayTimezone,+ describeGatewayInformationResponse_gatewayType,+ describeGatewayInformationResponse_hostEnvironment,+ describeGatewayInformationResponse_hostEnvironmentId,+ describeGatewayInformationResponse_lastSoftwareUpdate,+ describeGatewayInformationResponse_nextUpdateAvailabilityDate,+ describeGatewayInformationResponse_softwareUpdatesEndDate,+ describeGatewayInformationResponse_supportedGatewayCapacities,+ describeGatewayInformationResponse_tags,+ describeGatewayInformationResponse_vPCEndpoint,+ describeGatewayInformationResponse_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++-- | A JSON object containing the ID of the gateway.+--+-- /See:/ 'newDescribeGatewayInformation' smart constructor.+data DescribeGatewayInformation = DescribeGatewayInformation'+ { gatewayARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeGatewayInformation' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'describeGatewayInformation_gatewayARN' - Undocumented member.+newDescribeGatewayInformation ::+ -- | 'gatewayARN'+ Prelude.Text ->+ DescribeGatewayInformation+newDescribeGatewayInformation pGatewayARN_ =+ DescribeGatewayInformation'+ { gatewayARN =+ pGatewayARN_+ }++-- | Undocumented member.+describeGatewayInformation_gatewayARN :: Lens.Lens' DescribeGatewayInformation Prelude.Text+describeGatewayInformation_gatewayARN = Lens.lens (\DescribeGatewayInformation' {gatewayARN} -> gatewayARN) (\s@DescribeGatewayInformation' {} a -> s {gatewayARN = a} :: DescribeGatewayInformation)++instance Core.AWSRequest DescribeGatewayInformation where+ type+ AWSResponse DescribeGatewayInformation =+ DescribeGatewayInformationResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ DescribeGatewayInformationResponse'+ Prelude.<$> (x Data..?> "CloudWatchLogGroupARN")+ Prelude.<*> (x Data..?> "DeprecationDate")+ Prelude.<*> (x Data..?> "Ec2InstanceId")+ Prelude.<*> (x Data..?> "Ec2InstanceRegion")+ Prelude.<*> (x Data..?> "EndpointType")+ Prelude.<*> (x Data..?> "GatewayARN")+ Prelude.<*> (x Data..?> "GatewayCapacity")+ Prelude.<*> (x Data..?> "GatewayId")+ Prelude.<*> (x Data..?> "GatewayName")+ Prelude.<*> ( x+ Data..?> "GatewayNetworkInterfaces"+ Core..!@ Prelude.mempty+ )+ Prelude.<*> (x Data..?> "GatewayState")+ Prelude.<*> (x Data..?> "GatewayTimezone")+ Prelude.<*> (x Data..?> "GatewayType")+ Prelude.<*> (x Data..?> "HostEnvironment")+ Prelude.<*> (x Data..?> "HostEnvironmentId")+ Prelude.<*> (x Data..?> "LastSoftwareUpdate")+ Prelude.<*> (x Data..?> "NextUpdateAvailabilityDate")+ Prelude.<*> (x Data..?> "SoftwareUpdatesEndDate")+ Prelude.<*> ( x+ Data..?> "SupportedGatewayCapacities"+ Core..!@ Prelude.mempty+ )+ Prelude.<*> (x Data..?> "Tags" Core..!@ Prelude.mempty)+ Prelude.<*> (x Data..?> "VPCEndpoint")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable DescribeGatewayInformation where+ hashWithSalt _salt DescribeGatewayInformation' {..} =+ _salt `Prelude.hashWithSalt` gatewayARN++instance Prelude.NFData DescribeGatewayInformation where+ rnf DescribeGatewayInformation' {..} =+ Prelude.rnf gatewayARN++instance Data.ToHeaders DescribeGatewayInformation where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.DescribeGatewayInformation" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON DescribeGatewayInformation where+ toJSON DescribeGatewayInformation' {..} =+ Data.object+ ( Prelude.catMaybes+ [Prelude.Just ("GatewayARN" Data..= gatewayARN)]+ )++instance Data.ToPath DescribeGatewayInformation where+ toPath = Prelude.const "/"++instance Data.ToQuery DescribeGatewayInformation where+ toQuery = Prelude.const Prelude.mempty++-- | A JSON object containing the following fields:+--+-- /See:/ 'newDescribeGatewayInformationResponse' smart constructor.+data DescribeGatewayInformationResponse = DescribeGatewayInformationResponse'+ { -- | The Amazon Resource Name (ARN) of the Amazon CloudWatch log group that+ -- is used to monitor events in the gateway. This field only only exist and+ -- returns once it have been chosen and set by the SGW service, based on+ -- the OS version of the gateway VM+ cloudWatchLogGroupARN :: Prelude.Maybe Prelude.Text,+ -- | Date after which this gateway will not receive software updates for new+ -- features and bug fixes.+ deprecationDate :: Prelude.Maybe Prelude.Text,+ -- | The ID of the Amazon EC2 instance that was used to launch the gateway.+ ec2InstanceId :: Prelude.Maybe Prelude.Text,+ -- | The Amazon Web Services Region where the Amazon EC2 instance is located.+ ec2InstanceRegion :: Prelude.Maybe Prelude.Text,+ -- | The type of endpoint for your gateway.+ --+ -- Valid Values: @STANDARD@ | @FIPS@+ endpointType :: Prelude.Maybe Prelude.Text,+ gatewayARN :: Prelude.Maybe Prelude.Text,+ -- | Specifies the size of the gateway\'s metadata cache.+ gatewayCapacity :: Prelude.Maybe GatewayCapacity,+ -- | The unique identifier assigned to your gateway during activation. This+ -- ID becomes part of the gateway Amazon Resource Name (ARN), which you use+ -- as input for other operations.+ gatewayId :: Prelude.Maybe Prelude.Text,+ -- | The name you configured for your gateway.+ gatewayName :: Prelude.Maybe Prelude.Text,+ -- | A NetworkInterface array that contains descriptions of the gateway+ -- network interfaces.+ gatewayNetworkInterfaces :: Prelude.Maybe [NetworkInterface],+ -- | A value that indicates the operating state of the gateway.+ gatewayState :: Prelude.Maybe Prelude.Text,+ -- | A value that indicates the time zone configured for the gateway.+ gatewayTimezone :: Prelude.Maybe Prelude.Text,+ -- | The type of the gateway.+ gatewayType :: Prelude.Maybe Prelude.Text,+ -- | The type of hardware or software platform on which the gateway is+ -- running.+ hostEnvironment :: Prelude.Maybe HostEnvironment,+ -- | A unique identifier for the specific instance of the host platform+ -- running the gateway. This value is only available for certain host+ -- environments, and its format depends on the host environment type.+ hostEnvironmentId :: Prelude.Maybe Prelude.Text,+ -- | The date on which the last software update was applied to the gateway.+ -- If the gateway has never been updated, this field does not return a+ -- value in the response. This only only exist and returns once it have+ -- been chosen and set by the SGW service, based on the OS version of the+ -- gateway VM+ lastSoftwareUpdate :: Prelude.Maybe Prelude.Text,+ -- | The date on which an update to the gateway is available. This date is in+ -- the time zone of the gateway. If the gateway is not available for an+ -- update this field is not returned in the response.+ nextUpdateAvailabilityDate :: Prelude.Maybe Prelude.Text,+ -- | Date after which this gateway will not receive software updates for new+ -- features.+ softwareUpdatesEndDate :: Prelude.Maybe Prelude.Text,+ -- | A list of the metadata cache sizes that the gateway can support based on+ -- its current hardware specifications.+ supportedGatewayCapacities :: Prelude.Maybe [GatewayCapacity],+ -- | A list of up to 50 tags assigned to the gateway, sorted alphabetically+ -- by key name. Each tag is a key-value pair. For a gateway with more than+ -- 10 tags assigned, you can view all tags using the @ListTagsForResource@+ -- API operation.+ tags :: Prelude.Maybe [Tag],+ -- | The configuration settings for the virtual private cloud (VPC) endpoint+ -- for your gateway.+ vPCEndpoint :: 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 'DescribeGatewayInformationResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'cloudWatchLogGroupARN', 'describeGatewayInformationResponse_cloudWatchLogGroupARN' - The Amazon Resource Name (ARN) of the Amazon CloudWatch log group that+-- is used to monitor events in the gateway. This field only only exist and+-- returns once it have been chosen and set by the SGW service, based on+-- the OS version of the gateway VM+--+-- 'deprecationDate', 'describeGatewayInformationResponse_deprecationDate' - Date after which this gateway will not receive software updates for new+-- features and bug fixes.+--+-- 'ec2InstanceId', 'describeGatewayInformationResponse_ec2InstanceId' - The ID of the Amazon EC2 instance that was used to launch the gateway.+--+-- 'ec2InstanceRegion', 'describeGatewayInformationResponse_ec2InstanceRegion' - The Amazon Web Services Region where the Amazon EC2 instance is located.+--+-- 'endpointType', 'describeGatewayInformationResponse_endpointType' - The type of endpoint for your gateway.+--+-- Valid Values: @STANDARD@ | @FIPS@+--+-- 'gatewayARN', 'describeGatewayInformationResponse_gatewayARN' - Undocumented member.+--+-- 'gatewayCapacity', 'describeGatewayInformationResponse_gatewayCapacity' - Specifies the size of the gateway\'s metadata cache.+--+-- 'gatewayId', 'describeGatewayInformationResponse_gatewayId' - The unique identifier assigned to your gateway during activation. This+-- ID becomes part of the gateway Amazon Resource Name (ARN), which you use+-- as input for other operations.+--+-- 'gatewayName', 'describeGatewayInformationResponse_gatewayName' - The name you configured for your gateway.+--+-- 'gatewayNetworkInterfaces', 'describeGatewayInformationResponse_gatewayNetworkInterfaces' - A NetworkInterface array that contains descriptions of the gateway+-- network interfaces.+--+-- 'gatewayState', 'describeGatewayInformationResponse_gatewayState' - A value that indicates the operating state of the gateway.+--+-- 'gatewayTimezone', 'describeGatewayInformationResponse_gatewayTimezone' - A value that indicates the time zone configured for the gateway.+--+-- 'gatewayType', 'describeGatewayInformationResponse_gatewayType' - The type of the gateway.+--+-- 'hostEnvironment', 'describeGatewayInformationResponse_hostEnvironment' - The type of hardware or software platform on which the gateway is+-- running.+--+-- 'hostEnvironmentId', 'describeGatewayInformationResponse_hostEnvironmentId' - A unique identifier for the specific instance of the host platform+-- running the gateway. This value is only available for certain host+-- environments, and its format depends on the host environment type.+--+-- 'lastSoftwareUpdate', 'describeGatewayInformationResponse_lastSoftwareUpdate' - The date on which the last software update was applied to the gateway.+-- If the gateway has never been updated, this field does not return a+-- value in the response. This only only exist and returns once it have+-- been chosen and set by the SGW service, based on the OS version of the+-- gateway VM+--+-- 'nextUpdateAvailabilityDate', 'describeGatewayInformationResponse_nextUpdateAvailabilityDate' - The date on which an update to the gateway is available. This date is in+-- the time zone of the gateway. If the gateway is not available for an+-- update this field is not returned in the response.+--+-- 'softwareUpdatesEndDate', 'describeGatewayInformationResponse_softwareUpdatesEndDate' - Date after which this gateway will not receive software updates for new+-- features.+--+-- 'supportedGatewayCapacities', 'describeGatewayInformationResponse_supportedGatewayCapacities' - A list of the metadata cache sizes that the gateway can support based on+-- its current hardware specifications.+--+-- 'tags', 'describeGatewayInformationResponse_tags' - A list of up to 50 tags assigned to the gateway, sorted alphabetically+-- by key name. Each tag is a key-value pair. For a gateway with more than+-- 10 tags assigned, you can view all tags using the @ListTagsForResource@+-- API operation.+--+-- 'vPCEndpoint', 'describeGatewayInformationResponse_vPCEndpoint' - The configuration settings for the virtual private cloud (VPC) endpoint+-- for your gateway.+--+-- 'httpStatus', 'describeGatewayInformationResponse_httpStatus' - The response's http status code.+newDescribeGatewayInformationResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ DescribeGatewayInformationResponse+newDescribeGatewayInformationResponse pHttpStatus_ =+ DescribeGatewayInformationResponse'+ { cloudWatchLogGroupARN =+ Prelude.Nothing,+ deprecationDate = Prelude.Nothing,+ ec2InstanceId = Prelude.Nothing,+ ec2InstanceRegion = Prelude.Nothing,+ endpointType = Prelude.Nothing,+ gatewayARN = Prelude.Nothing,+ gatewayCapacity = Prelude.Nothing,+ gatewayId = Prelude.Nothing,+ gatewayName = Prelude.Nothing,+ gatewayNetworkInterfaces =+ Prelude.Nothing,+ gatewayState = Prelude.Nothing,+ gatewayTimezone = Prelude.Nothing,+ gatewayType = Prelude.Nothing,+ hostEnvironment = Prelude.Nothing,+ hostEnvironmentId = Prelude.Nothing,+ lastSoftwareUpdate = Prelude.Nothing,+ nextUpdateAvailabilityDate =+ Prelude.Nothing,+ softwareUpdatesEndDate =+ Prelude.Nothing,+ supportedGatewayCapacities =+ Prelude.Nothing,+ tags = Prelude.Nothing,+ vPCEndpoint = Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | The Amazon Resource Name (ARN) of the Amazon CloudWatch log group that+-- is used to monitor events in the gateway. This field only only exist and+-- returns once it have been chosen and set by the SGW service, based on+-- the OS version of the gateway VM+describeGatewayInformationResponse_cloudWatchLogGroupARN :: Lens.Lens' DescribeGatewayInformationResponse (Prelude.Maybe Prelude.Text)+describeGatewayInformationResponse_cloudWatchLogGroupARN = Lens.lens (\DescribeGatewayInformationResponse' {cloudWatchLogGroupARN} -> cloudWatchLogGroupARN) (\s@DescribeGatewayInformationResponse' {} a -> s {cloudWatchLogGroupARN = a} :: DescribeGatewayInformationResponse)++-- | Date after which this gateway will not receive software updates for new+-- features and bug fixes.+describeGatewayInformationResponse_deprecationDate :: Lens.Lens' DescribeGatewayInformationResponse (Prelude.Maybe Prelude.Text)+describeGatewayInformationResponse_deprecationDate = Lens.lens (\DescribeGatewayInformationResponse' {deprecationDate} -> deprecationDate) (\s@DescribeGatewayInformationResponse' {} a -> s {deprecationDate = a} :: DescribeGatewayInformationResponse)++-- | The ID of the Amazon EC2 instance that was used to launch the gateway.+describeGatewayInformationResponse_ec2InstanceId :: Lens.Lens' DescribeGatewayInformationResponse (Prelude.Maybe Prelude.Text)+describeGatewayInformationResponse_ec2InstanceId = Lens.lens (\DescribeGatewayInformationResponse' {ec2InstanceId} -> ec2InstanceId) (\s@DescribeGatewayInformationResponse' {} a -> s {ec2InstanceId = a} :: DescribeGatewayInformationResponse)++-- | The Amazon Web Services Region where the Amazon EC2 instance is located.+describeGatewayInformationResponse_ec2InstanceRegion :: Lens.Lens' DescribeGatewayInformationResponse (Prelude.Maybe Prelude.Text)+describeGatewayInformationResponse_ec2InstanceRegion = Lens.lens (\DescribeGatewayInformationResponse' {ec2InstanceRegion} -> ec2InstanceRegion) (\s@DescribeGatewayInformationResponse' {} a -> s {ec2InstanceRegion = a} :: DescribeGatewayInformationResponse)++-- | The type of endpoint for your gateway.+--+-- Valid Values: @STANDARD@ | @FIPS@+describeGatewayInformationResponse_endpointType :: Lens.Lens' DescribeGatewayInformationResponse (Prelude.Maybe Prelude.Text)+describeGatewayInformationResponse_endpointType = Lens.lens (\DescribeGatewayInformationResponse' {endpointType} -> endpointType) (\s@DescribeGatewayInformationResponse' {} a -> s {endpointType = a} :: DescribeGatewayInformationResponse)++-- | Undocumented member.+describeGatewayInformationResponse_gatewayARN :: Lens.Lens' DescribeGatewayInformationResponse (Prelude.Maybe Prelude.Text)+describeGatewayInformationResponse_gatewayARN = Lens.lens (\DescribeGatewayInformationResponse' {gatewayARN} -> gatewayARN) (\s@DescribeGatewayInformationResponse' {} a -> s {gatewayARN = a} :: DescribeGatewayInformationResponse)++-- | Specifies the size of the gateway\'s metadata cache.+describeGatewayInformationResponse_gatewayCapacity :: Lens.Lens' DescribeGatewayInformationResponse (Prelude.Maybe GatewayCapacity)+describeGatewayInformationResponse_gatewayCapacity = Lens.lens (\DescribeGatewayInformationResponse' {gatewayCapacity} -> gatewayCapacity) (\s@DescribeGatewayInformationResponse' {} a -> s {gatewayCapacity = a} :: DescribeGatewayInformationResponse)++-- | The unique identifier assigned to your gateway during activation. This+-- ID becomes part of the gateway Amazon Resource Name (ARN), which you use+-- as input for other operations.+describeGatewayInformationResponse_gatewayId :: Lens.Lens' DescribeGatewayInformationResponse (Prelude.Maybe Prelude.Text)+describeGatewayInformationResponse_gatewayId = Lens.lens (\DescribeGatewayInformationResponse' {gatewayId} -> gatewayId) (\s@DescribeGatewayInformationResponse' {} a -> s {gatewayId = a} :: DescribeGatewayInformationResponse)++-- | The name you configured for your gateway.+describeGatewayInformationResponse_gatewayName :: Lens.Lens' DescribeGatewayInformationResponse (Prelude.Maybe Prelude.Text)+describeGatewayInformationResponse_gatewayName = Lens.lens (\DescribeGatewayInformationResponse' {gatewayName} -> gatewayName) (\s@DescribeGatewayInformationResponse' {} a -> s {gatewayName = a} :: DescribeGatewayInformationResponse)++-- | A NetworkInterface array that contains descriptions of the gateway+-- network interfaces.+describeGatewayInformationResponse_gatewayNetworkInterfaces :: Lens.Lens' DescribeGatewayInformationResponse (Prelude.Maybe [NetworkInterface])+describeGatewayInformationResponse_gatewayNetworkInterfaces = Lens.lens (\DescribeGatewayInformationResponse' {gatewayNetworkInterfaces} -> gatewayNetworkInterfaces) (\s@DescribeGatewayInformationResponse' {} a -> s {gatewayNetworkInterfaces = a} :: DescribeGatewayInformationResponse) Prelude.. Lens.mapping Lens.coerced++-- | A value that indicates the operating state of the gateway.+describeGatewayInformationResponse_gatewayState :: Lens.Lens' DescribeGatewayInformationResponse (Prelude.Maybe Prelude.Text)+describeGatewayInformationResponse_gatewayState = Lens.lens (\DescribeGatewayInformationResponse' {gatewayState} -> gatewayState) (\s@DescribeGatewayInformationResponse' {} a -> s {gatewayState = a} :: DescribeGatewayInformationResponse)++-- | A value that indicates the time zone configured for the gateway.+describeGatewayInformationResponse_gatewayTimezone :: Lens.Lens' DescribeGatewayInformationResponse (Prelude.Maybe Prelude.Text)+describeGatewayInformationResponse_gatewayTimezone = Lens.lens (\DescribeGatewayInformationResponse' {gatewayTimezone} -> gatewayTimezone) (\s@DescribeGatewayInformationResponse' {} a -> s {gatewayTimezone = a} :: DescribeGatewayInformationResponse)++-- | The type of the gateway.+describeGatewayInformationResponse_gatewayType :: Lens.Lens' DescribeGatewayInformationResponse (Prelude.Maybe Prelude.Text)+describeGatewayInformationResponse_gatewayType = Lens.lens (\DescribeGatewayInformationResponse' {gatewayType} -> gatewayType) (\s@DescribeGatewayInformationResponse' {} a -> s {gatewayType = a} :: DescribeGatewayInformationResponse)++-- | The type of hardware or software platform on which the gateway is+-- running.+describeGatewayInformationResponse_hostEnvironment :: Lens.Lens' DescribeGatewayInformationResponse (Prelude.Maybe HostEnvironment)+describeGatewayInformationResponse_hostEnvironment = Lens.lens (\DescribeGatewayInformationResponse' {hostEnvironment} -> hostEnvironment) (\s@DescribeGatewayInformationResponse' {} a -> s {hostEnvironment = a} :: DescribeGatewayInformationResponse)++-- | A unique identifier for the specific instance of the host platform+-- running the gateway. This value is only available for certain host+-- environments, and its format depends on the host environment type.+describeGatewayInformationResponse_hostEnvironmentId :: Lens.Lens' DescribeGatewayInformationResponse (Prelude.Maybe Prelude.Text)+describeGatewayInformationResponse_hostEnvironmentId = Lens.lens (\DescribeGatewayInformationResponse' {hostEnvironmentId} -> hostEnvironmentId) (\s@DescribeGatewayInformationResponse' {} a -> s {hostEnvironmentId = a} :: DescribeGatewayInformationResponse)++-- | The date on which the last software update was applied to the gateway.+-- If the gateway has never been updated, this field does not return a+-- value in the response. This only only exist and returns once it have+-- been chosen and set by the SGW service, based on the OS version of the+-- gateway VM+describeGatewayInformationResponse_lastSoftwareUpdate :: Lens.Lens' DescribeGatewayInformationResponse (Prelude.Maybe Prelude.Text)+describeGatewayInformationResponse_lastSoftwareUpdate = Lens.lens (\DescribeGatewayInformationResponse' {lastSoftwareUpdate} -> lastSoftwareUpdate) (\s@DescribeGatewayInformationResponse' {} a -> s {lastSoftwareUpdate = a} :: DescribeGatewayInformationResponse)++-- | The date on which an update to the gateway is available. This date is in+-- the time zone of the gateway. If the gateway is not available for an+-- update this field is not returned in the response.+describeGatewayInformationResponse_nextUpdateAvailabilityDate :: Lens.Lens' DescribeGatewayInformationResponse (Prelude.Maybe Prelude.Text)+describeGatewayInformationResponse_nextUpdateAvailabilityDate = Lens.lens (\DescribeGatewayInformationResponse' {nextUpdateAvailabilityDate} -> nextUpdateAvailabilityDate) (\s@DescribeGatewayInformationResponse' {} a -> s {nextUpdateAvailabilityDate = a} :: DescribeGatewayInformationResponse)++-- | Date after which this gateway will not receive software updates for new+-- features.+describeGatewayInformationResponse_softwareUpdatesEndDate :: Lens.Lens' DescribeGatewayInformationResponse (Prelude.Maybe Prelude.Text)+describeGatewayInformationResponse_softwareUpdatesEndDate = Lens.lens (\DescribeGatewayInformationResponse' {softwareUpdatesEndDate} -> softwareUpdatesEndDate) (\s@DescribeGatewayInformationResponse' {} a -> s {softwareUpdatesEndDate = a} :: DescribeGatewayInformationResponse)++-- | A list of the metadata cache sizes that the gateway can support based on+-- its current hardware specifications.+describeGatewayInformationResponse_supportedGatewayCapacities :: Lens.Lens' DescribeGatewayInformationResponse (Prelude.Maybe [GatewayCapacity])+describeGatewayInformationResponse_supportedGatewayCapacities = Lens.lens (\DescribeGatewayInformationResponse' {supportedGatewayCapacities} -> supportedGatewayCapacities) (\s@DescribeGatewayInformationResponse' {} a -> s {supportedGatewayCapacities = a} :: DescribeGatewayInformationResponse) Prelude.. Lens.mapping Lens.coerced++-- | A list of up to 50 tags assigned to the gateway, sorted alphabetically+-- by key name. Each tag is a key-value pair. For a gateway with more than+-- 10 tags assigned, you can view all tags using the @ListTagsForResource@+-- API operation.+describeGatewayInformationResponse_tags :: Lens.Lens' DescribeGatewayInformationResponse (Prelude.Maybe [Tag])+describeGatewayInformationResponse_tags = Lens.lens (\DescribeGatewayInformationResponse' {tags} -> tags) (\s@DescribeGatewayInformationResponse' {} a -> s {tags = a} :: DescribeGatewayInformationResponse) Prelude.. Lens.mapping Lens.coerced++-- | The configuration settings for the virtual private cloud (VPC) endpoint+-- for your gateway.+describeGatewayInformationResponse_vPCEndpoint :: Lens.Lens' DescribeGatewayInformationResponse (Prelude.Maybe Prelude.Text)+describeGatewayInformationResponse_vPCEndpoint = Lens.lens (\DescribeGatewayInformationResponse' {vPCEndpoint} -> vPCEndpoint) (\s@DescribeGatewayInformationResponse' {} a -> s {vPCEndpoint = a} :: DescribeGatewayInformationResponse)++-- | The response's http status code.+describeGatewayInformationResponse_httpStatus :: Lens.Lens' DescribeGatewayInformationResponse Prelude.Int+describeGatewayInformationResponse_httpStatus = Lens.lens (\DescribeGatewayInformationResponse' {httpStatus} -> httpStatus) (\s@DescribeGatewayInformationResponse' {} a -> s {httpStatus = a} :: DescribeGatewayInformationResponse)++instance+ Prelude.NFData+ DescribeGatewayInformationResponse+ where+ rnf DescribeGatewayInformationResponse' {..} =+ Prelude.rnf cloudWatchLogGroupARN+ `Prelude.seq` Prelude.rnf deprecationDate+ `Prelude.seq` Prelude.rnf ec2InstanceId+ `Prelude.seq` Prelude.rnf ec2InstanceRegion+ `Prelude.seq` Prelude.rnf endpointType+ `Prelude.seq` Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf gatewayCapacity+ `Prelude.seq` Prelude.rnf gatewayId+ `Prelude.seq` Prelude.rnf gatewayName+ `Prelude.seq` Prelude.rnf gatewayNetworkInterfaces+ `Prelude.seq` Prelude.rnf gatewayState+ `Prelude.seq` Prelude.rnf gatewayTimezone+ `Prelude.seq` Prelude.rnf gatewayType+ `Prelude.seq` Prelude.rnf hostEnvironment+ `Prelude.seq` Prelude.rnf hostEnvironmentId+ `Prelude.seq` Prelude.rnf lastSoftwareUpdate+ `Prelude.seq` Prelude.rnf+ nextUpdateAvailabilityDate+ `Prelude.seq` Prelude.rnf softwareUpdatesEndDate+ `Prelude.seq` Prelude.rnf+ supportedGatewayCapacities+ `Prelude.seq` Prelude.rnf tags+ `Prelude.seq` Prelude.rnf vPCEndpoint+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/DescribeMaintenanceStartTime.hs view
@@ -0,0 +1,282 @@+{-# 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.DescribeMaintenanceStartTime+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Returns your gateway\'s weekly maintenance start time including the day+-- and time of the week. Note that values are in terms of the gateway\'s+-- time zone.+module Amazonka.StorageGateway.DescribeMaintenanceStartTime+ ( -- * Creating a Request+ DescribeMaintenanceStartTime (..),+ newDescribeMaintenanceStartTime,++ -- * Request Lenses+ describeMaintenanceStartTime_gatewayARN,++ -- * Destructuring the Response+ DescribeMaintenanceStartTimeResponse (..),+ newDescribeMaintenanceStartTimeResponse,++ -- * Response Lenses+ describeMaintenanceStartTimeResponse_dayOfMonth,+ describeMaintenanceStartTimeResponse_dayOfWeek,+ describeMaintenanceStartTimeResponse_gatewayARN,+ describeMaintenanceStartTimeResponse_hourOfDay,+ describeMaintenanceStartTimeResponse_minuteOfHour,+ describeMaintenanceStartTimeResponse_timezone,+ describeMaintenanceStartTimeResponse_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++-- | A JSON object containing the Amazon Resource Name (ARN) of the gateway.+--+-- /See:/ 'newDescribeMaintenanceStartTime' smart constructor.+data DescribeMaintenanceStartTime = DescribeMaintenanceStartTime'+ { gatewayARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeMaintenanceStartTime' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'describeMaintenanceStartTime_gatewayARN' - Undocumented member.+newDescribeMaintenanceStartTime ::+ -- | 'gatewayARN'+ Prelude.Text ->+ DescribeMaintenanceStartTime+newDescribeMaintenanceStartTime pGatewayARN_ =+ DescribeMaintenanceStartTime'+ { gatewayARN =+ pGatewayARN_+ }++-- | Undocumented member.+describeMaintenanceStartTime_gatewayARN :: Lens.Lens' DescribeMaintenanceStartTime Prelude.Text+describeMaintenanceStartTime_gatewayARN = Lens.lens (\DescribeMaintenanceStartTime' {gatewayARN} -> gatewayARN) (\s@DescribeMaintenanceStartTime' {} a -> s {gatewayARN = a} :: DescribeMaintenanceStartTime)++instance Core.AWSRequest DescribeMaintenanceStartTime where+ type+ AWSResponse DescribeMaintenanceStartTime =+ DescribeMaintenanceStartTimeResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ DescribeMaintenanceStartTimeResponse'+ Prelude.<$> (x Data..?> "DayOfMonth")+ Prelude.<*> (x Data..?> "DayOfWeek")+ Prelude.<*> (x Data..?> "GatewayARN")+ Prelude.<*> (x Data..?> "HourOfDay")+ Prelude.<*> (x Data..?> "MinuteOfHour")+ Prelude.<*> (x Data..?> "Timezone")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance+ Prelude.Hashable+ DescribeMaintenanceStartTime+ where+ hashWithSalt _salt DescribeMaintenanceStartTime' {..} =+ _salt `Prelude.hashWithSalt` gatewayARN++instance Prelude.NFData DescribeMaintenanceStartTime where+ rnf DescribeMaintenanceStartTime' {..} =+ Prelude.rnf gatewayARN++instance Data.ToHeaders DescribeMaintenanceStartTime where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.DescribeMaintenanceStartTime" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON DescribeMaintenanceStartTime where+ toJSON DescribeMaintenanceStartTime' {..} =+ Data.object+ ( Prelude.catMaybes+ [Prelude.Just ("GatewayARN" Data..= gatewayARN)]+ )++instance Data.ToPath DescribeMaintenanceStartTime where+ toPath = Prelude.const "/"++instance Data.ToQuery DescribeMaintenanceStartTime where+ toQuery = Prelude.const Prelude.mempty++-- | A JSON object containing the following fields:+--+-- - DescribeMaintenanceStartTimeOutput$DayOfMonth+--+-- - DescribeMaintenanceStartTimeOutput$DayOfWeek+--+-- - DescribeMaintenanceStartTimeOutput$HourOfDay+--+-- - DescribeMaintenanceStartTimeOutput$MinuteOfHour+--+-- - DescribeMaintenanceStartTimeOutput$Timezone+--+-- /See:/ 'newDescribeMaintenanceStartTimeResponse' smart constructor.+data DescribeMaintenanceStartTimeResponse = DescribeMaintenanceStartTimeResponse'+ { -- | The day of the month component of the maintenance start time represented+ -- as an ordinal number from 1 to 28, where 1 represents the first day of+ -- the month and 28 represents the last day of the month.+ dayOfMonth :: Prelude.Maybe Prelude.Natural,+ -- | An ordinal number between 0 and 6 that represents the day of the week,+ -- where 0 represents Sunday and 6 represents Saturday. The day of week is+ -- in the time zone of the gateway.+ dayOfWeek :: Prelude.Maybe Prelude.Natural,+ gatewayARN :: Prelude.Maybe Prelude.Text,+ -- | The hour component of the maintenance start time represented as /hh/,+ -- where /hh/ is the hour (0 to 23). The hour of the day is in the time+ -- zone of the gateway.+ hourOfDay :: Prelude.Maybe Prelude.Natural,+ -- | The minute component of the maintenance start time represented as /mm/,+ -- where /mm/ is the minute (0 to 59). The minute of the hour is in the+ -- time zone of the gateway.+ minuteOfHour :: Prelude.Maybe Prelude.Natural,+ -- | A value that indicates the time zone that is set for the gateway. The+ -- start time and day of week specified should be in the time zone of the+ -- gateway.+ timezone :: 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 'DescribeMaintenanceStartTimeResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'dayOfMonth', 'describeMaintenanceStartTimeResponse_dayOfMonth' - The day of the month component of the maintenance start time represented+-- as an ordinal number from 1 to 28, where 1 represents the first day of+-- the month and 28 represents the last day of the month.+--+-- 'dayOfWeek', 'describeMaintenanceStartTimeResponse_dayOfWeek' - An ordinal number between 0 and 6 that represents the day of the week,+-- where 0 represents Sunday and 6 represents Saturday. The day of week is+-- in the time zone of the gateway.+--+-- 'gatewayARN', 'describeMaintenanceStartTimeResponse_gatewayARN' - Undocumented member.+--+-- 'hourOfDay', 'describeMaintenanceStartTimeResponse_hourOfDay' - The hour component of the maintenance start time represented as /hh/,+-- where /hh/ is the hour (0 to 23). The hour of the day is in the time+-- zone of the gateway.+--+-- 'minuteOfHour', 'describeMaintenanceStartTimeResponse_minuteOfHour' - The minute component of the maintenance start time represented as /mm/,+-- where /mm/ is the minute (0 to 59). The minute of the hour is in the+-- time zone of the gateway.+--+-- 'timezone', 'describeMaintenanceStartTimeResponse_timezone' - A value that indicates the time zone that is set for the gateway. The+-- start time and day of week specified should be in the time zone of the+-- gateway.+--+-- 'httpStatus', 'describeMaintenanceStartTimeResponse_httpStatus' - The response's http status code.+newDescribeMaintenanceStartTimeResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ DescribeMaintenanceStartTimeResponse+newDescribeMaintenanceStartTimeResponse pHttpStatus_ =+ DescribeMaintenanceStartTimeResponse'+ { dayOfMonth =+ Prelude.Nothing,+ dayOfWeek = Prelude.Nothing,+ gatewayARN = Prelude.Nothing,+ hourOfDay = Prelude.Nothing,+ minuteOfHour = Prelude.Nothing,+ timezone = Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | The day of the month component of the maintenance start time represented+-- as an ordinal number from 1 to 28, where 1 represents the first day of+-- the month and 28 represents the last day of the month.+describeMaintenanceStartTimeResponse_dayOfMonth :: Lens.Lens' DescribeMaintenanceStartTimeResponse (Prelude.Maybe Prelude.Natural)+describeMaintenanceStartTimeResponse_dayOfMonth = Lens.lens (\DescribeMaintenanceStartTimeResponse' {dayOfMonth} -> dayOfMonth) (\s@DescribeMaintenanceStartTimeResponse' {} a -> s {dayOfMonth = a} :: DescribeMaintenanceStartTimeResponse)++-- | An ordinal number between 0 and 6 that represents the day of the week,+-- where 0 represents Sunday and 6 represents Saturday. The day of week is+-- in the time zone of the gateway.+describeMaintenanceStartTimeResponse_dayOfWeek :: Lens.Lens' DescribeMaintenanceStartTimeResponse (Prelude.Maybe Prelude.Natural)+describeMaintenanceStartTimeResponse_dayOfWeek = Lens.lens (\DescribeMaintenanceStartTimeResponse' {dayOfWeek} -> dayOfWeek) (\s@DescribeMaintenanceStartTimeResponse' {} a -> s {dayOfWeek = a} :: DescribeMaintenanceStartTimeResponse)++-- | Undocumented member.+describeMaintenanceStartTimeResponse_gatewayARN :: Lens.Lens' DescribeMaintenanceStartTimeResponse (Prelude.Maybe Prelude.Text)+describeMaintenanceStartTimeResponse_gatewayARN = Lens.lens (\DescribeMaintenanceStartTimeResponse' {gatewayARN} -> gatewayARN) (\s@DescribeMaintenanceStartTimeResponse' {} a -> s {gatewayARN = a} :: DescribeMaintenanceStartTimeResponse)++-- | The hour component of the maintenance start time represented as /hh/,+-- where /hh/ is the hour (0 to 23). The hour of the day is in the time+-- zone of the gateway.+describeMaintenanceStartTimeResponse_hourOfDay :: Lens.Lens' DescribeMaintenanceStartTimeResponse (Prelude.Maybe Prelude.Natural)+describeMaintenanceStartTimeResponse_hourOfDay = Lens.lens (\DescribeMaintenanceStartTimeResponse' {hourOfDay} -> hourOfDay) (\s@DescribeMaintenanceStartTimeResponse' {} a -> s {hourOfDay = a} :: DescribeMaintenanceStartTimeResponse)++-- | The minute component of the maintenance start time represented as /mm/,+-- where /mm/ is the minute (0 to 59). The minute of the hour is in the+-- time zone of the gateway.+describeMaintenanceStartTimeResponse_minuteOfHour :: Lens.Lens' DescribeMaintenanceStartTimeResponse (Prelude.Maybe Prelude.Natural)+describeMaintenanceStartTimeResponse_minuteOfHour = Lens.lens (\DescribeMaintenanceStartTimeResponse' {minuteOfHour} -> minuteOfHour) (\s@DescribeMaintenanceStartTimeResponse' {} a -> s {minuteOfHour = a} :: DescribeMaintenanceStartTimeResponse)++-- | A value that indicates the time zone that is set for the gateway. The+-- start time and day of week specified should be in the time zone of the+-- gateway.+describeMaintenanceStartTimeResponse_timezone :: Lens.Lens' DescribeMaintenanceStartTimeResponse (Prelude.Maybe Prelude.Text)+describeMaintenanceStartTimeResponse_timezone = Lens.lens (\DescribeMaintenanceStartTimeResponse' {timezone} -> timezone) (\s@DescribeMaintenanceStartTimeResponse' {} a -> s {timezone = a} :: DescribeMaintenanceStartTimeResponse)++-- | The response's http status code.+describeMaintenanceStartTimeResponse_httpStatus :: Lens.Lens' DescribeMaintenanceStartTimeResponse Prelude.Int+describeMaintenanceStartTimeResponse_httpStatus = Lens.lens (\DescribeMaintenanceStartTimeResponse' {httpStatus} -> httpStatus) (\s@DescribeMaintenanceStartTimeResponse' {} a -> s {httpStatus = a} :: DescribeMaintenanceStartTimeResponse)++instance+ Prelude.NFData+ DescribeMaintenanceStartTimeResponse+ where+ rnf DescribeMaintenanceStartTimeResponse' {..} =+ Prelude.rnf dayOfMonth+ `Prelude.seq` Prelude.rnf dayOfWeek+ `Prelude.seq` Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf hourOfDay+ `Prelude.seq` Prelude.rnf minuteOfHour+ `Prelude.seq` Prelude.rnf timezone+ `Prelude.seq` Prelude.rnf httpStatus
@@ -0,0 +1,186 @@+{-# 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.DescribeNFSFileShares+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Gets a description for one or more Network File System (NFS) file shares+-- from an S3 File Gateway. This operation is only supported for S3 File+-- Gateways.+module Amazonka.StorageGateway.DescribeNFSFileShares+ ( -- * Creating a Request+ DescribeNFSFileShares (..),+ newDescribeNFSFileShares,++ -- * Request Lenses+ describeNFSFileShares_fileShareARNList,++ -- * Destructuring the Response+ DescribeNFSFileSharesResponse (..),+ newDescribeNFSFileSharesResponse,++ -- * Response Lenses+ describeNFSFileSharesResponse_nFSFileShareInfoList,+ describeNFSFileSharesResponse_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++-- | DescribeNFSFileSharesInput+--+-- /See:/ 'newDescribeNFSFileShares' smart constructor.+data DescribeNFSFileShares = DescribeNFSFileShares'+ { -- | An array containing the Amazon Resource Name (ARN) of each file share to+ -- be described.+ fileShareARNList :: Prelude.NonEmpty Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeNFSFileShares' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'fileShareARNList', 'describeNFSFileShares_fileShareARNList' - An array containing the Amazon Resource Name (ARN) of each file share to+-- be described.+newDescribeNFSFileShares ::+ -- | 'fileShareARNList'+ Prelude.NonEmpty Prelude.Text ->+ DescribeNFSFileShares+newDescribeNFSFileShares pFileShareARNList_ =+ DescribeNFSFileShares'+ { fileShareARNList =+ Lens.coerced Lens.# pFileShareARNList_+ }++-- | An array containing the Amazon Resource Name (ARN) of each file share to+-- be described.+describeNFSFileShares_fileShareARNList :: Lens.Lens' DescribeNFSFileShares (Prelude.NonEmpty Prelude.Text)+describeNFSFileShares_fileShareARNList = Lens.lens (\DescribeNFSFileShares' {fileShareARNList} -> fileShareARNList) (\s@DescribeNFSFileShares' {} a -> s {fileShareARNList = a} :: DescribeNFSFileShares) Prelude.. Lens.coerced++instance Core.AWSRequest DescribeNFSFileShares where+ type+ AWSResponse DescribeNFSFileShares =+ DescribeNFSFileSharesResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ DescribeNFSFileSharesResponse'+ Prelude.<$> ( x+ Data..?> "NFSFileShareInfoList"+ Core..!@ Prelude.mempty+ )+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable DescribeNFSFileShares where+ hashWithSalt _salt DescribeNFSFileShares' {..} =+ _salt `Prelude.hashWithSalt` fileShareARNList++instance Prelude.NFData DescribeNFSFileShares where+ rnf DescribeNFSFileShares' {..} =+ Prelude.rnf fileShareARNList++instance Data.ToHeaders DescribeNFSFileShares where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.DescribeNFSFileShares" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON DescribeNFSFileShares where+ toJSON DescribeNFSFileShares' {..} =+ Data.object+ ( Prelude.catMaybes+ [ Prelude.Just+ ("FileShareARNList" Data..= fileShareARNList)+ ]+ )++instance Data.ToPath DescribeNFSFileShares where+ toPath = Prelude.const "/"++instance Data.ToQuery DescribeNFSFileShares where+ toQuery = Prelude.const Prelude.mempty++-- | DescribeNFSFileSharesOutput+--+-- /See:/ 'newDescribeNFSFileSharesResponse' smart constructor.+data DescribeNFSFileSharesResponse = DescribeNFSFileSharesResponse'+ { -- | An array containing a description for each requested file share.+ nFSFileShareInfoList :: Prelude.Maybe [NFSFileShareInfo],+ -- | The response's http status code.+ httpStatus :: Prelude.Int+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeNFSFileSharesResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'nFSFileShareInfoList', 'describeNFSFileSharesResponse_nFSFileShareInfoList' - An array containing a description for each requested file share.+--+-- 'httpStatus', 'describeNFSFileSharesResponse_httpStatus' - The response's http status code.+newDescribeNFSFileSharesResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ DescribeNFSFileSharesResponse+newDescribeNFSFileSharesResponse pHttpStatus_ =+ DescribeNFSFileSharesResponse'+ { nFSFileShareInfoList =+ Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | An array containing a description for each requested file share.+describeNFSFileSharesResponse_nFSFileShareInfoList :: Lens.Lens' DescribeNFSFileSharesResponse (Prelude.Maybe [NFSFileShareInfo])+describeNFSFileSharesResponse_nFSFileShareInfoList = Lens.lens (\DescribeNFSFileSharesResponse' {nFSFileShareInfoList} -> nFSFileShareInfoList) (\s@DescribeNFSFileSharesResponse' {} a -> s {nFSFileShareInfoList = a} :: DescribeNFSFileSharesResponse) Prelude.. Lens.mapping Lens.coerced++-- | The response's http status code.+describeNFSFileSharesResponse_httpStatus :: Lens.Lens' DescribeNFSFileSharesResponse Prelude.Int+describeNFSFileSharesResponse_httpStatus = Lens.lens (\DescribeNFSFileSharesResponse' {httpStatus} -> httpStatus) (\s@DescribeNFSFileSharesResponse' {} a -> s {httpStatus = a} :: DescribeNFSFileSharesResponse)++instance Prelude.NFData DescribeNFSFileSharesResponse where+ rnf DescribeNFSFileSharesResponse' {..} =+ Prelude.rnf nFSFileShareInfoList+ `Prelude.seq` Prelude.rnf httpStatus
@@ -0,0 +1,186 @@+{-# 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.DescribeSMBFileShares+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Gets a description for one or more Server Message Block (SMB) file+-- shares from a S3 File Gateway. This operation is only supported for S3+-- File Gateways.+module Amazonka.StorageGateway.DescribeSMBFileShares+ ( -- * Creating a Request+ DescribeSMBFileShares (..),+ newDescribeSMBFileShares,++ -- * Request Lenses+ describeSMBFileShares_fileShareARNList,++ -- * Destructuring the Response+ DescribeSMBFileSharesResponse (..),+ newDescribeSMBFileSharesResponse,++ -- * Response Lenses+ describeSMBFileSharesResponse_sMBFileShareInfoList,+ describeSMBFileSharesResponse_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++-- | DescribeSMBFileSharesInput+--+-- /See:/ 'newDescribeSMBFileShares' smart constructor.+data DescribeSMBFileShares = DescribeSMBFileShares'+ { -- | An array containing the Amazon Resource Name (ARN) of each file share to+ -- be described.+ fileShareARNList :: Prelude.NonEmpty Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeSMBFileShares' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'fileShareARNList', 'describeSMBFileShares_fileShareARNList' - An array containing the Amazon Resource Name (ARN) of each file share to+-- be described.+newDescribeSMBFileShares ::+ -- | 'fileShareARNList'+ Prelude.NonEmpty Prelude.Text ->+ DescribeSMBFileShares+newDescribeSMBFileShares pFileShareARNList_ =+ DescribeSMBFileShares'+ { fileShareARNList =+ Lens.coerced Lens.# pFileShareARNList_+ }++-- | An array containing the Amazon Resource Name (ARN) of each file share to+-- be described.+describeSMBFileShares_fileShareARNList :: Lens.Lens' DescribeSMBFileShares (Prelude.NonEmpty Prelude.Text)+describeSMBFileShares_fileShareARNList = Lens.lens (\DescribeSMBFileShares' {fileShareARNList} -> fileShareARNList) (\s@DescribeSMBFileShares' {} a -> s {fileShareARNList = a} :: DescribeSMBFileShares) Prelude.. Lens.coerced++instance Core.AWSRequest DescribeSMBFileShares where+ type+ AWSResponse DescribeSMBFileShares =+ DescribeSMBFileSharesResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ DescribeSMBFileSharesResponse'+ Prelude.<$> ( x+ Data..?> "SMBFileShareInfoList"+ Core..!@ Prelude.mempty+ )+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable DescribeSMBFileShares where+ hashWithSalt _salt DescribeSMBFileShares' {..} =+ _salt `Prelude.hashWithSalt` fileShareARNList++instance Prelude.NFData DescribeSMBFileShares where+ rnf DescribeSMBFileShares' {..} =+ Prelude.rnf fileShareARNList++instance Data.ToHeaders DescribeSMBFileShares where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.DescribeSMBFileShares" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON DescribeSMBFileShares where+ toJSON DescribeSMBFileShares' {..} =+ Data.object+ ( Prelude.catMaybes+ [ Prelude.Just+ ("FileShareARNList" Data..= fileShareARNList)+ ]+ )++instance Data.ToPath DescribeSMBFileShares where+ toPath = Prelude.const "/"++instance Data.ToQuery DescribeSMBFileShares where+ toQuery = Prelude.const Prelude.mempty++-- | DescribeSMBFileSharesOutput+--+-- /See:/ 'newDescribeSMBFileSharesResponse' smart constructor.+data DescribeSMBFileSharesResponse = DescribeSMBFileSharesResponse'+ { -- | An array containing a description for each requested file share.+ sMBFileShareInfoList :: Prelude.Maybe [SMBFileShareInfo],+ -- | The response's http status code.+ httpStatus :: Prelude.Int+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeSMBFileSharesResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'sMBFileShareInfoList', 'describeSMBFileSharesResponse_sMBFileShareInfoList' - An array containing a description for each requested file share.+--+-- 'httpStatus', 'describeSMBFileSharesResponse_httpStatus' - The response's http status code.+newDescribeSMBFileSharesResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ DescribeSMBFileSharesResponse+newDescribeSMBFileSharesResponse pHttpStatus_ =+ DescribeSMBFileSharesResponse'+ { sMBFileShareInfoList =+ Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | An array containing a description for each requested file share.+describeSMBFileSharesResponse_sMBFileShareInfoList :: Lens.Lens' DescribeSMBFileSharesResponse (Prelude.Maybe [SMBFileShareInfo])+describeSMBFileSharesResponse_sMBFileShareInfoList = Lens.lens (\DescribeSMBFileSharesResponse' {sMBFileShareInfoList} -> sMBFileShareInfoList) (\s@DescribeSMBFileSharesResponse' {} a -> s {sMBFileShareInfoList = a} :: DescribeSMBFileSharesResponse) Prelude.. Lens.mapping Lens.coerced++-- | The response's http status code.+describeSMBFileSharesResponse_httpStatus :: Lens.Lens' DescribeSMBFileSharesResponse Prelude.Int+describeSMBFileSharesResponse_httpStatus = Lens.lens (\DescribeSMBFileSharesResponse' {httpStatus} -> httpStatus) (\s@DescribeSMBFileSharesResponse' {} a -> s {httpStatus = a} :: DescribeSMBFileSharesResponse)++instance Prelude.NFData DescribeSMBFileSharesResponse where+ rnf DescribeSMBFileSharesResponse' {..} =+ Prelude.rnf sMBFileShareInfoList+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/DescribeSMBSettings.hs view
@@ -0,0 +1,362 @@+{-# 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.DescribeSMBSettings+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Gets a description of a Server Message Block (SMB) file share settings+-- from a file gateway. This operation is only supported for file gateways.+module Amazonka.StorageGateway.DescribeSMBSettings+ ( -- * Creating a Request+ DescribeSMBSettings (..),+ newDescribeSMBSettings,++ -- * Request Lenses+ describeSMBSettings_gatewayARN,++ -- * Destructuring the Response+ DescribeSMBSettingsResponse (..),+ newDescribeSMBSettingsResponse,++ -- * Response Lenses+ describeSMBSettingsResponse_activeDirectoryStatus,+ describeSMBSettingsResponse_domainName,+ describeSMBSettingsResponse_fileSharesVisible,+ describeSMBSettingsResponse_gatewayARN,+ describeSMBSettingsResponse_sMBGuestPasswordSet,+ describeSMBSettingsResponse_sMBLocalGroups,+ describeSMBSettingsResponse_sMBSecurityStrategy,+ describeSMBSettingsResponse_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++-- | /See:/ 'newDescribeSMBSettings' smart constructor.+data DescribeSMBSettings = DescribeSMBSettings'+ { gatewayARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeSMBSettings' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'describeSMBSettings_gatewayARN' - Undocumented member.+newDescribeSMBSettings ::+ -- | 'gatewayARN'+ Prelude.Text ->+ DescribeSMBSettings+newDescribeSMBSettings pGatewayARN_ =+ DescribeSMBSettings' {gatewayARN = pGatewayARN_}++-- | Undocumented member.+describeSMBSettings_gatewayARN :: Lens.Lens' DescribeSMBSettings Prelude.Text+describeSMBSettings_gatewayARN = Lens.lens (\DescribeSMBSettings' {gatewayARN} -> gatewayARN) (\s@DescribeSMBSettings' {} a -> s {gatewayARN = a} :: DescribeSMBSettings)++instance Core.AWSRequest DescribeSMBSettings where+ type+ AWSResponse DescribeSMBSettings =+ DescribeSMBSettingsResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ DescribeSMBSettingsResponse'+ Prelude.<$> (x Data..?> "ActiveDirectoryStatus")+ Prelude.<*> (x Data..?> "DomainName")+ Prelude.<*> (x Data..?> "FileSharesVisible")+ Prelude.<*> (x Data..?> "GatewayARN")+ Prelude.<*> (x Data..?> "SMBGuestPasswordSet")+ Prelude.<*> (x Data..?> "SMBLocalGroups")+ Prelude.<*> (x Data..?> "SMBSecurityStrategy")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable DescribeSMBSettings where+ hashWithSalt _salt DescribeSMBSettings' {..} =+ _salt `Prelude.hashWithSalt` gatewayARN++instance Prelude.NFData DescribeSMBSettings where+ rnf DescribeSMBSettings' {..} = Prelude.rnf gatewayARN++instance Data.ToHeaders DescribeSMBSettings where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.DescribeSMBSettings" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON DescribeSMBSettings where+ toJSON DescribeSMBSettings' {..} =+ Data.object+ ( Prelude.catMaybes+ [Prelude.Just ("GatewayARN" Data..= gatewayARN)]+ )++instance Data.ToPath DescribeSMBSettings where+ toPath = Prelude.const "/"++instance Data.ToQuery DescribeSMBSettings where+ toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newDescribeSMBSettingsResponse' smart constructor.+data DescribeSMBSettingsResponse = DescribeSMBSettingsResponse'+ { -- | Indicates the status of a gateway that is a member of the Active+ -- Directory domain.+ --+ -- - @ACCESS_DENIED@: Indicates that the @JoinDomain@ operation failed+ -- due to an authentication error.+ --+ -- - @DETACHED@: Indicates that gateway is not joined to a domain.+ --+ -- - @JOINED@: Indicates that the gateway has successfully joined a+ -- domain.+ --+ -- - @JOINING@: Indicates that a @JoinDomain@ operation is in progress.+ --+ -- - @NETWORK_ERROR@: Indicates that @JoinDomain@ operation failed due to+ -- a network or connectivity error.+ --+ -- - @TIMEOUT@: Indicates that the @JoinDomain@ operation failed because+ -- the operation didn\'t complete within the allotted time.+ --+ -- - @UNKNOWN_ERROR@: Indicates that the @JoinDomain@ operation failed+ -- due to another type of error.+ activeDirectoryStatus :: Prelude.Maybe ActiveDirectoryStatus,+ -- | The name of the domain that the gateway is joined to.+ domainName :: Prelude.Maybe Prelude.Text,+ -- | The shares on this gateway appear when listing shares. Only supported+ -- for S3 File Gateways.+ fileSharesVisible :: Prelude.Maybe Prelude.Bool,+ gatewayARN :: Prelude.Maybe Prelude.Text,+ -- | This value is @true@ if a password for the guest user @smbguest@ is set,+ -- otherwise @false@. Only supported for S3 File Gateways.+ --+ -- Valid Values: @true@ | @false@+ sMBGuestPasswordSet :: Prelude.Maybe Prelude.Bool,+ -- | A list of Active Directory users and groups that have special+ -- permissions for SMB file shares on the gateway.+ sMBLocalGroups :: Prelude.Maybe SMBLocalGroups,+ -- | The type of security strategy that was specified for file gateway.+ --+ -- - @ClientSpecified@: If you use this option, requests are established+ -- based on what is negotiated by the client. This option is+ -- recommended when you want to maximize compatibility across different+ -- clients in your environment. Only supported for S3 File Gateways.+ --+ -- - @MandatorySigning@: If you use this option, file gateway only allows+ -- connections from SMBv2 or SMBv3 clients that have signing enabled.+ -- This option works with SMB clients on Microsoft Windows Vista,+ -- Windows Server 2008 or newer.+ --+ -- - @MandatoryEncryption@: If you use this option, file gateway only+ -- allows connections from SMBv3 clients that have encryption enabled.+ -- This option is highly recommended for environments that handle+ -- sensitive data. This option works with SMB clients on Microsoft+ -- Windows 8, Windows Server 2012 or newer.+ sMBSecurityStrategy :: Prelude.Maybe SMBSecurityStrategy,+ -- | The response's http status code.+ httpStatus :: Prelude.Int+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeSMBSettingsResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'activeDirectoryStatus', 'describeSMBSettingsResponse_activeDirectoryStatus' - Indicates the status of a gateway that is a member of the Active+-- Directory domain.+--+-- - @ACCESS_DENIED@: Indicates that the @JoinDomain@ operation failed+-- due to an authentication error.+--+-- - @DETACHED@: Indicates that gateway is not joined to a domain.+--+-- - @JOINED@: Indicates that the gateway has successfully joined a+-- domain.+--+-- - @JOINING@: Indicates that a @JoinDomain@ operation is in progress.+--+-- - @NETWORK_ERROR@: Indicates that @JoinDomain@ operation failed due to+-- a network or connectivity error.+--+-- - @TIMEOUT@: Indicates that the @JoinDomain@ operation failed because+-- the operation didn\'t complete within the allotted time.+--+-- - @UNKNOWN_ERROR@: Indicates that the @JoinDomain@ operation failed+-- due to another type of error.+--+-- 'domainName', 'describeSMBSettingsResponse_domainName' - The name of the domain that the gateway is joined to.+--+-- 'fileSharesVisible', 'describeSMBSettingsResponse_fileSharesVisible' - The shares on this gateway appear when listing shares. Only supported+-- for S3 File Gateways.+--+-- 'gatewayARN', 'describeSMBSettingsResponse_gatewayARN' - Undocumented member.+--+-- 'sMBGuestPasswordSet', 'describeSMBSettingsResponse_sMBGuestPasswordSet' - This value is @true@ if a password for the guest user @smbguest@ is set,+-- otherwise @false@. Only supported for S3 File Gateways.+--+-- Valid Values: @true@ | @false@+--+-- 'sMBLocalGroups', 'describeSMBSettingsResponse_sMBLocalGroups' - A list of Active Directory users and groups that have special+-- permissions for SMB file shares on the gateway.+--+-- 'sMBSecurityStrategy', 'describeSMBSettingsResponse_sMBSecurityStrategy' - The type of security strategy that was specified for file gateway.+--+-- - @ClientSpecified@: If you use this option, requests are established+-- based on what is negotiated by the client. This option is+-- recommended when you want to maximize compatibility across different+-- clients in your environment. Only supported for S3 File Gateways.+--+-- - @MandatorySigning@: If you use this option, file gateway only allows+-- connections from SMBv2 or SMBv3 clients that have signing enabled.+-- This option works with SMB clients on Microsoft Windows Vista,+-- Windows Server 2008 or newer.+--+-- - @MandatoryEncryption@: If you use this option, file gateway only+-- allows connections from SMBv3 clients that have encryption enabled.+-- This option is highly recommended for environments that handle+-- sensitive data. This option works with SMB clients on Microsoft+-- Windows 8, Windows Server 2012 or newer.+--+-- 'httpStatus', 'describeSMBSettingsResponse_httpStatus' - The response's http status code.+newDescribeSMBSettingsResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ DescribeSMBSettingsResponse+newDescribeSMBSettingsResponse pHttpStatus_ =+ DescribeSMBSettingsResponse'+ { activeDirectoryStatus =+ Prelude.Nothing,+ domainName = Prelude.Nothing,+ fileSharesVisible = Prelude.Nothing,+ gatewayARN = Prelude.Nothing,+ sMBGuestPasswordSet = Prelude.Nothing,+ sMBLocalGroups = Prelude.Nothing,+ sMBSecurityStrategy = Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | Indicates the status of a gateway that is a member of the Active+-- Directory domain.+--+-- - @ACCESS_DENIED@: Indicates that the @JoinDomain@ operation failed+-- due to an authentication error.+--+-- - @DETACHED@: Indicates that gateway is not joined to a domain.+--+-- - @JOINED@: Indicates that the gateway has successfully joined a+-- domain.+--+-- - @JOINING@: Indicates that a @JoinDomain@ operation is in progress.+--+-- - @NETWORK_ERROR@: Indicates that @JoinDomain@ operation failed due to+-- a network or connectivity error.+--+-- - @TIMEOUT@: Indicates that the @JoinDomain@ operation failed because+-- the operation didn\'t complete within the allotted time.+--+-- - @UNKNOWN_ERROR@: Indicates that the @JoinDomain@ operation failed+-- due to another type of error.+describeSMBSettingsResponse_activeDirectoryStatus :: Lens.Lens' DescribeSMBSettingsResponse (Prelude.Maybe ActiveDirectoryStatus)+describeSMBSettingsResponse_activeDirectoryStatus = Lens.lens (\DescribeSMBSettingsResponse' {activeDirectoryStatus} -> activeDirectoryStatus) (\s@DescribeSMBSettingsResponse' {} a -> s {activeDirectoryStatus = a} :: DescribeSMBSettingsResponse)++-- | The name of the domain that the gateway is joined to.+describeSMBSettingsResponse_domainName :: Lens.Lens' DescribeSMBSettingsResponse (Prelude.Maybe Prelude.Text)+describeSMBSettingsResponse_domainName = Lens.lens (\DescribeSMBSettingsResponse' {domainName} -> domainName) (\s@DescribeSMBSettingsResponse' {} a -> s {domainName = a} :: DescribeSMBSettingsResponse)++-- | The shares on this gateway appear when listing shares. Only supported+-- for S3 File Gateways.+describeSMBSettingsResponse_fileSharesVisible :: Lens.Lens' DescribeSMBSettingsResponse (Prelude.Maybe Prelude.Bool)+describeSMBSettingsResponse_fileSharesVisible = Lens.lens (\DescribeSMBSettingsResponse' {fileSharesVisible} -> fileSharesVisible) (\s@DescribeSMBSettingsResponse' {} a -> s {fileSharesVisible = a} :: DescribeSMBSettingsResponse)++-- | Undocumented member.+describeSMBSettingsResponse_gatewayARN :: Lens.Lens' DescribeSMBSettingsResponse (Prelude.Maybe Prelude.Text)+describeSMBSettingsResponse_gatewayARN = Lens.lens (\DescribeSMBSettingsResponse' {gatewayARN} -> gatewayARN) (\s@DescribeSMBSettingsResponse' {} a -> s {gatewayARN = a} :: DescribeSMBSettingsResponse)++-- | This value is @true@ if a password for the guest user @smbguest@ is set,+-- otherwise @false@. Only supported for S3 File Gateways.+--+-- Valid Values: @true@ | @false@+describeSMBSettingsResponse_sMBGuestPasswordSet :: Lens.Lens' DescribeSMBSettingsResponse (Prelude.Maybe Prelude.Bool)+describeSMBSettingsResponse_sMBGuestPasswordSet = Lens.lens (\DescribeSMBSettingsResponse' {sMBGuestPasswordSet} -> sMBGuestPasswordSet) (\s@DescribeSMBSettingsResponse' {} a -> s {sMBGuestPasswordSet = a} :: DescribeSMBSettingsResponse)++-- | A list of Active Directory users and groups that have special+-- permissions for SMB file shares on the gateway.+describeSMBSettingsResponse_sMBLocalGroups :: Lens.Lens' DescribeSMBSettingsResponse (Prelude.Maybe SMBLocalGroups)+describeSMBSettingsResponse_sMBLocalGroups = Lens.lens (\DescribeSMBSettingsResponse' {sMBLocalGroups} -> sMBLocalGroups) (\s@DescribeSMBSettingsResponse' {} a -> s {sMBLocalGroups = a} :: DescribeSMBSettingsResponse)++-- | The type of security strategy that was specified for file gateway.+--+-- - @ClientSpecified@: If you use this option, requests are established+-- based on what is negotiated by the client. This option is+-- recommended when you want to maximize compatibility across different+-- clients in your environment. Only supported for S3 File Gateways.+--+-- - @MandatorySigning@: If you use this option, file gateway only allows+-- connections from SMBv2 or SMBv3 clients that have signing enabled.+-- This option works with SMB clients on Microsoft Windows Vista,+-- Windows Server 2008 or newer.+--+-- - @MandatoryEncryption@: If you use this option, file gateway only+-- allows connections from SMBv3 clients that have encryption enabled.+-- This option is highly recommended for environments that handle+-- sensitive data. This option works with SMB clients on Microsoft+-- Windows 8, Windows Server 2012 or newer.+describeSMBSettingsResponse_sMBSecurityStrategy :: Lens.Lens' DescribeSMBSettingsResponse (Prelude.Maybe SMBSecurityStrategy)+describeSMBSettingsResponse_sMBSecurityStrategy = Lens.lens (\DescribeSMBSettingsResponse' {sMBSecurityStrategy} -> sMBSecurityStrategy) (\s@DescribeSMBSettingsResponse' {} a -> s {sMBSecurityStrategy = a} :: DescribeSMBSettingsResponse)++-- | The response's http status code.+describeSMBSettingsResponse_httpStatus :: Lens.Lens' DescribeSMBSettingsResponse Prelude.Int+describeSMBSettingsResponse_httpStatus = Lens.lens (\DescribeSMBSettingsResponse' {httpStatus} -> httpStatus) (\s@DescribeSMBSettingsResponse' {} a -> s {httpStatus = a} :: DescribeSMBSettingsResponse)++instance Prelude.NFData DescribeSMBSettingsResponse where+ rnf DescribeSMBSettingsResponse' {..} =+ Prelude.rnf activeDirectoryStatus+ `Prelude.seq` Prelude.rnf domainName+ `Prelude.seq` Prelude.rnf fileSharesVisible+ `Prelude.seq` Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf sMBGuestPasswordSet+ `Prelude.seq` Prelude.rnf sMBLocalGroups+ `Prelude.seq` Prelude.rnf sMBSecurityStrategy+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/DescribeSnapshotSchedule.hs view
@@ -0,0 +1,259 @@+{-# 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.DescribeSnapshotSchedule+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Describes the snapshot schedule for the specified gateway volume. The+-- snapshot schedule information includes intervals at which snapshots are+-- automatically initiated on the volume. This operation is only supported+-- in the cached volume and stored volume types.+module Amazonka.StorageGateway.DescribeSnapshotSchedule+ ( -- * Creating a Request+ DescribeSnapshotSchedule (..),+ newDescribeSnapshotSchedule,++ -- * Request Lenses+ describeSnapshotSchedule_volumeARN,++ -- * Destructuring the Response+ DescribeSnapshotScheduleResponse (..),+ newDescribeSnapshotScheduleResponse,++ -- * Response Lenses+ describeSnapshotScheduleResponse_description,+ describeSnapshotScheduleResponse_recurrenceInHours,+ describeSnapshotScheduleResponse_startAt,+ describeSnapshotScheduleResponse_tags,+ describeSnapshotScheduleResponse_timezone,+ describeSnapshotScheduleResponse_volumeARN,+ describeSnapshotScheduleResponse_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++-- | A JSON object containing the DescribeSnapshotScheduleInput$VolumeARN of+-- the volume.+--+-- /See:/ 'newDescribeSnapshotSchedule' smart constructor.+data DescribeSnapshotSchedule = DescribeSnapshotSchedule'+ { -- | The Amazon Resource Name (ARN) of the volume. Use the ListVolumes+ -- operation to return a list of gateway volumes.+ volumeARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeSnapshotSchedule' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'volumeARN', 'describeSnapshotSchedule_volumeARN' - The Amazon Resource Name (ARN) of the volume. Use the ListVolumes+-- operation to return a list of gateway volumes.+newDescribeSnapshotSchedule ::+ -- | 'volumeARN'+ Prelude.Text ->+ DescribeSnapshotSchedule+newDescribeSnapshotSchedule pVolumeARN_ =+ DescribeSnapshotSchedule' {volumeARN = pVolumeARN_}++-- | The Amazon Resource Name (ARN) of the volume. Use the ListVolumes+-- operation to return a list of gateway volumes.+describeSnapshotSchedule_volumeARN :: Lens.Lens' DescribeSnapshotSchedule Prelude.Text+describeSnapshotSchedule_volumeARN = Lens.lens (\DescribeSnapshotSchedule' {volumeARN} -> volumeARN) (\s@DescribeSnapshotSchedule' {} a -> s {volumeARN = a} :: DescribeSnapshotSchedule)++instance Core.AWSRequest DescribeSnapshotSchedule where+ type+ AWSResponse DescribeSnapshotSchedule =+ DescribeSnapshotScheduleResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ DescribeSnapshotScheduleResponse'+ Prelude.<$> (x Data..?> "Description")+ Prelude.<*> (x Data..?> "RecurrenceInHours")+ Prelude.<*> (x Data..?> "StartAt")+ Prelude.<*> (x Data..?> "Tags" Core..!@ Prelude.mempty)+ Prelude.<*> (x Data..?> "Timezone")+ Prelude.<*> (x Data..?> "VolumeARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable DescribeSnapshotSchedule where+ hashWithSalt _salt DescribeSnapshotSchedule' {..} =+ _salt `Prelude.hashWithSalt` volumeARN++instance Prelude.NFData DescribeSnapshotSchedule where+ rnf DescribeSnapshotSchedule' {..} =+ Prelude.rnf volumeARN++instance Data.ToHeaders DescribeSnapshotSchedule where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.DescribeSnapshotSchedule" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON DescribeSnapshotSchedule where+ toJSON DescribeSnapshotSchedule' {..} =+ Data.object+ ( Prelude.catMaybes+ [Prelude.Just ("VolumeARN" Data..= volumeARN)]+ )++instance Data.ToPath DescribeSnapshotSchedule where+ toPath = Prelude.const "/"++instance Data.ToQuery DescribeSnapshotSchedule where+ toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newDescribeSnapshotScheduleResponse' smart constructor.+data DescribeSnapshotScheduleResponse = DescribeSnapshotScheduleResponse'+ { -- | The snapshot description.+ description :: Prelude.Maybe Prelude.Text,+ -- | The number of hours between snapshots.+ recurrenceInHours :: Prelude.Maybe Prelude.Natural,+ -- | The hour of the day at which the snapshot schedule begins represented as+ -- /hh/, where /hh/ is the hour (0 to 23). The hour of the day is in the+ -- time zone of the gateway.+ startAt :: Prelude.Maybe Prelude.Natural,+ -- | A list of up to 50 tags assigned to the snapshot schedule, sorted+ -- alphabetically by key name. Each tag is a key-value pair. For a gateway+ -- with more than 10 tags assigned, you can view all tags using the+ -- @ListTagsForResource@ API operation.+ tags :: Prelude.Maybe [Tag],+ -- | A value that indicates the time zone of the gateway.+ timezone :: Prelude.Maybe Prelude.Text,+ -- | The Amazon Resource Name (ARN) of the volume that was specified in the+ -- request.+ volumeARN :: 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 'DescribeSnapshotScheduleResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'description', 'describeSnapshotScheduleResponse_description' - The snapshot description.+--+-- 'recurrenceInHours', 'describeSnapshotScheduleResponse_recurrenceInHours' - The number of hours between snapshots.+--+-- 'startAt', 'describeSnapshotScheduleResponse_startAt' - The hour of the day at which the snapshot schedule begins represented as+-- /hh/, where /hh/ is the hour (0 to 23). The hour of the day is in the+-- time zone of the gateway.+--+-- 'tags', 'describeSnapshotScheduleResponse_tags' - A list of up to 50 tags assigned to the snapshot schedule, sorted+-- alphabetically by key name. Each tag is a key-value pair. For a gateway+-- with more than 10 tags assigned, you can view all tags using the+-- @ListTagsForResource@ API operation.+--+-- 'timezone', 'describeSnapshotScheduleResponse_timezone' - A value that indicates the time zone of the gateway.+--+-- 'volumeARN', 'describeSnapshotScheduleResponse_volumeARN' - The Amazon Resource Name (ARN) of the volume that was specified in the+-- request.+--+-- 'httpStatus', 'describeSnapshotScheduleResponse_httpStatus' - The response's http status code.+newDescribeSnapshotScheduleResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ DescribeSnapshotScheduleResponse+newDescribeSnapshotScheduleResponse pHttpStatus_ =+ DescribeSnapshotScheduleResponse'+ { description =+ Prelude.Nothing,+ recurrenceInHours = Prelude.Nothing,+ startAt = Prelude.Nothing,+ tags = Prelude.Nothing,+ timezone = Prelude.Nothing,+ volumeARN = Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | The snapshot description.+describeSnapshotScheduleResponse_description :: Lens.Lens' DescribeSnapshotScheduleResponse (Prelude.Maybe Prelude.Text)+describeSnapshotScheduleResponse_description = Lens.lens (\DescribeSnapshotScheduleResponse' {description} -> description) (\s@DescribeSnapshotScheduleResponse' {} a -> s {description = a} :: DescribeSnapshotScheduleResponse)++-- | The number of hours between snapshots.+describeSnapshotScheduleResponse_recurrenceInHours :: Lens.Lens' DescribeSnapshotScheduleResponse (Prelude.Maybe Prelude.Natural)+describeSnapshotScheduleResponse_recurrenceInHours = Lens.lens (\DescribeSnapshotScheduleResponse' {recurrenceInHours} -> recurrenceInHours) (\s@DescribeSnapshotScheduleResponse' {} a -> s {recurrenceInHours = a} :: DescribeSnapshotScheduleResponse)++-- | The hour of the day at which the snapshot schedule begins represented as+-- /hh/, where /hh/ is the hour (0 to 23). The hour of the day is in the+-- time zone of the gateway.+describeSnapshotScheduleResponse_startAt :: Lens.Lens' DescribeSnapshotScheduleResponse (Prelude.Maybe Prelude.Natural)+describeSnapshotScheduleResponse_startAt = Lens.lens (\DescribeSnapshotScheduleResponse' {startAt} -> startAt) (\s@DescribeSnapshotScheduleResponse' {} a -> s {startAt = a} :: DescribeSnapshotScheduleResponse)++-- | A list of up to 50 tags assigned to the snapshot schedule, sorted+-- alphabetically by key name. Each tag is a key-value pair. For a gateway+-- with more than 10 tags assigned, you can view all tags using the+-- @ListTagsForResource@ API operation.+describeSnapshotScheduleResponse_tags :: Lens.Lens' DescribeSnapshotScheduleResponse (Prelude.Maybe [Tag])+describeSnapshotScheduleResponse_tags = Lens.lens (\DescribeSnapshotScheduleResponse' {tags} -> tags) (\s@DescribeSnapshotScheduleResponse' {} a -> s {tags = a} :: DescribeSnapshotScheduleResponse) Prelude.. Lens.mapping Lens.coerced++-- | A value that indicates the time zone of the gateway.+describeSnapshotScheduleResponse_timezone :: Lens.Lens' DescribeSnapshotScheduleResponse (Prelude.Maybe Prelude.Text)+describeSnapshotScheduleResponse_timezone = Lens.lens (\DescribeSnapshotScheduleResponse' {timezone} -> timezone) (\s@DescribeSnapshotScheduleResponse' {} a -> s {timezone = a} :: DescribeSnapshotScheduleResponse)++-- | The Amazon Resource Name (ARN) of the volume that was specified in the+-- request.+describeSnapshotScheduleResponse_volumeARN :: Lens.Lens' DescribeSnapshotScheduleResponse (Prelude.Maybe Prelude.Text)+describeSnapshotScheduleResponse_volumeARN = Lens.lens (\DescribeSnapshotScheduleResponse' {volumeARN} -> volumeARN) (\s@DescribeSnapshotScheduleResponse' {} a -> s {volumeARN = a} :: DescribeSnapshotScheduleResponse)++-- | The response's http status code.+describeSnapshotScheduleResponse_httpStatus :: Lens.Lens' DescribeSnapshotScheduleResponse Prelude.Int+describeSnapshotScheduleResponse_httpStatus = Lens.lens (\DescribeSnapshotScheduleResponse' {httpStatus} -> httpStatus) (\s@DescribeSnapshotScheduleResponse' {} a -> s {httpStatus = a} :: DescribeSnapshotScheduleResponse)++instance+ Prelude.NFData+ DescribeSnapshotScheduleResponse+ where+ rnf DescribeSnapshotScheduleResponse' {..} =+ Prelude.rnf description+ `Prelude.seq` Prelude.rnf recurrenceInHours+ `Prelude.seq` Prelude.rnf startAt+ `Prelude.seq` Prelude.rnf tags+ `Prelude.seq` Prelude.rnf timezone+ `Prelude.seq` Prelude.rnf volumeARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/DescribeStorediSCSIVolumes.hs view
@@ -0,0 +1,336 @@+{-# 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.DescribeStorediSCSIVolumes+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Returns the description of the gateway volumes specified in the request.+-- The list of gateway volumes in the request must be from one gateway. In+-- the response, Storage Gateway returns volume information sorted by+-- volume ARNs. This operation is only supported in stored volume gateway+-- type.+module Amazonka.StorageGateway.DescribeStorediSCSIVolumes+ ( -- * Creating a Request+ DescribeStorediSCSIVolumes (..),+ newDescribeStorediSCSIVolumes,++ -- * Request Lenses+ describeStorediSCSIVolumes_volumeARNs,++ -- * Destructuring the Response+ DescribeStorediSCSIVolumesResponse (..),+ newDescribeStorediSCSIVolumesResponse,++ -- * Response Lenses+ describeStorediSCSIVolumesResponse_storediSCSIVolumes,+ describeStorediSCSIVolumesResponse_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++-- | A JSON object containing a list of+-- DescribeStorediSCSIVolumesInput$VolumeARNs.+--+-- /See:/ 'newDescribeStorediSCSIVolumes' smart constructor.+data DescribeStorediSCSIVolumes = DescribeStorediSCSIVolumes'+ { -- | An array of strings where each string represents the Amazon Resource+ -- Name (ARN) of a stored volume. All of the specified stored volumes must+ -- be from the same gateway. Use ListVolumes to get volume ARNs for a+ -- gateway.+ volumeARNs :: [Prelude.Text]+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeStorediSCSIVolumes' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'volumeARNs', 'describeStorediSCSIVolumes_volumeARNs' - An array of strings where each string represents the Amazon Resource+-- Name (ARN) of a stored volume. All of the specified stored volumes must+-- be from the same gateway. Use ListVolumes to get volume ARNs for a+-- gateway.+newDescribeStorediSCSIVolumes ::+ DescribeStorediSCSIVolumes+newDescribeStorediSCSIVolumes =+ DescribeStorediSCSIVolumes'+ { volumeARNs =+ Prelude.mempty+ }++-- | An array of strings where each string represents the Amazon Resource+-- Name (ARN) of a stored volume. All of the specified stored volumes must+-- be from the same gateway. Use ListVolumes to get volume ARNs for a+-- gateway.+describeStorediSCSIVolumes_volumeARNs :: Lens.Lens' DescribeStorediSCSIVolumes [Prelude.Text]+describeStorediSCSIVolumes_volumeARNs = Lens.lens (\DescribeStorediSCSIVolumes' {volumeARNs} -> volumeARNs) (\s@DescribeStorediSCSIVolumes' {} a -> s {volumeARNs = a} :: DescribeStorediSCSIVolumes) Prelude.. Lens.coerced++instance Core.AWSRequest DescribeStorediSCSIVolumes where+ type+ AWSResponse DescribeStorediSCSIVolumes =+ DescribeStorediSCSIVolumesResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ DescribeStorediSCSIVolumesResponse'+ Prelude.<$> ( x+ Data..?> "StorediSCSIVolumes"+ Core..!@ Prelude.mempty+ )+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable DescribeStorediSCSIVolumes where+ hashWithSalt _salt DescribeStorediSCSIVolumes' {..} =+ _salt `Prelude.hashWithSalt` volumeARNs++instance Prelude.NFData DescribeStorediSCSIVolumes where+ rnf DescribeStorediSCSIVolumes' {..} =+ Prelude.rnf volumeARNs++instance Data.ToHeaders DescribeStorediSCSIVolumes where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.DescribeStorediSCSIVolumes" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON DescribeStorediSCSIVolumes where+ toJSON DescribeStorediSCSIVolumes' {..} =+ Data.object+ ( Prelude.catMaybes+ [Prelude.Just ("VolumeARNs" Data..= volumeARNs)]+ )++instance Data.ToPath DescribeStorediSCSIVolumes where+ toPath = Prelude.const "/"++instance Data.ToQuery DescribeStorediSCSIVolumes where+ toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newDescribeStorediSCSIVolumesResponse' smart constructor.+data DescribeStorediSCSIVolumesResponse = DescribeStorediSCSIVolumesResponse'+ { -- | Describes a single unit of output from DescribeStorediSCSIVolumes. The+ -- following fields are returned:+ --+ -- - @ChapEnabled@: Indicates whether mutual CHAP is enabled for the+ -- iSCSI target.+ --+ -- - @LunNumber@: The logical disk number.+ --+ -- - @NetworkInterfaceId@: The network interface ID of the stored volume+ -- that initiator use to map the stored volume as an iSCSI target.+ --+ -- - @NetworkInterfacePort@: The port used to communicate with iSCSI+ -- targets.+ --+ -- - @PreservedExistingData@: Indicates when the stored volume was+ -- created, existing data on the underlying local disk was preserved.+ --+ -- - @SourceSnapshotId@: If the stored volume was created from a+ -- snapshot, this field contains the snapshot ID used, e.g.+ -- @snap-1122aabb@. Otherwise, this field is not included.+ --+ -- - @StorediSCSIVolumes@: An array of StorediSCSIVolume objects where+ -- each object contains metadata about one stored volume.+ --+ -- - @TargetARN@: The Amazon Resource Name (ARN) of the volume target.+ --+ -- - @VolumeARN@: The Amazon Resource Name (ARN) of the stored volume.+ --+ -- - @VolumeDiskId@: The disk ID of the local disk that was specified in+ -- the CreateStorediSCSIVolume operation.+ --+ -- - @VolumeId@: The unique identifier of the storage volume, e.g.+ -- @vol-1122AABB@.+ --+ -- - @VolumeiSCSIAttributes@: An VolumeiSCSIAttributes object that+ -- represents a collection of iSCSI attributes for one stored volume.+ --+ -- - @VolumeProgress@: Represents the percentage complete if the volume+ -- is restoring or bootstrapping that represents the percent of data+ -- transferred. This field does not appear in the response if the+ -- stored volume is not restoring or bootstrapping.+ --+ -- - @VolumeSizeInBytes@: The size of the volume in bytes.+ --+ -- - @VolumeStatus@: One of the @VolumeStatus@ values that indicates the+ -- state of the volume.+ --+ -- - @VolumeType@: One of the enumeration values describing the type of+ -- the volume. Currently, only @STORED@ volumes are supported.+ storediSCSIVolumes :: Prelude.Maybe [StorediSCSIVolume],+ -- | The response's http status code.+ httpStatus :: Prelude.Int+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeStorediSCSIVolumesResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'storediSCSIVolumes', 'describeStorediSCSIVolumesResponse_storediSCSIVolumes' - Describes a single unit of output from DescribeStorediSCSIVolumes. The+-- following fields are returned:+--+-- - @ChapEnabled@: Indicates whether mutual CHAP is enabled for the+-- iSCSI target.+--+-- - @LunNumber@: The logical disk number.+--+-- - @NetworkInterfaceId@: The network interface ID of the stored volume+-- that initiator use to map the stored volume as an iSCSI target.+--+-- - @NetworkInterfacePort@: The port used to communicate with iSCSI+-- targets.+--+-- - @PreservedExistingData@: Indicates when the stored volume was+-- created, existing data on the underlying local disk was preserved.+--+-- - @SourceSnapshotId@: If the stored volume was created from a+-- snapshot, this field contains the snapshot ID used, e.g.+-- @snap-1122aabb@. Otherwise, this field is not included.+--+-- - @StorediSCSIVolumes@: An array of StorediSCSIVolume objects where+-- each object contains metadata about one stored volume.+--+-- - @TargetARN@: The Amazon Resource Name (ARN) of the volume target.+--+-- - @VolumeARN@: The Amazon Resource Name (ARN) of the stored volume.+--+-- - @VolumeDiskId@: The disk ID of the local disk that was specified in+-- the CreateStorediSCSIVolume operation.+--+-- - @VolumeId@: The unique identifier of the storage volume, e.g.+-- @vol-1122AABB@.+--+-- - @VolumeiSCSIAttributes@: An VolumeiSCSIAttributes object that+-- represents a collection of iSCSI attributes for one stored volume.+--+-- - @VolumeProgress@: Represents the percentage complete if the volume+-- is restoring or bootstrapping that represents the percent of data+-- transferred. This field does not appear in the response if the+-- stored volume is not restoring or bootstrapping.+--+-- - @VolumeSizeInBytes@: The size of the volume in bytes.+--+-- - @VolumeStatus@: One of the @VolumeStatus@ values that indicates the+-- state of the volume.+--+-- - @VolumeType@: One of the enumeration values describing the type of+-- the volume. Currently, only @STORED@ volumes are supported.+--+-- 'httpStatus', 'describeStorediSCSIVolumesResponse_httpStatus' - The response's http status code.+newDescribeStorediSCSIVolumesResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ DescribeStorediSCSIVolumesResponse+newDescribeStorediSCSIVolumesResponse pHttpStatus_ =+ DescribeStorediSCSIVolumesResponse'+ { storediSCSIVolumes =+ Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | Describes a single unit of output from DescribeStorediSCSIVolumes. The+-- following fields are returned:+--+-- - @ChapEnabled@: Indicates whether mutual CHAP is enabled for the+-- iSCSI target.+--+-- - @LunNumber@: The logical disk number.+--+-- - @NetworkInterfaceId@: The network interface ID of the stored volume+-- that initiator use to map the stored volume as an iSCSI target.+--+-- - @NetworkInterfacePort@: The port used to communicate with iSCSI+-- targets.+--+-- - @PreservedExistingData@: Indicates when the stored volume was+-- created, existing data on the underlying local disk was preserved.+--+-- - @SourceSnapshotId@: If the stored volume was created from a+-- snapshot, this field contains the snapshot ID used, e.g.+-- @snap-1122aabb@. Otherwise, this field is not included.+--+-- - @StorediSCSIVolumes@: An array of StorediSCSIVolume objects where+-- each object contains metadata about one stored volume.+--+-- - @TargetARN@: The Amazon Resource Name (ARN) of the volume target.+--+-- - @VolumeARN@: The Amazon Resource Name (ARN) of the stored volume.+--+-- - @VolumeDiskId@: The disk ID of the local disk that was specified in+-- the CreateStorediSCSIVolume operation.+--+-- - @VolumeId@: The unique identifier of the storage volume, e.g.+-- @vol-1122AABB@.+--+-- - @VolumeiSCSIAttributes@: An VolumeiSCSIAttributes object that+-- represents a collection of iSCSI attributes for one stored volume.+--+-- - @VolumeProgress@: Represents the percentage complete if the volume+-- is restoring or bootstrapping that represents the percent of data+-- transferred. This field does not appear in the response if the+-- stored volume is not restoring or bootstrapping.+--+-- - @VolumeSizeInBytes@: The size of the volume in bytes.+--+-- - @VolumeStatus@: One of the @VolumeStatus@ values that indicates the+-- state of the volume.+--+-- - @VolumeType@: One of the enumeration values describing the type of+-- the volume. Currently, only @STORED@ volumes are supported.+describeStorediSCSIVolumesResponse_storediSCSIVolumes :: Lens.Lens' DescribeStorediSCSIVolumesResponse (Prelude.Maybe [StorediSCSIVolume])+describeStorediSCSIVolumesResponse_storediSCSIVolumes = Lens.lens (\DescribeStorediSCSIVolumesResponse' {storediSCSIVolumes} -> storediSCSIVolumes) (\s@DescribeStorediSCSIVolumesResponse' {} a -> s {storediSCSIVolumes = a} :: DescribeStorediSCSIVolumesResponse) Prelude.. Lens.mapping Lens.coerced++-- | The response's http status code.+describeStorediSCSIVolumesResponse_httpStatus :: Lens.Lens' DescribeStorediSCSIVolumesResponse Prelude.Int+describeStorediSCSIVolumesResponse_httpStatus = Lens.lens (\DescribeStorediSCSIVolumesResponse' {httpStatus} -> httpStatus) (\s@DescribeStorediSCSIVolumesResponse' {} a -> s {httpStatus = a} :: DescribeStorediSCSIVolumesResponse)++instance+ Prelude.NFData+ DescribeStorediSCSIVolumesResponse+ where+ rnf DescribeStorediSCSIVolumesResponse' {..} =+ Prelude.rnf storediSCSIVolumes+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/DescribeTapeArchives.hs view
@@ -0,0 +1,275 @@+{-# 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.DescribeTapeArchives+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Returns a description of specified virtual tapes in the virtual tape+-- shelf (VTS). This operation is only supported in the tape gateway type.+--+-- If a specific @TapeARN@ is not specified, Storage Gateway returns a+-- description of all virtual tapes found in the VTS associated with your+-- account.+--+-- This operation returns paginated results.+module Amazonka.StorageGateway.DescribeTapeArchives+ ( -- * Creating a Request+ DescribeTapeArchives (..),+ newDescribeTapeArchives,++ -- * Request Lenses+ describeTapeArchives_limit,+ describeTapeArchives_marker,+ describeTapeArchives_tapeARNs,++ -- * Destructuring the Response+ DescribeTapeArchivesResponse (..),+ newDescribeTapeArchivesResponse,++ -- * Response Lenses+ describeTapeArchivesResponse_marker,+ describeTapeArchivesResponse_tapeArchives,+ describeTapeArchivesResponse_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++-- | DescribeTapeArchivesInput+--+-- /See:/ 'newDescribeTapeArchives' smart constructor.+data DescribeTapeArchives = DescribeTapeArchives'+ { -- | Specifies that the number of virtual tapes described be limited to the+ -- specified number.+ limit :: Prelude.Maybe Prelude.Natural,+ -- | An opaque string that indicates the position at which to begin+ -- describing virtual tapes.+ marker :: Prelude.Maybe Prelude.Text,+ -- | Specifies one or more unique Amazon Resource Names (ARNs) that represent+ -- the virtual tapes you want to describe.+ tapeARNs :: Prelude.Maybe [Prelude.Text]+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeTapeArchives' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'limit', 'describeTapeArchives_limit' - Specifies that the number of virtual tapes described be limited to the+-- specified number.+--+-- 'marker', 'describeTapeArchives_marker' - An opaque string that indicates the position at which to begin+-- describing virtual tapes.+--+-- 'tapeARNs', 'describeTapeArchives_tapeARNs' - Specifies one or more unique Amazon Resource Names (ARNs) that represent+-- the virtual tapes you want to describe.+newDescribeTapeArchives ::+ DescribeTapeArchives+newDescribeTapeArchives =+ DescribeTapeArchives'+ { limit = Prelude.Nothing,+ marker = Prelude.Nothing,+ tapeARNs = Prelude.Nothing+ }++-- | Specifies that the number of virtual tapes described be limited to the+-- specified number.+describeTapeArchives_limit :: Lens.Lens' DescribeTapeArchives (Prelude.Maybe Prelude.Natural)+describeTapeArchives_limit = Lens.lens (\DescribeTapeArchives' {limit} -> limit) (\s@DescribeTapeArchives' {} a -> s {limit = a} :: DescribeTapeArchives)++-- | An opaque string that indicates the position at which to begin+-- describing virtual tapes.+describeTapeArchives_marker :: Lens.Lens' DescribeTapeArchives (Prelude.Maybe Prelude.Text)+describeTapeArchives_marker = Lens.lens (\DescribeTapeArchives' {marker} -> marker) (\s@DescribeTapeArchives' {} a -> s {marker = a} :: DescribeTapeArchives)++-- | Specifies one or more unique Amazon Resource Names (ARNs) that represent+-- the virtual tapes you want to describe.+describeTapeArchives_tapeARNs :: Lens.Lens' DescribeTapeArchives (Prelude.Maybe [Prelude.Text])+describeTapeArchives_tapeARNs = Lens.lens (\DescribeTapeArchives' {tapeARNs} -> tapeARNs) (\s@DescribeTapeArchives' {} a -> s {tapeARNs = a} :: DescribeTapeArchives) Prelude.. Lens.mapping Lens.coerced++instance Core.AWSPager DescribeTapeArchives where+ page rq rs+ | Core.stop+ ( rs+ Lens.^? describeTapeArchivesResponse_marker+ Prelude.. Lens._Just+ ) =+ Prelude.Nothing+ | Core.stop+ ( rs+ Lens.^? describeTapeArchivesResponse_tapeArchives+ Prelude.. Lens._Just+ ) =+ Prelude.Nothing+ | Prelude.otherwise =+ Prelude.Just+ Prelude.$ rq+ Prelude.& describeTapeArchives_marker+ Lens..~ rs+ Lens.^? describeTapeArchivesResponse_marker+ Prelude.. Lens._Just++instance Core.AWSRequest DescribeTapeArchives where+ type+ AWSResponse DescribeTapeArchives =+ DescribeTapeArchivesResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ DescribeTapeArchivesResponse'+ Prelude.<$> (x Data..?> "Marker")+ Prelude.<*> (x Data..?> "TapeArchives" Core..!@ Prelude.mempty)+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable DescribeTapeArchives where+ hashWithSalt _salt DescribeTapeArchives' {..} =+ _salt+ `Prelude.hashWithSalt` limit+ `Prelude.hashWithSalt` marker+ `Prelude.hashWithSalt` tapeARNs++instance Prelude.NFData DescribeTapeArchives where+ rnf DescribeTapeArchives' {..} =+ Prelude.rnf limit+ `Prelude.seq` Prelude.rnf marker+ `Prelude.seq` Prelude.rnf tapeARNs++instance Data.ToHeaders DescribeTapeArchives where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.DescribeTapeArchives" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON DescribeTapeArchives where+ toJSON DescribeTapeArchives' {..} =+ Data.object+ ( Prelude.catMaybes+ [ ("Limit" Data..=) Prelude.<$> limit,+ ("Marker" Data..=) Prelude.<$> marker,+ ("TapeARNs" Data..=) Prelude.<$> tapeARNs+ ]+ )++instance Data.ToPath DescribeTapeArchives where+ toPath = Prelude.const "/"++instance Data.ToQuery DescribeTapeArchives where+ toQuery = Prelude.const Prelude.mempty++-- | DescribeTapeArchivesOutput+--+-- /See:/ 'newDescribeTapeArchivesResponse' smart constructor.+data DescribeTapeArchivesResponse = DescribeTapeArchivesResponse'+ { -- | An opaque string that indicates the position at which the virtual tapes+ -- that were fetched for description ended. Use this marker in your next+ -- request to fetch the next set of virtual tapes in the virtual tape shelf+ -- (VTS). If there are no more virtual tapes to describe, this field does+ -- not appear in the response.+ marker :: Prelude.Maybe Prelude.Text,+ -- | An array of virtual tape objects in the virtual tape shelf (VTS). The+ -- description includes of the Amazon Resource Name (ARN) of the virtual+ -- tapes. The information returned includes the Amazon Resource Names+ -- (ARNs) of the tapes, size of the tapes, status of the tapes, progress of+ -- the description, and tape barcode.+ tapeArchives :: Prelude.Maybe [TapeArchive],+ -- | The response's http status code.+ httpStatus :: Prelude.Int+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeTapeArchivesResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'marker', 'describeTapeArchivesResponse_marker' - An opaque string that indicates the position at which the virtual tapes+-- that were fetched for description ended. Use this marker in your next+-- request to fetch the next set of virtual tapes in the virtual tape shelf+-- (VTS). If there are no more virtual tapes to describe, this field does+-- not appear in the response.+--+-- 'tapeArchives', 'describeTapeArchivesResponse_tapeArchives' - An array of virtual tape objects in the virtual tape shelf (VTS). The+-- description includes of the Amazon Resource Name (ARN) of the virtual+-- tapes. The information returned includes the Amazon Resource Names+-- (ARNs) of the tapes, size of the tapes, status of the tapes, progress of+-- the description, and tape barcode.+--+-- 'httpStatus', 'describeTapeArchivesResponse_httpStatus' - The response's http status code.+newDescribeTapeArchivesResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ DescribeTapeArchivesResponse+newDescribeTapeArchivesResponse pHttpStatus_ =+ DescribeTapeArchivesResponse'+ { marker =+ Prelude.Nothing,+ tapeArchives = Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | An opaque string that indicates the position at which the virtual tapes+-- that were fetched for description ended. Use this marker in your next+-- request to fetch the next set of virtual tapes in the virtual tape shelf+-- (VTS). If there are no more virtual tapes to describe, this field does+-- not appear in the response.+describeTapeArchivesResponse_marker :: Lens.Lens' DescribeTapeArchivesResponse (Prelude.Maybe Prelude.Text)+describeTapeArchivesResponse_marker = Lens.lens (\DescribeTapeArchivesResponse' {marker} -> marker) (\s@DescribeTapeArchivesResponse' {} a -> s {marker = a} :: DescribeTapeArchivesResponse)++-- | An array of virtual tape objects in the virtual tape shelf (VTS). The+-- description includes of the Amazon Resource Name (ARN) of the virtual+-- tapes. The information returned includes the Amazon Resource Names+-- (ARNs) of the tapes, size of the tapes, status of the tapes, progress of+-- the description, and tape barcode.+describeTapeArchivesResponse_tapeArchives :: Lens.Lens' DescribeTapeArchivesResponse (Prelude.Maybe [TapeArchive])+describeTapeArchivesResponse_tapeArchives = Lens.lens (\DescribeTapeArchivesResponse' {tapeArchives} -> tapeArchives) (\s@DescribeTapeArchivesResponse' {} a -> s {tapeArchives = a} :: DescribeTapeArchivesResponse) Prelude.. Lens.mapping Lens.coerced++-- | The response's http status code.+describeTapeArchivesResponse_httpStatus :: Lens.Lens' DescribeTapeArchivesResponse Prelude.Int+describeTapeArchivesResponse_httpStatus = Lens.lens (\DescribeTapeArchivesResponse' {httpStatus} -> httpStatus) (\s@DescribeTapeArchivesResponse' {} a -> s {httpStatus = a} :: DescribeTapeArchivesResponse)++instance Prelude.NFData DescribeTapeArchivesResponse where+ rnf DescribeTapeArchivesResponse' {..} =+ Prelude.rnf marker+ `Prelude.seq` Prelude.rnf tapeArchives+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/DescribeTapeRecoveryPoints.hs view
@@ -0,0 +1,287 @@+{-# 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.DescribeTapeRecoveryPoints+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Returns a list of virtual tape recovery points that are available for+-- the specified tape gateway.+--+-- A recovery point is a point-in-time view of a virtual tape at which all+-- the data on the virtual tape is consistent. If your gateway crashes,+-- virtual tapes that have recovery points can be recovered to a new+-- gateway. This operation is only supported in the tape gateway type.+--+-- This operation returns paginated results.+module Amazonka.StorageGateway.DescribeTapeRecoveryPoints+ ( -- * Creating a Request+ DescribeTapeRecoveryPoints (..),+ newDescribeTapeRecoveryPoints,++ -- * Request Lenses+ describeTapeRecoveryPoints_limit,+ describeTapeRecoveryPoints_marker,+ describeTapeRecoveryPoints_gatewayARN,++ -- * Destructuring the Response+ DescribeTapeRecoveryPointsResponse (..),+ newDescribeTapeRecoveryPointsResponse,++ -- * Response Lenses+ describeTapeRecoveryPointsResponse_gatewayARN,+ describeTapeRecoveryPointsResponse_marker,+ describeTapeRecoveryPointsResponse_tapeRecoveryPointInfos,+ describeTapeRecoveryPointsResponse_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++-- | DescribeTapeRecoveryPointsInput+--+-- /See:/ 'newDescribeTapeRecoveryPoints' smart constructor.+data DescribeTapeRecoveryPoints = DescribeTapeRecoveryPoints'+ { -- | Specifies that the number of virtual tape recovery points that are+ -- described be limited to the specified number.+ limit :: Prelude.Maybe Prelude.Natural,+ -- | An opaque string that indicates the position at which to begin+ -- describing the virtual tape recovery points.+ marker :: Prelude.Maybe Prelude.Text,+ gatewayARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeTapeRecoveryPoints' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'limit', 'describeTapeRecoveryPoints_limit' - Specifies that the number of virtual tape recovery points that are+-- described be limited to the specified number.+--+-- 'marker', 'describeTapeRecoveryPoints_marker' - An opaque string that indicates the position at which to begin+-- describing the virtual tape recovery points.+--+-- 'gatewayARN', 'describeTapeRecoveryPoints_gatewayARN' - Undocumented member.+newDescribeTapeRecoveryPoints ::+ -- | 'gatewayARN'+ Prelude.Text ->+ DescribeTapeRecoveryPoints+newDescribeTapeRecoveryPoints pGatewayARN_ =+ DescribeTapeRecoveryPoints'+ { limit =+ Prelude.Nothing,+ marker = Prelude.Nothing,+ gatewayARN = pGatewayARN_+ }++-- | Specifies that the number of virtual tape recovery points that are+-- described be limited to the specified number.+describeTapeRecoveryPoints_limit :: Lens.Lens' DescribeTapeRecoveryPoints (Prelude.Maybe Prelude.Natural)+describeTapeRecoveryPoints_limit = Lens.lens (\DescribeTapeRecoveryPoints' {limit} -> limit) (\s@DescribeTapeRecoveryPoints' {} a -> s {limit = a} :: DescribeTapeRecoveryPoints)++-- | An opaque string that indicates the position at which to begin+-- describing the virtual tape recovery points.+describeTapeRecoveryPoints_marker :: Lens.Lens' DescribeTapeRecoveryPoints (Prelude.Maybe Prelude.Text)+describeTapeRecoveryPoints_marker = Lens.lens (\DescribeTapeRecoveryPoints' {marker} -> marker) (\s@DescribeTapeRecoveryPoints' {} a -> s {marker = a} :: DescribeTapeRecoveryPoints)++-- | Undocumented member.+describeTapeRecoveryPoints_gatewayARN :: Lens.Lens' DescribeTapeRecoveryPoints Prelude.Text+describeTapeRecoveryPoints_gatewayARN = Lens.lens (\DescribeTapeRecoveryPoints' {gatewayARN} -> gatewayARN) (\s@DescribeTapeRecoveryPoints' {} a -> s {gatewayARN = a} :: DescribeTapeRecoveryPoints)++instance Core.AWSPager DescribeTapeRecoveryPoints where+ page rq rs+ | Core.stop+ ( rs+ Lens.^? describeTapeRecoveryPointsResponse_marker+ Prelude.. Lens._Just+ ) =+ Prelude.Nothing+ | Core.stop+ ( rs+ Lens.^? describeTapeRecoveryPointsResponse_tapeRecoveryPointInfos+ Prelude.. Lens._Just+ ) =+ Prelude.Nothing+ | Prelude.otherwise =+ Prelude.Just+ Prelude.$ rq+ Prelude.& describeTapeRecoveryPoints_marker+ Lens..~ rs+ Lens.^? describeTapeRecoveryPointsResponse_marker+ Prelude.. Lens._Just++instance Core.AWSRequest DescribeTapeRecoveryPoints where+ type+ AWSResponse DescribeTapeRecoveryPoints =+ DescribeTapeRecoveryPointsResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ DescribeTapeRecoveryPointsResponse'+ Prelude.<$> (x Data..?> "GatewayARN")+ Prelude.<*> (x Data..?> "Marker")+ Prelude.<*> ( x+ Data..?> "TapeRecoveryPointInfos"+ Core..!@ Prelude.mempty+ )+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable DescribeTapeRecoveryPoints where+ hashWithSalt _salt DescribeTapeRecoveryPoints' {..} =+ _salt+ `Prelude.hashWithSalt` limit+ `Prelude.hashWithSalt` marker+ `Prelude.hashWithSalt` gatewayARN++instance Prelude.NFData DescribeTapeRecoveryPoints where+ rnf DescribeTapeRecoveryPoints' {..} =+ Prelude.rnf limit+ `Prelude.seq` Prelude.rnf marker+ `Prelude.seq` Prelude.rnf gatewayARN++instance Data.ToHeaders DescribeTapeRecoveryPoints where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.DescribeTapeRecoveryPoints" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON DescribeTapeRecoveryPoints where+ toJSON DescribeTapeRecoveryPoints' {..} =+ Data.object+ ( Prelude.catMaybes+ [ ("Limit" Data..=) Prelude.<$> limit,+ ("Marker" Data..=) Prelude.<$> marker,+ Prelude.Just ("GatewayARN" Data..= gatewayARN)+ ]+ )++instance Data.ToPath DescribeTapeRecoveryPoints where+ toPath = Prelude.const "/"++instance Data.ToQuery DescribeTapeRecoveryPoints where+ toQuery = Prelude.const Prelude.mempty++-- | DescribeTapeRecoveryPointsOutput+--+-- /See:/ 'newDescribeTapeRecoveryPointsResponse' smart constructor.+data DescribeTapeRecoveryPointsResponse = DescribeTapeRecoveryPointsResponse'+ { gatewayARN :: Prelude.Maybe Prelude.Text,+ -- | An opaque string that indicates the position at which the virtual tape+ -- recovery points that were listed for description ended.+ --+ -- Use this marker in your next request to list the next set of virtual+ -- tape recovery points in the list. If there are no more recovery points+ -- to describe, this field does not appear in the response.+ marker :: Prelude.Maybe Prelude.Text,+ -- | An array of TapeRecoveryPointInfos that are available for the specified+ -- gateway.+ tapeRecoveryPointInfos :: Prelude.Maybe [TapeRecoveryPointInfo],+ -- | The response's http status code.+ httpStatus :: Prelude.Int+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeTapeRecoveryPointsResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'describeTapeRecoveryPointsResponse_gatewayARN' - Undocumented member.+--+-- 'marker', 'describeTapeRecoveryPointsResponse_marker' - An opaque string that indicates the position at which the virtual tape+-- recovery points that were listed for description ended.+--+-- Use this marker in your next request to list the next set of virtual+-- tape recovery points in the list. If there are no more recovery points+-- to describe, this field does not appear in the response.+--+-- 'tapeRecoveryPointInfos', 'describeTapeRecoveryPointsResponse_tapeRecoveryPointInfos' - An array of TapeRecoveryPointInfos that are available for the specified+-- gateway.+--+-- 'httpStatus', 'describeTapeRecoveryPointsResponse_httpStatus' - The response's http status code.+newDescribeTapeRecoveryPointsResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ DescribeTapeRecoveryPointsResponse+newDescribeTapeRecoveryPointsResponse pHttpStatus_ =+ DescribeTapeRecoveryPointsResponse'+ { gatewayARN =+ Prelude.Nothing,+ marker = Prelude.Nothing,+ tapeRecoveryPointInfos =+ Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | Undocumented member.+describeTapeRecoveryPointsResponse_gatewayARN :: Lens.Lens' DescribeTapeRecoveryPointsResponse (Prelude.Maybe Prelude.Text)+describeTapeRecoveryPointsResponse_gatewayARN = Lens.lens (\DescribeTapeRecoveryPointsResponse' {gatewayARN} -> gatewayARN) (\s@DescribeTapeRecoveryPointsResponse' {} a -> s {gatewayARN = a} :: DescribeTapeRecoveryPointsResponse)++-- | An opaque string that indicates the position at which the virtual tape+-- recovery points that were listed for description ended.+--+-- Use this marker in your next request to list the next set of virtual+-- tape recovery points in the list. If there are no more recovery points+-- to describe, this field does not appear in the response.+describeTapeRecoveryPointsResponse_marker :: Lens.Lens' DescribeTapeRecoveryPointsResponse (Prelude.Maybe Prelude.Text)+describeTapeRecoveryPointsResponse_marker = Lens.lens (\DescribeTapeRecoveryPointsResponse' {marker} -> marker) (\s@DescribeTapeRecoveryPointsResponse' {} a -> s {marker = a} :: DescribeTapeRecoveryPointsResponse)++-- | An array of TapeRecoveryPointInfos that are available for the specified+-- gateway.+describeTapeRecoveryPointsResponse_tapeRecoveryPointInfos :: Lens.Lens' DescribeTapeRecoveryPointsResponse (Prelude.Maybe [TapeRecoveryPointInfo])+describeTapeRecoveryPointsResponse_tapeRecoveryPointInfos = Lens.lens (\DescribeTapeRecoveryPointsResponse' {tapeRecoveryPointInfos} -> tapeRecoveryPointInfos) (\s@DescribeTapeRecoveryPointsResponse' {} a -> s {tapeRecoveryPointInfos = a} :: DescribeTapeRecoveryPointsResponse) Prelude.. Lens.mapping Lens.coerced++-- | The response's http status code.+describeTapeRecoveryPointsResponse_httpStatus :: Lens.Lens' DescribeTapeRecoveryPointsResponse Prelude.Int+describeTapeRecoveryPointsResponse_httpStatus = Lens.lens (\DescribeTapeRecoveryPointsResponse' {httpStatus} -> httpStatus) (\s@DescribeTapeRecoveryPointsResponse' {} a -> s {httpStatus = a} :: DescribeTapeRecoveryPointsResponse)++instance+ Prelude.NFData+ DescribeTapeRecoveryPointsResponse+ where+ rnf DescribeTapeRecoveryPointsResponse' {..} =+ Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf marker+ `Prelude.seq` Prelude.rnf tapeRecoveryPointInfos+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/DescribeTapes.hs view
@@ -0,0 +1,292 @@+{-# 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.DescribeTapes+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Returns a description of the specified Amazon Resource Name (ARN) of+-- virtual tapes. If a @TapeARN@ is not specified, returns a description of+-- all virtual tapes associated with the specified gateway. This operation+-- is only supported in the tape gateway type.+--+-- This operation returns paginated results.+module Amazonka.StorageGateway.DescribeTapes+ ( -- * Creating a Request+ DescribeTapes (..),+ newDescribeTapes,++ -- * Request Lenses+ describeTapes_limit,+ describeTapes_marker,+ describeTapes_tapeARNs,+ describeTapes_gatewayARN,++ -- * Destructuring the Response+ DescribeTapesResponse (..),+ newDescribeTapesResponse,++ -- * Response Lenses+ describeTapesResponse_marker,+ describeTapesResponse_tapes,+ describeTapesResponse_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++-- | DescribeTapesInput+--+-- /See:/ 'newDescribeTapes' smart constructor.+data DescribeTapes = DescribeTapes'+ { -- | Specifies that the number of virtual tapes described be limited to the+ -- specified number.+ --+ -- Amazon Web Services may impose its own limit, if this field is not set.+ limit :: Prelude.Maybe Prelude.Natural,+ -- | A marker value, obtained in a previous call to @DescribeTapes@. This+ -- marker indicates which page of results to retrieve.+ --+ -- If not specified, the first page of results is retrieved.+ marker :: Prelude.Maybe Prelude.Text,+ -- | Specifies one or more unique Amazon Resource Names (ARNs) that represent+ -- the virtual tapes you want to describe. If this parameter is not+ -- specified, Tape gateway returns a description of all virtual tapes+ -- associated with the specified gateway.+ tapeARNs :: Prelude.Maybe [Prelude.Text],+ gatewayARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeTapes' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'limit', 'describeTapes_limit' - Specifies that the number of virtual tapes described be limited to the+-- specified number.+--+-- Amazon Web Services may impose its own limit, if this field is not set.+--+-- 'marker', 'describeTapes_marker' - A marker value, obtained in a previous call to @DescribeTapes@. This+-- marker indicates which page of results to retrieve.+--+-- If not specified, the first page of results is retrieved.+--+-- 'tapeARNs', 'describeTapes_tapeARNs' - Specifies one or more unique Amazon Resource Names (ARNs) that represent+-- the virtual tapes you want to describe. If this parameter is not+-- specified, Tape gateway returns a description of all virtual tapes+-- associated with the specified gateway.+--+-- 'gatewayARN', 'describeTapes_gatewayARN' - Undocumented member.+newDescribeTapes ::+ -- | 'gatewayARN'+ Prelude.Text ->+ DescribeTapes+newDescribeTapes pGatewayARN_ =+ DescribeTapes'+ { limit = Prelude.Nothing,+ marker = Prelude.Nothing,+ tapeARNs = Prelude.Nothing,+ gatewayARN = pGatewayARN_+ }++-- | Specifies that the number of virtual tapes described be limited to the+-- specified number.+--+-- Amazon Web Services may impose its own limit, if this field is not set.+describeTapes_limit :: Lens.Lens' DescribeTapes (Prelude.Maybe Prelude.Natural)+describeTapes_limit = Lens.lens (\DescribeTapes' {limit} -> limit) (\s@DescribeTapes' {} a -> s {limit = a} :: DescribeTapes)++-- | A marker value, obtained in a previous call to @DescribeTapes@. This+-- marker indicates which page of results to retrieve.+--+-- If not specified, the first page of results is retrieved.+describeTapes_marker :: Lens.Lens' DescribeTapes (Prelude.Maybe Prelude.Text)+describeTapes_marker = Lens.lens (\DescribeTapes' {marker} -> marker) (\s@DescribeTapes' {} a -> s {marker = a} :: DescribeTapes)++-- | Specifies one or more unique Amazon Resource Names (ARNs) that represent+-- the virtual tapes you want to describe. If this parameter is not+-- specified, Tape gateway returns a description of all virtual tapes+-- associated with the specified gateway.+describeTapes_tapeARNs :: Lens.Lens' DescribeTapes (Prelude.Maybe [Prelude.Text])+describeTapes_tapeARNs = Lens.lens (\DescribeTapes' {tapeARNs} -> tapeARNs) (\s@DescribeTapes' {} a -> s {tapeARNs = a} :: DescribeTapes) Prelude.. Lens.mapping Lens.coerced++-- | Undocumented member.+describeTapes_gatewayARN :: Lens.Lens' DescribeTapes Prelude.Text+describeTapes_gatewayARN = Lens.lens (\DescribeTapes' {gatewayARN} -> gatewayARN) (\s@DescribeTapes' {} a -> s {gatewayARN = a} :: DescribeTapes)++instance Core.AWSPager DescribeTapes where+ page rq rs+ | Core.stop+ ( rs+ Lens.^? describeTapesResponse_marker+ Prelude.. Lens._Just+ ) =+ Prelude.Nothing+ | Core.stop+ ( rs+ Lens.^? describeTapesResponse_tapes+ Prelude.. Lens._Just+ ) =+ Prelude.Nothing+ | Prelude.otherwise =+ Prelude.Just+ Prelude.$ rq+ Prelude.& describeTapes_marker+ Lens..~ rs+ Lens.^? describeTapesResponse_marker+ Prelude.. Lens._Just++instance Core.AWSRequest DescribeTapes where+ type+ AWSResponse DescribeTapes =+ DescribeTapesResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ DescribeTapesResponse'+ Prelude.<$> (x Data..?> "Marker")+ Prelude.<*> (x Data..?> "Tapes" Core..!@ Prelude.mempty)+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable DescribeTapes where+ hashWithSalt _salt DescribeTapes' {..} =+ _salt+ `Prelude.hashWithSalt` limit+ `Prelude.hashWithSalt` marker+ `Prelude.hashWithSalt` tapeARNs+ `Prelude.hashWithSalt` gatewayARN++instance Prelude.NFData DescribeTapes where+ rnf DescribeTapes' {..} =+ Prelude.rnf limit+ `Prelude.seq` Prelude.rnf marker+ `Prelude.seq` Prelude.rnf tapeARNs+ `Prelude.seq` Prelude.rnf gatewayARN++instance Data.ToHeaders DescribeTapes where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.DescribeTapes" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON DescribeTapes where+ toJSON DescribeTapes' {..} =+ Data.object+ ( Prelude.catMaybes+ [ ("Limit" Data..=) Prelude.<$> limit,+ ("Marker" Data..=) Prelude.<$> marker,+ ("TapeARNs" Data..=) Prelude.<$> tapeARNs,+ Prelude.Just ("GatewayARN" Data..= gatewayARN)+ ]+ )++instance Data.ToPath DescribeTapes where+ toPath = Prelude.const "/"++instance Data.ToQuery DescribeTapes where+ toQuery = Prelude.const Prelude.mempty++-- | DescribeTapesOutput+--+-- /See:/ 'newDescribeTapesResponse' smart constructor.+data DescribeTapesResponse = DescribeTapesResponse'+ { -- | An opaque string that can be used as part of a subsequent+ -- @DescribeTapes@ call to retrieve the next page of results.+ --+ -- If a response does not contain a marker, then there are no more results+ -- to be retrieved.+ marker :: Prelude.Maybe Prelude.Text,+ -- | An array of virtual tape descriptions.+ tapes :: Prelude.Maybe [Tape],+ -- | The response's http status code.+ httpStatus :: Prelude.Int+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeTapesResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'marker', 'describeTapesResponse_marker' - An opaque string that can be used as part of a subsequent+-- @DescribeTapes@ call to retrieve the next page of results.+--+-- If a response does not contain a marker, then there are no more results+-- to be retrieved.+--+-- 'tapes', 'describeTapesResponse_tapes' - An array of virtual tape descriptions.+--+-- 'httpStatus', 'describeTapesResponse_httpStatus' - The response's http status code.+newDescribeTapesResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ DescribeTapesResponse+newDescribeTapesResponse pHttpStatus_ =+ DescribeTapesResponse'+ { marker = Prelude.Nothing,+ tapes = Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | An opaque string that can be used as part of a subsequent+-- @DescribeTapes@ call to retrieve the next page of results.+--+-- If a response does not contain a marker, then there are no more results+-- to be retrieved.+describeTapesResponse_marker :: Lens.Lens' DescribeTapesResponse (Prelude.Maybe Prelude.Text)+describeTapesResponse_marker = Lens.lens (\DescribeTapesResponse' {marker} -> marker) (\s@DescribeTapesResponse' {} a -> s {marker = a} :: DescribeTapesResponse)++-- | An array of virtual tape descriptions.+describeTapesResponse_tapes :: Lens.Lens' DescribeTapesResponse (Prelude.Maybe [Tape])+describeTapesResponse_tapes = Lens.lens (\DescribeTapesResponse' {tapes} -> tapes) (\s@DescribeTapesResponse' {} a -> s {tapes = a} :: DescribeTapesResponse) Prelude.. Lens.mapping Lens.coerced++-- | The response's http status code.+describeTapesResponse_httpStatus :: Lens.Lens' DescribeTapesResponse Prelude.Int+describeTapesResponse_httpStatus = Lens.lens (\DescribeTapesResponse' {httpStatus} -> httpStatus) (\s@DescribeTapesResponse' {} a -> s {httpStatus = a} :: DescribeTapesResponse)++instance Prelude.NFData DescribeTapesResponse where+ rnf DescribeTapesResponse' {..} =+ Prelude.rnf marker+ `Prelude.seq` Prelude.rnf tapes+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/DescribeUploadBuffer.hs view
@@ -0,0 +1,219 @@+{-# 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.DescribeUploadBuffer+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Returns information about the upload buffer of a gateway. This operation+-- is supported for the stored volume, cached volume, and tape gateway+-- types.+--+-- The response includes disk IDs that are configured as upload buffer+-- space, and it includes the amount of upload buffer space allocated and+-- used.+module Amazonka.StorageGateway.DescribeUploadBuffer+ ( -- * Creating a Request+ DescribeUploadBuffer (..),+ newDescribeUploadBuffer,++ -- * Request Lenses+ describeUploadBuffer_gatewayARN,++ -- * Destructuring the Response+ DescribeUploadBufferResponse (..),+ newDescribeUploadBufferResponse,++ -- * Response Lenses+ describeUploadBufferResponse_diskIds,+ describeUploadBufferResponse_gatewayARN,+ describeUploadBufferResponse_uploadBufferAllocatedInBytes,+ describeUploadBufferResponse_uploadBufferUsedInBytes,+ describeUploadBufferResponse_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++-- | /See:/ 'newDescribeUploadBuffer' smart constructor.+data DescribeUploadBuffer = DescribeUploadBuffer'+ { gatewayARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeUploadBuffer' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'describeUploadBuffer_gatewayARN' - Undocumented member.+newDescribeUploadBuffer ::+ -- | 'gatewayARN'+ Prelude.Text ->+ DescribeUploadBuffer+newDescribeUploadBuffer pGatewayARN_ =+ DescribeUploadBuffer' {gatewayARN = pGatewayARN_}++-- | Undocumented member.+describeUploadBuffer_gatewayARN :: Lens.Lens' DescribeUploadBuffer Prelude.Text+describeUploadBuffer_gatewayARN = Lens.lens (\DescribeUploadBuffer' {gatewayARN} -> gatewayARN) (\s@DescribeUploadBuffer' {} a -> s {gatewayARN = a} :: DescribeUploadBuffer)++instance Core.AWSRequest DescribeUploadBuffer where+ type+ AWSResponse DescribeUploadBuffer =+ DescribeUploadBufferResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ DescribeUploadBufferResponse'+ Prelude.<$> (x Data..?> "DiskIds" Core..!@ Prelude.mempty)+ Prelude.<*> (x Data..?> "GatewayARN")+ Prelude.<*> (x Data..?> "UploadBufferAllocatedInBytes")+ Prelude.<*> (x Data..?> "UploadBufferUsedInBytes")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable DescribeUploadBuffer where+ hashWithSalt _salt DescribeUploadBuffer' {..} =+ _salt `Prelude.hashWithSalt` gatewayARN++instance Prelude.NFData DescribeUploadBuffer where+ rnf DescribeUploadBuffer' {..} =+ Prelude.rnf gatewayARN++instance Data.ToHeaders DescribeUploadBuffer where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.DescribeUploadBuffer" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON DescribeUploadBuffer where+ toJSON DescribeUploadBuffer' {..} =+ Data.object+ ( Prelude.catMaybes+ [Prelude.Just ("GatewayARN" Data..= gatewayARN)]+ )++instance Data.ToPath DescribeUploadBuffer where+ toPath = Prelude.const "/"++instance Data.ToQuery DescribeUploadBuffer where+ toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newDescribeUploadBufferResponse' smart constructor.+data DescribeUploadBufferResponse = DescribeUploadBufferResponse'+ { -- | An array of the gateway\'s local disk IDs that are configured as working+ -- storage. Each local disk ID is specified as a string (minimum length of+ -- 1 and maximum length of 300). If no local disks are configured as+ -- working storage, then the DiskIds array is empty.+ diskIds :: Prelude.Maybe [Prelude.Text],+ gatewayARN :: Prelude.Maybe Prelude.Text,+ -- | The total number of bytes allocated in the gateway\'s as upload buffer.+ uploadBufferAllocatedInBytes :: Prelude.Maybe Prelude.Integer,+ -- | The total number of bytes being used in the gateway\'s upload buffer.+ uploadBufferUsedInBytes :: Prelude.Maybe Prelude.Integer,+ -- | The response's http status code.+ httpStatus :: Prelude.Int+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeUploadBufferResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'diskIds', 'describeUploadBufferResponse_diskIds' - An array of the gateway\'s local disk IDs that are configured as working+-- storage. Each local disk ID is specified as a string (minimum length of+-- 1 and maximum length of 300). If no local disks are configured as+-- working storage, then the DiskIds array is empty.+--+-- 'gatewayARN', 'describeUploadBufferResponse_gatewayARN' - Undocumented member.+--+-- 'uploadBufferAllocatedInBytes', 'describeUploadBufferResponse_uploadBufferAllocatedInBytes' - The total number of bytes allocated in the gateway\'s as upload buffer.+--+-- 'uploadBufferUsedInBytes', 'describeUploadBufferResponse_uploadBufferUsedInBytes' - The total number of bytes being used in the gateway\'s upload buffer.+--+-- 'httpStatus', 'describeUploadBufferResponse_httpStatus' - The response's http status code.+newDescribeUploadBufferResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ DescribeUploadBufferResponse+newDescribeUploadBufferResponse pHttpStatus_ =+ DescribeUploadBufferResponse'+ { diskIds =+ Prelude.Nothing,+ gatewayARN = Prelude.Nothing,+ uploadBufferAllocatedInBytes =+ Prelude.Nothing,+ uploadBufferUsedInBytes = Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | An array of the gateway\'s local disk IDs that are configured as working+-- storage. Each local disk ID is specified as a string (minimum length of+-- 1 and maximum length of 300). If no local disks are configured as+-- working storage, then the DiskIds array is empty.+describeUploadBufferResponse_diskIds :: Lens.Lens' DescribeUploadBufferResponse (Prelude.Maybe [Prelude.Text])+describeUploadBufferResponse_diskIds = Lens.lens (\DescribeUploadBufferResponse' {diskIds} -> diskIds) (\s@DescribeUploadBufferResponse' {} a -> s {diskIds = a} :: DescribeUploadBufferResponse) Prelude.. Lens.mapping Lens.coerced++-- | Undocumented member.+describeUploadBufferResponse_gatewayARN :: Lens.Lens' DescribeUploadBufferResponse (Prelude.Maybe Prelude.Text)+describeUploadBufferResponse_gatewayARN = Lens.lens (\DescribeUploadBufferResponse' {gatewayARN} -> gatewayARN) (\s@DescribeUploadBufferResponse' {} a -> s {gatewayARN = a} :: DescribeUploadBufferResponse)++-- | The total number of bytes allocated in the gateway\'s as upload buffer.+describeUploadBufferResponse_uploadBufferAllocatedInBytes :: Lens.Lens' DescribeUploadBufferResponse (Prelude.Maybe Prelude.Integer)+describeUploadBufferResponse_uploadBufferAllocatedInBytes = Lens.lens (\DescribeUploadBufferResponse' {uploadBufferAllocatedInBytes} -> uploadBufferAllocatedInBytes) (\s@DescribeUploadBufferResponse' {} a -> s {uploadBufferAllocatedInBytes = a} :: DescribeUploadBufferResponse)++-- | The total number of bytes being used in the gateway\'s upload buffer.+describeUploadBufferResponse_uploadBufferUsedInBytes :: Lens.Lens' DescribeUploadBufferResponse (Prelude.Maybe Prelude.Integer)+describeUploadBufferResponse_uploadBufferUsedInBytes = Lens.lens (\DescribeUploadBufferResponse' {uploadBufferUsedInBytes} -> uploadBufferUsedInBytes) (\s@DescribeUploadBufferResponse' {} a -> s {uploadBufferUsedInBytes = a} :: DescribeUploadBufferResponse)++-- | The response's http status code.+describeUploadBufferResponse_httpStatus :: Lens.Lens' DescribeUploadBufferResponse Prelude.Int+describeUploadBufferResponse_httpStatus = Lens.lens (\DescribeUploadBufferResponse' {httpStatus} -> httpStatus) (\s@DescribeUploadBufferResponse' {} a -> s {httpStatus = a} :: DescribeUploadBufferResponse)++instance Prelude.NFData DescribeUploadBufferResponse where+ rnf DescribeUploadBufferResponse' {..} =+ Prelude.rnf diskIds+ `Prelude.seq` Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf uploadBufferAllocatedInBytes+ `Prelude.seq` Prelude.rnf uploadBufferUsedInBytes+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/DescribeVTLDevices.hs view
@@ -0,0 +1,302 @@+{-# 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.DescribeVTLDevices+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Returns a description of virtual tape library (VTL) devices for the+-- specified tape gateway. In the response, Storage Gateway returns VTL+-- device information.+--+-- This operation is only supported in the tape gateway type.+--+-- This operation returns paginated results.+module Amazonka.StorageGateway.DescribeVTLDevices+ ( -- * Creating a Request+ DescribeVTLDevices (..),+ newDescribeVTLDevices,++ -- * Request Lenses+ describeVTLDevices_limit,+ describeVTLDevices_marker,+ describeVTLDevices_vTLDeviceARNs,+ describeVTLDevices_gatewayARN,++ -- * Destructuring the Response+ DescribeVTLDevicesResponse (..),+ newDescribeVTLDevicesResponse,++ -- * Response Lenses+ describeVTLDevicesResponse_gatewayARN,+ describeVTLDevicesResponse_marker,+ describeVTLDevicesResponse_vTLDevices,+ describeVTLDevicesResponse_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++-- | DescribeVTLDevicesInput+--+-- /See:/ 'newDescribeVTLDevices' smart constructor.+data DescribeVTLDevices = DescribeVTLDevices'+ { -- | Specifies that the number of VTL devices described be limited to the+ -- specified number.+ limit :: Prelude.Maybe Prelude.Natural,+ -- | An opaque string that indicates the position at which to begin+ -- describing the VTL devices.+ marker :: Prelude.Maybe Prelude.Text,+ -- | An array of strings, where each string represents the Amazon Resource+ -- Name (ARN) of a VTL device.+ --+ -- All of the specified VTL devices must be from the same gateway. If no+ -- VTL devices are specified, the result will contain all devices on the+ -- specified gateway.+ vTLDeviceARNs :: Prelude.Maybe [Prelude.Text],+ gatewayARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeVTLDevices' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'limit', 'describeVTLDevices_limit' - Specifies that the number of VTL devices described be limited to the+-- specified number.+--+-- 'marker', 'describeVTLDevices_marker' - An opaque string that indicates the position at which to begin+-- describing the VTL devices.+--+-- 'vTLDeviceARNs', 'describeVTLDevices_vTLDeviceARNs' - An array of strings, where each string represents the Amazon Resource+-- Name (ARN) of a VTL device.+--+-- All of the specified VTL devices must be from the same gateway. If no+-- VTL devices are specified, the result will contain all devices on the+-- specified gateway.+--+-- 'gatewayARN', 'describeVTLDevices_gatewayARN' - Undocumented member.+newDescribeVTLDevices ::+ -- | 'gatewayARN'+ Prelude.Text ->+ DescribeVTLDevices+newDescribeVTLDevices pGatewayARN_ =+ DescribeVTLDevices'+ { limit = Prelude.Nothing,+ marker = Prelude.Nothing,+ vTLDeviceARNs = Prelude.Nothing,+ gatewayARN = pGatewayARN_+ }++-- | Specifies that the number of VTL devices described be limited to the+-- specified number.+describeVTLDevices_limit :: Lens.Lens' DescribeVTLDevices (Prelude.Maybe Prelude.Natural)+describeVTLDevices_limit = Lens.lens (\DescribeVTLDevices' {limit} -> limit) (\s@DescribeVTLDevices' {} a -> s {limit = a} :: DescribeVTLDevices)++-- | An opaque string that indicates the position at which to begin+-- describing the VTL devices.+describeVTLDevices_marker :: Lens.Lens' DescribeVTLDevices (Prelude.Maybe Prelude.Text)+describeVTLDevices_marker = Lens.lens (\DescribeVTLDevices' {marker} -> marker) (\s@DescribeVTLDevices' {} a -> s {marker = a} :: DescribeVTLDevices)++-- | An array of strings, where each string represents the Amazon Resource+-- Name (ARN) of a VTL device.+--+-- All of the specified VTL devices must be from the same gateway. If no+-- VTL devices are specified, the result will contain all devices on the+-- specified gateway.+describeVTLDevices_vTLDeviceARNs :: Lens.Lens' DescribeVTLDevices (Prelude.Maybe [Prelude.Text])+describeVTLDevices_vTLDeviceARNs = Lens.lens (\DescribeVTLDevices' {vTLDeviceARNs} -> vTLDeviceARNs) (\s@DescribeVTLDevices' {} a -> s {vTLDeviceARNs = a} :: DescribeVTLDevices) Prelude.. Lens.mapping Lens.coerced++-- | Undocumented member.+describeVTLDevices_gatewayARN :: Lens.Lens' DescribeVTLDevices Prelude.Text+describeVTLDevices_gatewayARN = Lens.lens (\DescribeVTLDevices' {gatewayARN} -> gatewayARN) (\s@DescribeVTLDevices' {} a -> s {gatewayARN = a} :: DescribeVTLDevices)++instance Core.AWSPager DescribeVTLDevices where+ page rq rs+ | Core.stop+ ( rs+ Lens.^? describeVTLDevicesResponse_marker+ Prelude.. Lens._Just+ ) =+ Prelude.Nothing+ | Core.stop+ ( rs+ Lens.^? describeVTLDevicesResponse_vTLDevices+ Prelude.. Lens._Just+ ) =+ Prelude.Nothing+ | Prelude.otherwise =+ Prelude.Just+ Prelude.$ rq+ Prelude.& describeVTLDevices_marker+ Lens..~ rs+ Lens.^? describeVTLDevicesResponse_marker+ Prelude.. Lens._Just++instance Core.AWSRequest DescribeVTLDevices where+ type+ AWSResponse DescribeVTLDevices =+ DescribeVTLDevicesResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ DescribeVTLDevicesResponse'+ Prelude.<$> (x Data..?> "GatewayARN")+ Prelude.<*> (x Data..?> "Marker")+ Prelude.<*> (x Data..?> "VTLDevices" Core..!@ Prelude.mempty)+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable DescribeVTLDevices where+ hashWithSalt _salt DescribeVTLDevices' {..} =+ _salt+ `Prelude.hashWithSalt` limit+ `Prelude.hashWithSalt` marker+ `Prelude.hashWithSalt` vTLDeviceARNs+ `Prelude.hashWithSalt` gatewayARN++instance Prelude.NFData DescribeVTLDevices where+ rnf DescribeVTLDevices' {..} =+ Prelude.rnf limit+ `Prelude.seq` Prelude.rnf marker+ `Prelude.seq` Prelude.rnf vTLDeviceARNs+ `Prelude.seq` Prelude.rnf gatewayARN++instance Data.ToHeaders DescribeVTLDevices where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.DescribeVTLDevices" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON DescribeVTLDevices where+ toJSON DescribeVTLDevices' {..} =+ Data.object+ ( Prelude.catMaybes+ [ ("Limit" Data..=) Prelude.<$> limit,+ ("Marker" Data..=) Prelude.<$> marker,+ ("VTLDeviceARNs" Data..=) Prelude.<$> vTLDeviceARNs,+ Prelude.Just ("GatewayARN" Data..= gatewayARN)+ ]+ )++instance Data.ToPath DescribeVTLDevices where+ toPath = Prelude.const "/"++instance Data.ToQuery DescribeVTLDevices where+ toQuery = Prelude.const Prelude.mempty++-- | DescribeVTLDevicesOutput+--+-- /See:/ 'newDescribeVTLDevicesResponse' smart constructor.+data DescribeVTLDevicesResponse = DescribeVTLDevicesResponse'+ { gatewayARN :: Prelude.Maybe Prelude.Text,+ -- | An opaque string that indicates the position at which the VTL devices+ -- that were fetched for description ended. Use the marker in your next+ -- request to fetch the next set of VTL devices in the list. If there are+ -- no more VTL devices to describe, this field does not appear in the+ -- response.+ marker :: Prelude.Maybe Prelude.Text,+ -- | An array of VTL device objects composed of the Amazon Resource Name+ -- (ARN) of the VTL devices.+ vTLDevices :: Prelude.Maybe [VTLDevice],+ -- | The response's http status code.+ httpStatus :: Prelude.Int+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeVTLDevicesResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'describeVTLDevicesResponse_gatewayARN' - Undocumented member.+--+-- 'marker', 'describeVTLDevicesResponse_marker' - An opaque string that indicates the position at which the VTL devices+-- that were fetched for description ended. Use the marker in your next+-- request to fetch the next set of VTL devices in the list. If there are+-- no more VTL devices to describe, this field does not appear in the+-- response.+--+-- 'vTLDevices', 'describeVTLDevicesResponse_vTLDevices' - An array of VTL device objects composed of the Amazon Resource Name+-- (ARN) of the VTL devices.+--+-- 'httpStatus', 'describeVTLDevicesResponse_httpStatus' - The response's http status code.+newDescribeVTLDevicesResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ DescribeVTLDevicesResponse+newDescribeVTLDevicesResponse pHttpStatus_ =+ DescribeVTLDevicesResponse'+ { gatewayARN =+ Prelude.Nothing,+ marker = Prelude.Nothing,+ vTLDevices = Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | Undocumented member.+describeVTLDevicesResponse_gatewayARN :: Lens.Lens' DescribeVTLDevicesResponse (Prelude.Maybe Prelude.Text)+describeVTLDevicesResponse_gatewayARN = Lens.lens (\DescribeVTLDevicesResponse' {gatewayARN} -> gatewayARN) (\s@DescribeVTLDevicesResponse' {} a -> s {gatewayARN = a} :: DescribeVTLDevicesResponse)++-- | An opaque string that indicates the position at which the VTL devices+-- that were fetched for description ended. Use the marker in your next+-- request to fetch the next set of VTL devices in the list. If there are+-- no more VTL devices to describe, this field does not appear in the+-- response.+describeVTLDevicesResponse_marker :: Lens.Lens' DescribeVTLDevicesResponse (Prelude.Maybe Prelude.Text)+describeVTLDevicesResponse_marker = Lens.lens (\DescribeVTLDevicesResponse' {marker} -> marker) (\s@DescribeVTLDevicesResponse' {} a -> s {marker = a} :: DescribeVTLDevicesResponse)++-- | An array of VTL device objects composed of the Amazon Resource Name+-- (ARN) of the VTL devices.+describeVTLDevicesResponse_vTLDevices :: Lens.Lens' DescribeVTLDevicesResponse (Prelude.Maybe [VTLDevice])+describeVTLDevicesResponse_vTLDevices = Lens.lens (\DescribeVTLDevicesResponse' {vTLDevices} -> vTLDevices) (\s@DescribeVTLDevicesResponse' {} a -> s {vTLDevices = a} :: DescribeVTLDevicesResponse) Prelude.. Lens.mapping Lens.coerced++-- | The response's http status code.+describeVTLDevicesResponse_httpStatus :: Lens.Lens' DescribeVTLDevicesResponse Prelude.Int+describeVTLDevicesResponse_httpStatus = Lens.lens (\DescribeVTLDevicesResponse' {httpStatus} -> httpStatus) (\s@DescribeVTLDevicesResponse' {} a -> s {httpStatus = a} :: DescribeVTLDevicesResponse)++instance Prelude.NFData DescribeVTLDevicesResponse where+ rnf DescribeVTLDevicesResponse' {..} =+ Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf marker+ `Prelude.seq` Prelude.rnf vTLDevices+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/DescribeWorkingStorage.hs view
@@ -0,0 +1,236 @@+{-# 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.DescribeWorkingStorage+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Returns information about the working storage of a gateway. This+-- operation is only supported in the stored volumes gateway type. This+-- operation is deprecated in cached volumes API version (20120630). Use+-- DescribeUploadBuffer instead.+--+-- Working storage is also referred to as upload buffer. You can also use+-- the DescribeUploadBuffer operation to add upload buffer to a stored+-- volume gateway.+--+-- The response includes disk IDs that are configured as working storage,+-- and it includes the amount of working storage allocated and used.+module Amazonka.StorageGateway.DescribeWorkingStorage+ ( -- * Creating a Request+ DescribeWorkingStorage (..),+ newDescribeWorkingStorage,++ -- * Request Lenses+ describeWorkingStorage_gatewayARN,++ -- * Destructuring the Response+ DescribeWorkingStorageResponse (..),+ newDescribeWorkingStorageResponse,++ -- * Response Lenses+ describeWorkingStorageResponse_diskIds,+ describeWorkingStorageResponse_gatewayARN,+ describeWorkingStorageResponse_workingStorageAllocatedInBytes,+ describeWorkingStorageResponse_workingStorageUsedInBytes,+ describeWorkingStorageResponse_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++-- | A JSON object containing the Amazon Resource Name (ARN) of the gateway.+--+-- /See:/ 'newDescribeWorkingStorage' smart constructor.+data DescribeWorkingStorage = DescribeWorkingStorage'+ { gatewayARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeWorkingStorage' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'describeWorkingStorage_gatewayARN' - Undocumented member.+newDescribeWorkingStorage ::+ -- | 'gatewayARN'+ Prelude.Text ->+ DescribeWorkingStorage+newDescribeWorkingStorage pGatewayARN_ =+ DescribeWorkingStorage' {gatewayARN = pGatewayARN_}++-- | Undocumented member.+describeWorkingStorage_gatewayARN :: Lens.Lens' DescribeWorkingStorage Prelude.Text+describeWorkingStorage_gatewayARN = Lens.lens (\DescribeWorkingStorage' {gatewayARN} -> gatewayARN) (\s@DescribeWorkingStorage' {} a -> s {gatewayARN = a} :: DescribeWorkingStorage)++instance Core.AWSRequest DescribeWorkingStorage where+ type+ AWSResponse DescribeWorkingStorage =+ DescribeWorkingStorageResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ DescribeWorkingStorageResponse'+ Prelude.<$> (x Data..?> "DiskIds" Core..!@ Prelude.mempty)+ Prelude.<*> (x Data..?> "GatewayARN")+ Prelude.<*> (x Data..?> "WorkingStorageAllocatedInBytes")+ Prelude.<*> (x Data..?> "WorkingStorageUsedInBytes")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable DescribeWorkingStorage where+ hashWithSalt _salt DescribeWorkingStorage' {..} =+ _salt `Prelude.hashWithSalt` gatewayARN++instance Prelude.NFData DescribeWorkingStorage where+ rnf DescribeWorkingStorage' {..} =+ Prelude.rnf gatewayARN++instance Data.ToHeaders DescribeWorkingStorage where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.DescribeWorkingStorage" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON DescribeWorkingStorage where+ toJSON DescribeWorkingStorage' {..} =+ Data.object+ ( Prelude.catMaybes+ [Prelude.Just ("GatewayARN" Data..= gatewayARN)]+ )++instance Data.ToPath DescribeWorkingStorage where+ toPath = Prelude.const "/"++instance Data.ToQuery DescribeWorkingStorage where+ toQuery = Prelude.const Prelude.mempty++-- | A JSON object containing the following fields:+--+-- /See:/ 'newDescribeWorkingStorageResponse' smart constructor.+data DescribeWorkingStorageResponse = DescribeWorkingStorageResponse'+ { -- | An array of the gateway\'s local disk IDs that are configured as working+ -- storage. Each local disk ID is specified as a string (minimum length of+ -- 1 and maximum length of 300). If no local disks are configured as+ -- working storage, then the DiskIds array is empty.+ diskIds :: Prelude.Maybe [Prelude.Text],+ gatewayARN :: Prelude.Maybe Prelude.Text,+ -- | The total working storage in bytes allocated for the gateway. If no+ -- working storage is configured for the gateway, this field returns 0.+ workingStorageAllocatedInBytes :: Prelude.Maybe Prelude.Integer,+ -- | The total working storage in bytes in use by the gateway. If no working+ -- storage is configured for the gateway, this field returns 0.+ workingStorageUsedInBytes :: Prelude.Maybe Prelude.Integer,+ -- | The response's http status code.+ httpStatus :: Prelude.Int+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DescribeWorkingStorageResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'diskIds', 'describeWorkingStorageResponse_diskIds' - An array of the gateway\'s local disk IDs that are configured as working+-- storage. Each local disk ID is specified as a string (minimum length of+-- 1 and maximum length of 300). If no local disks are configured as+-- working storage, then the DiskIds array is empty.+--+-- 'gatewayARN', 'describeWorkingStorageResponse_gatewayARN' - Undocumented member.+--+-- 'workingStorageAllocatedInBytes', 'describeWorkingStorageResponse_workingStorageAllocatedInBytes' - The total working storage in bytes allocated for the gateway. If no+-- working storage is configured for the gateway, this field returns 0.+--+-- 'workingStorageUsedInBytes', 'describeWorkingStorageResponse_workingStorageUsedInBytes' - The total working storage in bytes in use by the gateway. If no working+-- storage is configured for the gateway, this field returns 0.+--+-- 'httpStatus', 'describeWorkingStorageResponse_httpStatus' - The response's http status code.+newDescribeWorkingStorageResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ DescribeWorkingStorageResponse+newDescribeWorkingStorageResponse pHttpStatus_ =+ DescribeWorkingStorageResponse'+ { diskIds =+ Prelude.Nothing,+ gatewayARN = Prelude.Nothing,+ workingStorageAllocatedInBytes =+ Prelude.Nothing,+ workingStorageUsedInBytes = Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | An array of the gateway\'s local disk IDs that are configured as working+-- storage. Each local disk ID is specified as a string (minimum length of+-- 1 and maximum length of 300). If no local disks are configured as+-- working storage, then the DiskIds array is empty.+describeWorkingStorageResponse_diskIds :: Lens.Lens' DescribeWorkingStorageResponse (Prelude.Maybe [Prelude.Text])+describeWorkingStorageResponse_diskIds = Lens.lens (\DescribeWorkingStorageResponse' {diskIds} -> diskIds) (\s@DescribeWorkingStorageResponse' {} a -> s {diskIds = a} :: DescribeWorkingStorageResponse) Prelude.. Lens.mapping Lens.coerced++-- | Undocumented member.+describeWorkingStorageResponse_gatewayARN :: Lens.Lens' DescribeWorkingStorageResponse (Prelude.Maybe Prelude.Text)+describeWorkingStorageResponse_gatewayARN = Lens.lens (\DescribeWorkingStorageResponse' {gatewayARN} -> gatewayARN) (\s@DescribeWorkingStorageResponse' {} a -> s {gatewayARN = a} :: DescribeWorkingStorageResponse)++-- | The total working storage in bytes allocated for the gateway. If no+-- working storage is configured for the gateway, this field returns 0.+describeWorkingStorageResponse_workingStorageAllocatedInBytes :: Lens.Lens' DescribeWorkingStorageResponse (Prelude.Maybe Prelude.Integer)+describeWorkingStorageResponse_workingStorageAllocatedInBytes = Lens.lens (\DescribeWorkingStorageResponse' {workingStorageAllocatedInBytes} -> workingStorageAllocatedInBytes) (\s@DescribeWorkingStorageResponse' {} a -> s {workingStorageAllocatedInBytes = a} :: DescribeWorkingStorageResponse)++-- | The total working storage in bytes in use by the gateway. If no working+-- storage is configured for the gateway, this field returns 0.+describeWorkingStorageResponse_workingStorageUsedInBytes :: Lens.Lens' DescribeWorkingStorageResponse (Prelude.Maybe Prelude.Integer)+describeWorkingStorageResponse_workingStorageUsedInBytes = Lens.lens (\DescribeWorkingStorageResponse' {workingStorageUsedInBytes} -> workingStorageUsedInBytes) (\s@DescribeWorkingStorageResponse' {} a -> s {workingStorageUsedInBytes = a} :: DescribeWorkingStorageResponse)++-- | The response's http status code.+describeWorkingStorageResponse_httpStatus :: Lens.Lens' DescribeWorkingStorageResponse Prelude.Int+describeWorkingStorageResponse_httpStatus = Lens.lens (\DescribeWorkingStorageResponse' {httpStatus} -> httpStatus) (\s@DescribeWorkingStorageResponse' {} a -> s {httpStatus = a} :: DescribeWorkingStorageResponse)++instance+ Prelude.NFData+ DescribeWorkingStorageResponse+ where+ rnf DescribeWorkingStorageResponse' {..} =+ Prelude.rnf diskIds+ `Prelude.seq` Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf workingStorageAllocatedInBytes+ `Prelude.seq` Prelude.rnf workingStorageUsedInBytes+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/DetachVolume.hs view
@@ -0,0 +1,207 @@+{-# 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.DetachVolume+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Disconnects a volume from an iSCSI connection and then detaches the+-- volume from the specified gateway. Detaching and attaching a volume+-- enables you to recover your data from one gateway to a different gateway+-- without creating a snapshot. It also makes it easier to move your+-- volumes from an on-premises gateway to a gateway hosted on an Amazon EC2+-- instance. This operation is only supported in the volume gateway type.+module Amazonka.StorageGateway.DetachVolume+ ( -- * Creating a Request+ DetachVolume (..),+ newDetachVolume,++ -- * Request Lenses+ detachVolume_forceDetach,+ detachVolume_volumeARN,++ -- * Destructuring the Response+ DetachVolumeResponse (..),+ newDetachVolumeResponse,++ -- * Response Lenses+ detachVolumeResponse_volumeARN,+ detachVolumeResponse_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++-- | AttachVolumeInput+--+-- /See:/ 'newDetachVolume' smart constructor.+data DetachVolume = DetachVolume'+ { -- | Set to @true@ to forcibly remove the iSCSI connection of the target+ -- volume and detach the volume. The default is @false@. If this value is+ -- set to @false@, you must manually disconnect the iSCSI connection from+ -- the target volume.+ --+ -- Valid Values: @true@ | @false@+ forceDetach :: Prelude.Maybe Prelude.Bool,+ -- | The Amazon Resource Name (ARN) of the volume to detach from the gateway.+ volumeARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DetachVolume' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'forceDetach', 'detachVolume_forceDetach' - Set to @true@ to forcibly remove the iSCSI connection of the target+-- volume and detach the volume. The default is @false@. If this value is+-- set to @false@, you must manually disconnect the iSCSI connection from+-- the target volume.+--+-- Valid Values: @true@ | @false@+--+-- 'volumeARN', 'detachVolume_volumeARN' - The Amazon Resource Name (ARN) of the volume to detach from the gateway.+newDetachVolume ::+ -- | 'volumeARN'+ Prelude.Text ->+ DetachVolume+newDetachVolume pVolumeARN_ =+ DetachVolume'+ { forceDetach = Prelude.Nothing,+ volumeARN = pVolumeARN_+ }++-- | Set to @true@ to forcibly remove the iSCSI connection of the target+-- volume and detach the volume. The default is @false@. If this value is+-- set to @false@, you must manually disconnect the iSCSI connection from+-- the target volume.+--+-- Valid Values: @true@ | @false@+detachVolume_forceDetach :: Lens.Lens' DetachVolume (Prelude.Maybe Prelude.Bool)+detachVolume_forceDetach = Lens.lens (\DetachVolume' {forceDetach} -> forceDetach) (\s@DetachVolume' {} a -> s {forceDetach = a} :: DetachVolume)++-- | The Amazon Resource Name (ARN) of the volume to detach from the gateway.+detachVolume_volumeARN :: Lens.Lens' DetachVolume Prelude.Text+detachVolume_volumeARN = Lens.lens (\DetachVolume' {volumeARN} -> volumeARN) (\s@DetachVolume' {} a -> s {volumeARN = a} :: DetachVolume)++instance Core.AWSRequest DetachVolume where+ type AWSResponse DetachVolume = DetachVolumeResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ DetachVolumeResponse'+ Prelude.<$> (x Data..?> "VolumeARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable DetachVolume where+ hashWithSalt _salt DetachVolume' {..} =+ _salt+ `Prelude.hashWithSalt` forceDetach+ `Prelude.hashWithSalt` volumeARN++instance Prelude.NFData DetachVolume where+ rnf DetachVolume' {..} =+ Prelude.rnf forceDetach+ `Prelude.seq` Prelude.rnf volumeARN++instance Data.ToHeaders DetachVolume where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.DetachVolume" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON DetachVolume where+ toJSON DetachVolume' {..} =+ Data.object+ ( Prelude.catMaybes+ [ ("ForceDetach" Data..=) Prelude.<$> forceDetach,+ Prelude.Just ("VolumeARN" Data..= volumeARN)+ ]+ )++instance Data.ToPath DetachVolume where+ toPath = Prelude.const "/"++instance Data.ToQuery DetachVolume where+ toQuery = Prelude.const Prelude.mempty++-- | AttachVolumeOutput+--+-- /See:/ 'newDetachVolumeResponse' smart constructor.+data DetachVolumeResponse = DetachVolumeResponse'+ { -- | The Amazon Resource Name (ARN) of the volume that was detached.+ volumeARN :: 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 'DetachVolumeResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'volumeARN', 'detachVolumeResponse_volumeARN' - The Amazon Resource Name (ARN) of the volume that was detached.+--+-- 'httpStatus', 'detachVolumeResponse_httpStatus' - The response's http status code.+newDetachVolumeResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ DetachVolumeResponse+newDetachVolumeResponse pHttpStatus_ =+ DetachVolumeResponse'+ { volumeARN = Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | The Amazon Resource Name (ARN) of the volume that was detached.+detachVolumeResponse_volumeARN :: Lens.Lens' DetachVolumeResponse (Prelude.Maybe Prelude.Text)+detachVolumeResponse_volumeARN = Lens.lens (\DetachVolumeResponse' {volumeARN} -> volumeARN) (\s@DetachVolumeResponse' {} a -> s {volumeARN = a} :: DetachVolumeResponse)++-- | The response's http status code.+detachVolumeResponse_httpStatus :: Lens.Lens' DetachVolumeResponse Prelude.Int+detachVolumeResponse_httpStatus = Lens.lens (\DetachVolumeResponse' {httpStatus} -> httpStatus) (\s@DetachVolumeResponse' {} a -> s {httpStatus = a} :: DetachVolumeResponse)++instance Prelude.NFData DetachVolumeResponse where+ rnf DetachVolumeResponse' {..} =+ Prelude.rnf volumeARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/DisableGateway.hs view
@@ -0,0 +1,178 @@+{-# 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.DisableGateway+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Disables a tape gateway when the gateway is no longer functioning. For+-- example, if your gateway VM is damaged, you can disable the gateway so+-- you can recover virtual tapes.+--+-- Use this operation for a tape gateway that is not reachable or not+-- functioning. This operation is only supported in the tape gateway type.+--+-- After a gateway is disabled, it cannot be enabled.+module Amazonka.StorageGateway.DisableGateway+ ( -- * Creating a Request+ DisableGateway (..),+ newDisableGateway,++ -- * Request Lenses+ disableGateway_gatewayARN,++ -- * Destructuring the Response+ DisableGatewayResponse (..),+ newDisableGatewayResponse,++ -- * Response Lenses+ disableGatewayResponse_gatewayARN,+ disableGatewayResponse_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++-- | DisableGatewayInput+--+-- /See:/ 'newDisableGateway' smart constructor.+data DisableGateway = DisableGateway'+ { gatewayARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DisableGateway' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'disableGateway_gatewayARN' - Undocumented member.+newDisableGateway ::+ -- | 'gatewayARN'+ Prelude.Text ->+ DisableGateway+newDisableGateway pGatewayARN_ =+ DisableGateway' {gatewayARN = pGatewayARN_}++-- | Undocumented member.+disableGateway_gatewayARN :: Lens.Lens' DisableGateway Prelude.Text+disableGateway_gatewayARN = Lens.lens (\DisableGateway' {gatewayARN} -> gatewayARN) (\s@DisableGateway' {} a -> s {gatewayARN = a} :: DisableGateway)++instance Core.AWSRequest DisableGateway where+ type+ AWSResponse DisableGateway =+ DisableGatewayResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ DisableGatewayResponse'+ Prelude.<$> (x Data..?> "GatewayARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable DisableGateway where+ hashWithSalt _salt DisableGateway' {..} =+ _salt `Prelude.hashWithSalt` gatewayARN++instance Prelude.NFData DisableGateway where+ rnf DisableGateway' {..} = Prelude.rnf gatewayARN++instance Data.ToHeaders DisableGateway where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.DisableGateway" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON DisableGateway where+ toJSON DisableGateway' {..} =+ Data.object+ ( Prelude.catMaybes+ [Prelude.Just ("GatewayARN" Data..= gatewayARN)]+ )++instance Data.ToPath DisableGateway where+ toPath = Prelude.const "/"++instance Data.ToQuery DisableGateway where+ toQuery = Prelude.const Prelude.mempty++-- | DisableGatewayOutput+--+-- /See:/ 'newDisableGatewayResponse' smart constructor.+data DisableGatewayResponse = DisableGatewayResponse'+ { -- | The unique Amazon Resource Name (ARN) of the disabled gateway.+ gatewayARN :: 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 'DisableGatewayResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'disableGatewayResponse_gatewayARN' - The unique Amazon Resource Name (ARN) of the disabled gateway.+--+-- 'httpStatus', 'disableGatewayResponse_httpStatus' - The response's http status code.+newDisableGatewayResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ DisableGatewayResponse+newDisableGatewayResponse pHttpStatus_ =+ DisableGatewayResponse'+ { gatewayARN =+ Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | The unique Amazon Resource Name (ARN) of the disabled gateway.+disableGatewayResponse_gatewayARN :: Lens.Lens' DisableGatewayResponse (Prelude.Maybe Prelude.Text)+disableGatewayResponse_gatewayARN = Lens.lens (\DisableGatewayResponse' {gatewayARN} -> gatewayARN) (\s@DisableGatewayResponse' {} a -> s {gatewayARN = a} :: DisableGatewayResponse)++-- | The response's http status code.+disableGatewayResponse_httpStatus :: Lens.Lens' DisableGatewayResponse Prelude.Int+disableGatewayResponse_httpStatus = Lens.lens (\DisableGatewayResponse' {httpStatus} -> httpStatus) (\s@DisableGatewayResponse' {} a -> s {httpStatus = a} :: DisableGatewayResponse)++instance Prelude.NFData DisableGatewayResponse where+ rnf DisableGatewayResponse' {..} =+ Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/DisassociateFileSystem.hs view
@@ -0,0 +1,212 @@+{-# 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.DisassociateFileSystem+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Disassociates an Amazon FSx file system from the specified gateway.+-- After the disassociation process finishes, the gateway can no longer+-- access the Amazon FSx file system. This operation is only supported in+-- the FSx File Gateway type.+module Amazonka.StorageGateway.DisassociateFileSystem+ ( -- * Creating a Request+ DisassociateFileSystem (..),+ newDisassociateFileSystem,++ -- * Request Lenses+ disassociateFileSystem_forceDelete,+ disassociateFileSystem_fileSystemAssociationARN,++ -- * Destructuring the Response+ DisassociateFileSystemResponse (..),+ newDisassociateFileSystemResponse,++ -- * Response Lenses+ disassociateFileSystemResponse_fileSystemAssociationARN,+ disassociateFileSystemResponse_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++-- | /See:/ 'newDisassociateFileSystem' smart constructor.+data DisassociateFileSystem = DisassociateFileSystem'+ { -- | If this value is set to true, the operation disassociates an Amazon FSx+ -- file system immediately. It ends all data uploads to the file system,+ -- and the file system association enters the @FORCE_DELETING@ status. If+ -- this value is set to false, the Amazon FSx file system does not+ -- disassociate until all data is uploaded.+ forceDelete :: Prelude.Maybe Prelude.Bool,+ -- | The Amazon Resource Name (ARN) of the file system association to be+ -- deleted.+ fileSystemAssociationARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DisassociateFileSystem' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'forceDelete', 'disassociateFileSystem_forceDelete' - If this value is set to true, the operation disassociates an Amazon FSx+-- file system immediately. It ends all data uploads to the file system,+-- and the file system association enters the @FORCE_DELETING@ status. If+-- this value is set to false, the Amazon FSx file system does not+-- disassociate until all data is uploaded.+--+-- 'fileSystemAssociationARN', 'disassociateFileSystem_fileSystemAssociationARN' - The Amazon Resource Name (ARN) of the file system association to be+-- deleted.+newDisassociateFileSystem ::+ -- | 'fileSystemAssociationARN'+ Prelude.Text ->+ DisassociateFileSystem+newDisassociateFileSystem pFileSystemAssociationARN_ =+ DisassociateFileSystem'+ { forceDelete =+ Prelude.Nothing,+ fileSystemAssociationARN =+ pFileSystemAssociationARN_+ }++-- | If this value is set to true, the operation disassociates an Amazon FSx+-- file system immediately. It ends all data uploads to the file system,+-- and the file system association enters the @FORCE_DELETING@ status. If+-- this value is set to false, the Amazon FSx file system does not+-- disassociate until all data is uploaded.+disassociateFileSystem_forceDelete :: Lens.Lens' DisassociateFileSystem (Prelude.Maybe Prelude.Bool)+disassociateFileSystem_forceDelete = Lens.lens (\DisassociateFileSystem' {forceDelete} -> forceDelete) (\s@DisassociateFileSystem' {} a -> s {forceDelete = a} :: DisassociateFileSystem)++-- | The Amazon Resource Name (ARN) of the file system association to be+-- deleted.+disassociateFileSystem_fileSystemAssociationARN :: Lens.Lens' DisassociateFileSystem Prelude.Text+disassociateFileSystem_fileSystemAssociationARN = Lens.lens (\DisassociateFileSystem' {fileSystemAssociationARN} -> fileSystemAssociationARN) (\s@DisassociateFileSystem' {} a -> s {fileSystemAssociationARN = a} :: DisassociateFileSystem)++instance Core.AWSRequest DisassociateFileSystem where+ type+ AWSResponse DisassociateFileSystem =+ DisassociateFileSystemResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ DisassociateFileSystemResponse'+ Prelude.<$> (x Data..?> "FileSystemAssociationARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable DisassociateFileSystem where+ hashWithSalt _salt DisassociateFileSystem' {..} =+ _salt+ `Prelude.hashWithSalt` forceDelete+ `Prelude.hashWithSalt` fileSystemAssociationARN++instance Prelude.NFData DisassociateFileSystem where+ rnf DisassociateFileSystem' {..} =+ Prelude.rnf forceDelete+ `Prelude.seq` Prelude.rnf fileSystemAssociationARN++instance Data.ToHeaders DisassociateFileSystem where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.DisassociateFileSystem" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON DisassociateFileSystem where+ toJSON DisassociateFileSystem' {..} =+ Data.object+ ( Prelude.catMaybes+ [ ("ForceDelete" Data..=) Prelude.<$> forceDelete,+ Prelude.Just+ ( "FileSystemAssociationARN"+ Data..= fileSystemAssociationARN+ )+ ]+ )++instance Data.ToPath DisassociateFileSystem where+ toPath = Prelude.const "/"++instance Data.ToQuery DisassociateFileSystem where+ toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newDisassociateFileSystemResponse' smart constructor.+data DisassociateFileSystemResponse = DisassociateFileSystemResponse'+ { -- | The Amazon Resource Name (ARN) of the deleted file system association.+ fileSystemAssociationARN :: 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 'DisassociateFileSystemResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'fileSystemAssociationARN', 'disassociateFileSystemResponse_fileSystemAssociationARN' - The Amazon Resource Name (ARN) of the deleted file system association.+--+-- 'httpStatus', 'disassociateFileSystemResponse_httpStatus' - The response's http status code.+newDisassociateFileSystemResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ DisassociateFileSystemResponse+newDisassociateFileSystemResponse pHttpStatus_ =+ DisassociateFileSystemResponse'+ { fileSystemAssociationARN =+ Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | The Amazon Resource Name (ARN) of the deleted file system association.+disassociateFileSystemResponse_fileSystemAssociationARN :: Lens.Lens' DisassociateFileSystemResponse (Prelude.Maybe Prelude.Text)+disassociateFileSystemResponse_fileSystemAssociationARN = Lens.lens (\DisassociateFileSystemResponse' {fileSystemAssociationARN} -> fileSystemAssociationARN) (\s@DisassociateFileSystemResponse' {} a -> s {fileSystemAssociationARN = a} :: DisassociateFileSystemResponse)++-- | The response's http status code.+disassociateFileSystemResponse_httpStatus :: Lens.Lens' DisassociateFileSystemResponse Prelude.Int+disassociateFileSystemResponse_httpStatus = Lens.lens (\DisassociateFileSystemResponse' {httpStatus} -> httpStatus) (\s@DisassociateFileSystemResponse' {} a -> s {httpStatus = a} :: DisassociateFileSystemResponse)++instance+ Prelude.NFData+ DisassociateFileSystemResponse+ where+ rnf DisassociateFileSystemResponse' {..} =+ Prelude.rnf fileSystemAssociationARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/JoinDomain.hs view
@@ -0,0 +1,378 @@+{-# 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.JoinDomain+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Adds a file gateway to an Active Directory domain. This operation is+-- only supported for file gateways that support the SMB file protocol.+module Amazonka.StorageGateway.JoinDomain+ ( -- * Creating a Request+ JoinDomain (..),+ newJoinDomain,++ -- * Request Lenses+ joinDomain_domainControllers,+ joinDomain_organizationalUnit,+ joinDomain_timeoutInSeconds,+ joinDomain_gatewayARN,+ joinDomain_domainName,+ joinDomain_userName,+ joinDomain_password,++ -- * Destructuring the Response+ JoinDomainResponse (..),+ newJoinDomainResponse,++ -- * Response Lenses+ joinDomainResponse_activeDirectoryStatus,+ joinDomainResponse_gatewayARN,+ joinDomainResponse_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++-- | JoinDomainInput+--+-- /See:/ 'newJoinDomain' smart constructor.+data JoinDomain = JoinDomain'+ { -- | List of IPv4 addresses, NetBIOS names, or host names of your domain+ -- server. If you need to specify the port number include it after the+ -- colon (“:”). For example, @mydc.mydomain.com:389@.+ domainControllers :: Prelude.Maybe [Prelude.Text],+ -- | The organizational unit (OU) is a container in an Active Directory that+ -- can hold users, groups, computers, and other OUs and this parameter+ -- specifies the OU that the gateway will join within the AD domain.+ organizationalUnit :: Prelude.Maybe Prelude.Text,+ -- | Specifies the time in seconds, in which the @JoinDomain@ operation must+ -- complete. The default is 20 seconds.+ timeoutInSeconds :: Prelude.Maybe Prelude.Natural,+ -- | The Amazon Resource Name (ARN) of the gateway. Use the @ListGateways@+ -- operation to return a list of gateways for your account and Amazon Web+ -- Services Region.+ gatewayARN :: Prelude.Text,+ -- | The name of the domain that you want the gateway to join.+ domainName :: Prelude.Text,+ -- | Sets the user name of user who has permission to add the gateway to the+ -- Active Directory domain. The domain user account should be enabled to+ -- join computers to the domain. For example, you can use the domain+ -- administrator account or an account with delegated permissions to join+ -- computers to the domain.+ userName :: Prelude.Text,+ -- | Sets the password of the user who has permission to add the gateway to+ -- the Active Directory domain.+ password :: Data.Sensitive Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'JoinDomain' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'domainControllers', 'joinDomain_domainControllers' - List of IPv4 addresses, NetBIOS names, or host names of your domain+-- server. If you need to specify the port number include it after the+-- colon (“:”). For example, @mydc.mydomain.com:389@.+--+-- 'organizationalUnit', 'joinDomain_organizationalUnit' - The organizational unit (OU) is a container in an Active Directory that+-- can hold users, groups, computers, and other OUs and this parameter+-- specifies the OU that the gateway will join within the AD domain.+--+-- 'timeoutInSeconds', 'joinDomain_timeoutInSeconds' - Specifies the time in seconds, in which the @JoinDomain@ operation must+-- complete. The default is 20 seconds.+--+-- 'gatewayARN', 'joinDomain_gatewayARN' - The Amazon Resource Name (ARN) of the gateway. Use the @ListGateways@+-- operation to return a list of gateways for your account and Amazon Web+-- Services Region.+--+-- 'domainName', 'joinDomain_domainName' - The name of the domain that you want the gateway to join.+--+-- 'userName', 'joinDomain_userName' - Sets the user name of user who has permission to add the gateway to the+-- Active Directory domain. The domain user account should be enabled to+-- join computers to the domain. For example, you can use the domain+-- administrator account or an account with delegated permissions to join+-- computers to the domain.+--+-- 'password', 'joinDomain_password' - Sets the password of the user who has permission to add the gateway to+-- the Active Directory domain.+newJoinDomain ::+ -- | 'gatewayARN'+ Prelude.Text ->+ -- | 'domainName'+ Prelude.Text ->+ -- | 'userName'+ Prelude.Text ->+ -- | 'password'+ Prelude.Text ->+ JoinDomain+newJoinDomain+ pGatewayARN_+ pDomainName_+ pUserName_+ pPassword_ =+ JoinDomain'+ { domainControllers = Prelude.Nothing,+ organizationalUnit = Prelude.Nothing,+ timeoutInSeconds = Prelude.Nothing,+ gatewayARN = pGatewayARN_,+ domainName = pDomainName_,+ userName = pUserName_,+ password = Data._Sensitive Lens.# pPassword_+ }++-- | List of IPv4 addresses, NetBIOS names, or host names of your domain+-- server. If you need to specify the port number include it after the+-- colon (“:”). For example, @mydc.mydomain.com:389@.+joinDomain_domainControllers :: Lens.Lens' JoinDomain (Prelude.Maybe [Prelude.Text])+joinDomain_domainControllers = Lens.lens (\JoinDomain' {domainControllers} -> domainControllers) (\s@JoinDomain' {} a -> s {domainControllers = a} :: JoinDomain) Prelude.. Lens.mapping Lens.coerced++-- | The organizational unit (OU) is a container in an Active Directory that+-- can hold users, groups, computers, and other OUs and this parameter+-- specifies the OU that the gateway will join within the AD domain.+joinDomain_organizationalUnit :: Lens.Lens' JoinDomain (Prelude.Maybe Prelude.Text)+joinDomain_organizationalUnit = Lens.lens (\JoinDomain' {organizationalUnit} -> organizationalUnit) (\s@JoinDomain' {} a -> s {organizationalUnit = a} :: JoinDomain)++-- | Specifies the time in seconds, in which the @JoinDomain@ operation must+-- complete. The default is 20 seconds.+joinDomain_timeoutInSeconds :: Lens.Lens' JoinDomain (Prelude.Maybe Prelude.Natural)+joinDomain_timeoutInSeconds = Lens.lens (\JoinDomain' {timeoutInSeconds} -> timeoutInSeconds) (\s@JoinDomain' {} a -> s {timeoutInSeconds = a} :: JoinDomain)++-- | The Amazon Resource Name (ARN) of the gateway. Use the @ListGateways@+-- operation to return a list of gateways for your account and Amazon Web+-- Services Region.+joinDomain_gatewayARN :: Lens.Lens' JoinDomain Prelude.Text+joinDomain_gatewayARN = Lens.lens (\JoinDomain' {gatewayARN} -> gatewayARN) (\s@JoinDomain' {} a -> s {gatewayARN = a} :: JoinDomain)++-- | The name of the domain that you want the gateway to join.+joinDomain_domainName :: Lens.Lens' JoinDomain Prelude.Text+joinDomain_domainName = Lens.lens (\JoinDomain' {domainName} -> domainName) (\s@JoinDomain' {} a -> s {domainName = a} :: JoinDomain)++-- | Sets the user name of user who has permission to add the gateway to the+-- Active Directory domain. The domain user account should be enabled to+-- join computers to the domain. For example, you can use the domain+-- administrator account or an account with delegated permissions to join+-- computers to the domain.+joinDomain_userName :: Lens.Lens' JoinDomain Prelude.Text+joinDomain_userName = Lens.lens (\JoinDomain' {userName} -> userName) (\s@JoinDomain' {} a -> s {userName = a} :: JoinDomain)++-- | Sets the password of the user who has permission to add the gateway to+-- the Active Directory domain.+joinDomain_password :: Lens.Lens' JoinDomain Prelude.Text+joinDomain_password = Lens.lens (\JoinDomain' {password} -> password) (\s@JoinDomain' {} a -> s {password = a} :: JoinDomain) Prelude.. Data._Sensitive++instance Core.AWSRequest JoinDomain where+ type AWSResponse JoinDomain = JoinDomainResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ JoinDomainResponse'+ Prelude.<$> (x Data..?> "ActiveDirectoryStatus")+ Prelude.<*> (x Data..?> "GatewayARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable JoinDomain where+ hashWithSalt _salt JoinDomain' {..} =+ _salt+ `Prelude.hashWithSalt` domainControllers+ `Prelude.hashWithSalt` organizationalUnit+ `Prelude.hashWithSalt` timeoutInSeconds+ `Prelude.hashWithSalt` gatewayARN+ `Prelude.hashWithSalt` domainName+ `Prelude.hashWithSalt` userName+ `Prelude.hashWithSalt` password++instance Prelude.NFData JoinDomain where+ rnf JoinDomain' {..} =+ Prelude.rnf domainControllers+ `Prelude.seq` Prelude.rnf organizationalUnit+ `Prelude.seq` Prelude.rnf timeoutInSeconds+ `Prelude.seq` Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf domainName+ `Prelude.seq` Prelude.rnf userName+ `Prelude.seq` Prelude.rnf password++instance Data.ToHeaders JoinDomain where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.JoinDomain" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON JoinDomain where+ toJSON JoinDomain' {..} =+ Data.object+ ( Prelude.catMaybes+ [ ("DomainControllers" Data..=)+ Prelude.<$> domainControllers,+ ("OrganizationalUnit" Data..=)+ Prelude.<$> organizationalUnit,+ ("TimeoutInSeconds" Data..=)+ Prelude.<$> timeoutInSeconds,+ Prelude.Just ("GatewayARN" Data..= gatewayARN),+ Prelude.Just ("DomainName" Data..= domainName),+ Prelude.Just ("UserName" Data..= userName),+ Prelude.Just ("Password" Data..= password)+ ]+ )++instance Data.ToPath JoinDomain where+ toPath = Prelude.const "/"++instance Data.ToQuery JoinDomain where+ toQuery = Prelude.const Prelude.mempty++-- | JoinDomainOutput+--+-- /See:/ 'newJoinDomainResponse' smart constructor.+data JoinDomainResponse = JoinDomainResponse'+ { -- | Indicates the status of the gateway as a member of the Active Directory+ -- domain.+ --+ -- - @ACCESS_DENIED@: Indicates that the @JoinDomain@ operation failed+ -- due to an authentication error.+ --+ -- - @DETACHED@: Indicates that gateway is not joined to a domain.+ --+ -- - @JOINED@: Indicates that the gateway has successfully joined a+ -- domain.+ --+ -- - @JOINING@: Indicates that a @JoinDomain@ operation is in progress.+ --+ -- - @NETWORK_ERROR@: Indicates that @JoinDomain@ operation failed due to+ -- a network or connectivity error.+ --+ -- - @TIMEOUT@: Indicates that the @JoinDomain@ operation failed because+ -- the operation didn\'t complete within the allotted time.+ --+ -- - @UNKNOWN_ERROR@: Indicates that the @JoinDomain@ operation failed+ -- due to another type of error.+ activeDirectoryStatus :: Prelude.Maybe ActiveDirectoryStatus,+ -- | The unique Amazon Resource Name (ARN) of the gateway that joined the+ -- domain.+ gatewayARN :: 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 'JoinDomainResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'activeDirectoryStatus', 'joinDomainResponse_activeDirectoryStatus' - Indicates the status of the gateway as a member of the Active Directory+-- domain.+--+-- - @ACCESS_DENIED@: Indicates that the @JoinDomain@ operation failed+-- due to an authentication error.+--+-- - @DETACHED@: Indicates that gateway is not joined to a domain.+--+-- - @JOINED@: Indicates that the gateway has successfully joined a+-- domain.+--+-- - @JOINING@: Indicates that a @JoinDomain@ operation is in progress.+--+-- - @NETWORK_ERROR@: Indicates that @JoinDomain@ operation failed due to+-- a network or connectivity error.+--+-- - @TIMEOUT@: Indicates that the @JoinDomain@ operation failed because+-- the operation didn\'t complete within the allotted time.+--+-- - @UNKNOWN_ERROR@: Indicates that the @JoinDomain@ operation failed+-- due to another type of error.+--+-- 'gatewayARN', 'joinDomainResponse_gatewayARN' - The unique Amazon Resource Name (ARN) of the gateway that joined the+-- domain.+--+-- 'httpStatus', 'joinDomainResponse_httpStatus' - The response's http status code.+newJoinDomainResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ JoinDomainResponse+newJoinDomainResponse pHttpStatus_ =+ JoinDomainResponse'+ { activeDirectoryStatus =+ Prelude.Nothing,+ gatewayARN = Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | Indicates the status of the gateway as a member of the Active Directory+-- domain.+--+-- - @ACCESS_DENIED@: Indicates that the @JoinDomain@ operation failed+-- due to an authentication error.+--+-- - @DETACHED@: Indicates that gateway is not joined to a domain.+--+-- - @JOINED@: Indicates that the gateway has successfully joined a+-- domain.+--+-- - @JOINING@: Indicates that a @JoinDomain@ operation is in progress.+--+-- - @NETWORK_ERROR@: Indicates that @JoinDomain@ operation failed due to+-- a network or connectivity error.+--+-- - @TIMEOUT@: Indicates that the @JoinDomain@ operation failed because+-- the operation didn\'t complete within the allotted time.+--+-- - @UNKNOWN_ERROR@: Indicates that the @JoinDomain@ operation failed+-- due to another type of error.+joinDomainResponse_activeDirectoryStatus :: Lens.Lens' JoinDomainResponse (Prelude.Maybe ActiveDirectoryStatus)+joinDomainResponse_activeDirectoryStatus = Lens.lens (\JoinDomainResponse' {activeDirectoryStatus} -> activeDirectoryStatus) (\s@JoinDomainResponse' {} a -> s {activeDirectoryStatus = a} :: JoinDomainResponse)++-- | The unique Amazon Resource Name (ARN) of the gateway that joined the+-- domain.+joinDomainResponse_gatewayARN :: Lens.Lens' JoinDomainResponse (Prelude.Maybe Prelude.Text)+joinDomainResponse_gatewayARN = Lens.lens (\JoinDomainResponse' {gatewayARN} -> gatewayARN) (\s@JoinDomainResponse' {} a -> s {gatewayARN = a} :: JoinDomainResponse)++-- | The response's http status code.+joinDomainResponse_httpStatus :: Lens.Lens' JoinDomainResponse Prelude.Int+joinDomainResponse_httpStatus = Lens.lens (\JoinDomainResponse' {httpStatus} -> httpStatus) (\s@JoinDomainResponse' {} a -> s {httpStatus = a} :: JoinDomainResponse)++instance Prelude.NFData JoinDomainResponse where+ rnf JoinDomainResponse' {..} =+ Prelude.rnf activeDirectoryStatus+ `Prelude.seq` Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/Lens.hs view
@@ -0,0 +1,1167 @@+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module : Amazonka.StorageGateway.Lens+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.StorageGateway.Lens+ ( -- * Operations++ -- ** ActivateGateway+ activateGateway_gatewayType,+ activateGateway_mediumChangerType,+ activateGateway_tags,+ activateGateway_tapeDriveType,+ activateGateway_activationKey,+ activateGateway_gatewayName,+ activateGateway_gatewayTimezone,+ activateGateway_gatewayRegion,+ activateGatewayResponse_gatewayARN,+ activateGatewayResponse_httpStatus,++ -- ** AddCache+ addCache_gatewayARN,+ addCache_diskIds,+ addCacheResponse_gatewayARN,+ addCacheResponse_httpStatus,++ -- ** AddTagsToResource+ addTagsToResource_resourceARN,+ addTagsToResource_tags,+ addTagsToResourceResponse_resourceARN,+ addTagsToResourceResponse_httpStatus,++ -- ** AddUploadBuffer+ addUploadBuffer_gatewayARN,+ addUploadBuffer_diskIds,+ addUploadBufferResponse_gatewayARN,+ addUploadBufferResponse_httpStatus,++ -- ** AddWorkingStorage+ addWorkingStorage_gatewayARN,+ addWorkingStorage_diskIds,+ addWorkingStorageResponse_gatewayARN,+ addWorkingStorageResponse_httpStatus,++ -- ** AssignTapePool+ assignTapePool_bypassGovernanceRetention,+ assignTapePool_tapeARN,+ assignTapePool_poolId,+ assignTapePoolResponse_tapeARN,+ assignTapePoolResponse_httpStatus,++ -- ** AssociateFileSystem+ associateFileSystem_auditDestinationARN,+ associateFileSystem_cacheAttributes,+ associateFileSystem_endpointNetworkConfiguration,+ associateFileSystem_tags,+ associateFileSystem_userName,+ associateFileSystem_password,+ associateFileSystem_clientToken,+ associateFileSystem_gatewayARN,+ associateFileSystem_locationARN,+ associateFileSystemResponse_fileSystemAssociationARN,+ associateFileSystemResponse_httpStatus,++ -- ** AttachVolume+ attachVolume_diskId,+ attachVolume_targetName,+ attachVolume_gatewayARN,+ attachVolume_volumeARN,+ attachVolume_networkInterfaceId,+ attachVolumeResponse_targetARN,+ attachVolumeResponse_volumeARN,+ attachVolumeResponse_httpStatus,++ -- ** CancelArchival+ cancelArchival_gatewayARN,+ cancelArchival_tapeARN,+ cancelArchivalResponse_tapeARN,+ cancelArchivalResponse_httpStatus,++ -- ** CancelRetrieval+ cancelRetrieval_gatewayARN,+ cancelRetrieval_tapeARN,+ cancelRetrievalResponse_tapeARN,+ cancelRetrievalResponse_httpStatus,++ -- ** CreateCachediSCSIVolume+ createCachediSCSIVolume_kmsEncrypted,+ createCachediSCSIVolume_kmsKey,+ createCachediSCSIVolume_snapshotId,+ createCachediSCSIVolume_sourceVolumeARN,+ createCachediSCSIVolume_tags,+ createCachediSCSIVolume_gatewayARN,+ createCachediSCSIVolume_volumeSizeInBytes,+ createCachediSCSIVolume_targetName,+ createCachediSCSIVolume_networkInterfaceId,+ createCachediSCSIVolume_clientToken,+ createCachediSCSIVolumeResponse_targetARN,+ createCachediSCSIVolumeResponse_volumeARN,+ createCachediSCSIVolumeResponse_httpStatus,++ -- ** CreateNFSFileShare+ createNFSFileShare_auditDestinationARN,+ createNFSFileShare_bucketRegion,+ createNFSFileShare_cacheAttributes,+ createNFSFileShare_clientList,+ createNFSFileShare_defaultStorageClass,+ createNFSFileShare_fileShareName,+ createNFSFileShare_guessMIMETypeEnabled,+ createNFSFileShare_kmsEncrypted,+ createNFSFileShare_kmsKey,+ createNFSFileShare_nFSFileShareDefaults,+ createNFSFileShare_notificationPolicy,+ createNFSFileShare_objectACL,+ createNFSFileShare_readOnly,+ createNFSFileShare_requesterPays,+ createNFSFileShare_squash,+ createNFSFileShare_tags,+ createNFSFileShare_vPCEndpointDNSName,+ createNFSFileShare_clientToken,+ createNFSFileShare_gatewayARN,+ createNFSFileShare_role,+ createNFSFileShare_locationARN,+ createNFSFileShareResponse_fileShareARN,+ createNFSFileShareResponse_httpStatus,++ -- ** CreateSMBFileShare+ createSMBFileShare_accessBasedEnumeration,+ createSMBFileShare_adminUserList,+ createSMBFileShare_auditDestinationARN,+ createSMBFileShare_authentication,+ createSMBFileShare_bucketRegion,+ createSMBFileShare_cacheAttributes,+ createSMBFileShare_caseSensitivity,+ createSMBFileShare_defaultStorageClass,+ createSMBFileShare_fileShareName,+ createSMBFileShare_guessMIMETypeEnabled,+ createSMBFileShare_invalidUserList,+ createSMBFileShare_kmsEncrypted,+ createSMBFileShare_kmsKey,+ createSMBFileShare_notificationPolicy,+ createSMBFileShare_objectACL,+ createSMBFileShare_oplocksEnabled,+ createSMBFileShare_readOnly,+ createSMBFileShare_requesterPays,+ createSMBFileShare_sMBACLEnabled,+ createSMBFileShare_tags,+ createSMBFileShare_vPCEndpointDNSName,+ createSMBFileShare_validUserList,+ createSMBFileShare_clientToken,+ createSMBFileShare_gatewayARN,+ createSMBFileShare_role,+ createSMBFileShare_locationARN,+ createSMBFileShareResponse_fileShareARN,+ createSMBFileShareResponse_httpStatus,++ -- ** CreateSnapshot+ createSnapshot_tags,+ createSnapshot_volumeARN,+ createSnapshot_snapshotDescription,+ createSnapshotResponse_snapshotId,+ createSnapshotResponse_volumeARN,+ createSnapshotResponse_httpStatus,++ -- ** CreateSnapshotFromVolumeRecoveryPoint+ createSnapshotFromVolumeRecoveryPoint_tags,+ createSnapshotFromVolumeRecoveryPoint_volumeARN,+ createSnapshotFromVolumeRecoveryPoint_snapshotDescription,+ createSnapshotFromVolumeRecoveryPointResponse_snapshotId,+ createSnapshotFromVolumeRecoveryPointResponse_volumeARN,+ createSnapshotFromVolumeRecoveryPointResponse_volumeRecoveryPointTime,+ createSnapshotFromVolumeRecoveryPointResponse_httpStatus,++ -- ** CreateStorediSCSIVolume+ createStorediSCSIVolume_kmsEncrypted,+ createStorediSCSIVolume_kmsKey,+ createStorediSCSIVolume_snapshotId,+ createStorediSCSIVolume_tags,+ createStorediSCSIVolume_gatewayARN,+ createStorediSCSIVolume_diskId,+ createStorediSCSIVolume_preserveExistingData,+ createStorediSCSIVolume_targetName,+ createStorediSCSIVolume_networkInterfaceId,+ createStorediSCSIVolumeResponse_targetARN,+ createStorediSCSIVolumeResponse_volumeARN,+ createStorediSCSIVolumeResponse_volumeSizeInBytes,+ createStorediSCSIVolumeResponse_httpStatus,++ -- ** CreateTapePool+ createTapePool_retentionLockTimeInDays,+ createTapePool_retentionLockType,+ createTapePool_tags,+ createTapePool_poolName,+ createTapePool_storageClass,+ createTapePoolResponse_poolARN,+ createTapePoolResponse_httpStatus,++ -- ** CreateTapeWithBarcode+ createTapeWithBarcode_kmsEncrypted,+ createTapeWithBarcode_kmsKey,+ createTapeWithBarcode_poolId,+ createTapeWithBarcode_tags,+ createTapeWithBarcode_worm,+ createTapeWithBarcode_gatewayARN,+ createTapeWithBarcode_tapeSizeInBytes,+ createTapeWithBarcode_tapeBarcode,+ createTapeWithBarcodeResponse_tapeARN,+ createTapeWithBarcodeResponse_httpStatus,++ -- ** CreateTapes+ createTapes_kmsEncrypted,+ createTapes_kmsKey,+ createTapes_poolId,+ createTapes_tags,+ createTapes_worm,+ createTapes_gatewayARN,+ createTapes_tapeSizeInBytes,+ createTapes_clientToken,+ createTapes_numTapesToCreate,+ createTapes_tapeBarcodePrefix,+ createTapesResponse_tapeARNs,+ createTapesResponse_httpStatus,++ -- ** DeleteAutomaticTapeCreationPolicy+ deleteAutomaticTapeCreationPolicy_gatewayARN,+ deleteAutomaticTapeCreationPolicyResponse_gatewayARN,+ deleteAutomaticTapeCreationPolicyResponse_httpStatus,++ -- ** DeleteBandwidthRateLimit+ deleteBandwidthRateLimit_gatewayARN,+ deleteBandwidthRateLimit_bandwidthType,+ deleteBandwidthRateLimitResponse_gatewayARN,+ deleteBandwidthRateLimitResponse_httpStatus,++ -- ** DeleteChapCredentials+ deleteChapCredentials_targetARN,+ deleteChapCredentials_initiatorName,+ deleteChapCredentialsResponse_initiatorName,+ deleteChapCredentialsResponse_targetARN,+ deleteChapCredentialsResponse_httpStatus,++ -- ** DeleteFileShare+ deleteFileShare_forceDelete,+ deleteFileShare_fileShareARN,+ deleteFileShareResponse_fileShareARN,+ deleteFileShareResponse_httpStatus,++ -- ** DeleteGateway+ deleteGateway_gatewayARN,+ deleteGatewayResponse_gatewayARN,+ deleteGatewayResponse_httpStatus,++ -- ** DeleteSnapshotSchedule+ deleteSnapshotSchedule_volumeARN,+ deleteSnapshotScheduleResponse_volumeARN,+ deleteSnapshotScheduleResponse_httpStatus,++ -- ** DeleteTape+ deleteTape_bypassGovernanceRetention,+ deleteTape_gatewayARN,+ deleteTape_tapeARN,+ deleteTapeResponse_tapeARN,+ deleteTapeResponse_httpStatus,++ -- ** DeleteTapeArchive+ deleteTapeArchive_bypassGovernanceRetention,+ deleteTapeArchive_tapeARN,+ deleteTapeArchiveResponse_tapeARN,+ deleteTapeArchiveResponse_httpStatus,++ -- ** DeleteTapePool+ deleteTapePool_poolARN,+ deleteTapePoolResponse_poolARN,+ deleteTapePoolResponse_httpStatus,++ -- ** DeleteVolume+ deleteVolume_volumeARN,+ deleteVolumeResponse_volumeARN,+ deleteVolumeResponse_httpStatus,++ -- ** DescribeAvailabilityMonitorTest+ describeAvailabilityMonitorTest_gatewayARN,+ describeAvailabilityMonitorTestResponse_gatewayARN,+ describeAvailabilityMonitorTestResponse_startTime,+ describeAvailabilityMonitorTestResponse_status,+ describeAvailabilityMonitorTestResponse_httpStatus,++ -- ** DescribeBandwidthRateLimit+ describeBandwidthRateLimit_gatewayARN,+ describeBandwidthRateLimitResponse_averageDownloadRateLimitInBitsPerSec,+ describeBandwidthRateLimitResponse_averageUploadRateLimitInBitsPerSec,+ describeBandwidthRateLimitResponse_gatewayARN,+ describeBandwidthRateLimitResponse_httpStatus,++ -- ** DescribeBandwidthRateLimitSchedule+ describeBandwidthRateLimitSchedule_gatewayARN,+ describeBandwidthRateLimitScheduleResponse_bandwidthRateLimitIntervals,+ describeBandwidthRateLimitScheduleResponse_gatewayARN,+ describeBandwidthRateLimitScheduleResponse_httpStatus,++ -- ** DescribeCache+ describeCache_gatewayARN,+ describeCacheResponse_cacheAllocatedInBytes,+ describeCacheResponse_cacheDirtyPercentage,+ describeCacheResponse_cacheHitPercentage,+ describeCacheResponse_cacheMissPercentage,+ describeCacheResponse_cacheUsedPercentage,+ describeCacheResponse_diskIds,+ describeCacheResponse_gatewayARN,+ describeCacheResponse_httpStatus,++ -- ** DescribeCachediSCSIVolumes+ describeCachediSCSIVolumes_volumeARNs,+ describeCachediSCSIVolumesResponse_cachediSCSIVolumes,+ describeCachediSCSIVolumesResponse_httpStatus,++ -- ** DescribeChapCredentials+ describeChapCredentials_targetARN,+ describeChapCredentialsResponse_chapCredentials,+ describeChapCredentialsResponse_httpStatus,++ -- ** DescribeFileSystemAssociations+ describeFileSystemAssociations_fileSystemAssociationARNList,+ describeFileSystemAssociationsResponse_fileSystemAssociationInfoList,+ describeFileSystemAssociationsResponse_httpStatus,++ -- ** DescribeGatewayInformation+ describeGatewayInformation_gatewayARN,+ describeGatewayInformationResponse_cloudWatchLogGroupARN,+ describeGatewayInformationResponse_deprecationDate,+ describeGatewayInformationResponse_ec2InstanceId,+ describeGatewayInformationResponse_ec2InstanceRegion,+ describeGatewayInformationResponse_endpointType,+ describeGatewayInformationResponse_gatewayARN,+ describeGatewayInformationResponse_gatewayCapacity,+ describeGatewayInformationResponse_gatewayId,+ describeGatewayInformationResponse_gatewayName,+ describeGatewayInformationResponse_gatewayNetworkInterfaces,+ describeGatewayInformationResponse_gatewayState,+ describeGatewayInformationResponse_gatewayTimezone,+ describeGatewayInformationResponse_gatewayType,+ describeGatewayInformationResponse_hostEnvironment,+ describeGatewayInformationResponse_hostEnvironmentId,+ describeGatewayInformationResponse_lastSoftwareUpdate,+ describeGatewayInformationResponse_nextUpdateAvailabilityDate,+ describeGatewayInformationResponse_softwareUpdatesEndDate,+ describeGatewayInformationResponse_supportedGatewayCapacities,+ describeGatewayInformationResponse_tags,+ describeGatewayInformationResponse_vPCEndpoint,+ describeGatewayInformationResponse_httpStatus,++ -- ** DescribeMaintenanceStartTime+ describeMaintenanceStartTime_gatewayARN,+ describeMaintenanceStartTimeResponse_dayOfMonth,+ describeMaintenanceStartTimeResponse_dayOfWeek,+ describeMaintenanceStartTimeResponse_gatewayARN,+ describeMaintenanceStartTimeResponse_hourOfDay,+ describeMaintenanceStartTimeResponse_minuteOfHour,+ describeMaintenanceStartTimeResponse_timezone,+ describeMaintenanceStartTimeResponse_httpStatus,++ -- ** DescribeNFSFileShares+ describeNFSFileShares_fileShareARNList,+ describeNFSFileSharesResponse_nFSFileShareInfoList,+ describeNFSFileSharesResponse_httpStatus,++ -- ** DescribeSMBFileShares+ describeSMBFileShares_fileShareARNList,+ describeSMBFileSharesResponse_sMBFileShareInfoList,+ describeSMBFileSharesResponse_httpStatus,++ -- ** DescribeSMBSettings+ describeSMBSettings_gatewayARN,+ describeSMBSettingsResponse_activeDirectoryStatus,+ describeSMBSettingsResponse_domainName,+ describeSMBSettingsResponse_fileSharesVisible,+ describeSMBSettingsResponse_gatewayARN,+ describeSMBSettingsResponse_sMBGuestPasswordSet,+ describeSMBSettingsResponse_sMBLocalGroups,+ describeSMBSettingsResponse_sMBSecurityStrategy,+ describeSMBSettingsResponse_httpStatus,++ -- ** DescribeSnapshotSchedule+ describeSnapshotSchedule_volumeARN,+ describeSnapshotScheduleResponse_description,+ describeSnapshotScheduleResponse_recurrenceInHours,+ describeSnapshotScheduleResponse_startAt,+ describeSnapshotScheduleResponse_tags,+ describeSnapshotScheduleResponse_timezone,+ describeSnapshotScheduleResponse_volumeARN,+ describeSnapshotScheduleResponse_httpStatus,++ -- ** DescribeStorediSCSIVolumes+ describeStorediSCSIVolumes_volumeARNs,+ describeStorediSCSIVolumesResponse_storediSCSIVolumes,+ describeStorediSCSIVolumesResponse_httpStatus,++ -- ** DescribeTapeArchives+ describeTapeArchives_limit,+ describeTapeArchives_marker,+ describeTapeArchives_tapeARNs,+ describeTapeArchivesResponse_marker,+ describeTapeArchivesResponse_tapeArchives,+ describeTapeArchivesResponse_httpStatus,++ -- ** DescribeTapeRecoveryPoints+ describeTapeRecoveryPoints_limit,+ describeTapeRecoveryPoints_marker,+ describeTapeRecoveryPoints_gatewayARN,+ describeTapeRecoveryPointsResponse_gatewayARN,+ describeTapeRecoveryPointsResponse_marker,+ describeTapeRecoveryPointsResponse_tapeRecoveryPointInfos,+ describeTapeRecoveryPointsResponse_httpStatus,++ -- ** DescribeTapes+ describeTapes_limit,+ describeTapes_marker,+ describeTapes_tapeARNs,+ describeTapes_gatewayARN,+ describeTapesResponse_marker,+ describeTapesResponse_tapes,+ describeTapesResponse_httpStatus,++ -- ** DescribeUploadBuffer+ describeUploadBuffer_gatewayARN,+ describeUploadBufferResponse_diskIds,+ describeUploadBufferResponse_gatewayARN,+ describeUploadBufferResponse_uploadBufferAllocatedInBytes,+ describeUploadBufferResponse_uploadBufferUsedInBytes,+ describeUploadBufferResponse_httpStatus,++ -- ** DescribeVTLDevices+ describeVTLDevices_limit,+ describeVTLDevices_marker,+ describeVTLDevices_vTLDeviceARNs,+ describeVTLDevices_gatewayARN,+ describeVTLDevicesResponse_gatewayARN,+ describeVTLDevicesResponse_marker,+ describeVTLDevicesResponse_vTLDevices,+ describeVTLDevicesResponse_httpStatus,++ -- ** DescribeWorkingStorage+ describeWorkingStorage_gatewayARN,+ describeWorkingStorageResponse_diskIds,+ describeWorkingStorageResponse_gatewayARN,+ describeWorkingStorageResponse_workingStorageAllocatedInBytes,+ describeWorkingStorageResponse_workingStorageUsedInBytes,+ describeWorkingStorageResponse_httpStatus,++ -- ** DetachVolume+ detachVolume_forceDetach,+ detachVolume_volumeARN,+ detachVolumeResponse_volumeARN,+ detachVolumeResponse_httpStatus,++ -- ** DisableGateway+ disableGateway_gatewayARN,+ disableGatewayResponse_gatewayARN,+ disableGatewayResponse_httpStatus,++ -- ** DisassociateFileSystem+ disassociateFileSystem_forceDelete,+ disassociateFileSystem_fileSystemAssociationARN,+ disassociateFileSystemResponse_fileSystemAssociationARN,+ disassociateFileSystemResponse_httpStatus,++ -- ** JoinDomain+ joinDomain_domainControllers,+ joinDomain_organizationalUnit,+ joinDomain_timeoutInSeconds,+ joinDomain_gatewayARN,+ joinDomain_domainName,+ joinDomain_userName,+ joinDomain_password,+ joinDomainResponse_activeDirectoryStatus,+ joinDomainResponse_gatewayARN,+ joinDomainResponse_httpStatus,++ -- ** ListAutomaticTapeCreationPolicies+ listAutomaticTapeCreationPolicies_gatewayARN,+ listAutomaticTapeCreationPoliciesResponse_automaticTapeCreationPolicyInfos,+ listAutomaticTapeCreationPoliciesResponse_httpStatus,++ -- ** ListFileShares+ listFileShares_gatewayARN,+ listFileShares_limit,+ listFileShares_marker,+ listFileSharesResponse_fileShareInfoList,+ listFileSharesResponse_marker,+ listFileSharesResponse_nextMarker,+ listFileSharesResponse_httpStatus,++ -- ** ListFileSystemAssociations+ listFileSystemAssociations_gatewayARN,+ listFileSystemAssociations_limit,+ listFileSystemAssociations_marker,+ listFileSystemAssociationsResponse_fileSystemAssociationSummaryList,+ listFileSystemAssociationsResponse_marker,+ listFileSystemAssociationsResponse_nextMarker,+ listFileSystemAssociationsResponse_httpStatus,++ -- ** ListGateways+ listGateways_limit,+ listGateways_marker,+ listGatewaysResponse_gateways,+ listGatewaysResponse_marker,+ listGatewaysResponse_httpStatus,++ -- ** ListLocalDisks+ listLocalDisks_gatewayARN,+ listLocalDisksResponse_disks,+ listLocalDisksResponse_gatewayARN,+ listLocalDisksResponse_httpStatus,++ -- ** ListTagsForResource+ listTagsForResource_limit,+ listTagsForResource_marker,+ listTagsForResource_resourceARN,+ listTagsForResourceResponse_marker,+ listTagsForResourceResponse_resourceARN,+ listTagsForResourceResponse_tags,+ listTagsForResourceResponse_httpStatus,++ -- ** ListTapePools+ listTapePools_limit,+ listTapePools_marker,+ listTapePools_poolARNs,+ listTapePoolsResponse_marker,+ listTapePoolsResponse_poolInfos,+ listTapePoolsResponse_httpStatus,++ -- ** ListTapes+ listTapes_limit,+ listTapes_marker,+ listTapes_tapeARNs,+ listTapesResponse_marker,+ listTapesResponse_tapeInfos,+ listTapesResponse_httpStatus,++ -- ** ListVolumeInitiators+ listVolumeInitiators_volumeARN,+ listVolumeInitiatorsResponse_initiators,+ listVolumeInitiatorsResponse_httpStatus,++ -- ** ListVolumeRecoveryPoints+ listVolumeRecoveryPoints_gatewayARN,+ listVolumeRecoveryPointsResponse_gatewayARN,+ listVolumeRecoveryPointsResponse_volumeRecoveryPointInfos,+ listVolumeRecoveryPointsResponse_httpStatus,++ -- ** ListVolumes+ listVolumes_gatewayARN,+ listVolumes_limit,+ listVolumes_marker,+ listVolumesResponse_gatewayARN,+ listVolumesResponse_marker,+ listVolumesResponse_volumeInfos,+ listVolumesResponse_httpStatus,++ -- ** NotifyWhenUploaded+ notifyWhenUploaded_fileShareARN,+ notifyWhenUploadedResponse_fileShareARN,+ notifyWhenUploadedResponse_notificationId,+ notifyWhenUploadedResponse_httpStatus,++ -- ** RefreshCache+ refreshCache_folderList,+ refreshCache_recursive,+ refreshCache_fileShareARN,+ refreshCacheResponse_fileShareARN,+ refreshCacheResponse_notificationId,+ refreshCacheResponse_httpStatus,++ -- ** RemoveTagsFromResource+ removeTagsFromResource_resourceARN,+ removeTagsFromResource_tagKeys,+ removeTagsFromResourceResponse_resourceARN,+ removeTagsFromResourceResponse_httpStatus,++ -- ** ResetCache+ resetCache_gatewayARN,+ resetCacheResponse_gatewayARN,+ resetCacheResponse_httpStatus,++ -- ** RetrieveTapeArchive+ retrieveTapeArchive_tapeARN,+ retrieveTapeArchive_gatewayARN,+ retrieveTapeArchiveResponse_tapeARN,+ retrieveTapeArchiveResponse_httpStatus,++ -- ** RetrieveTapeRecoveryPoint+ retrieveTapeRecoveryPoint_tapeARN,+ retrieveTapeRecoveryPoint_gatewayARN,+ retrieveTapeRecoveryPointResponse_tapeARN,+ retrieveTapeRecoveryPointResponse_httpStatus,++ -- ** SetLocalConsolePassword+ setLocalConsolePassword_gatewayARN,+ setLocalConsolePassword_localConsolePassword,+ setLocalConsolePasswordResponse_gatewayARN,+ setLocalConsolePasswordResponse_httpStatus,++ -- ** SetSMBGuestPassword+ setSMBGuestPassword_gatewayARN,+ setSMBGuestPassword_password,+ setSMBGuestPasswordResponse_gatewayARN,+ setSMBGuestPasswordResponse_httpStatus,++ -- ** ShutdownGateway+ shutdownGateway_gatewayARN,+ shutdownGatewayResponse_gatewayARN,+ shutdownGatewayResponse_httpStatus,++ -- ** StartAvailabilityMonitorTest+ startAvailabilityMonitorTest_gatewayARN,+ startAvailabilityMonitorTestResponse_gatewayARN,+ startAvailabilityMonitorTestResponse_httpStatus,++ -- ** StartGateway+ startGateway_gatewayARN,+ startGatewayResponse_gatewayARN,+ startGatewayResponse_httpStatus,++ -- ** UpdateAutomaticTapeCreationPolicy+ updateAutomaticTapeCreationPolicy_automaticTapeCreationRules,+ updateAutomaticTapeCreationPolicy_gatewayARN,+ updateAutomaticTapeCreationPolicyResponse_gatewayARN,+ updateAutomaticTapeCreationPolicyResponse_httpStatus,++ -- ** UpdateBandwidthRateLimit+ updateBandwidthRateLimit_averageDownloadRateLimitInBitsPerSec,+ updateBandwidthRateLimit_averageUploadRateLimitInBitsPerSec,+ updateBandwidthRateLimit_gatewayARN,+ updateBandwidthRateLimitResponse_gatewayARN,+ updateBandwidthRateLimitResponse_httpStatus,++ -- ** UpdateBandwidthRateLimitSchedule+ updateBandwidthRateLimitSchedule_gatewayARN,+ updateBandwidthRateLimitSchedule_bandwidthRateLimitIntervals,+ updateBandwidthRateLimitScheduleResponse_gatewayARN,+ updateBandwidthRateLimitScheduleResponse_httpStatus,++ -- ** UpdateChapCredentials+ updateChapCredentials_secretToAuthenticateTarget,+ updateChapCredentials_targetARN,+ updateChapCredentials_secretToAuthenticateInitiator,+ updateChapCredentials_initiatorName,+ updateChapCredentialsResponse_initiatorName,+ updateChapCredentialsResponse_targetARN,+ updateChapCredentialsResponse_httpStatus,++ -- ** UpdateFileSystemAssociation+ updateFileSystemAssociation_auditDestinationARN,+ updateFileSystemAssociation_cacheAttributes,+ updateFileSystemAssociation_password,+ updateFileSystemAssociation_userName,+ updateFileSystemAssociation_fileSystemAssociationARN,+ updateFileSystemAssociationResponse_fileSystemAssociationARN,+ updateFileSystemAssociationResponse_httpStatus,++ -- ** UpdateGatewayInformation+ updateGatewayInformation_cloudWatchLogGroupARN,+ updateGatewayInformation_gatewayCapacity,+ updateGatewayInformation_gatewayName,+ updateGatewayInformation_gatewayTimezone,+ updateGatewayInformation_gatewayARN,+ updateGatewayInformationResponse_gatewayARN,+ updateGatewayInformationResponse_gatewayName,+ updateGatewayInformationResponse_httpStatus,++ -- ** UpdateGatewaySoftwareNow+ updateGatewaySoftwareNow_gatewayARN,+ updateGatewaySoftwareNowResponse_gatewayARN,+ updateGatewaySoftwareNowResponse_httpStatus,++ -- ** UpdateMaintenanceStartTime+ updateMaintenanceStartTime_dayOfMonth,+ updateMaintenanceStartTime_dayOfWeek,+ updateMaintenanceStartTime_gatewayARN,+ updateMaintenanceStartTime_hourOfDay,+ updateMaintenanceStartTime_minuteOfHour,+ updateMaintenanceStartTimeResponse_gatewayARN,+ updateMaintenanceStartTimeResponse_httpStatus,++ -- ** UpdateNFSFileShare+ 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_fileShareARN,+ updateNFSFileShareResponse_httpStatus,++ -- ** UpdateSMBFileShare+ 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_fileShareARN,+ updateSMBFileShareResponse_httpStatus,++ -- ** UpdateSMBFileShareVisibility+ updateSMBFileShareVisibility_gatewayARN,+ updateSMBFileShareVisibility_fileSharesVisible,+ updateSMBFileShareVisibilityResponse_gatewayARN,+ updateSMBFileShareVisibilityResponse_httpStatus,++ -- ** UpdateSMBLocalGroups+ updateSMBLocalGroups_gatewayARN,+ updateSMBLocalGroups_sMBLocalGroups,+ updateSMBLocalGroupsResponse_gatewayARN,+ updateSMBLocalGroupsResponse_httpStatus,++ -- ** UpdateSMBSecurityStrategy+ updateSMBSecurityStrategy_gatewayARN,+ updateSMBSecurityStrategy_sMBSecurityStrategy,+ updateSMBSecurityStrategyResponse_gatewayARN,+ updateSMBSecurityStrategyResponse_httpStatus,++ -- ** UpdateSnapshotSchedule+ updateSnapshotSchedule_description,+ updateSnapshotSchedule_tags,+ updateSnapshotSchedule_volumeARN,+ updateSnapshotSchedule_startAt,+ updateSnapshotSchedule_recurrenceInHours,+ updateSnapshotScheduleResponse_volumeARN,+ updateSnapshotScheduleResponse_httpStatus,++ -- ** UpdateVTLDeviceType+ updateVTLDeviceType_vTLDeviceARN,+ updateVTLDeviceType_deviceType,+ updateVTLDeviceTypeResponse_vTLDeviceARN,+ updateVTLDeviceTypeResponse_httpStatus,++ -- * Types++ -- ** AutomaticTapeCreationPolicyInfo+ automaticTapeCreationPolicyInfo_automaticTapeCreationRules,+ automaticTapeCreationPolicyInfo_gatewayARN,++ -- ** AutomaticTapeCreationRule+ automaticTapeCreationRule_worm,+ automaticTapeCreationRule_tapeBarcodePrefix,+ automaticTapeCreationRule_poolId,+ automaticTapeCreationRule_tapeSizeInBytes,+ automaticTapeCreationRule_minimumNumTapes,++ -- ** BandwidthRateLimitInterval+ bandwidthRateLimitInterval_averageDownloadRateLimitInBitsPerSec,+ bandwidthRateLimitInterval_averageUploadRateLimitInBitsPerSec,+ bandwidthRateLimitInterval_startHourOfDay,+ bandwidthRateLimitInterval_startMinuteOfHour,+ bandwidthRateLimitInterval_endHourOfDay,+ bandwidthRateLimitInterval_endMinuteOfHour,+ bandwidthRateLimitInterval_daysOfWeek,++ -- ** CacheAttributes+ cacheAttributes_cacheStaleTimeoutInSeconds,++ -- ** CachediSCSIVolume+ cachediSCSIVolume_createdDate,+ cachediSCSIVolume_kmsKey,+ cachediSCSIVolume_sourceSnapshotId,+ cachediSCSIVolume_targetName,+ cachediSCSIVolume_volumeARN,+ cachediSCSIVolume_volumeAttachmentStatus,+ cachediSCSIVolume_volumeId,+ cachediSCSIVolume_volumeProgress,+ cachediSCSIVolume_volumeSizeInBytes,+ cachediSCSIVolume_volumeStatus,+ cachediSCSIVolume_volumeType,+ cachediSCSIVolume_volumeUsedInBytes,+ cachediSCSIVolume_volumeiSCSIAttributes,++ -- ** ChapInfo+ chapInfo_initiatorName,+ chapInfo_secretToAuthenticateInitiator,+ chapInfo_secretToAuthenticateTarget,+ chapInfo_targetARN,++ -- ** DeviceiSCSIAttributes+ deviceiSCSIAttributes_chapEnabled,+ deviceiSCSIAttributes_networkInterfaceId,+ deviceiSCSIAttributes_networkInterfacePort,+ deviceiSCSIAttributes_targetARN,++ -- ** Disk+ disk_diskAllocationResource,+ disk_diskAllocationType,+ disk_diskAttributeList,+ disk_diskId,+ disk_diskNode,+ disk_diskPath,+ disk_diskSizeInBytes,+ disk_diskStatus,++ -- ** EndpointNetworkConfiguration+ endpointNetworkConfiguration_ipAddresses,++ -- ** FileShareInfo+ fileShareInfo_fileShareARN,+ fileShareInfo_fileShareId,+ fileShareInfo_fileShareStatus,+ fileShareInfo_fileShareType,+ fileShareInfo_gatewayARN,++ -- ** FileSystemAssociationInfo+ fileSystemAssociationInfo_auditDestinationARN,+ fileSystemAssociationInfo_cacheAttributes,+ fileSystemAssociationInfo_endpointNetworkConfiguration,+ fileSystemAssociationInfo_fileSystemAssociationARN,+ fileSystemAssociationInfo_fileSystemAssociationStatus,+ fileSystemAssociationInfo_fileSystemAssociationStatusDetails,+ fileSystemAssociationInfo_gatewayARN,+ fileSystemAssociationInfo_locationARN,+ fileSystemAssociationInfo_tags,++ -- ** FileSystemAssociationStatusDetail+ fileSystemAssociationStatusDetail_errorCode,++ -- ** FileSystemAssociationSummary+ fileSystemAssociationSummary_fileSystemAssociationARN,+ fileSystemAssociationSummary_fileSystemAssociationId,+ fileSystemAssociationSummary_fileSystemAssociationStatus,+ fileSystemAssociationSummary_gatewayARN,++ -- ** GatewayInfo+ gatewayInfo_ec2InstanceId,+ gatewayInfo_ec2InstanceRegion,+ gatewayInfo_gatewayARN,+ gatewayInfo_gatewayId,+ gatewayInfo_gatewayName,+ gatewayInfo_gatewayOperationalState,+ gatewayInfo_gatewayType,+ gatewayInfo_hostEnvironment,+ gatewayInfo_hostEnvironmentId,++ -- ** NFSFileShareDefaults+ nFSFileShareDefaults_directoryMode,+ nFSFileShareDefaults_fileMode,+ nFSFileShareDefaults_groupId,+ nFSFileShareDefaults_ownerId,++ -- ** NFSFileShareInfo+ nFSFileShareInfo_auditDestinationARN,+ nFSFileShareInfo_bucketRegion,+ nFSFileShareInfo_cacheAttributes,+ nFSFileShareInfo_clientList,+ nFSFileShareInfo_defaultStorageClass,+ nFSFileShareInfo_fileShareARN,+ nFSFileShareInfo_fileShareId,+ nFSFileShareInfo_fileShareName,+ nFSFileShareInfo_fileShareStatus,+ nFSFileShareInfo_gatewayARN,+ nFSFileShareInfo_guessMIMETypeEnabled,+ nFSFileShareInfo_kmsEncrypted,+ nFSFileShareInfo_kmsKey,+ nFSFileShareInfo_locationARN,+ nFSFileShareInfo_nFSFileShareDefaults,+ nFSFileShareInfo_notificationPolicy,+ nFSFileShareInfo_objectACL,+ nFSFileShareInfo_path,+ nFSFileShareInfo_readOnly,+ nFSFileShareInfo_requesterPays,+ nFSFileShareInfo_role,+ nFSFileShareInfo_squash,+ nFSFileShareInfo_tags,+ nFSFileShareInfo_vPCEndpointDNSName,++ -- ** NetworkInterface+ networkInterface_ipv4Address,+ networkInterface_ipv6Address,+ networkInterface_macAddress,++ -- ** PoolInfo+ poolInfo_poolARN,+ poolInfo_poolName,+ poolInfo_poolStatus,+ poolInfo_retentionLockTimeInDays,+ poolInfo_retentionLockType,+ poolInfo_storageClass,++ -- ** SMBFileShareInfo+ sMBFileShareInfo_accessBasedEnumeration,+ sMBFileShareInfo_adminUserList,+ sMBFileShareInfo_auditDestinationARN,+ sMBFileShareInfo_authentication,+ sMBFileShareInfo_bucketRegion,+ sMBFileShareInfo_cacheAttributes,+ sMBFileShareInfo_caseSensitivity,+ sMBFileShareInfo_defaultStorageClass,+ sMBFileShareInfo_fileShareARN,+ sMBFileShareInfo_fileShareId,+ sMBFileShareInfo_fileShareName,+ sMBFileShareInfo_fileShareStatus,+ sMBFileShareInfo_gatewayARN,+ sMBFileShareInfo_guessMIMETypeEnabled,+ sMBFileShareInfo_invalidUserList,+ sMBFileShareInfo_kmsEncrypted,+ sMBFileShareInfo_kmsKey,+ sMBFileShareInfo_locationARN,+ sMBFileShareInfo_notificationPolicy,+ sMBFileShareInfo_objectACL,+ sMBFileShareInfo_oplocksEnabled,+ sMBFileShareInfo_path,+ sMBFileShareInfo_readOnly,+ sMBFileShareInfo_requesterPays,+ sMBFileShareInfo_role,+ sMBFileShareInfo_sMBACLEnabled,+ sMBFileShareInfo_tags,+ sMBFileShareInfo_vPCEndpointDNSName,+ sMBFileShareInfo_validUserList,++ -- ** SMBLocalGroups+ sMBLocalGroups_gatewayAdmins,++ -- ** StorediSCSIVolume+ storediSCSIVolume_createdDate,+ storediSCSIVolume_kmsKey,+ storediSCSIVolume_preservedExistingData,+ storediSCSIVolume_sourceSnapshotId,+ storediSCSIVolume_targetName,+ storediSCSIVolume_volumeARN,+ storediSCSIVolume_volumeAttachmentStatus,+ storediSCSIVolume_volumeDiskId,+ storediSCSIVolume_volumeId,+ storediSCSIVolume_volumeProgress,+ storediSCSIVolume_volumeSizeInBytes,+ storediSCSIVolume_volumeStatus,+ storediSCSIVolume_volumeType,+ storediSCSIVolume_volumeUsedInBytes,+ storediSCSIVolume_volumeiSCSIAttributes,++ -- ** Tag+ tag_key,+ tag_value,++ -- ** Tape+ tape_kmsKey,+ tape_poolEntryDate,+ tape_poolId,+ tape_progress,+ tape_retentionStartDate,+ tape_tapeARN,+ tape_tapeBarcode,+ tape_tapeCreatedDate,+ tape_tapeSizeInBytes,+ tape_tapeStatus,+ tape_tapeUsedInBytes,+ tape_vTLDevice,+ tape_worm,++ -- ** TapeArchive+ tapeArchive_completionTime,+ tapeArchive_kmsKey,+ tapeArchive_poolEntryDate,+ tapeArchive_poolId,+ tapeArchive_retentionStartDate,+ tapeArchive_retrievedTo,+ tapeArchive_tapeARN,+ tapeArchive_tapeBarcode,+ tapeArchive_tapeCreatedDate,+ tapeArchive_tapeSizeInBytes,+ tapeArchive_tapeStatus,+ tapeArchive_tapeUsedInBytes,+ tapeArchive_worm,++ -- ** TapeInfo+ tapeInfo_gatewayARN,+ tapeInfo_poolEntryDate,+ tapeInfo_poolId,+ tapeInfo_retentionStartDate,+ tapeInfo_tapeARN,+ tapeInfo_tapeBarcode,+ tapeInfo_tapeSizeInBytes,+ tapeInfo_tapeStatus,++ -- ** TapeRecoveryPointInfo+ tapeRecoveryPointInfo_tapeARN,+ tapeRecoveryPointInfo_tapeRecoveryPointTime,+ tapeRecoveryPointInfo_tapeSizeInBytes,+ tapeRecoveryPointInfo_tapeStatus,++ -- ** VTLDevice+ vTLDevice_deviceiSCSIAttributes,+ vTLDevice_vTLDeviceARN,+ vTLDevice_vTLDeviceProductIdentifier,+ vTLDevice_vTLDeviceType,+ vTLDevice_vTLDeviceVendor,++ -- ** VolumeInfo+ volumeInfo_gatewayARN,+ volumeInfo_gatewayId,+ volumeInfo_volumeARN,+ volumeInfo_volumeAttachmentStatus,+ volumeInfo_volumeId,+ volumeInfo_volumeSizeInBytes,+ volumeInfo_volumeType,++ -- ** VolumeRecoveryPointInfo+ volumeRecoveryPointInfo_volumeARN,+ volumeRecoveryPointInfo_volumeRecoveryPointTime,+ volumeRecoveryPointInfo_volumeSizeInBytes,+ volumeRecoveryPointInfo_volumeUsageInBytes,++ -- ** VolumeiSCSIAttributes+ volumeiSCSIAttributes_chapEnabled,+ volumeiSCSIAttributes_lunNumber,+ volumeiSCSIAttributes_networkInterfaceId,+ volumeiSCSIAttributes_networkInterfacePort,+ volumeiSCSIAttributes_targetARN,+ )+where++import Amazonka.StorageGateway.ActivateGateway+import Amazonka.StorageGateway.AddCache+import Amazonka.StorageGateway.AddTagsToResource+import Amazonka.StorageGateway.AddUploadBuffer+import Amazonka.StorageGateway.AddWorkingStorage+import Amazonka.StorageGateway.AssignTapePool+import Amazonka.StorageGateway.AssociateFileSystem+import Amazonka.StorageGateway.AttachVolume+import Amazonka.StorageGateway.CancelArchival+import Amazonka.StorageGateway.CancelRetrieval+import Amazonka.StorageGateway.CreateCachediSCSIVolume+import Amazonka.StorageGateway.CreateNFSFileShare+import Amazonka.StorageGateway.CreateSMBFileShare+import Amazonka.StorageGateway.CreateSnapshot+import Amazonka.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint+import Amazonka.StorageGateway.CreateStorediSCSIVolume+import Amazonka.StorageGateway.CreateTapePool+import Amazonka.StorageGateway.CreateTapeWithBarcode+import Amazonka.StorageGateway.CreateTapes+import Amazonka.StorageGateway.DeleteAutomaticTapeCreationPolicy+import Amazonka.StorageGateway.DeleteBandwidthRateLimit+import Amazonka.StorageGateway.DeleteChapCredentials+import Amazonka.StorageGateway.DeleteFileShare+import Amazonka.StorageGateway.DeleteGateway+import Amazonka.StorageGateway.DeleteSnapshotSchedule+import Amazonka.StorageGateway.DeleteTape+import Amazonka.StorageGateway.DeleteTapeArchive+import Amazonka.StorageGateway.DeleteTapePool+import Amazonka.StorageGateway.DeleteVolume+import Amazonka.StorageGateway.DescribeAvailabilityMonitorTest+import Amazonka.StorageGateway.DescribeBandwidthRateLimit+import Amazonka.StorageGateway.DescribeBandwidthRateLimitSchedule+import Amazonka.StorageGateway.DescribeCache+import Amazonka.StorageGateway.DescribeCachediSCSIVolumes+import Amazonka.StorageGateway.DescribeChapCredentials+import Amazonka.StorageGateway.DescribeFileSystemAssociations+import Amazonka.StorageGateway.DescribeGatewayInformation+import Amazonka.StorageGateway.DescribeMaintenanceStartTime+import Amazonka.StorageGateway.DescribeNFSFileShares+import Amazonka.StorageGateway.DescribeSMBFileShares+import Amazonka.StorageGateway.DescribeSMBSettings+import Amazonka.StorageGateway.DescribeSnapshotSchedule+import Amazonka.StorageGateway.DescribeStorediSCSIVolumes+import Amazonka.StorageGateway.DescribeTapeArchives+import Amazonka.StorageGateway.DescribeTapeRecoveryPoints+import Amazonka.StorageGateway.DescribeTapes+import Amazonka.StorageGateway.DescribeUploadBuffer+import Amazonka.StorageGateway.DescribeVTLDevices+import Amazonka.StorageGateway.DescribeWorkingStorage+import Amazonka.StorageGateway.DetachVolume+import Amazonka.StorageGateway.DisableGateway+import Amazonka.StorageGateway.DisassociateFileSystem+import Amazonka.StorageGateway.JoinDomain+import Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies+import Amazonka.StorageGateway.ListFileShares+import Amazonka.StorageGateway.ListFileSystemAssociations+import Amazonka.StorageGateway.ListGateways+import Amazonka.StorageGateway.ListLocalDisks+import Amazonka.StorageGateway.ListTagsForResource+import Amazonka.StorageGateway.ListTapePools+import Amazonka.StorageGateway.ListTapes+import Amazonka.StorageGateway.ListVolumeInitiators+import Amazonka.StorageGateway.ListVolumeRecoveryPoints+import Amazonka.StorageGateway.ListVolumes+import Amazonka.StorageGateway.NotifyWhenUploaded+import Amazonka.StorageGateway.RefreshCache+import Amazonka.StorageGateway.RemoveTagsFromResource+import Amazonka.StorageGateway.ResetCache+import Amazonka.StorageGateway.RetrieveTapeArchive+import Amazonka.StorageGateway.RetrieveTapeRecoveryPoint+import Amazonka.StorageGateway.SetLocalConsolePassword+import Amazonka.StorageGateway.SetSMBGuestPassword+import Amazonka.StorageGateway.ShutdownGateway+import Amazonka.StorageGateway.StartAvailabilityMonitorTest+import Amazonka.StorageGateway.StartGateway+import Amazonka.StorageGateway.Types.AutomaticTapeCreationPolicyInfo+import Amazonka.StorageGateway.Types.AutomaticTapeCreationRule+import Amazonka.StorageGateway.Types.BandwidthRateLimitInterval+import Amazonka.StorageGateway.Types.CacheAttributes+import Amazonka.StorageGateway.Types.CachediSCSIVolume+import Amazonka.StorageGateway.Types.ChapInfo+import Amazonka.StorageGateway.Types.DeviceiSCSIAttributes+import Amazonka.StorageGateway.Types.Disk+import Amazonka.StorageGateway.Types.EndpointNetworkConfiguration+import Amazonka.StorageGateway.Types.FileShareInfo+import Amazonka.StorageGateway.Types.FileSystemAssociationInfo+import Amazonka.StorageGateway.Types.FileSystemAssociationStatusDetail+import Amazonka.StorageGateway.Types.FileSystemAssociationSummary+import Amazonka.StorageGateway.Types.GatewayInfo+import Amazonka.StorageGateway.Types.NFSFileShareDefaults+import Amazonka.StorageGateway.Types.NFSFileShareInfo+import Amazonka.StorageGateway.Types.NetworkInterface+import Amazonka.StorageGateway.Types.PoolInfo+import Amazonka.StorageGateway.Types.SMBFileShareInfo+import Amazonka.StorageGateway.Types.SMBLocalGroups+import Amazonka.StorageGateway.Types.StorediSCSIVolume+import Amazonka.StorageGateway.Types.Tag+import Amazonka.StorageGateway.Types.Tape+import Amazonka.StorageGateway.Types.TapeArchive+import Amazonka.StorageGateway.Types.TapeInfo+import Amazonka.StorageGateway.Types.TapeRecoveryPointInfo+import Amazonka.StorageGateway.Types.VTLDevice+import Amazonka.StorageGateway.Types.VolumeInfo+import Amazonka.StorageGateway.Types.VolumeRecoveryPointInfo+import Amazonka.StorageGateway.Types.VolumeiSCSIAttributes+import Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy+import Amazonka.StorageGateway.UpdateBandwidthRateLimit+import Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule+import Amazonka.StorageGateway.UpdateChapCredentials+import Amazonka.StorageGateway.UpdateFileSystemAssociation+import Amazonka.StorageGateway.UpdateGatewayInformation+import Amazonka.StorageGateway.UpdateGatewaySoftwareNow+import Amazonka.StorageGateway.UpdateMaintenanceStartTime+import Amazonka.StorageGateway.UpdateNFSFileShare+import Amazonka.StorageGateway.UpdateSMBFileShare+import Amazonka.StorageGateway.UpdateSMBFileShareVisibility+import Amazonka.StorageGateway.UpdateSMBLocalGroups+import Amazonka.StorageGateway.UpdateSMBSecurityStrategy+import Amazonka.StorageGateway.UpdateSnapshotSchedule+import Amazonka.StorageGateway.UpdateVTLDeviceType
+ gen/Amazonka/StorageGateway/ListAutomaticTapeCreationPolicies.hs view
@@ -0,0 +1,209 @@+{-# 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.ListAutomaticTapeCreationPolicies+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Lists the automatic tape creation policies for a gateway. If there are+-- no automatic tape creation policies for the gateway, it returns an empty+-- list.+--+-- This operation is only supported for tape gateways.+module Amazonka.StorageGateway.ListAutomaticTapeCreationPolicies+ ( -- * Creating a Request+ ListAutomaticTapeCreationPolicies (..),+ newListAutomaticTapeCreationPolicies,++ -- * Request Lenses+ listAutomaticTapeCreationPolicies_gatewayARN,++ -- * Destructuring the Response+ ListAutomaticTapeCreationPoliciesResponse (..),+ newListAutomaticTapeCreationPoliciesResponse,++ -- * Response Lenses+ listAutomaticTapeCreationPoliciesResponse_automaticTapeCreationPolicyInfos,+ listAutomaticTapeCreationPoliciesResponse_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++-- | /See:/ 'newListAutomaticTapeCreationPolicies' smart constructor.+data ListAutomaticTapeCreationPolicies = ListAutomaticTapeCreationPolicies'+ { gatewayARN :: Prelude.Maybe Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'ListAutomaticTapeCreationPolicies' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'listAutomaticTapeCreationPolicies_gatewayARN' - Undocumented member.+newListAutomaticTapeCreationPolicies ::+ ListAutomaticTapeCreationPolicies+newListAutomaticTapeCreationPolicies =+ ListAutomaticTapeCreationPolicies'+ { gatewayARN =+ Prelude.Nothing+ }++-- | Undocumented member.+listAutomaticTapeCreationPolicies_gatewayARN :: Lens.Lens' ListAutomaticTapeCreationPolicies (Prelude.Maybe Prelude.Text)+listAutomaticTapeCreationPolicies_gatewayARN = Lens.lens (\ListAutomaticTapeCreationPolicies' {gatewayARN} -> gatewayARN) (\s@ListAutomaticTapeCreationPolicies' {} a -> s {gatewayARN = a} :: ListAutomaticTapeCreationPolicies)++instance+ Core.AWSRequest+ ListAutomaticTapeCreationPolicies+ where+ type+ AWSResponse ListAutomaticTapeCreationPolicies =+ ListAutomaticTapeCreationPoliciesResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ ListAutomaticTapeCreationPoliciesResponse'+ Prelude.<$> ( x+ Data..?> "AutomaticTapeCreationPolicyInfos"+ Core..!@ Prelude.mempty+ )+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance+ Prelude.Hashable+ ListAutomaticTapeCreationPolicies+ where+ hashWithSalt+ _salt+ ListAutomaticTapeCreationPolicies' {..} =+ _salt `Prelude.hashWithSalt` gatewayARN++instance+ Prelude.NFData+ ListAutomaticTapeCreationPolicies+ where+ rnf ListAutomaticTapeCreationPolicies' {..} =+ Prelude.rnf gatewayARN++instance+ Data.ToHeaders+ ListAutomaticTapeCreationPolicies+ where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.ListAutomaticTapeCreationPolicies" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance+ Data.ToJSON+ ListAutomaticTapeCreationPolicies+ where+ toJSON ListAutomaticTapeCreationPolicies' {..} =+ Data.object+ ( Prelude.catMaybes+ [("GatewayARN" Data..=) Prelude.<$> gatewayARN]+ )++instance+ Data.ToPath+ ListAutomaticTapeCreationPolicies+ where+ toPath = Prelude.const "/"++instance+ Data.ToQuery+ ListAutomaticTapeCreationPolicies+ where+ toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newListAutomaticTapeCreationPoliciesResponse' smart constructor.+data ListAutomaticTapeCreationPoliciesResponse = ListAutomaticTapeCreationPoliciesResponse'+ { -- | Gets a listing of information about the gateway\'s automatic tape+ -- creation policies, including the automatic tape creation rules and the+ -- gateway that is using the policies.+ automaticTapeCreationPolicyInfos :: Prelude.Maybe [AutomaticTapeCreationPolicyInfo],+ -- | The response's http status code.+ httpStatus :: Prelude.Int+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'ListAutomaticTapeCreationPoliciesResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'automaticTapeCreationPolicyInfos', 'listAutomaticTapeCreationPoliciesResponse_automaticTapeCreationPolicyInfos' - Gets a listing of information about the gateway\'s automatic tape+-- creation policies, including the automatic tape creation rules and the+-- gateway that is using the policies.+--+-- 'httpStatus', 'listAutomaticTapeCreationPoliciesResponse_httpStatus' - The response's http status code.+newListAutomaticTapeCreationPoliciesResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ ListAutomaticTapeCreationPoliciesResponse+newListAutomaticTapeCreationPoliciesResponse+ pHttpStatus_ =+ ListAutomaticTapeCreationPoliciesResponse'+ { automaticTapeCreationPolicyInfos =+ Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | Gets a listing of information about the gateway\'s automatic tape+-- creation policies, including the automatic tape creation rules and the+-- gateway that is using the policies.+listAutomaticTapeCreationPoliciesResponse_automaticTapeCreationPolicyInfos :: Lens.Lens' ListAutomaticTapeCreationPoliciesResponse (Prelude.Maybe [AutomaticTapeCreationPolicyInfo])+listAutomaticTapeCreationPoliciesResponse_automaticTapeCreationPolicyInfos = Lens.lens (\ListAutomaticTapeCreationPoliciesResponse' {automaticTapeCreationPolicyInfos} -> automaticTapeCreationPolicyInfos) (\s@ListAutomaticTapeCreationPoliciesResponse' {} a -> s {automaticTapeCreationPolicyInfos = a} :: ListAutomaticTapeCreationPoliciesResponse) Prelude.. Lens.mapping Lens.coerced++-- | The response's http status code.+listAutomaticTapeCreationPoliciesResponse_httpStatus :: Lens.Lens' ListAutomaticTapeCreationPoliciesResponse Prelude.Int+listAutomaticTapeCreationPoliciesResponse_httpStatus = Lens.lens (\ListAutomaticTapeCreationPoliciesResponse' {httpStatus} -> httpStatus) (\s@ListAutomaticTapeCreationPoliciesResponse' {} a -> s {httpStatus = a} :: ListAutomaticTapeCreationPoliciesResponse)++instance+ Prelude.NFData+ ListAutomaticTapeCreationPoliciesResponse+ where+ rnf ListAutomaticTapeCreationPoliciesResponse' {..} =+ Prelude.rnf automaticTapeCreationPolicyInfos+ `Prelude.seq` Prelude.rnf httpStatus
@@ -0,0 +1,278 @@+{-# 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.ListFileShares+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Gets a list of the file shares for a specific S3 File Gateway, or the+-- list of file shares that belong to the calling user account. This+-- operation is only supported for S3 File Gateways.+--+-- This operation returns paginated results.+module Amazonka.StorageGateway.ListFileShares+ ( -- * Creating a Request+ ListFileShares (..),+ newListFileShares,++ -- * Request Lenses+ listFileShares_gatewayARN,+ listFileShares_limit,+ listFileShares_marker,++ -- * Destructuring the Response+ ListFileSharesResponse (..),+ newListFileSharesResponse,++ -- * Response Lenses+ listFileSharesResponse_fileShareInfoList,+ listFileSharesResponse_marker,+ listFileSharesResponse_nextMarker,+ listFileSharesResponse_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++-- | ListFileShareInput+--+-- /See:/ 'newListFileShares' smart constructor.+data ListFileShares = ListFileShares'+ { -- | The Amazon Resource Name (ARN) of the gateway whose file shares you want+ -- to list. If this field is not present, all file shares under your+ -- account are listed.+ gatewayARN :: Prelude.Maybe Prelude.Text,+ -- | The maximum number of file shares to return in the response. The value+ -- must be an integer with a value greater than zero. Optional.+ limit :: Prelude.Maybe Prelude.Natural,+ -- | Opaque pagination token returned from a previous ListFileShares+ -- operation. If present, @Marker@ specifies where to continue the list+ -- from after a previous call to ListFileShares. Optional.+ marker :: Prelude.Maybe Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'ListFileShares' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'listFileShares_gatewayARN' - The Amazon Resource Name (ARN) of the gateway whose file shares you want+-- to list. If this field is not present, all file shares under your+-- account are listed.+--+-- 'limit', 'listFileShares_limit' - The maximum number of file shares to return in the response. The value+-- must be an integer with a value greater than zero. Optional.+--+-- 'marker', 'listFileShares_marker' - Opaque pagination token returned from a previous ListFileShares+-- operation. If present, @Marker@ specifies where to continue the list+-- from after a previous call to ListFileShares. Optional.+newListFileShares ::+ ListFileShares+newListFileShares =+ ListFileShares'+ { gatewayARN = Prelude.Nothing,+ limit = Prelude.Nothing,+ marker = Prelude.Nothing+ }++-- | The Amazon Resource Name (ARN) of the gateway whose file shares you want+-- to list. If this field is not present, all file shares under your+-- account are listed.+listFileShares_gatewayARN :: Lens.Lens' ListFileShares (Prelude.Maybe Prelude.Text)+listFileShares_gatewayARN = Lens.lens (\ListFileShares' {gatewayARN} -> gatewayARN) (\s@ListFileShares' {} a -> s {gatewayARN = a} :: ListFileShares)++-- | The maximum number of file shares to return in the response. The value+-- must be an integer with a value greater than zero. Optional.+listFileShares_limit :: Lens.Lens' ListFileShares (Prelude.Maybe Prelude.Natural)+listFileShares_limit = Lens.lens (\ListFileShares' {limit} -> limit) (\s@ListFileShares' {} a -> s {limit = a} :: ListFileShares)++-- | Opaque pagination token returned from a previous ListFileShares+-- operation. If present, @Marker@ specifies where to continue the list+-- from after a previous call to ListFileShares. Optional.+listFileShares_marker :: Lens.Lens' ListFileShares (Prelude.Maybe Prelude.Text)+listFileShares_marker = Lens.lens (\ListFileShares' {marker} -> marker) (\s@ListFileShares' {} a -> s {marker = a} :: ListFileShares)++instance Core.AWSPager ListFileShares where+ page rq rs+ | Core.stop+ ( rs+ Lens.^? listFileSharesResponse_nextMarker+ Prelude.. Lens._Just+ ) =+ Prelude.Nothing+ | Core.stop+ ( rs+ Lens.^? listFileSharesResponse_fileShareInfoList+ Prelude.. Lens._Just+ ) =+ Prelude.Nothing+ | Prelude.otherwise =+ Prelude.Just+ Prelude.$ rq+ Prelude.& listFileShares_marker+ Lens..~ rs+ Lens.^? listFileSharesResponse_nextMarker+ Prelude.. Lens._Just++instance Core.AWSRequest ListFileShares where+ type+ AWSResponse ListFileShares =+ ListFileSharesResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ ListFileSharesResponse'+ Prelude.<$> ( x+ Data..?> "FileShareInfoList"+ Core..!@ Prelude.mempty+ )+ Prelude.<*> (x Data..?> "Marker")+ Prelude.<*> (x Data..?> "NextMarker")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable ListFileShares where+ hashWithSalt _salt ListFileShares' {..} =+ _salt+ `Prelude.hashWithSalt` gatewayARN+ `Prelude.hashWithSalt` limit+ `Prelude.hashWithSalt` marker++instance Prelude.NFData ListFileShares where+ rnf ListFileShares' {..} =+ Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf limit+ `Prelude.seq` Prelude.rnf marker++instance Data.ToHeaders ListFileShares where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.ListFileShares" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON ListFileShares where+ toJSON ListFileShares' {..} =+ Data.object+ ( Prelude.catMaybes+ [ ("GatewayARN" Data..=) Prelude.<$> gatewayARN,+ ("Limit" Data..=) Prelude.<$> limit,+ ("Marker" Data..=) Prelude.<$> marker+ ]+ )++instance Data.ToPath ListFileShares where+ toPath = Prelude.const "/"++instance Data.ToQuery ListFileShares where+ toQuery = Prelude.const Prelude.mempty++-- | ListFileShareOutput+--+-- /See:/ 'newListFileSharesResponse' smart constructor.+data ListFileSharesResponse = ListFileSharesResponse'+ { -- | An array of information about the S3 File Gateway\'s file shares.+ fileShareInfoList :: Prelude.Maybe [FileShareInfo],+ -- | If the request includes @Marker@, the response returns that value in+ -- this field.+ marker :: Prelude.Maybe Prelude.Text,+ -- | If a value is present, there are more file shares to return. In a+ -- subsequent request, use @NextMarker@ as the value for @Marker@ to+ -- retrieve the next set of file shares.+ nextMarker :: 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 'ListFileSharesResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'fileShareInfoList', 'listFileSharesResponse_fileShareInfoList' - An array of information about the S3 File Gateway\'s file shares.+--+-- 'marker', 'listFileSharesResponse_marker' - If the request includes @Marker@, the response returns that value in+-- this field.+--+-- 'nextMarker', 'listFileSharesResponse_nextMarker' - If a value is present, there are more file shares to return. In a+-- subsequent request, use @NextMarker@ as the value for @Marker@ to+-- retrieve the next set of file shares.+--+-- 'httpStatus', 'listFileSharesResponse_httpStatus' - The response's http status code.+newListFileSharesResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ ListFileSharesResponse+newListFileSharesResponse pHttpStatus_ =+ ListFileSharesResponse'+ { fileShareInfoList =+ Prelude.Nothing,+ marker = Prelude.Nothing,+ nextMarker = Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | An array of information about the S3 File Gateway\'s file shares.+listFileSharesResponse_fileShareInfoList :: Lens.Lens' ListFileSharesResponse (Prelude.Maybe [FileShareInfo])+listFileSharesResponse_fileShareInfoList = Lens.lens (\ListFileSharesResponse' {fileShareInfoList} -> fileShareInfoList) (\s@ListFileSharesResponse' {} a -> s {fileShareInfoList = a} :: ListFileSharesResponse) Prelude.. Lens.mapping Lens.coerced++-- | If the request includes @Marker@, the response returns that value in+-- this field.+listFileSharesResponse_marker :: Lens.Lens' ListFileSharesResponse (Prelude.Maybe Prelude.Text)+listFileSharesResponse_marker = Lens.lens (\ListFileSharesResponse' {marker} -> marker) (\s@ListFileSharesResponse' {} a -> s {marker = a} :: ListFileSharesResponse)++-- | If a value is present, there are more file shares to return. In a+-- subsequent request, use @NextMarker@ as the value for @Marker@ to+-- retrieve the next set of file shares.+listFileSharesResponse_nextMarker :: Lens.Lens' ListFileSharesResponse (Prelude.Maybe Prelude.Text)+listFileSharesResponse_nextMarker = Lens.lens (\ListFileSharesResponse' {nextMarker} -> nextMarker) (\s@ListFileSharesResponse' {} a -> s {nextMarker = a} :: ListFileSharesResponse)++-- | The response's http status code.+listFileSharesResponse_httpStatus :: Lens.Lens' ListFileSharesResponse Prelude.Int+listFileSharesResponse_httpStatus = Lens.lens (\ListFileSharesResponse' {httpStatus} -> httpStatus) (\s@ListFileSharesResponse' {} a -> s {httpStatus = a} :: ListFileSharesResponse)++instance Prelude.NFData ListFileSharesResponse where+ rnf ListFileSharesResponse' {..} =+ Prelude.rnf fileShareInfoList+ `Prelude.seq` Prelude.rnf marker+ `Prelude.seq` Prelude.rnf nextMarker+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/ListFileSystemAssociations.hs view
@@ -0,0 +1,280 @@+{-# 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.ListFileSystemAssociations+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Gets a list of @FileSystemAssociationSummary@ objects. Each object+-- contains a summary of a file system association. This operation is only+-- supported for FSx File Gateways.+--+-- This operation returns paginated results.+module Amazonka.StorageGateway.ListFileSystemAssociations+ ( -- * Creating a Request+ ListFileSystemAssociations (..),+ newListFileSystemAssociations,++ -- * Request Lenses+ listFileSystemAssociations_gatewayARN,+ listFileSystemAssociations_limit,+ listFileSystemAssociations_marker,++ -- * Destructuring the Response+ ListFileSystemAssociationsResponse (..),+ newListFileSystemAssociationsResponse,++ -- * Response Lenses+ listFileSystemAssociationsResponse_fileSystemAssociationSummaryList,+ listFileSystemAssociationsResponse_marker,+ listFileSystemAssociationsResponse_nextMarker,+ listFileSystemAssociationsResponse_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++-- | /See:/ 'newListFileSystemAssociations' smart constructor.+data ListFileSystemAssociations = ListFileSystemAssociations'+ { gatewayARN :: Prelude.Maybe Prelude.Text,+ -- | The maximum number of file system associations to return in the+ -- response. If present, @Limit@ must be an integer with a value greater+ -- than zero. Optional.+ limit :: Prelude.Maybe Prelude.Natural,+ -- | Opaque pagination token returned from a previous+ -- @ListFileSystemAssociations@ operation. If present, @Marker@ specifies+ -- where to continue the list from after a previous call to+ -- @ListFileSystemAssociations@. Optional.+ marker :: Prelude.Maybe Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'ListFileSystemAssociations' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'listFileSystemAssociations_gatewayARN' - Undocumented member.+--+-- 'limit', 'listFileSystemAssociations_limit' - The maximum number of file system associations to return in the+-- response. If present, @Limit@ must be an integer with a value greater+-- than zero. Optional.+--+-- 'marker', 'listFileSystemAssociations_marker' - Opaque pagination token returned from a previous+-- @ListFileSystemAssociations@ operation. If present, @Marker@ specifies+-- where to continue the list from after a previous call to+-- @ListFileSystemAssociations@. Optional.+newListFileSystemAssociations ::+ ListFileSystemAssociations+newListFileSystemAssociations =+ ListFileSystemAssociations'+ { gatewayARN =+ Prelude.Nothing,+ limit = Prelude.Nothing,+ marker = Prelude.Nothing+ }++-- | Undocumented member.+listFileSystemAssociations_gatewayARN :: Lens.Lens' ListFileSystemAssociations (Prelude.Maybe Prelude.Text)+listFileSystemAssociations_gatewayARN = Lens.lens (\ListFileSystemAssociations' {gatewayARN} -> gatewayARN) (\s@ListFileSystemAssociations' {} a -> s {gatewayARN = a} :: ListFileSystemAssociations)++-- | The maximum number of file system associations to return in the+-- response. If present, @Limit@ must be an integer with a value greater+-- than zero. Optional.+listFileSystemAssociations_limit :: Lens.Lens' ListFileSystemAssociations (Prelude.Maybe Prelude.Natural)+listFileSystemAssociations_limit = Lens.lens (\ListFileSystemAssociations' {limit} -> limit) (\s@ListFileSystemAssociations' {} a -> s {limit = a} :: ListFileSystemAssociations)++-- | Opaque pagination token returned from a previous+-- @ListFileSystemAssociations@ operation. If present, @Marker@ specifies+-- where to continue the list from after a previous call to+-- @ListFileSystemAssociations@. Optional.+listFileSystemAssociations_marker :: Lens.Lens' ListFileSystemAssociations (Prelude.Maybe Prelude.Text)+listFileSystemAssociations_marker = Lens.lens (\ListFileSystemAssociations' {marker} -> marker) (\s@ListFileSystemAssociations' {} a -> s {marker = a} :: ListFileSystemAssociations)++instance Core.AWSPager ListFileSystemAssociations where+ page rq rs+ | Core.stop+ ( rs+ Lens.^? listFileSystemAssociationsResponse_nextMarker+ Prelude.. Lens._Just+ ) =+ Prelude.Nothing+ | Core.stop+ ( rs+ Lens.^? listFileSystemAssociationsResponse_fileSystemAssociationSummaryList+ Prelude.. Lens._Just+ ) =+ Prelude.Nothing+ | Prelude.otherwise =+ Prelude.Just+ Prelude.$ rq+ Prelude.& listFileSystemAssociations_marker+ Lens..~ rs+ Lens.^? listFileSystemAssociationsResponse_nextMarker+ Prelude.. Lens._Just++instance Core.AWSRequest ListFileSystemAssociations where+ type+ AWSResponse ListFileSystemAssociations =+ ListFileSystemAssociationsResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ ListFileSystemAssociationsResponse'+ Prelude.<$> ( x+ Data..?> "FileSystemAssociationSummaryList"+ Core..!@ Prelude.mempty+ )+ Prelude.<*> (x Data..?> "Marker")+ Prelude.<*> (x Data..?> "NextMarker")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable ListFileSystemAssociations where+ hashWithSalt _salt ListFileSystemAssociations' {..} =+ _salt+ `Prelude.hashWithSalt` gatewayARN+ `Prelude.hashWithSalt` limit+ `Prelude.hashWithSalt` marker++instance Prelude.NFData ListFileSystemAssociations where+ rnf ListFileSystemAssociations' {..} =+ Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf limit+ `Prelude.seq` Prelude.rnf marker++instance Data.ToHeaders ListFileSystemAssociations where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.ListFileSystemAssociations" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON ListFileSystemAssociations where+ toJSON ListFileSystemAssociations' {..} =+ Data.object+ ( Prelude.catMaybes+ [ ("GatewayARN" Data..=) Prelude.<$> gatewayARN,+ ("Limit" Data..=) Prelude.<$> limit,+ ("Marker" Data..=) Prelude.<$> marker+ ]+ )++instance Data.ToPath ListFileSystemAssociations where+ toPath = Prelude.const "/"++instance Data.ToQuery ListFileSystemAssociations where+ toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newListFileSystemAssociationsResponse' smart constructor.+data ListFileSystemAssociationsResponse = ListFileSystemAssociationsResponse'+ { -- | An array of information about the Amazon FSx gateway\'s file system+ -- associations.+ fileSystemAssociationSummaryList :: Prelude.Maybe [FileSystemAssociationSummary],+ -- | If the request includes @Marker@, the response returns that value in+ -- this field.+ marker :: Prelude.Maybe Prelude.Text,+ -- | If a value is present, there are more file system associations to+ -- return. In a subsequent request, use @NextMarker@ as the value for+ -- @Marker@ to retrieve the next set of file system associations.+ nextMarker :: 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 'ListFileSystemAssociationsResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'fileSystemAssociationSummaryList', 'listFileSystemAssociationsResponse_fileSystemAssociationSummaryList' - An array of information about the Amazon FSx gateway\'s file system+-- associations.+--+-- 'marker', 'listFileSystemAssociationsResponse_marker' - If the request includes @Marker@, the response returns that value in+-- this field.+--+-- 'nextMarker', 'listFileSystemAssociationsResponse_nextMarker' - If a value is present, there are more file system associations to+-- return. In a subsequent request, use @NextMarker@ as the value for+-- @Marker@ to retrieve the next set of file system associations.+--+-- 'httpStatus', 'listFileSystemAssociationsResponse_httpStatus' - The response's http status code.+newListFileSystemAssociationsResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ ListFileSystemAssociationsResponse+newListFileSystemAssociationsResponse pHttpStatus_ =+ ListFileSystemAssociationsResponse'+ { fileSystemAssociationSummaryList =+ Prelude.Nothing,+ marker = Prelude.Nothing,+ nextMarker = Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | An array of information about the Amazon FSx gateway\'s file system+-- associations.+listFileSystemAssociationsResponse_fileSystemAssociationSummaryList :: Lens.Lens' ListFileSystemAssociationsResponse (Prelude.Maybe [FileSystemAssociationSummary])+listFileSystemAssociationsResponse_fileSystemAssociationSummaryList = Lens.lens (\ListFileSystemAssociationsResponse' {fileSystemAssociationSummaryList} -> fileSystemAssociationSummaryList) (\s@ListFileSystemAssociationsResponse' {} a -> s {fileSystemAssociationSummaryList = a} :: ListFileSystemAssociationsResponse) Prelude.. Lens.mapping Lens.coerced++-- | If the request includes @Marker@, the response returns that value in+-- this field.+listFileSystemAssociationsResponse_marker :: Lens.Lens' ListFileSystemAssociationsResponse (Prelude.Maybe Prelude.Text)+listFileSystemAssociationsResponse_marker = Lens.lens (\ListFileSystemAssociationsResponse' {marker} -> marker) (\s@ListFileSystemAssociationsResponse' {} a -> s {marker = a} :: ListFileSystemAssociationsResponse)++-- | If a value is present, there are more file system associations to+-- return. In a subsequent request, use @NextMarker@ as the value for+-- @Marker@ to retrieve the next set of file system associations.+listFileSystemAssociationsResponse_nextMarker :: Lens.Lens' ListFileSystemAssociationsResponse (Prelude.Maybe Prelude.Text)+listFileSystemAssociationsResponse_nextMarker = Lens.lens (\ListFileSystemAssociationsResponse' {nextMarker} -> nextMarker) (\s@ListFileSystemAssociationsResponse' {} a -> s {nextMarker = a} :: ListFileSystemAssociationsResponse)++-- | The response's http status code.+listFileSystemAssociationsResponse_httpStatus :: Lens.Lens' ListFileSystemAssociationsResponse Prelude.Int+listFileSystemAssociationsResponse_httpStatus = Lens.lens (\ListFileSystemAssociationsResponse' {httpStatus} -> httpStatus) (\s@ListFileSystemAssociationsResponse' {} a -> s {httpStatus = a} :: ListFileSystemAssociationsResponse)++instance+ Prelude.NFData+ ListFileSystemAssociationsResponse+ where+ rnf ListFileSystemAssociationsResponse' {..} =+ Prelude.rnf fileSystemAssociationSummaryList+ `Prelude.seq` Prelude.rnf marker+ `Prelude.seq` Prelude.rnf nextMarker+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/ListGateways.hs view
@@ -0,0 +1,245 @@+{-# 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.ListGateways+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Lists gateways owned by an Amazon Web Services account in an Amazon Web+-- Services Region specified in the request. The returned list is ordered+-- by gateway Amazon Resource Name (ARN).+--+-- By default, the operation returns a maximum of 100 gateways. This+-- operation supports pagination that allows you to optionally reduce the+-- number of gateways returned in a response.+--+-- If you have more gateways than are returned in a response (that is, the+-- response returns only a truncated list of your gateways), the response+-- contains a marker that you can specify in your next request to fetch the+-- next page of gateways.+--+-- This operation returns paginated results.+module Amazonka.StorageGateway.ListGateways+ ( -- * Creating a Request+ ListGateways (..),+ newListGateways,++ -- * Request Lenses+ listGateways_limit,+ listGateways_marker,++ -- * Destructuring the Response+ ListGatewaysResponse (..),+ newListGatewaysResponse,++ -- * Response Lenses+ listGatewaysResponse_gateways,+ listGatewaysResponse_marker,+ listGatewaysResponse_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++-- | A JSON object containing zero or more of the following fields:+--+-- - ListGatewaysInput$Limit+--+-- - ListGatewaysInput$Marker+--+-- /See:/ 'newListGateways' smart constructor.+data ListGateways = ListGateways'+ { -- | Specifies that the list of gateways returned be limited to the specified+ -- number of items.+ limit :: Prelude.Maybe Prelude.Natural,+ -- | An opaque string that indicates the position at which to begin the+ -- returned list of gateways.+ marker :: Prelude.Maybe Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'ListGateways' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'limit', 'listGateways_limit' - Specifies that the list of gateways returned be limited to the specified+-- number of items.+--+-- 'marker', 'listGateways_marker' - An opaque string that indicates the position at which to begin the+-- returned list of gateways.+newListGateways ::+ ListGateways+newListGateways =+ ListGateways'+ { limit = Prelude.Nothing,+ marker = Prelude.Nothing+ }++-- | Specifies that the list of gateways returned be limited to the specified+-- number of items.+listGateways_limit :: Lens.Lens' ListGateways (Prelude.Maybe Prelude.Natural)+listGateways_limit = Lens.lens (\ListGateways' {limit} -> limit) (\s@ListGateways' {} a -> s {limit = a} :: ListGateways)++-- | An opaque string that indicates the position at which to begin the+-- returned list of gateways.+listGateways_marker :: Lens.Lens' ListGateways (Prelude.Maybe Prelude.Text)+listGateways_marker = Lens.lens (\ListGateways' {marker} -> marker) (\s@ListGateways' {} a -> s {marker = a} :: ListGateways)++instance Core.AWSPager ListGateways where+ page rq rs+ | Core.stop+ ( rs+ Lens.^? listGatewaysResponse_marker+ Prelude.. Lens._Just+ ) =+ Prelude.Nothing+ | Core.stop+ ( rs+ Lens.^? listGatewaysResponse_gateways+ Prelude.. Lens._Just+ ) =+ Prelude.Nothing+ | Prelude.otherwise =+ Prelude.Just+ Prelude.$ rq+ Prelude.& listGateways_marker+ Lens..~ rs+ Lens.^? listGatewaysResponse_marker+ Prelude.. Lens._Just++instance Core.AWSRequest ListGateways where+ type AWSResponse ListGateways = ListGatewaysResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ ListGatewaysResponse'+ Prelude.<$> (x Data..?> "Gateways" Core..!@ Prelude.mempty)+ Prelude.<*> (x Data..?> "Marker")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable ListGateways where+ hashWithSalt _salt ListGateways' {..} =+ _salt+ `Prelude.hashWithSalt` limit+ `Prelude.hashWithSalt` marker++instance Prelude.NFData ListGateways where+ rnf ListGateways' {..} =+ Prelude.rnf limit `Prelude.seq` Prelude.rnf marker++instance Data.ToHeaders ListGateways where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.ListGateways" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON ListGateways where+ toJSON ListGateways' {..} =+ Data.object+ ( Prelude.catMaybes+ [ ("Limit" Data..=) Prelude.<$> limit,+ ("Marker" Data..=) Prelude.<$> marker+ ]+ )++instance Data.ToPath ListGateways where+ toPath = Prelude.const "/"++instance Data.ToQuery ListGateways where+ toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newListGatewaysResponse' smart constructor.+data ListGatewaysResponse = ListGatewaysResponse'+ { -- | An array of GatewayInfo objects.+ gateways :: Prelude.Maybe [GatewayInfo],+ -- | Use the marker in your next request to fetch the next set of gateways in+ -- the list. If there are no more gateways to list, this field does not+ -- appear in the response.+ marker :: 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 'ListGatewaysResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gateways', 'listGatewaysResponse_gateways' - An array of GatewayInfo objects.+--+-- 'marker', 'listGatewaysResponse_marker' - Use the marker in your next request to fetch the next set of gateways in+-- the list. If there are no more gateways to list, this field does not+-- appear in the response.+--+-- 'httpStatus', 'listGatewaysResponse_httpStatus' - The response's http status code.+newListGatewaysResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ ListGatewaysResponse+newListGatewaysResponse pHttpStatus_ =+ ListGatewaysResponse'+ { gateways = Prelude.Nothing,+ marker = Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | An array of GatewayInfo objects.+listGatewaysResponse_gateways :: Lens.Lens' ListGatewaysResponse (Prelude.Maybe [GatewayInfo])+listGatewaysResponse_gateways = Lens.lens (\ListGatewaysResponse' {gateways} -> gateways) (\s@ListGatewaysResponse' {} a -> s {gateways = a} :: ListGatewaysResponse) Prelude.. Lens.mapping Lens.coerced++-- | Use the marker in your next request to fetch the next set of gateways in+-- the list. If there are no more gateways to list, this field does not+-- appear in the response.+listGatewaysResponse_marker :: Lens.Lens' ListGatewaysResponse (Prelude.Maybe Prelude.Text)+listGatewaysResponse_marker = Lens.lens (\ListGatewaysResponse' {marker} -> marker) (\s@ListGatewaysResponse' {} a -> s {marker = a} :: ListGatewaysResponse)++-- | The response's http status code.+listGatewaysResponse_httpStatus :: Lens.Lens' ListGatewaysResponse Prelude.Int+listGatewaysResponse_httpStatus = Lens.lens (\ListGatewaysResponse' {httpStatus} -> httpStatus) (\s@ListGatewaysResponse' {} a -> s {httpStatus = a} :: ListGatewaysResponse)++instance Prelude.NFData ListGatewaysResponse where+ rnf ListGatewaysResponse' {..} =+ Prelude.rnf gateways+ `Prelude.seq` Prelude.rnf marker+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/ListLocalDisks.hs view
@@ -0,0 +1,194 @@+{-# 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.ListLocalDisks+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Returns a list of the gateway\'s local disks. To specify which gateway+-- to describe, you use the Amazon Resource Name (ARN) of the gateway in+-- the body of the request.+--+-- The request returns a list of all disks, specifying which are configured+-- as working storage, cache storage, or stored volume or not configured at+-- all. The response includes a @DiskStatus@ field. This field can have a+-- value of present (the disk is available to use), missing (the disk is no+-- longer connected to the gateway), or mismatch (the disk node is occupied+-- by a disk that has incorrect metadata or the disk content is corrupted).+module Amazonka.StorageGateway.ListLocalDisks+ ( -- * Creating a Request+ ListLocalDisks (..),+ newListLocalDisks,++ -- * Request Lenses+ listLocalDisks_gatewayARN,++ -- * Destructuring the Response+ ListLocalDisksResponse (..),+ newListLocalDisksResponse,++ -- * Response Lenses+ listLocalDisksResponse_disks,+ listLocalDisksResponse_gatewayARN,+ listLocalDisksResponse_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++-- | A JSON object containing the Amazon Resource Name (ARN) of the gateway.+--+-- /See:/ 'newListLocalDisks' smart constructor.+data ListLocalDisks = ListLocalDisks'+ { gatewayARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'ListLocalDisks' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'listLocalDisks_gatewayARN' - Undocumented member.+newListLocalDisks ::+ -- | 'gatewayARN'+ Prelude.Text ->+ ListLocalDisks+newListLocalDisks pGatewayARN_ =+ ListLocalDisks' {gatewayARN = pGatewayARN_}++-- | Undocumented member.+listLocalDisks_gatewayARN :: Lens.Lens' ListLocalDisks Prelude.Text+listLocalDisks_gatewayARN = Lens.lens (\ListLocalDisks' {gatewayARN} -> gatewayARN) (\s@ListLocalDisks' {} a -> s {gatewayARN = a} :: ListLocalDisks)++instance Core.AWSRequest ListLocalDisks where+ type+ AWSResponse ListLocalDisks =+ ListLocalDisksResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ ListLocalDisksResponse'+ Prelude.<$> (x Data..?> "Disks" Core..!@ Prelude.mempty)+ Prelude.<*> (x Data..?> "GatewayARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable ListLocalDisks where+ hashWithSalt _salt ListLocalDisks' {..} =+ _salt `Prelude.hashWithSalt` gatewayARN++instance Prelude.NFData ListLocalDisks where+ rnf ListLocalDisks' {..} = Prelude.rnf gatewayARN++instance Data.ToHeaders ListLocalDisks where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.ListLocalDisks" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON ListLocalDisks where+ toJSON ListLocalDisks' {..} =+ Data.object+ ( Prelude.catMaybes+ [Prelude.Just ("GatewayARN" Data..= gatewayARN)]+ )++instance Data.ToPath ListLocalDisks where+ toPath = Prelude.const "/"++instance Data.ToQuery ListLocalDisks where+ toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newListLocalDisksResponse' smart constructor.+data ListLocalDisksResponse = ListLocalDisksResponse'+ { -- | A JSON object containing the following fields:+ --+ -- - ListLocalDisksOutput$Disks+ disks :: Prelude.Maybe [Disk],+ gatewayARN :: 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 'ListLocalDisksResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'disks', 'listLocalDisksResponse_disks' - A JSON object containing the following fields:+--+-- - ListLocalDisksOutput$Disks+--+-- 'gatewayARN', 'listLocalDisksResponse_gatewayARN' - Undocumented member.+--+-- 'httpStatus', 'listLocalDisksResponse_httpStatus' - The response's http status code.+newListLocalDisksResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ ListLocalDisksResponse+newListLocalDisksResponse pHttpStatus_ =+ ListLocalDisksResponse'+ { disks = Prelude.Nothing,+ gatewayARN = Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | A JSON object containing the following fields:+--+-- - ListLocalDisksOutput$Disks+listLocalDisksResponse_disks :: Lens.Lens' ListLocalDisksResponse (Prelude.Maybe [Disk])+listLocalDisksResponse_disks = Lens.lens (\ListLocalDisksResponse' {disks} -> disks) (\s@ListLocalDisksResponse' {} a -> s {disks = a} :: ListLocalDisksResponse) Prelude.. Lens.mapping Lens.coerced++-- | Undocumented member.+listLocalDisksResponse_gatewayARN :: Lens.Lens' ListLocalDisksResponse (Prelude.Maybe Prelude.Text)+listLocalDisksResponse_gatewayARN = Lens.lens (\ListLocalDisksResponse' {gatewayARN} -> gatewayARN) (\s@ListLocalDisksResponse' {} a -> s {gatewayARN = a} :: ListLocalDisksResponse)++-- | The response's http status code.+listLocalDisksResponse_httpStatus :: Lens.Lens' ListLocalDisksResponse Prelude.Int+listLocalDisksResponse_httpStatus = Lens.lens (\ListLocalDisksResponse' {httpStatus} -> httpStatus) (\s@ListLocalDisksResponse' {} a -> s {httpStatus = a} :: ListLocalDisksResponse)++instance Prelude.NFData ListLocalDisksResponse where+ rnf ListLocalDisksResponse' {..} =+ Prelude.rnf disks+ `Prelude.seq` Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/ListTagsForResource.hs view
@@ -0,0 +1,267 @@+{-# 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.ListTagsForResource+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Lists the tags that have been added to the specified resource. This+-- operation is supported in storage gateways of all types.+--+-- This operation returns paginated results.+module Amazonka.StorageGateway.ListTagsForResource+ ( -- * Creating a Request+ ListTagsForResource (..),+ newListTagsForResource,++ -- * Request Lenses+ listTagsForResource_limit,+ listTagsForResource_marker,+ listTagsForResource_resourceARN,++ -- * Destructuring the Response+ ListTagsForResourceResponse (..),+ newListTagsForResourceResponse,++ -- * Response Lenses+ listTagsForResourceResponse_marker,+ listTagsForResourceResponse_resourceARN,+ listTagsForResourceResponse_tags,+ listTagsForResourceResponse_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++-- | ListTagsForResourceInput+--+-- /See:/ 'newListTagsForResource' smart constructor.+data ListTagsForResource = ListTagsForResource'+ { -- | Specifies that the list of tags returned be limited to the specified+ -- number of items.+ limit :: Prelude.Maybe Prelude.Natural,+ -- | An opaque string that indicates the position at which to begin returning+ -- the list of tags.+ marker :: Prelude.Maybe Prelude.Text,+ -- | The Amazon Resource Name (ARN) of the resource for which you want to+ -- list tags.+ resourceARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'ListTagsForResource' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'limit', 'listTagsForResource_limit' - Specifies that the list of tags returned be limited to the specified+-- number of items.+--+-- 'marker', 'listTagsForResource_marker' - An opaque string that indicates the position at which to begin returning+-- the list of tags.+--+-- 'resourceARN', 'listTagsForResource_resourceARN' - The Amazon Resource Name (ARN) of the resource for which you want to+-- list tags.+newListTagsForResource ::+ -- | 'resourceARN'+ Prelude.Text ->+ ListTagsForResource+newListTagsForResource pResourceARN_ =+ ListTagsForResource'+ { limit = Prelude.Nothing,+ marker = Prelude.Nothing,+ resourceARN = pResourceARN_+ }++-- | Specifies that the list of tags returned be limited to the specified+-- number of items.+listTagsForResource_limit :: Lens.Lens' ListTagsForResource (Prelude.Maybe Prelude.Natural)+listTagsForResource_limit = Lens.lens (\ListTagsForResource' {limit} -> limit) (\s@ListTagsForResource' {} a -> s {limit = a} :: ListTagsForResource)++-- | An opaque string that indicates the position at which to begin returning+-- the list of tags.+listTagsForResource_marker :: Lens.Lens' ListTagsForResource (Prelude.Maybe Prelude.Text)+listTagsForResource_marker = Lens.lens (\ListTagsForResource' {marker} -> marker) (\s@ListTagsForResource' {} a -> s {marker = a} :: ListTagsForResource)++-- | The Amazon Resource Name (ARN) of the resource for which you want to+-- list tags.+listTagsForResource_resourceARN :: Lens.Lens' ListTagsForResource Prelude.Text+listTagsForResource_resourceARN = Lens.lens (\ListTagsForResource' {resourceARN} -> resourceARN) (\s@ListTagsForResource' {} a -> s {resourceARN = a} :: ListTagsForResource)++instance Core.AWSPager ListTagsForResource where+ page rq rs+ | Core.stop+ ( rs+ Lens.^? listTagsForResourceResponse_marker+ Prelude.. Lens._Just+ ) =+ Prelude.Nothing+ | Core.stop+ ( rs+ Lens.^? listTagsForResourceResponse_tags+ Prelude.. Lens._Just+ ) =+ Prelude.Nothing+ | Prelude.otherwise =+ Prelude.Just+ Prelude.$ rq+ Prelude.& listTagsForResource_marker+ Lens..~ rs+ Lens.^? listTagsForResourceResponse_marker+ Prelude.. Lens._Just++instance Core.AWSRequest ListTagsForResource where+ type+ AWSResponse ListTagsForResource =+ ListTagsForResourceResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ ListTagsForResourceResponse'+ Prelude.<$> (x Data..?> "Marker")+ Prelude.<*> (x Data..?> "ResourceARN")+ Prelude.<*> (x Data..?> "Tags" Core..!@ Prelude.mempty)+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable ListTagsForResource where+ hashWithSalt _salt ListTagsForResource' {..} =+ _salt+ `Prelude.hashWithSalt` limit+ `Prelude.hashWithSalt` marker+ `Prelude.hashWithSalt` resourceARN++instance Prelude.NFData ListTagsForResource where+ rnf ListTagsForResource' {..} =+ Prelude.rnf limit+ `Prelude.seq` Prelude.rnf marker+ `Prelude.seq` Prelude.rnf resourceARN++instance Data.ToHeaders ListTagsForResource where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.ListTagsForResource" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON ListTagsForResource where+ toJSON ListTagsForResource' {..} =+ Data.object+ ( Prelude.catMaybes+ [ ("Limit" Data..=) Prelude.<$> limit,+ ("Marker" Data..=) Prelude.<$> marker,+ Prelude.Just ("ResourceARN" Data..= resourceARN)+ ]+ )++instance Data.ToPath ListTagsForResource where+ toPath = Prelude.const "/"++instance Data.ToQuery ListTagsForResource where+ toQuery = Prelude.const Prelude.mempty++-- | ListTagsForResourceOutput+--+-- /See:/ 'newListTagsForResourceResponse' smart constructor.+data ListTagsForResourceResponse = ListTagsForResourceResponse'+ { -- | An opaque string that indicates the position at which to stop returning+ -- the list of tags.+ marker :: Prelude.Maybe Prelude.Text,+ -- | The Amazon Resource Name (ARN) of the resource for which you want to+ -- list tags.+ resourceARN :: Prelude.Maybe Prelude.Text,+ -- | An array that contains the tags for the specified resource.+ tags :: Prelude.Maybe [Tag],+ -- | The response's http status code.+ httpStatus :: Prelude.Int+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'ListTagsForResourceResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'marker', 'listTagsForResourceResponse_marker' - An opaque string that indicates the position at which to stop returning+-- the list of tags.+--+-- 'resourceARN', 'listTagsForResourceResponse_resourceARN' - The Amazon Resource Name (ARN) of the resource for which you want to+-- list tags.+--+-- 'tags', 'listTagsForResourceResponse_tags' - An array that contains the tags for the specified resource.+--+-- 'httpStatus', 'listTagsForResourceResponse_httpStatus' - The response's http status code.+newListTagsForResourceResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ ListTagsForResourceResponse+newListTagsForResourceResponse pHttpStatus_ =+ ListTagsForResourceResponse'+ { marker =+ Prelude.Nothing,+ resourceARN = Prelude.Nothing,+ tags = Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | An opaque string that indicates the position at which to stop returning+-- the list of tags.+listTagsForResourceResponse_marker :: Lens.Lens' ListTagsForResourceResponse (Prelude.Maybe Prelude.Text)+listTagsForResourceResponse_marker = Lens.lens (\ListTagsForResourceResponse' {marker} -> marker) (\s@ListTagsForResourceResponse' {} a -> s {marker = a} :: ListTagsForResourceResponse)++-- | The Amazon Resource Name (ARN) of the resource for which you want to+-- list tags.+listTagsForResourceResponse_resourceARN :: Lens.Lens' ListTagsForResourceResponse (Prelude.Maybe Prelude.Text)+listTagsForResourceResponse_resourceARN = Lens.lens (\ListTagsForResourceResponse' {resourceARN} -> resourceARN) (\s@ListTagsForResourceResponse' {} a -> s {resourceARN = a} :: ListTagsForResourceResponse)++-- | An array that contains the tags for the specified resource.+listTagsForResourceResponse_tags :: Lens.Lens' ListTagsForResourceResponse (Prelude.Maybe [Tag])+listTagsForResourceResponse_tags = Lens.lens (\ListTagsForResourceResponse' {tags} -> tags) (\s@ListTagsForResourceResponse' {} a -> s {tags = a} :: ListTagsForResourceResponse) Prelude.. Lens.mapping Lens.coerced++-- | The response's http status code.+listTagsForResourceResponse_httpStatus :: Lens.Lens' ListTagsForResourceResponse Prelude.Int+listTagsForResourceResponse_httpStatus = Lens.lens (\ListTagsForResourceResponse' {httpStatus} -> httpStatus) (\s@ListTagsForResourceResponse' {} a -> s {httpStatus = a} :: ListTagsForResourceResponse)++instance Prelude.NFData ListTagsForResourceResponse where+ rnf ListTagsForResourceResponse' {..} =+ Prelude.rnf marker+ `Prelude.seq` Prelude.rnf resourceARN+ `Prelude.seq` Prelude.rnf tags+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/ListTapePools.hs view
@@ -0,0 +1,268 @@+{-# 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.ListTapePools+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Lists custom tape pools. You specify custom tape pools to list by+-- specifying one or more custom tape pool Amazon Resource Names (ARNs). If+-- you don\'t specify a custom tape pool ARN, the operation lists all+-- custom tape pools.+--+-- This operation supports pagination. You can optionally specify the+-- @Limit@ parameter in the body to limit the number of tape pools in the+-- response. If the number of tape pools returned in the response is+-- truncated, the response includes a @Marker@ element that you can use in+-- your subsequent request to retrieve the next set of tape pools.+--+-- This operation returns paginated results.+module Amazonka.StorageGateway.ListTapePools+ ( -- * Creating a Request+ ListTapePools (..),+ newListTapePools,++ -- * Request Lenses+ listTapePools_limit,+ listTapePools_marker,+ listTapePools_poolARNs,++ -- * Destructuring the Response+ ListTapePoolsResponse (..),+ newListTapePoolsResponse,++ -- * Response Lenses+ listTapePoolsResponse_marker,+ listTapePoolsResponse_poolInfos,+ listTapePoolsResponse_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++-- | /See:/ 'newListTapePools' smart constructor.+data ListTapePools = ListTapePools'+ { -- | An optional number limit for the tape pools in the list returned by this+ -- call.+ limit :: Prelude.Maybe Prelude.Natural,+ -- | A string that indicates the position at which to begin the returned list+ -- of tape pools.+ marker :: Prelude.Maybe Prelude.Text,+ -- | The Amazon Resource Name (ARN) of each of the custom tape pools you want+ -- to list. If you don\'t specify a custom tape pool ARN, the response+ -- lists all custom tape pools.+ poolARNs :: Prelude.Maybe [Prelude.Text]+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'ListTapePools' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'limit', 'listTapePools_limit' - An optional number limit for the tape pools in the list returned by this+-- call.+--+-- 'marker', 'listTapePools_marker' - A string that indicates the position at which to begin the returned list+-- of tape pools.+--+-- 'poolARNs', 'listTapePools_poolARNs' - The Amazon Resource Name (ARN) of each of the custom tape pools you want+-- to list. If you don\'t specify a custom tape pool ARN, the response+-- lists all custom tape pools.+newListTapePools ::+ ListTapePools+newListTapePools =+ ListTapePools'+ { limit = Prelude.Nothing,+ marker = Prelude.Nothing,+ poolARNs = Prelude.Nothing+ }++-- | An optional number limit for the tape pools in the list returned by this+-- call.+listTapePools_limit :: Lens.Lens' ListTapePools (Prelude.Maybe Prelude.Natural)+listTapePools_limit = Lens.lens (\ListTapePools' {limit} -> limit) (\s@ListTapePools' {} a -> s {limit = a} :: ListTapePools)++-- | A string that indicates the position at which to begin the returned list+-- of tape pools.+listTapePools_marker :: Lens.Lens' ListTapePools (Prelude.Maybe Prelude.Text)+listTapePools_marker = Lens.lens (\ListTapePools' {marker} -> marker) (\s@ListTapePools' {} a -> s {marker = a} :: ListTapePools)++-- | The Amazon Resource Name (ARN) of each of the custom tape pools you want+-- to list. If you don\'t specify a custom tape pool ARN, the response+-- lists all custom tape pools.+listTapePools_poolARNs :: Lens.Lens' ListTapePools (Prelude.Maybe [Prelude.Text])+listTapePools_poolARNs = Lens.lens (\ListTapePools' {poolARNs} -> poolARNs) (\s@ListTapePools' {} a -> s {poolARNs = a} :: ListTapePools) Prelude.. Lens.mapping Lens.coerced++instance Core.AWSPager ListTapePools where+ page rq rs+ | Core.stop+ ( rs+ Lens.^? listTapePoolsResponse_marker+ Prelude.. Lens._Just+ ) =+ Prelude.Nothing+ | Core.stop+ ( rs+ Lens.^? listTapePoolsResponse_poolInfos+ Prelude.. Lens._Just+ ) =+ Prelude.Nothing+ | Prelude.otherwise =+ Prelude.Just+ Prelude.$ rq+ Prelude.& listTapePools_marker+ Lens..~ rs+ Lens.^? listTapePoolsResponse_marker+ Prelude.. Lens._Just++instance Core.AWSRequest ListTapePools where+ type+ AWSResponse ListTapePools =+ ListTapePoolsResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ ListTapePoolsResponse'+ Prelude.<$> (x Data..?> "Marker")+ Prelude.<*> (x Data..?> "PoolInfos" Core..!@ Prelude.mempty)+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable ListTapePools where+ hashWithSalt _salt ListTapePools' {..} =+ _salt+ `Prelude.hashWithSalt` limit+ `Prelude.hashWithSalt` marker+ `Prelude.hashWithSalt` poolARNs++instance Prelude.NFData ListTapePools where+ rnf ListTapePools' {..} =+ Prelude.rnf limit+ `Prelude.seq` Prelude.rnf marker+ `Prelude.seq` Prelude.rnf poolARNs++instance Data.ToHeaders ListTapePools where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.ListTapePools" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON ListTapePools where+ toJSON ListTapePools' {..} =+ Data.object+ ( Prelude.catMaybes+ [ ("Limit" Data..=) Prelude.<$> limit,+ ("Marker" Data..=) Prelude.<$> marker,+ ("PoolARNs" Data..=) Prelude.<$> poolARNs+ ]+ )++instance Data.ToPath ListTapePools where+ toPath = Prelude.const "/"++instance Data.ToQuery ListTapePools where+ toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newListTapePoolsResponse' smart constructor.+data ListTapePoolsResponse = ListTapePoolsResponse'+ { -- | A string that indicates the position at which to begin the returned list+ -- of tape pools. Use the marker in your next request to continue+ -- pagination of tape pools. If there are no more tape pools to list, this+ -- element does not appear in the response body.+ marker :: Prelude.Maybe Prelude.Text,+ -- | An array of @PoolInfo@ objects, where each object describes a single+ -- custom tape pool. If there are no custom tape pools, the @PoolInfos@ is+ -- an empty array.+ poolInfos :: Prelude.Maybe [PoolInfo],+ -- | The response's http status code.+ httpStatus :: Prelude.Int+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'ListTapePoolsResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'marker', 'listTapePoolsResponse_marker' - A string that indicates the position at which to begin the returned list+-- of tape pools. Use the marker in your next request to continue+-- pagination of tape pools. If there are no more tape pools to list, this+-- element does not appear in the response body.+--+-- 'poolInfos', 'listTapePoolsResponse_poolInfos' - An array of @PoolInfo@ objects, where each object describes a single+-- custom tape pool. If there are no custom tape pools, the @PoolInfos@ is+-- an empty array.+--+-- 'httpStatus', 'listTapePoolsResponse_httpStatus' - The response's http status code.+newListTapePoolsResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ ListTapePoolsResponse+newListTapePoolsResponse pHttpStatus_ =+ ListTapePoolsResponse'+ { marker = Prelude.Nothing,+ poolInfos = Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | A string that indicates the position at which to begin the returned list+-- of tape pools. Use the marker in your next request to continue+-- pagination of tape pools. If there are no more tape pools to list, this+-- element does not appear in the response body.+listTapePoolsResponse_marker :: Lens.Lens' ListTapePoolsResponse (Prelude.Maybe Prelude.Text)+listTapePoolsResponse_marker = Lens.lens (\ListTapePoolsResponse' {marker} -> marker) (\s@ListTapePoolsResponse' {} a -> s {marker = a} :: ListTapePoolsResponse)++-- | An array of @PoolInfo@ objects, where each object describes a single+-- custom tape pool. If there are no custom tape pools, the @PoolInfos@ is+-- an empty array.+listTapePoolsResponse_poolInfos :: Lens.Lens' ListTapePoolsResponse (Prelude.Maybe [PoolInfo])+listTapePoolsResponse_poolInfos = Lens.lens (\ListTapePoolsResponse' {poolInfos} -> poolInfos) (\s@ListTapePoolsResponse' {} a -> s {poolInfos = a} :: ListTapePoolsResponse) Prelude.. Lens.mapping Lens.coerced++-- | The response's http status code.+listTapePoolsResponse_httpStatus :: Lens.Lens' ListTapePoolsResponse Prelude.Int+listTapePoolsResponse_httpStatus = Lens.lens (\ListTapePoolsResponse' {httpStatus} -> httpStatus) (\s@ListTapePoolsResponse' {} a -> s {httpStatus = a} :: ListTapePoolsResponse)++instance Prelude.NFData ListTapePoolsResponse where+ rnf ListTapePoolsResponse' {..} =+ Prelude.rnf marker+ `Prelude.seq` Prelude.rnf poolInfos+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/ListTapes.hs view
@@ -0,0 +1,268 @@+{-# 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.ListTapes+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Lists virtual tapes in your virtual tape library (VTL) and your virtual+-- tape shelf (VTS). You specify the tapes to list by specifying one or+-- more tape Amazon Resource Names (ARNs). If you don\'t specify a tape+-- ARN, the operation lists all virtual tapes in both your VTL and VTS.+--+-- This operation supports pagination. By default, the operation returns a+-- maximum of up to 100 tapes. You can optionally specify the @Limit@+-- parameter in the body to limit the number of tapes in the response. If+-- the number of tapes returned in the response is truncated, the response+-- includes a @Marker@ element that you can use in your subsequent request+-- to retrieve the next set of tapes. This operation is only supported in+-- the tape gateway type.+--+-- This operation returns paginated results.+module Amazonka.StorageGateway.ListTapes+ ( -- * Creating a Request+ ListTapes (..),+ newListTapes,++ -- * Request Lenses+ listTapes_limit,+ listTapes_marker,+ listTapes_tapeARNs,++ -- * Destructuring the Response+ ListTapesResponse (..),+ newListTapesResponse,++ -- * Response Lenses+ listTapesResponse_marker,+ listTapesResponse_tapeInfos,+ listTapesResponse_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++-- | A JSON object that contains one or more of the following fields:+--+-- - ListTapesInput$Limit+--+-- - ListTapesInput$Marker+--+-- - ListTapesInput$TapeARNs+--+-- /See:/ 'newListTapes' smart constructor.+data ListTapes = ListTapes'+ { -- | An optional number limit for the tapes in the list returned by this+ -- call.+ limit :: Prelude.Maybe Prelude.Natural,+ -- | A string that indicates the position at which to begin the returned list+ -- of tapes.+ marker :: Prelude.Maybe Prelude.Text,+ tapeARNs :: Prelude.Maybe [Prelude.Text]+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'ListTapes' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'limit', 'listTapes_limit' - An optional number limit for the tapes in the list returned by this+-- call.+--+-- 'marker', 'listTapes_marker' - A string that indicates the position at which to begin the returned list+-- of tapes.+--+-- 'tapeARNs', 'listTapes_tapeARNs' - Undocumented member.+newListTapes ::+ ListTapes+newListTapes =+ ListTapes'+ { limit = Prelude.Nothing,+ marker = Prelude.Nothing,+ tapeARNs = Prelude.Nothing+ }++-- | An optional number limit for the tapes in the list returned by this+-- call.+listTapes_limit :: Lens.Lens' ListTapes (Prelude.Maybe Prelude.Natural)+listTapes_limit = Lens.lens (\ListTapes' {limit} -> limit) (\s@ListTapes' {} a -> s {limit = a} :: ListTapes)++-- | A string that indicates the position at which to begin the returned list+-- of tapes.+listTapes_marker :: Lens.Lens' ListTapes (Prelude.Maybe Prelude.Text)+listTapes_marker = Lens.lens (\ListTapes' {marker} -> marker) (\s@ListTapes' {} a -> s {marker = a} :: ListTapes)++-- | Undocumented member.+listTapes_tapeARNs :: Lens.Lens' ListTapes (Prelude.Maybe [Prelude.Text])+listTapes_tapeARNs = Lens.lens (\ListTapes' {tapeARNs} -> tapeARNs) (\s@ListTapes' {} a -> s {tapeARNs = a} :: ListTapes) Prelude.. Lens.mapping Lens.coerced++instance Core.AWSPager ListTapes where+ page rq rs+ | Core.stop+ ( rs+ Lens.^? listTapesResponse_marker+ Prelude.. Lens._Just+ ) =+ Prelude.Nothing+ | Core.stop+ ( rs+ Lens.^? listTapesResponse_tapeInfos+ Prelude.. Lens._Just+ ) =+ Prelude.Nothing+ | Prelude.otherwise =+ Prelude.Just+ Prelude.$ rq+ Prelude.& listTapes_marker+ Lens..~ rs+ Lens.^? listTapesResponse_marker+ Prelude.. Lens._Just++instance Core.AWSRequest ListTapes where+ type AWSResponse ListTapes = ListTapesResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ ListTapesResponse'+ Prelude.<$> (x Data..?> "Marker")+ Prelude.<*> (x Data..?> "TapeInfos" Core..!@ Prelude.mempty)+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable ListTapes where+ hashWithSalt _salt ListTapes' {..} =+ _salt+ `Prelude.hashWithSalt` limit+ `Prelude.hashWithSalt` marker+ `Prelude.hashWithSalt` tapeARNs++instance Prelude.NFData ListTapes where+ rnf ListTapes' {..} =+ Prelude.rnf limit+ `Prelude.seq` Prelude.rnf marker+ `Prelude.seq` Prelude.rnf tapeARNs++instance Data.ToHeaders ListTapes where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.ListTapes" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON ListTapes where+ toJSON ListTapes' {..} =+ Data.object+ ( Prelude.catMaybes+ [ ("Limit" Data..=) Prelude.<$> limit,+ ("Marker" Data..=) Prelude.<$> marker,+ ("TapeARNs" Data..=) Prelude.<$> tapeARNs+ ]+ )++instance Data.ToPath ListTapes where+ toPath = Prelude.const "/"++instance Data.ToQuery ListTapes where+ toQuery = Prelude.const Prelude.mempty++-- | A JSON object containing the following fields:+--+-- - ListTapesOutput$Marker+--+-- - ListTapesOutput$VolumeInfos+--+-- /See:/ 'newListTapesResponse' smart constructor.+data ListTapesResponse = ListTapesResponse'+ { -- | A string that indicates the position at which to begin returning the+ -- next list of tapes. Use the marker in your next request to continue+ -- pagination of tapes. If there are no more tapes to list, this element+ -- does not appear in the response body.+ marker :: Prelude.Maybe Prelude.Text,+ tapeInfos :: Prelude.Maybe [TapeInfo],+ -- | The response's http status code.+ httpStatus :: Prelude.Int+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'ListTapesResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'marker', 'listTapesResponse_marker' - A string that indicates the position at which to begin returning the+-- next list of tapes. Use the marker in your next request to continue+-- pagination of tapes. If there are no more tapes to list, this element+-- does not appear in the response body.+--+-- 'tapeInfos', 'listTapesResponse_tapeInfos' - Undocumented member.+--+-- 'httpStatus', 'listTapesResponse_httpStatus' - The response's http status code.+newListTapesResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ ListTapesResponse+newListTapesResponse pHttpStatus_ =+ ListTapesResponse'+ { marker = Prelude.Nothing,+ tapeInfos = Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | A string that indicates the position at which to begin returning the+-- next list of tapes. Use the marker in your next request to continue+-- pagination of tapes. If there are no more tapes to list, this element+-- does not appear in the response body.+listTapesResponse_marker :: Lens.Lens' ListTapesResponse (Prelude.Maybe Prelude.Text)+listTapesResponse_marker = Lens.lens (\ListTapesResponse' {marker} -> marker) (\s@ListTapesResponse' {} a -> s {marker = a} :: ListTapesResponse)++-- | Undocumented member.+listTapesResponse_tapeInfos :: Lens.Lens' ListTapesResponse (Prelude.Maybe [TapeInfo])+listTapesResponse_tapeInfos = Lens.lens (\ListTapesResponse' {tapeInfos} -> tapeInfos) (\s@ListTapesResponse' {} a -> s {tapeInfos = a} :: ListTapesResponse) Prelude.. Lens.mapping Lens.coerced++-- | The response's http status code.+listTapesResponse_httpStatus :: Lens.Lens' ListTapesResponse Prelude.Int+listTapesResponse_httpStatus = Lens.lens (\ListTapesResponse' {httpStatus} -> httpStatus) (\s@ListTapesResponse' {} a -> s {httpStatus = a} :: ListTapesResponse)++instance Prelude.NFData ListTapesResponse where+ rnf ListTapesResponse' {..} =+ Prelude.rnf marker+ `Prelude.seq` Prelude.rnf tapeInfos+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/ListVolumeInitiators.hs view
@@ -0,0 +1,181 @@+{-# 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.ListVolumeInitiators+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Lists iSCSI initiators that are connected to a volume. You can use this+-- operation to determine whether a volume is being used or not. This+-- operation is only supported in the cached volume and stored volume+-- gateway types.+module Amazonka.StorageGateway.ListVolumeInitiators+ ( -- * Creating a Request+ ListVolumeInitiators (..),+ newListVolumeInitiators,++ -- * Request Lenses+ listVolumeInitiators_volumeARN,++ -- * Destructuring the Response+ ListVolumeInitiatorsResponse (..),+ newListVolumeInitiatorsResponse,++ -- * Response Lenses+ listVolumeInitiatorsResponse_initiators,+ listVolumeInitiatorsResponse_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++-- | ListVolumeInitiatorsInput+--+-- /See:/ 'newListVolumeInitiators' smart constructor.+data ListVolumeInitiators = ListVolumeInitiators'+ { -- | The Amazon Resource Name (ARN) of the volume. Use the ListVolumes+ -- operation to return a list of gateway volumes for the gateway.+ volumeARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'ListVolumeInitiators' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'volumeARN', 'listVolumeInitiators_volumeARN' - The Amazon Resource Name (ARN) of the volume. Use the ListVolumes+-- operation to return a list of gateway volumes for the gateway.+newListVolumeInitiators ::+ -- | 'volumeARN'+ Prelude.Text ->+ ListVolumeInitiators+newListVolumeInitiators pVolumeARN_ =+ ListVolumeInitiators' {volumeARN = pVolumeARN_}++-- | The Amazon Resource Name (ARN) of the volume. Use the ListVolumes+-- operation to return a list of gateway volumes for the gateway.+listVolumeInitiators_volumeARN :: Lens.Lens' ListVolumeInitiators Prelude.Text+listVolumeInitiators_volumeARN = Lens.lens (\ListVolumeInitiators' {volumeARN} -> volumeARN) (\s@ListVolumeInitiators' {} a -> s {volumeARN = a} :: ListVolumeInitiators)++instance Core.AWSRequest ListVolumeInitiators where+ type+ AWSResponse ListVolumeInitiators =+ ListVolumeInitiatorsResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ ListVolumeInitiatorsResponse'+ Prelude.<$> (x Data..?> "Initiators" Core..!@ Prelude.mempty)+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable ListVolumeInitiators where+ hashWithSalt _salt ListVolumeInitiators' {..} =+ _salt `Prelude.hashWithSalt` volumeARN++instance Prelude.NFData ListVolumeInitiators where+ rnf ListVolumeInitiators' {..} = Prelude.rnf volumeARN++instance Data.ToHeaders ListVolumeInitiators where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.ListVolumeInitiators" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON ListVolumeInitiators where+ toJSON ListVolumeInitiators' {..} =+ Data.object+ ( Prelude.catMaybes+ [Prelude.Just ("VolumeARN" Data..= volumeARN)]+ )++instance Data.ToPath ListVolumeInitiators where+ toPath = Prelude.const "/"++instance Data.ToQuery ListVolumeInitiators where+ toQuery = Prelude.const Prelude.mempty++-- | ListVolumeInitiatorsOutput+--+-- /See:/ 'newListVolumeInitiatorsResponse' smart constructor.+data ListVolumeInitiatorsResponse = ListVolumeInitiatorsResponse'+ { -- | The host names and port numbers of all iSCSI initiators that are+ -- connected to the gateway.+ initiators :: 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 'ListVolumeInitiatorsResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'initiators', 'listVolumeInitiatorsResponse_initiators' - The host names and port numbers of all iSCSI initiators that are+-- connected to the gateway.+--+-- 'httpStatus', 'listVolumeInitiatorsResponse_httpStatus' - The response's http status code.+newListVolumeInitiatorsResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ ListVolumeInitiatorsResponse+newListVolumeInitiatorsResponse pHttpStatus_ =+ ListVolumeInitiatorsResponse'+ { initiators =+ Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | The host names and port numbers of all iSCSI initiators that are+-- connected to the gateway.+listVolumeInitiatorsResponse_initiators :: Lens.Lens' ListVolumeInitiatorsResponse (Prelude.Maybe [Prelude.Text])+listVolumeInitiatorsResponse_initiators = Lens.lens (\ListVolumeInitiatorsResponse' {initiators} -> initiators) (\s@ListVolumeInitiatorsResponse' {} a -> s {initiators = a} :: ListVolumeInitiatorsResponse) Prelude.. Lens.mapping Lens.coerced++-- | The response's http status code.+listVolumeInitiatorsResponse_httpStatus :: Lens.Lens' ListVolumeInitiatorsResponse Prelude.Int+listVolumeInitiatorsResponse_httpStatus = Lens.lens (\ListVolumeInitiatorsResponse' {httpStatus} -> httpStatus) (\s@ListVolumeInitiatorsResponse' {} a -> s {httpStatus = a} :: ListVolumeInitiatorsResponse)++instance Prelude.NFData ListVolumeInitiatorsResponse where+ rnf ListVolumeInitiatorsResponse' {..} =+ Prelude.rnf initiators+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/ListVolumeRecoveryPoints.hs view
@@ -0,0 +1,196 @@+{-# 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.ListVolumeRecoveryPoints+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Lists the recovery points for a specified gateway. This operation is+-- only supported in the cached volume gateway type.+--+-- Each cache volume has one recovery point. A volume recovery point is a+-- point in time at which all data of the volume is consistent and from+-- which you can create a snapshot or clone a new cached volume from a+-- source volume. To create a snapshot from a volume recovery point use the+-- CreateSnapshotFromVolumeRecoveryPoint operation.+module Amazonka.StorageGateway.ListVolumeRecoveryPoints+ ( -- * Creating a Request+ ListVolumeRecoveryPoints (..),+ newListVolumeRecoveryPoints,++ -- * Request Lenses+ listVolumeRecoveryPoints_gatewayARN,++ -- * Destructuring the Response+ ListVolumeRecoveryPointsResponse (..),+ newListVolumeRecoveryPointsResponse,++ -- * Response Lenses+ listVolumeRecoveryPointsResponse_gatewayARN,+ listVolumeRecoveryPointsResponse_volumeRecoveryPointInfos,+ listVolumeRecoveryPointsResponse_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++-- | /See:/ 'newListVolumeRecoveryPoints' smart constructor.+data ListVolumeRecoveryPoints = ListVolumeRecoveryPoints'+ { gatewayARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'ListVolumeRecoveryPoints' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'listVolumeRecoveryPoints_gatewayARN' - Undocumented member.+newListVolumeRecoveryPoints ::+ -- | 'gatewayARN'+ Prelude.Text ->+ ListVolumeRecoveryPoints+newListVolumeRecoveryPoints pGatewayARN_ =+ ListVolumeRecoveryPoints'+ { gatewayARN =+ pGatewayARN_+ }++-- | Undocumented member.+listVolumeRecoveryPoints_gatewayARN :: Lens.Lens' ListVolumeRecoveryPoints Prelude.Text+listVolumeRecoveryPoints_gatewayARN = Lens.lens (\ListVolumeRecoveryPoints' {gatewayARN} -> gatewayARN) (\s@ListVolumeRecoveryPoints' {} a -> s {gatewayARN = a} :: ListVolumeRecoveryPoints)++instance Core.AWSRequest ListVolumeRecoveryPoints where+ type+ AWSResponse ListVolumeRecoveryPoints =+ ListVolumeRecoveryPointsResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ ListVolumeRecoveryPointsResponse'+ Prelude.<$> (x Data..?> "GatewayARN")+ Prelude.<*> ( x+ Data..?> "VolumeRecoveryPointInfos"+ Core..!@ Prelude.mempty+ )+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable ListVolumeRecoveryPoints where+ hashWithSalt _salt ListVolumeRecoveryPoints' {..} =+ _salt `Prelude.hashWithSalt` gatewayARN++instance Prelude.NFData ListVolumeRecoveryPoints where+ rnf ListVolumeRecoveryPoints' {..} =+ Prelude.rnf gatewayARN++instance Data.ToHeaders ListVolumeRecoveryPoints where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.ListVolumeRecoveryPoints" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON ListVolumeRecoveryPoints where+ toJSON ListVolumeRecoveryPoints' {..} =+ Data.object+ ( Prelude.catMaybes+ [Prelude.Just ("GatewayARN" Data..= gatewayARN)]+ )++instance Data.ToPath ListVolumeRecoveryPoints where+ toPath = Prelude.const "/"++instance Data.ToQuery ListVolumeRecoveryPoints where+ toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newListVolumeRecoveryPointsResponse' smart constructor.+data ListVolumeRecoveryPointsResponse = ListVolumeRecoveryPointsResponse'+ { gatewayARN :: Prelude.Maybe Prelude.Text,+ -- | An array of VolumeRecoveryPointInfo objects.+ volumeRecoveryPointInfos :: Prelude.Maybe [VolumeRecoveryPointInfo],+ -- | The response's http status code.+ httpStatus :: Prelude.Int+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'ListVolumeRecoveryPointsResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'listVolumeRecoveryPointsResponse_gatewayARN' - Undocumented member.+--+-- 'volumeRecoveryPointInfos', 'listVolumeRecoveryPointsResponse_volumeRecoveryPointInfos' - An array of VolumeRecoveryPointInfo objects.+--+-- 'httpStatus', 'listVolumeRecoveryPointsResponse_httpStatus' - The response's http status code.+newListVolumeRecoveryPointsResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ ListVolumeRecoveryPointsResponse+newListVolumeRecoveryPointsResponse pHttpStatus_ =+ ListVolumeRecoveryPointsResponse'+ { gatewayARN =+ Prelude.Nothing,+ volumeRecoveryPointInfos =+ Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | Undocumented member.+listVolumeRecoveryPointsResponse_gatewayARN :: Lens.Lens' ListVolumeRecoveryPointsResponse (Prelude.Maybe Prelude.Text)+listVolumeRecoveryPointsResponse_gatewayARN = Lens.lens (\ListVolumeRecoveryPointsResponse' {gatewayARN} -> gatewayARN) (\s@ListVolumeRecoveryPointsResponse' {} a -> s {gatewayARN = a} :: ListVolumeRecoveryPointsResponse)++-- | An array of VolumeRecoveryPointInfo objects.+listVolumeRecoveryPointsResponse_volumeRecoveryPointInfos :: Lens.Lens' ListVolumeRecoveryPointsResponse (Prelude.Maybe [VolumeRecoveryPointInfo])+listVolumeRecoveryPointsResponse_volumeRecoveryPointInfos = Lens.lens (\ListVolumeRecoveryPointsResponse' {volumeRecoveryPointInfos} -> volumeRecoveryPointInfos) (\s@ListVolumeRecoveryPointsResponse' {} a -> s {volumeRecoveryPointInfos = a} :: ListVolumeRecoveryPointsResponse) Prelude.. Lens.mapping Lens.coerced++-- | The response's http status code.+listVolumeRecoveryPointsResponse_httpStatus :: Lens.Lens' ListVolumeRecoveryPointsResponse Prelude.Int+listVolumeRecoveryPointsResponse_httpStatus = Lens.lens (\ListVolumeRecoveryPointsResponse' {httpStatus} -> httpStatus) (\s@ListVolumeRecoveryPointsResponse' {} a -> s {httpStatus = a} :: ListVolumeRecoveryPointsResponse)++instance+ Prelude.NFData+ ListVolumeRecoveryPointsResponse+ where+ rnf ListVolumeRecoveryPointsResponse' {..} =+ Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf volumeRecoveryPointInfos+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/ListVolumes.hs view
@@ -0,0 +1,284 @@+{-# 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.ListVolumes+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Lists the iSCSI stored volumes of a gateway. Results are sorted by+-- volume ARN. The response includes only the volume ARNs. If you want+-- additional volume information, use the DescribeStorediSCSIVolumes or the+-- DescribeCachediSCSIVolumes API.+--+-- The operation supports pagination. By default, the operation returns a+-- maximum of up to 100 volumes. You can optionally specify the @Limit@+-- field in the body to limit the number of volumes in the response. If the+-- number of volumes returned in the response is truncated, the response+-- includes a Marker field. You can use this Marker value in your+-- subsequent request to retrieve the next set of volumes. This operation+-- is only supported in the cached volume and stored volume gateway types.+--+-- This operation returns paginated results.+module Amazonka.StorageGateway.ListVolumes+ ( -- * Creating a Request+ ListVolumes (..),+ newListVolumes,++ -- * Request Lenses+ listVolumes_gatewayARN,+ listVolumes_limit,+ listVolumes_marker,++ -- * Destructuring the Response+ ListVolumesResponse (..),+ newListVolumesResponse,++ -- * Response Lenses+ listVolumesResponse_gatewayARN,+ listVolumesResponse_marker,+ listVolumesResponse_volumeInfos,+ listVolumesResponse_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++-- | A JSON object that contains one or more of the following fields:+--+-- - ListVolumesInput$Limit+--+-- - ListVolumesInput$Marker+--+-- /See:/ 'newListVolumes' smart constructor.+data ListVolumes = ListVolumes'+ { gatewayARN :: Prelude.Maybe Prelude.Text,+ -- | Specifies that the list of volumes returned be limited to the specified+ -- number of items.+ limit :: Prelude.Maybe Prelude.Natural,+ -- | A string that indicates the position at which to begin the returned list+ -- of volumes. Obtain the marker from the response of a previous List iSCSI+ -- Volumes request.+ marker :: Prelude.Maybe Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'ListVolumes' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'listVolumes_gatewayARN' - Undocumented member.+--+-- 'limit', 'listVolumes_limit' - Specifies that the list of volumes returned be limited to the specified+-- number of items.+--+-- 'marker', 'listVolumes_marker' - A string that indicates the position at which to begin the returned list+-- of volumes. Obtain the marker from the response of a previous List iSCSI+-- Volumes request.+newListVolumes ::+ ListVolumes+newListVolumes =+ ListVolumes'+ { gatewayARN = Prelude.Nothing,+ limit = Prelude.Nothing,+ marker = Prelude.Nothing+ }++-- | Undocumented member.+listVolumes_gatewayARN :: Lens.Lens' ListVolumes (Prelude.Maybe Prelude.Text)+listVolumes_gatewayARN = Lens.lens (\ListVolumes' {gatewayARN} -> gatewayARN) (\s@ListVolumes' {} a -> s {gatewayARN = a} :: ListVolumes)++-- | Specifies that the list of volumes returned be limited to the specified+-- number of items.+listVolumes_limit :: Lens.Lens' ListVolumes (Prelude.Maybe Prelude.Natural)+listVolumes_limit = Lens.lens (\ListVolumes' {limit} -> limit) (\s@ListVolumes' {} a -> s {limit = a} :: ListVolumes)++-- | A string that indicates the position at which to begin the returned list+-- of volumes. Obtain the marker from the response of a previous List iSCSI+-- Volumes request.+listVolumes_marker :: Lens.Lens' ListVolumes (Prelude.Maybe Prelude.Text)+listVolumes_marker = Lens.lens (\ListVolumes' {marker} -> marker) (\s@ListVolumes' {} a -> s {marker = a} :: ListVolumes)++instance Core.AWSPager ListVolumes where+ page rq rs+ | Core.stop+ ( rs+ Lens.^? listVolumesResponse_marker+ Prelude.. Lens._Just+ ) =+ Prelude.Nothing+ | Core.stop+ ( rs+ Lens.^? listVolumesResponse_volumeInfos+ Prelude.. Lens._Just+ ) =+ Prelude.Nothing+ | Prelude.otherwise =+ Prelude.Just+ Prelude.$ rq+ Prelude.& listVolumes_marker+ Lens..~ rs+ Lens.^? listVolumesResponse_marker+ Prelude.. Lens._Just++instance Core.AWSRequest ListVolumes where+ type AWSResponse ListVolumes = ListVolumesResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ ListVolumesResponse'+ Prelude.<$> (x Data..?> "GatewayARN")+ Prelude.<*> (x Data..?> "Marker")+ Prelude.<*> (x Data..?> "VolumeInfos" Core..!@ Prelude.mempty)+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable ListVolumes where+ hashWithSalt _salt ListVolumes' {..} =+ _salt+ `Prelude.hashWithSalt` gatewayARN+ `Prelude.hashWithSalt` limit+ `Prelude.hashWithSalt` marker++instance Prelude.NFData ListVolumes where+ rnf ListVolumes' {..} =+ Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf limit+ `Prelude.seq` Prelude.rnf marker++instance Data.ToHeaders ListVolumes where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.ListVolumes" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON ListVolumes where+ toJSON ListVolumes' {..} =+ Data.object+ ( Prelude.catMaybes+ [ ("GatewayARN" Data..=) Prelude.<$> gatewayARN,+ ("Limit" Data..=) Prelude.<$> limit,+ ("Marker" Data..=) Prelude.<$> marker+ ]+ )++instance Data.ToPath ListVolumes where+ toPath = Prelude.const "/"++instance Data.ToQuery ListVolumes where+ toQuery = Prelude.const Prelude.mempty++-- | A JSON object containing the following fields:+--+-- - ListVolumesOutput$Marker+--+-- - ListVolumesOutput$VolumeInfos+--+-- /See:/ 'newListVolumesResponse' smart constructor.+data ListVolumesResponse = ListVolumesResponse'+ { gatewayARN :: Prelude.Maybe Prelude.Text,+ -- | Use the marker in your next request to continue pagination of iSCSI+ -- volumes. If there are no more volumes to list, this field does not+ -- appear in the response body.+ marker :: Prelude.Maybe Prelude.Text,+ -- | An array of VolumeInfo objects, where each object describes an iSCSI+ -- volume. If no volumes are defined for the gateway, then @VolumeInfos@ is+ -- an empty array \"[]\".+ volumeInfos :: Prelude.Maybe [VolumeInfo],+ -- | The response's http status code.+ httpStatus :: Prelude.Int+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'ListVolumesResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'listVolumesResponse_gatewayARN' - Undocumented member.+--+-- 'marker', 'listVolumesResponse_marker' - Use the marker in your next request to continue pagination of iSCSI+-- volumes. If there are no more volumes to list, this field does not+-- appear in the response body.+--+-- 'volumeInfos', 'listVolumesResponse_volumeInfos' - An array of VolumeInfo objects, where each object describes an iSCSI+-- volume. If no volumes are defined for the gateway, then @VolumeInfos@ is+-- an empty array \"[]\".+--+-- 'httpStatus', 'listVolumesResponse_httpStatus' - The response's http status code.+newListVolumesResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ ListVolumesResponse+newListVolumesResponse pHttpStatus_ =+ ListVolumesResponse'+ { gatewayARN = Prelude.Nothing,+ marker = Prelude.Nothing,+ volumeInfos = Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | Undocumented member.+listVolumesResponse_gatewayARN :: Lens.Lens' ListVolumesResponse (Prelude.Maybe Prelude.Text)+listVolumesResponse_gatewayARN = Lens.lens (\ListVolumesResponse' {gatewayARN} -> gatewayARN) (\s@ListVolumesResponse' {} a -> s {gatewayARN = a} :: ListVolumesResponse)++-- | Use the marker in your next request to continue pagination of iSCSI+-- volumes. If there are no more volumes to list, this field does not+-- appear in the response body.+listVolumesResponse_marker :: Lens.Lens' ListVolumesResponse (Prelude.Maybe Prelude.Text)+listVolumesResponse_marker = Lens.lens (\ListVolumesResponse' {marker} -> marker) (\s@ListVolumesResponse' {} a -> s {marker = a} :: ListVolumesResponse)++-- | An array of VolumeInfo objects, where each object describes an iSCSI+-- volume. If no volumes are defined for the gateway, then @VolumeInfos@ is+-- an empty array \"[]\".+listVolumesResponse_volumeInfos :: Lens.Lens' ListVolumesResponse (Prelude.Maybe [VolumeInfo])+listVolumesResponse_volumeInfos = Lens.lens (\ListVolumesResponse' {volumeInfos} -> volumeInfos) (\s@ListVolumesResponse' {} a -> s {volumeInfos = a} :: ListVolumesResponse) Prelude.. Lens.mapping Lens.coerced++-- | The response's http status code.+listVolumesResponse_httpStatus :: Lens.Lens' ListVolumesResponse Prelude.Int+listVolumesResponse_httpStatus = Lens.lens (\ListVolumesResponse' {httpStatus} -> httpStatus) (\s@ListVolumesResponse' {} a -> s {httpStatus = a} :: ListVolumesResponse)++instance Prelude.NFData ListVolumesResponse where+ rnf ListVolumesResponse' {..} =+ Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf marker+ `Prelude.seq` Prelude.rnf volumeInfos+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/NotifyWhenUploaded.hs view
@@ -0,0 +1,192 @@+{-# 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.NotifyWhenUploaded+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Sends you notification through CloudWatch Events when all files written+-- to your file share have been uploaded to S3. Amazon S3.+--+-- Storage Gateway can send a notification through Amazon CloudWatch Events+-- when all files written to your file share up to that point in time have+-- been uploaded to Amazon S3. These files include files written to the+-- file share up to the time that you make a request for notification. When+-- the upload is done, Storage Gateway sends you notification through an+-- Amazon CloudWatch Event. You can configure CloudWatch Events to send the+-- notification through event targets such as Amazon SNS or Lambda+-- function. This operation is only supported for S3 File Gateways.+--+-- For more information, see+-- <https://docs.aws.amazon.com/storagegateway/latest/userguide/monitoring-file-gateway.html#get-upload-notification Getting file upload notification>+-- in the /Storage Gateway User Guide/.+module Amazonka.StorageGateway.NotifyWhenUploaded+ ( -- * Creating a Request+ NotifyWhenUploaded (..),+ newNotifyWhenUploaded,++ -- * Request Lenses+ notifyWhenUploaded_fileShareARN,++ -- * Destructuring the Response+ NotifyWhenUploadedResponse (..),+ newNotifyWhenUploadedResponse,++ -- * Response Lenses+ notifyWhenUploadedResponse_fileShareARN,+ notifyWhenUploadedResponse_notificationId,+ notifyWhenUploadedResponse_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++-- | /See:/ 'newNotifyWhenUploaded' smart constructor.+data NotifyWhenUploaded = NotifyWhenUploaded'+ { fileShareARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'NotifyWhenUploaded' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'fileShareARN', 'notifyWhenUploaded_fileShareARN' - Undocumented member.+newNotifyWhenUploaded ::+ -- | 'fileShareARN'+ Prelude.Text ->+ NotifyWhenUploaded+newNotifyWhenUploaded pFileShareARN_ =+ NotifyWhenUploaded' {fileShareARN = pFileShareARN_}++-- | Undocumented member.+notifyWhenUploaded_fileShareARN :: Lens.Lens' NotifyWhenUploaded Prelude.Text+notifyWhenUploaded_fileShareARN = Lens.lens (\NotifyWhenUploaded' {fileShareARN} -> fileShareARN) (\s@NotifyWhenUploaded' {} a -> s {fileShareARN = a} :: NotifyWhenUploaded)++instance Core.AWSRequest NotifyWhenUploaded where+ type+ AWSResponse NotifyWhenUploaded =+ NotifyWhenUploadedResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ NotifyWhenUploadedResponse'+ Prelude.<$> (x Data..?> "FileShareARN")+ Prelude.<*> (x Data..?> "NotificationId")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable NotifyWhenUploaded where+ hashWithSalt _salt NotifyWhenUploaded' {..} =+ _salt `Prelude.hashWithSalt` fileShareARN++instance Prelude.NFData NotifyWhenUploaded where+ rnf NotifyWhenUploaded' {..} =+ Prelude.rnf fileShareARN++instance Data.ToHeaders NotifyWhenUploaded where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.NotifyWhenUploaded" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON NotifyWhenUploaded where+ toJSON NotifyWhenUploaded' {..} =+ Data.object+ ( Prelude.catMaybes+ [Prelude.Just ("FileShareARN" Data..= fileShareARN)]+ )++instance Data.ToPath NotifyWhenUploaded where+ toPath = Prelude.const "/"++instance Data.ToQuery NotifyWhenUploaded where+ toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newNotifyWhenUploadedResponse' smart constructor.+data NotifyWhenUploadedResponse = NotifyWhenUploadedResponse'+ { fileShareARN :: Prelude.Maybe Prelude.Text,+ notificationId :: 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 'NotifyWhenUploadedResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'fileShareARN', 'notifyWhenUploadedResponse_fileShareARN' - Undocumented member.+--+-- 'notificationId', 'notifyWhenUploadedResponse_notificationId' - Undocumented member.+--+-- 'httpStatus', 'notifyWhenUploadedResponse_httpStatus' - The response's http status code.+newNotifyWhenUploadedResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ NotifyWhenUploadedResponse+newNotifyWhenUploadedResponse pHttpStatus_ =+ NotifyWhenUploadedResponse'+ { fileShareARN =+ Prelude.Nothing,+ notificationId = Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | Undocumented member.+notifyWhenUploadedResponse_fileShareARN :: Lens.Lens' NotifyWhenUploadedResponse (Prelude.Maybe Prelude.Text)+notifyWhenUploadedResponse_fileShareARN = Lens.lens (\NotifyWhenUploadedResponse' {fileShareARN} -> fileShareARN) (\s@NotifyWhenUploadedResponse' {} a -> s {fileShareARN = a} :: NotifyWhenUploadedResponse)++-- | Undocumented member.+notifyWhenUploadedResponse_notificationId :: Lens.Lens' NotifyWhenUploadedResponse (Prelude.Maybe Prelude.Text)+notifyWhenUploadedResponse_notificationId = Lens.lens (\NotifyWhenUploadedResponse' {notificationId} -> notificationId) (\s@NotifyWhenUploadedResponse' {} a -> s {notificationId = a} :: NotifyWhenUploadedResponse)++-- | The response's http status code.+notifyWhenUploadedResponse_httpStatus :: Lens.Lens' NotifyWhenUploadedResponse Prelude.Int+notifyWhenUploadedResponse_httpStatus = Lens.lens (\NotifyWhenUploadedResponse' {httpStatus} -> httpStatus) (\s@NotifyWhenUploadedResponse' {} a -> s {httpStatus = a} :: NotifyWhenUploadedResponse)++instance Prelude.NFData NotifyWhenUploadedResponse where+ rnf NotifyWhenUploadedResponse' {..} =+ Prelude.rnf fileShareARN+ `Prelude.seq` Prelude.rnf notificationId+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/RefreshCache.hs view
@@ -0,0 +1,289 @@+{-# 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.RefreshCache+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Refreshes the cached inventory of objects for the specified file share.+-- This operation finds objects in the Amazon S3 bucket that were added,+-- removed, or replaced since the gateway last listed the bucket\'s+-- contents and cached the results. This operation does not import files+-- into the S3 File Gateway cache storage. It only updates the cached+-- inventory to reflect changes in the inventory of the objects in the S3+-- bucket. This operation is only supported in the S3 File Gateway types.+--+-- You can subscribe to be notified through an Amazon CloudWatch event when+-- your @RefreshCache@ operation completes. For more information, see+-- <https://docs.aws.amazon.com/storagegateway/latest/userguide/monitoring-file-gateway.html#get-notification Getting notified about file operations>+-- in the /Storage Gateway User Guide/. This operation is Only supported+-- for S3 File Gateways.+--+-- When this API is called, it only initiates the refresh operation. When+-- the API call completes and returns a success code, it doesn\'t+-- necessarily mean that the file refresh has completed. You should use the+-- refresh-complete notification to determine that the operation has+-- completed before you check for new files on the gateway file share. You+-- can subscribe to be notified through a CloudWatch event when your+-- @RefreshCache@ operation completes.+--+-- Throttle limit: This API is asynchronous, so the gateway will accept no+-- more than two refreshes at any time. We recommend using the+-- refresh-complete CloudWatch event notification before issuing additional+-- requests. For more information, see+-- <https://docs.aws.amazon.com/storagegateway/latest/userguide/monitoring-file-gateway.html#get-notification Getting notified about file operations>+-- in the /Storage Gateway User Guide/.+--+-- - Wait at least 60 seconds between consecutive RefreshCache API+-- requests.+--+-- - RefreshCache does not evict cache entries if invoked consecutively+-- within 60 seconds of a previous RefreshCache request.+--+-- - If you invoke the RefreshCache API when two requests are already+-- being processed, any new request will cause an+-- @InvalidGatewayRequestException@ error because too many requests+-- were sent to the server.+--+-- The S3 bucket name does not need to be included when entering the list+-- of folders in the FolderList parameter.+--+-- For more information, see+-- <https://docs.aws.amazon.com/storagegateway/latest/userguide/monitoring-file-gateway.html#get-notification Getting notified about file operations>+-- in the /Storage Gateway User Guide/.+module Amazonka.StorageGateway.RefreshCache+ ( -- * Creating a Request+ RefreshCache (..),+ newRefreshCache,++ -- * Request Lenses+ refreshCache_folderList,+ refreshCache_recursive,+ refreshCache_fileShareARN,++ -- * Destructuring the Response+ RefreshCacheResponse (..),+ newRefreshCacheResponse,++ -- * Response Lenses+ refreshCacheResponse_fileShareARN,+ refreshCacheResponse_notificationId,+ refreshCacheResponse_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++-- | RefreshCacheInput+--+-- /See:/ 'newRefreshCache' smart constructor.+data RefreshCache = RefreshCache'+ { -- | A comma-separated list of the paths of folders to refresh in the cache.+ -- The default is [@\"\/\"@]. The default refreshes objects and folders at+ -- the root of the Amazon S3 bucket. If @Recursive@ is set to @true@, the+ -- entire S3 bucket that the file share has access to is refreshed.+ folderList :: Prelude.Maybe (Prelude.NonEmpty Prelude.Text),+ -- | A value that specifies whether to recursively refresh folders in the+ -- cache. The refresh includes folders that were in the cache the last time+ -- the gateway listed the folder\'s contents. If this value set to @true@,+ -- each folder that is listed in @FolderList@ is recursively updated.+ -- Otherwise, subfolders listed in @FolderList@ are not refreshed. Only+ -- objects that are in folders listed directly under @FolderList@ are found+ -- and used for the update. The default is @true@.+ --+ -- Valid Values: @true@ | @false@+ recursive :: Prelude.Maybe Prelude.Bool,+ -- | The Amazon Resource Name (ARN) of the file share you want to refresh.+ fileShareARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'RefreshCache' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'folderList', 'refreshCache_folderList' - A comma-separated list of the paths of folders to refresh in the cache.+-- The default is [@\"\/\"@]. The default refreshes objects and folders at+-- the root of the Amazon S3 bucket. If @Recursive@ is set to @true@, the+-- entire S3 bucket that the file share has access to is refreshed.+--+-- 'recursive', 'refreshCache_recursive' - A value that specifies whether to recursively refresh folders in the+-- cache. The refresh includes folders that were in the cache the last time+-- the gateway listed the folder\'s contents. If this value set to @true@,+-- each folder that is listed in @FolderList@ is recursively updated.+-- Otherwise, subfolders listed in @FolderList@ are not refreshed. Only+-- objects that are in folders listed directly under @FolderList@ are found+-- and used for the update. The default is @true@.+--+-- Valid Values: @true@ | @false@+--+-- 'fileShareARN', 'refreshCache_fileShareARN' - The Amazon Resource Name (ARN) of the file share you want to refresh.+newRefreshCache ::+ -- | 'fileShareARN'+ Prelude.Text ->+ RefreshCache+newRefreshCache pFileShareARN_ =+ RefreshCache'+ { folderList = Prelude.Nothing,+ recursive = Prelude.Nothing,+ fileShareARN = pFileShareARN_+ }++-- | A comma-separated list of the paths of folders to refresh in the cache.+-- The default is [@\"\/\"@]. The default refreshes objects and folders at+-- the root of the Amazon S3 bucket. If @Recursive@ is set to @true@, the+-- entire S3 bucket that the file share has access to is refreshed.+refreshCache_folderList :: Lens.Lens' RefreshCache (Prelude.Maybe (Prelude.NonEmpty Prelude.Text))+refreshCache_folderList = Lens.lens (\RefreshCache' {folderList} -> folderList) (\s@RefreshCache' {} a -> s {folderList = a} :: RefreshCache) Prelude.. Lens.mapping Lens.coerced++-- | A value that specifies whether to recursively refresh folders in the+-- cache. The refresh includes folders that were in the cache the last time+-- the gateway listed the folder\'s contents. If this value set to @true@,+-- each folder that is listed in @FolderList@ is recursively updated.+-- Otherwise, subfolders listed in @FolderList@ are not refreshed. Only+-- objects that are in folders listed directly under @FolderList@ are found+-- and used for the update. The default is @true@.+--+-- Valid Values: @true@ | @false@+refreshCache_recursive :: Lens.Lens' RefreshCache (Prelude.Maybe Prelude.Bool)+refreshCache_recursive = Lens.lens (\RefreshCache' {recursive} -> recursive) (\s@RefreshCache' {} a -> s {recursive = a} :: RefreshCache)++-- | The Amazon Resource Name (ARN) of the file share you want to refresh.+refreshCache_fileShareARN :: Lens.Lens' RefreshCache Prelude.Text+refreshCache_fileShareARN = Lens.lens (\RefreshCache' {fileShareARN} -> fileShareARN) (\s@RefreshCache' {} a -> s {fileShareARN = a} :: RefreshCache)++instance Core.AWSRequest RefreshCache where+ type AWSResponse RefreshCache = RefreshCacheResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ RefreshCacheResponse'+ Prelude.<$> (x Data..?> "FileShareARN")+ Prelude.<*> (x Data..?> "NotificationId")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable RefreshCache where+ hashWithSalt _salt RefreshCache' {..} =+ _salt+ `Prelude.hashWithSalt` folderList+ `Prelude.hashWithSalt` recursive+ `Prelude.hashWithSalt` fileShareARN++instance Prelude.NFData RefreshCache where+ rnf RefreshCache' {..} =+ Prelude.rnf folderList+ `Prelude.seq` Prelude.rnf recursive+ `Prelude.seq` Prelude.rnf fileShareARN++instance Data.ToHeaders RefreshCache where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.RefreshCache" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON RefreshCache where+ toJSON RefreshCache' {..} =+ Data.object+ ( Prelude.catMaybes+ [ ("FolderList" Data..=) Prelude.<$> folderList,+ ("Recursive" Data..=) Prelude.<$> recursive,+ Prelude.Just ("FileShareARN" Data..= fileShareARN)+ ]+ )++instance Data.ToPath RefreshCache where+ toPath = Prelude.const "/"++instance Data.ToQuery RefreshCache where+ toQuery = Prelude.const Prelude.mempty++-- | RefreshCacheOutput+--+-- /See:/ 'newRefreshCacheResponse' smart constructor.+data RefreshCacheResponse = RefreshCacheResponse'+ { fileShareARN :: Prelude.Maybe Prelude.Text,+ notificationId :: 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 'RefreshCacheResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'fileShareARN', 'refreshCacheResponse_fileShareARN' - Undocumented member.+--+-- 'notificationId', 'refreshCacheResponse_notificationId' - Undocumented member.+--+-- 'httpStatus', 'refreshCacheResponse_httpStatus' - The response's http status code.+newRefreshCacheResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ RefreshCacheResponse+newRefreshCacheResponse pHttpStatus_ =+ RefreshCacheResponse'+ { fileShareARN =+ Prelude.Nothing,+ notificationId = Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | Undocumented member.+refreshCacheResponse_fileShareARN :: Lens.Lens' RefreshCacheResponse (Prelude.Maybe Prelude.Text)+refreshCacheResponse_fileShareARN = Lens.lens (\RefreshCacheResponse' {fileShareARN} -> fileShareARN) (\s@RefreshCacheResponse' {} a -> s {fileShareARN = a} :: RefreshCacheResponse)++-- | Undocumented member.+refreshCacheResponse_notificationId :: Lens.Lens' RefreshCacheResponse (Prelude.Maybe Prelude.Text)+refreshCacheResponse_notificationId = Lens.lens (\RefreshCacheResponse' {notificationId} -> notificationId) (\s@RefreshCacheResponse' {} a -> s {notificationId = a} :: RefreshCacheResponse)++-- | The response's http status code.+refreshCacheResponse_httpStatus :: Lens.Lens' RefreshCacheResponse Prelude.Int+refreshCacheResponse_httpStatus = Lens.lens (\RefreshCacheResponse' {httpStatus} -> httpStatus) (\s@RefreshCacheResponse' {} a -> s {httpStatus = a} :: RefreshCacheResponse)++instance Prelude.NFData RefreshCacheResponse where+ rnf RefreshCacheResponse' {..} =+ Prelude.rnf fileShareARN+ `Prelude.seq` Prelude.rnf notificationId+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/RemoveTagsFromResource.hs view
@@ -0,0 +1,204 @@+{-# 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.RemoveTagsFromResource+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Removes one or more tags from the specified resource. This operation is+-- supported in storage gateways of all types.+module Amazonka.StorageGateway.RemoveTagsFromResource+ ( -- * Creating a Request+ RemoveTagsFromResource (..),+ newRemoveTagsFromResource,++ -- * Request Lenses+ removeTagsFromResource_resourceARN,+ removeTagsFromResource_tagKeys,++ -- * Destructuring the Response+ RemoveTagsFromResourceResponse (..),+ newRemoveTagsFromResourceResponse,++ -- * Response Lenses+ removeTagsFromResourceResponse_resourceARN,+ removeTagsFromResourceResponse_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++-- | RemoveTagsFromResourceInput+--+-- /See:/ 'newRemoveTagsFromResource' smart constructor.+data RemoveTagsFromResource = RemoveTagsFromResource'+ { -- | The Amazon Resource Name (ARN) of the resource you want to remove the+ -- tags from.+ resourceARN :: Prelude.Text,+ -- | The keys of the tags you want to remove from the specified resource. A+ -- tag is composed of a key-value pair.+ tagKeys :: [Prelude.Text]+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'RemoveTagsFromResource' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'resourceARN', 'removeTagsFromResource_resourceARN' - The Amazon Resource Name (ARN) of the resource you want to remove the+-- tags from.+--+-- 'tagKeys', 'removeTagsFromResource_tagKeys' - The keys of the tags you want to remove from the specified resource. A+-- tag is composed of a key-value pair.+newRemoveTagsFromResource ::+ -- | 'resourceARN'+ Prelude.Text ->+ RemoveTagsFromResource+newRemoveTagsFromResource pResourceARN_ =+ RemoveTagsFromResource'+ { resourceARN =+ pResourceARN_,+ tagKeys = Prelude.mempty+ }++-- | The Amazon Resource Name (ARN) of the resource you want to remove the+-- tags from.+removeTagsFromResource_resourceARN :: Lens.Lens' RemoveTagsFromResource Prelude.Text+removeTagsFromResource_resourceARN = Lens.lens (\RemoveTagsFromResource' {resourceARN} -> resourceARN) (\s@RemoveTagsFromResource' {} a -> s {resourceARN = a} :: RemoveTagsFromResource)++-- | The keys of the tags you want to remove from the specified resource. A+-- tag is composed of a key-value pair.+removeTagsFromResource_tagKeys :: Lens.Lens' RemoveTagsFromResource [Prelude.Text]+removeTagsFromResource_tagKeys = Lens.lens (\RemoveTagsFromResource' {tagKeys} -> tagKeys) (\s@RemoveTagsFromResource' {} a -> s {tagKeys = a} :: RemoveTagsFromResource) Prelude.. Lens.coerced++instance Core.AWSRequest RemoveTagsFromResource where+ type+ AWSResponse RemoveTagsFromResource =+ RemoveTagsFromResourceResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ RemoveTagsFromResourceResponse'+ Prelude.<$> (x Data..?> "ResourceARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable RemoveTagsFromResource where+ hashWithSalt _salt RemoveTagsFromResource' {..} =+ _salt+ `Prelude.hashWithSalt` resourceARN+ `Prelude.hashWithSalt` tagKeys++instance Prelude.NFData RemoveTagsFromResource where+ rnf RemoveTagsFromResource' {..} =+ Prelude.rnf resourceARN+ `Prelude.seq` Prelude.rnf tagKeys++instance Data.ToHeaders RemoveTagsFromResource where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.RemoveTagsFromResource" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON RemoveTagsFromResource where+ toJSON RemoveTagsFromResource' {..} =+ Data.object+ ( Prelude.catMaybes+ [ Prelude.Just ("ResourceARN" Data..= resourceARN),+ Prelude.Just ("TagKeys" Data..= tagKeys)+ ]+ )++instance Data.ToPath RemoveTagsFromResource where+ toPath = Prelude.const "/"++instance Data.ToQuery RemoveTagsFromResource where+ toQuery = Prelude.const Prelude.mempty++-- | RemoveTagsFromResourceOutput+--+-- /See:/ 'newRemoveTagsFromResourceResponse' smart constructor.+data RemoveTagsFromResourceResponse = RemoveTagsFromResourceResponse'+ { -- | The Amazon Resource Name (ARN) of the resource that the tags were+ -- removed from.+ resourceARN :: 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 'RemoveTagsFromResourceResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'resourceARN', 'removeTagsFromResourceResponse_resourceARN' - The Amazon Resource Name (ARN) of the resource that the tags were+-- removed from.+--+-- 'httpStatus', 'removeTagsFromResourceResponse_httpStatus' - The response's http status code.+newRemoveTagsFromResourceResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ RemoveTagsFromResourceResponse+newRemoveTagsFromResourceResponse pHttpStatus_ =+ RemoveTagsFromResourceResponse'+ { resourceARN =+ Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | The Amazon Resource Name (ARN) of the resource that the tags were+-- removed from.+removeTagsFromResourceResponse_resourceARN :: Lens.Lens' RemoveTagsFromResourceResponse (Prelude.Maybe Prelude.Text)+removeTagsFromResourceResponse_resourceARN = Lens.lens (\RemoveTagsFromResourceResponse' {resourceARN} -> resourceARN) (\s@RemoveTagsFromResourceResponse' {} a -> s {resourceARN = a} :: RemoveTagsFromResourceResponse)++-- | The response's http status code.+removeTagsFromResourceResponse_httpStatus :: Lens.Lens' RemoveTagsFromResourceResponse Prelude.Int+removeTagsFromResourceResponse_httpStatus = Lens.lens (\RemoveTagsFromResourceResponse' {httpStatus} -> httpStatus) (\s@RemoveTagsFromResourceResponse' {} a -> s {httpStatus = a} :: RemoveTagsFromResourceResponse)++instance+ Prelude.NFData+ RemoveTagsFromResourceResponse+ where+ rnf RemoveTagsFromResourceResponse' {..} =+ Prelude.rnf resourceARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/ResetCache.hs view
@@ -0,0 +1,176 @@+{-# 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.ResetCache+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Resets all cache disks that have encountered an error and makes the+-- disks available for reconfiguration as cache storage. If your cache disk+-- encounters an error, the gateway prevents read and write operations on+-- virtual tapes in the gateway. For example, an error can occur when a+-- disk is corrupted or removed from the gateway. When a cache is reset,+-- the gateway loses its cache storage. At this point, you can reconfigure+-- the disks as cache disks. This operation is only supported in the cached+-- volume and tape types.+--+-- If the cache disk you are resetting contains data that has not been+-- uploaded to Amazon S3 yet, that data can be lost. After you reset cache+-- disks, there will be no configured cache disks left in the gateway, so+-- you must configure at least one new cache disk for your gateway to+-- function properly.+module Amazonka.StorageGateway.ResetCache+ ( -- * Creating a Request+ ResetCache (..),+ newResetCache,++ -- * Request Lenses+ resetCache_gatewayARN,++ -- * Destructuring the Response+ ResetCacheResponse (..),+ newResetCacheResponse,++ -- * Response Lenses+ resetCacheResponse_gatewayARN,+ resetCacheResponse_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++-- | /See:/ 'newResetCache' smart constructor.+data ResetCache = ResetCache'+ { gatewayARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'ResetCache' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'resetCache_gatewayARN' - Undocumented member.+newResetCache ::+ -- | 'gatewayARN'+ Prelude.Text ->+ ResetCache+newResetCache pGatewayARN_ =+ ResetCache' {gatewayARN = pGatewayARN_}++-- | Undocumented member.+resetCache_gatewayARN :: Lens.Lens' ResetCache Prelude.Text+resetCache_gatewayARN = Lens.lens (\ResetCache' {gatewayARN} -> gatewayARN) (\s@ResetCache' {} a -> s {gatewayARN = a} :: ResetCache)++instance Core.AWSRequest ResetCache where+ type AWSResponse ResetCache = ResetCacheResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ ResetCacheResponse'+ Prelude.<$> (x Data..?> "GatewayARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable ResetCache where+ hashWithSalt _salt ResetCache' {..} =+ _salt `Prelude.hashWithSalt` gatewayARN++instance Prelude.NFData ResetCache where+ rnf ResetCache' {..} = Prelude.rnf gatewayARN++instance Data.ToHeaders ResetCache where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.ResetCache" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON ResetCache where+ toJSON ResetCache' {..} =+ Data.object+ ( Prelude.catMaybes+ [Prelude.Just ("GatewayARN" Data..= gatewayARN)]+ )++instance Data.ToPath ResetCache where+ toPath = Prelude.const "/"++instance Data.ToQuery ResetCache where+ toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newResetCacheResponse' smart constructor.+data ResetCacheResponse = ResetCacheResponse'+ { gatewayARN :: 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 'ResetCacheResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'resetCacheResponse_gatewayARN' - Undocumented member.+--+-- 'httpStatus', 'resetCacheResponse_httpStatus' - The response's http status code.+newResetCacheResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ ResetCacheResponse+newResetCacheResponse pHttpStatus_ =+ ResetCacheResponse'+ { gatewayARN = Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | Undocumented member.+resetCacheResponse_gatewayARN :: Lens.Lens' ResetCacheResponse (Prelude.Maybe Prelude.Text)+resetCacheResponse_gatewayARN = Lens.lens (\ResetCacheResponse' {gatewayARN} -> gatewayARN) (\s@ResetCacheResponse' {} a -> s {gatewayARN = a} :: ResetCacheResponse)++-- | The response's http status code.+resetCacheResponse_httpStatus :: Lens.Lens' ResetCacheResponse Prelude.Int+resetCacheResponse_httpStatus = Lens.lens (\ResetCacheResponse' {httpStatus} -> httpStatus) (\s@ResetCacheResponse' {} a -> s {httpStatus = a} :: ResetCacheResponse)++instance Prelude.NFData ResetCacheResponse where+ rnf ResetCacheResponse' {..} =+ Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/RetrieveTapeArchive.hs view
@@ -0,0 +1,219 @@+{-# 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.RetrieveTapeArchive+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Retrieves an archived virtual tape from the virtual tape shelf (VTS) to+-- a tape gateway. Virtual tapes archived in the VTS are not associated+-- with any gateway. However after a tape is retrieved, it is associated+-- with a gateway, even though it is also listed in the VTS, that is,+-- archive. This operation is only supported in the tape gateway type.+--+-- Once a tape is successfully retrieved to a gateway, it cannot be+-- retrieved again to another gateway. You must archive the tape again+-- before you can retrieve it to another gateway. This operation is only+-- supported in the tape gateway type.+module Amazonka.StorageGateway.RetrieveTapeArchive+ ( -- * Creating a Request+ RetrieveTapeArchive (..),+ newRetrieveTapeArchive,++ -- * Request Lenses+ retrieveTapeArchive_tapeARN,+ retrieveTapeArchive_gatewayARN,++ -- * Destructuring the Response+ RetrieveTapeArchiveResponse (..),+ newRetrieveTapeArchiveResponse,++ -- * Response Lenses+ retrieveTapeArchiveResponse_tapeARN,+ retrieveTapeArchiveResponse_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++-- | RetrieveTapeArchiveInput+--+-- /See:/ 'newRetrieveTapeArchive' smart constructor.+data RetrieveTapeArchive = RetrieveTapeArchive'+ { -- | The Amazon Resource Name (ARN) of the virtual tape you want to retrieve+ -- from the virtual tape shelf (VTS).+ tapeARN :: Prelude.Text,+ -- | The Amazon Resource Name (ARN) of the gateway you want to retrieve the+ -- virtual tape to. Use the ListGateways operation to return a list of+ -- gateways for your account and Amazon Web Services Region.+ --+ -- You retrieve archived virtual tapes to only one gateway and the gateway+ -- must be a tape gateway.+ gatewayARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'RetrieveTapeArchive' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'tapeARN', 'retrieveTapeArchive_tapeARN' - The Amazon Resource Name (ARN) of the virtual tape you want to retrieve+-- from the virtual tape shelf (VTS).+--+-- 'gatewayARN', 'retrieveTapeArchive_gatewayARN' - The Amazon Resource Name (ARN) of the gateway you want to retrieve the+-- virtual tape to. Use the ListGateways operation to return a list of+-- gateways for your account and Amazon Web Services Region.+--+-- You retrieve archived virtual tapes to only one gateway and the gateway+-- must be a tape gateway.+newRetrieveTapeArchive ::+ -- | 'tapeARN'+ Prelude.Text ->+ -- | 'gatewayARN'+ Prelude.Text ->+ RetrieveTapeArchive+newRetrieveTapeArchive pTapeARN_ pGatewayARN_ =+ RetrieveTapeArchive'+ { tapeARN = pTapeARN_,+ gatewayARN = pGatewayARN_+ }++-- | The Amazon Resource Name (ARN) of the virtual tape you want to retrieve+-- from the virtual tape shelf (VTS).+retrieveTapeArchive_tapeARN :: Lens.Lens' RetrieveTapeArchive Prelude.Text+retrieveTapeArchive_tapeARN = Lens.lens (\RetrieveTapeArchive' {tapeARN} -> tapeARN) (\s@RetrieveTapeArchive' {} a -> s {tapeARN = a} :: RetrieveTapeArchive)++-- | The Amazon Resource Name (ARN) of the gateway you want to retrieve the+-- virtual tape to. Use the ListGateways operation to return a list of+-- gateways for your account and Amazon Web Services Region.+--+-- You retrieve archived virtual tapes to only one gateway and the gateway+-- must be a tape gateway.+retrieveTapeArchive_gatewayARN :: Lens.Lens' RetrieveTapeArchive Prelude.Text+retrieveTapeArchive_gatewayARN = Lens.lens (\RetrieveTapeArchive' {gatewayARN} -> gatewayARN) (\s@RetrieveTapeArchive' {} a -> s {gatewayARN = a} :: RetrieveTapeArchive)++instance Core.AWSRequest RetrieveTapeArchive where+ type+ AWSResponse RetrieveTapeArchive =+ RetrieveTapeArchiveResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ RetrieveTapeArchiveResponse'+ Prelude.<$> (x Data..?> "TapeARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable RetrieveTapeArchive where+ hashWithSalt _salt RetrieveTapeArchive' {..} =+ _salt+ `Prelude.hashWithSalt` tapeARN+ `Prelude.hashWithSalt` gatewayARN++instance Prelude.NFData RetrieveTapeArchive where+ rnf RetrieveTapeArchive' {..} =+ Prelude.rnf tapeARN+ `Prelude.seq` Prelude.rnf gatewayARN++instance Data.ToHeaders RetrieveTapeArchive where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.RetrieveTapeArchive" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON RetrieveTapeArchive where+ toJSON RetrieveTapeArchive' {..} =+ Data.object+ ( Prelude.catMaybes+ [ Prelude.Just ("TapeARN" Data..= tapeARN),+ Prelude.Just ("GatewayARN" Data..= gatewayARN)+ ]+ )++instance Data.ToPath RetrieveTapeArchive where+ toPath = Prelude.const "/"++instance Data.ToQuery RetrieveTapeArchive where+ toQuery = Prelude.const Prelude.mempty++-- | RetrieveTapeArchiveOutput+--+-- /See:/ 'newRetrieveTapeArchiveResponse' smart constructor.+data RetrieveTapeArchiveResponse = RetrieveTapeArchiveResponse'+ { -- | The Amazon Resource Name (ARN) of the retrieved virtual tape.+ tapeARN :: 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 'RetrieveTapeArchiveResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'tapeARN', 'retrieveTapeArchiveResponse_tapeARN' - The Amazon Resource Name (ARN) of the retrieved virtual tape.+--+-- 'httpStatus', 'retrieveTapeArchiveResponse_httpStatus' - The response's http status code.+newRetrieveTapeArchiveResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ RetrieveTapeArchiveResponse+newRetrieveTapeArchiveResponse pHttpStatus_ =+ RetrieveTapeArchiveResponse'+ { tapeARN =+ Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | The Amazon Resource Name (ARN) of the retrieved virtual tape.+retrieveTapeArchiveResponse_tapeARN :: Lens.Lens' RetrieveTapeArchiveResponse (Prelude.Maybe Prelude.Text)+retrieveTapeArchiveResponse_tapeARN = Lens.lens (\RetrieveTapeArchiveResponse' {tapeARN} -> tapeARN) (\s@RetrieveTapeArchiveResponse' {} a -> s {tapeARN = a} :: RetrieveTapeArchiveResponse)++-- | The response's http status code.+retrieveTapeArchiveResponse_httpStatus :: Lens.Lens' RetrieveTapeArchiveResponse Prelude.Int+retrieveTapeArchiveResponse_httpStatus = Lens.lens (\RetrieveTapeArchiveResponse' {httpStatus} -> httpStatus) (\s@RetrieveTapeArchiveResponse' {} a -> s {httpStatus = a} :: RetrieveTapeArchiveResponse)++instance Prelude.NFData RetrieveTapeArchiveResponse where+ rnf RetrieveTapeArchiveResponse' {..} =+ Prelude.rnf tapeARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/RetrieveTapeRecoveryPoint.hs view
@@ -0,0 +1,209 @@+{-# 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.RetrieveTapeRecoveryPoint+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Retrieves the recovery point for the specified virtual tape. This+-- operation is only supported in the tape gateway type.+--+-- A recovery point is a point in time view of a virtual tape at which all+-- the data on the tape is consistent. If your gateway crashes, virtual+-- tapes that have recovery points can be recovered to a new gateway.+--+-- The virtual tape can be retrieved to only one gateway. The retrieved+-- tape is read-only. The virtual tape can be retrieved to only a tape+-- gateway. There is no charge for retrieving recovery points.+module Amazonka.StorageGateway.RetrieveTapeRecoveryPoint+ ( -- * Creating a Request+ RetrieveTapeRecoveryPoint (..),+ newRetrieveTapeRecoveryPoint,++ -- * Request Lenses+ retrieveTapeRecoveryPoint_tapeARN,+ retrieveTapeRecoveryPoint_gatewayARN,++ -- * Destructuring the Response+ RetrieveTapeRecoveryPointResponse (..),+ newRetrieveTapeRecoveryPointResponse,++ -- * Response Lenses+ retrieveTapeRecoveryPointResponse_tapeARN,+ retrieveTapeRecoveryPointResponse_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++-- | RetrieveTapeRecoveryPointInput+--+-- /See:/ 'newRetrieveTapeRecoveryPoint' smart constructor.+data RetrieveTapeRecoveryPoint = RetrieveTapeRecoveryPoint'+ { -- | The Amazon Resource Name (ARN) of the virtual tape for which you want to+ -- retrieve the recovery point.+ tapeARN :: Prelude.Text,+ gatewayARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'RetrieveTapeRecoveryPoint' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'tapeARN', 'retrieveTapeRecoveryPoint_tapeARN' - The Amazon Resource Name (ARN) of the virtual tape for which you want to+-- retrieve the recovery point.+--+-- 'gatewayARN', 'retrieveTapeRecoveryPoint_gatewayARN' - Undocumented member.+newRetrieveTapeRecoveryPoint ::+ -- | 'tapeARN'+ Prelude.Text ->+ -- | 'gatewayARN'+ Prelude.Text ->+ RetrieveTapeRecoveryPoint+newRetrieveTapeRecoveryPoint pTapeARN_ pGatewayARN_ =+ RetrieveTapeRecoveryPoint'+ { tapeARN = pTapeARN_,+ gatewayARN = pGatewayARN_+ }++-- | The Amazon Resource Name (ARN) of the virtual tape for which you want to+-- retrieve the recovery point.+retrieveTapeRecoveryPoint_tapeARN :: Lens.Lens' RetrieveTapeRecoveryPoint Prelude.Text+retrieveTapeRecoveryPoint_tapeARN = Lens.lens (\RetrieveTapeRecoveryPoint' {tapeARN} -> tapeARN) (\s@RetrieveTapeRecoveryPoint' {} a -> s {tapeARN = a} :: RetrieveTapeRecoveryPoint)++-- | Undocumented member.+retrieveTapeRecoveryPoint_gatewayARN :: Lens.Lens' RetrieveTapeRecoveryPoint Prelude.Text+retrieveTapeRecoveryPoint_gatewayARN = Lens.lens (\RetrieveTapeRecoveryPoint' {gatewayARN} -> gatewayARN) (\s@RetrieveTapeRecoveryPoint' {} a -> s {gatewayARN = a} :: RetrieveTapeRecoveryPoint)++instance Core.AWSRequest RetrieveTapeRecoveryPoint where+ type+ AWSResponse RetrieveTapeRecoveryPoint =+ RetrieveTapeRecoveryPointResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ RetrieveTapeRecoveryPointResponse'+ Prelude.<$> (x Data..?> "TapeARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable RetrieveTapeRecoveryPoint where+ hashWithSalt _salt RetrieveTapeRecoveryPoint' {..} =+ _salt+ `Prelude.hashWithSalt` tapeARN+ `Prelude.hashWithSalt` gatewayARN++instance Prelude.NFData RetrieveTapeRecoveryPoint where+ rnf RetrieveTapeRecoveryPoint' {..} =+ Prelude.rnf tapeARN+ `Prelude.seq` Prelude.rnf gatewayARN++instance Data.ToHeaders RetrieveTapeRecoveryPoint where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.RetrieveTapeRecoveryPoint" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON RetrieveTapeRecoveryPoint where+ toJSON RetrieveTapeRecoveryPoint' {..} =+ Data.object+ ( Prelude.catMaybes+ [ Prelude.Just ("TapeARN" Data..= tapeARN),+ Prelude.Just ("GatewayARN" Data..= gatewayARN)+ ]+ )++instance Data.ToPath RetrieveTapeRecoveryPoint where+ toPath = Prelude.const "/"++instance Data.ToQuery RetrieveTapeRecoveryPoint where+ toQuery = Prelude.const Prelude.mempty++-- | RetrieveTapeRecoveryPointOutput+--+-- /See:/ 'newRetrieveTapeRecoveryPointResponse' smart constructor.+data RetrieveTapeRecoveryPointResponse = RetrieveTapeRecoveryPointResponse'+ { -- | The Amazon Resource Name (ARN) of the virtual tape for which the+ -- recovery point was retrieved.+ tapeARN :: 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 'RetrieveTapeRecoveryPointResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'tapeARN', 'retrieveTapeRecoveryPointResponse_tapeARN' - The Amazon Resource Name (ARN) of the virtual tape for which the+-- recovery point was retrieved.+--+-- 'httpStatus', 'retrieveTapeRecoveryPointResponse_httpStatus' - The response's http status code.+newRetrieveTapeRecoveryPointResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ RetrieveTapeRecoveryPointResponse+newRetrieveTapeRecoveryPointResponse pHttpStatus_ =+ RetrieveTapeRecoveryPointResponse'+ { tapeARN =+ Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | The Amazon Resource Name (ARN) of the virtual tape for which the+-- recovery point was retrieved.+retrieveTapeRecoveryPointResponse_tapeARN :: Lens.Lens' RetrieveTapeRecoveryPointResponse (Prelude.Maybe Prelude.Text)+retrieveTapeRecoveryPointResponse_tapeARN = Lens.lens (\RetrieveTapeRecoveryPointResponse' {tapeARN} -> tapeARN) (\s@RetrieveTapeRecoveryPointResponse' {} a -> s {tapeARN = a} :: RetrieveTapeRecoveryPointResponse)++-- | The response's http status code.+retrieveTapeRecoveryPointResponse_httpStatus :: Lens.Lens' RetrieveTapeRecoveryPointResponse Prelude.Int+retrieveTapeRecoveryPointResponse_httpStatus = Lens.lens (\RetrieveTapeRecoveryPointResponse' {httpStatus} -> httpStatus) (\s@RetrieveTapeRecoveryPointResponse' {} a -> s {httpStatus = a} :: RetrieveTapeRecoveryPointResponse)++instance+ Prelude.NFData+ RetrieveTapeRecoveryPointResponse+ where+ rnf RetrieveTapeRecoveryPointResponse' {..} =+ Prelude.rnf tapeARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/SetLocalConsolePassword.hs view
@@ -0,0 +1,200 @@+{-# 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.SetLocalConsolePassword+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Sets the password for your VM local console. When you log in to the+-- local console for the first time, you log in to the VM with the default+-- credentials. We recommend that you set a new password. You don\'t need+-- to know the default password to set a new password.+module Amazonka.StorageGateway.SetLocalConsolePassword+ ( -- * Creating a Request+ SetLocalConsolePassword (..),+ newSetLocalConsolePassword,++ -- * Request Lenses+ setLocalConsolePassword_gatewayARN,+ setLocalConsolePassword_localConsolePassword,++ -- * Destructuring the Response+ SetLocalConsolePasswordResponse (..),+ newSetLocalConsolePasswordResponse,++ -- * Response Lenses+ setLocalConsolePasswordResponse_gatewayARN,+ setLocalConsolePasswordResponse_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++-- | SetLocalConsolePasswordInput+--+-- /See:/ 'newSetLocalConsolePassword' smart constructor.+data SetLocalConsolePassword = SetLocalConsolePassword'+ { gatewayARN :: Prelude.Text,+ -- | The password you want to set for your VM local console.+ localConsolePassword :: Data.Sensitive Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'SetLocalConsolePassword' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'setLocalConsolePassword_gatewayARN' - Undocumented member.+--+-- 'localConsolePassword', 'setLocalConsolePassword_localConsolePassword' - The password you want to set for your VM local console.+newSetLocalConsolePassword ::+ -- | 'gatewayARN'+ Prelude.Text ->+ -- | 'localConsolePassword'+ Prelude.Text ->+ SetLocalConsolePassword+newSetLocalConsolePassword+ pGatewayARN_+ pLocalConsolePassword_ =+ SetLocalConsolePassword'+ { gatewayARN = pGatewayARN_,+ localConsolePassword =+ Data._Sensitive Lens.# pLocalConsolePassword_+ }++-- | Undocumented member.+setLocalConsolePassword_gatewayARN :: Lens.Lens' SetLocalConsolePassword Prelude.Text+setLocalConsolePassword_gatewayARN = Lens.lens (\SetLocalConsolePassword' {gatewayARN} -> gatewayARN) (\s@SetLocalConsolePassword' {} a -> s {gatewayARN = a} :: SetLocalConsolePassword)++-- | The password you want to set for your VM local console.+setLocalConsolePassword_localConsolePassword :: Lens.Lens' SetLocalConsolePassword Prelude.Text+setLocalConsolePassword_localConsolePassword = Lens.lens (\SetLocalConsolePassword' {localConsolePassword} -> localConsolePassword) (\s@SetLocalConsolePassword' {} a -> s {localConsolePassword = a} :: SetLocalConsolePassword) Prelude.. Data._Sensitive++instance Core.AWSRequest SetLocalConsolePassword where+ type+ AWSResponse SetLocalConsolePassword =+ SetLocalConsolePasswordResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ SetLocalConsolePasswordResponse'+ Prelude.<$> (x Data..?> "GatewayARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable SetLocalConsolePassword where+ hashWithSalt _salt SetLocalConsolePassword' {..} =+ _salt+ `Prelude.hashWithSalt` gatewayARN+ `Prelude.hashWithSalt` localConsolePassword++instance Prelude.NFData SetLocalConsolePassword where+ rnf SetLocalConsolePassword' {..} =+ Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf localConsolePassword++instance Data.ToHeaders SetLocalConsolePassword where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.SetLocalConsolePassword" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON SetLocalConsolePassword where+ toJSON SetLocalConsolePassword' {..} =+ Data.object+ ( Prelude.catMaybes+ [ Prelude.Just ("GatewayARN" Data..= gatewayARN),+ Prelude.Just+ ( "LocalConsolePassword"+ Data..= localConsolePassword+ )+ ]+ )++instance Data.ToPath SetLocalConsolePassword where+ toPath = Prelude.const "/"++instance Data.ToQuery SetLocalConsolePassword where+ toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newSetLocalConsolePasswordResponse' smart constructor.+data SetLocalConsolePasswordResponse = SetLocalConsolePasswordResponse'+ { gatewayARN :: 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 'SetLocalConsolePasswordResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'setLocalConsolePasswordResponse_gatewayARN' - Undocumented member.+--+-- 'httpStatus', 'setLocalConsolePasswordResponse_httpStatus' - The response's http status code.+newSetLocalConsolePasswordResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ SetLocalConsolePasswordResponse+newSetLocalConsolePasswordResponse pHttpStatus_ =+ SetLocalConsolePasswordResponse'+ { gatewayARN =+ Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | Undocumented member.+setLocalConsolePasswordResponse_gatewayARN :: Lens.Lens' SetLocalConsolePasswordResponse (Prelude.Maybe Prelude.Text)+setLocalConsolePasswordResponse_gatewayARN = Lens.lens (\SetLocalConsolePasswordResponse' {gatewayARN} -> gatewayARN) (\s@SetLocalConsolePasswordResponse' {} a -> s {gatewayARN = a} :: SetLocalConsolePasswordResponse)++-- | The response's http status code.+setLocalConsolePasswordResponse_httpStatus :: Lens.Lens' SetLocalConsolePasswordResponse Prelude.Int+setLocalConsolePasswordResponse_httpStatus = Lens.lens (\SetLocalConsolePasswordResponse' {httpStatus} -> httpStatus) (\s@SetLocalConsolePasswordResponse' {} a -> s {httpStatus = a} :: SetLocalConsolePasswordResponse)++instance+ Prelude.NFData+ SetLocalConsolePasswordResponse+ where+ rnf SetLocalConsolePasswordResponse' {..} =+ Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/SetSMBGuestPassword.hs view
@@ -0,0 +1,194 @@+{-# 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.SetSMBGuestPassword+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Sets the password for the guest user @smbguest@. The @smbguest@ user is+-- the user when the authentication method for the file share is set to+-- @GuestAccess@. This operation only supported for S3 File Gateways+module Amazonka.StorageGateway.SetSMBGuestPassword+ ( -- * Creating a Request+ SetSMBGuestPassword (..),+ newSetSMBGuestPassword,++ -- * Request Lenses+ setSMBGuestPassword_gatewayARN,+ setSMBGuestPassword_password,++ -- * Destructuring the Response+ SetSMBGuestPasswordResponse (..),+ newSetSMBGuestPasswordResponse,++ -- * Response Lenses+ setSMBGuestPasswordResponse_gatewayARN,+ setSMBGuestPasswordResponse_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++-- | SetSMBGuestPasswordInput+--+-- /See:/ 'newSetSMBGuestPassword' smart constructor.+data SetSMBGuestPassword = SetSMBGuestPassword'+ { -- | The Amazon Resource Name (ARN) of the S3 File Gateway the SMB file share+ -- is associated with.+ gatewayARN :: Prelude.Text,+ -- | The password that you want to set for your SMB server.+ password :: Data.Sensitive Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'SetSMBGuestPassword' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'setSMBGuestPassword_gatewayARN' - The Amazon Resource Name (ARN) of the S3 File Gateway the SMB file share+-- is associated with.+--+-- 'password', 'setSMBGuestPassword_password' - The password that you want to set for your SMB server.+newSetSMBGuestPassword ::+ -- | 'gatewayARN'+ Prelude.Text ->+ -- | 'password'+ Prelude.Text ->+ SetSMBGuestPassword+newSetSMBGuestPassword pGatewayARN_ pPassword_ =+ SetSMBGuestPassword'+ { gatewayARN = pGatewayARN_,+ password = Data._Sensitive Lens.# pPassword_+ }++-- | The Amazon Resource Name (ARN) of the S3 File Gateway the SMB file share+-- is associated with.+setSMBGuestPassword_gatewayARN :: Lens.Lens' SetSMBGuestPassword Prelude.Text+setSMBGuestPassword_gatewayARN = Lens.lens (\SetSMBGuestPassword' {gatewayARN} -> gatewayARN) (\s@SetSMBGuestPassword' {} a -> s {gatewayARN = a} :: SetSMBGuestPassword)++-- | The password that you want to set for your SMB server.+setSMBGuestPassword_password :: Lens.Lens' SetSMBGuestPassword Prelude.Text+setSMBGuestPassword_password = Lens.lens (\SetSMBGuestPassword' {password} -> password) (\s@SetSMBGuestPassword' {} a -> s {password = a} :: SetSMBGuestPassword) Prelude.. Data._Sensitive++instance Core.AWSRequest SetSMBGuestPassword where+ type+ AWSResponse SetSMBGuestPassword =+ SetSMBGuestPasswordResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ SetSMBGuestPasswordResponse'+ Prelude.<$> (x Data..?> "GatewayARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable SetSMBGuestPassword where+ hashWithSalt _salt SetSMBGuestPassword' {..} =+ _salt+ `Prelude.hashWithSalt` gatewayARN+ `Prelude.hashWithSalt` password++instance Prelude.NFData SetSMBGuestPassword where+ rnf SetSMBGuestPassword' {..} =+ Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf password++instance Data.ToHeaders SetSMBGuestPassword where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.SetSMBGuestPassword" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON SetSMBGuestPassword where+ toJSON SetSMBGuestPassword' {..} =+ Data.object+ ( Prelude.catMaybes+ [ Prelude.Just ("GatewayARN" Data..= gatewayARN),+ Prelude.Just ("Password" Data..= password)+ ]+ )++instance Data.ToPath SetSMBGuestPassword where+ toPath = Prelude.const "/"++instance Data.ToQuery SetSMBGuestPassword where+ toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newSetSMBGuestPasswordResponse' smart constructor.+data SetSMBGuestPasswordResponse = SetSMBGuestPasswordResponse'+ { gatewayARN :: 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 'SetSMBGuestPasswordResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'setSMBGuestPasswordResponse_gatewayARN' - Undocumented member.+--+-- 'httpStatus', 'setSMBGuestPasswordResponse_httpStatus' - The response's http status code.+newSetSMBGuestPasswordResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ SetSMBGuestPasswordResponse+newSetSMBGuestPasswordResponse pHttpStatus_ =+ SetSMBGuestPasswordResponse'+ { gatewayARN =+ Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | Undocumented member.+setSMBGuestPasswordResponse_gatewayARN :: Lens.Lens' SetSMBGuestPasswordResponse (Prelude.Maybe Prelude.Text)+setSMBGuestPasswordResponse_gatewayARN = Lens.lens (\SetSMBGuestPasswordResponse' {gatewayARN} -> gatewayARN) (\s@SetSMBGuestPasswordResponse' {} a -> s {gatewayARN = a} :: SetSMBGuestPasswordResponse)++-- | The response's http status code.+setSMBGuestPasswordResponse_httpStatus :: Lens.Lens' SetSMBGuestPasswordResponse Prelude.Int+setSMBGuestPasswordResponse_httpStatus = Lens.lens (\SetSMBGuestPasswordResponse' {httpStatus} -> httpStatus) (\s@SetSMBGuestPasswordResponse' {} a -> s {httpStatus = a} :: SetSMBGuestPasswordResponse)++instance Prelude.NFData SetSMBGuestPasswordResponse where+ rnf SetSMBGuestPasswordResponse' {..} =+ Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/ShutdownGateway.hs view
@@ -0,0 +1,194 @@+{-# 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.ShutdownGateway+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Shuts down a gateway. To specify which gateway to shut down, use the+-- Amazon Resource Name (ARN) of the gateway in the body of your request.+--+-- The operation shuts down the gateway service component running in the+-- gateway\'s virtual machine (VM) and not the host VM.+--+-- If you want to shut down the VM, it is recommended that you first shut+-- down the gateway component in the VM to avoid unpredictable conditions.+--+-- After the gateway is shutdown, you cannot call any other API except+-- StartGateway, DescribeGatewayInformation, and ListGateways. For more+-- information, see ActivateGateway. Your applications cannot read from or+-- write to the gateway\'s storage volumes, and there are no snapshots+-- taken.+--+-- When you make a shutdown request, you will get a @200 OK@ success+-- response immediately. However, it might take some time for the gateway+-- to shut down. You can call the DescribeGatewayInformation API to check+-- the status. For more information, see ActivateGateway.+--+-- If do not intend to use the gateway again, you must delete the gateway+-- (using DeleteGateway) to no longer pay software charges associated with+-- the gateway.+module Amazonka.StorageGateway.ShutdownGateway+ ( -- * Creating a Request+ ShutdownGateway (..),+ newShutdownGateway,++ -- * Request Lenses+ shutdownGateway_gatewayARN,++ -- * Destructuring the Response+ ShutdownGatewayResponse (..),+ newShutdownGatewayResponse,++ -- * Response Lenses+ shutdownGatewayResponse_gatewayARN,+ shutdownGatewayResponse_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++-- | A JSON object containing the Amazon Resource Name (ARN) of the gateway+-- to shut down.+--+-- /See:/ 'newShutdownGateway' smart constructor.+data ShutdownGateway = ShutdownGateway'+ { gatewayARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'ShutdownGateway' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'shutdownGateway_gatewayARN' - Undocumented member.+newShutdownGateway ::+ -- | 'gatewayARN'+ Prelude.Text ->+ ShutdownGateway+newShutdownGateway pGatewayARN_ =+ ShutdownGateway' {gatewayARN = pGatewayARN_}++-- | Undocumented member.+shutdownGateway_gatewayARN :: Lens.Lens' ShutdownGateway Prelude.Text+shutdownGateway_gatewayARN = Lens.lens (\ShutdownGateway' {gatewayARN} -> gatewayARN) (\s@ShutdownGateway' {} a -> s {gatewayARN = a} :: ShutdownGateway)++instance Core.AWSRequest ShutdownGateway where+ type+ AWSResponse ShutdownGateway =+ ShutdownGatewayResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ ShutdownGatewayResponse'+ Prelude.<$> (x Data..?> "GatewayARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable ShutdownGateway where+ hashWithSalt _salt ShutdownGateway' {..} =+ _salt `Prelude.hashWithSalt` gatewayARN++instance Prelude.NFData ShutdownGateway where+ rnf ShutdownGateway' {..} = Prelude.rnf gatewayARN++instance Data.ToHeaders ShutdownGateway where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.ShutdownGateway" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON ShutdownGateway where+ toJSON ShutdownGateway' {..} =+ Data.object+ ( Prelude.catMaybes+ [Prelude.Just ("GatewayARN" Data..= gatewayARN)]+ )++instance Data.ToPath ShutdownGateway where+ toPath = Prelude.const "/"++instance Data.ToQuery ShutdownGateway where+ toQuery = Prelude.const Prelude.mempty++-- | A JSON object containing the Amazon Resource Name (ARN) of the gateway+-- that was shut down.+--+-- /See:/ 'newShutdownGatewayResponse' smart constructor.+data ShutdownGatewayResponse = ShutdownGatewayResponse'+ { gatewayARN :: 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 'ShutdownGatewayResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'shutdownGatewayResponse_gatewayARN' - Undocumented member.+--+-- 'httpStatus', 'shutdownGatewayResponse_httpStatus' - The response's http status code.+newShutdownGatewayResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ ShutdownGatewayResponse+newShutdownGatewayResponse pHttpStatus_ =+ ShutdownGatewayResponse'+ { gatewayARN =+ Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | Undocumented member.+shutdownGatewayResponse_gatewayARN :: Lens.Lens' ShutdownGatewayResponse (Prelude.Maybe Prelude.Text)+shutdownGatewayResponse_gatewayARN = Lens.lens (\ShutdownGatewayResponse' {gatewayARN} -> gatewayARN) (\s@ShutdownGatewayResponse' {} a -> s {gatewayARN = a} :: ShutdownGatewayResponse)++-- | The response's http status code.+shutdownGatewayResponse_httpStatus :: Lens.Lens' ShutdownGatewayResponse Prelude.Int+shutdownGatewayResponse_httpStatus = Lens.lens (\ShutdownGatewayResponse' {httpStatus} -> httpStatus) (\s@ShutdownGatewayResponse' {} a -> s {httpStatus = a} :: ShutdownGatewayResponse)++instance Prelude.NFData ShutdownGatewayResponse where+ rnf ShutdownGatewayResponse' {..} =+ Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/StartAvailabilityMonitorTest.hs view
@@ -0,0 +1,183 @@+{-# 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.StartAvailabilityMonitorTest+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Start a test that verifies that the specified gateway is configured for+-- High Availability monitoring in your host environment. This request only+-- initiates the test and that a successful response only indicates that+-- the test was started. It doesn\'t indicate that the test passed. For the+-- status of the test, invoke the @DescribeAvailabilityMonitorTest@ API.+--+-- Starting this test will cause your gateway to go offline for a brief+-- period.+module Amazonka.StorageGateway.StartAvailabilityMonitorTest+ ( -- * Creating a Request+ StartAvailabilityMonitorTest (..),+ newStartAvailabilityMonitorTest,++ -- * Request Lenses+ startAvailabilityMonitorTest_gatewayARN,++ -- * Destructuring the Response+ StartAvailabilityMonitorTestResponse (..),+ newStartAvailabilityMonitorTestResponse,++ -- * Response Lenses+ startAvailabilityMonitorTestResponse_gatewayARN,+ startAvailabilityMonitorTestResponse_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++-- | /See:/ 'newStartAvailabilityMonitorTest' smart constructor.+data StartAvailabilityMonitorTest = StartAvailabilityMonitorTest'+ { gatewayARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'StartAvailabilityMonitorTest' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'startAvailabilityMonitorTest_gatewayARN' - Undocumented member.+newStartAvailabilityMonitorTest ::+ -- | 'gatewayARN'+ Prelude.Text ->+ StartAvailabilityMonitorTest+newStartAvailabilityMonitorTest pGatewayARN_ =+ StartAvailabilityMonitorTest'+ { gatewayARN =+ pGatewayARN_+ }++-- | Undocumented member.+startAvailabilityMonitorTest_gatewayARN :: Lens.Lens' StartAvailabilityMonitorTest Prelude.Text+startAvailabilityMonitorTest_gatewayARN = Lens.lens (\StartAvailabilityMonitorTest' {gatewayARN} -> gatewayARN) (\s@StartAvailabilityMonitorTest' {} a -> s {gatewayARN = a} :: StartAvailabilityMonitorTest)++instance Core.AWSRequest StartAvailabilityMonitorTest where+ type+ AWSResponse StartAvailabilityMonitorTest =+ StartAvailabilityMonitorTestResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ StartAvailabilityMonitorTestResponse'+ Prelude.<$> (x Data..?> "GatewayARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance+ Prelude.Hashable+ StartAvailabilityMonitorTest+ where+ hashWithSalt _salt StartAvailabilityMonitorTest' {..} =+ _salt `Prelude.hashWithSalt` gatewayARN++instance Prelude.NFData StartAvailabilityMonitorTest where+ rnf StartAvailabilityMonitorTest' {..} =+ Prelude.rnf gatewayARN++instance Data.ToHeaders StartAvailabilityMonitorTest where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.StartAvailabilityMonitorTest" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON StartAvailabilityMonitorTest where+ toJSON StartAvailabilityMonitorTest' {..} =+ Data.object+ ( Prelude.catMaybes+ [Prelude.Just ("GatewayARN" Data..= gatewayARN)]+ )++instance Data.ToPath StartAvailabilityMonitorTest where+ toPath = Prelude.const "/"++instance Data.ToQuery StartAvailabilityMonitorTest where+ toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newStartAvailabilityMonitorTestResponse' smart constructor.+data StartAvailabilityMonitorTestResponse = StartAvailabilityMonitorTestResponse'+ { gatewayARN :: 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 'StartAvailabilityMonitorTestResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'startAvailabilityMonitorTestResponse_gatewayARN' - Undocumented member.+--+-- 'httpStatus', 'startAvailabilityMonitorTestResponse_httpStatus' - The response's http status code.+newStartAvailabilityMonitorTestResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ StartAvailabilityMonitorTestResponse+newStartAvailabilityMonitorTestResponse pHttpStatus_ =+ StartAvailabilityMonitorTestResponse'+ { gatewayARN =+ Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | Undocumented member.+startAvailabilityMonitorTestResponse_gatewayARN :: Lens.Lens' StartAvailabilityMonitorTestResponse (Prelude.Maybe Prelude.Text)+startAvailabilityMonitorTestResponse_gatewayARN = Lens.lens (\StartAvailabilityMonitorTestResponse' {gatewayARN} -> gatewayARN) (\s@StartAvailabilityMonitorTestResponse' {} a -> s {gatewayARN = a} :: StartAvailabilityMonitorTestResponse)++-- | The response's http status code.+startAvailabilityMonitorTestResponse_httpStatus :: Lens.Lens' StartAvailabilityMonitorTestResponse Prelude.Int+startAvailabilityMonitorTestResponse_httpStatus = Lens.lens (\StartAvailabilityMonitorTestResponse' {httpStatus} -> httpStatus) (\s@StartAvailabilityMonitorTestResponse' {} a -> s {httpStatus = a} :: StartAvailabilityMonitorTestResponse)++instance+ Prelude.NFData+ StartAvailabilityMonitorTestResponse+ where+ rnf StartAvailabilityMonitorTestResponse' {..} =+ Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/StartGateway.hs view
@@ -0,0 +1,181 @@+{-# 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.StartGateway+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Starts a gateway that you previously shut down (see ShutdownGateway).+-- After the gateway starts, you can then make other API calls, your+-- applications can read from or write to the gateway\'s storage volumes+-- and you will be able to take snapshot backups.+--+-- When you make a request, you will get a 200 OK success response+-- immediately. However, it might take some time for the gateway to be+-- ready. You should call DescribeGatewayInformation and check the status+-- before making any additional API calls. For more information, see+-- ActivateGateway.+--+-- To specify which gateway to start, use the Amazon Resource Name (ARN) of+-- the gateway in your request.+module Amazonka.StorageGateway.StartGateway+ ( -- * Creating a Request+ StartGateway (..),+ newStartGateway,++ -- * Request Lenses+ startGateway_gatewayARN,++ -- * Destructuring the Response+ StartGatewayResponse (..),+ newStartGatewayResponse,++ -- * Response Lenses+ startGatewayResponse_gatewayARN,+ startGatewayResponse_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++-- | A JSON object containing the Amazon Resource Name (ARN) of the gateway+-- to start.+--+-- /See:/ 'newStartGateway' smart constructor.+data StartGateway = StartGateway'+ { gatewayARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'StartGateway' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'startGateway_gatewayARN' - Undocumented member.+newStartGateway ::+ -- | 'gatewayARN'+ Prelude.Text ->+ StartGateway+newStartGateway pGatewayARN_ =+ StartGateway' {gatewayARN = pGatewayARN_}++-- | Undocumented member.+startGateway_gatewayARN :: Lens.Lens' StartGateway Prelude.Text+startGateway_gatewayARN = Lens.lens (\StartGateway' {gatewayARN} -> gatewayARN) (\s@StartGateway' {} a -> s {gatewayARN = a} :: StartGateway)++instance Core.AWSRequest StartGateway where+ type AWSResponse StartGateway = StartGatewayResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ StartGatewayResponse'+ Prelude.<$> (x Data..?> "GatewayARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable StartGateway where+ hashWithSalt _salt StartGateway' {..} =+ _salt `Prelude.hashWithSalt` gatewayARN++instance Prelude.NFData StartGateway where+ rnf StartGateway' {..} = Prelude.rnf gatewayARN++instance Data.ToHeaders StartGateway where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.StartGateway" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON StartGateway where+ toJSON StartGateway' {..} =+ Data.object+ ( Prelude.catMaybes+ [Prelude.Just ("GatewayARN" Data..= gatewayARN)]+ )++instance Data.ToPath StartGateway where+ toPath = Prelude.const "/"++instance Data.ToQuery StartGateway where+ toQuery = Prelude.const Prelude.mempty++-- | A JSON object containing the Amazon Resource Name (ARN) of the gateway+-- that was restarted.+--+-- /See:/ 'newStartGatewayResponse' smart constructor.+data StartGatewayResponse = StartGatewayResponse'+ { gatewayARN :: 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 'StartGatewayResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'startGatewayResponse_gatewayARN' - Undocumented member.+--+-- 'httpStatus', 'startGatewayResponse_httpStatus' - The response's http status code.+newStartGatewayResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ StartGatewayResponse+newStartGatewayResponse pHttpStatus_ =+ StartGatewayResponse'+ { gatewayARN = Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | Undocumented member.+startGatewayResponse_gatewayARN :: Lens.Lens' StartGatewayResponse (Prelude.Maybe Prelude.Text)+startGatewayResponse_gatewayARN = Lens.lens (\StartGatewayResponse' {gatewayARN} -> gatewayARN) (\s@StartGatewayResponse' {} a -> s {gatewayARN = a} :: StartGatewayResponse)++-- | The response's http status code.+startGatewayResponse_httpStatus :: Lens.Lens' StartGatewayResponse Prelude.Int+startGatewayResponse_httpStatus = Lens.lens (\StartGatewayResponse' {httpStatus} -> httpStatus) (\s@StartGatewayResponse' {} a -> s {httpStatus = a} :: StartGatewayResponse)++instance Prelude.NFData StartGatewayResponse where+ rnf StartGatewayResponse' {..} =+ Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/Types.hs view
@@ -0,0 +1,534 @@+{-# LANGUAGE DisambiguateRecordFields #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module : Amazonka.StorageGateway.Types+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.StorageGateway.Types+ ( -- * Service Configuration+ defaultService,++ -- * Errors+ _InternalServerError,+ _InvalidGatewayRequestException,+ _ServiceUnavailableError,++ -- * ActiveDirectoryStatus+ ActiveDirectoryStatus (..),++ -- * AvailabilityMonitorTestStatus+ AvailabilityMonitorTestStatus (..),++ -- * CaseSensitivity+ CaseSensitivity (..),++ -- * FileShareType+ FileShareType (..),++ -- * GatewayCapacity+ GatewayCapacity (..),++ -- * HostEnvironment+ HostEnvironment (..),++ -- * ObjectACL+ ObjectACL (..),++ -- * PoolStatus+ PoolStatus (..),++ -- * RetentionLockType+ RetentionLockType (..),++ -- * SMBSecurityStrategy+ SMBSecurityStrategy (..),++ -- * TapeStorageClass+ TapeStorageClass (..),++ -- * AutomaticTapeCreationPolicyInfo+ AutomaticTapeCreationPolicyInfo (..),+ newAutomaticTapeCreationPolicyInfo,+ automaticTapeCreationPolicyInfo_automaticTapeCreationRules,+ automaticTapeCreationPolicyInfo_gatewayARN,++ -- * AutomaticTapeCreationRule+ AutomaticTapeCreationRule (..),+ newAutomaticTapeCreationRule,+ automaticTapeCreationRule_worm,+ automaticTapeCreationRule_tapeBarcodePrefix,+ automaticTapeCreationRule_poolId,+ automaticTapeCreationRule_tapeSizeInBytes,+ automaticTapeCreationRule_minimumNumTapes,++ -- * BandwidthRateLimitInterval+ BandwidthRateLimitInterval (..),+ newBandwidthRateLimitInterval,+ bandwidthRateLimitInterval_averageDownloadRateLimitInBitsPerSec,+ bandwidthRateLimitInterval_averageUploadRateLimitInBitsPerSec,+ bandwidthRateLimitInterval_startHourOfDay,+ bandwidthRateLimitInterval_startMinuteOfHour,+ bandwidthRateLimitInterval_endHourOfDay,+ bandwidthRateLimitInterval_endMinuteOfHour,+ bandwidthRateLimitInterval_daysOfWeek,++ -- * CacheAttributes+ CacheAttributes (..),+ newCacheAttributes,+ cacheAttributes_cacheStaleTimeoutInSeconds,++ -- * CachediSCSIVolume+ CachediSCSIVolume (..),+ newCachediSCSIVolume,+ cachediSCSIVolume_createdDate,+ cachediSCSIVolume_kmsKey,+ cachediSCSIVolume_sourceSnapshotId,+ cachediSCSIVolume_targetName,+ cachediSCSIVolume_volumeARN,+ cachediSCSIVolume_volumeAttachmentStatus,+ cachediSCSIVolume_volumeId,+ cachediSCSIVolume_volumeProgress,+ cachediSCSIVolume_volumeSizeInBytes,+ cachediSCSIVolume_volumeStatus,+ cachediSCSIVolume_volumeType,+ cachediSCSIVolume_volumeUsedInBytes,+ cachediSCSIVolume_volumeiSCSIAttributes,++ -- * ChapInfo+ ChapInfo (..),+ newChapInfo,+ chapInfo_initiatorName,+ chapInfo_secretToAuthenticateInitiator,+ chapInfo_secretToAuthenticateTarget,+ chapInfo_targetARN,++ -- * DeviceiSCSIAttributes+ DeviceiSCSIAttributes (..),+ newDeviceiSCSIAttributes,+ deviceiSCSIAttributes_chapEnabled,+ deviceiSCSIAttributes_networkInterfaceId,+ deviceiSCSIAttributes_networkInterfacePort,+ deviceiSCSIAttributes_targetARN,++ -- * Disk+ Disk (..),+ newDisk,+ disk_diskAllocationResource,+ disk_diskAllocationType,+ disk_diskAttributeList,+ disk_diskId,+ disk_diskNode,+ disk_diskPath,+ disk_diskSizeInBytes,+ disk_diskStatus,++ -- * EndpointNetworkConfiguration+ EndpointNetworkConfiguration (..),+ newEndpointNetworkConfiguration,+ endpointNetworkConfiguration_ipAddresses,++ -- * FileShareInfo+ FileShareInfo (..),+ newFileShareInfo,+ fileShareInfo_fileShareARN,+ fileShareInfo_fileShareId,+ fileShareInfo_fileShareStatus,+ fileShareInfo_fileShareType,+ fileShareInfo_gatewayARN,++ -- * FileSystemAssociationInfo+ FileSystemAssociationInfo (..),+ newFileSystemAssociationInfo,+ fileSystemAssociationInfo_auditDestinationARN,+ fileSystemAssociationInfo_cacheAttributes,+ fileSystemAssociationInfo_endpointNetworkConfiguration,+ fileSystemAssociationInfo_fileSystemAssociationARN,+ fileSystemAssociationInfo_fileSystemAssociationStatus,+ fileSystemAssociationInfo_fileSystemAssociationStatusDetails,+ fileSystemAssociationInfo_gatewayARN,+ fileSystemAssociationInfo_locationARN,+ fileSystemAssociationInfo_tags,++ -- * FileSystemAssociationStatusDetail+ FileSystemAssociationStatusDetail (..),+ newFileSystemAssociationStatusDetail,+ fileSystemAssociationStatusDetail_errorCode,++ -- * FileSystemAssociationSummary+ FileSystemAssociationSummary (..),+ newFileSystemAssociationSummary,+ fileSystemAssociationSummary_fileSystemAssociationARN,+ fileSystemAssociationSummary_fileSystemAssociationId,+ fileSystemAssociationSummary_fileSystemAssociationStatus,+ fileSystemAssociationSummary_gatewayARN,++ -- * GatewayInfo+ GatewayInfo (..),+ newGatewayInfo,+ gatewayInfo_ec2InstanceId,+ gatewayInfo_ec2InstanceRegion,+ gatewayInfo_gatewayARN,+ gatewayInfo_gatewayId,+ gatewayInfo_gatewayName,+ gatewayInfo_gatewayOperationalState,+ gatewayInfo_gatewayType,+ gatewayInfo_hostEnvironment,+ gatewayInfo_hostEnvironmentId,++ -- * NFSFileShareDefaults+ NFSFileShareDefaults (..),+ newNFSFileShareDefaults,+ nFSFileShareDefaults_directoryMode,+ nFSFileShareDefaults_fileMode,+ nFSFileShareDefaults_groupId,+ nFSFileShareDefaults_ownerId,++ -- * NFSFileShareInfo+ NFSFileShareInfo (..),+ newNFSFileShareInfo,+ nFSFileShareInfo_auditDestinationARN,+ nFSFileShareInfo_bucketRegion,+ nFSFileShareInfo_cacheAttributes,+ nFSFileShareInfo_clientList,+ nFSFileShareInfo_defaultStorageClass,+ nFSFileShareInfo_fileShareARN,+ nFSFileShareInfo_fileShareId,+ nFSFileShareInfo_fileShareName,+ nFSFileShareInfo_fileShareStatus,+ nFSFileShareInfo_gatewayARN,+ nFSFileShareInfo_guessMIMETypeEnabled,+ nFSFileShareInfo_kmsEncrypted,+ nFSFileShareInfo_kmsKey,+ nFSFileShareInfo_locationARN,+ nFSFileShareInfo_nFSFileShareDefaults,+ nFSFileShareInfo_notificationPolicy,+ nFSFileShareInfo_objectACL,+ nFSFileShareInfo_path,+ nFSFileShareInfo_readOnly,+ nFSFileShareInfo_requesterPays,+ nFSFileShareInfo_role,+ nFSFileShareInfo_squash,+ nFSFileShareInfo_tags,+ nFSFileShareInfo_vPCEndpointDNSName,++ -- * NetworkInterface+ NetworkInterface (..),+ newNetworkInterface,+ networkInterface_ipv4Address,+ networkInterface_ipv6Address,+ networkInterface_macAddress,++ -- * PoolInfo+ PoolInfo (..),+ newPoolInfo,+ poolInfo_poolARN,+ poolInfo_poolName,+ poolInfo_poolStatus,+ poolInfo_retentionLockTimeInDays,+ poolInfo_retentionLockType,+ poolInfo_storageClass,++ -- * SMBFileShareInfo+ SMBFileShareInfo (..),+ newSMBFileShareInfo,+ sMBFileShareInfo_accessBasedEnumeration,+ sMBFileShareInfo_adminUserList,+ sMBFileShareInfo_auditDestinationARN,+ sMBFileShareInfo_authentication,+ sMBFileShareInfo_bucketRegion,+ sMBFileShareInfo_cacheAttributes,+ sMBFileShareInfo_caseSensitivity,+ sMBFileShareInfo_defaultStorageClass,+ sMBFileShareInfo_fileShareARN,+ sMBFileShareInfo_fileShareId,+ sMBFileShareInfo_fileShareName,+ sMBFileShareInfo_fileShareStatus,+ sMBFileShareInfo_gatewayARN,+ sMBFileShareInfo_guessMIMETypeEnabled,+ sMBFileShareInfo_invalidUserList,+ sMBFileShareInfo_kmsEncrypted,+ sMBFileShareInfo_kmsKey,+ sMBFileShareInfo_locationARN,+ sMBFileShareInfo_notificationPolicy,+ sMBFileShareInfo_objectACL,+ sMBFileShareInfo_oplocksEnabled,+ sMBFileShareInfo_path,+ sMBFileShareInfo_readOnly,+ sMBFileShareInfo_requesterPays,+ sMBFileShareInfo_role,+ sMBFileShareInfo_sMBACLEnabled,+ sMBFileShareInfo_tags,+ sMBFileShareInfo_vPCEndpointDNSName,+ sMBFileShareInfo_validUserList,++ -- * SMBLocalGroups+ SMBLocalGroups (..),+ newSMBLocalGroups,+ sMBLocalGroups_gatewayAdmins,++ -- * StorediSCSIVolume+ StorediSCSIVolume (..),+ newStorediSCSIVolume,+ storediSCSIVolume_createdDate,+ storediSCSIVolume_kmsKey,+ storediSCSIVolume_preservedExistingData,+ storediSCSIVolume_sourceSnapshotId,+ storediSCSIVolume_targetName,+ storediSCSIVolume_volumeARN,+ storediSCSIVolume_volumeAttachmentStatus,+ storediSCSIVolume_volumeDiskId,+ storediSCSIVolume_volumeId,+ storediSCSIVolume_volumeProgress,+ storediSCSIVolume_volumeSizeInBytes,+ storediSCSIVolume_volumeStatus,+ storediSCSIVolume_volumeType,+ storediSCSIVolume_volumeUsedInBytes,+ storediSCSIVolume_volumeiSCSIAttributes,++ -- * Tag+ Tag (..),+ newTag,+ tag_key,+ tag_value,++ -- * Tape+ Tape (..),+ newTape,+ tape_kmsKey,+ tape_poolEntryDate,+ tape_poolId,+ tape_progress,+ tape_retentionStartDate,+ tape_tapeARN,+ tape_tapeBarcode,+ tape_tapeCreatedDate,+ tape_tapeSizeInBytes,+ tape_tapeStatus,+ tape_tapeUsedInBytes,+ tape_vTLDevice,+ tape_worm,++ -- * TapeArchive+ TapeArchive (..),+ newTapeArchive,+ tapeArchive_completionTime,+ tapeArchive_kmsKey,+ tapeArchive_poolEntryDate,+ tapeArchive_poolId,+ tapeArchive_retentionStartDate,+ tapeArchive_retrievedTo,+ tapeArchive_tapeARN,+ tapeArchive_tapeBarcode,+ tapeArchive_tapeCreatedDate,+ tapeArchive_tapeSizeInBytes,+ tapeArchive_tapeStatus,+ tapeArchive_tapeUsedInBytes,+ tapeArchive_worm,++ -- * TapeInfo+ TapeInfo (..),+ newTapeInfo,+ tapeInfo_gatewayARN,+ tapeInfo_poolEntryDate,+ tapeInfo_poolId,+ tapeInfo_retentionStartDate,+ tapeInfo_tapeARN,+ tapeInfo_tapeBarcode,+ tapeInfo_tapeSizeInBytes,+ tapeInfo_tapeStatus,++ -- * TapeRecoveryPointInfo+ TapeRecoveryPointInfo (..),+ newTapeRecoveryPointInfo,+ tapeRecoveryPointInfo_tapeARN,+ tapeRecoveryPointInfo_tapeRecoveryPointTime,+ tapeRecoveryPointInfo_tapeSizeInBytes,+ tapeRecoveryPointInfo_tapeStatus,++ -- * VTLDevice+ VTLDevice (..),+ newVTLDevice,+ vTLDevice_deviceiSCSIAttributes,+ vTLDevice_vTLDeviceARN,+ vTLDevice_vTLDeviceProductIdentifier,+ vTLDevice_vTLDeviceType,+ vTLDevice_vTLDeviceVendor,++ -- * VolumeInfo+ VolumeInfo (..),+ newVolumeInfo,+ volumeInfo_gatewayARN,+ volumeInfo_gatewayId,+ volumeInfo_volumeARN,+ volumeInfo_volumeAttachmentStatus,+ volumeInfo_volumeId,+ volumeInfo_volumeSizeInBytes,+ volumeInfo_volumeType,++ -- * VolumeRecoveryPointInfo+ VolumeRecoveryPointInfo (..),+ newVolumeRecoveryPointInfo,+ volumeRecoveryPointInfo_volumeARN,+ volumeRecoveryPointInfo_volumeRecoveryPointTime,+ volumeRecoveryPointInfo_volumeSizeInBytes,+ volumeRecoveryPointInfo_volumeUsageInBytes,++ -- * VolumeiSCSIAttributes+ VolumeiSCSIAttributes (..),+ newVolumeiSCSIAttributes,+ volumeiSCSIAttributes_chapEnabled,+ volumeiSCSIAttributes_lunNumber,+ volumeiSCSIAttributes_networkInterfaceId,+ volumeiSCSIAttributes_networkInterfacePort,+ volumeiSCSIAttributes_targetARN,+ )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Core.Lens.Internal as Lens+import qualified Amazonka.Prelude as Prelude+import qualified Amazonka.Sign.V4 as Sign+import Amazonka.StorageGateway.Types.ActiveDirectoryStatus+import Amazonka.StorageGateway.Types.AutomaticTapeCreationPolicyInfo+import Amazonka.StorageGateway.Types.AutomaticTapeCreationRule+import Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus+import Amazonka.StorageGateway.Types.BandwidthRateLimitInterval+import Amazonka.StorageGateway.Types.CacheAttributes+import Amazonka.StorageGateway.Types.CachediSCSIVolume+import Amazonka.StorageGateway.Types.CaseSensitivity+import Amazonka.StorageGateway.Types.ChapInfo+import Amazonka.StorageGateway.Types.DeviceiSCSIAttributes+import Amazonka.StorageGateway.Types.Disk+import Amazonka.StorageGateway.Types.EndpointNetworkConfiguration+import Amazonka.StorageGateway.Types.FileShareInfo+import Amazonka.StorageGateway.Types.FileShareType+import Amazonka.StorageGateway.Types.FileSystemAssociationInfo+import Amazonka.StorageGateway.Types.FileSystemAssociationStatusDetail+import Amazonka.StorageGateway.Types.FileSystemAssociationSummary+import Amazonka.StorageGateway.Types.GatewayCapacity+import Amazonka.StorageGateway.Types.GatewayInfo+import Amazonka.StorageGateway.Types.HostEnvironment+import Amazonka.StorageGateway.Types.NFSFileShareDefaults+import Amazonka.StorageGateway.Types.NFSFileShareInfo+import Amazonka.StorageGateway.Types.NetworkInterface+import Amazonka.StorageGateway.Types.ObjectACL+import Amazonka.StorageGateway.Types.PoolInfo+import Amazonka.StorageGateway.Types.PoolStatus+import Amazonka.StorageGateway.Types.RetentionLockType+import Amazonka.StorageGateway.Types.SMBFileShareInfo+import Amazonka.StorageGateway.Types.SMBLocalGroups+import Amazonka.StorageGateway.Types.SMBSecurityStrategy+import Amazonka.StorageGateway.Types.StorediSCSIVolume+import Amazonka.StorageGateway.Types.Tag+import Amazonka.StorageGateway.Types.Tape+import Amazonka.StorageGateway.Types.TapeArchive+import Amazonka.StorageGateway.Types.TapeInfo+import Amazonka.StorageGateway.Types.TapeRecoveryPointInfo+import Amazonka.StorageGateway.Types.TapeStorageClass+import Amazonka.StorageGateway.Types.VTLDevice+import Amazonka.StorageGateway.Types.VolumeInfo+import Amazonka.StorageGateway.Types.VolumeRecoveryPointInfo+import Amazonka.StorageGateway.Types.VolumeiSCSIAttributes++-- | API version @2013-06-30@ of the Amazon Storage Gateway SDK configuration.+defaultService :: Core.Service+defaultService =+ Core.Service+ { Core.abbrev = "StorageGateway",+ Core.signer = Sign.v4,+ Core.endpointPrefix = "storagegateway",+ Core.signingName = "storagegateway",+ Core.version = "2013-06-30",+ Core.s3AddressingStyle = Core.S3AddressingStyleAuto,+ Core.endpoint = Core.defaultEndpoint defaultService,+ Core.timeout = Prelude.Just 70,+ Core.check = Core.statusSuccess,+ Core.error = Core.parseJSONError "StorageGateway",+ Core.retry = retry+ }+ where+ retry =+ Core.Exponential+ { Core.base = 5.0e-2,+ Core.growth = 2,+ Core.attempts = 5,+ Core.check = check+ }+ check e+ | Lens.has (Core.hasStatus 502) e =+ Prelude.Just "bad_gateway"+ | Lens.has (Core.hasStatus 504) e =+ Prelude.Just "gateway_timeout"+ | Lens.has (Core.hasStatus 500) e =+ Prelude.Just "general_server_error"+ | Lens.has (Core.hasStatus 509) e =+ Prelude.Just "limit_exceeded"+ | Lens.has+ ( Core.hasCode "RequestThrottledException"+ Prelude.. Core.hasStatus 400+ )+ e =+ Prelude.Just "request_throttled_exception"+ | Lens.has (Core.hasStatus 503) e =+ Prelude.Just "service_unavailable"+ | Lens.has+ ( Core.hasCode "ThrottledException"+ Prelude.. Core.hasStatus 400+ )+ e =+ Prelude.Just "throttled_exception"+ | Lens.has+ ( Core.hasCode "Throttling"+ Prelude.. Core.hasStatus 400+ )+ e =+ Prelude.Just "throttling"+ | Lens.has+ ( Core.hasCode "ThrottlingException"+ Prelude.. Core.hasStatus 400+ )+ e =+ Prelude.Just "throttling_exception"+ | Lens.has+ ( Core.hasCode+ "ProvisionedThroughputExceededException"+ Prelude.. Core.hasStatus 400+ )+ e =+ Prelude.Just "throughput_exceeded"+ | Lens.has (Core.hasStatus 429) e =+ Prelude.Just "too_many_requests"+ | Prelude.otherwise = Prelude.Nothing++-- | An internal server error has occurred during the request. For more+-- information, see the error and message fields.+_InternalServerError :: (Core.AsError a) => Lens.Fold a Core.ServiceError+_InternalServerError =+ Core._MatchServiceError+ defaultService+ "InternalServerError"++-- | An exception occurred because an invalid gateway request was issued to+-- the service. For more information, see the error and message fields.+_InvalidGatewayRequestException :: (Core.AsError a) => Lens.Fold a Core.ServiceError+_InvalidGatewayRequestException =+ Core._MatchServiceError+ defaultService+ "InvalidGatewayRequestException"++-- | An internal server error has occurred because the service is+-- unavailable. For more information, see the error and message fields.+_ServiceUnavailableError :: (Core.AsError a) => Lens.Fold a Core.ServiceError+_ServiceUnavailableError =+ Core._MatchServiceError+ defaultService+ "ServiceUnavailableError"
+ gen/Amazonka/StorageGateway/Types/ActiveDirectoryStatus.hs view
@@ -0,0 +1,96 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE GeneralizedNewtypeDeriving #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module : Amazonka.StorageGateway.Types.ActiveDirectoryStatus+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.StorageGateway.Types.ActiveDirectoryStatus+ ( ActiveDirectoryStatus+ ( ..,+ ActiveDirectoryStatus_ACCESS_DENIED,+ ActiveDirectoryStatus_DETACHED,+ ActiveDirectoryStatus_JOINED,+ ActiveDirectoryStatus_JOINING,+ ActiveDirectoryStatus_NETWORK_ERROR,+ ActiveDirectoryStatus_TIMEOUT,+ ActiveDirectoryStatus_UNKNOWN_ERROR+ ),+ )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Data as Data+import qualified Amazonka.Prelude as Prelude++newtype ActiveDirectoryStatus = ActiveDirectoryStatus'+ { fromActiveDirectoryStatus ::+ Data.Text+ }+ deriving stock+ ( Prelude.Show,+ Prelude.Read,+ Prelude.Eq,+ Prelude.Ord,+ Prelude.Generic+ )+ deriving newtype+ ( Prelude.Hashable,+ Prelude.NFData,+ Data.FromText,+ Data.ToText,+ Data.ToByteString,+ Data.ToLog,+ Data.ToHeader,+ Data.ToQuery,+ Data.FromJSON,+ Data.FromJSONKey,+ Data.ToJSON,+ Data.ToJSONKey,+ Data.FromXML,+ Data.ToXML+ )++pattern ActiveDirectoryStatus_ACCESS_DENIED :: ActiveDirectoryStatus+pattern ActiveDirectoryStatus_ACCESS_DENIED = ActiveDirectoryStatus' "ACCESS_DENIED"++pattern ActiveDirectoryStatus_DETACHED :: ActiveDirectoryStatus+pattern ActiveDirectoryStatus_DETACHED = ActiveDirectoryStatus' "DETACHED"++pattern ActiveDirectoryStatus_JOINED :: ActiveDirectoryStatus+pattern ActiveDirectoryStatus_JOINED = ActiveDirectoryStatus' "JOINED"++pattern ActiveDirectoryStatus_JOINING :: ActiveDirectoryStatus+pattern ActiveDirectoryStatus_JOINING = ActiveDirectoryStatus' "JOINING"++pattern ActiveDirectoryStatus_NETWORK_ERROR :: ActiveDirectoryStatus+pattern ActiveDirectoryStatus_NETWORK_ERROR = ActiveDirectoryStatus' "NETWORK_ERROR"++pattern ActiveDirectoryStatus_TIMEOUT :: ActiveDirectoryStatus+pattern ActiveDirectoryStatus_TIMEOUT = ActiveDirectoryStatus' "TIMEOUT"++pattern ActiveDirectoryStatus_UNKNOWN_ERROR :: ActiveDirectoryStatus+pattern ActiveDirectoryStatus_UNKNOWN_ERROR = ActiveDirectoryStatus' "UNKNOWN_ERROR"++{-# COMPLETE+ ActiveDirectoryStatus_ACCESS_DENIED,+ ActiveDirectoryStatus_DETACHED,+ ActiveDirectoryStatus_JOINED,+ ActiveDirectoryStatus_JOINING,+ ActiveDirectoryStatus_NETWORK_ERROR,+ ActiveDirectoryStatus_TIMEOUT,+ ActiveDirectoryStatus_UNKNOWN_ERROR,+ ActiveDirectoryStatus'+ #-}
+ gen/Amazonka/StorageGateway/Types/AutomaticTapeCreationPolicyInfo.hs view
@@ -0,0 +1,104 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# 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.Types.AutomaticTapeCreationPolicyInfo+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.StorageGateway.Types.AutomaticTapeCreationPolicyInfo 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 Amazonka.StorageGateway.Types.AutomaticTapeCreationRule++-- | Information about the gateway\'s automatic tape creation policies,+-- including the automatic tape creation rules and the gateway that is+-- using the policies.+--+-- /See:/ 'newAutomaticTapeCreationPolicyInfo' smart constructor.+data AutomaticTapeCreationPolicyInfo = AutomaticTapeCreationPolicyInfo'+ { -- | An automatic tape creation policy consists of a list of automatic tape+ -- creation rules. This returns the rules that determine when and how to+ -- automatically create new tapes.+ automaticTapeCreationRules :: Prelude.Maybe (Prelude.NonEmpty AutomaticTapeCreationRule),+ gatewayARN :: Prelude.Maybe Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'AutomaticTapeCreationPolicyInfo' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'automaticTapeCreationRules', 'automaticTapeCreationPolicyInfo_automaticTapeCreationRules' - An automatic tape creation policy consists of a list of automatic tape+-- creation rules. This returns the rules that determine when and how to+-- automatically create new tapes.+--+-- 'gatewayARN', 'automaticTapeCreationPolicyInfo_gatewayARN' - Undocumented member.+newAutomaticTapeCreationPolicyInfo ::+ AutomaticTapeCreationPolicyInfo+newAutomaticTapeCreationPolicyInfo =+ AutomaticTapeCreationPolicyInfo'+ { automaticTapeCreationRules =+ Prelude.Nothing,+ gatewayARN = Prelude.Nothing+ }++-- | An automatic tape creation policy consists of a list of automatic tape+-- creation rules. This returns the rules that determine when and how to+-- automatically create new tapes.+automaticTapeCreationPolicyInfo_automaticTapeCreationRules :: Lens.Lens' AutomaticTapeCreationPolicyInfo (Prelude.Maybe (Prelude.NonEmpty AutomaticTapeCreationRule))+automaticTapeCreationPolicyInfo_automaticTapeCreationRules = Lens.lens (\AutomaticTapeCreationPolicyInfo' {automaticTapeCreationRules} -> automaticTapeCreationRules) (\s@AutomaticTapeCreationPolicyInfo' {} a -> s {automaticTapeCreationRules = a} :: AutomaticTapeCreationPolicyInfo) Prelude.. Lens.mapping Lens.coerced++-- | Undocumented member.+automaticTapeCreationPolicyInfo_gatewayARN :: Lens.Lens' AutomaticTapeCreationPolicyInfo (Prelude.Maybe Prelude.Text)+automaticTapeCreationPolicyInfo_gatewayARN = Lens.lens (\AutomaticTapeCreationPolicyInfo' {gatewayARN} -> gatewayARN) (\s@AutomaticTapeCreationPolicyInfo' {} a -> s {gatewayARN = a} :: AutomaticTapeCreationPolicyInfo)++instance+ Data.FromJSON+ AutomaticTapeCreationPolicyInfo+ where+ parseJSON =+ Data.withObject+ "AutomaticTapeCreationPolicyInfo"+ ( \x ->+ AutomaticTapeCreationPolicyInfo'+ Prelude.<$> (x Data..:? "AutomaticTapeCreationRules")+ Prelude.<*> (x Data..:? "GatewayARN")+ )++instance+ Prelude.Hashable+ AutomaticTapeCreationPolicyInfo+ where+ hashWithSalt+ _salt+ AutomaticTapeCreationPolicyInfo' {..} =+ _salt+ `Prelude.hashWithSalt` automaticTapeCreationRules+ `Prelude.hashWithSalt` gatewayARN++instance+ Prelude.NFData+ AutomaticTapeCreationPolicyInfo+ where+ rnf AutomaticTapeCreationPolicyInfo' {..} =+ Prelude.rnf automaticTapeCreationRules+ `Prelude.seq` Prelude.rnf gatewayARN
+ gen/Amazonka/StorageGateway/Types/AutomaticTapeCreationRule.hs view
@@ -0,0 +1,195 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# 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.Types.AutomaticTapeCreationRule+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.StorageGateway.Types.AutomaticTapeCreationRule 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++-- | An automatic tape creation policy consists of automatic tape creation+-- rules where each rule defines when and how to create new tapes. For more+-- information about automatic tape creation, see+-- <https://docs.aws.amazon.com/storagegateway/latest/userguide/GettingStartedCreateTapes.html#CreateTapesAutomatically Creating Tapes Automatically>.+--+-- /See:/ 'newAutomaticTapeCreationRule' smart constructor.+data AutomaticTapeCreationRule = AutomaticTapeCreationRule'+ { -- | Set to @true@ to indicate that tapes are to be archived as+ -- write-once-read-many (WORM). Set to @false@ when WORM is not enabled for+ -- tapes.+ worm :: Prelude.Maybe Prelude.Bool,+ -- | A prefix that you append to the barcode of the virtual tape that you are+ -- creating. This prefix makes the barcode unique.+ --+ -- The prefix must be 1-4 characters in length and must be one of the+ -- uppercase letters from A to Z.+ tapeBarcodePrefix :: Prelude.Text,+ -- | The ID of the pool that you want to add your tape to for archiving. The+ -- tape in this pool is archived in the Amazon S3 storage class that is+ -- associated with the pool. When you use your backup application to eject+ -- the tape, the tape is archived directly into the storage class (S3+ -- Glacier or S3 Glacier Deep Archive) that corresponds to the pool.+ poolId :: Prelude.Text,+ -- | The size, in bytes, of the virtual tape capacity.+ tapeSizeInBytes :: Prelude.Integer,+ -- | The minimum number of available virtual tapes that the gateway maintains+ -- at all times. If the number of tapes on the gateway goes below this+ -- value, the gateway creates as many new tapes as are needed to have+ -- @MinimumNumTapes@ on the gateway. For more information about automatic+ -- tape creation, see+ -- <https://docs.aws.amazon.com/storagegateway/latest/userguide/GettingStartedCreateTapes.html#CreateTapesAutomatically Creating Tapes Automatically>.+ minimumNumTapes :: Prelude.Natural+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'AutomaticTapeCreationRule' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'worm', 'automaticTapeCreationRule_worm' - Set to @true@ to indicate that tapes are to be archived as+-- write-once-read-many (WORM). Set to @false@ when WORM is not enabled for+-- tapes.+--+-- 'tapeBarcodePrefix', 'automaticTapeCreationRule_tapeBarcodePrefix' - A prefix that you append to the barcode of the virtual tape that you are+-- creating. This prefix makes the barcode unique.+--+-- The prefix must be 1-4 characters in length and must be one of the+-- uppercase letters from A to Z.+--+-- 'poolId', 'automaticTapeCreationRule_poolId' - The ID of the pool that you want to add your tape to for archiving. The+-- tape in this pool is archived in the Amazon S3 storage class that is+-- associated with the pool. When you use your backup application to eject+-- the tape, the tape is archived directly into the storage class (S3+-- Glacier or S3 Glacier Deep Archive) that corresponds to the pool.+--+-- 'tapeSizeInBytes', 'automaticTapeCreationRule_tapeSizeInBytes' - The size, in bytes, of the virtual tape capacity.+--+-- 'minimumNumTapes', 'automaticTapeCreationRule_minimumNumTapes' - The minimum number of available virtual tapes that the gateway maintains+-- at all times. If the number of tapes on the gateway goes below this+-- value, the gateway creates as many new tapes as are needed to have+-- @MinimumNumTapes@ on the gateway. For more information about automatic+-- tape creation, see+-- <https://docs.aws.amazon.com/storagegateway/latest/userguide/GettingStartedCreateTapes.html#CreateTapesAutomatically Creating Tapes Automatically>.+newAutomaticTapeCreationRule ::+ -- | 'tapeBarcodePrefix'+ Prelude.Text ->+ -- | 'poolId'+ Prelude.Text ->+ -- | 'tapeSizeInBytes'+ Prelude.Integer ->+ -- | 'minimumNumTapes'+ Prelude.Natural ->+ AutomaticTapeCreationRule+newAutomaticTapeCreationRule+ pTapeBarcodePrefix_+ pPoolId_+ pTapeSizeInBytes_+ pMinimumNumTapes_ =+ AutomaticTapeCreationRule'+ { worm = Prelude.Nothing,+ tapeBarcodePrefix = pTapeBarcodePrefix_,+ poolId = pPoolId_,+ tapeSizeInBytes = pTapeSizeInBytes_,+ minimumNumTapes = pMinimumNumTapes_+ }++-- | Set to @true@ to indicate that tapes are to be archived as+-- write-once-read-many (WORM). Set to @false@ when WORM is not enabled for+-- tapes.+automaticTapeCreationRule_worm :: Lens.Lens' AutomaticTapeCreationRule (Prelude.Maybe Prelude.Bool)+automaticTapeCreationRule_worm = Lens.lens (\AutomaticTapeCreationRule' {worm} -> worm) (\s@AutomaticTapeCreationRule' {} a -> s {worm = a} :: AutomaticTapeCreationRule)++-- | A prefix that you append to the barcode of the virtual tape that you are+-- creating. This prefix makes the barcode unique.+--+-- The prefix must be 1-4 characters in length and must be one of the+-- uppercase letters from A to Z.+automaticTapeCreationRule_tapeBarcodePrefix :: Lens.Lens' AutomaticTapeCreationRule Prelude.Text+automaticTapeCreationRule_tapeBarcodePrefix = Lens.lens (\AutomaticTapeCreationRule' {tapeBarcodePrefix} -> tapeBarcodePrefix) (\s@AutomaticTapeCreationRule' {} a -> s {tapeBarcodePrefix = a} :: AutomaticTapeCreationRule)++-- | The ID of the pool that you want to add your tape to for archiving. The+-- tape in this pool is archived in the Amazon S3 storage class that is+-- associated with the pool. When you use your backup application to eject+-- the tape, the tape is archived directly into the storage class (S3+-- Glacier or S3 Glacier Deep Archive) that corresponds to the pool.+automaticTapeCreationRule_poolId :: Lens.Lens' AutomaticTapeCreationRule Prelude.Text+automaticTapeCreationRule_poolId = Lens.lens (\AutomaticTapeCreationRule' {poolId} -> poolId) (\s@AutomaticTapeCreationRule' {} a -> s {poolId = a} :: AutomaticTapeCreationRule)++-- | The size, in bytes, of the virtual tape capacity.+automaticTapeCreationRule_tapeSizeInBytes :: Lens.Lens' AutomaticTapeCreationRule Prelude.Integer+automaticTapeCreationRule_tapeSizeInBytes = Lens.lens (\AutomaticTapeCreationRule' {tapeSizeInBytes} -> tapeSizeInBytes) (\s@AutomaticTapeCreationRule' {} a -> s {tapeSizeInBytes = a} :: AutomaticTapeCreationRule)++-- | The minimum number of available virtual tapes that the gateway maintains+-- at all times. If the number of tapes on the gateway goes below this+-- value, the gateway creates as many new tapes as are needed to have+-- @MinimumNumTapes@ on the gateway. For more information about automatic+-- tape creation, see+-- <https://docs.aws.amazon.com/storagegateway/latest/userguide/GettingStartedCreateTapes.html#CreateTapesAutomatically Creating Tapes Automatically>.+automaticTapeCreationRule_minimumNumTapes :: Lens.Lens' AutomaticTapeCreationRule Prelude.Natural+automaticTapeCreationRule_minimumNumTapes = Lens.lens (\AutomaticTapeCreationRule' {minimumNumTapes} -> minimumNumTapes) (\s@AutomaticTapeCreationRule' {} a -> s {minimumNumTapes = a} :: AutomaticTapeCreationRule)++instance Data.FromJSON AutomaticTapeCreationRule where+ parseJSON =+ Data.withObject+ "AutomaticTapeCreationRule"+ ( \x ->+ AutomaticTapeCreationRule'+ Prelude.<$> (x Data..:? "Worm")+ Prelude.<*> (x Data..: "TapeBarcodePrefix")+ Prelude.<*> (x Data..: "PoolId")+ Prelude.<*> (x Data..: "TapeSizeInBytes")+ Prelude.<*> (x Data..: "MinimumNumTapes")+ )++instance Prelude.Hashable AutomaticTapeCreationRule where+ hashWithSalt _salt AutomaticTapeCreationRule' {..} =+ _salt+ `Prelude.hashWithSalt` worm+ `Prelude.hashWithSalt` tapeBarcodePrefix+ `Prelude.hashWithSalt` poolId+ `Prelude.hashWithSalt` tapeSizeInBytes+ `Prelude.hashWithSalt` minimumNumTapes++instance Prelude.NFData AutomaticTapeCreationRule where+ rnf AutomaticTapeCreationRule' {..} =+ Prelude.rnf worm+ `Prelude.seq` Prelude.rnf tapeBarcodePrefix+ `Prelude.seq` Prelude.rnf poolId+ `Prelude.seq` Prelude.rnf tapeSizeInBytes+ `Prelude.seq` Prelude.rnf minimumNumTapes++instance Data.ToJSON AutomaticTapeCreationRule where+ toJSON AutomaticTapeCreationRule' {..} =+ Data.object+ ( Prelude.catMaybes+ [ ("Worm" Data..=) Prelude.<$> worm,+ Prelude.Just+ ("TapeBarcodePrefix" Data..= tapeBarcodePrefix),+ Prelude.Just ("PoolId" Data..= poolId),+ Prelude.Just+ ("TapeSizeInBytes" Data..= tapeSizeInBytes),+ Prelude.Just+ ("MinimumNumTapes" Data..= minimumNumTapes)+ ]+ )
+ gen/Amazonka/StorageGateway/Types/AvailabilityMonitorTestStatus.hs view
@@ -0,0 +1,76 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE GeneralizedNewtypeDeriving #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module : Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.StorageGateway.Types.AvailabilityMonitorTestStatus+ ( AvailabilityMonitorTestStatus+ ( ..,+ AvailabilityMonitorTestStatus_COMPLETE,+ AvailabilityMonitorTestStatus_FAILED,+ AvailabilityMonitorTestStatus_PENDING+ ),+ )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Data as Data+import qualified Amazonka.Prelude as Prelude++newtype AvailabilityMonitorTestStatus = AvailabilityMonitorTestStatus'+ { fromAvailabilityMonitorTestStatus ::+ Data.Text+ }+ deriving stock+ ( Prelude.Show,+ Prelude.Read,+ Prelude.Eq,+ Prelude.Ord,+ Prelude.Generic+ )+ deriving newtype+ ( Prelude.Hashable,+ Prelude.NFData,+ Data.FromText,+ Data.ToText,+ Data.ToByteString,+ Data.ToLog,+ Data.ToHeader,+ Data.ToQuery,+ Data.FromJSON,+ Data.FromJSONKey,+ Data.ToJSON,+ Data.ToJSONKey,+ Data.FromXML,+ Data.ToXML+ )++pattern AvailabilityMonitorTestStatus_COMPLETE :: AvailabilityMonitorTestStatus+pattern AvailabilityMonitorTestStatus_COMPLETE = AvailabilityMonitorTestStatus' "COMPLETE"++pattern AvailabilityMonitorTestStatus_FAILED :: AvailabilityMonitorTestStatus+pattern AvailabilityMonitorTestStatus_FAILED = AvailabilityMonitorTestStatus' "FAILED"++pattern AvailabilityMonitorTestStatus_PENDING :: AvailabilityMonitorTestStatus+pattern AvailabilityMonitorTestStatus_PENDING = AvailabilityMonitorTestStatus' "PENDING"++{-# COMPLETE+ AvailabilityMonitorTestStatus_COMPLETE,+ AvailabilityMonitorTestStatus_FAILED,+ AvailabilityMonitorTestStatus_PENDING,+ AvailabilityMonitorTestStatus'+ #-}
+ gen/Amazonka/StorageGateway/Types/BandwidthRateLimitInterval.hs view
@@ -0,0 +1,217 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# 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.Types.BandwidthRateLimitInterval+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.StorageGateway.Types.BandwidthRateLimitInterval 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++-- | Describes a bandwidth rate limit interval for a gateway. A bandwidth+-- rate limit schedule consists of one or more bandwidth rate limit+-- intervals. A bandwidth rate limit interval defines a period of time on+-- one or more days of the week, during which bandwidth rate limits are+-- specified for uploading, downloading, or both.+--+-- /See:/ 'newBandwidthRateLimitInterval' smart constructor.+data BandwidthRateLimitInterval = BandwidthRateLimitInterval'+ { -- | The average download rate limit component of the bandwidth rate limit+ -- interval, in bits per second. This field does not appear in the response+ -- if the download rate limit is not set.+ averageDownloadRateLimitInBitsPerSec :: Prelude.Maybe Prelude.Natural,+ -- | The average upload rate limit component of the bandwidth rate limit+ -- interval, in bits per second. This field does not appear in the response+ -- if the upload rate limit is not set.+ averageUploadRateLimitInBitsPerSec :: Prelude.Maybe Prelude.Natural,+ -- | The hour of the day to start the bandwidth rate limit interval.+ startHourOfDay :: Prelude.Natural,+ -- | The minute of the hour to start the bandwidth rate limit interval. The+ -- interval begins at the start of that minute. To begin an interval+ -- exactly at the start of the hour, use the value @0@.+ startMinuteOfHour :: Prelude.Natural,+ -- | The hour of the day to end the bandwidth rate limit interval.+ endHourOfDay :: Prelude.Natural,+ -- | The minute of the hour to end the bandwidth rate limit interval.+ --+ -- The bandwidth rate limit interval ends at the end of the minute. To end+ -- an interval at the end of an hour, use the value @59@.+ endMinuteOfHour :: Prelude.Natural,+ -- | The days of the week component of the bandwidth rate limit interval,+ -- represented as ordinal numbers from 0 to 6, where 0 represents Sunday+ -- and 6 represents Saturday.+ daysOfWeek :: Prelude.NonEmpty Prelude.Natural+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'BandwidthRateLimitInterval' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'averageDownloadRateLimitInBitsPerSec', 'bandwidthRateLimitInterval_averageDownloadRateLimitInBitsPerSec' - The average download rate limit component of the bandwidth rate limit+-- interval, in bits per second. This field does not appear in the response+-- if the download rate limit is not set.+--+-- 'averageUploadRateLimitInBitsPerSec', 'bandwidthRateLimitInterval_averageUploadRateLimitInBitsPerSec' - The average upload rate limit component of the bandwidth rate limit+-- interval, in bits per second. This field does not appear in the response+-- if the upload rate limit is not set.+--+-- 'startHourOfDay', 'bandwidthRateLimitInterval_startHourOfDay' - The hour of the day to start the bandwidth rate limit interval.+--+-- 'startMinuteOfHour', 'bandwidthRateLimitInterval_startMinuteOfHour' - The minute of the hour to start the bandwidth rate limit interval. The+-- interval begins at the start of that minute. To begin an interval+-- exactly at the start of the hour, use the value @0@.+--+-- 'endHourOfDay', 'bandwidthRateLimitInterval_endHourOfDay' - The hour of the day to end the bandwidth rate limit interval.+--+-- 'endMinuteOfHour', 'bandwidthRateLimitInterval_endMinuteOfHour' - The minute of the hour to end the bandwidth rate limit interval.+--+-- The bandwidth rate limit interval ends at the end of the minute. To end+-- an interval at the end of an hour, use the value @59@.+--+-- 'daysOfWeek', 'bandwidthRateLimitInterval_daysOfWeek' - The days of the week component of the bandwidth rate limit interval,+-- represented as ordinal numbers from 0 to 6, where 0 represents Sunday+-- and 6 represents Saturday.+newBandwidthRateLimitInterval ::+ -- | 'startHourOfDay'+ Prelude.Natural ->+ -- | 'startMinuteOfHour'+ Prelude.Natural ->+ -- | 'endHourOfDay'+ Prelude.Natural ->+ -- | 'endMinuteOfHour'+ Prelude.Natural ->+ -- | 'daysOfWeek'+ Prelude.NonEmpty Prelude.Natural ->+ BandwidthRateLimitInterval+newBandwidthRateLimitInterval+ pStartHourOfDay_+ pStartMinuteOfHour_+ pEndHourOfDay_+ pEndMinuteOfHour_+ pDaysOfWeek_ =+ BandwidthRateLimitInterval'+ { averageDownloadRateLimitInBitsPerSec =+ Prelude.Nothing,+ averageUploadRateLimitInBitsPerSec =+ Prelude.Nothing,+ startHourOfDay = pStartHourOfDay_,+ startMinuteOfHour = pStartMinuteOfHour_,+ endHourOfDay = pEndHourOfDay_,+ endMinuteOfHour = pEndMinuteOfHour_,+ daysOfWeek = Lens.coerced Lens.# pDaysOfWeek_+ }++-- | The average download rate limit component of the bandwidth rate limit+-- interval, in bits per second. This field does not appear in the response+-- if the download rate limit is not set.+bandwidthRateLimitInterval_averageDownloadRateLimitInBitsPerSec :: Lens.Lens' BandwidthRateLimitInterval (Prelude.Maybe Prelude.Natural)+bandwidthRateLimitInterval_averageDownloadRateLimitInBitsPerSec = Lens.lens (\BandwidthRateLimitInterval' {averageDownloadRateLimitInBitsPerSec} -> averageDownloadRateLimitInBitsPerSec) (\s@BandwidthRateLimitInterval' {} a -> s {averageDownloadRateLimitInBitsPerSec = a} :: BandwidthRateLimitInterval)++-- | The average upload rate limit component of the bandwidth rate limit+-- interval, in bits per second. This field does not appear in the response+-- if the upload rate limit is not set.+bandwidthRateLimitInterval_averageUploadRateLimitInBitsPerSec :: Lens.Lens' BandwidthRateLimitInterval (Prelude.Maybe Prelude.Natural)+bandwidthRateLimitInterval_averageUploadRateLimitInBitsPerSec = Lens.lens (\BandwidthRateLimitInterval' {averageUploadRateLimitInBitsPerSec} -> averageUploadRateLimitInBitsPerSec) (\s@BandwidthRateLimitInterval' {} a -> s {averageUploadRateLimitInBitsPerSec = a} :: BandwidthRateLimitInterval)++-- | The hour of the day to start the bandwidth rate limit interval.+bandwidthRateLimitInterval_startHourOfDay :: Lens.Lens' BandwidthRateLimitInterval Prelude.Natural+bandwidthRateLimitInterval_startHourOfDay = Lens.lens (\BandwidthRateLimitInterval' {startHourOfDay} -> startHourOfDay) (\s@BandwidthRateLimitInterval' {} a -> s {startHourOfDay = a} :: BandwidthRateLimitInterval)++-- | The minute of the hour to start the bandwidth rate limit interval. The+-- interval begins at the start of that minute. To begin an interval+-- exactly at the start of the hour, use the value @0@.+bandwidthRateLimitInterval_startMinuteOfHour :: Lens.Lens' BandwidthRateLimitInterval Prelude.Natural+bandwidthRateLimitInterval_startMinuteOfHour = Lens.lens (\BandwidthRateLimitInterval' {startMinuteOfHour} -> startMinuteOfHour) (\s@BandwidthRateLimitInterval' {} a -> s {startMinuteOfHour = a} :: BandwidthRateLimitInterval)++-- | The hour of the day to end the bandwidth rate limit interval.+bandwidthRateLimitInterval_endHourOfDay :: Lens.Lens' BandwidthRateLimitInterval Prelude.Natural+bandwidthRateLimitInterval_endHourOfDay = Lens.lens (\BandwidthRateLimitInterval' {endHourOfDay} -> endHourOfDay) (\s@BandwidthRateLimitInterval' {} a -> s {endHourOfDay = a} :: BandwidthRateLimitInterval)++-- | The minute of the hour to end the bandwidth rate limit interval.+--+-- The bandwidth rate limit interval ends at the end of the minute. To end+-- an interval at the end of an hour, use the value @59@.+bandwidthRateLimitInterval_endMinuteOfHour :: Lens.Lens' BandwidthRateLimitInterval Prelude.Natural+bandwidthRateLimitInterval_endMinuteOfHour = Lens.lens (\BandwidthRateLimitInterval' {endMinuteOfHour} -> endMinuteOfHour) (\s@BandwidthRateLimitInterval' {} a -> s {endMinuteOfHour = a} :: BandwidthRateLimitInterval)++-- | The days of the week component of the bandwidth rate limit interval,+-- represented as ordinal numbers from 0 to 6, where 0 represents Sunday+-- and 6 represents Saturday.+bandwidthRateLimitInterval_daysOfWeek :: Lens.Lens' BandwidthRateLimitInterval (Prelude.NonEmpty Prelude.Natural)+bandwidthRateLimitInterval_daysOfWeek = Lens.lens (\BandwidthRateLimitInterval' {daysOfWeek} -> daysOfWeek) (\s@BandwidthRateLimitInterval' {} a -> s {daysOfWeek = a} :: BandwidthRateLimitInterval) Prelude.. Lens.coerced++instance Data.FromJSON BandwidthRateLimitInterval where+ parseJSON =+ Data.withObject+ "BandwidthRateLimitInterval"+ ( \x ->+ BandwidthRateLimitInterval'+ Prelude.<$> (x Data..:? "AverageDownloadRateLimitInBitsPerSec")+ Prelude.<*> (x Data..:? "AverageUploadRateLimitInBitsPerSec")+ Prelude.<*> (x Data..: "StartHourOfDay")+ Prelude.<*> (x Data..: "StartMinuteOfHour")+ Prelude.<*> (x Data..: "EndHourOfDay")+ Prelude.<*> (x Data..: "EndMinuteOfHour")+ Prelude.<*> (x Data..: "DaysOfWeek")+ )++instance Prelude.Hashable BandwidthRateLimitInterval where+ hashWithSalt _salt BandwidthRateLimitInterval' {..} =+ _salt+ `Prelude.hashWithSalt` averageDownloadRateLimitInBitsPerSec+ `Prelude.hashWithSalt` averageUploadRateLimitInBitsPerSec+ `Prelude.hashWithSalt` startHourOfDay+ `Prelude.hashWithSalt` startMinuteOfHour+ `Prelude.hashWithSalt` endHourOfDay+ `Prelude.hashWithSalt` endMinuteOfHour+ `Prelude.hashWithSalt` daysOfWeek++instance Prelude.NFData BandwidthRateLimitInterval where+ rnf BandwidthRateLimitInterval' {..} =+ Prelude.rnf averageDownloadRateLimitInBitsPerSec+ `Prelude.seq` Prelude.rnf averageUploadRateLimitInBitsPerSec+ `Prelude.seq` Prelude.rnf startHourOfDay+ `Prelude.seq` Prelude.rnf startMinuteOfHour+ `Prelude.seq` Prelude.rnf endHourOfDay+ `Prelude.seq` Prelude.rnf endMinuteOfHour+ `Prelude.seq` Prelude.rnf daysOfWeek++instance Data.ToJSON BandwidthRateLimitInterval where+ toJSON BandwidthRateLimitInterval' {..} =+ Data.object+ ( Prelude.catMaybes+ [ ("AverageDownloadRateLimitInBitsPerSec" Data..=)+ Prelude.<$> averageDownloadRateLimitInBitsPerSec,+ ("AverageUploadRateLimitInBitsPerSec" Data..=)+ Prelude.<$> averageUploadRateLimitInBitsPerSec,+ Prelude.Just+ ("StartHourOfDay" Data..= startHourOfDay),+ Prelude.Just+ ("StartMinuteOfHour" Data..= startMinuteOfHour),+ Prelude.Just ("EndHourOfDay" Data..= endHourOfDay),+ Prelude.Just+ ("EndMinuteOfHour" Data..= endMinuteOfHour),+ Prelude.Just ("DaysOfWeek" Data..= daysOfWeek)+ ]+ )
+ gen/Amazonka/StorageGateway/Types/CacheAttributes.hs view
@@ -0,0 +1,100 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# 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.Types.CacheAttributes+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.StorageGateway.Types.CacheAttributes 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++-- | The refresh cache information for the file share or FSx file systems.+--+-- /See:/ 'newCacheAttributes' smart constructor.+data CacheAttributes = CacheAttributes'+ { -- | Refreshes a file share\'s cache by using Time To Live (TTL). TTL is the+ -- length of time since the last refresh after which access to the+ -- directory would cause the file gateway to first refresh that+ -- directory\'s contents from the Amazon S3 bucket or Amazon FSx file+ -- system. The TTL duration is in seconds.+ --+ -- Valid Values:0, 300 to 2,592,000 seconds (5 minutes to 30 days)+ cacheStaleTimeoutInSeconds :: Prelude.Maybe Prelude.Int+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'CacheAttributes' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'cacheStaleTimeoutInSeconds', 'cacheAttributes_cacheStaleTimeoutInSeconds' - Refreshes a file share\'s cache by using Time To Live (TTL). TTL is the+-- length of time since the last refresh after which access to the+-- directory would cause the file gateway to first refresh that+-- directory\'s contents from the Amazon S3 bucket or Amazon FSx file+-- system. The TTL duration is in seconds.+--+-- Valid Values:0, 300 to 2,592,000 seconds (5 minutes to 30 days)+newCacheAttributes ::+ CacheAttributes+newCacheAttributes =+ CacheAttributes'+ { cacheStaleTimeoutInSeconds =+ Prelude.Nothing+ }++-- | Refreshes a file share\'s cache by using Time To Live (TTL). TTL is the+-- length of time since the last refresh after which access to the+-- directory would cause the file gateway to first refresh that+-- directory\'s contents from the Amazon S3 bucket or Amazon FSx file+-- system. The TTL duration is in seconds.+--+-- Valid Values:0, 300 to 2,592,000 seconds (5 minutes to 30 days)+cacheAttributes_cacheStaleTimeoutInSeconds :: Lens.Lens' CacheAttributes (Prelude.Maybe Prelude.Int)+cacheAttributes_cacheStaleTimeoutInSeconds = Lens.lens (\CacheAttributes' {cacheStaleTimeoutInSeconds} -> cacheStaleTimeoutInSeconds) (\s@CacheAttributes' {} a -> s {cacheStaleTimeoutInSeconds = a} :: CacheAttributes)++instance Data.FromJSON CacheAttributes where+ parseJSON =+ Data.withObject+ "CacheAttributes"+ ( \x ->+ CacheAttributes'+ Prelude.<$> (x Data..:? "CacheStaleTimeoutInSeconds")+ )++instance Prelude.Hashable CacheAttributes where+ hashWithSalt _salt CacheAttributes' {..} =+ _salt+ `Prelude.hashWithSalt` cacheStaleTimeoutInSeconds++instance Prelude.NFData CacheAttributes where+ rnf CacheAttributes' {..} =+ Prelude.rnf cacheStaleTimeoutInSeconds++instance Data.ToJSON CacheAttributes where+ toJSON CacheAttributes' {..} =+ Data.object+ ( Prelude.catMaybes+ [ ("CacheStaleTimeoutInSeconds" Data..=)+ Prelude.<$> cacheStaleTimeoutInSeconds+ ]+ )
+ gen/Amazonka/StorageGateway/Types/CachediSCSIVolume.hs view
@@ -0,0 +1,312 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# 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.Types.CachediSCSIVolume+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.StorageGateway.Types.CachediSCSIVolume 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 Amazonka.StorageGateway.Types.VolumeiSCSIAttributes++-- | Describes an iSCSI cached volume.+--+-- /See:/ 'newCachediSCSIVolume' smart constructor.+data CachediSCSIVolume = CachediSCSIVolume'+ { -- | The date the volume was created. Volumes created prior to March 28, 2017+ -- don’t have this timestamp.+ createdDate :: Prelude.Maybe Data.POSIX,+ kmsKey :: Prelude.Maybe Prelude.Text,+ -- | If the cached volume was created from a snapshot, this field contains+ -- the snapshot ID used, e.g., snap-78e22663. Otherwise, this field is not+ -- included.+ sourceSnapshotId :: Prelude.Maybe Prelude.Text,+ -- | The name of the iSCSI target used by an initiator to connect to a volume+ -- and used as a suffix for the target ARN. For example, specifying+ -- @TargetName@ as /myvolume/ results in the target ARN of+ -- @arn:aws:storagegateway:us-east-2:111122223333:gateway\/sgw-12A3456B\/target\/iqn.1997-05.com.amazon:myvolume@.+ -- The target name must be unique across all volumes on a gateway.+ --+ -- If you don\'t specify a value, Storage Gateway uses the value that was+ -- previously used for this volume as the new target name.+ targetName :: Prelude.Maybe Prelude.Text,+ -- | The Amazon Resource Name (ARN) of the storage volume.+ volumeARN :: Prelude.Maybe Prelude.Text,+ -- | A value that indicates whether a storage volume is attached to or+ -- detached from a gateway. For more information, see+ -- <https://docs.aws.amazon.com/storagegateway/latest/userguide/managing-volumes.html#attach-detach-volume Moving your volumes to a different gateway>.+ volumeAttachmentStatus :: Prelude.Maybe Prelude.Text,+ -- | The unique identifier of the volume, e.g., vol-AE4B946D.+ volumeId :: Prelude.Maybe Prelude.Text,+ -- | Represents the percentage complete if the volume is restoring or+ -- bootstrapping that represents the percent of data transferred. This+ -- field does not appear in the response if the cached volume is not+ -- restoring or bootstrapping.+ volumeProgress :: Prelude.Maybe Prelude.Double,+ -- | The size, in bytes, of the volume capacity.+ volumeSizeInBytes :: Prelude.Maybe Prelude.Integer,+ -- | One of the VolumeStatus values that indicates the state of the storage+ -- volume.+ volumeStatus :: Prelude.Maybe Prelude.Text,+ -- | One of the VolumeType enumeration values that describes the type of the+ -- volume.+ volumeType :: Prelude.Maybe Prelude.Text,+ -- | The size of the data stored on the volume in bytes. This value is+ -- calculated based on the number of blocks that are touched, instead of+ -- the actual amount of data written. This value can be useful for+ -- sequential write patterns but less accurate for random write patterns.+ -- @VolumeUsedInBytes@ is different from the compressed size of the volume,+ -- which is the value that is used to calculate your bill.+ --+ -- This value is not available for volumes created prior to May 13, 2015,+ -- until you store data on the volume.+ --+ -- If you use a delete tool that overwrites the data on your volume with+ -- random data, your usage will not be reduced. This is because the random+ -- data is not compressible. If you want to reduce the amount of billed+ -- storage on your volume, we recommend overwriting your files with zeros+ -- to compress the data to a negligible amount of actual storage.+ volumeUsedInBytes :: Prelude.Maybe Prelude.Integer,+ -- | An VolumeiSCSIAttributes object that represents a collection of iSCSI+ -- attributes for one stored volume.+ volumeiSCSIAttributes :: Prelude.Maybe VolumeiSCSIAttributes+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'CachediSCSIVolume' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'createdDate', 'cachediSCSIVolume_createdDate' - The date the volume was created. Volumes created prior to March 28, 2017+-- don’t have this timestamp.+--+-- 'kmsKey', 'cachediSCSIVolume_kmsKey' - Undocumented member.+--+-- 'sourceSnapshotId', 'cachediSCSIVolume_sourceSnapshotId' - If the cached volume was created from a snapshot, this field contains+-- the snapshot ID used, e.g., snap-78e22663. Otherwise, this field is not+-- included.+--+-- 'targetName', 'cachediSCSIVolume_targetName' - The name of the iSCSI target used by an initiator to connect to a volume+-- and used as a suffix for the target ARN. For example, specifying+-- @TargetName@ as /myvolume/ results in the target ARN of+-- @arn:aws:storagegateway:us-east-2:111122223333:gateway\/sgw-12A3456B\/target\/iqn.1997-05.com.amazon:myvolume@.+-- The target name must be unique across all volumes on a gateway.+--+-- If you don\'t specify a value, Storage Gateway uses the value that was+-- previously used for this volume as the new target name.+--+-- 'volumeARN', 'cachediSCSIVolume_volumeARN' - The Amazon Resource Name (ARN) of the storage volume.+--+-- 'volumeAttachmentStatus', 'cachediSCSIVolume_volumeAttachmentStatus' - A value that indicates whether a storage volume is attached to or+-- detached from a gateway. For more information, see+-- <https://docs.aws.amazon.com/storagegateway/latest/userguide/managing-volumes.html#attach-detach-volume Moving your volumes to a different gateway>.+--+-- 'volumeId', 'cachediSCSIVolume_volumeId' - The unique identifier of the volume, e.g., vol-AE4B946D.+--+-- 'volumeProgress', 'cachediSCSIVolume_volumeProgress' - Represents the percentage complete if the volume is restoring or+-- bootstrapping that represents the percent of data transferred. This+-- field does not appear in the response if the cached volume is not+-- restoring or bootstrapping.+--+-- 'volumeSizeInBytes', 'cachediSCSIVolume_volumeSizeInBytes' - The size, in bytes, of the volume capacity.+--+-- 'volumeStatus', 'cachediSCSIVolume_volumeStatus' - One of the VolumeStatus values that indicates the state of the storage+-- volume.+--+-- 'volumeType', 'cachediSCSIVolume_volumeType' - One of the VolumeType enumeration values that describes the type of the+-- volume.+--+-- 'volumeUsedInBytes', 'cachediSCSIVolume_volumeUsedInBytes' - The size of the data stored on the volume in bytes. This value is+-- calculated based on the number of blocks that are touched, instead of+-- the actual amount of data written. This value can be useful for+-- sequential write patterns but less accurate for random write patterns.+-- @VolumeUsedInBytes@ is different from the compressed size of the volume,+-- which is the value that is used to calculate your bill.+--+-- This value is not available for volumes created prior to May 13, 2015,+-- until you store data on the volume.+--+-- If you use a delete tool that overwrites the data on your volume with+-- random data, your usage will not be reduced. This is because the random+-- data is not compressible. If you want to reduce the amount of billed+-- storage on your volume, we recommend overwriting your files with zeros+-- to compress the data to a negligible amount of actual storage.+--+-- 'volumeiSCSIAttributes', 'cachediSCSIVolume_volumeiSCSIAttributes' - An VolumeiSCSIAttributes object that represents a collection of iSCSI+-- attributes for one stored volume.+newCachediSCSIVolume ::+ CachediSCSIVolume+newCachediSCSIVolume =+ CachediSCSIVolume'+ { createdDate = Prelude.Nothing,+ kmsKey = Prelude.Nothing,+ sourceSnapshotId = Prelude.Nothing,+ targetName = Prelude.Nothing,+ volumeARN = Prelude.Nothing,+ volumeAttachmentStatus = Prelude.Nothing,+ volumeId = Prelude.Nothing,+ volumeProgress = Prelude.Nothing,+ volumeSizeInBytes = Prelude.Nothing,+ volumeStatus = Prelude.Nothing,+ volumeType = Prelude.Nothing,+ volumeUsedInBytes = Prelude.Nothing,+ volumeiSCSIAttributes = Prelude.Nothing+ }++-- | The date the volume was created. Volumes created prior to March 28, 2017+-- don’t have this timestamp.+cachediSCSIVolume_createdDate :: Lens.Lens' CachediSCSIVolume (Prelude.Maybe Prelude.UTCTime)+cachediSCSIVolume_createdDate = Lens.lens (\CachediSCSIVolume' {createdDate} -> createdDate) (\s@CachediSCSIVolume' {} a -> s {createdDate = a} :: CachediSCSIVolume) Prelude.. Lens.mapping Data._Time++-- | Undocumented member.+cachediSCSIVolume_kmsKey :: Lens.Lens' CachediSCSIVolume (Prelude.Maybe Prelude.Text)+cachediSCSIVolume_kmsKey = Lens.lens (\CachediSCSIVolume' {kmsKey} -> kmsKey) (\s@CachediSCSIVolume' {} a -> s {kmsKey = a} :: CachediSCSIVolume)++-- | If the cached volume was created from a snapshot, this field contains+-- the snapshot ID used, e.g., snap-78e22663. Otherwise, this field is not+-- included.+cachediSCSIVolume_sourceSnapshotId :: Lens.Lens' CachediSCSIVolume (Prelude.Maybe Prelude.Text)+cachediSCSIVolume_sourceSnapshotId = Lens.lens (\CachediSCSIVolume' {sourceSnapshotId} -> sourceSnapshotId) (\s@CachediSCSIVolume' {} a -> s {sourceSnapshotId = a} :: CachediSCSIVolume)++-- | The name of the iSCSI target used by an initiator to connect to a volume+-- and used as a suffix for the target ARN. For example, specifying+-- @TargetName@ as /myvolume/ results in the target ARN of+-- @arn:aws:storagegateway:us-east-2:111122223333:gateway\/sgw-12A3456B\/target\/iqn.1997-05.com.amazon:myvolume@.+-- The target name must be unique across all volumes on a gateway.+--+-- If you don\'t specify a value, Storage Gateway uses the value that was+-- previously used for this volume as the new target name.+cachediSCSIVolume_targetName :: Lens.Lens' CachediSCSIVolume (Prelude.Maybe Prelude.Text)+cachediSCSIVolume_targetName = Lens.lens (\CachediSCSIVolume' {targetName} -> targetName) (\s@CachediSCSIVolume' {} a -> s {targetName = a} :: CachediSCSIVolume)++-- | The Amazon Resource Name (ARN) of the storage volume.+cachediSCSIVolume_volumeARN :: Lens.Lens' CachediSCSIVolume (Prelude.Maybe Prelude.Text)+cachediSCSIVolume_volumeARN = Lens.lens (\CachediSCSIVolume' {volumeARN} -> volumeARN) (\s@CachediSCSIVolume' {} a -> s {volumeARN = a} :: CachediSCSIVolume)++-- | A value that indicates whether a storage volume is attached to or+-- detached from a gateway. For more information, see+-- <https://docs.aws.amazon.com/storagegateway/latest/userguide/managing-volumes.html#attach-detach-volume Moving your volumes to a different gateway>.+cachediSCSIVolume_volumeAttachmentStatus :: Lens.Lens' CachediSCSIVolume (Prelude.Maybe Prelude.Text)+cachediSCSIVolume_volumeAttachmentStatus = Lens.lens (\CachediSCSIVolume' {volumeAttachmentStatus} -> volumeAttachmentStatus) (\s@CachediSCSIVolume' {} a -> s {volumeAttachmentStatus = a} :: CachediSCSIVolume)++-- | The unique identifier of the volume, e.g., vol-AE4B946D.+cachediSCSIVolume_volumeId :: Lens.Lens' CachediSCSIVolume (Prelude.Maybe Prelude.Text)+cachediSCSIVolume_volumeId = Lens.lens (\CachediSCSIVolume' {volumeId} -> volumeId) (\s@CachediSCSIVolume' {} a -> s {volumeId = a} :: CachediSCSIVolume)++-- | Represents the percentage complete if the volume is restoring or+-- bootstrapping that represents the percent of data transferred. This+-- field does not appear in the response if the cached volume is not+-- restoring or bootstrapping.+cachediSCSIVolume_volumeProgress :: Lens.Lens' CachediSCSIVolume (Prelude.Maybe Prelude.Double)+cachediSCSIVolume_volumeProgress = Lens.lens (\CachediSCSIVolume' {volumeProgress} -> volumeProgress) (\s@CachediSCSIVolume' {} a -> s {volumeProgress = a} :: CachediSCSIVolume)++-- | The size, in bytes, of the volume capacity.+cachediSCSIVolume_volumeSizeInBytes :: Lens.Lens' CachediSCSIVolume (Prelude.Maybe Prelude.Integer)+cachediSCSIVolume_volumeSizeInBytes = Lens.lens (\CachediSCSIVolume' {volumeSizeInBytes} -> volumeSizeInBytes) (\s@CachediSCSIVolume' {} a -> s {volumeSizeInBytes = a} :: CachediSCSIVolume)++-- | One of the VolumeStatus values that indicates the state of the storage+-- volume.+cachediSCSIVolume_volumeStatus :: Lens.Lens' CachediSCSIVolume (Prelude.Maybe Prelude.Text)+cachediSCSIVolume_volumeStatus = Lens.lens (\CachediSCSIVolume' {volumeStatus} -> volumeStatus) (\s@CachediSCSIVolume' {} a -> s {volumeStatus = a} :: CachediSCSIVolume)++-- | One of the VolumeType enumeration values that describes the type of the+-- volume.+cachediSCSIVolume_volumeType :: Lens.Lens' CachediSCSIVolume (Prelude.Maybe Prelude.Text)+cachediSCSIVolume_volumeType = Lens.lens (\CachediSCSIVolume' {volumeType} -> volumeType) (\s@CachediSCSIVolume' {} a -> s {volumeType = a} :: CachediSCSIVolume)++-- | The size of the data stored on the volume in bytes. This value is+-- calculated based on the number of blocks that are touched, instead of+-- the actual amount of data written. This value can be useful for+-- sequential write patterns but less accurate for random write patterns.+-- @VolumeUsedInBytes@ is different from the compressed size of the volume,+-- which is the value that is used to calculate your bill.+--+-- This value is not available for volumes created prior to May 13, 2015,+-- until you store data on the volume.+--+-- If you use a delete tool that overwrites the data on your volume with+-- random data, your usage will not be reduced. This is because the random+-- data is not compressible. If you want to reduce the amount of billed+-- storage on your volume, we recommend overwriting your files with zeros+-- to compress the data to a negligible amount of actual storage.+cachediSCSIVolume_volumeUsedInBytes :: Lens.Lens' CachediSCSIVolume (Prelude.Maybe Prelude.Integer)+cachediSCSIVolume_volumeUsedInBytes = Lens.lens (\CachediSCSIVolume' {volumeUsedInBytes} -> volumeUsedInBytes) (\s@CachediSCSIVolume' {} a -> s {volumeUsedInBytes = a} :: CachediSCSIVolume)++-- | An VolumeiSCSIAttributes object that represents a collection of iSCSI+-- attributes for one stored volume.+cachediSCSIVolume_volumeiSCSIAttributes :: Lens.Lens' CachediSCSIVolume (Prelude.Maybe VolumeiSCSIAttributes)+cachediSCSIVolume_volumeiSCSIAttributes = Lens.lens (\CachediSCSIVolume' {volumeiSCSIAttributes} -> volumeiSCSIAttributes) (\s@CachediSCSIVolume' {} a -> s {volumeiSCSIAttributes = a} :: CachediSCSIVolume)++instance Data.FromJSON CachediSCSIVolume where+ parseJSON =+ Data.withObject+ "CachediSCSIVolume"+ ( \x ->+ CachediSCSIVolume'+ Prelude.<$> (x Data..:? "CreatedDate")+ Prelude.<*> (x Data..:? "KMSKey")+ Prelude.<*> (x Data..:? "SourceSnapshotId")+ Prelude.<*> (x Data..:? "TargetName")+ Prelude.<*> (x Data..:? "VolumeARN")+ Prelude.<*> (x Data..:? "VolumeAttachmentStatus")+ Prelude.<*> (x Data..:? "VolumeId")+ Prelude.<*> (x Data..:? "VolumeProgress")+ Prelude.<*> (x Data..:? "VolumeSizeInBytes")+ Prelude.<*> (x Data..:? "VolumeStatus")+ Prelude.<*> (x Data..:? "VolumeType")+ Prelude.<*> (x Data..:? "VolumeUsedInBytes")+ Prelude.<*> (x Data..:? "VolumeiSCSIAttributes")+ )++instance Prelude.Hashable CachediSCSIVolume where+ hashWithSalt _salt CachediSCSIVolume' {..} =+ _salt+ `Prelude.hashWithSalt` createdDate+ `Prelude.hashWithSalt` kmsKey+ `Prelude.hashWithSalt` sourceSnapshotId+ `Prelude.hashWithSalt` targetName+ `Prelude.hashWithSalt` volumeARN+ `Prelude.hashWithSalt` volumeAttachmentStatus+ `Prelude.hashWithSalt` volumeId+ `Prelude.hashWithSalt` volumeProgress+ `Prelude.hashWithSalt` volumeSizeInBytes+ `Prelude.hashWithSalt` volumeStatus+ `Prelude.hashWithSalt` volumeType+ `Prelude.hashWithSalt` volumeUsedInBytes+ `Prelude.hashWithSalt` volumeiSCSIAttributes++instance Prelude.NFData CachediSCSIVolume where+ rnf CachediSCSIVolume' {..} =+ Prelude.rnf createdDate+ `Prelude.seq` Prelude.rnf kmsKey+ `Prelude.seq` Prelude.rnf sourceSnapshotId+ `Prelude.seq` Prelude.rnf targetName+ `Prelude.seq` Prelude.rnf volumeARN+ `Prelude.seq` Prelude.rnf volumeAttachmentStatus+ `Prelude.seq` Prelude.rnf volumeId+ `Prelude.seq` Prelude.rnf volumeProgress+ `Prelude.seq` Prelude.rnf volumeSizeInBytes+ `Prelude.seq` Prelude.rnf volumeStatus+ `Prelude.seq` Prelude.rnf volumeType+ `Prelude.seq` Prelude.rnf volumeUsedInBytes+ `Prelude.seq` Prelude.rnf volumeiSCSIAttributes
+ gen/Amazonka/StorageGateway/Types/CaseSensitivity.hs view
@@ -0,0 +1,71 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE GeneralizedNewtypeDeriving #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module : Amazonka.StorageGateway.Types.CaseSensitivity+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.StorageGateway.Types.CaseSensitivity+ ( CaseSensitivity+ ( ..,+ CaseSensitivity_CaseSensitive,+ CaseSensitivity_ClientSpecified+ ),+ )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Data as Data+import qualified Amazonka.Prelude as Prelude++newtype CaseSensitivity = CaseSensitivity'+ { fromCaseSensitivity ::+ Data.Text+ }+ deriving stock+ ( Prelude.Show,+ Prelude.Read,+ Prelude.Eq,+ Prelude.Ord,+ Prelude.Generic+ )+ deriving newtype+ ( Prelude.Hashable,+ Prelude.NFData,+ Data.FromText,+ Data.ToText,+ Data.ToByteString,+ Data.ToLog,+ Data.ToHeader,+ Data.ToQuery,+ Data.FromJSON,+ Data.FromJSONKey,+ Data.ToJSON,+ Data.ToJSONKey,+ Data.FromXML,+ Data.ToXML+ )++pattern CaseSensitivity_CaseSensitive :: CaseSensitivity+pattern CaseSensitivity_CaseSensitive = CaseSensitivity' "CaseSensitive"++pattern CaseSensitivity_ClientSpecified :: CaseSensitivity+pattern CaseSensitivity_ClientSpecified = CaseSensitivity' "ClientSpecified"++{-# COMPLETE+ CaseSensitivity_CaseSensitive,+ CaseSensitivity_ClientSpecified,+ CaseSensitivity'+ #-}
+ gen/Amazonka/StorageGateway/Types/ChapInfo.hs view
@@ -0,0 +1,124 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# 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.Types.ChapInfo+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.StorageGateway.Types.ChapInfo 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++-- | Describes Challenge-Handshake Authentication Protocol (CHAP) information+-- that supports authentication between your gateway and iSCSI initiators.+--+-- /See:/ 'newChapInfo' smart constructor.+data ChapInfo = ChapInfo'+ { -- | The iSCSI initiator that connects to the target.+ initiatorName :: Prelude.Maybe Prelude.Text,+ -- | The secret key that the initiator (for example, the Windows client) must+ -- provide to participate in mutual CHAP with the target.+ secretToAuthenticateInitiator :: Prelude.Maybe (Data.Sensitive Prelude.Text),+ -- | The secret key that the target must provide to participate in mutual+ -- CHAP with the initiator (e.g., Windows client).+ secretToAuthenticateTarget :: Prelude.Maybe (Data.Sensitive Prelude.Text),+ -- | The Amazon Resource Name (ARN) of the volume.+ --+ -- Valid Values: 50 to 500 lowercase letters, numbers, periods (.), and+ -- hyphens (-).+ targetARN :: Prelude.Maybe Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'ChapInfo' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'initiatorName', 'chapInfo_initiatorName' - The iSCSI initiator that connects to the target.+--+-- 'secretToAuthenticateInitiator', 'chapInfo_secretToAuthenticateInitiator' - The secret key that the initiator (for example, the Windows client) must+-- provide to participate in mutual CHAP with the target.+--+-- 'secretToAuthenticateTarget', 'chapInfo_secretToAuthenticateTarget' - The secret key that the target must provide to participate in mutual+-- CHAP with the initiator (e.g., Windows client).+--+-- 'targetARN', 'chapInfo_targetARN' - The Amazon Resource Name (ARN) of the volume.+--+-- Valid Values: 50 to 500 lowercase letters, numbers, periods (.), and+-- hyphens (-).+newChapInfo ::+ ChapInfo+newChapInfo =+ ChapInfo'+ { initiatorName = Prelude.Nothing,+ secretToAuthenticateInitiator = Prelude.Nothing,+ secretToAuthenticateTarget = Prelude.Nothing,+ targetARN = Prelude.Nothing+ }++-- | The iSCSI initiator that connects to the target.+chapInfo_initiatorName :: Lens.Lens' ChapInfo (Prelude.Maybe Prelude.Text)+chapInfo_initiatorName = Lens.lens (\ChapInfo' {initiatorName} -> initiatorName) (\s@ChapInfo' {} a -> s {initiatorName = a} :: ChapInfo)++-- | The secret key that the initiator (for example, the Windows client) must+-- provide to participate in mutual CHAP with the target.+chapInfo_secretToAuthenticateInitiator :: Lens.Lens' ChapInfo (Prelude.Maybe Prelude.Text)+chapInfo_secretToAuthenticateInitiator = Lens.lens (\ChapInfo' {secretToAuthenticateInitiator} -> secretToAuthenticateInitiator) (\s@ChapInfo' {} a -> s {secretToAuthenticateInitiator = a} :: ChapInfo) Prelude.. Lens.mapping Data._Sensitive++-- | The secret key that the target must provide to participate in mutual+-- CHAP with the initiator (e.g., Windows client).+chapInfo_secretToAuthenticateTarget :: Lens.Lens' ChapInfo (Prelude.Maybe Prelude.Text)+chapInfo_secretToAuthenticateTarget = Lens.lens (\ChapInfo' {secretToAuthenticateTarget} -> secretToAuthenticateTarget) (\s@ChapInfo' {} a -> s {secretToAuthenticateTarget = a} :: ChapInfo) Prelude.. Lens.mapping Data._Sensitive++-- | The Amazon Resource Name (ARN) of the volume.+--+-- Valid Values: 50 to 500 lowercase letters, numbers, periods (.), and+-- hyphens (-).+chapInfo_targetARN :: Lens.Lens' ChapInfo (Prelude.Maybe Prelude.Text)+chapInfo_targetARN = Lens.lens (\ChapInfo' {targetARN} -> targetARN) (\s@ChapInfo' {} a -> s {targetARN = a} :: ChapInfo)++instance Data.FromJSON ChapInfo where+ parseJSON =+ Data.withObject+ "ChapInfo"+ ( \x ->+ ChapInfo'+ Prelude.<$> (x Data..:? "InitiatorName")+ Prelude.<*> (x Data..:? "SecretToAuthenticateInitiator")+ Prelude.<*> (x Data..:? "SecretToAuthenticateTarget")+ Prelude.<*> (x Data..:? "TargetARN")+ )++instance Prelude.Hashable ChapInfo where+ hashWithSalt _salt ChapInfo' {..} =+ _salt+ `Prelude.hashWithSalt` initiatorName+ `Prelude.hashWithSalt` secretToAuthenticateInitiator+ `Prelude.hashWithSalt` secretToAuthenticateTarget+ `Prelude.hashWithSalt` targetARN++instance Prelude.NFData ChapInfo where+ rnf ChapInfo' {..} =+ Prelude.rnf initiatorName+ `Prelude.seq` Prelude.rnf secretToAuthenticateInitiator+ `Prelude.seq` Prelude.rnf secretToAuthenticateTarget+ `Prelude.seq` Prelude.rnf targetARN
+ gen/Amazonka/StorageGateway/Types/DeviceiSCSIAttributes.hs view
@@ -0,0 +1,112 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# 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.Types.DeviceiSCSIAttributes+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.StorageGateway.Types.DeviceiSCSIAttributes 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++-- | Lists iSCSI information about a VTL device.+--+-- /See:/ 'newDeviceiSCSIAttributes' smart constructor.+data DeviceiSCSIAttributes = DeviceiSCSIAttributes'+ { -- | Indicates whether mutual CHAP is enabled for the iSCSI target.+ chapEnabled :: Prelude.Maybe Prelude.Bool,+ -- | The network interface identifier of the VTL device.+ networkInterfaceId :: Prelude.Maybe Prelude.Text,+ -- | The port used to communicate with iSCSI VTL device targets.+ networkInterfacePort :: Prelude.Maybe Prelude.Int,+ -- | Specifies the unique Amazon Resource Name (ARN) that encodes the iSCSI+ -- qualified name(iqn) of a tape drive or media changer target.+ targetARN :: Prelude.Maybe Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'DeviceiSCSIAttributes' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'chapEnabled', 'deviceiSCSIAttributes_chapEnabled' - Indicates whether mutual CHAP is enabled for the iSCSI target.+--+-- 'networkInterfaceId', 'deviceiSCSIAttributes_networkInterfaceId' - The network interface identifier of the VTL device.+--+-- 'networkInterfacePort', 'deviceiSCSIAttributes_networkInterfacePort' - The port used to communicate with iSCSI VTL device targets.+--+-- 'targetARN', 'deviceiSCSIAttributes_targetARN' - Specifies the unique Amazon Resource Name (ARN) that encodes the iSCSI+-- qualified name(iqn) of a tape drive or media changer target.+newDeviceiSCSIAttributes ::+ DeviceiSCSIAttributes+newDeviceiSCSIAttributes =+ DeviceiSCSIAttributes'+ { chapEnabled =+ Prelude.Nothing,+ networkInterfaceId = Prelude.Nothing,+ networkInterfacePort = Prelude.Nothing,+ targetARN = Prelude.Nothing+ }++-- | Indicates whether mutual CHAP is enabled for the iSCSI target.+deviceiSCSIAttributes_chapEnabled :: Lens.Lens' DeviceiSCSIAttributes (Prelude.Maybe Prelude.Bool)+deviceiSCSIAttributes_chapEnabled = Lens.lens (\DeviceiSCSIAttributes' {chapEnabled} -> chapEnabled) (\s@DeviceiSCSIAttributes' {} a -> s {chapEnabled = a} :: DeviceiSCSIAttributes)++-- | The network interface identifier of the VTL device.+deviceiSCSIAttributes_networkInterfaceId :: Lens.Lens' DeviceiSCSIAttributes (Prelude.Maybe Prelude.Text)+deviceiSCSIAttributes_networkInterfaceId = Lens.lens (\DeviceiSCSIAttributes' {networkInterfaceId} -> networkInterfaceId) (\s@DeviceiSCSIAttributes' {} a -> s {networkInterfaceId = a} :: DeviceiSCSIAttributes)++-- | The port used to communicate with iSCSI VTL device targets.+deviceiSCSIAttributes_networkInterfacePort :: Lens.Lens' DeviceiSCSIAttributes (Prelude.Maybe Prelude.Int)+deviceiSCSIAttributes_networkInterfacePort = Lens.lens (\DeviceiSCSIAttributes' {networkInterfacePort} -> networkInterfacePort) (\s@DeviceiSCSIAttributes' {} a -> s {networkInterfacePort = a} :: DeviceiSCSIAttributes)++-- | Specifies the unique Amazon Resource Name (ARN) that encodes the iSCSI+-- qualified name(iqn) of a tape drive or media changer target.+deviceiSCSIAttributes_targetARN :: Lens.Lens' DeviceiSCSIAttributes (Prelude.Maybe Prelude.Text)+deviceiSCSIAttributes_targetARN = Lens.lens (\DeviceiSCSIAttributes' {targetARN} -> targetARN) (\s@DeviceiSCSIAttributes' {} a -> s {targetARN = a} :: DeviceiSCSIAttributes)++instance Data.FromJSON DeviceiSCSIAttributes where+ parseJSON =+ Data.withObject+ "DeviceiSCSIAttributes"+ ( \x ->+ DeviceiSCSIAttributes'+ Prelude.<$> (x Data..:? "ChapEnabled")+ Prelude.<*> (x Data..:? "NetworkInterfaceId")+ Prelude.<*> (x Data..:? "NetworkInterfacePort")+ Prelude.<*> (x Data..:? "TargetARN")+ )++instance Prelude.Hashable DeviceiSCSIAttributes where+ hashWithSalt _salt DeviceiSCSIAttributes' {..} =+ _salt+ `Prelude.hashWithSalt` chapEnabled+ `Prelude.hashWithSalt` networkInterfaceId+ `Prelude.hashWithSalt` networkInterfacePort+ `Prelude.hashWithSalt` targetARN++instance Prelude.NFData DeviceiSCSIAttributes where+ rnf DeviceiSCSIAttributes' {..} =+ Prelude.rnf chapEnabled+ `Prelude.seq` Prelude.rnf networkInterfaceId+ `Prelude.seq` Prelude.rnf networkInterfacePort+ `Prelude.seq` Prelude.rnf targetARN
+ gen/Amazonka/StorageGateway/Types/Disk.hs view
@@ -0,0 +1,172 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# 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.Types.Disk+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.StorageGateway.Types.Disk 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++-- | Represents a gateway\'s local disk.+--+-- /See:/ 'newDisk' smart constructor.+data Disk = Disk'+ { -- | The iSCSI qualified name (IQN) that is defined for a disk. This field is+ -- not included in the response if the local disk is not defined as an+ -- iSCSI target. The format of this field is+ -- /targetIqn::LUNNumber::region-volumeId/.+ diskAllocationResource :: Prelude.Maybe Prelude.Text,+ diskAllocationType :: Prelude.Maybe Prelude.Text,+ diskAttributeList :: Prelude.Maybe [Prelude.Text],+ -- | The unique device ID or other distinguishing data that identifies a+ -- local disk.+ diskId :: Prelude.Maybe Prelude.Text,+ -- | The device node of a local disk as assigned by the virtualization+ -- environment.+ diskNode :: Prelude.Maybe Prelude.Text,+ -- | The path of a local disk in the gateway virtual machine (VM).+ diskPath :: Prelude.Maybe Prelude.Text,+ -- | The local disk size in bytes.+ diskSizeInBytes :: Prelude.Maybe Prelude.Integer,+ -- | A value that represents the status of a local disk.+ diskStatus :: Prelude.Maybe Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'Disk' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'diskAllocationResource', 'disk_diskAllocationResource' - The iSCSI qualified name (IQN) that is defined for a disk. This field is+-- not included in the response if the local disk is not defined as an+-- iSCSI target. The format of this field is+-- /targetIqn::LUNNumber::region-volumeId/.+--+-- 'diskAllocationType', 'disk_diskAllocationType' - Undocumented member.+--+-- 'diskAttributeList', 'disk_diskAttributeList' - Undocumented member.+--+-- 'diskId', 'disk_diskId' - The unique device ID or other distinguishing data that identifies a+-- local disk.+--+-- 'diskNode', 'disk_diskNode' - The device node of a local disk as assigned by the virtualization+-- environment.+--+-- 'diskPath', 'disk_diskPath' - The path of a local disk in the gateway virtual machine (VM).+--+-- 'diskSizeInBytes', 'disk_diskSizeInBytes' - The local disk size in bytes.+--+-- 'diskStatus', 'disk_diskStatus' - A value that represents the status of a local disk.+newDisk ::+ Disk+newDisk =+ Disk'+ { diskAllocationResource = Prelude.Nothing,+ diskAllocationType = Prelude.Nothing,+ diskAttributeList = Prelude.Nothing,+ diskId = Prelude.Nothing,+ diskNode = Prelude.Nothing,+ diskPath = Prelude.Nothing,+ diskSizeInBytes = Prelude.Nothing,+ diskStatus = Prelude.Nothing+ }++-- | The iSCSI qualified name (IQN) that is defined for a disk. This field is+-- not included in the response if the local disk is not defined as an+-- iSCSI target. The format of this field is+-- /targetIqn::LUNNumber::region-volumeId/.+disk_diskAllocationResource :: Lens.Lens' Disk (Prelude.Maybe Prelude.Text)+disk_diskAllocationResource = Lens.lens (\Disk' {diskAllocationResource} -> diskAllocationResource) (\s@Disk' {} a -> s {diskAllocationResource = a} :: Disk)++-- | Undocumented member.+disk_diskAllocationType :: Lens.Lens' Disk (Prelude.Maybe Prelude.Text)+disk_diskAllocationType = Lens.lens (\Disk' {diskAllocationType} -> diskAllocationType) (\s@Disk' {} a -> s {diskAllocationType = a} :: Disk)++-- | Undocumented member.+disk_diskAttributeList :: Lens.Lens' Disk (Prelude.Maybe [Prelude.Text])+disk_diskAttributeList = Lens.lens (\Disk' {diskAttributeList} -> diskAttributeList) (\s@Disk' {} a -> s {diskAttributeList = a} :: Disk) Prelude.. Lens.mapping Lens.coerced++-- | The unique device ID or other distinguishing data that identifies a+-- local disk.+disk_diskId :: Lens.Lens' Disk (Prelude.Maybe Prelude.Text)+disk_diskId = Lens.lens (\Disk' {diskId} -> diskId) (\s@Disk' {} a -> s {diskId = a} :: Disk)++-- | The device node of a local disk as assigned by the virtualization+-- environment.+disk_diskNode :: Lens.Lens' Disk (Prelude.Maybe Prelude.Text)+disk_diskNode = Lens.lens (\Disk' {diskNode} -> diskNode) (\s@Disk' {} a -> s {diskNode = a} :: Disk)++-- | The path of a local disk in the gateway virtual machine (VM).+disk_diskPath :: Lens.Lens' Disk (Prelude.Maybe Prelude.Text)+disk_diskPath = Lens.lens (\Disk' {diskPath} -> diskPath) (\s@Disk' {} a -> s {diskPath = a} :: Disk)++-- | The local disk size in bytes.+disk_diskSizeInBytes :: Lens.Lens' Disk (Prelude.Maybe Prelude.Integer)+disk_diskSizeInBytes = Lens.lens (\Disk' {diskSizeInBytes} -> diskSizeInBytes) (\s@Disk' {} a -> s {diskSizeInBytes = a} :: Disk)++-- | A value that represents the status of a local disk.+disk_diskStatus :: Lens.Lens' Disk (Prelude.Maybe Prelude.Text)+disk_diskStatus = Lens.lens (\Disk' {diskStatus} -> diskStatus) (\s@Disk' {} a -> s {diskStatus = a} :: Disk)++instance Data.FromJSON Disk where+ parseJSON =+ Data.withObject+ "Disk"+ ( \x ->+ Disk'+ Prelude.<$> (x Data..:? "DiskAllocationResource")+ Prelude.<*> (x Data..:? "DiskAllocationType")+ Prelude.<*> ( x+ Data..:? "DiskAttributeList"+ Data..!= Prelude.mempty+ )+ Prelude.<*> (x Data..:? "DiskId")+ Prelude.<*> (x Data..:? "DiskNode")+ Prelude.<*> (x Data..:? "DiskPath")+ Prelude.<*> (x Data..:? "DiskSizeInBytes")+ Prelude.<*> (x Data..:? "DiskStatus")+ )++instance Prelude.Hashable Disk where+ hashWithSalt _salt Disk' {..} =+ _salt+ `Prelude.hashWithSalt` diskAllocationResource+ `Prelude.hashWithSalt` diskAllocationType+ `Prelude.hashWithSalt` diskAttributeList+ `Prelude.hashWithSalt` diskId+ `Prelude.hashWithSalt` diskNode+ `Prelude.hashWithSalt` diskPath+ `Prelude.hashWithSalt` diskSizeInBytes+ `Prelude.hashWithSalt` diskStatus++instance Prelude.NFData Disk where+ rnf Disk' {..} =+ Prelude.rnf diskAllocationResource+ `Prelude.seq` Prelude.rnf diskAllocationType+ `Prelude.seq` Prelude.rnf diskAttributeList+ `Prelude.seq` Prelude.rnf diskId+ `Prelude.seq` Prelude.rnf diskNode+ `Prelude.seq` Prelude.rnf diskPath+ `Prelude.seq` Prelude.rnf diskSizeInBytes+ `Prelude.seq` Prelude.rnf diskStatus
+ gen/Amazonka/StorageGateway/Types/EndpointNetworkConfiguration.hs view
@@ -0,0 +1,95 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# 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.Types.EndpointNetworkConfiguration+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.StorageGateway.Types.EndpointNetworkConfiguration 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++-- | Specifies network configuration information for the gateway associated+-- with the Amazon FSx file system.+--+-- /See:/ 'newEndpointNetworkConfiguration' smart constructor.+data EndpointNetworkConfiguration = EndpointNetworkConfiguration'+ { -- | A list of gateway IP addresses on which the associated Amazon FSx file+ -- system is available.+ --+ -- If multiple file systems are associated with this gateway, this field is+ -- required.+ ipAddresses :: Prelude.Maybe [Prelude.Text]+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'EndpointNetworkConfiguration' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'ipAddresses', 'endpointNetworkConfiguration_ipAddresses' - A list of gateway IP addresses on which the associated Amazon FSx file+-- system is available.+--+-- If multiple file systems are associated with this gateway, this field is+-- required.+newEndpointNetworkConfiguration ::+ EndpointNetworkConfiguration+newEndpointNetworkConfiguration =+ EndpointNetworkConfiguration'+ { ipAddresses =+ Prelude.Nothing+ }++-- | A list of gateway IP addresses on which the associated Amazon FSx file+-- system is available.+--+-- If multiple file systems are associated with this gateway, this field is+-- required.+endpointNetworkConfiguration_ipAddresses :: Lens.Lens' EndpointNetworkConfiguration (Prelude.Maybe [Prelude.Text])+endpointNetworkConfiguration_ipAddresses = Lens.lens (\EndpointNetworkConfiguration' {ipAddresses} -> ipAddresses) (\s@EndpointNetworkConfiguration' {} a -> s {ipAddresses = a} :: EndpointNetworkConfiguration) Prelude.. Lens.mapping Lens.coerced++instance Data.FromJSON EndpointNetworkConfiguration where+ parseJSON =+ Data.withObject+ "EndpointNetworkConfiguration"+ ( \x ->+ EndpointNetworkConfiguration'+ Prelude.<$> (x Data..:? "IpAddresses" Data..!= Prelude.mempty)+ )++instance+ Prelude.Hashable+ EndpointNetworkConfiguration+ where+ hashWithSalt _salt EndpointNetworkConfiguration' {..} =+ _salt `Prelude.hashWithSalt` ipAddresses++instance Prelude.NFData EndpointNetworkConfiguration where+ rnf EndpointNetworkConfiguration' {..} =+ Prelude.rnf ipAddresses++instance Data.ToJSON EndpointNetworkConfiguration where+ toJSON EndpointNetworkConfiguration' {..} =+ Data.object+ ( Prelude.catMaybes+ [("IpAddresses" Data..=) Prelude.<$> ipAddresses]+ )
@@ -0,0 +1,116 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# 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.Types.FileShareInfo+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.StorageGateway.Types.FileShareInfo 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 Amazonka.StorageGateway.Types.FileShareType++-- | Describes a file share. Only supported S3 File Gateway.+--+-- /See:/ 'newFileShareInfo' smart constructor.+data FileShareInfo = FileShareInfo'+ { fileShareARN :: Prelude.Maybe Prelude.Text,+ fileShareId :: Prelude.Maybe Prelude.Text,+ fileShareStatus :: Prelude.Maybe Prelude.Text,+ fileShareType :: Prelude.Maybe FileShareType,+ gatewayARN :: Prelude.Maybe Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'FileShareInfo' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'fileShareARN', 'fileShareInfo_fileShareARN' - Undocumented member.+--+-- 'fileShareId', 'fileShareInfo_fileShareId' - Undocumented member.+--+-- 'fileShareStatus', 'fileShareInfo_fileShareStatus' - Undocumented member.+--+-- 'fileShareType', 'fileShareInfo_fileShareType' - Undocumented member.+--+-- 'gatewayARN', 'fileShareInfo_gatewayARN' - Undocumented member.+newFileShareInfo ::+ FileShareInfo+newFileShareInfo =+ FileShareInfo'+ { fileShareARN = Prelude.Nothing,+ fileShareId = Prelude.Nothing,+ fileShareStatus = Prelude.Nothing,+ fileShareType = Prelude.Nothing,+ gatewayARN = Prelude.Nothing+ }++-- | Undocumented member.+fileShareInfo_fileShareARN :: Lens.Lens' FileShareInfo (Prelude.Maybe Prelude.Text)+fileShareInfo_fileShareARN = Lens.lens (\FileShareInfo' {fileShareARN} -> fileShareARN) (\s@FileShareInfo' {} a -> s {fileShareARN = a} :: FileShareInfo)++-- | Undocumented member.+fileShareInfo_fileShareId :: Lens.Lens' FileShareInfo (Prelude.Maybe Prelude.Text)+fileShareInfo_fileShareId = Lens.lens (\FileShareInfo' {fileShareId} -> fileShareId) (\s@FileShareInfo' {} a -> s {fileShareId = a} :: FileShareInfo)++-- | Undocumented member.+fileShareInfo_fileShareStatus :: Lens.Lens' FileShareInfo (Prelude.Maybe Prelude.Text)+fileShareInfo_fileShareStatus = Lens.lens (\FileShareInfo' {fileShareStatus} -> fileShareStatus) (\s@FileShareInfo' {} a -> s {fileShareStatus = a} :: FileShareInfo)++-- | Undocumented member.+fileShareInfo_fileShareType :: Lens.Lens' FileShareInfo (Prelude.Maybe FileShareType)+fileShareInfo_fileShareType = Lens.lens (\FileShareInfo' {fileShareType} -> fileShareType) (\s@FileShareInfo' {} a -> s {fileShareType = a} :: FileShareInfo)++-- | Undocumented member.+fileShareInfo_gatewayARN :: Lens.Lens' FileShareInfo (Prelude.Maybe Prelude.Text)+fileShareInfo_gatewayARN = Lens.lens (\FileShareInfo' {gatewayARN} -> gatewayARN) (\s@FileShareInfo' {} a -> s {gatewayARN = a} :: FileShareInfo)++instance Data.FromJSON FileShareInfo where+ parseJSON =+ Data.withObject+ "FileShareInfo"+ ( \x ->+ FileShareInfo'+ Prelude.<$> (x Data..:? "FileShareARN")+ Prelude.<*> (x Data..:? "FileShareId")+ Prelude.<*> (x Data..:? "FileShareStatus")+ Prelude.<*> (x Data..:? "FileShareType")+ Prelude.<*> (x Data..:? "GatewayARN")+ )++instance Prelude.Hashable FileShareInfo where+ hashWithSalt _salt FileShareInfo' {..} =+ _salt+ `Prelude.hashWithSalt` fileShareARN+ `Prelude.hashWithSalt` fileShareId+ `Prelude.hashWithSalt` fileShareStatus+ `Prelude.hashWithSalt` fileShareType+ `Prelude.hashWithSalt` gatewayARN++instance Prelude.NFData FileShareInfo where+ rnf FileShareInfo' {..} =+ Prelude.rnf fileShareARN+ `Prelude.seq` Prelude.rnf fileShareId+ `Prelude.seq` Prelude.rnf fileShareStatus+ `Prelude.seq` Prelude.rnf fileShareType+ `Prelude.seq` Prelude.rnf gatewayARN
@@ -0,0 +1,72 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE GeneralizedNewtypeDeriving #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module : Amazonka.StorageGateway.Types.FileShareType+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.StorageGateway.Types.FileShareType+ ( FileShareType+ ( ..,+ FileShareType_NFS,+ FileShareType_SMB+ ),+ )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Data as Data+import qualified Amazonka.Prelude as Prelude++-- | The type of the file share.+newtype FileShareType = FileShareType'+ { fromFileShareType ::+ Data.Text+ }+ deriving stock+ ( Prelude.Show,+ Prelude.Read,+ Prelude.Eq,+ Prelude.Ord,+ Prelude.Generic+ )+ deriving newtype+ ( Prelude.Hashable,+ Prelude.NFData,+ Data.FromText,+ Data.ToText,+ Data.ToByteString,+ Data.ToLog,+ Data.ToHeader,+ Data.ToQuery,+ Data.FromJSON,+ Data.FromJSONKey,+ Data.ToJSON,+ Data.ToJSONKey,+ Data.FromXML,+ Data.ToXML+ )++pattern FileShareType_NFS :: FileShareType+pattern FileShareType_NFS = FileShareType' "NFS"++pattern FileShareType_SMB :: FileShareType+pattern FileShareType_SMB = FileShareType' "SMB"++{-# COMPLETE+ FileShareType_NFS,+ FileShareType_SMB,+ FileShareType'+ #-}
+ gen/Amazonka/StorageGateway/Types/FileSystemAssociationInfo.hs view
@@ -0,0 +1,206 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# 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.Types.FileSystemAssociationInfo+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.StorageGateway.Types.FileSystemAssociationInfo 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 Amazonka.StorageGateway.Types.CacheAttributes+import Amazonka.StorageGateway.Types.EndpointNetworkConfiguration+import Amazonka.StorageGateway.Types.FileSystemAssociationStatusDetail+import Amazonka.StorageGateway.Types.Tag++-- | Describes the object returned by @DescribeFileSystemAssociations@ that+-- describes a created file system association.+--+-- /See:/ 'newFileSystemAssociationInfo' smart constructor.+data FileSystemAssociationInfo = FileSystemAssociationInfo'+ { -- | The Amazon Resource Name (ARN) of the storage used for the audit logs.+ auditDestinationARN :: Prelude.Maybe Prelude.Text,+ cacheAttributes :: Prelude.Maybe CacheAttributes,+ -- | Specifies network configuration information for the gateway associated+ -- with the Amazon FSx file system.+ --+ -- If multiple file systems are associated with this gateway, this+ -- parameter\'s @IpAddresses@ field is required.+ endpointNetworkConfiguration :: Prelude.Maybe EndpointNetworkConfiguration,+ -- | The Amazon Resource Name (ARN) of the file system association.+ fileSystemAssociationARN :: Prelude.Maybe Prelude.Text,+ -- | The status of the file system association. Valid Values: @AVAILABLE@ |+ -- @CREATING@ | @DELETING@ | @FORCE_DELETING@ | @UPDATING@ | @ERROR@+ fileSystemAssociationStatus :: Prelude.Maybe Prelude.Text,+ -- | An array containing the FileSystemAssociationStatusDetail data type,+ -- which provides detailed information on file system association status.+ fileSystemAssociationStatusDetails :: Prelude.Maybe [FileSystemAssociationStatusDetail],+ gatewayARN :: Prelude.Maybe Prelude.Text,+ -- | The ARN of the backend Amazon FSx file system used for storing file+ -- data. For information, see+ -- <https://docs.aws.amazon.com/fsx/latest/APIReference/API_FileSystem.html FileSystem>+ -- in the /Amazon FSx API Reference/.+ locationARN :: Prelude.Maybe Prelude.Text,+ -- | A list of up to 50 tags assigned to the SMB file share, sorted+ -- alphabetically by key name. Each tag is a key-value pair.+ tags :: Prelude.Maybe [Tag]+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'FileSystemAssociationInfo' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'auditDestinationARN', 'fileSystemAssociationInfo_auditDestinationARN' - The Amazon Resource Name (ARN) of the storage used for the audit logs.+--+-- 'cacheAttributes', 'fileSystemAssociationInfo_cacheAttributes' - Undocumented member.+--+-- 'endpointNetworkConfiguration', 'fileSystemAssociationInfo_endpointNetworkConfiguration' - Specifies network configuration information for the gateway associated+-- with the Amazon FSx file system.+--+-- If multiple file systems are associated with this gateway, this+-- parameter\'s @IpAddresses@ field is required.+--+-- 'fileSystemAssociationARN', 'fileSystemAssociationInfo_fileSystemAssociationARN' - The Amazon Resource Name (ARN) of the file system association.+--+-- 'fileSystemAssociationStatus', 'fileSystemAssociationInfo_fileSystemAssociationStatus' - The status of the file system association. Valid Values: @AVAILABLE@ |+-- @CREATING@ | @DELETING@ | @FORCE_DELETING@ | @UPDATING@ | @ERROR@+--+-- 'fileSystemAssociationStatusDetails', 'fileSystemAssociationInfo_fileSystemAssociationStatusDetails' - An array containing the FileSystemAssociationStatusDetail data type,+-- which provides detailed information on file system association status.+--+-- 'gatewayARN', 'fileSystemAssociationInfo_gatewayARN' - Undocumented member.+--+-- 'locationARN', 'fileSystemAssociationInfo_locationARN' - The ARN of the backend Amazon FSx file system used for storing file+-- data. For information, see+-- <https://docs.aws.amazon.com/fsx/latest/APIReference/API_FileSystem.html FileSystem>+-- in the /Amazon FSx API Reference/.+--+-- 'tags', 'fileSystemAssociationInfo_tags' - A list of up to 50 tags assigned to the SMB file share, sorted+-- alphabetically by key name. Each tag is a key-value pair.+newFileSystemAssociationInfo ::+ FileSystemAssociationInfo+newFileSystemAssociationInfo =+ FileSystemAssociationInfo'+ { auditDestinationARN =+ Prelude.Nothing,+ cacheAttributes = Prelude.Nothing,+ endpointNetworkConfiguration = Prelude.Nothing,+ fileSystemAssociationARN = Prelude.Nothing,+ fileSystemAssociationStatus = Prelude.Nothing,+ fileSystemAssociationStatusDetails =+ Prelude.Nothing,+ gatewayARN = Prelude.Nothing,+ locationARN = Prelude.Nothing,+ tags = Prelude.Nothing+ }++-- | The Amazon Resource Name (ARN) of the storage used for the audit logs.+fileSystemAssociationInfo_auditDestinationARN :: Lens.Lens' FileSystemAssociationInfo (Prelude.Maybe Prelude.Text)+fileSystemAssociationInfo_auditDestinationARN = Lens.lens (\FileSystemAssociationInfo' {auditDestinationARN} -> auditDestinationARN) (\s@FileSystemAssociationInfo' {} a -> s {auditDestinationARN = a} :: FileSystemAssociationInfo)++-- | Undocumented member.+fileSystemAssociationInfo_cacheAttributes :: Lens.Lens' FileSystemAssociationInfo (Prelude.Maybe CacheAttributes)+fileSystemAssociationInfo_cacheAttributes = Lens.lens (\FileSystemAssociationInfo' {cacheAttributes} -> cacheAttributes) (\s@FileSystemAssociationInfo' {} a -> s {cacheAttributes = a} :: FileSystemAssociationInfo)++-- | Specifies network configuration information for the gateway associated+-- with the Amazon FSx file system.+--+-- If multiple file systems are associated with this gateway, this+-- parameter\'s @IpAddresses@ field is required.+fileSystemAssociationInfo_endpointNetworkConfiguration :: Lens.Lens' FileSystemAssociationInfo (Prelude.Maybe EndpointNetworkConfiguration)+fileSystemAssociationInfo_endpointNetworkConfiguration = Lens.lens (\FileSystemAssociationInfo' {endpointNetworkConfiguration} -> endpointNetworkConfiguration) (\s@FileSystemAssociationInfo' {} a -> s {endpointNetworkConfiguration = a} :: FileSystemAssociationInfo)++-- | The Amazon Resource Name (ARN) of the file system association.+fileSystemAssociationInfo_fileSystemAssociationARN :: Lens.Lens' FileSystemAssociationInfo (Prelude.Maybe Prelude.Text)+fileSystemAssociationInfo_fileSystemAssociationARN = Lens.lens (\FileSystemAssociationInfo' {fileSystemAssociationARN} -> fileSystemAssociationARN) (\s@FileSystemAssociationInfo' {} a -> s {fileSystemAssociationARN = a} :: FileSystemAssociationInfo)++-- | The status of the file system association. Valid Values: @AVAILABLE@ |+-- @CREATING@ | @DELETING@ | @FORCE_DELETING@ | @UPDATING@ | @ERROR@+fileSystemAssociationInfo_fileSystemAssociationStatus :: Lens.Lens' FileSystemAssociationInfo (Prelude.Maybe Prelude.Text)+fileSystemAssociationInfo_fileSystemAssociationStatus = Lens.lens (\FileSystemAssociationInfo' {fileSystemAssociationStatus} -> fileSystemAssociationStatus) (\s@FileSystemAssociationInfo' {} a -> s {fileSystemAssociationStatus = a} :: FileSystemAssociationInfo)++-- | An array containing the FileSystemAssociationStatusDetail data type,+-- which provides detailed information on file system association status.+fileSystemAssociationInfo_fileSystemAssociationStatusDetails :: Lens.Lens' FileSystemAssociationInfo (Prelude.Maybe [FileSystemAssociationStatusDetail])+fileSystemAssociationInfo_fileSystemAssociationStatusDetails = Lens.lens (\FileSystemAssociationInfo' {fileSystemAssociationStatusDetails} -> fileSystemAssociationStatusDetails) (\s@FileSystemAssociationInfo' {} a -> s {fileSystemAssociationStatusDetails = a} :: FileSystemAssociationInfo) Prelude.. Lens.mapping Lens.coerced++-- | Undocumented member.+fileSystemAssociationInfo_gatewayARN :: Lens.Lens' FileSystemAssociationInfo (Prelude.Maybe Prelude.Text)+fileSystemAssociationInfo_gatewayARN = Lens.lens (\FileSystemAssociationInfo' {gatewayARN} -> gatewayARN) (\s@FileSystemAssociationInfo' {} a -> s {gatewayARN = a} :: FileSystemAssociationInfo)++-- | The ARN of the backend Amazon FSx file system used for storing file+-- data. For information, see+-- <https://docs.aws.amazon.com/fsx/latest/APIReference/API_FileSystem.html FileSystem>+-- in the /Amazon FSx API Reference/.+fileSystemAssociationInfo_locationARN :: Lens.Lens' FileSystemAssociationInfo (Prelude.Maybe Prelude.Text)+fileSystemAssociationInfo_locationARN = Lens.lens (\FileSystemAssociationInfo' {locationARN} -> locationARN) (\s@FileSystemAssociationInfo' {} a -> s {locationARN = a} :: FileSystemAssociationInfo)++-- | A list of up to 50 tags assigned to the SMB file share, sorted+-- alphabetically by key name. Each tag is a key-value pair.+fileSystemAssociationInfo_tags :: Lens.Lens' FileSystemAssociationInfo (Prelude.Maybe [Tag])+fileSystemAssociationInfo_tags = Lens.lens (\FileSystemAssociationInfo' {tags} -> tags) (\s@FileSystemAssociationInfo' {} a -> s {tags = a} :: FileSystemAssociationInfo) Prelude.. Lens.mapping Lens.coerced++instance Data.FromJSON FileSystemAssociationInfo where+ parseJSON =+ Data.withObject+ "FileSystemAssociationInfo"+ ( \x ->+ FileSystemAssociationInfo'+ Prelude.<$> (x Data..:? "AuditDestinationARN")+ Prelude.<*> (x Data..:? "CacheAttributes")+ Prelude.<*> (x Data..:? "EndpointNetworkConfiguration")+ Prelude.<*> (x Data..:? "FileSystemAssociationARN")+ Prelude.<*> (x Data..:? "FileSystemAssociationStatus")+ Prelude.<*> ( x+ Data..:? "FileSystemAssociationStatusDetails"+ Data..!= Prelude.mempty+ )+ Prelude.<*> (x Data..:? "GatewayARN")+ Prelude.<*> (x Data..:? "LocationARN")+ Prelude.<*> (x Data..:? "Tags" Data..!= Prelude.mempty)+ )++instance Prelude.Hashable FileSystemAssociationInfo where+ hashWithSalt _salt FileSystemAssociationInfo' {..} =+ _salt+ `Prelude.hashWithSalt` auditDestinationARN+ `Prelude.hashWithSalt` cacheAttributes+ `Prelude.hashWithSalt` endpointNetworkConfiguration+ `Prelude.hashWithSalt` fileSystemAssociationARN+ `Prelude.hashWithSalt` fileSystemAssociationStatus+ `Prelude.hashWithSalt` fileSystemAssociationStatusDetails+ `Prelude.hashWithSalt` gatewayARN+ `Prelude.hashWithSalt` locationARN+ `Prelude.hashWithSalt` tags++instance Prelude.NFData FileSystemAssociationInfo where+ rnf FileSystemAssociationInfo' {..} =+ Prelude.rnf auditDestinationARN+ `Prelude.seq` Prelude.rnf cacheAttributes+ `Prelude.seq` Prelude.rnf endpointNetworkConfiguration+ `Prelude.seq` Prelude.rnf fileSystemAssociationARN+ `Prelude.seq` Prelude.rnf fileSystemAssociationStatus+ `Prelude.seq` Prelude.rnf fileSystemAssociationStatusDetails+ `Prelude.seq` Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf locationARN+ `Prelude.seq` Prelude.rnf tags
+ gen/Amazonka/StorageGateway/Types/FileSystemAssociationStatusDetail.hs view
@@ -0,0 +1,83 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# 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.Types.FileSystemAssociationStatusDetail+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.StorageGateway.Types.FileSystemAssociationStatusDetail 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++-- | Detailed information on file system association status.+--+-- /See:/ 'newFileSystemAssociationStatusDetail' smart constructor.+data FileSystemAssociationStatusDetail = FileSystemAssociationStatusDetail'+ { -- | The error code for a given file system association status.+ errorCode :: Prelude.Maybe Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'FileSystemAssociationStatusDetail' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'errorCode', 'fileSystemAssociationStatusDetail_errorCode' - The error code for a given file system association status.+newFileSystemAssociationStatusDetail ::+ FileSystemAssociationStatusDetail+newFileSystemAssociationStatusDetail =+ FileSystemAssociationStatusDetail'+ { errorCode =+ Prelude.Nothing+ }++-- | The error code for a given file system association status.+fileSystemAssociationStatusDetail_errorCode :: Lens.Lens' FileSystemAssociationStatusDetail (Prelude.Maybe Prelude.Text)+fileSystemAssociationStatusDetail_errorCode = Lens.lens (\FileSystemAssociationStatusDetail' {errorCode} -> errorCode) (\s@FileSystemAssociationStatusDetail' {} a -> s {errorCode = a} :: FileSystemAssociationStatusDetail)++instance+ Data.FromJSON+ FileSystemAssociationStatusDetail+ where+ parseJSON =+ Data.withObject+ "FileSystemAssociationStatusDetail"+ ( \x ->+ FileSystemAssociationStatusDetail'+ Prelude.<$> (x Data..:? "ErrorCode")+ )++instance+ Prelude.Hashable+ FileSystemAssociationStatusDetail+ where+ hashWithSalt+ _salt+ FileSystemAssociationStatusDetail' {..} =+ _salt `Prelude.hashWithSalt` errorCode++instance+ Prelude.NFData+ FileSystemAssociationStatusDetail+ where+ rnf FileSystemAssociationStatusDetail' {..} =+ Prelude.rnf errorCode
+ gen/Amazonka/StorageGateway/Types/FileSystemAssociationSummary.hs view
@@ -0,0 +1,115 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# 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.Types.FileSystemAssociationSummary+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.StorageGateway.Types.FileSystemAssociationSummary 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++-- | Gets the summary returned by @ListFileSystemAssociation@, which is a+-- summary of a created file system association.+--+-- /See:/ 'newFileSystemAssociationSummary' smart constructor.+data FileSystemAssociationSummary = FileSystemAssociationSummary'+ { -- | The Amazon Resource Name (ARN) of the file system association.+ fileSystemAssociationARN :: Prelude.Maybe Prelude.Text,+ -- | The ID of the file system association.+ fileSystemAssociationId :: Prelude.Maybe Prelude.Text,+ -- | The status of the file share. Valid Values: @AVAILABLE@ | @CREATING@ |+ -- @DELETING@ | @FORCE_DELETING@ | @UPDATING@ | @ERROR@+ fileSystemAssociationStatus :: Prelude.Maybe Prelude.Text,+ gatewayARN :: Prelude.Maybe Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'FileSystemAssociationSummary' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'fileSystemAssociationARN', 'fileSystemAssociationSummary_fileSystemAssociationARN' - The Amazon Resource Name (ARN) of the file system association.+--+-- 'fileSystemAssociationId', 'fileSystemAssociationSummary_fileSystemAssociationId' - The ID of the file system association.+--+-- 'fileSystemAssociationStatus', 'fileSystemAssociationSummary_fileSystemAssociationStatus' - The status of the file share. Valid Values: @AVAILABLE@ | @CREATING@ |+-- @DELETING@ | @FORCE_DELETING@ | @UPDATING@ | @ERROR@+--+-- 'gatewayARN', 'fileSystemAssociationSummary_gatewayARN' - Undocumented member.+newFileSystemAssociationSummary ::+ FileSystemAssociationSummary+newFileSystemAssociationSummary =+ FileSystemAssociationSummary'+ { fileSystemAssociationARN =+ Prelude.Nothing,+ fileSystemAssociationId = Prelude.Nothing,+ fileSystemAssociationStatus = Prelude.Nothing,+ gatewayARN = Prelude.Nothing+ }++-- | The Amazon Resource Name (ARN) of the file system association.+fileSystemAssociationSummary_fileSystemAssociationARN :: Lens.Lens' FileSystemAssociationSummary (Prelude.Maybe Prelude.Text)+fileSystemAssociationSummary_fileSystemAssociationARN = Lens.lens (\FileSystemAssociationSummary' {fileSystemAssociationARN} -> fileSystemAssociationARN) (\s@FileSystemAssociationSummary' {} a -> s {fileSystemAssociationARN = a} :: FileSystemAssociationSummary)++-- | The ID of the file system association.+fileSystemAssociationSummary_fileSystemAssociationId :: Lens.Lens' FileSystemAssociationSummary (Prelude.Maybe Prelude.Text)+fileSystemAssociationSummary_fileSystemAssociationId = Lens.lens (\FileSystemAssociationSummary' {fileSystemAssociationId} -> fileSystemAssociationId) (\s@FileSystemAssociationSummary' {} a -> s {fileSystemAssociationId = a} :: FileSystemAssociationSummary)++-- | The status of the file share. Valid Values: @AVAILABLE@ | @CREATING@ |+-- @DELETING@ | @FORCE_DELETING@ | @UPDATING@ | @ERROR@+fileSystemAssociationSummary_fileSystemAssociationStatus :: Lens.Lens' FileSystemAssociationSummary (Prelude.Maybe Prelude.Text)+fileSystemAssociationSummary_fileSystemAssociationStatus = Lens.lens (\FileSystemAssociationSummary' {fileSystemAssociationStatus} -> fileSystemAssociationStatus) (\s@FileSystemAssociationSummary' {} a -> s {fileSystemAssociationStatus = a} :: FileSystemAssociationSummary)++-- | Undocumented member.+fileSystemAssociationSummary_gatewayARN :: Lens.Lens' FileSystemAssociationSummary (Prelude.Maybe Prelude.Text)+fileSystemAssociationSummary_gatewayARN = Lens.lens (\FileSystemAssociationSummary' {gatewayARN} -> gatewayARN) (\s@FileSystemAssociationSummary' {} a -> s {gatewayARN = a} :: FileSystemAssociationSummary)++instance Data.FromJSON FileSystemAssociationSummary where+ parseJSON =+ Data.withObject+ "FileSystemAssociationSummary"+ ( \x ->+ FileSystemAssociationSummary'+ Prelude.<$> (x Data..:? "FileSystemAssociationARN")+ Prelude.<*> (x Data..:? "FileSystemAssociationId")+ Prelude.<*> (x Data..:? "FileSystemAssociationStatus")+ Prelude.<*> (x Data..:? "GatewayARN")+ )++instance+ Prelude.Hashable+ FileSystemAssociationSummary+ where+ hashWithSalt _salt FileSystemAssociationSummary' {..} =+ _salt+ `Prelude.hashWithSalt` fileSystemAssociationARN+ `Prelude.hashWithSalt` fileSystemAssociationId+ `Prelude.hashWithSalt` fileSystemAssociationStatus+ `Prelude.hashWithSalt` gatewayARN++instance Prelude.NFData FileSystemAssociationSummary where+ rnf FileSystemAssociationSummary' {..} =+ Prelude.rnf fileSystemAssociationARN+ `Prelude.seq` Prelude.rnf fileSystemAssociationId+ `Prelude.seq` Prelude.rnf fileSystemAssociationStatus+ `Prelude.seq` Prelude.rnf gatewayARN
+ gen/Amazonka/StorageGateway/Types/GatewayCapacity.hs view
@@ -0,0 +1,76 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE GeneralizedNewtypeDeriving #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module : Amazonka.StorageGateway.Types.GatewayCapacity+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.StorageGateway.Types.GatewayCapacity+ ( GatewayCapacity+ ( ..,+ GatewayCapacity_Large,+ GatewayCapacity_Medium,+ GatewayCapacity_Small+ ),+ )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Data as Data+import qualified Amazonka.Prelude as Prelude++newtype GatewayCapacity = GatewayCapacity'+ { fromGatewayCapacity ::+ Data.Text+ }+ deriving stock+ ( Prelude.Show,+ Prelude.Read,+ Prelude.Eq,+ Prelude.Ord,+ Prelude.Generic+ )+ deriving newtype+ ( Prelude.Hashable,+ Prelude.NFData,+ Data.FromText,+ Data.ToText,+ Data.ToByteString,+ Data.ToLog,+ Data.ToHeader,+ Data.ToQuery,+ Data.FromJSON,+ Data.FromJSONKey,+ Data.ToJSON,+ Data.ToJSONKey,+ Data.FromXML,+ Data.ToXML+ )++pattern GatewayCapacity_Large :: GatewayCapacity+pattern GatewayCapacity_Large = GatewayCapacity' "Large"++pattern GatewayCapacity_Medium :: GatewayCapacity+pattern GatewayCapacity_Medium = GatewayCapacity' "Medium"++pattern GatewayCapacity_Small :: GatewayCapacity+pattern GatewayCapacity_Small = GatewayCapacity' "Small"++{-# COMPLETE+ GatewayCapacity_Large,+ GatewayCapacity_Medium,+ GatewayCapacity_Small,+ GatewayCapacity'+ #-}
+ gen/Amazonka/StorageGateway/Types/GatewayInfo.hs view
@@ -0,0 +1,196 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# 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.Types.GatewayInfo+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.StorageGateway.Types.GatewayInfo 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 Amazonka.StorageGateway.Types.HostEnvironment++-- | Describes a gateway object.+--+-- /See:/ 'newGatewayInfo' smart constructor.+data GatewayInfo = GatewayInfo'+ { -- | The ID of the Amazon EC2 instance that was used to launch the gateway.+ ec2InstanceId :: Prelude.Maybe Prelude.Text,+ -- | The Amazon Web Services Region where the Amazon EC2 instance is located.+ ec2InstanceRegion :: Prelude.Maybe Prelude.Text,+ -- | The Amazon Resource Name (ARN) of the gateway. Use the ListGateways+ -- operation to return a list of gateways for your account and Amazon Web+ -- Services Region.+ gatewayARN :: Prelude.Maybe Prelude.Text,+ -- | The unique identifier assigned to your gateway during activation. This+ -- ID becomes part of the gateway Amazon Resource Name (ARN), which you use+ -- as input for other operations.+ gatewayId :: Prelude.Maybe Prelude.Text,+ -- | The name of the gateway.+ gatewayName :: Prelude.Maybe Prelude.Text,+ -- | The state of the gateway.+ --+ -- Valid Values: @DISABLED@ | @ACTIVE@+ gatewayOperationalState :: Prelude.Maybe Prelude.Text,+ -- | The type of the gateway.+ gatewayType :: Prelude.Maybe Prelude.Text,+ -- | The type of hardware or software platform on which the gateway is+ -- running.+ hostEnvironment :: Prelude.Maybe HostEnvironment,+ -- | A unique identifier for the specific instance of the host platform+ -- running the gateway. This value is only available for certain host+ -- environments, and its format depends on the host environment type.+ hostEnvironmentId :: Prelude.Maybe Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'GatewayInfo' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'ec2InstanceId', 'gatewayInfo_ec2InstanceId' - The ID of the Amazon EC2 instance that was used to launch the gateway.+--+-- 'ec2InstanceRegion', 'gatewayInfo_ec2InstanceRegion' - The Amazon Web Services Region where the Amazon EC2 instance is located.+--+-- 'gatewayARN', 'gatewayInfo_gatewayARN' - The Amazon Resource Name (ARN) of the gateway. Use the ListGateways+-- operation to return a list of gateways for your account and Amazon Web+-- Services Region.+--+-- 'gatewayId', 'gatewayInfo_gatewayId' - The unique identifier assigned to your gateway during activation. This+-- ID becomes part of the gateway Amazon Resource Name (ARN), which you use+-- as input for other operations.+--+-- 'gatewayName', 'gatewayInfo_gatewayName' - The name of the gateway.+--+-- 'gatewayOperationalState', 'gatewayInfo_gatewayOperationalState' - The state of the gateway.+--+-- Valid Values: @DISABLED@ | @ACTIVE@+--+-- 'gatewayType', 'gatewayInfo_gatewayType' - The type of the gateway.+--+-- 'hostEnvironment', 'gatewayInfo_hostEnvironment' - The type of hardware or software platform on which the gateway is+-- running.+--+-- 'hostEnvironmentId', 'gatewayInfo_hostEnvironmentId' - A unique identifier for the specific instance of the host platform+-- running the gateway. This value is only available for certain host+-- environments, and its format depends on the host environment type.+newGatewayInfo ::+ GatewayInfo+newGatewayInfo =+ GatewayInfo'+ { ec2InstanceId = Prelude.Nothing,+ ec2InstanceRegion = Prelude.Nothing,+ gatewayARN = Prelude.Nothing,+ gatewayId = Prelude.Nothing,+ gatewayName = Prelude.Nothing,+ gatewayOperationalState = Prelude.Nothing,+ gatewayType = Prelude.Nothing,+ hostEnvironment = Prelude.Nothing,+ hostEnvironmentId = Prelude.Nothing+ }++-- | The ID of the Amazon EC2 instance that was used to launch the gateway.+gatewayInfo_ec2InstanceId :: Lens.Lens' GatewayInfo (Prelude.Maybe Prelude.Text)+gatewayInfo_ec2InstanceId = Lens.lens (\GatewayInfo' {ec2InstanceId} -> ec2InstanceId) (\s@GatewayInfo' {} a -> s {ec2InstanceId = a} :: GatewayInfo)++-- | The Amazon Web Services Region where the Amazon EC2 instance is located.+gatewayInfo_ec2InstanceRegion :: Lens.Lens' GatewayInfo (Prelude.Maybe Prelude.Text)+gatewayInfo_ec2InstanceRegion = Lens.lens (\GatewayInfo' {ec2InstanceRegion} -> ec2InstanceRegion) (\s@GatewayInfo' {} a -> s {ec2InstanceRegion = a} :: GatewayInfo)++-- | The Amazon Resource Name (ARN) of the gateway. Use the ListGateways+-- operation to return a list of gateways for your account and Amazon Web+-- Services Region.+gatewayInfo_gatewayARN :: Lens.Lens' GatewayInfo (Prelude.Maybe Prelude.Text)+gatewayInfo_gatewayARN = Lens.lens (\GatewayInfo' {gatewayARN} -> gatewayARN) (\s@GatewayInfo' {} a -> s {gatewayARN = a} :: GatewayInfo)++-- | The unique identifier assigned to your gateway during activation. This+-- ID becomes part of the gateway Amazon Resource Name (ARN), which you use+-- as input for other operations.+gatewayInfo_gatewayId :: Lens.Lens' GatewayInfo (Prelude.Maybe Prelude.Text)+gatewayInfo_gatewayId = Lens.lens (\GatewayInfo' {gatewayId} -> gatewayId) (\s@GatewayInfo' {} a -> s {gatewayId = a} :: GatewayInfo)++-- | The name of the gateway.+gatewayInfo_gatewayName :: Lens.Lens' GatewayInfo (Prelude.Maybe Prelude.Text)+gatewayInfo_gatewayName = Lens.lens (\GatewayInfo' {gatewayName} -> gatewayName) (\s@GatewayInfo' {} a -> s {gatewayName = a} :: GatewayInfo)++-- | The state of the gateway.+--+-- Valid Values: @DISABLED@ | @ACTIVE@+gatewayInfo_gatewayOperationalState :: Lens.Lens' GatewayInfo (Prelude.Maybe Prelude.Text)+gatewayInfo_gatewayOperationalState = Lens.lens (\GatewayInfo' {gatewayOperationalState} -> gatewayOperationalState) (\s@GatewayInfo' {} a -> s {gatewayOperationalState = a} :: GatewayInfo)++-- | The type of the gateway.+gatewayInfo_gatewayType :: Lens.Lens' GatewayInfo (Prelude.Maybe Prelude.Text)+gatewayInfo_gatewayType = Lens.lens (\GatewayInfo' {gatewayType} -> gatewayType) (\s@GatewayInfo' {} a -> s {gatewayType = a} :: GatewayInfo)++-- | The type of hardware or software platform on which the gateway is+-- running.+gatewayInfo_hostEnvironment :: Lens.Lens' GatewayInfo (Prelude.Maybe HostEnvironment)+gatewayInfo_hostEnvironment = Lens.lens (\GatewayInfo' {hostEnvironment} -> hostEnvironment) (\s@GatewayInfo' {} a -> s {hostEnvironment = a} :: GatewayInfo)++-- | A unique identifier for the specific instance of the host platform+-- running the gateway. This value is only available for certain host+-- environments, and its format depends on the host environment type.+gatewayInfo_hostEnvironmentId :: Lens.Lens' GatewayInfo (Prelude.Maybe Prelude.Text)+gatewayInfo_hostEnvironmentId = Lens.lens (\GatewayInfo' {hostEnvironmentId} -> hostEnvironmentId) (\s@GatewayInfo' {} a -> s {hostEnvironmentId = a} :: GatewayInfo)++instance Data.FromJSON GatewayInfo where+ parseJSON =+ Data.withObject+ "GatewayInfo"+ ( \x ->+ GatewayInfo'+ Prelude.<$> (x Data..:? "Ec2InstanceId")+ Prelude.<*> (x Data..:? "Ec2InstanceRegion")+ Prelude.<*> (x Data..:? "GatewayARN")+ Prelude.<*> (x Data..:? "GatewayId")+ Prelude.<*> (x Data..:? "GatewayName")+ Prelude.<*> (x Data..:? "GatewayOperationalState")+ Prelude.<*> (x Data..:? "GatewayType")+ Prelude.<*> (x Data..:? "HostEnvironment")+ Prelude.<*> (x Data..:? "HostEnvironmentId")+ )++instance Prelude.Hashable GatewayInfo where+ hashWithSalt _salt GatewayInfo' {..} =+ _salt+ `Prelude.hashWithSalt` ec2InstanceId+ `Prelude.hashWithSalt` ec2InstanceRegion+ `Prelude.hashWithSalt` gatewayARN+ `Prelude.hashWithSalt` gatewayId+ `Prelude.hashWithSalt` gatewayName+ `Prelude.hashWithSalt` gatewayOperationalState+ `Prelude.hashWithSalt` gatewayType+ `Prelude.hashWithSalt` hostEnvironment+ `Prelude.hashWithSalt` hostEnvironmentId++instance Prelude.NFData GatewayInfo where+ rnf GatewayInfo' {..} =+ Prelude.rnf ec2InstanceId+ `Prelude.seq` Prelude.rnf ec2InstanceRegion+ `Prelude.seq` Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf gatewayId+ `Prelude.seq` Prelude.rnf gatewayName+ `Prelude.seq` Prelude.rnf gatewayOperationalState+ `Prelude.seq` Prelude.rnf gatewayType+ `Prelude.seq` Prelude.rnf hostEnvironment+ `Prelude.seq` Prelude.rnf hostEnvironmentId
+ gen/Amazonka/StorageGateway/Types/HostEnvironment.hs view
@@ -0,0 +1,91 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE GeneralizedNewtypeDeriving #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module : Amazonka.StorageGateway.Types.HostEnvironment+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.StorageGateway.Types.HostEnvironment+ ( HostEnvironment+ ( ..,+ HostEnvironment_EC2,+ HostEnvironment_HYPER_V,+ HostEnvironment_KVM,+ HostEnvironment_OTHER,+ HostEnvironment_SNOWBALL,+ HostEnvironment_VMWARE+ ),+ )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Data as Data+import qualified Amazonka.Prelude as Prelude++newtype HostEnvironment = HostEnvironment'+ { fromHostEnvironment ::+ Data.Text+ }+ deriving stock+ ( Prelude.Show,+ Prelude.Read,+ Prelude.Eq,+ Prelude.Ord,+ Prelude.Generic+ )+ deriving newtype+ ( Prelude.Hashable,+ Prelude.NFData,+ Data.FromText,+ Data.ToText,+ Data.ToByteString,+ Data.ToLog,+ Data.ToHeader,+ Data.ToQuery,+ Data.FromJSON,+ Data.FromJSONKey,+ Data.ToJSON,+ Data.ToJSONKey,+ Data.FromXML,+ Data.ToXML+ )++pattern HostEnvironment_EC2 :: HostEnvironment+pattern HostEnvironment_EC2 = HostEnvironment' "EC2"++pattern HostEnvironment_HYPER_V :: HostEnvironment+pattern HostEnvironment_HYPER_V = HostEnvironment' "HYPER-V"++pattern HostEnvironment_KVM :: HostEnvironment+pattern HostEnvironment_KVM = HostEnvironment' "KVM"++pattern HostEnvironment_OTHER :: HostEnvironment+pattern HostEnvironment_OTHER = HostEnvironment' "OTHER"++pattern HostEnvironment_SNOWBALL :: HostEnvironment+pattern HostEnvironment_SNOWBALL = HostEnvironment' "SNOWBALL"++pattern HostEnvironment_VMWARE :: HostEnvironment+pattern HostEnvironment_VMWARE = HostEnvironment' "VMWARE"++{-# COMPLETE+ HostEnvironment_EC2,+ HostEnvironment_HYPER_V,+ HostEnvironment_KVM,+ HostEnvironment_OTHER,+ HostEnvironment_SNOWBALL,+ HostEnvironment_VMWARE,+ HostEnvironment'+ #-}
@@ -0,0 +1,143 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# 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.Types.NFSFileShareDefaults+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.StorageGateway.Types.NFSFileShareDefaults 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++-- | Describes Network File System (NFS) file share default values. Files and+-- folders stored as Amazon S3 objects in S3 buckets don\'t, by default,+-- have Unix file permissions assigned to them. Upon discovery in an S3+-- bucket by Storage Gateway, the S3 objects that represent files and+-- folders are assigned these default Unix permissions. This operation is+-- only supported for S3 File Gateways.+--+-- /See:/ 'newNFSFileShareDefaults' smart constructor.+data NFSFileShareDefaults = NFSFileShareDefaults'+ { -- | The Unix directory mode in the form \"nnnn\". For example, @0666@+ -- represents the default access mode for all directories inside the file+ -- share. The default value is @0777@.+ directoryMode :: Prelude.Maybe Prelude.Text,+ -- | The Unix file mode in the form \"nnnn\". For example, @0666@ represents+ -- the default file mode inside the file share. The default value is+ -- @0666@.+ fileMode :: Prelude.Maybe Prelude.Text,+ -- | The default group ID for the file share (unless the files have another+ -- group ID specified). The default value is @nfsnobody@.+ groupId :: Prelude.Maybe Prelude.Natural,+ -- | The default owner ID for files in the file share (unless the files have+ -- another owner ID specified). The default value is @nfsnobody@.+ ownerId :: Prelude.Maybe Prelude.Natural+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'NFSFileShareDefaults' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'directoryMode', 'nFSFileShareDefaults_directoryMode' - The Unix directory mode in the form \"nnnn\". For example, @0666@+-- represents the default access mode for all directories inside the file+-- share. The default value is @0777@.+--+-- 'fileMode', 'nFSFileShareDefaults_fileMode' - The Unix file mode in the form \"nnnn\". For example, @0666@ represents+-- the default file mode inside the file share. The default value is+-- @0666@.+--+-- 'groupId', 'nFSFileShareDefaults_groupId' - The default group ID for the file share (unless the files have another+-- group ID specified). The default value is @nfsnobody@.+--+-- 'ownerId', 'nFSFileShareDefaults_ownerId' - The default owner ID for files in the file share (unless the files have+-- another owner ID specified). The default value is @nfsnobody@.+newNFSFileShareDefaults ::+ NFSFileShareDefaults+newNFSFileShareDefaults =+ NFSFileShareDefaults'+ { directoryMode =+ Prelude.Nothing,+ fileMode = Prelude.Nothing,+ groupId = Prelude.Nothing,+ ownerId = Prelude.Nothing+ }++-- | The Unix directory mode in the form \"nnnn\". For example, @0666@+-- represents the default access mode for all directories inside the file+-- share. The default value is @0777@.+nFSFileShareDefaults_directoryMode :: Lens.Lens' NFSFileShareDefaults (Prelude.Maybe Prelude.Text)+nFSFileShareDefaults_directoryMode = Lens.lens (\NFSFileShareDefaults' {directoryMode} -> directoryMode) (\s@NFSFileShareDefaults' {} a -> s {directoryMode = a} :: NFSFileShareDefaults)++-- | The Unix file mode in the form \"nnnn\". For example, @0666@ represents+-- the default file mode inside the file share. The default value is+-- @0666@.+nFSFileShareDefaults_fileMode :: Lens.Lens' NFSFileShareDefaults (Prelude.Maybe Prelude.Text)+nFSFileShareDefaults_fileMode = Lens.lens (\NFSFileShareDefaults' {fileMode} -> fileMode) (\s@NFSFileShareDefaults' {} a -> s {fileMode = a} :: NFSFileShareDefaults)++-- | The default group ID for the file share (unless the files have another+-- group ID specified). The default value is @nfsnobody@.+nFSFileShareDefaults_groupId :: Lens.Lens' NFSFileShareDefaults (Prelude.Maybe Prelude.Natural)+nFSFileShareDefaults_groupId = Lens.lens (\NFSFileShareDefaults' {groupId} -> groupId) (\s@NFSFileShareDefaults' {} a -> s {groupId = a} :: NFSFileShareDefaults)++-- | The default owner ID for files in the file share (unless the files have+-- another owner ID specified). The default value is @nfsnobody@.+nFSFileShareDefaults_ownerId :: Lens.Lens' NFSFileShareDefaults (Prelude.Maybe Prelude.Natural)+nFSFileShareDefaults_ownerId = Lens.lens (\NFSFileShareDefaults' {ownerId} -> ownerId) (\s@NFSFileShareDefaults' {} a -> s {ownerId = a} :: NFSFileShareDefaults)++instance Data.FromJSON NFSFileShareDefaults where+ parseJSON =+ Data.withObject+ "NFSFileShareDefaults"+ ( \x ->+ NFSFileShareDefaults'+ Prelude.<$> (x Data..:? "DirectoryMode")+ Prelude.<*> (x Data..:? "FileMode")+ Prelude.<*> (x Data..:? "GroupId")+ Prelude.<*> (x Data..:? "OwnerId")+ )++instance Prelude.Hashable NFSFileShareDefaults where+ hashWithSalt _salt NFSFileShareDefaults' {..} =+ _salt+ `Prelude.hashWithSalt` directoryMode+ `Prelude.hashWithSalt` fileMode+ `Prelude.hashWithSalt` groupId+ `Prelude.hashWithSalt` ownerId++instance Prelude.NFData NFSFileShareDefaults where+ rnf NFSFileShareDefaults' {..} =+ Prelude.rnf directoryMode+ `Prelude.seq` Prelude.rnf fileMode+ `Prelude.seq` Prelude.rnf groupId+ `Prelude.seq` Prelude.rnf ownerId++instance Data.ToJSON NFSFileShareDefaults where+ toJSON NFSFileShareDefaults' {..} =+ Data.object+ ( Prelude.catMaybes+ [ ("DirectoryMode" Data..=) Prelude.<$> directoryMode,+ ("FileMode" Data..=) Prelude.<$> fileMode,+ ("GroupId" Data..=) Prelude.<$> groupId,+ ("OwnerId" Data..=) Prelude.<$> ownerId+ ]+ )
@@ -0,0 +1,512 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# 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.Types.NFSFileShareInfo+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.StorageGateway.Types.NFSFileShareInfo 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 Amazonka.StorageGateway.Types.CacheAttributes+import Amazonka.StorageGateway.Types.NFSFileShareDefaults+import Amazonka.StorageGateway.Types.ObjectACL+import Amazonka.StorageGateway.Types.Tag++-- | The Unix file permissions and ownership information assigned, by+-- default, to native S3 objects when an S3 File Gateway discovers them in+-- S3 buckets. This operation is only supported in S3 File Gateways.+--+-- /See:/ 'newNFSFileShareInfo' smart constructor.+data NFSFileShareInfo = NFSFileShareInfo'+ { -- | The Amazon Resource Name (ARN) of the storage used for audit logs.+ auditDestinationARN :: Prelude.Maybe Prelude.Text,+ -- | Specifies the Region of the S3 bucket where the NFS file share stores+ -- files.+ --+ -- This parameter is required for NFS file shares that connect to Amazon S3+ -- through a VPC endpoint, a VPC access point, or an access point alias+ -- that points to a VPC access point.+ bucketRegion :: Prelude.Maybe Prelude.Text,+ -- | Refresh cache information for the file share.+ cacheAttributes :: Prelude.Maybe CacheAttributes,+ 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,+ fileShareARN :: Prelude.Maybe Prelude.Text,+ fileShareId :: 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,+ fileShareStatus :: Prelude.Maybe Prelude.Text,+ gatewayARN :: 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,+ kmsKey :: Prelude.Maybe Prelude.Text,+ locationARN :: Prelude.Maybe Prelude.Text,+ 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,+ objectACL :: Prelude.Maybe ObjectACL,+ path :: Prelude.Maybe Prelude.Text,+ -- | 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,+ role' :: Prelude.Maybe Prelude.Text,+ squash :: Prelude.Maybe Prelude.Text,+ -- | A list of up to 50 tags assigned to the NFS file share, sorted+ -- alphabetically by key name. Each tag is a key-value pair. For a gateway+ -- with more than 10 tags assigned, you can view all tags using the+ -- @ListTagsForResource@ API operation.+ tags :: Prelude.Maybe [Tag],+ -- | Specifies the DNS name for the VPC endpoint that the NFS file share uses+ -- to connect to Amazon S3.+ --+ -- This parameter is required for NFS file shares that connect to Amazon S3+ -- through a VPC endpoint, a VPC access point, or an access point alias+ -- that points to a VPC access point.+ vPCEndpointDNSName :: Prelude.Maybe Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'NFSFileShareInfo' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'auditDestinationARN', 'nFSFileShareInfo_auditDestinationARN' - The Amazon Resource Name (ARN) of the storage used for audit logs.+--+-- 'bucketRegion', 'nFSFileShareInfo_bucketRegion' - Specifies the Region of the S3 bucket where the NFS file share stores+-- files.+--+-- This parameter is required for NFS file shares that connect to Amazon S3+-- through a VPC endpoint, a VPC access point, or an access point alias+-- that points to a VPC access point.+--+-- 'cacheAttributes', 'nFSFileShareInfo_cacheAttributes' - Refresh cache information for the file share.+--+-- 'clientList', 'nFSFileShareInfo_clientList' - Undocumented member.+--+-- 'defaultStorageClass', 'nFSFileShareInfo_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@+--+-- 'fileShareARN', 'nFSFileShareInfo_fileShareARN' - Undocumented member.+--+-- 'fileShareId', 'nFSFileShareInfo_fileShareId' - Undocumented member.+--+-- 'fileShareName', 'nFSFileShareInfo_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.+--+-- 'fileShareStatus', 'nFSFileShareInfo_fileShareStatus' - Undocumented member.+--+-- 'gatewayARN', 'nFSFileShareInfo_gatewayARN' - Undocumented member.+--+-- 'guessMIMETypeEnabled', 'nFSFileShareInfo_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', 'nFSFileShareInfo_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', 'nFSFileShareInfo_kmsKey' - Undocumented member.+--+-- 'locationARN', 'nFSFileShareInfo_locationARN' - Undocumented member.+--+-- 'nFSFileShareDefaults', 'nFSFileShareInfo_nFSFileShareDefaults' - Undocumented member.+--+-- 'notificationPolicy', 'nFSFileShareInfo_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', 'nFSFileShareInfo_objectACL' - Undocumented member.+--+-- 'path', 'nFSFileShareInfo_path' - Undocumented member.+--+-- 'readOnly', 'nFSFileShareInfo_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', 'nFSFileShareInfo_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@+--+-- 'role'', 'nFSFileShareInfo_role' - Undocumented member.+--+-- 'squash', 'nFSFileShareInfo_squash' - Undocumented member.+--+-- 'tags', 'nFSFileShareInfo_tags' - A list of up to 50 tags assigned to the NFS file share, sorted+-- alphabetically by key name. Each tag is a key-value pair. For a gateway+-- with more than 10 tags assigned, you can view all tags using the+-- @ListTagsForResource@ API operation.+--+-- 'vPCEndpointDNSName', 'nFSFileShareInfo_vPCEndpointDNSName' - Specifies the DNS name for the VPC endpoint that the NFS file share uses+-- to connect to Amazon S3.+--+-- This parameter is required for NFS file shares that connect to Amazon S3+-- through a VPC endpoint, a VPC access point, or an access point alias+-- that points to a VPC access point.+newNFSFileShareInfo ::+ NFSFileShareInfo+newNFSFileShareInfo =+ NFSFileShareInfo'+ { auditDestinationARN =+ Prelude.Nothing,+ bucketRegion = Prelude.Nothing,+ cacheAttributes = Prelude.Nothing,+ clientList = Prelude.Nothing,+ defaultStorageClass = Prelude.Nothing,+ fileShareARN = Prelude.Nothing,+ fileShareId = Prelude.Nothing,+ fileShareName = Prelude.Nothing,+ fileShareStatus = Prelude.Nothing,+ gatewayARN = Prelude.Nothing,+ guessMIMETypeEnabled = Prelude.Nothing,+ kmsEncrypted = Prelude.Nothing,+ kmsKey = Prelude.Nothing,+ locationARN = Prelude.Nothing,+ nFSFileShareDefaults = Prelude.Nothing,+ notificationPolicy = Prelude.Nothing,+ objectACL = Prelude.Nothing,+ path = Prelude.Nothing,+ readOnly = Prelude.Nothing,+ requesterPays = Prelude.Nothing,+ role' = Prelude.Nothing,+ squash = Prelude.Nothing,+ tags = Prelude.Nothing,+ vPCEndpointDNSName = Prelude.Nothing+ }++-- | The Amazon Resource Name (ARN) of the storage used for audit logs.+nFSFileShareInfo_auditDestinationARN :: Lens.Lens' NFSFileShareInfo (Prelude.Maybe Prelude.Text)+nFSFileShareInfo_auditDestinationARN = Lens.lens (\NFSFileShareInfo' {auditDestinationARN} -> auditDestinationARN) (\s@NFSFileShareInfo' {} a -> s {auditDestinationARN = a} :: NFSFileShareInfo)++-- | Specifies the Region of the S3 bucket where the NFS file share stores+-- files.+--+-- This parameter is required for NFS file shares that connect to Amazon S3+-- through a VPC endpoint, a VPC access point, or an access point alias+-- that points to a VPC access point.+nFSFileShareInfo_bucketRegion :: Lens.Lens' NFSFileShareInfo (Prelude.Maybe Prelude.Text)+nFSFileShareInfo_bucketRegion = Lens.lens (\NFSFileShareInfo' {bucketRegion} -> bucketRegion) (\s@NFSFileShareInfo' {} a -> s {bucketRegion = a} :: NFSFileShareInfo)++-- | Refresh cache information for the file share.+nFSFileShareInfo_cacheAttributes :: Lens.Lens' NFSFileShareInfo (Prelude.Maybe CacheAttributes)+nFSFileShareInfo_cacheAttributes = Lens.lens (\NFSFileShareInfo' {cacheAttributes} -> cacheAttributes) (\s@NFSFileShareInfo' {} a -> s {cacheAttributes = a} :: NFSFileShareInfo)++-- | Undocumented member.+nFSFileShareInfo_clientList :: Lens.Lens' NFSFileShareInfo (Prelude.Maybe (Prelude.NonEmpty Prelude.Text))+nFSFileShareInfo_clientList = Lens.lens (\NFSFileShareInfo' {clientList} -> clientList) (\s@NFSFileShareInfo' {} a -> s {clientList = a} :: NFSFileShareInfo) 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@+nFSFileShareInfo_defaultStorageClass :: Lens.Lens' NFSFileShareInfo (Prelude.Maybe Prelude.Text)+nFSFileShareInfo_defaultStorageClass = Lens.lens (\NFSFileShareInfo' {defaultStorageClass} -> defaultStorageClass) (\s@NFSFileShareInfo' {} a -> s {defaultStorageClass = a} :: NFSFileShareInfo)++-- | Undocumented member.+nFSFileShareInfo_fileShareARN :: Lens.Lens' NFSFileShareInfo (Prelude.Maybe Prelude.Text)+nFSFileShareInfo_fileShareARN = Lens.lens (\NFSFileShareInfo' {fileShareARN} -> fileShareARN) (\s@NFSFileShareInfo' {} a -> s {fileShareARN = a} :: NFSFileShareInfo)++-- | Undocumented member.+nFSFileShareInfo_fileShareId :: Lens.Lens' NFSFileShareInfo (Prelude.Maybe Prelude.Text)+nFSFileShareInfo_fileShareId = Lens.lens (\NFSFileShareInfo' {fileShareId} -> fileShareId) (\s@NFSFileShareInfo' {} a -> s {fileShareId = a} :: NFSFileShareInfo)++-- | 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.+nFSFileShareInfo_fileShareName :: Lens.Lens' NFSFileShareInfo (Prelude.Maybe Prelude.Text)+nFSFileShareInfo_fileShareName = Lens.lens (\NFSFileShareInfo' {fileShareName} -> fileShareName) (\s@NFSFileShareInfo' {} a -> s {fileShareName = a} :: NFSFileShareInfo)++-- | Undocumented member.+nFSFileShareInfo_fileShareStatus :: Lens.Lens' NFSFileShareInfo (Prelude.Maybe Prelude.Text)+nFSFileShareInfo_fileShareStatus = Lens.lens (\NFSFileShareInfo' {fileShareStatus} -> fileShareStatus) (\s@NFSFileShareInfo' {} a -> s {fileShareStatus = a} :: NFSFileShareInfo)++-- | Undocumented member.+nFSFileShareInfo_gatewayARN :: Lens.Lens' NFSFileShareInfo (Prelude.Maybe Prelude.Text)+nFSFileShareInfo_gatewayARN = Lens.lens (\NFSFileShareInfo' {gatewayARN} -> gatewayARN) (\s@NFSFileShareInfo' {} a -> s {gatewayARN = a} :: NFSFileShareInfo)++-- | 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@+nFSFileShareInfo_guessMIMETypeEnabled :: Lens.Lens' NFSFileShareInfo (Prelude.Maybe Prelude.Bool)+nFSFileShareInfo_guessMIMETypeEnabled = Lens.lens (\NFSFileShareInfo' {guessMIMETypeEnabled} -> guessMIMETypeEnabled) (\s@NFSFileShareInfo' {} a -> s {guessMIMETypeEnabled = a} :: NFSFileShareInfo)++-- | 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@+nFSFileShareInfo_kmsEncrypted :: Lens.Lens' NFSFileShareInfo (Prelude.Maybe Prelude.Bool)+nFSFileShareInfo_kmsEncrypted = Lens.lens (\NFSFileShareInfo' {kmsEncrypted} -> kmsEncrypted) (\s@NFSFileShareInfo' {} a -> s {kmsEncrypted = a} :: NFSFileShareInfo)++-- | Undocumented member.+nFSFileShareInfo_kmsKey :: Lens.Lens' NFSFileShareInfo (Prelude.Maybe Prelude.Text)+nFSFileShareInfo_kmsKey = Lens.lens (\NFSFileShareInfo' {kmsKey} -> kmsKey) (\s@NFSFileShareInfo' {} a -> s {kmsKey = a} :: NFSFileShareInfo)++-- | Undocumented member.+nFSFileShareInfo_locationARN :: Lens.Lens' NFSFileShareInfo (Prelude.Maybe Prelude.Text)+nFSFileShareInfo_locationARN = Lens.lens (\NFSFileShareInfo' {locationARN} -> locationARN) (\s@NFSFileShareInfo' {} a -> s {locationARN = a} :: NFSFileShareInfo)++-- | Undocumented member.+nFSFileShareInfo_nFSFileShareDefaults :: Lens.Lens' NFSFileShareInfo (Prelude.Maybe NFSFileShareDefaults)+nFSFileShareInfo_nFSFileShareDefaults = Lens.lens (\NFSFileShareInfo' {nFSFileShareDefaults} -> nFSFileShareDefaults) (\s@NFSFileShareInfo' {} a -> s {nFSFileShareDefaults = a} :: NFSFileShareInfo)++-- | 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.+--+-- @{}@+nFSFileShareInfo_notificationPolicy :: Lens.Lens' NFSFileShareInfo (Prelude.Maybe Prelude.Text)+nFSFileShareInfo_notificationPolicy = Lens.lens (\NFSFileShareInfo' {notificationPolicy} -> notificationPolicy) (\s@NFSFileShareInfo' {} a -> s {notificationPolicy = a} :: NFSFileShareInfo)++-- | Undocumented member.+nFSFileShareInfo_objectACL :: Lens.Lens' NFSFileShareInfo (Prelude.Maybe ObjectACL)+nFSFileShareInfo_objectACL = Lens.lens (\NFSFileShareInfo' {objectACL} -> objectACL) (\s@NFSFileShareInfo' {} a -> s {objectACL = a} :: NFSFileShareInfo)++-- | Undocumented member.+nFSFileShareInfo_path :: Lens.Lens' NFSFileShareInfo (Prelude.Maybe Prelude.Text)+nFSFileShareInfo_path = Lens.lens (\NFSFileShareInfo' {path} -> path) (\s@NFSFileShareInfo' {} a -> s {path = a} :: NFSFileShareInfo)++-- | 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@+nFSFileShareInfo_readOnly :: Lens.Lens' NFSFileShareInfo (Prelude.Maybe Prelude.Bool)+nFSFileShareInfo_readOnly = Lens.lens (\NFSFileShareInfo' {readOnly} -> readOnly) (\s@NFSFileShareInfo' {} a -> s {readOnly = a} :: NFSFileShareInfo)++-- | 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@+nFSFileShareInfo_requesterPays :: Lens.Lens' NFSFileShareInfo (Prelude.Maybe Prelude.Bool)+nFSFileShareInfo_requesterPays = Lens.lens (\NFSFileShareInfo' {requesterPays} -> requesterPays) (\s@NFSFileShareInfo' {} a -> s {requesterPays = a} :: NFSFileShareInfo)++-- | Undocumented member.+nFSFileShareInfo_role :: Lens.Lens' NFSFileShareInfo (Prelude.Maybe Prelude.Text)+nFSFileShareInfo_role = Lens.lens (\NFSFileShareInfo' {role'} -> role') (\s@NFSFileShareInfo' {} a -> s {role' = a} :: NFSFileShareInfo)++-- | Undocumented member.+nFSFileShareInfo_squash :: Lens.Lens' NFSFileShareInfo (Prelude.Maybe Prelude.Text)+nFSFileShareInfo_squash = Lens.lens (\NFSFileShareInfo' {squash} -> squash) (\s@NFSFileShareInfo' {} a -> s {squash = a} :: NFSFileShareInfo)++-- | A list of up to 50 tags assigned to the NFS file share, sorted+-- alphabetically by key name. Each tag is a key-value pair. For a gateway+-- with more than 10 tags assigned, you can view all tags using the+-- @ListTagsForResource@ API operation.+nFSFileShareInfo_tags :: Lens.Lens' NFSFileShareInfo (Prelude.Maybe [Tag])+nFSFileShareInfo_tags = Lens.lens (\NFSFileShareInfo' {tags} -> tags) (\s@NFSFileShareInfo' {} a -> s {tags = a} :: NFSFileShareInfo) Prelude.. Lens.mapping Lens.coerced++-- | Specifies the DNS name for the VPC endpoint that the NFS file share uses+-- to connect to Amazon S3.+--+-- This parameter is required for NFS file shares that connect to Amazon S3+-- through a VPC endpoint, a VPC access point, or an access point alias+-- that points to a VPC access point.+nFSFileShareInfo_vPCEndpointDNSName :: Lens.Lens' NFSFileShareInfo (Prelude.Maybe Prelude.Text)+nFSFileShareInfo_vPCEndpointDNSName = Lens.lens (\NFSFileShareInfo' {vPCEndpointDNSName} -> vPCEndpointDNSName) (\s@NFSFileShareInfo' {} a -> s {vPCEndpointDNSName = a} :: NFSFileShareInfo)++instance Data.FromJSON NFSFileShareInfo where+ parseJSON =+ Data.withObject+ "NFSFileShareInfo"+ ( \x ->+ NFSFileShareInfo'+ Prelude.<$> (x Data..:? "AuditDestinationARN")+ Prelude.<*> (x Data..:? "BucketRegion")+ Prelude.<*> (x Data..:? "CacheAttributes")+ Prelude.<*> (x Data..:? "ClientList")+ Prelude.<*> (x Data..:? "DefaultStorageClass")+ Prelude.<*> (x Data..:? "FileShareARN")+ Prelude.<*> (x Data..:? "FileShareId")+ Prelude.<*> (x Data..:? "FileShareName")+ Prelude.<*> (x Data..:? "FileShareStatus")+ Prelude.<*> (x Data..:? "GatewayARN")+ Prelude.<*> (x Data..:? "GuessMIMETypeEnabled")+ Prelude.<*> (x Data..:? "KMSEncrypted")+ Prelude.<*> (x Data..:? "KMSKey")+ Prelude.<*> (x Data..:? "LocationARN")+ Prelude.<*> (x Data..:? "NFSFileShareDefaults")+ Prelude.<*> (x Data..:? "NotificationPolicy")+ Prelude.<*> (x Data..:? "ObjectACL")+ Prelude.<*> (x Data..:? "Path")+ Prelude.<*> (x Data..:? "ReadOnly")+ Prelude.<*> (x Data..:? "RequesterPays")+ Prelude.<*> (x Data..:? "Role")+ Prelude.<*> (x Data..:? "Squash")+ Prelude.<*> (x Data..:? "Tags" Data..!= Prelude.mempty)+ Prelude.<*> (x Data..:? "VPCEndpointDNSName")+ )++instance Prelude.Hashable NFSFileShareInfo where+ hashWithSalt _salt NFSFileShareInfo' {..} =+ _salt+ `Prelude.hashWithSalt` auditDestinationARN+ `Prelude.hashWithSalt` bucketRegion+ `Prelude.hashWithSalt` cacheAttributes+ `Prelude.hashWithSalt` clientList+ `Prelude.hashWithSalt` defaultStorageClass+ `Prelude.hashWithSalt` fileShareARN+ `Prelude.hashWithSalt` fileShareId+ `Prelude.hashWithSalt` fileShareName+ `Prelude.hashWithSalt` fileShareStatus+ `Prelude.hashWithSalt` gatewayARN+ `Prelude.hashWithSalt` guessMIMETypeEnabled+ `Prelude.hashWithSalt` kmsEncrypted+ `Prelude.hashWithSalt` kmsKey+ `Prelude.hashWithSalt` locationARN+ `Prelude.hashWithSalt` nFSFileShareDefaults+ `Prelude.hashWithSalt` notificationPolicy+ `Prelude.hashWithSalt` objectACL+ `Prelude.hashWithSalt` path+ `Prelude.hashWithSalt` readOnly+ `Prelude.hashWithSalt` requesterPays+ `Prelude.hashWithSalt` role'+ `Prelude.hashWithSalt` squash+ `Prelude.hashWithSalt` tags+ `Prelude.hashWithSalt` vPCEndpointDNSName++instance Prelude.NFData NFSFileShareInfo where+ rnf NFSFileShareInfo' {..} =+ Prelude.rnf auditDestinationARN+ `Prelude.seq` Prelude.rnf bucketRegion+ `Prelude.seq` Prelude.rnf cacheAttributes+ `Prelude.seq` Prelude.rnf clientList+ `Prelude.seq` Prelude.rnf defaultStorageClass+ `Prelude.seq` Prelude.rnf fileShareARN+ `Prelude.seq` Prelude.rnf fileShareId+ `Prelude.seq` Prelude.rnf fileShareName+ `Prelude.seq` Prelude.rnf fileShareStatus+ `Prelude.seq` Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf guessMIMETypeEnabled+ `Prelude.seq` Prelude.rnf kmsEncrypted+ `Prelude.seq` Prelude.rnf kmsKey+ `Prelude.seq` Prelude.rnf locationARN+ `Prelude.seq` Prelude.rnf nFSFileShareDefaults+ `Prelude.seq` Prelude.rnf notificationPolicy+ `Prelude.seq` Prelude.rnf objectACL+ `Prelude.seq` Prelude.rnf path+ `Prelude.seq` Prelude.rnf readOnly+ `Prelude.seq` Prelude.rnf requesterPays+ `Prelude.seq` Prelude.rnf role'+ `Prelude.seq` Prelude.rnf squash+ `Prelude.seq` Prelude.rnf tags+ `Prelude.seq` Prelude.rnf+ vPCEndpointDNSName
+ gen/Amazonka/StorageGateway/Types/NetworkInterface.hs view
@@ -0,0 +1,105 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# 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.Types.NetworkInterface+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.StorageGateway.Types.NetworkInterface 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++-- | Describes a gateway\'s network interface.+--+-- /See:/ 'newNetworkInterface' smart constructor.+data NetworkInterface = NetworkInterface'+ { -- | The Internet Protocol version 4 (IPv4) address of the interface.+ ipv4Address :: Prelude.Maybe Prelude.Text,+ -- | The Internet Protocol version 6 (IPv6) address of the interface.+ -- /Currently not supported/.+ ipv6Address :: Prelude.Maybe Prelude.Text,+ -- | The Media Access Control (MAC) address of the interface.+ --+ -- This is currently unsupported and will not be returned in output.+ macAddress :: Prelude.Maybe Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'NetworkInterface' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'ipv4Address', 'networkInterface_ipv4Address' - The Internet Protocol version 4 (IPv4) address of the interface.+--+-- 'ipv6Address', 'networkInterface_ipv6Address' - The Internet Protocol version 6 (IPv6) address of the interface.+-- /Currently not supported/.+--+-- 'macAddress', 'networkInterface_macAddress' - The Media Access Control (MAC) address of the interface.+--+-- This is currently unsupported and will not be returned in output.+newNetworkInterface ::+ NetworkInterface+newNetworkInterface =+ NetworkInterface'+ { ipv4Address = Prelude.Nothing,+ ipv6Address = Prelude.Nothing,+ macAddress = Prelude.Nothing+ }++-- | The Internet Protocol version 4 (IPv4) address of the interface.+networkInterface_ipv4Address :: Lens.Lens' NetworkInterface (Prelude.Maybe Prelude.Text)+networkInterface_ipv4Address = Lens.lens (\NetworkInterface' {ipv4Address} -> ipv4Address) (\s@NetworkInterface' {} a -> s {ipv4Address = a} :: NetworkInterface)++-- | The Internet Protocol version 6 (IPv6) address of the interface.+-- /Currently not supported/.+networkInterface_ipv6Address :: Lens.Lens' NetworkInterface (Prelude.Maybe Prelude.Text)+networkInterface_ipv6Address = Lens.lens (\NetworkInterface' {ipv6Address} -> ipv6Address) (\s@NetworkInterface' {} a -> s {ipv6Address = a} :: NetworkInterface)++-- | The Media Access Control (MAC) address of the interface.+--+-- This is currently unsupported and will not be returned in output.+networkInterface_macAddress :: Lens.Lens' NetworkInterface (Prelude.Maybe Prelude.Text)+networkInterface_macAddress = Lens.lens (\NetworkInterface' {macAddress} -> macAddress) (\s@NetworkInterface' {} a -> s {macAddress = a} :: NetworkInterface)++instance Data.FromJSON NetworkInterface where+ parseJSON =+ Data.withObject+ "NetworkInterface"+ ( \x ->+ NetworkInterface'+ Prelude.<$> (x Data..:? "Ipv4Address")+ Prelude.<*> (x Data..:? "Ipv6Address")+ Prelude.<*> (x Data..:? "MacAddress")+ )++instance Prelude.Hashable NetworkInterface where+ hashWithSalt _salt NetworkInterface' {..} =+ _salt+ `Prelude.hashWithSalt` ipv4Address+ `Prelude.hashWithSalt` ipv6Address+ `Prelude.hashWithSalt` macAddress++instance Prelude.NFData NetworkInterface where+ rnf NetworkInterface' {..} =+ Prelude.rnf ipv4Address+ `Prelude.seq` Prelude.rnf ipv6Address+ `Prelude.seq` Prelude.rnf macAddress
+ gen/Amazonka/StorageGateway/Types/ObjectACL.hs view
@@ -0,0 +1,99 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE GeneralizedNewtypeDeriving #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module : Amazonka.StorageGateway.Types.ObjectACL+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.StorageGateway.Types.ObjectACL+ ( ObjectACL+ ( ..,+ ObjectACL_Authenticated_read,+ ObjectACL_Aws_exec_read,+ ObjectACL_Bucket_owner_full_control,+ ObjectACL_Bucket_owner_read,+ ObjectACL_Private,+ ObjectACL_Public_read,+ ObjectACL_Public_read_write+ ),+ )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Data as Data+import qualified Amazonka.Prelude as Prelude++-- | A value that sets the access control list (ACL) permission for objects+-- in the S3 bucket that an S3 File Gateway puts objects into. The default+-- value is @private@.+newtype ObjectACL = ObjectACL'+ { fromObjectACL ::+ Data.Text+ }+ deriving stock+ ( Prelude.Show,+ Prelude.Read,+ Prelude.Eq,+ Prelude.Ord,+ Prelude.Generic+ )+ deriving newtype+ ( Prelude.Hashable,+ Prelude.NFData,+ Data.FromText,+ Data.ToText,+ Data.ToByteString,+ Data.ToLog,+ Data.ToHeader,+ Data.ToQuery,+ Data.FromJSON,+ Data.FromJSONKey,+ Data.ToJSON,+ Data.ToJSONKey,+ Data.FromXML,+ Data.ToXML+ )++pattern ObjectACL_Authenticated_read :: ObjectACL+pattern ObjectACL_Authenticated_read = ObjectACL' "authenticated-read"++pattern ObjectACL_Aws_exec_read :: ObjectACL+pattern ObjectACL_Aws_exec_read = ObjectACL' "aws-exec-read"++pattern ObjectACL_Bucket_owner_full_control :: ObjectACL+pattern ObjectACL_Bucket_owner_full_control = ObjectACL' "bucket-owner-full-control"++pattern ObjectACL_Bucket_owner_read :: ObjectACL+pattern ObjectACL_Bucket_owner_read = ObjectACL' "bucket-owner-read"++pattern ObjectACL_Private :: ObjectACL+pattern ObjectACL_Private = ObjectACL' "private"++pattern ObjectACL_Public_read :: ObjectACL+pattern ObjectACL_Public_read = ObjectACL' "public-read"++pattern ObjectACL_Public_read_write :: ObjectACL+pattern ObjectACL_Public_read_write = ObjectACL' "public-read-write"++{-# COMPLETE+ ObjectACL_Authenticated_read,+ ObjectACL_Aws_exec_read,+ ObjectACL_Bucket_owner_full_control,+ ObjectACL_Bucket_owner_read,+ ObjectACL_Private,+ ObjectACL_Public_read,+ ObjectACL_Public_read_write,+ ObjectACL'+ #-}
+ gen/Amazonka/StorageGateway/Types/PoolInfo.hs view
@@ -0,0 +1,171 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# 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.Types.PoolInfo+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.StorageGateway.Types.PoolInfo 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 Amazonka.StorageGateway.Types.PoolStatus+import Amazonka.StorageGateway.Types.RetentionLockType+import Amazonka.StorageGateway.Types.TapeStorageClass++-- | Describes a custom tape pool.+--+-- /See:/ 'newPoolInfo' smart constructor.+data PoolInfo = PoolInfo'+ { -- | The Amazon Resource Name (ARN) of the custom tape pool. Use the+ -- ListTapePools operation to return a list of custom tape pools for your+ -- account and Amazon Web Services Region.+ poolARN :: Prelude.Maybe Prelude.Text,+ -- | The name of the custom tape pool. @PoolName@ can use all ASCII+ -- characters, except \'\/\' and \'\\\'.+ poolName :: Prelude.Maybe Prelude.Text,+ -- | Status of the custom tape pool. Pool can be @ACTIVE@ or @DELETED@.+ poolStatus :: Prelude.Maybe PoolStatus,+ -- | Tape retention lock time is set in days. Tape retention lock can be+ -- enabled for up to 100 years (36,500 days).+ retentionLockTimeInDays :: Prelude.Maybe Prelude.Natural,+ -- | Tape retention lock type, which can be configured in two modes. When+ -- configured in governance mode, Amazon Web Services accounts with+ -- specific IAM permissions are authorized to remove the tape retention+ -- lock from archived virtual tapes. When configured in compliance mode,+ -- the tape retention lock cannot be removed by any user, including the+ -- root Amazon Web Services account.+ retentionLockType :: Prelude.Maybe RetentionLockType,+ -- | The storage class that is associated with the custom pool. When you use+ -- your backup application to eject the tape, the tape is archived directly+ -- into the storage class (S3 Glacier or S3 Glacier Deep Archive) that+ -- corresponds to the pool.+ storageClass :: Prelude.Maybe TapeStorageClass+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'PoolInfo' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'poolARN', 'poolInfo_poolARN' - The Amazon Resource Name (ARN) of the custom tape pool. Use the+-- ListTapePools operation to return a list of custom tape pools for your+-- account and Amazon Web Services Region.+--+-- 'poolName', 'poolInfo_poolName' - The name of the custom tape pool. @PoolName@ can use all ASCII+-- characters, except \'\/\' and \'\\\'.+--+-- 'poolStatus', 'poolInfo_poolStatus' - Status of the custom tape pool. Pool can be @ACTIVE@ or @DELETED@.+--+-- 'retentionLockTimeInDays', 'poolInfo_retentionLockTimeInDays' - Tape retention lock time is set in days. Tape retention lock can be+-- enabled for up to 100 years (36,500 days).+--+-- 'retentionLockType', 'poolInfo_retentionLockType' - Tape retention lock type, which can be configured in two modes. When+-- configured in governance mode, Amazon Web Services accounts with+-- specific IAM permissions are authorized to remove the tape retention+-- lock from archived virtual tapes. When configured in compliance mode,+-- the tape retention lock cannot be removed by any user, including the+-- root Amazon Web Services account.+--+-- 'storageClass', 'poolInfo_storageClass' - The storage class that is associated with the custom pool. When you use+-- your backup application to eject the tape, the tape is archived directly+-- into the storage class (S3 Glacier or S3 Glacier Deep Archive) that+-- corresponds to the pool.+newPoolInfo ::+ PoolInfo+newPoolInfo =+ PoolInfo'+ { poolARN = Prelude.Nothing,+ poolName = Prelude.Nothing,+ poolStatus = Prelude.Nothing,+ retentionLockTimeInDays = Prelude.Nothing,+ retentionLockType = Prelude.Nothing,+ storageClass = Prelude.Nothing+ }++-- | The Amazon Resource Name (ARN) of the custom tape pool. Use the+-- ListTapePools operation to return a list of custom tape pools for your+-- account and Amazon Web Services Region.+poolInfo_poolARN :: Lens.Lens' PoolInfo (Prelude.Maybe Prelude.Text)+poolInfo_poolARN = Lens.lens (\PoolInfo' {poolARN} -> poolARN) (\s@PoolInfo' {} a -> s {poolARN = a} :: PoolInfo)++-- | The name of the custom tape pool. @PoolName@ can use all ASCII+-- characters, except \'\/\' and \'\\\'.+poolInfo_poolName :: Lens.Lens' PoolInfo (Prelude.Maybe Prelude.Text)+poolInfo_poolName = Lens.lens (\PoolInfo' {poolName} -> poolName) (\s@PoolInfo' {} a -> s {poolName = a} :: PoolInfo)++-- | Status of the custom tape pool. Pool can be @ACTIVE@ or @DELETED@.+poolInfo_poolStatus :: Lens.Lens' PoolInfo (Prelude.Maybe PoolStatus)+poolInfo_poolStatus = Lens.lens (\PoolInfo' {poolStatus} -> poolStatus) (\s@PoolInfo' {} a -> s {poolStatus = a} :: PoolInfo)++-- | Tape retention lock time is set in days. Tape retention lock can be+-- enabled for up to 100 years (36,500 days).+poolInfo_retentionLockTimeInDays :: Lens.Lens' PoolInfo (Prelude.Maybe Prelude.Natural)+poolInfo_retentionLockTimeInDays = Lens.lens (\PoolInfo' {retentionLockTimeInDays} -> retentionLockTimeInDays) (\s@PoolInfo' {} a -> s {retentionLockTimeInDays = a} :: PoolInfo)++-- | Tape retention lock type, which can be configured in two modes. When+-- configured in governance mode, Amazon Web Services accounts with+-- specific IAM permissions are authorized to remove the tape retention+-- lock from archived virtual tapes. When configured in compliance mode,+-- the tape retention lock cannot be removed by any user, including the+-- root Amazon Web Services account.+poolInfo_retentionLockType :: Lens.Lens' PoolInfo (Prelude.Maybe RetentionLockType)+poolInfo_retentionLockType = Lens.lens (\PoolInfo' {retentionLockType} -> retentionLockType) (\s@PoolInfo' {} a -> s {retentionLockType = a} :: PoolInfo)++-- | The storage class that is associated with the custom pool. When you use+-- your backup application to eject the tape, the tape is archived directly+-- into the storage class (S3 Glacier or S3 Glacier Deep Archive) that+-- corresponds to the pool.+poolInfo_storageClass :: Lens.Lens' PoolInfo (Prelude.Maybe TapeStorageClass)+poolInfo_storageClass = Lens.lens (\PoolInfo' {storageClass} -> storageClass) (\s@PoolInfo' {} a -> s {storageClass = a} :: PoolInfo)++instance Data.FromJSON PoolInfo where+ parseJSON =+ Data.withObject+ "PoolInfo"+ ( \x ->+ PoolInfo'+ Prelude.<$> (x Data..:? "PoolARN")+ Prelude.<*> (x Data..:? "PoolName")+ Prelude.<*> (x Data..:? "PoolStatus")+ Prelude.<*> (x Data..:? "RetentionLockTimeInDays")+ Prelude.<*> (x Data..:? "RetentionLockType")+ Prelude.<*> (x Data..:? "StorageClass")+ )++instance Prelude.Hashable PoolInfo where+ hashWithSalt _salt PoolInfo' {..} =+ _salt+ `Prelude.hashWithSalt` poolARN+ `Prelude.hashWithSalt` poolName+ `Prelude.hashWithSalt` poolStatus+ `Prelude.hashWithSalt` retentionLockTimeInDays+ `Prelude.hashWithSalt` retentionLockType+ `Prelude.hashWithSalt` storageClass++instance Prelude.NFData PoolInfo where+ rnf PoolInfo' {..} =+ Prelude.rnf poolARN+ `Prelude.seq` Prelude.rnf poolName+ `Prelude.seq` Prelude.rnf poolStatus+ `Prelude.seq` Prelude.rnf retentionLockTimeInDays+ `Prelude.seq` Prelude.rnf retentionLockType+ `Prelude.seq` Prelude.rnf storageClass
+ gen/Amazonka/StorageGateway/Types/PoolStatus.hs view
@@ -0,0 +1,71 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE GeneralizedNewtypeDeriving #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module : Amazonka.StorageGateway.Types.PoolStatus+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.StorageGateway.Types.PoolStatus+ ( PoolStatus+ ( ..,+ PoolStatus_ACTIVE,+ PoolStatus_DELETED+ ),+ )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Data as Data+import qualified Amazonka.Prelude as Prelude++newtype PoolStatus = PoolStatus'+ { fromPoolStatus ::+ Data.Text+ }+ deriving stock+ ( Prelude.Show,+ Prelude.Read,+ Prelude.Eq,+ Prelude.Ord,+ Prelude.Generic+ )+ deriving newtype+ ( Prelude.Hashable,+ Prelude.NFData,+ Data.FromText,+ Data.ToText,+ Data.ToByteString,+ Data.ToLog,+ Data.ToHeader,+ Data.ToQuery,+ Data.FromJSON,+ Data.FromJSONKey,+ Data.ToJSON,+ Data.ToJSONKey,+ Data.FromXML,+ Data.ToXML+ )++pattern PoolStatus_ACTIVE :: PoolStatus+pattern PoolStatus_ACTIVE = PoolStatus' "ACTIVE"++pattern PoolStatus_DELETED :: PoolStatus+pattern PoolStatus_DELETED = PoolStatus' "DELETED"++{-# COMPLETE+ PoolStatus_ACTIVE,+ PoolStatus_DELETED,+ PoolStatus'+ #-}
+ gen/Amazonka/StorageGateway/Types/RetentionLockType.hs view
@@ -0,0 +1,76 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE GeneralizedNewtypeDeriving #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module : Amazonka.StorageGateway.Types.RetentionLockType+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.StorageGateway.Types.RetentionLockType+ ( RetentionLockType+ ( ..,+ RetentionLockType_COMPLIANCE,+ RetentionLockType_GOVERNANCE,+ RetentionLockType_NONE+ ),+ )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Data as Data+import qualified Amazonka.Prelude as Prelude++newtype RetentionLockType = RetentionLockType'+ { fromRetentionLockType ::+ Data.Text+ }+ deriving stock+ ( Prelude.Show,+ Prelude.Read,+ Prelude.Eq,+ Prelude.Ord,+ Prelude.Generic+ )+ deriving newtype+ ( Prelude.Hashable,+ Prelude.NFData,+ Data.FromText,+ Data.ToText,+ Data.ToByteString,+ Data.ToLog,+ Data.ToHeader,+ Data.ToQuery,+ Data.FromJSON,+ Data.FromJSONKey,+ Data.ToJSON,+ Data.ToJSONKey,+ Data.FromXML,+ Data.ToXML+ )++pattern RetentionLockType_COMPLIANCE :: RetentionLockType+pattern RetentionLockType_COMPLIANCE = RetentionLockType' "COMPLIANCE"++pattern RetentionLockType_GOVERNANCE :: RetentionLockType+pattern RetentionLockType_GOVERNANCE = RetentionLockType' "GOVERNANCE"++pattern RetentionLockType_NONE :: RetentionLockType+pattern RetentionLockType_NONE = RetentionLockType' "NONE"++{-# COMPLETE+ RetentionLockType_COMPLIANCE,+ RetentionLockType_GOVERNANCE,+ RetentionLockType_NONE,+ RetentionLockType'+ #-}
@@ -0,0 +1,668 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# 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.Types.SMBFileShareInfo+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.StorageGateway.Types.SMBFileShareInfo 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 Amazonka.StorageGateway.Types.CacheAttributes+import Amazonka.StorageGateway.Types.CaseSensitivity+import Amazonka.StorageGateway.Types.ObjectACL+import Amazonka.StorageGateway.Types.Tag++-- | The Windows file permissions and ownership information assigned, by+-- default, to native S3 objects when S3 File Gateway discovers them in S3+-- buckets. This operation is only supported for S3 File Gateways.+--+-- /See:/ 'newSMBFileShareInfo' smart constructor.+data SMBFileShareInfo = SMBFileShareInfo'+ { -- | Indicates whether @AccessBasedEnumeration@ is enabled.+ accessBasedEnumeration :: Prelude.Maybe Prelude.Bool,+ -- | A list of users or groups in the Active Directory that have+ -- administrator rights to the file share. A group must be prefixed with+ -- the \@ character. Acceptable formats include: @DOMAIN\\User1@, @user1@,+ -- @\@group1@, and @\@DOMAIN\\group1@. Can only be set if Authentication is+ -- set to @ActiveDirectory@.+ adminUserList :: Prelude.Maybe [Prelude.Text],+ -- | The Amazon Resource Name (ARN) of the storage used for audit logs.+ auditDestinationARN :: Prelude.Maybe Prelude.Text,+ authentication :: Prelude.Maybe Prelude.Text,+ -- | Specifies the Region of the S3 bucket where the SMB file share stores+ -- files.+ --+ -- This parameter is required for SMB file shares that connect to Amazon S3+ -- through a VPC endpoint, a VPC access point, or an access point alias+ -- that points to a VPC access point.+ bucketRegion :: Prelude.Maybe Prelude.Text,+ -- | Refresh cache information for the file share.+ cacheAttributes :: Prelude.Maybe CacheAttributes,+ -- | The case of an object name in an Amazon S3 bucket. For+ -- @ClientSpecified@, the client determines the case sensitivity. For+ -- @CaseSensitive@, the gateway determines the case sensitivity. The+ -- default value is @ClientSpecified@.+ caseSensitivity :: Prelude.Maybe CaseSensitivity,+ -- | 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,+ fileShareARN :: Prelude.Maybe Prelude.Text,+ fileShareId :: 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,+ fileShareStatus :: Prelude.Maybe Prelude.Text,+ gatewayARN :: 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,+ -- | A list of users or groups in the Active Directory that are not allowed+ -- to access the file share. A group must be prefixed with the \@+ -- character. Acceptable formats include: @DOMAIN\\User1@, @user1@,+ -- @\@group1@, and @\@DOMAIN\\group1@. Can only be set if Authentication is+ -- set to @ActiveDirectory@.+ invalidUserList :: Prelude.Maybe [Prelude.Text],+ -- | 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,+ kmsKey :: Prelude.Maybe Prelude.Text,+ locationARN :: Prelude.Maybe Prelude.Text,+ -- | 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,+ objectACL :: Prelude.Maybe ObjectACL,+ -- | Specifies whether opportunistic locking is enabled for the SMB file+ -- share.+ --+ -- Enabling opportunistic locking on case-sensitive shares is not+ -- recommended for workloads that involve access to files with the same+ -- name in different case.+ --+ -- Valid Values: @true@ | @false@+ oplocksEnabled :: Prelude.Maybe Prelude.Bool,+ -- | The file share path used by the SMB client to identify the mount point.+ path :: Prelude.Maybe Prelude.Text,+ -- | 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,+ role' :: Prelude.Maybe Prelude.Text,+ -- | If this value is set to @true@, it indicates that access control list+ -- (ACL) is enabled on the SMB file share. If it is set to @false@, it+ -- indicates that file and directory permissions are mapped to the POSIX+ -- permission.+ --+ -- For more information, see+ -- <https://docs.aws.amazon.com/storagegateway/latest/userguide/smb-acl.html Using Microsoft Windows ACLs to control access to an SMB file share>+ -- in the /Storage Gateway User Guide/.+ sMBACLEnabled :: Prelude.Maybe Prelude.Bool,+ -- | A list of up to 50 tags assigned to the SMB file share, sorted+ -- alphabetically by key name. Each tag is a key-value pair. For a gateway+ -- with more than 10 tags assigned, you can view all tags using the+ -- @ListTagsForResource@ API operation.+ tags :: Prelude.Maybe [Tag],+ -- | Specifies the DNS name for the VPC endpoint that the SMB file share uses+ -- to connect to Amazon S3.+ --+ -- This parameter is required for SMB file shares that connect to Amazon S3+ -- through a VPC endpoint, a VPC access point, or an access point alias+ -- that points to a VPC access point.+ vPCEndpointDNSName :: Prelude.Maybe Prelude.Text,+ -- | A list of users or groups in the Active Directory that are allowed to+ -- access the file share. A group must be prefixed with the \@ character.+ -- Acceptable formats include: @DOMAIN\\User1@, @user1@, @\@group1@, and+ -- @\@DOMAIN\\group1@. Can only be set if Authentication is set to+ -- @ActiveDirectory@.+ validUserList :: Prelude.Maybe [Prelude.Text]+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'SMBFileShareInfo' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'accessBasedEnumeration', 'sMBFileShareInfo_accessBasedEnumeration' - Indicates whether @AccessBasedEnumeration@ is enabled.+--+-- 'adminUserList', 'sMBFileShareInfo_adminUserList' - A list of users or groups in the Active Directory that have+-- administrator rights to the file share. A group must be prefixed with+-- the \@ character. Acceptable formats include: @DOMAIN\\User1@, @user1@,+-- @\@group1@, and @\@DOMAIN\\group1@. Can only be set if Authentication is+-- set to @ActiveDirectory@.+--+-- 'auditDestinationARN', 'sMBFileShareInfo_auditDestinationARN' - The Amazon Resource Name (ARN) of the storage used for audit logs.+--+-- 'authentication', 'sMBFileShareInfo_authentication' - Undocumented member.+--+-- 'bucketRegion', 'sMBFileShareInfo_bucketRegion' - Specifies the Region of the S3 bucket where the SMB file share stores+-- files.+--+-- This parameter is required for SMB file shares that connect to Amazon S3+-- through a VPC endpoint, a VPC access point, or an access point alias+-- that points to a VPC access point.+--+-- 'cacheAttributes', 'sMBFileShareInfo_cacheAttributes' - Refresh cache information for the file share.+--+-- 'caseSensitivity', 'sMBFileShareInfo_caseSensitivity' - The case of an object name in an Amazon S3 bucket. For+-- @ClientSpecified@, the client determines the case sensitivity. For+-- @CaseSensitive@, the gateway determines the case sensitivity. The+-- default value is @ClientSpecified@.+--+-- 'defaultStorageClass', 'sMBFileShareInfo_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@+--+-- 'fileShareARN', 'sMBFileShareInfo_fileShareARN' - Undocumented member.+--+-- 'fileShareId', 'sMBFileShareInfo_fileShareId' - Undocumented member.+--+-- 'fileShareName', 'sMBFileShareInfo_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.+--+-- 'fileShareStatus', 'sMBFileShareInfo_fileShareStatus' - Undocumented member.+--+-- 'gatewayARN', 'sMBFileShareInfo_gatewayARN' - Undocumented member.+--+-- 'guessMIMETypeEnabled', 'sMBFileShareInfo_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@+--+-- 'invalidUserList', 'sMBFileShareInfo_invalidUserList' - A list of users or groups in the Active Directory that are not allowed+-- to access the file share. A group must be prefixed with the \@+-- character. Acceptable formats include: @DOMAIN\\User1@, @user1@,+-- @\@group1@, and @\@DOMAIN\\group1@. Can only be set if Authentication is+-- set to @ActiveDirectory@.+--+-- 'kmsEncrypted', 'sMBFileShareInfo_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', 'sMBFileShareInfo_kmsKey' - Undocumented member.+--+-- 'locationARN', 'sMBFileShareInfo_locationARN' - Undocumented member.+--+-- 'notificationPolicy', 'sMBFileShareInfo_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', 'sMBFileShareInfo_objectACL' - Undocumented member.+--+-- 'oplocksEnabled', 'sMBFileShareInfo_oplocksEnabled' - Specifies whether opportunistic locking is enabled for the SMB file+-- share.+--+-- Enabling opportunistic locking on case-sensitive shares is not+-- recommended for workloads that involve access to files with the same+-- name in different case.+--+-- Valid Values: @true@ | @false@+--+-- 'path', 'sMBFileShareInfo_path' - The file share path used by the SMB client to identify the mount point.+--+-- 'readOnly', 'sMBFileShareInfo_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', 'sMBFileShareInfo_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@+--+-- 'role'', 'sMBFileShareInfo_role' - Undocumented member.+--+-- 'sMBACLEnabled', 'sMBFileShareInfo_sMBACLEnabled' - If this value is set to @true@, it indicates that access control list+-- (ACL) is enabled on the SMB file share. If it is set to @false@, it+-- indicates that file and directory permissions are mapped to the POSIX+-- permission.+--+-- For more information, see+-- <https://docs.aws.amazon.com/storagegateway/latest/userguide/smb-acl.html Using Microsoft Windows ACLs to control access to an SMB file share>+-- in the /Storage Gateway User Guide/.+--+-- 'tags', 'sMBFileShareInfo_tags' - A list of up to 50 tags assigned to the SMB file share, sorted+-- alphabetically by key name. Each tag is a key-value pair. For a gateway+-- with more than 10 tags assigned, you can view all tags using the+-- @ListTagsForResource@ API operation.+--+-- 'vPCEndpointDNSName', 'sMBFileShareInfo_vPCEndpointDNSName' - Specifies the DNS name for the VPC endpoint that the SMB file share uses+-- to connect to Amazon S3.+--+-- This parameter is required for SMB file shares that connect to Amazon S3+-- through a VPC endpoint, a VPC access point, or an access point alias+-- that points to a VPC access point.+--+-- 'validUserList', 'sMBFileShareInfo_validUserList' - A list of users or groups in the Active Directory that are allowed to+-- access the file share. A group must be prefixed with the \@ character.+-- Acceptable formats include: @DOMAIN\\User1@, @user1@, @\@group1@, and+-- @\@DOMAIN\\group1@. Can only be set if Authentication is set to+-- @ActiveDirectory@.+newSMBFileShareInfo ::+ SMBFileShareInfo+newSMBFileShareInfo =+ SMBFileShareInfo'+ { accessBasedEnumeration =+ Prelude.Nothing,+ adminUserList = Prelude.Nothing,+ auditDestinationARN = Prelude.Nothing,+ authentication = Prelude.Nothing,+ bucketRegion = Prelude.Nothing,+ cacheAttributes = Prelude.Nothing,+ caseSensitivity = Prelude.Nothing,+ defaultStorageClass = Prelude.Nothing,+ fileShareARN = Prelude.Nothing,+ fileShareId = Prelude.Nothing,+ fileShareName = Prelude.Nothing,+ fileShareStatus = Prelude.Nothing,+ gatewayARN = Prelude.Nothing,+ guessMIMETypeEnabled = Prelude.Nothing,+ invalidUserList = Prelude.Nothing,+ kmsEncrypted = Prelude.Nothing,+ kmsKey = Prelude.Nothing,+ locationARN = Prelude.Nothing,+ notificationPolicy = Prelude.Nothing,+ objectACL = Prelude.Nothing,+ oplocksEnabled = Prelude.Nothing,+ path = Prelude.Nothing,+ readOnly = Prelude.Nothing,+ requesterPays = Prelude.Nothing,+ role' = Prelude.Nothing,+ sMBACLEnabled = Prelude.Nothing,+ tags = Prelude.Nothing,+ vPCEndpointDNSName = Prelude.Nothing,+ validUserList = Prelude.Nothing+ }++-- | Indicates whether @AccessBasedEnumeration@ is enabled.+sMBFileShareInfo_accessBasedEnumeration :: Lens.Lens' SMBFileShareInfo (Prelude.Maybe Prelude.Bool)+sMBFileShareInfo_accessBasedEnumeration = Lens.lens (\SMBFileShareInfo' {accessBasedEnumeration} -> accessBasedEnumeration) (\s@SMBFileShareInfo' {} a -> s {accessBasedEnumeration = a} :: SMBFileShareInfo)++-- | A list of users or groups in the Active Directory that have+-- administrator rights to the file share. A group must be prefixed with+-- the \@ character. Acceptable formats include: @DOMAIN\\User1@, @user1@,+-- @\@group1@, and @\@DOMAIN\\group1@. Can only be set if Authentication is+-- set to @ActiveDirectory@.+sMBFileShareInfo_adminUserList :: Lens.Lens' SMBFileShareInfo (Prelude.Maybe [Prelude.Text])+sMBFileShareInfo_adminUserList = Lens.lens (\SMBFileShareInfo' {adminUserList} -> adminUserList) (\s@SMBFileShareInfo' {} a -> s {adminUserList = a} :: SMBFileShareInfo) Prelude.. Lens.mapping Lens.coerced++-- | The Amazon Resource Name (ARN) of the storage used for audit logs.+sMBFileShareInfo_auditDestinationARN :: Lens.Lens' SMBFileShareInfo (Prelude.Maybe Prelude.Text)+sMBFileShareInfo_auditDestinationARN = Lens.lens (\SMBFileShareInfo' {auditDestinationARN} -> auditDestinationARN) (\s@SMBFileShareInfo' {} a -> s {auditDestinationARN = a} :: SMBFileShareInfo)++-- | Undocumented member.+sMBFileShareInfo_authentication :: Lens.Lens' SMBFileShareInfo (Prelude.Maybe Prelude.Text)+sMBFileShareInfo_authentication = Lens.lens (\SMBFileShareInfo' {authentication} -> authentication) (\s@SMBFileShareInfo' {} a -> s {authentication = a} :: SMBFileShareInfo)++-- | Specifies the Region of the S3 bucket where the SMB file share stores+-- files.+--+-- This parameter is required for SMB file shares that connect to Amazon S3+-- through a VPC endpoint, a VPC access point, or an access point alias+-- that points to a VPC access point.+sMBFileShareInfo_bucketRegion :: Lens.Lens' SMBFileShareInfo (Prelude.Maybe Prelude.Text)+sMBFileShareInfo_bucketRegion = Lens.lens (\SMBFileShareInfo' {bucketRegion} -> bucketRegion) (\s@SMBFileShareInfo' {} a -> s {bucketRegion = a} :: SMBFileShareInfo)++-- | Refresh cache information for the file share.+sMBFileShareInfo_cacheAttributes :: Lens.Lens' SMBFileShareInfo (Prelude.Maybe CacheAttributes)+sMBFileShareInfo_cacheAttributes = Lens.lens (\SMBFileShareInfo' {cacheAttributes} -> cacheAttributes) (\s@SMBFileShareInfo' {} a -> s {cacheAttributes = a} :: SMBFileShareInfo)++-- | The case of an object name in an Amazon S3 bucket. For+-- @ClientSpecified@, the client determines the case sensitivity. For+-- @CaseSensitive@, the gateway determines the case sensitivity. The+-- default value is @ClientSpecified@.+sMBFileShareInfo_caseSensitivity :: Lens.Lens' SMBFileShareInfo (Prelude.Maybe CaseSensitivity)+sMBFileShareInfo_caseSensitivity = Lens.lens (\SMBFileShareInfo' {caseSensitivity} -> caseSensitivity) (\s@SMBFileShareInfo' {} a -> s {caseSensitivity = a} :: SMBFileShareInfo)++-- | 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@+sMBFileShareInfo_defaultStorageClass :: Lens.Lens' SMBFileShareInfo (Prelude.Maybe Prelude.Text)+sMBFileShareInfo_defaultStorageClass = Lens.lens (\SMBFileShareInfo' {defaultStorageClass} -> defaultStorageClass) (\s@SMBFileShareInfo' {} a -> s {defaultStorageClass = a} :: SMBFileShareInfo)++-- | Undocumented member.+sMBFileShareInfo_fileShareARN :: Lens.Lens' SMBFileShareInfo (Prelude.Maybe Prelude.Text)+sMBFileShareInfo_fileShareARN = Lens.lens (\SMBFileShareInfo' {fileShareARN} -> fileShareARN) (\s@SMBFileShareInfo' {} a -> s {fileShareARN = a} :: SMBFileShareInfo)++-- | Undocumented member.+sMBFileShareInfo_fileShareId :: Lens.Lens' SMBFileShareInfo (Prelude.Maybe Prelude.Text)+sMBFileShareInfo_fileShareId = Lens.lens (\SMBFileShareInfo' {fileShareId} -> fileShareId) (\s@SMBFileShareInfo' {} a -> s {fileShareId = a} :: SMBFileShareInfo)++-- | 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.+sMBFileShareInfo_fileShareName :: Lens.Lens' SMBFileShareInfo (Prelude.Maybe Prelude.Text)+sMBFileShareInfo_fileShareName = Lens.lens (\SMBFileShareInfo' {fileShareName} -> fileShareName) (\s@SMBFileShareInfo' {} a -> s {fileShareName = a} :: SMBFileShareInfo)++-- | Undocumented member.+sMBFileShareInfo_fileShareStatus :: Lens.Lens' SMBFileShareInfo (Prelude.Maybe Prelude.Text)+sMBFileShareInfo_fileShareStatus = Lens.lens (\SMBFileShareInfo' {fileShareStatus} -> fileShareStatus) (\s@SMBFileShareInfo' {} a -> s {fileShareStatus = a} :: SMBFileShareInfo)++-- | Undocumented member.+sMBFileShareInfo_gatewayARN :: Lens.Lens' SMBFileShareInfo (Prelude.Maybe Prelude.Text)+sMBFileShareInfo_gatewayARN = Lens.lens (\SMBFileShareInfo' {gatewayARN} -> gatewayARN) (\s@SMBFileShareInfo' {} a -> s {gatewayARN = a} :: SMBFileShareInfo)++-- | 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@+sMBFileShareInfo_guessMIMETypeEnabled :: Lens.Lens' SMBFileShareInfo (Prelude.Maybe Prelude.Bool)+sMBFileShareInfo_guessMIMETypeEnabled = Lens.lens (\SMBFileShareInfo' {guessMIMETypeEnabled} -> guessMIMETypeEnabled) (\s@SMBFileShareInfo' {} a -> s {guessMIMETypeEnabled = a} :: SMBFileShareInfo)++-- | A list of users or groups in the Active Directory that are not allowed+-- to access the file share. A group must be prefixed with the \@+-- character. Acceptable formats include: @DOMAIN\\User1@, @user1@,+-- @\@group1@, and @\@DOMAIN\\group1@. Can only be set if Authentication is+-- set to @ActiveDirectory@.+sMBFileShareInfo_invalidUserList :: Lens.Lens' SMBFileShareInfo (Prelude.Maybe [Prelude.Text])+sMBFileShareInfo_invalidUserList = Lens.lens (\SMBFileShareInfo' {invalidUserList} -> invalidUserList) (\s@SMBFileShareInfo' {} a -> s {invalidUserList = a} :: SMBFileShareInfo) Prelude.. Lens.mapping Lens.coerced++-- | 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@+sMBFileShareInfo_kmsEncrypted :: Lens.Lens' SMBFileShareInfo (Prelude.Maybe Prelude.Bool)+sMBFileShareInfo_kmsEncrypted = Lens.lens (\SMBFileShareInfo' {kmsEncrypted} -> kmsEncrypted) (\s@SMBFileShareInfo' {} a -> s {kmsEncrypted = a} :: SMBFileShareInfo)++-- | Undocumented member.+sMBFileShareInfo_kmsKey :: Lens.Lens' SMBFileShareInfo (Prelude.Maybe Prelude.Text)+sMBFileShareInfo_kmsKey = Lens.lens (\SMBFileShareInfo' {kmsKey} -> kmsKey) (\s@SMBFileShareInfo' {} a -> s {kmsKey = a} :: SMBFileShareInfo)++-- | Undocumented member.+sMBFileShareInfo_locationARN :: Lens.Lens' SMBFileShareInfo (Prelude.Maybe Prelude.Text)+sMBFileShareInfo_locationARN = Lens.lens (\SMBFileShareInfo' {locationARN} -> locationARN) (\s@SMBFileShareInfo' {} a -> s {locationARN = a} :: SMBFileShareInfo)++-- | 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.+--+-- @{}@+sMBFileShareInfo_notificationPolicy :: Lens.Lens' SMBFileShareInfo (Prelude.Maybe Prelude.Text)+sMBFileShareInfo_notificationPolicy = Lens.lens (\SMBFileShareInfo' {notificationPolicy} -> notificationPolicy) (\s@SMBFileShareInfo' {} a -> s {notificationPolicy = a} :: SMBFileShareInfo)++-- | Undocumented member.+sMBFileShareInfo_objectACL :: Lens.Lens' SMBFileShareInfo (Prelude.Maybe ObjectACL)+sMBFileShareInfo_objectACL = Lens.lens (\SMBFileShareInfo' {objectACL} -> objectACL) (\s@SMBFileShareInfo' {} a -> s {objectACL = a} :: SMBFileShareInfo)++-- | Specifies whether opportunistic locking is enabled for the SMB file+-- share.+--+-- Enabling opportunistic locking on case-sensitive shares is not+-- recommended for workloads that involve access to files with the same+-- name in different case.+--+-- Valid Values: @true@ | @false@+sMBFileShareInfo_oplocksEnabled :: Lens.Lens' SMBFileShareInfo (Prelude.Maybe Prelude.Bool)+sMBFileShareInfo_oplocksEnabled = Lens.lens (\SMBFileShareInfo' {oplocksEnabled} -> oplocksEnabled) (\s@SMBFileShareInfo' {} a -> s {oplocksEnabled = a} :: SMBFileShareInfo)++-- | The file share path used by the SMB client to identify the mount point.+sMBFileShareInfo_path :: Lens.Lens' SMBFileShareInfo (Prelude.Maybe Prelude.Text)+sMBFileShareInfo_path = Lens.lens (\SMBFileShareInfo' {path} -> path) (\s@SMBFileShareInfo' {} a -> s {path = a} :: SMBFileShareInfo)++-- | 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@+sMBFileShareInfo_readOnly :: Lens.Lens' SMBFileShareInfo (Prelude.Maybe Prelude.Bool)+sMBFileShareInfo_readOnly = Lens.lens (\SMBFileShareInfo' {readOnly} -> readOnly) (\s@SMBFileShareInfo' {} a -> s {readOnly = a} :: SMBFileShareInfo)++-- | 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@+sMBFileShareInfo_requesterPays :: Lens.Lens' SMBFileShareInfo (Prelude.Maybe Prelude.Bool)+sMBFileShareInfo_requesterPays = Lens.lens (\SMBFileShareInfo' {requesterPays} -> requesterPays) (\s@SMBFileShareInfo' {} a -> s {requesterPays = a} :: SMBFileShareInfo)++-- | Undocumented member.+sMBFileShareInfo_role :: Lens.Lens' SMBFileShareInfo (Prelude.Maybe Prelude.Text)+sMBFileShareInfo_role = Lens.lens (\SMBFileShareInfo' {role'} -> role') (\s@SMBFileShareInfo' {} a -> s {role' = a} :: SMBFileShareInfo)++-- | If this value is set to @true@, it indicates that access control list+-- (ACL) is enabled on the SMB file share. If it is set to @false@, it+-- indicates that file and directory permissions are mapped to the POSIX+-- permission.+--+-- For more information, see+-- <https://docs.aws.amazon.com/storagegateway/latest/userguide/smb-acl.html Using Microsoft Windows ACLs to control access to an SMB file share>+-- in the /Storage Gateway User Guide/.+sMBFileShareInfo_sMBACLEnabled :: Lens.Lens' SMBFileShareInfo (Prelude.Maybe Prelude.Bool)+sMBFileShareInfo_sMBACLEnabled = Lens.lens (\SMBFileShareInfo' {sMBACLEnabled} -> sMBACLEnabled) (\s@SMBFileShareInfo' {} a -> s {sMBACLEnabled = a} :: SMBFileShareInfo)++-- | A list of up to 50 tags assigned to the SMB file share, sorted+-- alphabetically by key name. Each tag is a key-value pair. For a gateway+-- with more than 10 tags assigned, you can view all tags using the+-- @ListTagsForResource@ API operation.+sMBFileShareInfo_tags :: Lens.Lens' SMBFileShareInfo (Prelude.Maybe [Tag])+sMBFileShareInfo_tags = Lens.lens (\SMBFileShareInfo' {tags} -> tags) (\s@SMBFileShareInfo' {} a -> s {tags = a} :: SMBFileShareInfo) Prelude.. Lens.mapping Lens.coerced++-- | Specifies the DNS name for the VPC endpoint that the SMB file share uses+-- to connect to Amazon S3.+--+-- This parameter is required for SMB file shares that connect to Amazon S3+-- through a VPC endpoint, a VPC access point, or an access point alias+-- that points to a VPC access point.+sMBFileShareInfo_vPCEndpointDNSName :: Lens.Lens' SMBFileShareInfo (Prelude.Maybe Prelude.Text)+sMBFileShareInfo_vPCEndpointDNSName = Lens.lens (\SMBFileShareInfo' {vPCEndpointDNSName} -> vPCEndpointDNSName) (\s@SMBFileShareInfo' {} a -> s {vPCEndpointDNSName = a} :: SMBFileShareInfo)++-- | A list of users or groups in the Active Directory that are allowed to+-- access the file share. A group must be prefixed with the \@ character.+-- Acceptable formats include: @DOMAIN\\User1@, @user1@, @\@group1@, and+-- @\@DOMAIN\\group1@. Can only be set if Authentication is set to+-- @ActiveDirectory@.+sMBFileShareInfo_validUserList :: Lens.Lens' SMBFileShareInfo (Prelude.Maybe [Prelude.Text])+sMBFileShareInfo_validUserList = Lens.lens (\SMBFileShareInfo' {validUserList} -> validUserList) (\s@SMBFileShareInfo' {} a -> s {validUserList = a} :: SMBFileShareInfo) Prelude.. Lens.mapping Lens.coerced++instance Data.FromJSON SMBFileShareInfo where+ parseJSON =+ Data.withObject+ "SMBFileShareInfo"+ ( \x ->+ SMBFileShareInfo'+ Prelude.<$> (x Data..:? "AccessBasedEnumeration")+ Prelude.<*> (x Data..:? "AdminUserList" Data..!= Prelude.mempty)+ Prelude.<*> (x Data..:? "AuditDestinationARN")+ Prelude.<*> (x Data..:? "Authentication")+ Prelude.<*> (x Data..:? "BucketRegion")+ Prelude.<*> (x Data..:? "CacheAttributes")+ Prelude.<*> (x Data..:? "CaseSensitivity")+ Prelude.<*> (x Data..:? "DefaultStorageClass")+ Prelude.<*> (x Data..:? "FileShareARN")+ Prelude.<*> (x Data..:? "FileShareId")+ Prelude.<*> (x Data..:? "FileShareName")+ Prelude.<*> (x Data..:? "FileShareStatus")+ Prelude.<*> (x Data..:? "GatewayARN")+ Prelude.<*> (x Data..:? "GuessMIMETypeEnabled")+ Prelude.<*> ( x+ Data..:? "InvalidUserList"+ Data..!= Prelude.mempty+ )+ Prelude.<*> (x Data..:? "KMSEncrypted")+ Prelude.<*> (x Data..:? "KMSKey")+ Prelude.<*> (x Data..:? "LocationARN")+ Prelude.<*> (x Data..:? "NotificationPolicy")+ Prelude.<*> (x Data..:? "ObjectACL")+ Prelude.<*> (x Data..:? "OplocksEnabled")+ Prelude.<*> (x Data..:? "Path")+ Prelude.<*> (x Data..:? "ReadOnly")+ Prelude.<*> (x Data..:? "RequesterPays")+ Prelude.<*> (x Data..:? "Role")+ Prelude.<*> (x Data..:? "SMBACLEnabled")+ Prelude.<*> (x Data..:? "Tags" Data..!= Prelude.mempty)+ Prelude.<*> (x Data..:? "VPCEndpointDNSName")+ Prelude.<*> (x Data..:? "ValidUserList" Data..!= Prelude.mempty)+ )++instance Prelude.Hashable SMBFileShareInfo where+ hashWithSalt _salt SMBFileShareInfo' {..} =+ _salt+ `Prelude.hashWithSalt` accessBasedEnumeration+ `Prelude.hashWithSalt` adminUserList+ `Prelude.hashWithSalt` auditDestinationARN+ `Prelude.hashWithSalt` authentication+ `Prelude.hashWithSalt` bucketRegion+ `Prelude.hashWithSalt` cacheAttributes+ `Prelude.hashWithSalt` caseSensitivity+ `Prelude.hashWithSalt` defaultStorageClass+ `Prelude.hashWithSalt` fileShareARN+ `Prelude.hashWithSalt` fileShareId+ `Prelude.hashWithSalt` fileShareName+ `Prelude.hashWithSalt` fileShareStatus+ `Prelude.hashWithSalt` gatewayARN+ `Prelude.hashWithSalt` guessMIMETypeEnabled+ `Prelude.hashWithSalt` invalidUserList+ `Prelude.hashWithSalt` kmsEncrypted+ `Prelude.hashWithSalt` kmsKey+ `Prelude.hashWithSalt` locationARN+ `Prelude.hashWithSalt` notificationPolicy+ `Prelude.hashWithSalt` objectACL+ `Prelude.hashWithSalt` oplocksEnabled+ `Prelude.hashWithSalt` path+ `Prelude.hashWithSalt` readOnly+ `Prelude.hashWithSalt` requesterPays+ `Prelude.hashWithSalt` role'+ `Prelude.hashWithSalt` sMBACLEnabled+ `Prelude.hashWithSalt` tags+ `Prelude.hashWithSalt` vPCEndpointDNSName+ `Prelude.hashWithSalt` validUserList++instance Prelude.NFData SMBFileShareInfo where+ rnf SMBFileShareInfo' {..} =+ Prelude.rnf accessBasedEnumeration+ `Prelude.seq` Prelude.rnf adminUserList+ `Prelude.seq` Prelude.rnf auditDestinationARN+ `Prelude.seq` Prelude.rnf authentication+ `Prelude.seq` Prelude.rnf bucketRegion+ `Prelude.seq` Prelude.rnf cacheAttributes+ `Prelude.seq` Prelude.rnf caseSensitivity+ `Prelude.seq` Prelude.rnf defaultStorageClass+ `Prelude.seq` Prelude.rnf fileShareARN+ `Prelude.seq` Prelude.rnf fileShareId+ `Prelude.seq` Prelude.rnf fileShareName+ `Prelude.seq` Prelude.rnf fileShareStatus+ `Prelude.seq` Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf guessMIMETypeEnabled+ `Prelude.seq` Prelude.rnf invalidUserList+ `Prelude.seq` Prelude.rnf kmsEncrypted+ `Prelude.seq` Prelude.rnf kmsKey+ `Prelude.seq` Prelude.rnf locationARN+ `Prelude.seq` Prelude.rnf notificationPolicy+ `Prelude.seq` Prelude.rnf objectACL+ `Prelude.seq` Prelude.rnf oplocksEnabled+ `Prelude.seq` Prelude.rnf path+ `Prelude.seq` Prelude.rnf readOnly+ `Prelude.seq` Prelude.rnf+ requesterPays+ `Prelude.seq` Prelude.rnf role'+ `Prelude.seq` Prelude.rnf+ sMBACLEnabled+ `Prelude.seq` Prelude.rnf tags+ `Prelude.seq` Prelude.rnf+ vPCEndpointDNSName+ `Prelude.seq` Prelude.rnf+ validUserList
+ gen/Amazonka/StorageGateway/Types/SMBLocalGroups.hs view
@@ -0,0 +1,93 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# 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.Types.SMBLocalGroups+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.StorageGateway.Types.SMBLocalGroups 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++-- | A list of Active Directory users and groups that have special+-- permissions for SMB file shares on the gateway.+--+-- /See:/ 'newSMBLocalGroups' smart constructor.+data SMBLocalGroups = SMBLocalGroups'+ { -- | A list of Active Directory users and groups that have local Gateway+ -- Admin permissions. Acceptable formats include: @DOMAIN\\User1@, @user1@,+ -- @DOMAIN\\group1@, and @group1@.+ --+ -- Gateway Admins can use the Shared Folders Microsoft Management Console+ -- snap-in to force-close files that are open and locked.+ gatewayAdmins :: Prelude.Maybe [Prelude.Text]+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'SMBLocalGroups' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayAdmins', 'sMBLocalGroups_gatewayAdmins' - A list of Active Directory users and groups that have local Gateway+-- Admin permissions. Acceptable formats include: @DOMAIN\\User1@, @user1@,+-- @DOMAIN\\group1@, and @group1@.+--+-- Gateway Admins can use the Shared Folders Microsoft Management Console+-- snap-in to force-close files that are open and locked.+newSMBLocalGroups ::+ SMBLocalGroups+newSMBLocalGroups =+ SMBLocalGroups' {gatewayAdmins = Prelude.Nothing}++-- | A list of Active Directory users and groups that have local Gateway+-- Admin permissions. Acceptable formats include: @DOMAIN\\User1@, @user1@,+-- @DOMAIN\\group1@, and @group1@.+--+-- Gateway Admins can use the Shared Folders Microsoft Management Console+-- snap-in to force-close files that are open and locked.+sMBLocalGroups_gatewayAdmins :: Lens.Lens' SMBLocalGroups (Prelude.Maybe [Prelude.Text])+sMBLocalGroups_gatewayAdmins = Lens.lens (\SMBLocalGroups' {gatewayAdmins} -> gatewayAdmins) (\s@SMBLocalGroups' {} a -> s {gatewayAdmins = a} :: SMBLocalGroups) Prelude.. Lens.mapping Lens.coerced++instance Data.FromJSON SMBLocalGroups where+ parseJSON =+ Data.withObject+ "SMBLocalGroups"+ ( \x ->+ SMBLocalGroups'+ Prelude.<$> (x Data..:? "GatewayAdmins" Data..!= Prelude.mempty)+ )++instance Prelude.Hashable SMBLocalGroups where+ hashWithSalt _salt SMBLocalGroups' {..} =+ _salt `Prelude.hashWithSalt` gatewayAdmins++instance Prelude.NFData SMBLocalGroups where+ rnf SMBLocalGroups' {..} = Prelude.rnf gatewayAdmins++instance Data.ToJSON SMBLocalGroups where+ toJSON SMBLocalGroups' {..} =+ Data.object+ ( Prelude.catMaybes+ [ ("GatewayAdmins" Data..=)+ Prelude.<$> gatewayAdmins+ ]+ )
+ gen/Amazonka/StorageGateway/Types/SMBSecurityStrategy.hs view
@@ -0,0 +1,76 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE GeneralizedNewtypeDeriving #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module : Amazonka.StorageGateway.Types.SMBSecurityStrategy+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.StorageGateway.Types.SMBSecurityStrategy+ ( SMBSecurityStrategy+ ( ..,+ SMBSecurityStrategy_ClientSpecified,+ SMBSecurityStrategy_MandatoryEncryption,+ SMBSecurityStrategy_MandatorySigning+ ),+ )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Data as Data+import qualified Amazonka.Prelude as Prelude++newtype SMBSecurityStrategy = SMBSecurityStrategy'+ { fromSMBSecurityStrategy ::+ Data.Text+ }+ deriving stock+ ( Prelude.Show,+ Prelude.Read,+ Prelude.Eq,+ Prelude.Ord,+ Prelude.Generic+ )+ deriving newtype+ ( Prelude.Hashable,+ Prelude.NFData,+ Data.FromText,+ Data.ToText,+ Data.ToByteString,+ Data.ToLog,+ Data.ToHeader,+ Data.ToQuery,+ Data.FromJSON,+ Data.FromJSONKey,+ Data.ToJSON,+ Data.ToJSONKey,+ Data.FromXML,+ Data.ToXML+ )++pattern SMBSecurityStrategy_ClientSpecified :: SMBSecurityStrategy+pattern SMBSecurityStrategy_ClientSpecified = SMBSecurityStrategy' "ClientSpecified"++pattern SMBSecurityStrategy_MandatoryEncryption :: SMBSecurityStrategy+pattern SMBSecurityStrategy_MandatoryEncryption = SMBSecurityStrategy' "MandatoryEncryption"++pattern SMBSecurityStrategy_MandatorySigning :: SMBSecurityStrategy+pattern SMBSecurityStrategy_MandatorySigning = SMBSecurityStrategy' "MandatorySigning"++{-# COMPLETE+ SMBSecurityStrategy_ClientSpecified,+ SMBSecurityStrategy_MandatoryEncryption,+ SMBSecurityStrategy_MandatorySigning,+ SMBSecurityStrategy'+ #-}
+ gen/Amazonka/StorageGateway/Types/StorediSCSIVolume.hs view
@@ -0,0 +1,333 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# 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.Types.StorediSCSIVolume+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.StorageGateway.Types.StorediSCSIVolume 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 Amazonka.StorageGateway.Types.VolumeiSCSIAttributes++-- | Describes an iSCSI stored volume.+--+-- /See:/ 'newStorediSCSIVolume' smart constructor.+data StorediSCSIVolume = StorediSCSIVolume'+ { -- | The date the volume was created. Volumes created prior to March 28, 2017+ -- don’t have this timestamp.+ createdDate :: Prelude.Maybe Data.POSIX,+ kmsKey :: Prelude.Maybe Prelude.Text,+ -- | Indicates if when the stored volume was created, existing data on the+ -- underlying local disk was preserved.+ --+ -- Valid Values: @true@ | @false@+ preservedExistingData :: Prelude.Maybe Prelude.Bool,+ -- | If the stored volume was created from a snapshot, this field contains+ -- the snapshot ID used, e.g. snap-78e22663. Otherwise, this field is not+ -- included.+ sourceSnapshotId :: Prelude.Maybe Prelude.Text,+ -- | The name of the iSCSI target used by an initiator to connect to a volume+ -- and used as a suffix for the target ARN. For example, specifying+ -- @TargetName@ as /myvolume/ results in the target ARN of+ -- @arn:aws:storagegateway:us-east-2:111122223333:gateway\/sgw-12A3456B\/target\/iqn.1997-05.com.amazon:myvolume@.+ -- The target name must be unique across all volumes on a gateway.+ --+ -- If you don\'t specify a value, Storage Gateway uses the value that was+ -- previously used for this volume as the new target name.+ targetName :: Prelude.Maybe Prelude.Text,+ -- | The Amazon Resource Name (ARN) of the storage volume.+ volumeARN :: Prelude.Maybe Prelude.Text,+ -- | A value that indicates whether a storage volume is attached to, detached+ -- from, or is in the process of detaching from a gateway. For more+ -- information, see+ -- <https://docs.aws.amazon.com/storagegateway/latest/userguide/managing-volumes.html#attach-detach-volume Moving your volumes to a different gateway>.+ volumeAttachmentStatus :: Prelude.Maybe Prelude.Text,+ -- | The ID of the local disk that was specified in the+ -- CreateStorediSCSIVolume operation.+ volumeDiskId :: Prelude.Maybe Prelude.Text,+ -- | The unique identifier of the volume, e.g., vol-AE4B946D.+ volumeId :: Prelude.Maybe Prelude.Text,+ -- | Represents the percentage complete if the volume is restoring or+ -- bootstrapping that represents the percent of data transferred. This+ -- field does not appear in the response if the stored volume is not+ -- restoring or bootstrapping.+ volumeProgress :: Prelude.Maybe Prelude.Double,+ -- | The size of the volume in bytes.+ volumeSizeInBytes :: Prelude.Maybe Prelude.Integer,+ -- | One of the VolumeStatus values that indicates the state of the storage+ -- volume.+ volumeStatus :: Prelude.Maybe Prelude.Text,+ -- | One of the VolumeType enumeration values describing the type of the+ -- volume.+ volumeType :: Prelude.Maybe Prelude.Text,+ -- | The size of the data stored on the volume in bytes. This value is+ -- calculated based on the number of blocks that are touched, instead of+ -- the actual amount of data written. This value can be useful for+ -- sequential write patterns but less accurate for random write patterns.+ -- @VolumeUsedInBytes@ is different from the compressed size of the volume,+ -- which is the value that is used to calculate your bill.+ --+ -- This value is not available for volumes created prior to May 13, 2015,+ -- until you store data on the volume.+ volumeUsedInBytes :: Prelude.Maybe Prelude.Integer,+ -- | An VolumeiSCSIAttributes object that represents a collection of iSCSI+ -- attributes for one stored volume.+ volumeiSCSIAttributes :: Prelude.Maybe VolumeiSCSIAttributes+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'StorediSCSIVolume' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'createdDate', 'storediSCSIVolume_createdDate' - The date the volume was created. Volumes created prior to March 28, 2017+-- don’t have this timestamp.+--+-- 'kmsKey', 'storediSCSIVolume_kmsKey' - Undocumented member.+--+-- 'preservedExistingData', 'storediSCSIVolume_preservedExistingData' - Indicates if when the stored volume was created, existing data on the+-- underlying local disk was preserved.+--+-- Valid Values: @true@ | @false@+--+-- 'sourceSnapshotId', 'storediSCSIVolume_sourceSnapshotId' - If the stored volume was created from a snapshot, this field contains+-- the snapshot ID used, e.g. snap-78e22663. Otherwise, this field is not+-- included.+--+-- 'targetName', 'storediSCSIVolume_targetName' - The name of the iSCSI target used by an initiator to connect to a volume+-- and used as a suffix for the target ARN. For example, specifying+-- @TargetName@ as /myvolume/ results in the target ARN of+-- @arn:aws:storagegateway:us-east-2:111122223333:gateway\/sgw-12A3456B\/target\/iqn.1997-05.com.amazon:myvolume@.+-- The target name must be unique across all volumes on a gateway.+--+-- If you don\'t specify a value, Storage Gateway uses the value that was+-- previously used for this volume as the new target name.+--+-- 'volumeARN', 'storediSCSIVolume_volumeARN' - The Amazon Resource Name (ARN) of the storage volume.+--+-- 'volumeAttachmentStatus', 'storediSCSIVolume_volumeAttachmentStatus' - A value that indicates whether a storage volume is attached to, detached+-- from, or is in the process of detaching from a gateway. For more+-- information, see+-- <https://docs.aws.amazon.com/storagegateway/latest/userguide/managing-volumes.html#attach-detach-volume Moving your volumes to a different gateway>.+--+-- 'volumeDiskId', 'storediSCSIVolume_volumeDiskId' - The ID of the local disk that was specified in the+-- CreateStorediSCSIVolume operation.+--+-- 'volumeId', 'storediSCSIVolume_volumeId' - The unique identifier of the volume, e.g., vol-AE4B946D.+--+-- 'volumeProgress', 'storediSCSIVolume_volumeProgress' - Represents the percentage complete if the volume is restoring or+-- bootstrapping that represents the percent of data transferred. This+-- field does not appear in the response if the stored volume is not+-- restoring or bootstrapping.+--+-- 'volumeSizeInBytes', 'storediSCSIVolume_volumeSizeInBytes' - The size of the volume in bytes.+--+-- 'volumeStatus', 'storediSCSIVolume_volumeStatus' - One of the VolumeStatus values that indicates the state of the storage+-- volume.+--+-- 'volumeType', 'storediSCSIVolume_volumeType' - One of the VolumeType enumeration values describing the type of the+-- volume.+--+-- 'volumeUsedInBytes', 'storediSCSIVolume_volumeUsedInBytes' - The size of the data stored on the volume in bytes. This value is+-- calculated based on the number of blocks that are touched, instead of+-- the actual amount of data written. This value can be useful for+-- sequential write patterns but less accurate for random write patterns.+-- @VolumeUsedInBytes@ is different from the compressed size of the volume,+-- which is the value that is used to calculate your bill.+--+-- This value is not available for volumes created prior to May 13, 2015,+-- until you store data on the volume.+--+-- 'volumeiSCSIAttributes', 'storediSCSIVolume_volumeiSCSIAttributes' - An VolumeiSCSIAttributes object that represents a collection of iSCSI+-- attributes for one stored volume.+newStorediSCSIVolume ::+ StorediSCSIVolume+newStorediSCSIVolume =+ StorediSCSIVolume'+ { createdDate = Prelude.Nothing,+ kmsKey = Prelude.Nothing,+ preservedExistingData = Prelude.Nothing,+ sourceSnapshotId = Prelude.Nothing,+ targetName = Prelude.Nothing,+ volumeARN = Prelude.Nothing,+ volumeAttachmentStatus = Prelude.Nothing,+ volumeDiskId = Prelude.Nothing,+ volumeId = Prelude.Nothing,+ volumeProgress = Prelude.Nothing,+ volumeSizeInBytes = Prelude.Nothing,+ volumeStatus = Prelude.Nothing,+ volumeType = Prelude.Nothing,+ volumeUsedInBytes = Prelude.Nothing,+ volumeiSCSIAttributes = Prelude.Nothing+ }++-- | The date the volume was created. Volumes created prior to March 28, 2017+-- don’t have this timestamp.+storediSCSIVolume_createdDate :: Lens.Lens' StorediSCSIVolume (Prelude.Maybe Prelude.UTCTime)+storediSCSIVolume_createdDate = Lens.lens (\StorediSCSIVolume' {createdDate} -> createdDate) (\s@StorediSCSIVolume' {} a -> s {createdDate = a} :: StorediSCSIVolume) Prelude.. Lens.mapping Data._Time++-- | Undocumented member.+storediSCSIVolume_kmsKey :: Lens.Lens' StorediSCSIVolume (Prelude.Maybe Prelude.Text)+storediSCSIVolume_kmsKey = Lens.lens (\StorediSCSIVolume' {kmsKey} -> kmsKey) (\s@StorediSCSIVolume' {} a -> s {kmsKey = a} :: StorediSCSIVolume)++-- | Indicates if when the stored volume was created, existing data on the+-- underlying local disk was preserved.+--+-- Valid Values: @true@ | @false@+storediSCSIVolume_preservedExistingData :: Lens.Lens' StorediSCSIVolume (Prelude.Maybe Prelude.Bool)+storediSCSIVolume_preservedExistingData = Lens.lens (\StorediSCSIVolume' {preservedExistingData} -> preservedExistingData) (\s@StorediSCSIVolume' {} a -> s {preservedExistingData = a} :: StorediSCSIVolume)++-- | If the stored volume was created from a snapshot, this field contains+-- the snapshot ID used, e.g. snap-78e22663. Otherwise, this field is not+-- included.+storediSCSIVolume_sourceSnapshotId :: Lens.Lens' StorediSCSIVolume (Prelude.Maybe Prelude.Text)+storediSCSIVolume_sourceSnapshotId = Lens.lens (\StorediSCSIVolume' {sourceSnapshotId} -> sourceSnapshotId) (\s@StorediSCSIVolume' {} a -> s {sourceSnapshotId = a} :: StorediSCSIVolume)++-- | The name of the iSCSI target used by an initiator to connect to a volume+-- and used as a suffix for the target ARN. For example, specifying+-- @TargetName@ as /myvolume/ results in the target ARN of+-- @arn:aws:storagegateway:us-east-2:111122223333:gateway\/sgw-12A3456B\/target\/iqn.1997-05.com.amazon:myvolume@.+-- The target name must be unique across all volumes on a gateway.+--+-- If you don\'t specify a value, Storage Gateway uses the value that was+-- previously used for this volume as the new target name.+storediSCSIVolume_targetName :: Lens.Lens' StorediSCSIVolume (Prelude.Maybe Prelude.Text)+storediSCSIVolume_targetName = Lens.lens (\StorediSCSIVolume' {targetName} -> targetName) (\s@StorediSCSIVolume' {} a -> s {targetName = a} :: StorediSCSIVolume)++-- | The Amazon Resource Name (ARN) of the storage volume.+storediSCSIVolume_volumeARN :: Lens.Lens' StorediSCSIVolume (Prelude.Maybe Prelude.Text)+storediSCSIVolume_volumeARN = Lens.lens (\StorediSCSIVolume' {volumeARN} -> volumeARN) (\s@StorediSCSIVolume' {} a -> s {volumeARN = a} :: StorediSCSIVolume)++-- | A value that indicates whether a storage volume is attached to, detached+-- from, or is in the process of detaching from a gateway. For more+-- information, see+-- <https://docs.aws.amazon.com/storagegateway/latest/userguide/managing-volumes.html#attach-detach-volume Moving your volumes to a different gateway>.+storediSCSIVolume_volumeAttachmentStatus :: Lens.Lens' StorediSCSIVolume (Prelude.Maybe Prelude.Text)+storediSCSIVolume_volumeAttachmentStatus = Lens.lens (\StorediSCSIVolume' {volumeAttachmentStatus} -> volumeAttachmentStatus) (\s@StorediSCSIVolume' {} a -> s {volumeAttachmentStatus = a} :: StorediSCSIVolume)++-- | The ID of the local disk that was specified in the+-- CreateStorediSCSIVolume operation.+storediSCSIVolume_volumeDiskId :: Lens.Lens' StorediSCSIVolume (Prelude.Maybe Prelude.Text)+storediSCSIVolume_volumeDiskId = Lens.lens (\StorediSCSIVolume' {volumeDiskId} -> volumeDiskId) (\s@StorediSCSIVolume' {} a -> s {volumeDiskId = a} :: StorediSCSIVolume)++-- | The unique identifier of the volume, e.g., vol-AE4B946D.+storediSCSIVolume_volumeId :: Lens.Lens' StorediSCSIVolume (Prelude.Maybe Prelude.Text)+storediSCSIVolume_volumeId = Lens.lens (\StorediSCSIVolume' {volumeId} -> volumeId) (\s@StorediSCSIVolume' {} a -> s {volumeId = a} :: StorediSCSIVolume)++-- | Represents the percentage complete if the volume is restoring or+-- bootstrapping that represents the percent of data transferred. This+-- field does not appear in the response if the stored volume is not+-- restoring or bootstrapping.+storediSCSIVolume_volumeProgress :: Lens.Lens' StorediSCSIVolume (Prelude.Maybe Prelude.Double)+storediSCSIVolume_volumeProgress = Lens.lens (\StorediSCSIVolume' {volumeProgress} -> volumeProgress) (\s@StorediSCSIVolume' {} a -> s {volumeProgress = a} :: StorediSCSIVolume)++-- | The size of the volume in bytes.+storediSCSIVolume_volumeSizeInBytes :: Lens.Lens' StorediSCSIVolume (Prelude.Maybe Prelude.Integer)+storediSCSIVolume_volumeSizeInBytes = Lens.lens (\StorediSCSIVolume' {volumeSizeInBytes} -> volumeSizeInBytes) (\s@StorediSCSIVolume' {} a -> s {volumeSizeInBytes = a} :: StorediSCSIVolume)++-- | One of the VolumeStatus values that indicates the state of the storage+-- volume.+storediSCSIVolume_volumeStatus :: Lens.Lens' StorediSCSIVolume (Prelude.Maybe Prelude.Text)+storediSCSIVolume_volumeStatus = Lens.lens (\StorediSCSIVolume' {volumeStatus} -> volumeStatus) (\s@StorediSCSIVolume' {} a -> s {volumeStatus = a} :: StorediSCSIVolume)++-- | One of the VolumeType enumeration values describing the type of the+-- volume.+storediSCSIVolume_volumeType :: Lens.Lens' StorediSCSIVolume (Prelude.Maybe Prelude.Text)+storediSCSIVolume_volumeType = Lens.lens (\StorediSCSIVolume' {volumeType} -> volumeType) (\s@StorediSCSIVolume' {} a -> s {volumeType = a} :: StorediSCSIVolume)++-- | The size of the data stored on the volume in bytes. This value is+-- calculated based on the number of blocks that are touched, instead of+-- the actual amount of data written. This value can be useful for+-- sequential write patterns but less accurate for random write patterns.+-- @VolumeUsedInBytes@ is different from the compressed size of the volume,+-- which is the value that is used to calculate your bill.+--+-- This value is not available for volumes created prior to May 13, 2015,+-- until you store data on the volume.+storediSCSIVolume_volumeUsedInBytes :: Lens.Lens' StorediSCSIVolume (Prelude.Maybe Prelude.Integer)+storediSCSIVolume_volumeUsedInBytes = Lens.lens (\StorediSCSIVolume' {volumeUsedInBytes} -> volumeUsedInBytes) (\s@StorediSCSIVolume' {} a -> s {volumeUsedInBytes = a} :: StorediSCSIVolume)++-- | An VolumeiSCSIAttributes object that represents a collection of iSCSI+-- attributes for one stored volume.+storediSCSIVolume_volumeiSCSIAttributes :: Lens.Lens' StorediSCSIVolume (Prelude.Maybe VolumeiSCSIAttributes)+storediSCSIVolume_volumeiSCSIAttributes = Lens.lens (\StorediSCSIVolume' {volumeiSCSIAttributes} -> volumeiSCSIAttributes) (\s@StorediSCSIVolume' {} a -> s {volumeiSCSIAttributes = a} :: StorediSCSIVolume)++instance Data.FromJSON StorediSCSIVolume where+ parseJSON =+ Data.withObject+ "StorediSCSIVolume"+ ( \x ->+ StorediSCSIVolume'+ Prelude.<$> (x Data..:? "CreatedDate")+ Prelude.<*> (x Data..:? "KMSKey")+ Prelude.<*> (x Data..:? "PreservedExistingData")+ Prelude.<*> (x Data..:? "SourceSnapshotId")+ Prelude.<*> (x Data..:? "TargetName")+ Prelude.<*> (x Data..:? "VolumeARN")+ Prelude.<*> (x Data..:? "VolumeAttachmentStatus")+ Prelude.<*> (x Data..:? "VolumeDiskId")+ Prelude.<*> (x Data..:? "VolumeId")+ Prelude.<*> (x Data..:? "VolumeProgress")+ Prelude.<*> (x Data..:? "VolumeSizeInBytes")+ Prelude.<*> (x Data..:? "VolumeStatus")+ Prelude.<*> (x Data..:? "VolumeType")+ Prelude.<*> (x Data..:? "VolumeUsedInBytes")+ Prelude.<*> (x Data..:? "VolumeiSCSIAttributes")+ )++instance Prelude.Hashable StorediSCSIVolume where+ hashWithSalt _salt StorediSCSIVolume' {..} =+ _salt+ `Prelude.hashWithSalt` createdDate+ `Prelude.hashWithSalt` kmsKey+ `Prelude.hashWithSalt` preservedExistingData+ `Prelude.hashWithSalt` sourceSnapshotId+ `Prelude.hashWithSalt` targetName+ `Prelude.hashWithSalt` volumeARN+ `Prelude.hashWithSalt` volumeAttachmentStatus+ `Prelude.hashWithSalt` volumeDiskId+ `Prelude.hashWithSalt` volumeId+ `Prelude.hashWithSalt` volumeProgress+ `Prelude.hashWithSalt` volumeSizeInBytes+ `Prelude.hashWithSalt` volumeStatus+ `Prelude.hashWithSalt` volumeType+ `Prelude.hashWithSalt` volumeUsedInBytes+ `Prelude.hashWithSalt` volumeiSCSIAttributes++instance Prelude.NFData StorediSCSIVolume where+ rnf StorediSCSIVolume' {..} =+ Prelude.rnf createdDate+ `Prelude.seq` Prelude.rnf kmsKey+ `Prelude.seq` Prelude.rnf preservedExistingData+ `Prelude.seq` Prelude.rnf sourceSnapshotId+ `Prelude.seq` Prelude.rnf targetName+ `Prelude.seq` Prelude.rnf volumeARN+ `Prelude.seq` Prelude.rnf volumeAttachmentStatus+ `Prelude.seq` Prelude.rnf volumeDiskId+ `Prelude.seq` Prelude.rnf volumeId+ `Prelude.seq` Prelude.rnf volumeProgress+ `Prelude.seq` Prelude.rnf volumeSizeInBytes+ `Prelude.seq` Prelude.rnf volumeStatus+ `Prelude.seq` Prelude.rnf volumeType+ `Prelude.seq` Prelude.rnf volumeUsedInBytes+ `Prelude.seq` Prelude.rnf volumeiSCSIAttributes
+ gen/Amazonka/StorageGateway/Types/Tag.hs view
@@ -0,0 +1,95 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# 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.Types.Tag+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.StorageGateway.Types.Tag 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++-- | A key-value pair that helps you manage, filter, and search for your+-- resource. Allowed characters: letters, white space, and numbers,+-- representable in UTF-8, and the following characters: + - = . _ : \/.+--+-- /See:/ 'newTag' smart constructor.+data Tag = Tag'+ { -- | Tag key. The key can\'t start with aws:.+ key :: Prelude.Text,+ -- | Value of the tag key.+ value :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'Tag' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'key', 'tag_key' - Tag key. The key can\'t start with aws:.+--+-- 'value', 'tag_value' - Value of the tag key.+newTag ::+ -- | 'key'+ Prelude.Text ->+ -- | 'value'+ Prelude.Text ->+ Tag+newTag pKey_ pValue_ =+ Tag' {key = pKey_, value = pValue_}++-- | Tag key. The key can\'t start with aws:.+tag_key :: Lens.Lens' Tag Prelude.Text+tag_key = Lens.lens (\Tag' {key} -> key) (\s@Tag' {} a -> s {key = a} :: Tag)++-- | Value of the tag key.+tag_value :: Lens.Lens' Tag Prelude.Text+tag_value = Lens.lens (\Tag' {value} -> value) (\s@Tag' {} a -> s {value = a} :: Tag)++instance Data.FromJSON Tag where+ parseJSON =+ Data.withObject+ "Tag"+ ( \x ->+ Tag'+ Prelude.<$> (x Data..: "Key")+ Prelude.<*> (x Data..: "Value")+ )++instance Prelude.Hashable Tag where+ hashWithSalt _salt Tag' {..} =+ _salt+ `Prelude.hashWithSalt` key+ `Prelude.hashWithSalt` value++instance Prelude.NFData Tag where+ rnf Tag' {..} =+ Prelude.rnf key `Prelude.seq` Prelude.rnf value++instance Data.ToJSON Tag where+ toJSON Tag' {..} =+ Data.object+ ( Prelude.catMaybes+ [ Prelude.Just ("Key" Data..= key),+ Prelude.Just ("Value" Data..= value)+ ]+ )
+ gen/Amazonka/StorageGateway/Types/Tape.hs view
@@ -0,0 +1,251 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# 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.Types.Tape+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.StorageGateway.Types.Tape 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++-- | Describes a virtual tape object.+--+-- /See:/ 'newTape' smart constructor.+data Tape = Tape'+ { kmsKey :: Prelude.Maybe Prelude.Text,+ -- | The date that the tape enters a custom tape pool.+ poolEntryDate :: Prelude.Maybe Data.POSIX,+ -- | The ID of the pool that contains tapes that will be archived. The tapes+ -- in this pool are archived in the S3 storage class that is associated+ -- with the pool. When you use your backup application to eject the tape,+ -- the tape is archived directly into the storage class (S3 Glacier or S3+ -- Glacier Deep Archive) that corresponds to the pool.+ poolId :: Prelude.Maybe Prelude.Text,+ -- | For archiving virtual tapes, indicates how much data remains to be+ -- uploaded before archiving is complete.+ --+ -- Range: 0 (not started) to 100 (complete).+ progress :: Prelude.Maybe Prelude.Double,+ -- | The date that the tape is first archived with tape retention lock+ -- enabled.+ retentionStartDate :: Prelude.Maybe Data.POSIX,+ -- | The Amazon Resource Name (ARN) of the virtual tape.+ tapeARN :: Prelude.Maybe Prelude.Text,+ -- | The barcode that identifies a specific virtual tape.+ tapeBarcode :: Prelude.Maybe Prelude.Text,+ -- | The date the virtual tape was created.+ tapeCreatedDate :: Prelude.Maybe Data.POSIX,+ -- | The size, in bytes, of the virtual tape capacity.+ tapeSizeInBytes :: Prelude.Maybe Prelude.Integer,+ -- | The current state of the virtual tape.+ tapeStatus :: Prelude.Maybe Prelude.Text,+ -- | The size, in bytes, of data stored on the virtual tape.+ --+ -- This value is not available for tapes created prior to May 13, 2015.+ tapeUsedInBytes :: Prelude.Maybe Prelude.Integer,+ -- | The virtual tape library (VTL) device that the virtual tape is+ -- associated with.+ vTLDevice :: Prelude.Maybe Prelude.Text,+ -- | If the tape is archived as write-once-read-many (WORM), this value is+ -- @true@.+ worm :: Prelude.Maybe Prelude.Bool+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'Tape' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'kmsKey', 'tape_kmsKey' - Undocumented member.+--+-- 'poolEntryDate', 'tape_poolEntryDate' - The date that the tape enters a custom tape pool.+--+-- 'poolId', 'tape_poolId' - The ID of the pool that contains tapes that will be archived. The tapes+-- in this pool are archived in the S3 storage class that is associated+-- with the pool. When you use your backup application to eject the tape,+-- the tape is archived directly into the storage class (S3 Glacier or S3+-- Glacier Deep Archive) that corresponds to the pool.+--+-- 'progress', 'tape_progress' - For archiving virtual tapes, indicates how much data remains to be+-- uploaded before archiving is complete.+--+-- Range: 0 (not started) to 100 (complete).+--+-- 'retentionStartDate', 'tape_retentionStartDate' - The date that the tape is first archived with tape retention lock+-- enabled.+--+-- 'tapeARN', 'tape_tapeARN' - The Amazon Resource Name (ARN) of the virtual tape.+--+-- 'tapeBarcode', 'tape_tapeBarcode' - The barcode that identifies a specific virtual tape.+--+-- 'tapeCreatedDate', 'tape_tapeCreatedDate' - The date the virtual tape was created.+--+-- 'tapeSizeInBytes', 'tape_tapeSizeInBytes' - The size, in bytes, of the virtual tape capacity.+--+-- 'tapeStatus', 'tape_tapeStatus' - The current state of the virtual tape.+--+-- 'tapeUsedInBytes', 'tape_tapeUsedInBytes' - The size, in bytes, of data stored on the virtual tape.+--+-- This value is not available for tapes created prior to May 13, 2015.+--+-- 'vTLDevice', 'tape_vTLDevice' - The virtual tape library (VTL) device that the virtual tape is+-- associated with.+--+-- 'worm', 'tape_worm' - If the tape is archived as write-once-read-many (WORM), this value is+-- @true@.+newTape ::+ Tape+newTape =+ Tape'+ { kmsKey = Prelude.Nothing,+ poolEntryDate = Prelude.Nothing,+ poolId = Prelude.Nothing,+ progress = Prelude.Nothing,+ retentionStartDate = Prelude.Nothing,+ tapeARN = Prelude.Nothing,+ tapeBarcode = Prelude.Nothing,+ tapeCreatedDate = Prelude.Nothing,+ tapeSizeInBytes = Prelude.Nothing,+ tapeStatus = Prelude.Nothing,+ tapeUsedInBytes = Prelude.Nothing,+ vTLDevice = Prelude.Nothing,+ worm = Prelude.Nothing+ }++-- | Undocumented member.+tape_kmsKey :: Lens.Lens' Tape (Prelude.Maybe Prelude.Text)+tape_kmsKey = Lens.lens (\Tape' {kmsKey} -> kmsKey) (\s@Tape' {} a -> s {kmsKey = a} :: Tape)++-- | The date that the tape enters a custom tape pool.+tape_poolEntryDate :: Lens.Lens' Tape (Prelude.Maybe Prelude.UTCTime)+tape_poolEntryDate = Lens.lens (\Tape' {poolEntryDate} -> poolEntryDate) (\s@Tape' {} a -> s {poolEntryDate = a} :: Tape) Prelude.. Lens.mapping Data._Time++-- | The ID of the pool that contains tapes that will be archived. The tapes+-- in this pool are archived in the S3 storage class that is associated+-- with the pool. When you use your backup application to eject the tape,+-- the tape is archived directly into the storage class (S3 Glacier or S3+-- Glacier Deep Archive) that corresponds to the pool.+tape_poolId :: Lens.Lens' Tape (Prelude.Maybe Prelude.Text)+tape_poolId = Lens.lens (\Tape' {poolId} -> poolId) (\s@Tape' {} a -> s {poolId = a} :: Tape)++-- | For archiving virtual tapes, indicates how much data remains to be+-- uploaded before archiving is complete.+--+-- Range: 0 (not started) to 100 (complete).+tape_progress :: Lens.Lens' Tape (Prelude.Maybe Prelude.Double)+tape_progress = Lens.lens (\Tape' {progress} -> progress) (\s@Tape' {} a -> s {progress = a} :: Tape)++-- | The date that the tape is first archived with tape retention lock+-- enabled.+tape_retentionStartDate :: Lens.Lens' Tape (Prelude.Maybe Prelude.UTCTime)+tape_retentionStartDate = Lens.lens (\Tape' {retentionStartDate} -> retentionStartDate) (\s@Tape' {} a -> s {retentionStartDate = a} :: Tape) Prelude.. Lens.mapping Data._Time++-- | The Amazon Resource Name (ARN) of the virtual tape.+tape_tapeARN :: Lens.Lens' Tape (Prelude.Maybe Prelude.Text)+tape_tapeARN = Lens.lens (\Tape' {tapeARN} -> tapeARN) (\s@Tape' {} a -> s {tapeARN = a} :: Tape)++-- | The barcode that identifies a specific virtual tape.+tape_tapeBarcode :: Lens.Lens' Tape (Prelude.Maybe Prelude.Text)+tape_tapeBarcode = Lens.lens (\Tape' {tapeBarcode} -> tapeBarcode) (\s@Tape' {} a -> s {tapeBarcode = a} :: Tape)++-- | The date the virtual tape was created.+tape_tapeCreatedDate :: Lens.Lens' Tape (Prelude.Maybe Prelude.UTCTime)+tape_tapeCreatedDate = Lens.lens (\Tape' {tapeCreatedDate} -> tapeCreatedDate) (\s@Tape' {} a -> s {tapeCreatedDate = a} :: Tape) Prelude.. Lens.mapping Data._Time++-- | The size, in bytes, of the virtual tape capacity.+tape_tapeSizeInBytes :: Lens.Lens' Tape (Prelude.Maybe Prelude.Integer)+tape_tapeSizeInBytes = Lens.lens (\Tape' {tapeSizeInBytes} -> tapeSizeInBytes) (\s@Tape' {} a -> s {tapeSizeInBytes = a} :: Tape)++-- | The current state of the virtual tape.+tape_tapeStatus :: Lens.Lens' Tape (Prelude.Maybe Prelude.Text)+tape_tapeStatus = Lens.lens (\Tape' {tapeStatus} -> tapeStatus) (\s@Tape' {} a -> s {tapeStatus = a} :: Tape)++-- | The size, in bytes, of data stored on the virtual tape.+--+-- This value is not available for tapes created prior to May 13, 2015.+tape_tapeUsedInBytes :: Lens.Lens' Tape (Prelude.Maybe Prelude.Integer)+tape_tapeUsedInBytes = Lens.lens (\Tape' {tapeUsedInBytes} -> tapeUsedInBytes) (\s@Tape' {} a -> s {tapeUsedInBytes = a} :: Tape)++-- | The virtual tape library (VTL) device that the virtual tape is+-- associated with.+tape_vTLDevice :: Lens.Lens' Tape (Prelude.Maybe Prelude.Text)+tape_vTLDevice = Lens.lens (\Tape' {vTLDevice} -> vTLDevice) (\s@Tape' {} a -> s {vTLDevice = a} :: Tape)++-- | If the tape is archived as write-once-read-many (WORM), this value is+-- @true@.+tape_worm :: Lens.Lens' Tape (Prelude.Maybe Prelude.Bool)+tape_worm = Lens.lens (\Tape' {worm} -> worm) (\s@Tape' {} a -> s {worm = a} :: Tape)++instance Data.FromJSON Tape where+ parseJSON =+ Data.withObject+ "Tape"+ ( \x ->+ Tape'+ Prelude.<$> (x Data..:? "KMSKey")+ Prelude.<*> (x Data..:? "PoolEntryDate")+ Prelude.<*> (x Data..:? "PoolId")+ Prelude.<*> (x Data..:? "Progress")+ Prelude.<*> (x Data..:? "RetentionStartDate")+ Prelude.<*> (x Data..:? "TapeARN")+ Prelude.<*> (x Data..:? "TapeBarcode")+ Prelude.<*> (x Data..:? "TapeCreatedDate")+ Prelude.<*> (x Data..:? "TapeSizeInBytes")+ Prelude.<*> (x Data..:? "TapeStatus")+ Prelude.<*> (x Data..:? "TapeUsedInBytes")+ Prelude.<*> (x Data..:? "VTLDevice")+ Prelude.<*> (x Data..:? "Worm")+ )++instance Prelude.Hashable Tape where+ hashWithSalt _salt Tape' {..} =+ _salt+ `Prelude.hashWithSalt` kmsKey+ `Prelude.hashWithSalt` poolEntryDate+ `Prelude.hashWithSalt` poolId+ `Prelude.hashWithSalt` progress+ `Prelude.hashWithSalt` retentionStartDate+ `Prelude.hashWithSalt` tapeARN+ `Prelude.hashWithSalt` tapeBarcode+ `Prelude.hashWithSalt` tapeCreatedDate+ `Prelude.hashWithSalt` tapeSizeInBytes+ `Prelude.hashWithSalt` tapeStatus+ `Prelude.hashWithSalt` tapeUsedInBytes+ `Prelude.hashWithSalt` vTLDevice+ `Prelude.hashWithSalt` worm++instance Prelude.NFData Tape where+ rnf Tape' {..} =+ Prelude.rnf kmsKey+ `Prelude.seq` Prelude.rnf poolEntryDate+ `Prelude.seq` Prelude.rnf poolId+ `Prelude.seq` Prelude.rnf progress+ `Prelude.seq` Prelude.rnf retentionStartDate+ `Prelude.seq` Prelude.rnf tapeARN+ `Prelude.seq` Prelude.rnf tapeBarcode+ `Prelude.seq` Prelude.rnf tapeCreatedDate+ `Prelude.seq` Prelude.rnf tapeSizeInBytes+ `Prelude.seq` Prelude.rnf tapeStatus+ `Prelude.seq` Prelude.rnf tapeUsedInBytes+ `Prelude.seq` Prelude.rnf vTLDevice+ `Prelude.seq` Prelude.rnf worm
+ gen/Amazonka/StorageGateway/Types/TapeArchive.hs view
@@ -0,0 +1,261 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# 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.Types.TapeArchive+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.StorageGateway.Types.TapeArchive 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++-- | Represents a virtual tape that is archived in the virtual tape shelf+-- (VTS).+--+-- /See:/ 'newTapeArchive' smart constructor.+data TapeArchive = TapeArchive'+ { -- | The time that the archiving of the virtual tape was completed.+ --+ -- The default timestamp format is in the ISO8601 extended+ -- YYYY-MM-DD\'T\'HH:MM:SS\'Z\' format.+ completionTime :: Prelude.Maybe Data.POSIX,+ kmsKey :: Prelude.Maybe Prelude.Text,+ -- | The time that the tape entered the custom tape pool.+ --+ -- The default timestamp format is in the ISO8601 extended+ -- YYYY-MM-DD\'T\'HH:MM:SS\'Z\' format.+ poolEntryDate :: Prelude.Maybe Data.POSIX,+ -- | The ID of the pool that was used to archive the tape. The tapes in this+ -- pool are archived in the S3 storage class that is associated with the+ -- pool.+ poolId :: Prelude.Maybe Prelude.Text,+ -- | If the archived tape is subject to tape retention lock, the date that+ -- the archived tape started being retained.+ retentionStartDate :: Prelude.Maybe Data.POSIX,+ -- | The Amazon Resource Name (ARN) of the tape gateway that the virtual tape+ -- is being retrieved to.+ --+ -- The virtual tape is retrieved from the virtual tape shelf (VTS).+ retrievedTo :: Prelude.Maybe Prelude.Text,+ -- | The Amazon Resource Name (ARN) of an archived virtual tape.+ tapeARN :: Prelude.Maybe Prelude.Text,+ -- | The barcode that identifies the archived virtual tape.+ tapeBarcode :: Prelude.Maybe Prelude.Text,+ -- | The date the virtual tape was created.+ tapeCreatedDate :: Prelude.Maybe Data.POSIX,+ -- | The size, in bytes, of the archived virtual tape.+ tapeSizeInBytes :: Prelude.Maybe Prelude.Integer,+ -- | The current state of the archived virtual tape.+ tapeStatus :: Prelude.Maybe Prelude.Text,+ -- | The size, in bytes, of data stored on the virtual tape.+ --+ -- This value is not available for tapes created prior to May 13, 2015.+ tapeUsedInBytes :: Prelude.Maybe Prelude.Integer,+ -- | Set to @true@ if the archived tape is stored as write-once-read-many+ -- (WORM).+ worm :: Prelude.Maybe Prelude.Bool+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'TapeArchive' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'completionTime', 'tapeArchive_completionTime' - The time that the archiving of the virtual tape was completed.+--+-- The default timestamp format is in the ISO8601 extended+-- YYYY-MM-DD\'T\'HH:MM:SS\'Z\' format.+--+-- 'kmsKey', 'tapeArchive_kmsKey' - Undocumented member.+--+-- 'poolEntryDate', 'tapeArchive_poolEntryDate' - The time that the tape entered the custom tape pool.+--+-- The default timestamp format is in the ISO8601 extended+-- YYYY-MM-DD\'T\'HH:MM:SS\'Z\' format.+--+-- 'poolId', 'tapeArchive_poolId' - The ID of the pool that was used to archive the tape. The tapes in this+-- pool are archived in the S3 storage class that is associated with the+-- pool.+--+-- 'retentionStartDate', 'tapeArchive_retentionStartDate' - If the archived tape is subject to tape retention lock, the date that+-- the archived tape started being retained.+--+-- 'retrievedTo', 'tapeArchive_retrievedTo' - The Amazon Resource Name (ARN) of the tape gateway that the virtual tape+-- is being retrieved to.+--+-- The virtual tape is retrieved from the virtual tape shelf (VTS).+--+-- 'tapeARN', 'tapeArchive_tapeARN' - The Amazon Resource Name (ARN) of an archived virtual tape.+--+-- 'tapeBarcode', 'tapeArchive_tapeBarcode' - The barcode that identifies the archived virtual tape.+--+-- 'tapeCreatedDate', 'tapeArchive_tapeCreatedDate' - The date the virtual tape was created.+--+-- 'tapeSizeInBytes', 'tapeArchive_tapeSizeInBytes' - The size, in bytes, of the archived virtual tape.+--+-- 'tapeStatus', 'tapeArchive_tapeStatus' - The current state of the archived virtual tape.+--+-- 'tapeUsedInBytes', 'tapeArchive_tapeUsedInBytes' - The size, in bytes, of data stored on the virtual tape.+--+-- This value is not available for tapes created prior to May 13, 2015.+--+-- 'worm', 'tapeArchive_worm' - Set to @true@ if the archived tape is stored as write-once-read-many+-- (WORM).+newTapeArchive ::+ TapeArchive+newTapeArchive =+ TapeArchive'+ { completionTime = Prelude.Nothing,+ kmsKey = Prelude.Nothing,+ poolEntryDate = Prelude.Nothing,+ poolId = Prelude.Nothing,+ retentionStartDate = Prelude.Nothing,+ retrievedTo = Prelude.Nothing,+ tapeARN = Prelude.Nothing,+ tapeBarcode = Prelude.Nothing,+ tapeCreatedDate = Prelude.Nothing,+ tapeSizeInBytes = Prelude.Nothing,+ tapeStatus = Prelude.Nothing,+ tapeUsedInBytes = Prelude.Nothing,+ worm = Prelude.Nothing+ }++-- | The time that the archiving of the virtual tape was completed.+--+-- The default timestamp format is in the ISO8601 extended+-- YYYY-MM-DD\'T\'HH:MM:SS\'Z\' format.+tapeArchive_completionTime :: Lens.Lens' TapeArchive (Prelude.Maybe Prelude.UTCTime)+tapeArchive_completionTime = Lens.lens (\TapeArchive' {completionTime} -> completionTime) (\s@TapeArchive' {} a -> s {completionTime = a} :: TapeArchive) Prelude.. Lens.mapping Data._Time++-- | Undocumented member.+tapeArchive_kmsKey :: Lens.Lens' TapeArchive (Prelude.Maybe Prelude.Text)+tapeArchive_kmsKey = Lens.lens (\TapeArchive' {kmsKey} -> kmsKey) (\s@TapeArchive' {} a -> s {kmsKey = a} :: TapeArchive)++-- | The time that the tape entered the custom tape pool.+--+-- The default timestamp format is in the ISO8601 extended+-- YYYY-MM-DD\'T\'HH:MM:SS\'Z\' format.+tapeArchive_poolEntryDate :: Lens.Lens' TapeArchive (Prelude.Maybe Prelude.UTCTime)+tapeArchive_poolEntryDate = Lens.lens (\TapeArchive' {poolEntryDate} -> poolEntryDate) (\s@TapeArchive' {} a -> s {poolEntryDate = a} :: TapeArchive) Prelude.. Lens.mapping Data._Time++-- | The ID of the pool that was used to archive the tape. The tapes in this+-- pool are archived in the S3 storage class that is associated with the+-- pool.+tapeArchive_poolId :: Lens.Lens' TapeArchive (Prelude.Maybe Prelude.Text)+tapeArchive_poolId = Lens.lens (\TapeArchive' {poolId} -> poolId) (\s@TapeArchive' {} a -> s {poolId = a} :: TapeArchive)++-- | If the archived tape is subject to tape retention lock, the date that+-- the archived tape started being retained.+tapeArchive_retentionStartDate :: Lens.Lens' TapeArchive (Prelude.Maybe Prelude.UTCTime)+tapeArchive_retentionStartDate = Lens.lens (\TapeArchive' {retentionStartDate} -> retentionStartDate) (\s@TapeArchive' {} a -> s {retentionStartDate = a} :: TapeArchive) Prelude.. Lens.mapping Data._Time++-- | The Amazon Resource Name (ARN) of the tape gateway that the virtual tape+-- is being retrieved to.+--+-- The virtual tape is retrieved from the virtual tape shelf (VTS).+tapeArchive_retrievedTo :: Lens.Lens' TapeArchive (Prelude.Maybe Prelude.Text)+tapeArchive_retrievedTo = Lens.lens (\TapeArchive' {retrievedTo} -> retrievedTo) (\s@TapeArchive' {} a -> s {retrievedTo = a} :: TapeArchive)++-- | The Amazon Resource Name (ARN) of an archived virtual tape.+tapeArchive_tapeARN :: Lens.Lens' TapeArchive (Prelude.Maybe Prelude.Text)+tapeArchive_tapeARN = Lens.lens (\TapeArchive' {tapeARN} -> tapeARN) (\s@TapeArchive' {} a -> s {tapeARN = a} :: TapeArchive)++-- | The barcode that identifies the archived virtual tape.+tapeArchive_tapeBarcode :: Lens.Lens' TapeArchive (Prelude.Maybe Prelude.Text)+tapeArchive_tapeBarcode = Lens.lens (\TapeArchive' {tapeBarcode} -> tapeBarcode) (\s@TapeArchive' {} a -> s {tapeBarcode = a} :: TapeArchive)++-- | The date the virtual tape was created.+tapeArchive_tapeCreatedDate :: Lens.Lens' TapeArchive (Prelude.Maybe Prelude.UTCTime)+tapeArchive_tapeCreatedDate = Lens.lens (\TapeArchive' {tapeCreatedDate} -> tapeCreatedDate) (\s@TapeArchive' {} a -> s {tapeCreatedDate = a} :: TapeArchive) Prelude.. Lens.mapping Data._Time++-- | The size, in bytes, of the archived virtual tape.+tapeArchive_tapeSizeInBytes :: Lens.Lens' TapeArchive (Prelude.Maybe Prelude.Integer)+tapeArchive_tapeSizeInBytes = Lens.lens (\TapeArchive' {tapeSizeInBytes} -> tapeSizeInBytes) (\s@TapeArchive' {} a -> s {tapeSizeInBytes = a} :: TapeArchive)++-- | The current state of the archived virtual tape.+tapeArchive_tapeStatus :: Lens.Lens' TapeArchive (Prelude.Maybe Prelude.Text)+tapeArchive_tapeStatus = Lens.lens (\TapeArchive' {tapeStatus} -> tapeStatus) (\s@TapeArchive' {} a -> s {tapeStatus = a} :: TapeArchive)++-- | The size, in bytes, of data stored on the virtual tape.+--+-- This value is not available for tapes created prior to May 13, 2015.+tapeArchive_tapeUsedInBytes :: Lens.Lens' TapeArchive (Prelude.Maybe Prelude.Integer)+tapeArchive_tapeUsedInBytes = Lens.lens (\TapeArchive' {tapeUsedInBytes} -> tapeUsedInBytes) (\s@TapeArchive' {} a -> s {tapeUsedInBytes = a} :: TapeArchive)++-- | Set to @true@ if the archived tape is stored as write-once-read-many+-- (WORM).+tapeArchive_worm :: Lens.Lens' TapeArchive (Prelude.Maybe Prelude.Bool)+tapeArchive_worm = Lens.lens (\TapeArchive' {worm} -> worm) (\s@TapeArchive' {} a -> s {worm = a} :: TapeArchive)++instance Data.FromJSON TapeArchive where+ parseJSON =+ Data.withObject+ "TapeArchive"+ ( \x ->+ TapeArchive'+ Prelude.<$> (x Data..:? "CompletionTime")+ Prelude.<*> (x Data..:? "KMSKey")+ Prelude.<*> (x Data..:? "PoolEntryDate")+ Prelude.<*> (x Data..:? "PoolId")+ Prelude.<*> (x Data..:? "RetentionStartDate")+ Prelude.<*> (x Data..:? "RetrievedTo")+ Prelude.<*> (x Data..:? "TapeARN")+ Prelude.<*> (x Data..:? "TapeBarcode")+ Prelude.<*> (x Data..:? "TapeCreatedDate")+ Prelude.<*> (x Data..:? "TapeSizeInBytes")+ Prelude.<*> (x Data..:? "TapeStatus")+ Prelude.<*> (x Data..:? "TapeUsedInBytes")+ Prelude.<*> (x Data..:? "Worm")+ )++instance Prelude.Hashable TapeArchive where+ hashWithSalt _salt TapeArchive' {..} =+ _salt+ `Prelude.hashWithSalt` completionTime+ `Prelude.hashWithSalt` kmsKey+ `Prelude.hashWithSalt` poolEntryDate+ `Prelude.hashWithSalt` poolId+ `Prelude.hashWithSalt` retentionStartDate+ `Prelude.hashWithSalt` retrievedTo+ `Prelude.hashWithSalt` tapeARN+ `Prelude.hashWithSalt` tapeBarcode+ `Prelude.hashWithSalt` tapeCreatedDate+ `Prelude.hashWithSalt` tapeSizeInBytes+ `Prelude.hashWithSalt` tapeStatus+ `Prelude.hashWithSalt` tapeUsedInBytes+ `Prelude.hashWithSalt` worm++instance Prelude.NFData TapeArchive where+ rnf TapeArchive' {..} =+ Prelude.rnf completionTime+ `Prelude.seq` Prelude.rnf kmsKey+ `Prelude.seq` Prelude.rnf poolEntryDate+ `Prelude.seq` Prelude.rnf poolId+ `Prelude.seq` Prelude.rnf retentionStartDate+ `Prelude.seq` Prelude.rnf retrievedTo+ `Prelude.seq` Prelude.rnf tapeARN+ `Prelude.seq` Prelude.rnf tapeBarcode+ `Prelude.seq` Prelude.rnf tapeCreatedDate+ `Prelude.seq` Prelude.rnf tapeSizeInBytes+ `Prelude.seq` Prelude.rnf tapeStatus+ `Prelude.seq` Prelude.rnf tapeUsedInBytes+ `Prelude.seq` Prelude.rnf worm
+ gen/Amazonka/StorageGateway/Types/TapeInfo.hs view
@@ -0,0 +1,177 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# 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.Types.TapeInfo+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.StorageGateway.Types.TapeInfo 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++-- | Describes a virtual tape.+--+-- /See:/ 'newTapeInfo' smart constructor.+data TapeInfo = TapeInfo'+ { -- | The Amazon Resource Name (ARN) of the gateway. Use the ListGateways+ -- operation to return a list of gateways for your account and Amazon Web+ -- Services Region.+ gatewayARN :: Prelude.Maybe Prelude.Text,+ -- | The date that the tape entered the custom tape pool with tape retention+ -- lock enabled.+ poolEntryDate :: Prelude.Maybe Data.POSIX,+ -- | The ID of the pool that you want to add your tape to for archiving. The+ -- tape in this pool is archived in the S3 storage class that is associated+ -- with the pool. When you use your backup application to eject the tape,+ -- the tape is archived directly into the storage class (S3 Glacier or S3+ -- Glacier Deep Archive) that corresponds to the pool.+ poolId :: Prelude.Maybe Prelude.Text,+ -- | The date that the tape became subject to tape retention lock.+ retentionStartDate :: Prelude.Maybe Data.POSIX,+ -- | The Amazon Resource Name (ARN) of a virtual tape.+ tapeARN :: Prelude.Maybe Prelude.Text,+ -- | The barcode that identifies a specific virtual tape.+ tapeBarcode :: Prelude.Maybe Prelude.Text,+ -- | The size, in bytes, of a virtual tape.+ tapeSizeInBytes :: Prelude.Maybe Prelude.Integer,+ -- | The status of the tape.+ tapeStatus :: Prelude.Maybe Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'TapeInfo' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'tapeInfo_gatewayARN' - The Amazon Resource Name (ARN) of the gateway. Use the ListGateways+-- operation to return a list of gateways for your account and Amazon Web+-- Services Region.+--+-- 'poolEntryDate', 'tapeInfo_poolEntryDate' - The date that the tape entered the custom tape pool with tape retention+-- lock enabled.+--+-- 'poolId', 'tapeInfo_poolId' - The ID of the pool that you want to add your tape to for archiving. The+-- tape in this pool is archived in the S3 storage class that is associated+-- with the pool. When you use your backup application to eject the tape,+-- the tape is archived directly into the storage class (S3 Glacier or S3+-- Glacier Deep Archive) that corresponds to the pool.+--+-- 'retentionStartDate', 'tapeInfo_retentionStartDate' - The date that the tape became subject to tape retention lock.+--+-- 'tapeARN', 'tapeInfo_tapeARN' - The Amazon Resource Name (ARN) of a virtual tape.+--+-- 'tapeBarcode', 'tapeInfo_tapeBarcode' - The barcode that identifies a specific virtual tape.+--+-- 'tapeSizeInBytes', 'tapeInfo_tapeSizeInBytes' - The size, in bytes, of a virtual tape.+--+-- 'tapeStatus', 'tapeInfo_tapeStatus' - The status of the tape.+newTapeInfo ::+ TapeInfo+newTapeInfo =+ TapeInfo'+ { gatewayARN = Prelude.Nothing,+ poolEntryDate = Prelude.Nothing,+ poolId = Prelude.Nothing,+ retentionStartDate = Prelude.Nothing,+ tapeARN = Prelude.Nothing,+ tapeBarcode = Prelude.Nothing,+ tapeSizeInBytes = Prelude.Nothing,+ tapeStatus = Prelude.Nothing+ }++-- | The Amazon Resource Name (ARN) of the gateway. Use the ListGateways+-- operation to return a list of gateways for your account and Amazon Web+-- Services Region.+tapeInfo_gatewayARN :: Lens.Lens' TapeInfo (Prelude.Maybe Prelude.Text)+tapeInfo_gatewayARN = Lens.lens (\TapeInfo' {gatewayARN} -> gatewayARN) (\s@TapeInfo' {} a -> s {gatewayARN = a} :: TapeInfo)++-- | The date that the tape entered the custom tape pool with tape retention+-- lock enabled.+tapeInfo_poolEntryDate :: Lens.Lens' TapeInfo (Prelude.Maybe Prelude.UTCTime)+tapeInfo_poolEntryDate = Lens.lens (\TapeInfo' {poolEntryDate} -> poolEntryDate) (\s@TapeInfo' {} a -> s {poolEntryDate = a} :: TapeInfo) Prelude.. Lens.mapping Data._Time++-- | The ID of the pool that you want to add your tape to for archiving. The+-- tape in this pool is archived in the S3 storage class that is associated+-- with the pool. When you use your backup application to eject the tape,+-- the tape is archived directly into the storage class (S3 Glacier or S3+-- Glacier Deep Archive) that corresponds to the pool.+tapeInfo_poolId :: Lens.Lens' TapeInfo (Prelude.Maybe Prelude.Text)+tapeInfo_poolId = Lens.lens (\TapeInfo' {poolId} -> poolId) (\s@TapeInfo' {} a -> s {poolId = a} :: TapeInfo)++-- | The date that the tape became subject to tape retention lock.+tapeInfo_retentionStartDate :: Lens.Lens' TapeInfo (Prelude.Maybe Prelude.UTCTime)+tapeInfo_retentionStartDate = Lens.lens (\TapeInfo' {retentionStartDate} -> retentionStartDate) (\s@TapeInfo' {} a -> s {retentionStartDate = a} :: TapeInfo) Prelude.. Lens.mapping Data._Time++-- | The Amazon Resource Name (ARN) of a virtual tape.+tapeInfo_tapeARN :: Lens.Lens' TapeInfo (Prelude.Maybe Prelude.Text)+tapeInfo_tapeARN = Lens.lens (\TapeInfo' {tapeARN} -> tapeARN) (\s@TapeInfo' {} a -> s {tapeARN = a} :: TapeInfo)++-- | The barcode that identifies a specific virtual tape.+tapeInfo_tapeBarcode :: Lens.Lens' TapeInfo (Prelude.Maybe Prelude.Text)+tapeInfo_tapeBarcode = Lens.lens (\TapeInfo' {tapeBarcode} -> tapeBarcode) (\s@TapeInfo' {} a -> s {tapeBarcode = a} :: TapeInfo)++-- | The size, in bytes, of a virtual tape.+tapeInfo_tapeSizeInBytes :: Lens.Lens' TapeInfo (Prelude.Maybe Prelude.Integer)+tapeInfo_tapeSizeInBytes = Lens.lens (\TapeInfo' {tapeSizeInBytes} -> tapeSizeInBytes) (\s@TapeInfo' {} a -> s {tapeSizeInBytes = a} :: TapeInfo)++-- | The status of the tape.+tapeInfo_tapeStatus :: Lens.Lens' TapeInfo (Prelude.Maybe Prelude.Text)+tapeInfo_tapeStatus = Lens.lens (\TapeInfo' {tapeStatus} -> tapeStatus) (\s@TapeInfo' {} a -> s {tapeStatus = a} :: TapeInfo)++instance Data.FromJSON TapeInfo where+ parseJSON =+ Data.withObject+ "TapeInfo"+ ( \x ->+ TapeInfo'+ Prelude.<$> (x Data..:? "GatewayARN")+ Prelude.<*> (x Data..:? "PoolEntryDate")+ Prelude.<*> (x Data..:? "PoolId")+ Prelude.<*> (x Data..:? "RetentionStartDate")+ Prelude.<*> (x Data..:? "TapeARN")+ Prelude.<*> (x Data..:? "TapeBarcode")+ Prelude.<*> (x Data..:? "TapeSizeInBytes")+ Prelude.<*> (x Data..:? "TapeStatus")+ )++instance Prelude.Hashable TapeInfo where+ hashWithSalt _salt TapeInfo' {..} =+ _salt+ `Prelude.hashWithSalt` gatewayARN+ `Prelude.hashWithSalt` poolEntryDate+ `Prelude.hashWithSalt` poolId+ `Prelude.hashWithSalt` retentionStartDate+ `Prelude.hashWithSalt` tapeARN+ `Prelude.hashWithSalt` tapeBarcode+ `Prelude.hashWithSalt` tapeSizeInBytes+ `Prelude.hashWithSalt` tapeStatus++instance Prelude.NFData TapeInfo where+ rnf TapeInfo' {..} =+ Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf poolEntryDate+ `Prelude.seq` Prelude.rnf poolId+ `Prelude.seq` Prelude.rnf retentionStartDate+ `Prelude.seq` Prelude.rnf tapeARN+ `Prelude.seq` Prelude.rnf tapeBarcode+ `Prelude.seq` Prelude.rnf tapeSizeInBytes+ `Prelude.seq` Prelude.rnf tapeStatus
+ gen/Amazonka/StorageGateway/Types/TapeRecoveryPointInfo.hs view
@@ -0,0 +1,120 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# 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.Types.TapeRecoveryPointInfo+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.StorageGateway.Types.TapeRecoveryPointInfo 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++-- | Describes a recovery point.+--+-- /See:/ 'newTapeRecoveryPointInfo' smart constructor.+data TapeRecoveryPointInfo = TapeRecoveryPointInfo'+ { -- | The Amazon Resource Name (ARN) of the virtual tape.+ tapeARN :: Prelude.Maybe Prelude.Text,+ -- | The time when the point-in-time view of the virtual tape was replicated+ -- for later recovery.+ --+ -- The default timestamp format of the tape recovery point time is in the+ -- ISO8601 extended YYYY-MM-DD\'T\'HH:MM:SS\'Z\' format.+ tapeRecoveryPointTime :: Prelude.Maybe Data.POSIX,+ -- | The size, in bytes, of the virtual tapes to recover.+ tapeSizeInBytes :: Prelude.Maybe Prelude.Integer,+ -- | The status of the virtual tapes.+ tapeStatus :: Prelude.Maybe Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'TapeRecoveryPointInfo' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'tapeARN', 'tapeRecoveryPointInfo_tapeARN' - The Amazon Resource Name (ARN) of the virtual tape.+--+-- 'tapeRecoveryPointTime', 'tapeRecoveryPointInfo_tapeRecoveryPointTime' - The time when the point-in-time view of the virtual tape was replicated+-- for later recovery.+--+-- The default timestamp format of the tape recovery point time is in the+-- ISO8601 extended YYYY-MM-DD\'T\'HH:MM:SS\'Z\' format.+--+-- 'tapeSizeInBytes', 'tapeRecoveryPointInfo_tapeSizeInBytes' - The size, in bytes, of the virtual tapes to recover.+--+-- 'tapeStatus', 'tapeRecoveryPointInfo_tapeStatus' - The status of the virtual tapes.+newTapeRecoveryPointInfo ::+ TapeRecoveryPointInfo+newTapeRecoveryPointInfo =+ TapeRecoveryPointInfo'+ { tapeARN = Prelude.Nothing,+ tapeRecoveryPointTime = Prelude.Nothing,+ tapeSizeInBytes = Prelude.Nothing,+ tapeStatus = Prelude.Nothing+ }++-- | The Amazon Resource Name (ARN) of the virtual tape.+tapeRecoveryPointInfo_tapeARN :: Lens.Lens' TapeRecoveryPointInfo (Prelude.Maybe Prelude.Text)+tapeRecoveryPointInfo_tapeARN = Lens.lens (\TapeRecoveryPointInfo' {tapeARN} -> tapeARN) (\s@TapeRecoveryPointInfo' {} a -> s {tapeARN = a} :: TapeRecoveryPointInfo)++-- | The time when the point-in-time view of the virtual tape was replicated+-- for later recovery.+--+-- The default timestamp format of the tape recovery point time is in the+-- ISO8601 extended YYYY-MM-DD\'T\'HH:MM:SS\'Z\' format.+tapeRecoveryPointInfo_tapeRecoveryPointTime :: Lens.Lens' TapeRecoveryPointInfo (Prelude.Maybe Prelude.UTCTime)+tapeRecoveryPointInfo_tapeRecoveryPointTime = Lens.lens (\TapeRecoveryPointInfo' {tapeRecoveryPointTime} -> tapeRecoveryPointTime) (\s@TapeRecoveryPointInfo' {} a -> s {tapeRecoveryPointTime = a} :: TapeRecoveryPointInfo) Prelude.. Lens.mapping Data._Time++-- | The size, in bytes, of the virtual tapes to recover.+tapeRecoveryPointInfo_tapeSizeInBytes :: Lens.Lens' TapeRecoveryPointInfo (Prelude.Maybe Prelude.Integer)+tapeRecoveryPointInfo_tapeSizeInBytes = Lens.lens (\TapeRecoveryPointInfo' {tapeSizeInBytes} -> tapeSizeInBytes) (\s@TapeRecoveryPointInfo' {} a -> s {tapeSizeInBytes = a} :: TapeRecoveryPointInfo)++-- | The status of the virtual tapes.+tapeRecoveryPointInfo_tapeStatus :: Lens.Lens' TapeRecoveryPointInfo (Prelude.Maybe Prelude.Text)+tapeRecoveryPointInfo_tapeStatus = Lens.lens (\TapeRecoveryPointInfo' {tapeStatus} -> tapeStatus) (\s@TapeRecoveryPointInfo' {} a -> s {tapeStatus = a} :: TapeRecoveryPointInfo)++instance Data.FromJSON TapeRecoveryPointInfo where+ parseJSON =+ Data.withObject+ "TapeRecoveryPointInfo"+ ( \x ->+ TapeRecoveryPointInfo'+ Prelude.<$> (x Data..:? "TapeARN")+ Prelude.<*> (x Data..:? "TapeRecoveryPointTime")+ Prelude.<*> (x Data..:? "TapeSizeInBytes")+ Prelude.<*> (x Data..:? "TapeStatus")+ )++instance Prelude.Hashable TapeRecoveryPointInfo where+ hashWithSalt _salt TapeRecoveryPointInfo' {..} =+ _salt+ `Prelude.hashWithSalt` tapeARN+ `Prelude.hashWithSalt` tapeRecoveryPointTime+ `Prelude.hashWithSalt` tapeSizeInBytes+ `Prelude.hashWithSalt` tapeStatus++instance Prelude.NFData TapeRecoveryPointInfo where+ rnf TapeRecoveryPointInfo' {..} =+ Prelude.rnf tapeARN+ `Prelude.seq` Prelude.rnf tapeRecoveryPointTime+ `Prelude.seq` Prelude.rnf tapeSizeInBytes+ `Prelude.seq` Prelude.rnf tapeStatus
+ gen/Amazonka/StorageGateway/Types/TapeStorageClass.hs view
@@ -0,0 +1,71 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE GeneralizedNewtypeDeriving #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module : Amazonka.StorageGateway.Types.TapeStorageClass+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.StorageGateway.Types.TapeStorageClass+ ( TapeStorageClass+ ( ..,+ TapeStorageClass_DEEP_ARCHIVE,+ TapeStorageClass_GLACIER+ ),+ )+where++import qualified Amazonka.Core as Core+import qualified Amazonka.Data as Data+import qualified Amazonka.Prelude as Prelude++newtype TapeStorageClass = TapeStorageClass'+ { fromTapeStorageClass ::+ Data.Text+ }+ deriving stock+ ( Prelude.Show,+ Prelude.Read,+ Prelude.Eq,+ Prelude.Ord,+ Prelude.Generic+ )+ deriving newtype+ ( Prelude.Hashable,+ Prelude.NFData,+ Data.FromText,+ Data.ToText,+ Data.ToByteString,+ Data.ToLog,+ Data.ToHeader,+ Data.ToQuery,+ Data.FromJSON,+ Data.FromJSONKey,+ Data.ToJSON,+ Data.ToJSONKey,+ Data.FromXML,+ Data.ToXML+ )++pattern TapeStorageClass_DEEP_ARCHIVE :: TapeStorageClass+pattern TapeStorageClass_DEEP_ARCHIVE = TapeStorageClass' "DEEP_ARCHIVE"++pattern TapeStorageClass_GLACIER :: TapeStorageClass+pattern TapeStorageClass_GLACIER = TapeStorageClass' "GLACIER"++{-# COMPLETE+ TapeStorageClass_DEEP_ARCHIVE,+ TapeStorageClass_GLACIER,+ TapeStorageClass'+ #-}
+ gen/Amazonka/StorageGateway/Types/VTLDevice.hs view
@@ -0,0 +1,124 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# 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.Types.VTLDevice+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.StorageGateway.Types.VTLDevice 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 Amazonka.StorageGateway.Types.DeviceiSCSIAttributes++-- | Represents a device object associated with a tape gateway.+--+-- /See:/ 'newVTLDevice' smart constructor.+data VTLDevice = VTLDevice'+ { -- | A list of iSCSI information about a VTL device.+ deviceiSCSIAttributes :: Prelude.Maybe DeviceiSCSIAttributes,+ -- | Specifies the unique Amazon Resource Name (ARN) of the device (tape+ -- drive or media changer).+ vTLDeviceARN :: Prelude.Maybe Prelude.Text,+ -- | Specifies the model number of device that the VTL device emulates.+ vTLDeviceProductIdentifier :: Prelude.Maybe Prelude.Text,+ -- | Specifies the type of device that the VTL device emulates.+ vTLDeviceType :: Prelude.Maybe Prelude.Text,+ -- | Specifies the vendor of the device that the VTL device object emulates.+ vTLDeviceVendor :: Prelude.Maybe Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'VTLDevice' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'deviceiSCSIAttributes', 'vTLDevice_deviceiSCSIAttributes' - A list of iSCSI information about a VTL device.+--+-- 'vTLDeviceARN', 'vTLDevice_vTLDeviceARN' - Specifies the unique Amazon Resource Name (ARN) of the device (tape+-- drive or media changer).+--+-- 'vTLDeviceProductIdentifier', 'vTLDevice_vTLDeviceProductIdentifier' - Specifies the model number of device that the VTL device emulates.+--+-- 'vTLDeviceType', 'vTLDevice_vTLDeviceType' - Specifies the type of device that the VTL device emulates.+--+-- 'vTLDeviceVendor', 'vTLDevice_vTLDeviceVendor' - Specifies the vendor of the device that the VTL device object emulates.+newVTLDevice ::+ VTLDevice+newVTLDevice =+ VTLDevice'+ { deviceiSCSIAttributes = Prelude.Nothing,+ vTLDeviceARN = Prelude.Nothing,+ vTLDeviceProductIdentifier = Prelude.Nothing,+ vTLDeviceType = Prelude.Nothing,+ vTLDeviceVendor = Prelude.Nothing+ }++-- | A list of iSCSI information about a VTL device.+vTLDevice_deviceiSCSIAttributes :: Lens.Lens' VTLDevice (Prelude.Maybe DeviceiSCSIAttributes)+vTLDevice_deviceiSCSIAttributes = Lens.lens (\VTLDevice' {deviceiSCSIAttributes} -> deviceiSCSIAttributes) (\s@VTLDevice' {} a -> s {deviceiSCSIAttributes = a} :: VTLDevice)++-- | Specifies the unique Amazon Resource Name (ARN) of the device (tape+-- drive or media changer).+vTLDevice_vTLDeviceARN :: Lens.Lens' VTLDevice (Prelude.Maybe Prelude.Text)+vTLDevice_vTLDeviceARN = Lens.lens (\VTLDevice' {vTLDeviceARN} -> vTLDeviceARN) (\s@VTLDevice' {} a -> s {vTLDeviceARN = a} :: VTLDevice)++-- | Specifies the model number of device that the VTL device emulates.+vTLDevice_vTLDeviceProductIdentifier :: Lens.Lens' VTLDevice (Prelude.Maybe Prelude.Text)+vTLDevice_vTLDeviceProductIdentifier = Lens.lens (\VTLDevice' {vTLDeviceProductIdentifier} -> vTLDeviceProductIdentifier) (\s@VTLDevice' {} a -> s {vTLDeviceProductIdentifier = a} :: VTLDevice)++-- | Specifies the type of device that the VTL device emulates.+vTLDevice_vTLDeviceType :: Lens.Lens' VTLDevice (Prelude.Maybe Prelude.Text)+vTLDevice_vTLDeviceType = Lens.lens (\VTLDevice' {vTLDeviceType} -> vTLDeviceType) (\s@VTLDevice' {} a -> s {vTLDeviceType = a} :: VTLDevice)++-- | Specifies the vendor of the device that the VTL device object emulates.+vTLDevice_vTLDeviceVendor :: Lens.Lens' VTLDevice (Prelude.Maybe Prelude.Text)+vTLDevice_vTLDeviceVendor = Lens.lens (\VTLDevice' {vTLDeviceVendor} -> vTLDeviceVendor) (\s@VTLDevice' {} a -> s {vTLDeviceVendor = a} :: VTLDevice)++instance Data.FromJSON VTLDevice where+ parseJSON =+ Data.withObject+ "VTLDevice"+ ( \x ->+ VTLDevice'+ Prelude.<$> (x Data..:? "DeviceiSCSIAttributes")+ Prelude.<*> (x Data..:? "VTLDeviceARN")+ Prelude.<*> (x Data..:? "VTLDeviceProductIdentifier")+ Prelude.<*> (x Data..:? "VTLDeviceType")+ Prelude.<*> (x Data..:? "VTLDeviceVendor")+ )++instance Prelude.Hashable VTLDevice where+ hashWithSalt _salt VTLDevice' {..} =+ _salt+ `Prelude.hashWithSalt` deviceiSCSIAttributes+ `Prelude.hashWithSalt` vTLDeviceARN+ `Prelude.hashWithSalt` vTLDeviceProductIdentifier+ `Prelude.hashWithSalt` vTLDeviceType+ `Prelude.hashWithSalt` vTLDeviceVendor++instance Prelude.NFData VTLDevice where+ rnf VTLDevice' {..} =+ Prelude.rnf deviceiSCSIAttributes+ `Prelude.seq` Prelude.rnf vTLDeviceARN+ `Prelude.seq` Prelude.rnf vTLDeviceProductIdentifier+ `Prelude.seq` Prelude.rnf vTLDeviceType+ `Prelude.seq` Prelude.rnf vTLDeviceVendor
+ gen/Amazonka/StorageGateway/Types/VolumeInfo.hs view
@@ -0,0 +1,206 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# 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.Types.VolumeInfo+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.StorageGateway.Types.VolumeInfo 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++-- | Describes a storage volume object.+--+-- /See:/ 'newVolumeInfo' smart constructor.+data VolumeInfo = VolumeInfo'+ { gatewayARN :: Prelude.Maybe Prelude.Text,+ -- | The unique identifier assigned to your gateway during activation. This+ -- ID becomes part of the gateway Amazon Resource Name (ARN), which you use+ -- as input for other operations.+ --+ -- Valid Values: 50 to 500 lowercase letters, numbers, periods (.), and+ -- hyphens (-).+ gatewayId :: Prelude.Maybe Prelude.Text,+ -- | The Amazon Resource Name (ARN) for the storage volume. For example, the+ -- following is a valid ARN:+ --+ -- @arn:aws:storagegateway:us-east-2:111122223333:gateway\/sgw-12A3456B\/volume\/vol-1122AABB@+ --+ -- Valid Values: 50 to 500 lowercase letters, numbers, periods (.), and+ -- hyphens (-).+ volumeARN :: Prelude.Maybe Prelude.Text,+ -- | One of the VolumeStatus values that indicates the state of the storage+ -- volume.+ volumeAttachmentStatus :: Prelude.Maybe Prelude.Text,+ -- | The unique identifier assigned to the volume. This ID becomes part of+ -- the volume Amazon Resource Name (ARN), which you use as input for other+ -- operations.+ --+ -- Valid Values: 50 to 500 lowercase letters, numbers, periods (.), and+ -- hyphens (-).+ volumeId :: Prelude.Maybe Prelude.Text,+ -- | The size of the volume in bytes.+ --+ -- Valid Values: 50 to 500 lowercase letters, numbers, periods (.), and+ -- hyphens (-).+ volumeSizeInBytes :: Prelude.Maybe Prelude.Integer,+ -- | One of the VolumeType enumeration values describing the type of the+ -- volume.+ volumeType :: Prelude.Maybe Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'VolumeInfo' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'volumeInfo_gatewayARN' - Undocumented member.+--+-- 'gatewayId', 'volumeInfo_gatewayId' - The unique identifier assigned to your gateway during activation. This+-- ID becomes part of the gateway Amazon Resource Name (ARN), which you use+-- as input for other operations.+--+-- Valid Values: 50 to 500 lowercase letters, numbers, periods (.), and+-- hyphens (-).+--+-- 'volumeARN', 'volumeInfo_volumeARN' - The Amazon Resource Name (ARN) for the storage volume. For example, the+-- following is a valid ARN:+--+-- @arn:aws:storagegateway:us-east-2:111122223333:gateway\/sgw-12A3456B\/volume\/vol-1122AABB@+--+-- Valid Values: 50 to 500 lowercase letters, numbers, periods (.), and+-- hyphens (-).+--+-- 'volumeAttachmentStatus', 'volumeInfo_volumeAttachmentStatus' - One of the VolumeStatus values that indicates the state of the storage+-- volume.+--+-- 'volumeId', 'volumeInfo_volumeId' - The unique identifier assigned to the volume. This ID becomes part of+-- the volume Amazon Resource Name (ARN), which you use as input for other+-- operations.+--+-- Valid Values: 50 to 500 lowercase letters, numbers, periods (.), and+-- hyphens (-).+--+-- 'volumeSizeInBytes', 'volumeInfo_volumeSizeInBytes' - The size of the volume in bytes.+--+-- Valid Values: 50 to 500 lowercase letters, numbers, periods (.), and+-- hyphens (-).+--+-- 'volumeType', 'volumeInfo_volumeType' - One of the VolumeType enumeration values describing the type of the+-- volume.+newVolumeInfo ::+ VolumeInfo+newVolumeInfo =+ VolumeInfo'+ { gatewayARN = Prelude.Nothing,+ gatewayId = Prelude.Nothing,+ volumeARN = Prelude.Nothing,+ volumeAttachmentStatus = Prelude.Nothing,+ volumeId = Prelude.Nothing,+ volumeSizeInBytes = Prelude.Nothing,+ volumeType = Prelude.Nothing+ }++-- | Undocumented member.+volumeInfo_gatewayARN :: Lens.Lens' VolumeInfo (Prelude.Maybe Prelude.Text)+volumeInfo_gatewayARN = Lens.lens (\VolumeInfo' {gatewayARN} -> gatewayARN) (\s@VolumeInfo' {} a -> s {gatewayARN = a} :: VolumeInfo)++-- | The unique identifier assigned to your gateway during activation. This+-- ID becomes part of the gateway Amazon Resource Name (ARN), which you use+-- as input for other operations.+--+-- Valid Values: 50 to 500 lowercase letters, numbers, periods (.), and+-- hyphens (-).+volumeInfo_gatewayId :: Lens.Lens' VolumeInfo (Prelude.Maybe Prelude.Text)+volumeInfo_gatewayId = Lens.lens (\VolumeInfo' {gatewayId} -> gatewayId) (\s@VolumeInfo' {} a -> s {gatewayId = a} :: VolumeInfo)++-- | The Amazon Resource Name (ARN) for the storage volume. For example, the+-- following is a valid ARN:+--+-- @arn:aws:storagegateway:us-east-2:111122223333:gateway\/sgw-12A3456B\/volume\/vol-1122AABB@+--+-- Valid Values: 50 to 500 lowercase letters, numbers, periods (.), and+-- hyphens (-).+volumeInfo_volumeARN :: Lens.Lens' VolumeInfo (Prelude.Maybe Prelude.Text)+volumeInfo_volumeARN = Lens.lens (\VolumeInfo' {volumeARN} -> volumeARN) (\s@VolumeInfo' {} a -> s {volumeARN = a} :: VolumeInfo)++-- | One of the VolumeStatus values that indicates the state of the storage+-- volume.+volumeInfo_volumeAttachmentStatus :: Lens.Lens' VolumeInfo (Prelude.Maybe Prelude.Text)+volumeInfo_volumeAttachmentStatus = Lens.lens (\VolumeInfo' {volumeAttachmentStatus} -> volumeAttachmentStatus) (\s@VolumeInfo' {} a -> s {volumeAttachmentStatus = a} :: VolumeInfo)++-- | The unique identifier assigned to the volume. This ID becomes part of+-- the volume Amazon Resource Name (ARN), which you use as input for other+-- operations.+--+-- Valid Values: 50 to 500 lowercase letters, numbers, periods (.), and+-- hyphens (-).+volumeInfo_volumeId :: Lens.Lens' VolumeInfo (Prelude.Maybe Prelude.Text)+volumeInfo_volumeId = Lens.lens (\VolumeInfo' {volumeId} -> volumeId) (\s@VolumeInfo' {} a -> s {volumeId = a} :: VolumeInfo)++-- | The size of the volume in bytes.+--+-- Valid Values: 50 to 500 lowercase letters, numbers, periods (.), and+-- hyphens (-).+volumeInfo_volumeSizeInBytes :: Lens.Lens' VolumeInfo (Prelude.Maybe Prelude.Integer)+volumeInfo_volumeSizeInBytes = Lens.lens (\VolumeInfo' {volumeSizeInBytes} -> volumeSizeInBytes) (\s@VolumeInfo' {} a -> s {volumeSizeInBytes = a} :: VolumeInfo)++-- | One of the VolumeType enumeration values describing the type of the+-- volume.+volumeInfo_volumeType :: Lens.Lens' VolumeInfo (Prelude.Maybe Prelude.Text)+volumeInfo_volumeType = Lens.lens (\VolumeInfo' {volumeType} -> volumeType) (\s@VolumeInfo' {} a -> s {volumeType = a} :: VolumeInfo)++instance Data.FromJSON VolumeInfo where+ parseJSON =+ Data.withObject+ "VolumeInfo"+ ( \x ->+ VolumeInfo'+ Prelude.<$> (x Data..:? "GatewayARN")+ Prelude.<*> (x Data..:? "GatewayId")+ Prelude.<*> (x Data..:? "VolumeARN")+ Prelude.<*> (x Data..:? "VolumeAttachmentStatus")+ Prelude.<*> (x Data..:? "VolumeId")+ Prelude.<*> (x Data..:? "VolumeSizeInBytes")+ Prelude.<*> (x Data..:? "VolumeType")+ )++instance Prelude.Hashable VolumeInfo where+ hashWithSalt _salt VolumeInfo' {..} =+ _salt+ `Prelude.hashWithSalt` gatewayARN+ `Prelude.hashWithSalt` gatewayId+ `Prelude.hashWithSalt` volumeARN+ `Prelude.hashWithSalt` volumeAttachmentStatus+ `Prelude.hashWithSalt` volumeId+ `Prelude.hashWithSalt` volumeSizeInBytes+ `Prelude.hashWithSalt` volumeType++instance Prelude.NFData VolumeInfo where+ rnf VolumeInfo' {..} =+ Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf gatewayId+ `Prelude.seq` Prelude.rnf volumeARN+ `Prelude.seq` Prelude.rnf volumeAttachmentStatus+ `Prelude.seq` Prelude.rnf volumeId+ `Prelude.seq` Prelude.rnf volumeSizeInBytes+ `Prelude.seq` Prelude.rnf volumeType
+ gen/Amazonka/StorageGateway/Types/VolumeRecoveryPointInfo.hs view
@@ -0,0 +1,118 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# 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.Types.VolumeRecoveryPointInfo+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.StorageGateway.Types.VolumeRecoveryPointInfo 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++-- | Describes a storage volume recovery point object.+--+-- /See:/ 'newVolumeRecoveryPointInfo' smart constructor.+data VolumeRecoveryPointInfo = VolumeRecoveryPointInfo'+ { -- | The Amazon Resource Name (ARN) of the volume target.+ volumeARN :: Prelude.Maybe Prelude.Text,+ -- | The time the recovery point was taken.+ volumeRecoveryPointTime :: Prelude.Maybe Prelude.Text,+ -- | The size of the volume in bytes.+ volumeSizeInBytes :: Prelude.Maybe Prelude.Integer,+ -- | The size of the data stored on the volume in bytes.+ --+ -- This value is not available for volumes created prior to May 13, 2015,+ -- until you store data on the volume.+ volumeUsageInBytes :: Prelude.Maybe Prelude.Integer+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'VolumeRecoveryPointInfo' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'volumeARN', 'volumeRecoveryPointInfo_volumeARN' - The Amazon Resource Name (ARN) of the volume target.+--+-- 'volumeRecoveryPointTime', 'volumeRecoveryPointInfo_volumeRecoveryPointTime' - The time the recovery point was taken.+--+-- 'volumeSizeInBytes', 'volumeRecoveryPointInfo_volumeSizeInBytes' - The size of the volume in bytes.+--+-- 'volumeUsageInBytes', 'volumeRecoveryPointInfo_volumeUsageInBytes' - The size of the data stored on the volume in bytes.+--+-- This value is not available for volumes created prior to May 13, 2015,+-- until you store data on the volume.+newVolumeRecoveryPointInfo ::+ VolumeRecoveryPointInfo+newVolumeRecoveryPointInfo =+ VolumeRecoveryPointInfo'+ { volumeARN =+ Prelude.Nothing,+ volumeRecoveryPointTime = Prelude.Nothing,+ volumeSizeInBytes = Prelude.Nothing,+ volumeUsageInBytes = Prelude.Nothing+ }++-- | The Amazon Resource Name (ARN) of the volume target.+volumeRecoveryPointInfo_volumeARN :: Lens.Lens' VolumeRecoveryPointInfo (Prelude.Maybe Prelude.Text)+volumeRecoveryPointInfo_volumeARN = Lens.lens (\VolumeRecoveryPointInfo' {volumeARN} -> volumeARN) (\s@VolumeRecoveryPointInfo' {} a -> s {volumeARN = a} :: VolumeRecoveryPointInfo)++-- | The time the recovery point was taken.+volumeRecoveryPointInfo_volumeRecoveryPointTime :: Lens.Lens' VolumeRecoveryPointInfo (Prelude.Maybe Prelude.Text)+volumeRecoveryPointInfo_volumeRecoveryPointTime = Lens.lens (\VolumeRecoveryPointInfo' {volumeRecoveryPointTime} -> volumeRecoveryPointTime) (\s@VolumeRecoveryPointInfo' {} a -> s {volumeRecoveryPointTime = a} :: VolumeRecoveryPointInfo)++-- | The size of the volume in bytes.+volumeRecoveryPointInfo_volumeSizeInBytes :: Lens.Lens' VolumeRecoveryPointInfo (Prelude.Maybe Prelude.Integer)+volumeRecoveryPointInfo_volumeSizeInBytes = Lens.lens (\VolumeRecoveryPointInfo' {volumeSizeInBytes} -> volumeSizeInBytes) (\s@VolumeRecoveryPointInfo' {} a -> s {volumeSizeInBytes = a} :: VolumeRecoveryPointInfo)++-- | The size of the data stored on the volume in bytes.+--+-- This value is not available for volumes created prior to May 13, 2015,+-- until you store data on the volume.+volumeRecoveryPointInfo_volumeUsageInBytes :: Lens.Lens' VolumeRecoveryPointInfo (Prelude.Maybe Prelude.Integer)+volumeRecoveryPointInfo_volumeUsageInBytes = Lens.lens (\VolumeRecoveryPointInfo' {volumeUsageInBytes} -> volumeUsageInBytes) (\s@VolumeRecoveryPointInfo' {} a -> s {volumeUsageInBytes = a} :: VolumeRecoveryPointInfo)++instance Data.FromJSON VolumeRecoveryPointInfo where+ parseJSON =+ Data.withObject+ "VolumeRecoveryPointInfo"+ ( \x ->+ VolumeRecoveryPointInfo'+ Prelude.<$> (x Data..:? "VolumeARN")+ Prelude.<*> (x Data..:? "VolumeRecoveryPointTime")+ Prelude.<*> (x Data..:? "VolumeSizeInBytes")+ Prelude.<*> (x Data..:? "VolumeUsageInBytes")+ )++instance Prelude.Hashable VolumeRecoveryPointInfo where+ hashWithSalt _salt VolumeRecoveryPointInfo' {..} =+ _salt+ `Prelude.hashWithSalt` volumeARN+ `Prelude.hashWithSalt` volumeRecoveryPointTime+ `Prelude.hashWithSalt` volumeSizeInBytes+ `Prelude.hashWithSalt` volumeUsageInBytes++instance Prelude.NFData VolumeRecoveryPointInfo where+ rnf VolumeRecoveryPointInfo' {..} =+ Prelude.rnf volumeARN+ `Prelude.seq` Prelude.rnf volumeRecoveryPointTime+ `Prelude.seq` Prelude.rnf volumeSizeInBytes+ `Prelude.seq` Prelude.rnf volumeUsageInBytes
+ gen/Amazonka/StorageGateway/Types/VolumeiSCSIAttributes.hs view
@@ -0,0 +1,121 @@+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE NamedFieldPuns #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# 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.Types.VolumeiSCSIAttributes+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.StorageGateway.Types.VolumeiSCSIAttributes 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++-- | Lists iSCSI information about a volume.+--+-- /See:/ 'newVolumeiSCSIAttributes' smart constructor.+data VolumeiSCSIAttributes = VolumeiSCSIAttributes'+ { -- | Indicates whether mutual CHAP is enabled for the iSCSI target.+ chapEnabled :: Prelude.Maybe Prelude.Bool,+ -- | The logical disk number.+ lunNumber :: Prelude.Maybe Prelude.Natural,+ -- | The network interface identifier.+ networkInterfaceId :: Prelude.Maybe Prelude.Text,+ -- | The port used to communicate with iSCSI targets.+ networkInterfacePort :: Prelude.Maybe Prelude.Int,+ -- | The Amazon Resource Name (ARN) of the volume target.+ targetARN :: Prelude.Maybe Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'VolumeiSCSIAttributes' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'chapEnabled', 'volumeiSCSIAttributes_chapEnabled' - Indicates whether mutual CHAP is enabled for the iSCSI target.+--+-- 'lunNumber', 'volumeiSCSIAttributes_lunNumber' - The logical disk number.+--+-- 'networkInterfaceId', 'volumeiSCSIAttributes_networkInterfaceId' - The network interface identifier.+--+-- 'networkInterfacePort', 'volumeiSCSIAttributes_networkInterfacePort' - The port used to communicate with iSCSI targets.+--+-- 'targetARN', 'volumeiSCSIAttributes_targetARN' - The Amazon Resource Name (ARN) of the volume target.+newVolumeiSCSIAttributes ::+ VolumeiSCSIAttributes+newVolumeiSCSIAttributes =+ VolumeiSCSIAttributes'+ { chapEnabled =+ Prelude.Nothing,+ lunNumber = Prelude.Nothing,+ networkInterfaceId = Prelude.Nothing,+ networkInterfacePort = Prelude.Nothing,+ targetARN = Prelude.Nothing+ }++-- | Indicates whether mutual CHAP is enabled for the iSCSI target.+volumeiSCSIAttributes_chapEnabled :: Lens.Lens' VolumeiSCSIAttributes (Prelude.Maybe Prelude.Bool)+volumeiSCSIAttributes_chapEnabled = Lens.lens (\VolumeiSCSIAttributes' {chapEnabled} -> chapEnabled) (\s@VolumeiSCSIAttributes' {} a -> s {chapEnabled = a} :: VolumeiSCSIAttributes)++-- | The logical disk number.+volumeiSCSIAttributes_lunNumber :: Lens.Lens' VolumeiSCSIAttributes (Prelude.Maybe Prelude.Natural)+volumeiSCSIAttributes_lunNumber = Lens.lens (\VolumeiSCSIAttributes' {lunNumber} -> lunNumber) (\s@VolumeiSCSIAttributes' {} a -> s {lunNumber = a} :: VolumeiSCSIAttributes)++-- | The network interface identifier.+volumeiSCSIAttributes_networkInterfaceId :: Lens.Lens' VolumeiSCSIAttributes (Prelude.Maybe Prelude.Text)+volumeiSCSIAttributes_networkInterfaceId = Lens.lens (\VolumeiSCSIAttributes' {networkInterfaceId} -> networkInterfaceId) (\s@VolumeiSCSIAttributes' {} a -> s {networkInterfaceId = a} :: VolumeiSCSIAttributes)++-- | The port used to communicate with iSCSI targets.+volumeiSCSIAttributes_networkInterfacePort :: Lens.Lens' VolumeiSCSIAttributes (Prelude.Maybe Prelude.Int)+volumeiSCSIAttributes_networkInterfacePort = Lens.lens (\VolumeiSCSIAttributes' {networkInterfacePort} -> networkInterfacePort) (\s@VolumeiSCSIAttributes' {} a -> s {networkInterfacePort = a} :: VolumeiSCSIAttributes)++-- | The Amazon Resource Name (ARN) of the volume target.+volumeiSCSIAttributes_targetARN :: Lens.Lens' VolumeiSCSIAttributes (Prelude.Maybe Prelude.Text)+volumeiSCSIAttributes_targetARN = Lens.lens (\VolumeiSCSIAttributes' {targetARN} -> targetARN) (\s@VolumeiSCSIAttributes' {} a -> s {targetARN = a} :: VolumeiSCSIAttributes)++instance Data.FromJSON VolumeiSCSIAttributes where+ parseJSON =+ Data.withObject+ "VolumeiSCSIAttributes"+ ( \x ->+ VolumeiSCSIAttributes'+ Prelude.<$> (x Data..:? "ChapEnabled")+ Prelude.<*> (x Data..:? "LunNumber")+ Prelude.<*> (x Data..:? "NetworkInterfaceId")+ Prelude.<*> (x Data..:? "NetworkInterfacePort")+ Prelude.<*> (x Data..:? "TargetARN")+ )++instance Prelude.Hashable VolumeiSCSIAttributes where+ hashWithSalt _salt VolumeiSCSIAttributes' {..} =+ _salt+ `Prelude.hashWithSalt` chapEnabled+ `Prelude.hashWithSalt` lunNumber+ `Prelude.hashWithSalt` networkInterfaceId+ `Prelude.hashWithSalt` networkInterfacePort+ `Prelude.hashWithSalt` targetARN++instance Prelude.NFData VolumeiSCSIAttributes where+ rnf VolumeiSCSIAttributes' {..} =+ Prelude.rnf chapEnabled+ `Prelude.seq` Prelude.rnf lunNumber+ `Prelude.seq` Prelude.rnf networkInterfaceId+ `Prelude.seq` Prelude.rnf networkInterfacePort+ `Prelude.seq` Prelude.rnf targetARN
+ gen/Amazonka/StorageGateway/UpdateAutomaticTapeCreationPolicy.hs view
@@ -0,0 +1,232 @@+{-# 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.UpdateAutomaticTapeCreationPolicy+-- 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 the automatic tape creation policy of a gateway. Use this to+-- update the policy with a new set of automatic tape creation rules. This+-- is only supported for tape gateways.+--+-- By default, there is no automatic tape creation policy.+--+-- A gateway can have only one automatic tape creation policy.+module Amazonka.StorageGateway.UpdateAutomaticTapeCreationPolicy+ ( -- * Creating a Request+ UpdateAutomaticTapeCreationPolicy (..),+ newUpdateAutomaticTapeCreationPolicy,++ -- * Request Lenses+ updateAutomaticTapeCreationPolicy_automaticTapeCreationRules,+ updateAutomaticTapeCreationPolicy_gatewayARN,++ -- * Destructuring the Response+ UpdateAutomaticTapeCreationPolicyResponse (..),+ newUpdateAutomaticTapeCreationPolicyResponse,++ -- * Response Lenses+ updateAutomaticTapeCreationPolicyResponse_gatewayARN,+ updateAutomaticTapeCreationPolicyResponse_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++-- | /See:/ 'newUpdateAutomaticTapeCreationPolicy' smart constructor.+data UpdateAutomaticTapeCreationPolicy = UpdateAutomaticTapeCreationPolicy'+ { -- | An automatic tape creation policy consists of a list of automatic tape+ -- creation rules. The rules determine when and how to automatically create+ -- new tapes.+ automaticTapeCreationRules :: Prelude.NonEmpty AutomaticTapeCreationRule,+ gatewayARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'UpdateAutomaticTapeCreationPolicy' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'automaticTapeCreationRules', 'updateAutomaticTapeCreationPolicy_automaticTapeCreationRules' - An automatic tape creation policy consists of a list of automatic tape+-- creation rules. The rules determine when and how to automatically create+-- new tapes.+--+-- 'gatewayARN', 'updateAutomaticTapeCreationPolicy_gatewayARN' - Undocumented member.+newUpdateAutomaticTapeCreationPolicy ::+ -- | 'automaticTapeCreationRules'+ Prelude.NonEmpty AutomaticTapeCreationRule ->+ -- | 'gatewayARN'+ Prelude.Text ->+ UpdateAutomaticTapeCreationPolicy+newUpdateAutomaticTapeCreationPolicy+ pAutomaticTapeCreationRules_+ pGatewayARN_ =+ UpdateAutomaticTapeCreationPolicy'+ { automaticTapeCreationRules =+ Lens.coerced+ Lens.# pAutomaticTapeCreationRules_,+ gatewayARN = pGatewayARN_+ }++-- | An automatic tape creation policy consists of a list of automatic tape+-- creation rules. The rules determine when and how to automatically create+-- new tapes.+updateAutomaticTapeCreationPolicy_automaticTapeCreationRules :: Lens.Lens' UpdateAutomaticTapeCreationPolicy (Prelude.NonEmpty AutomaticTapeCreationRule)+updateAutomaticTapeCreationPolicy_automaticTapeCreationRules = Lens.lens (\UpdateAutomaticTapeCreationPolicy' {automaticTapeCreationRules} -> automaticTapeCreationRules) (\s@UpdateAutomaticTapeCreationPolicy' {} a -> s {automaticTapeCreationRules = a} :: UpdateAutomaticTapeCreationPolicy) Prelude.. Lens.coerced++-- | Undocumented member.+updateAutomaticTapeCreationPolicy_gatewayARN :: Lens.Lens' UpdateAutomaticTapeCreationPolicy Prelude.Text+updateAutomaticTapeCreationPolicy_gatewayARN = Lens.lens (\UpdateAutomaticTapeCreationPolicy' {gatewayARN} -> gatewayARN) (\s@UpdateAutomaticTapeCreationPolicy' {} a -> s {gatewayARN = a} :: UpdateAutomaticTapeCreationPolicy)++instance+ Core.AWSRequest+ UpdateAutomaticTapeCreationPolicy+ where+ type+ AWSResponse UpdateAutomaticTapeCreationPolicy =+ UpdateAutomaticTapeCreationPolicyResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ UpdateAutomaticTapeCreationPolicyResponse'+ Prelude.<$> (x Data..?> "GatewayARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance+ Prelude.Hashable+ UpdateAutomaticTapeCreationPolicy+ where+ hashWithSalt+ _salt+ UpdateAutomaticTapeCreationPolicy' {..} =+ _salt+ `Prelude.hashWithSalt` automaticTapeCreationRules+ `Prelude.hashWithSalt` gatewayARN++instance+ Prelude.NFData+ UpdateAutomaticTapeCreationPolicy+ where+ rnf UpdateAutomaticTapeCreationPolicy' {..} =+ Prelude.rnf automaticTapeCreationRules+ `Prelude.seq` Prelude.rnf gatewayARN++instance+ Data.ToHeaders+ UpdateAutomaticTapeCreationPolicy+ where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.UpdateAutomaticTapeCreationPolicy" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance+ Data.ToJSON+ UpdateAutomaticTapeCreationPolicy+ where+ toJSON UpdateAutomaticTapeCreationPolicy' {..} =+ Data.object+ ( Prelude.catMaybes+ [ Prelude.Just+ ( "AutomaticTapeCreationRules"+ Data..= automaticTapeCreationRules+ ),+ Prelude.Just ("GatewayARN" Data..= gatewayARN)+ ]+ )++instance+ Data.ToPath+ UpdateAutomaticTapeCreationPolicy+ where+ toPath = Prelude.const "/"++instance+ Data.ToQuery+ UpdateAutomaticTapeCreationPolicy+ where+ toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newUpdateAutomaticTapeCreationPolicyResponse' smart constructor.+data UpdateAutomaticTapeCreationPolicyResponse = UpdateAutomaticTapeCreationPolicyResponse'+ { gatewayARN :: 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 'UpdateAutomaticTapeCreationPolicyResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'updateAutomaticTapeCreationPolicyResponse_gatewayARN' - Undocumented member.+--+-- 'httpStatus', 'updateAutomaticTapeCreationPolicyResponse_httpStatus' - The response's http status code.+newUpdateAutomaticTapeCreationPolicyResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ UpdateAutomaticTapeCreationPolicyResponse+newUpdateAutomaticTapeCreationPolicyResponse+ pHttpStatus_ =+ UpdateAutomaticTapeCreationPolicyResponse'+ { gatewayARN =+ Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | Undocumented member.+updateAutomaticTapeCreationPolicyResponse_gatewayARN :: Lens.Lens' UpdateAutomaticTapeCreationPolicyResponse (Prelude.Maybe Prelude.Text)+updateAutomaticTapeCreationPolicyResponse_gatewayARN = Lens.lens (\UpdateAutomaticTapeCreationPolicyResponse' {gatewayARN} -> gatewayARN) (\s@UpdateAutomaticTapeCreationPolicyResponse' {} a -> s {gatewayARN = a} :: UpdateAutomaticTapeCreationPolicyResponse)++-- | The response's http status code.+updateAutomaticTapeCreationPolicyResponse_httpStatus :: Lens.Lens' UpdateAutomaticTapeCreationPolicyResponse Prelude.Int+updateAutomaticTapeCreationPolicyResponse_httpStatus = Lens.lens (\UpdateAutomaticTapeCreationPolicyResponse' {httpStatus} -> httpStatus) (\s@UpdateAutomaticTapeCreationPolicyResponse' {} a -> s {httpStatus = a} :: UpdateAutomaticTapeCreationPolicyResponse)++instance+ Prelude.NFData+ UpdateAutomaticTapeCreationPolicyResponse+ where+ rnf UpdateAutomaticTapeCreationPolicyResponse' {..} =+ Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/UpdateBandwidthRateLimit.hs view
@@ -0,0 +1,226 @@+{-# 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.UpdateBandwidthRateLimit+-- 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 the bandwidth rate limits of a gateway. You can update both the+-- upload and download bandwidth rate limit or specify only one of the two.+-- If you don\'t set a bandwidth rate limit, the existing rate limit+-- remains. This operation is supported only for the stored volume, cached+-- volume, and tape gateway types. To update bandwidth rate limits for S3+-- file gateways, use UpdateBandwidthRateLimitSchedule.+--+-- By default, a gateway\'s bandwidth rate limits are not set. If you+-- don\'t set any limit, the gateway does not have any limitations on its+-- bandwidth usage and could potentially use the maximum available+-- bandwidth.+--+-- To specify which gateway to update, use the Amazon Resource Name (ARN)+-- of the gateway in your request.+module Amazonka.StorageGateway.UpdateBandwidthRateLimit+ ( -- * Creating a Request+ UpdateBandwidthRateLimit (..),+ newUpdateBandwidthRateLimit,++ -- * Request Lenses+ updateBandwidthRateLimit_averageDownloadRateLimitInBitsPerSec,+ updateBandwidthRateLimit_averageUploadRateLimitInBitsPerSec,+ updateBandwidthRateLimit_gatewayARN,++ -- * Destructuring the Response+ UpdateBandwidthRateLimitResponse (..),+ newUpdateBandwidthRateLimitResponse,++ -- * Response Lenses+ updateBandwidthRateLimitResponse_gatewayARN,+ updateBandwidthRateLimitResponse_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++-- | A JSON object containing one or more of the following fields:+--+-- - UpdateBandwidthRateLimitInput$AverageDownloadRateLimitInBitsPerSec+--+-- - UpdateBandwidthRateLimitInput$AverageUploadRateLimitInBitsPerSec+--+-- /See:/ 'newUpdateBandwidthRateLimit' smart constructor.+data UpdateBandwidthRateLimit = UpdateBandwidthRateLimit'+ { -- | The average download bandwidth rate limit in bits per second.+ averageDownloadRateLimitInBitsPerSec :: Prelude.Maybe Prelude.Natural,+ -- | The average upload bandwidth rate limit in bits per second.+ averageUploadRateLimitInBitsPerSec :: Prelude.Maybe Prelude.Natural,+ gatewayARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'UpdateBandwidthRateLimit' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'averageDownloadRateLimitInBitsPerSec', 'updateBandwidthRateLimit_averageDownloadRateLimitInBitsPerSec' - The average download bandwidth rate limit in bits per second.+--+-- 'averageUploadRateLimitInBitsPerSec', 'updateBandwidthRateLimit_averageUploadRateLimitInBitsPerSec' - The average upload bandwidth rate limit in bits per second.+--+-- 'gatewayARN', 'updateBandwidthRateLimit_gatewayARN' - Undocumented member.+newUpdateBandwidthRateLimit ::+ -- | 'gatewayARN'+ Prelude.Text ->+ UpdateBandwidthRateLimit+newUpdateBandwidthRateLimit pGatewayARN_ =+ UpdateBandwidthRateLimit'+ { averageDownloadRateLimitInBitsPerSec =+ Prelude.Nothing,+ averageUploadRateLimitInBitsPerSec =+ Prelude.Nothing,+ gatewayARN = pGatewayARN_+ }++-- | The average download bandwidth rate limit in bits per second.+updateBandwidthRateLimit_averageDownloadRateLimitInBitsPerSec :: Lens.Lens' UpdateBandwidthRateLimit (Prelude.Maybe Prelude.Natural)+updateBandwidthRateLimit_averageDownloadRateLimitInBitsPerSec = Lens.lens (\UpdateBandwidthRateLimit' {averageDownloadRateLimitInBitsPerSec} -> averageDownloadRateLimitInBitsPerSec) (\s@UpdateBandwidthRateLimit' {} a -> s {averageDownloadRateLimitInBitsPerSec = a} :: UpdateBandwidthRateLimit)++-- | The average upload bandwidth rate limit in bits per second.+updateBandwidthRateLimit_averageUploadRateLimitInBitsPerSec :: Lens.Lens' UpdateBandwidthRateLimit (Prelude.Maybe Prelude.Natural)+updateBandwidthRateLimit_averageUploadRateLimitInBitsPerSec = Lens.lens (\UpdateBandwidthRateLimit' {averageUploadRateLimitInBitsPerSec} -> averageUploadRateLimitInBitsPerSec) (\s@UpdateBandwidthRateLimit' {} a -> s {averageUploadRateLimitInBitsPerSec = a} :: UpdateBandwidthRateLimit)++-- | Undocumented member.+updateBandwidthRateLimit_gatewayARN :: Lens.Lens' UpdateBandwidthRateLimit Prelude.Text+updateBandwidthRateLimit_gatewayARN = Lens.lens (\UpdateBandwidthRateLimit' {gatewayARN} -> gatewayARN) (\s@UpdateBandwidthRateLimit' {} a -> s {gatewayARN = a} :: UpdateBandwidthRateLimit)++instance Core.AWSRequest UpdateBandwidthRateLimit where+ type+ AWSResponse UpdateBandwidthRateLimit =+ UpdateBandwidthRateLimitResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ UpdateBandwidthRateLimitResponse'+ Prelude.<$> (x Data..?> "GatewayARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable UpdateBandwidthRateLimit where+ hashWithSalt _salt UpdateBandwidthRateLimit' {..} =+ _salt+ `Prelude.hashWithSalt` averageDownloadRateLimitInBitsPerSec+ `Prelude.hashWithSalt` averageUploadRateLimitInBitsPerSec+ `Prelude.hashWithSalt` gatewayARN++instance Prelude.NFData UpdateBandwidthRateLimit where+ rnf UpdateBandwidthRateLimit' {..} =+ Prelude.rnf averageDownloadRateLimitInBitsPerSec+ `Prelude.seq` Prelude.rnf averageUploadRateLimitInBitsPerSec+ `Prelude.seq` Prelude.rnf gatewayARN++instance Data.ToHeaders UpdateBandwidthRateLimit where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.UpdateBandwidthRateLimit" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON UpdateBandwidthRateLimit where+ toJSON UpdateBandwidthRateLimit' {..} =+ Data.object+ ( Prelude.catMaybes+ [ ("AverageDownloadRateLimitInBitsPerSec" Data..=)+ Prelude.<$> averageDownloadRateLimitInBitsPerSec,+ ("AverageUploadRateLimitInBitsPerSec" Data..=)+ Prelude.<$> averageUploadRateLimitInBitsPerSec,+ Prelude.Just ("GatewayARN" Data..= gatewayARN)+ ]+ )++instance Data.ToPath UpdateBandwidthRateLimit where+ toPath = Prelude.const "/"++instance Data.ToQuery UpdateBandwidthRateLimit where+ toQuery = Prelude.const Prelude.mempty++-- | A JSON object containing the Amazon Resource Name (ARN) of the gateway+-- whose throttle information was updated.+--+-- /See:/ 'newUpdateBandwidthRateLimitResponse' smart constructor.+data UpdateBandwidthRateLimitResponse = UpdateBandwidthRateLimitResponse'+ { gatewayARN :: 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 'UpdateBandwidthRateLimitResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'updateBandwidthRateLimitResponse_gatewayARN' - Undocumented member.+--+-- 'httpStatus', 'updateBandwidthRateLimitResponse_httpStatus' - The response's http status code.+newUpdateBandwidthRateLimitResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ UpdateBandwidthRateLimitResponse+newUpdateBandwidthRateLimitResponse pHttpStatus_ =+ UpdateBandwidthRateLimitResponse'+ { gatewayARN =+ Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | Undocumented member.+updateBandwidthRateLimitResponse_gatewayARN :: Lens.Lens' UpdateBandwidthRateLimitResponse (Prelude.Maybe Prelude.Text)+updateBandwidthRateLimitResponse_gatewayARN = Lens.lens (\UpdateBandwidthRateLimitResponse' {gatewayARN} -> gatewayARN) (\s@UpdateBandwidthRateLimitResponse' {} a -> s {gatewayARN = a} :: UpdateBandwidthRateLimitResponse)++-- | The response's http status code.+updateBandwidthRateLimitResponse_httpStatus :: Lens.Lens' UpdateBandwidthRateLimitResponse Prelude.Int+updateBandwidthRateLimitResponse_httpStatus = Lens.lens (\UpdateBandwidthRateLimitResponse' {httpStatus} -> httpStatus) (\s@UpdateBandwidthRateLimitResponse' {} a -> s {httpStatus = a} :: UpdateBandwidthRateLimitResponse)++instance+ Prelude.NFData+ UpdateBandwidthRateLimitResponse+ where+ rnf UpdateBandwidthRateLimitResponse' {..} =+ Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/UpdateBandwidthRateLimitSchedule.hs view
@@ -0,0 +1,221 @@+{-# 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.UpdateBandwidthRateLimitSchedule+-- 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 the bandwidth rate limit schedule for a specified gateway. By+-- default, gateways do not have bandwidth rate limit schedules, which+-- means no bandwidth rate limiting is in effect. Use this to initiate or+-- update a gateway\'s bandwidth rate limit schedule. This operation is+-- supported only for volume, tape and S3 file gateways. FSx file gateways+-- do not support bandwidth rate limits.+module Amazonka.StorageGateway.UpdateBandwidthRateLimitSchedule+ ( -- * Creating a Request+ UpdateBandwidthRateLimitSchedule (..),+ newUpdateBandwidthRateLimitSchedule,++ -- * Request Lenses+ updateBandwidthRateLimitSchedule_gatewayARN,+ updateBandwidthRateLimitSchedule_bandwidthRateLimitIntervals,++ -- * Destructuring the Response+ UpdateBandwidthRateLimitScheduleResponse (..),+ newUpdateBandwidthRateLimitScheduleResponse,++ -- * Response Lenses+ updateBandwidthRateLimitScheduleResponse_gatewayARN,+ updateBandwidthRateLimitScheduleResponse_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++-- | /See:/ 'newUpdateBandwidthRateLimitSchedule' smart constructor.+data UpdateBandwidthRateLimitSchedule = UpdateBandwidthRateLimitSchedule'+ { gatewayARN :: Prelude.Text,+ -- | An array containing bandwidth rate limit schedule intervals for a+ -- gateway. When no bandwidth rate limit intervals have been scheduled, the+ -- array is empty.+ bandwidthRateLimitIntervals :: [BandwidthRateLimitInterval]+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'UpdateBandwidthRateLimitSchedule' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'updateBandwidthRateLimitSchedule_gatewayARN' - Undocumented member.+--+-- 'bandwidthRateLimitIntervals', 'updateBandwidthRateLimitSchedule_bandwidthRateLimitIntervals' - An array containing bandwidth rate limit schedule intervals for a+-- gateway. When no bandwidth rate limit intervals have been scheduled, the+-- array is empty.+newUpdateBandwidthRateLimitSchedule ::+ -- | 'gatewayARN'+ Prelude.Text ->+ UpdateBandwidthRateLimitSchedule+newUpdateBandwidthRateLimitSchedule pGatewayARN_ =+ UpdateBandwidthRateLimitSchedule'+ { gatewayARN =+ pGatewayARN_,+ bandwidthRateLimitIntervals =+ Prelude.mempty+ }++-- | Undocumented member.+updateBandwidthRateLimitSchedule_gatewayARN :: Lens.Lens' UpdateBandwidthRateLimitSchedule Prelude.Text+updateBandwidthRateLimitSchedule_gatewayARN = Lens.lens (\UpdateBandwidthRateLimitSchedule' {gatewayARN} -> gatewayARN) (\s@UpdateBandwidthRateLimitSchedule' {} a -> s {gatewayARN = a} :: UpdateBandwidthRateLimitSchedule)++-- | An array containing bandwidth rate limit schedule intervals for a+-- gateway. When no bandwidth rate limit intervals have been scheduled, the+-- array is empty.+updateBandwidthRateLimitSchedule_bandwidthRateLimitIntervals :: Lens.Lens' UpdateBandwidthRateLimitSchedule [BandwidthRateLimitInterval]+updateBandwidthRateLimitSchedule_bandwidthRateLimitIntervals = Lens.lens (\UpdateBandwidthRateLimitSchedule' {bandwidthRateLimitIntervals} -> bandwidthRateLimitIntervals) (\s@UpdateBandwidthRateLimitSchedule' {} a -> s {bandwidthRateLimitIntervals = a} :: UpdateBandwidthRateLimitSchedule) Prelude.. Lens.coerced++instance+ Core.AWSRequest+ UpdateBandwidthRateLimitSchedule+ where+ type+ AWSResponse UpdateBandwidthRateLimitSchedule =+ UpdateBandwidthRateLimitScheduleResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ UpdateBandwidthRateLimitScheduleResponse'+ Prelude.<$> (x Data..?> "GatewayARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance+ Prelude.Hashable+ UpdateBandwidthRateLimitSchedule+ where+ hashWithSalt+ _salt+ UpdateBandwidthRateLimitSchedule' {..} =+ _salt+ `Prelude.hashWithSalt` gatewayARN+ `Prelude.hashWithSalt` bandwidthRateLimitIntervals++instance+ Prelude.NFData+ UpdateBandwidthRateLimitSchedule+ where+ rnf UpdateBandwidthRateLimitSchedule' {..} =+ Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf bandwidthRateLimitIntervals++instance+ Data.ToHeaders+ UpdateBandwidthRateLimitSchedule+ where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.UpdateBandwidthRateLimitSchedule" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON UpdateBandwidthRateLimitSchedule where+ toJSON UpdateBandwidthRateLimitSchedule' {..} =+ Data.object+ ( Prelude.catMaybes+ [ Prelude.Just ("GatewayARN" Data..= gatewayARN),+ Prelude.Just+ ( "BandwidthRateLimitIntervals"+ Data..= bandwidthRateLimitIntervals+ )+ ]+ )++instance Data.ToPath UpdateBandwidthRateLimitSchedule where+ toPath = Prelude.const "/"++instance+ Data.ToQuery+ UpdateBandwidthRateLimitSchedule+ where+ toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newUpdateBandwidthRateLimitScheduleResponse' smart constructor.+data UpdateBandwidthRateLimitScheduleResponse = UpdateBandwidthRateLimitScheduleResponse'+ { gatewayARN :: 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 'UpdateBandwidthRateLimitScheduleResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'updateBandwidthRateLimitScheduleResponse_gatewayARN' - Undocumented member.+--+-- 'httpStatus', 'updateBandwidthRateLimitScheduleResponse_httpStatus' - The response's http status code.+newUpdateBandwidthRateLimitScheduleResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ UpdateBandwidthRateLimitScheduleResponse+newUpdateBandwidthRateLimitScheduleResponse+ pHttpStatus_ =+ UpdateBandwidthRateLimitScheduleResponse'+ { gatewayARN =+ Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | Undocumented member.+updateBandwidthRateLimitScheduleResponse_gatewayARN :: Lens.Lens' UpdateBandwidthRateLimitScheduleResponse (Prelude.Maybe Prelude.Text)+updateBandwidthRateLimitScheduleResponse_gatewayARN = Lens.lens (\UpdateBandwidthRateLimitScheduleResponse' {gatewayARN} -> gatewayARN) (\s@UpdateBandwidthRateLimitScheduleResponse' {} a -> s {gatewayARN = a} :: UpdateBandwidthRateLimitScheduleResponse)++-- | The response's http status code.+updateBandwidthRateLimitScheduleResponse_httpStatus :: Lens.Lens' UpdateBandwidthRateLimitScheduleResponse Prelude.Int+updateBandwidthRateLimitScheduleResponse_httpStatus = Lens.lens (\UpdateBandwidthRateLimitScheduleResponse' {httpStatus} -> httpStatus) (\s@UpdateBandwidthRateLimitScheduleResponse' {} a -> s {httpStatus = a} :: UpdateBandwidthRateLimitScheduleResponse)++instance+ Prelude.NFData+ UpdateBandwidthRateLimitScheduleResponse+ where+ rnf UpdateBandwidthRateLimitScheduleResponse' {..} =+ Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/UpdateChapCredentials.hs view
@@ -0,0 +1,293 @@+{-# 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.UpdateChapCredentials+-- 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 the Challenge-Handshake Authentication Protocol (CHAP)+-- credentials for a specified iSCSI target. By default, a gateway does not+-- have CHAP enabled; however, for added security, you might use it. This+-- operation is supported in the volume and tape gateway types.+--+-- When you update CHAP credentials, all existing connections on the target+-- are closed and initiators must reconnect with the new credentials.+module Amazonka.StorageGateway.UpdateChapCredentials+ ( -- * Creating a Request+ UpdateChapCredentials (..),+ newUpdateChapCredentials,++ -- * Request Lenses+ updateChapCredentials_secretToAuthenticateTarget,+ updateChapCredentials_targetARN,+ updateChapCredentials_secretToAuthenticateInitiator,+ updateChapCredentials_initiatorName,++ -- * Destructuring the Response+ UpdateChapCredentialsResponse (..),+ newUpdateChapCredentialsResponse,++ -- * Response Lenses+ updateChapCredentialsResponse_initiatorName,+ updateChapCredentialsResponse_targetARN,+ updateChapCredentialsResponse_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++-- | A JSON object containing one or more of the following fields:+--+-- - UpdateChapCredentialsInput$InitiatorName+--+-- - UpdateChapCredentialsInput$SecretToAuthenticateInitiator+--+-- - UpdateChapCredentialsInput$SecretToAuthenticateTarget+--+-- - UpdateChapCredentialsInput$TargetARN+--+-- /See:/ 'newUpdateChapCredentials' smart constructor.+data UpdateChapCredentials = UpdateChapCredentials'+ { -- | The secret key that the target must provide to participate in mutual+ -- CHAP with the initiator (e.g. Windows client).+ --+ -- Byte constraints: Minimum bytes of 12. Maximum bytes of 16.+ --+ -- The secret key must be between 12 and 16 bytes when encoded in UTF-8.+ secretToAuthenticateTarget :: Prelude.Maybe (Data.Sensitive Prelude.Text),+ -- | The Amazon Resource Name (ARN) of the iSCSI volume target. Use the+ -- DescribeStorediSCSIVolumes operation to return the TargetARN for+ -- specified VolumeARN.+ targetARN :: Prelude.Text,+ -- | The secret key that the initiator (for example, the Windows client) must+ -- provide to participate in mutual CHAP with the target.+ --+ -- The secret key must be between 12 and 16 bytes when encoded in UTF-8.+ secretToAuthenticateInitiator :: Data.Sensitive Prelude.Text,+ -- | The iSCSI initiator that connects to the target.+ initiatorName :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'UpdateChapCredentials' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'secretToAuthenticateTarget', 'updateChapCredentials_secretToAuthenticateTarget' - The secret key that the target must provide to participate in mutual+-- CHAP with the initiator (e.g. Windows client).+--+-- Byte constraints: Minimum bytes of 12. Maximum bytes of 16.+--+-- The secret key must be between 12 and 16 bytes when encoded in UTF-8.+--+-- 'targetARN', 'updateChapCredentials_targetARN' - The Amazon Resource Name (ARN) of the iSCSI volume target. Use the+-- DescribeStorediSCSIVolumes operation to return the TargetARN for+-- specified VolumeARN.+--+-- 'secretToAuthenticateInitiator', 'updateChapCredentials_secretToAuthenticateInitiator' - The secret key that the initiator (for example, the Windows client) must+-- provide to participate in mutual CHAP with the target.+--+-- The secret key must be between 12 and 16 bytes when encoded in UTF-8.+--+-- 'initiatorName', 'updateChapCredentials_initiatorName' - The iSCSI initiator that connects to the target.+newUpdateChapCredentials ::+ -- | 'targetARN'+ Prelude.Text ->+ -- | 'secretToAuthenticateInitiator'+ Prelude.Text ->+ -- | 'initiatorName'+ Prelude.Text ->+ UpdateChapCredentials+newUpdateChapCredentials+ pTargetARN_+ pSecretToAuthenticateInitiator_+ pInitiatorName_ =+ UpdateChapCredentials'+ { secretToAuthenticateTarget =+ Prelude.Nothing,+ targetARN = pTargetARN_,+ secretToAuthenticateInitiator =+ Data._Sensitive+ Lens.# pSecretToAuthenticateInitiator_,+ initiatorName = pInitiatorName_+ }++-- | The secret key that the target must provide to participate in mutual+-- CHAP with the initiator (e.g. Windows client).+--+-- Byte constraints: Minimum bytes of 12. Maximum bytes of 16.+--+-- The secret key must be between 12 and 16 bytes when encoded in UTF-8.+updateChapCredentials_secretToAuthenticateTarget :: Lens.Lens' UpdateChapCredentials (Prelude.Maybe Prelude.Text)+updateChapCredentials_secretToAuthenticateTarget = Lens.lens (\UpdateChapCredentials' {secretToAuthenticateTarget} -> secretToAuthenticateTarget) (\s@UpdateChapCredentials' {} a -> s {secretToAuthenticateTarget = a} :: UpdateChapCredentials) Prelude.. Lens.mapping Data._Sensitive++-- | The Amazon Resource Name (ARN) of the iSCSI volume target. Use the+-- DescribeStorediSCSIVolumes operation to return the TargetARN for+-- specified VolumeARN.+updateChapCredentials_targetARN :: Lens.Lens' UpdateChapCredentials Prelude.Text+updateChapCredentials_targetARN = Lens.lens (\UpdateChapCredentials' {targetARN} -> targetARN) (\s@UpdateChapCredentials' {} a -> s {targetARN = a} :: UpdateChapCredentials)++-- | The secret key that the initiator (for example, the Windows client) must+-- provide to participate in mutual CHAP with the target.+--+-- The secret key must be between 12 and 16 bytes when encoded in UTF-8.+updateChapCredentials_secretToAuthenticateInitiator :: Lens.Lens' UpdateChapCredentials Prelude.Text+updateChapCredentials_secretToAuthenticateInitiator = Lens.lens (\UpdateChapCredentials' {secretToAuthenticateInitiator} -> secretToAuthenticateInitiator) (\s@UpdateChapCredentials' {} a -> s {secretToAuthenticateInitiator = a} :: UpdateChapCredentials) Prelude.. Data._Sensitive++-- | The iSCSI initiator that connects to the target.+updateChapCredentials_initiatorName :: Lens.Lens' UpdateChapCredentials Prelude.Text+updateChapCredentials_initiatorName = Lens.lens (\UpdateChapCredentials' {initiatorName} -> initiatorName) (\s@UpdateChapCredentials' {} a -> s {initiatorName = a} :: UpdateChapCredentials)++instance Core.AWSRequest UpdateChapCredentials where+ type+ AWSResponse UpdateChapCredentials =+ UpdateChapCredentialsResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ UpdateChapCredentialsResponse'+ Prelude.<$> (x Data..?> "InitiatorName")+ Prelude.<*> (x Data..?> "TargetARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable UpdateChapCredentials where+ hashWithSalt _salt UpdateChapCredentials' {..} =+ _salt+ `Prelude.hashWithSalt` secretToAuthenticateTarget+ `Prelude.hashWithSalt` targetARN+ `Prelude.hashWithSalt` secretToAuthenticateInitiator+ `Prelude.hashWithSalt` initiatorName++instance Prelude.NFData UpdateChapCredentials where+ rnf UpdateChapCredentials' {..} =+ Prelude.rnf secretToAuthenticateTarget+ `Prelude.seq` Prelude.rnf targetARN+ `Prelude.seq` Prelude.rnf secretToAuthenticateInitiator+ `Prelude.seq` Prelude.rnf initiatorName++instance Data.ToHeaders UpdateChapCredentials where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.UpdateChapCredentials" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON UpdateChapCredentials where+ toJSON UpdateChapCredentials' {..} =+ Data.object+ ( Prelude.catMaybes+ [ ("SecretToAuthenticateTarget" Data..=)+ Prelude.<$> secretToAuthenticateTarget,+ Prelude.Just ("TargetARN" Data..= targetARN),+ Prelude.Just+ ( "SecretToAuthenticateInitiator"+ Data..= secretToAuthenticateInitiator+ ),+ Prelude.Just+ ("InitiatorName" Data..= initiatorName)+ ]+ )++instance Data.ToPath UpdateChapCredentials where+ toPath = Prelude.const "/"++instance Data.ToQuery UpdateChapCredentials where+ toQuery = Prelude.const Prelude.mempty++-- | A JSON object containing the following fields:+--+-- /See:/ 'newUpdateChapCredentialsResponse' smart constructor.+data UpdateChapCredentialsResponse = UpdateChapCredentialsResponse'+ { -- | The iSCSI initiator that connects to the target. This is the same+ -- initiator name specified in the request.+ initiatorName :: Prelude.Maybe Prelude.Text,+ -- | The Amazon Resource Name (ARN) of the target. This is the same target+ -- specified in the request.+ targetARN :: 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 'UpdateChapCredentialsResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'initiatorName', 'updateChapCredentialsResponse_initiatorName' - The iSCSI initiator that connects to the target. This is the same+-- initiator name specified in the request.+--+-- 'targetARN', 'updateChapCredentialsResponse_targetARN' - The Amazon Resource Name (ARN) of the target. This is the same target+-- specified in the request.+--+-- 'httpStatus', 'updateChapCredentialsResponse_httpStatus' - The response's http status code.+newUpdateChapCredentialsResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ UpdateChapCredentialsResponse+newUpdateChapCredentialsResponse pHttpStatus_ =+ UpdateChapCredentialsResponse'+ { initiatorName =+ Prelude.Nothing,+ targetARN = Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | The iSCSI initiator that connects to the target. This is the same+-- initiator name specified in the request.+updateChapCredentialsResponse_initiatorName :: Lens.Lens' UpdateChapCredentialsResponse (Prelude.Maybe Prelude.Text)+updateChapCredentialsResponse_initiatorName = Lens.lens (\UpdateChapCredentialsResponse' {initiatorName} -> initiatorName) (\s@UpdateChapCredentialsResponse' {} a -> s {initiatorName = a} :: UpdateChapCredentialsResponse)++-- | The Amazon Resource Name (ARN) of the target. This is the same target+-- specified in the request.+updateChapCredentialsResponse_targetARN :: Lens.Lens' UpdateChapCredentialsResponse (Prelude.Maybe Prelude.Text)+updateChapCredentialsResponse_targetARN = Lens.lens (\UpdateChapCredentialsResponse' {targetARN} -> targetARN) (\s@UpdateChapCredentialsResponse' {} a -> s {targetARN = a} :: UpdateChapCredentialsResponse)++-- | The response's http status code.+updateChapCredentialsResponse_httpStatus :: Lens.Lens' UpdateChapCredentialsResponse Prelude.Int+updateChapCredentialsResponse_httpStatus = Lens.lens (\UpdateChapCredentialsResponse' {httpStatus} -> httpStatus) (\s@UpdateChapCredentialsResponse' {} a -> s {httpStatus = a} :: UpdateChapCredentialsResponse)++instance Prelude.NFData UpdateChapCredentialsResponse where+ rnf UpdateChapCredentialsResponse' {..} =+ Prelude.rnf initiatorName+ `Prelude.seq` Prelude.rnf targetARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/UpdateFileSystemAssociation.hs view
@@ -0,0 +1,245 @@+{-# 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.UpdateFileSystemAssociation+-- 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 file system association. This operation is only supported in+-- the FSx File Gateways.+module Amazonka.StorageGateway.UpdateFileSystemAssociation+ ( -- * Creating a Request+ UpdateFileSystemAssociation (..),+ newUpdateFileSystemAssociation,++ -- * Request Lenses+ updateFileSystemAssociation_auditDestinationARN,+ updateFileSystemAssociation_cacheAttributes,+ updateFileSystemAssociation_password,+ updateFileSystemAssociation_userName,+ updateFileSystemAssociation_fileSystemAssociationARN,++ -- * Destructuring the Response+ UpdateFileSystemAssociationResponse (..),+ newUpdateFileSystemAssociationResponse,++ -- * Response Lenses+ updateFileSystemAssociationResponse_fileSystemAssociationARN,+ updateFileSystemAssociationResponse_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++-- | /See:/ 'newUpdateFileSystemAssociation' smart constructor.+data UpdateFileSystemAssociation = UpdateFileSystemAssociation'+ { -- | The Amazon Resource Name (ARN) of the storage used for the audit logs.+ auditDestinationARN :: Prelude.Maybe Prelude.Text,+ cacheAttributes :: Prelude.Maybe CacheAttributes,+ -- | The password of the user credential.+ password :: Prelude.Maybe (Data.Sensitive Prelude.Text),+ -- | The user name of the user credential that has permission to access the+ -- root share D$ of the Amazon FSx file system. The user account must+ -- belong to the Amazon FSx delegated admin user group.+ userName :: Prelude.Maybe Prelude.Text,+ -- | The Amazon Resource Name (ARN) of the file system association that you+ -- want to update.+ fileSystemAssociationARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'UpdateFileSystemAssociation' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'auditDestinationARN', 'updateFileSystemAssociation_auditDestinationARN' - The Amazon Resource Name (ARN) of the storage used for the audit logs.+--+-- 'cacheAttributes', 'updateFileSystemAssociation_cacheAttributes' - Undocumented member.+--+-- 'password', 'updateFileSystemAssociation_password' - The password of the user credential.+--+-- 'userName', 'updateFileSystemAssociation_userName' - The user name of the user credential that has permission to access the+-- root share D$ of the Amazon FSx file system. The user account must+-- belong to the Amazon FSx delegated admin user group.+--+-- 'fileSystemAssociationARN', 'updateFileSystemAssociation_fileSystemAssociationARN' - The Amazon Resource Name (ARN) of the file system association that you+-- want to update.+newUpdateFileSystemAssociation ::+ -- | 'fileSystemAssociationARN'+ Prelude.Text ->+ UpdateFileSystemAssociation+newUpdateFileSystemAssociation+ pFileSystemAssociationARN_ =+ UpdateFileSystemAssociation'+ { auditDestinationARN =+ Prelude.Nothing,+ cacheAttributes = Prelude.Nothing,+ password = Prelude.Nothing,+ userName = Prelude.Nothing,+ fileSystemAssociationARN =+ pFileSystemAssociationARN_+ }++-- | The Amazon Resource Name (ARN) of the storage used for the audit logs.+updateFileSystemAssociation_auditDestinationARN :: Lens.Lens' UpdateFileSystemAssociation (Prelude.Maybe Prelude.Text)+updateFileSystemAssociation_auditDestinationARN = Lens.lens (\UpdateFileSystemAssociation' {auditDestinationARN} -> auditDestinationARN) (\s@UpdateFileSystemAssociation' {} a -> s {auditDestinationARN = a} :: UpdateFileSystemAssociation)++-- | Undocumented member.+updateFileSystemAssociation_cacheAttributes :: Lens.Lens' UpdateFileSystemAssociation (Prelude.Maybe CacheAttributes)+updateFileSystemAssociation_cacheAttributes = Lens.lens (\UpdateFileSystemAssociation' {cacheAttributes} -> cacheAttributes) (\s@UpdateFileSystemAssociation' {} a -> s {cacheAttributes = a} :: UpdateFileSystemAssociation)++-- | The password of the user credential.+updateFileSystemAssociation_password :: Lens.Lens' UpdateFileSystemAssociation (Prelude.Maybe Prelude.Text)+updateFileSystemAssociation_password = Lens.lens (\UpdateFileSystemAssociation' {password} -> password) (\s@UpdateFileSystemAssociation' {} a -> s {password = a} :: UpdateFileSystemAssociation) Prelude.. Lens.mapping Data._Sensitive++-- | The user name of the user credential that has permission to access the+-- root share D$ of the Amazon FSx file system. The user account must+-- belong to the Amazon FSx delegated admin user group.+updateFileSystemAssociation_userName :: Lens.Lens' UpdateFileSystemAssociation (Prelude.Maybe Prelude.Text)+updateFileSystemAssociation_userName = Lens.lens (\UpdateFileSystemAssociation' {userName} -> userName) (\s@UpdateFileSystemAssociation' {} a -> s {userName = a} :: UpdateFileSystemAssociation)++-- | The Amazon Resource Name (ARN) of the file system association that you+-- want to update.+updateFileSystemAssociation_fileSystemAssociationARN :: Lens.Lens' UpdateFileSystemAssociation Prelude.Text+updateFileSystemAssociation_fileSystemAssociationARN = Lens.lens (\UpdateFileSystemAssociation' {fileSystemAssociationARN} -> fileSystemAssociationARN) (\s@UpdateFileSystemAssociation' {} a -> s {fileSystemAssociationARN = a} :: UpdateFileSystemAssociation)++instance Core.AWSRequest UpdateFileSystemAssociation where+ type+ AWSResponse UpdateFileSystemAssociation =+ UpdateFileSystemAssociationResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ UpdateFileSystemAssociationResponse'+ Prelude.<$> (x Data..?> "FileSystemAssociationARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable UpdateFileSystemAssociation where+ hashWithSalt _salt UpdateFileSystemAssociation' {..} =+ _salt+ `Prelude.hashWithSalt` auditDestinationARN+ `Prelude.hashWithSalt` cacheAttributes+ `Prelude.hashWithSalt` password+ `Prelude.hashWithSalt` userName+ `Prelude.hashWithSalt` fileSystemAssociationARN++instance Prelude.NFData UpdateFileSystemAssociation where+ rnf UpdateFileSystemAssociation' {..} =+ Prelude.rnf auditDestinationARN+ `Prelude.seq` Prelude.rnf cacheAttributes+ `Prelude.seq` Prelude.rnf password+ `Prelude.seq` Prelude.rnf userName+ `Prelude.seq` Prelude.rnf fileSystemAssociationARN++instance Data.ToHeaders UpdateFileSystemAssociation where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.UpdateFileSystemAssociation" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON UpdateFileSystemAssociation where+ toJSON UpdateFileSystemAssociation' {..} =+ Data.object+ ( Prelude.catMaybes+ [ ("AuditDestinationARN" Data..=)+ Prelude.<$> auditDestinationARN,+ ("CacheAttributes" Data..=)+ Prelude.<$> cacheAttributes,+ ("Password" Data..=) Prelude.<$> password,+ ("UserName" Data..=) Prelude.<$> userName,+ Prelude.Just+ ( "FileSystemAssociationARN"+ Data..= fileSystemAssociationARN+ )+ ]+ )++instance Data.ToPath UpdateFileSystemAssociation where+ toPath = Prelude.const "/"++instance Data.ToQuery UpdateFileSystemAssociation where+ toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newUpdateFileSystemAssociationResponse' smart constructor.+data UpdateFileSystemAssociationResponse = UpdateFileSystemAssociationResponse'+ { -- | The ARN of the updated file system association.+ fileSystemAssociationARN :: 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 'UpdateFileSystemAssociationResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'fileSystemAssociationARN', 'updateFileSystemAssociationResponse_fileSystemAssociationARN' - The ARN of the updated file system association.+--+-- 'httpStatus', 'updateFileSystemAssociationResponse_httpStatus' - The response's http status code.+newUpdateFileSystemAssociationResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ UpdateFileSystemAssociationResponse+newUpdateFileSystemAssociationResponse pHttpStatus_ =+ UpdateFileSystemAssociationResponse'+ { fileSystemAssociationARN =+ Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | The ARN of the updated file system association.+updateFileSystemAssociationResponse_fileSystemAssociationARN :: Lens.Lens' UpdateFileSystemAssociationResponse (Prelude.Maybe Prelude.Text)+updateFileSystemAssociationResponse_fileSystemAssociationARN = Lens.lens (\UpdateFileSystemAssociationResponse' {fileSystemAssociationARN} -> fileSystemAssociationARN) (\s@UpdateFileSystemAssociationResponse' {} a -> s {fileSystemAssociationARN = a} :: UpdateFileSystemAssociationResponse)++-- | The response's http status code.+updateFileSystemAssociationResponse_httpStatus :: Lens.Lens' UpdateFileSystemAssociationResponse Prelude.Int+updateFileSystemAssociationResponse_httpStatus = Lens.lens (\UpdateFileSystemAssociationResponse' {httpStatus} -> httpStatus) (\s@UpdateFileSystemAssociationResponse' {} a -> s {httpStatus = a} :: UpdateFileSystemAssociationResponse)++instance+ Prelude.NFData+ UpdateFileSystemAssociationResponse+ where+ rnf UpdateFileSystemAssociationResponse' {..} =+ Prelude.rnf fileSystemAssociationARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/UpdateGatewayInformation.hs view
@@ -0,0 +1,262 @@+{-# 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.UpdateGatewayInformation+-- 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 gateway\'s metadata, which includes the gateway\'s name and+-- time zone. To specify which gateway to update, use the Amazon Resource+-- Name (ARN) of the gateway in your request.+--+-- For gateways activated after September 2, 2015, the gateway\'s ARN+-- contains the gateway ID rather than the gateway name. However, changing+-- the name of the gateway has no effect on the gateway\'s ARN.+module Amazonka.StorageGateway.UpdateGatewayInformation+ ( -- * Creating a Request+ UpdateGatewayInformation (..),+ newUpdateGatewayInformation,++ -- * Request Lenses+ updateGatewayInformation_cloudWatchLogGroupARN,+ updateGatewayInformation_gatewayCapacity,+ updateGatewayInformation_gatewayName,+ updateGatewayInformation_gatewayTimezone,+ updateGatewayInformation_gatewayARN,++ -- * Destructuring the Response+ UpdateGatewayInformationResponse (..),+ newUpdateGatewayInformationResponse,++ -- * Response Lenses+ updateGatewayInformationResponse_gatewayARN,+ updateGatewayInformationResponse_gatewayName,+ updateGatewayInformationResponse_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++-- | /See:/ 'newUpdateGatewayInformation' smart constructor.+data UpdateGatewayInformation = UpdateGatewayInformation'+ { -- | The Amazon Resource Name (ARN) of the Amazon CloudWatch log group that+ -- you want to use to monitor and log events in the gateway.+ --+ -- For more information, see+ -- <https://docs.aws.amazon.com/AmazonCloudWatch/latest/logs/WhatIsCloudWatchLogs.html What is Amazon CloudWatch Logs?>+ cloudWatchLogGroupARN :: Prelude.Maybe Prelude.Text,+ -- | Specifies the size of the gateway\'s metadata cache.+ gatewayCapacity :: Prelude.Maybe GatewayCapacity,+ gatewayName :: Prelude.Maybe Prelude.Text,+ -- | A value that indicates the time zone of the gateway.+ gatewayTimezone :: Prelude.Maybe Prelude.Text,+ gatewayARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'UpdateGatewayInformation' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'cloudWatchLogGroupARN', 'updateGatewayInformation_cloudWatchLogGroupARN' - The Amazon Resource Name (ARN) of the Amazon CloudWatch log group that+-- you want to use to monitor and log events in the gateway.+--+-- For more information, see+-- <https://docs.aws.amazon.com/AmazonCloudWatch/latest/logs/WhatIsCloudWatchLogs.html What is Amazon CloudWatch Logs?>+--+-- 'gatewayCapacity', 'updateGatewayInformation_gatewayCapacity' - Specifies the size of the gateway\'s metadata cache.+--+-- 'gatewayName', 'updateGatewayInformation_gatewayName' - Undocumented member.+--+-- 'gatewayTimezone', 'updateGatewayInformation_gatewayTimezone' - A value that indicates the time zone of the gateway.+--+-- 'gatewayARN', 'updateGatewayInformation_gatewayARN' - Undocumented member.+newUpdateGatewayInformation ::+ -- | 'gatewayARN'+ Prelude.Text ->+ UpdateGatewayInformation+newUpdateGatewayInformation pGatewayARN_ =+ UpdateGatewayInformation'+ { cloudWatchLogGroupARN =+ Prelude.Nothing,+ gatewayCapacity = Prelude.Nothing,+ gatewayName = Prelude.Nothing,+ gatewayTimezone = Prelude.Nothing,+ gatewayARN = pGatewayARN_+ }++-- | The Amazon Resource Name (ARN) of the Amazon CloudWatch log group that+-- you want to use to monitor and log events in the gateway.+--+-- For more information, see+-- <https://docs.aws.amazon.com/AmazonCloudWatch/latest/logs/WhatIsCloudWatchLogs.html What is Amazon CloudWatch Logs?>+updateGatewayInformation_cloudWatchLogGroupARN :: Lens.Lens' UpdateGatewayInformation (Prelude.Maybe Prelude.Text)+updateGatewayInformation_cloudWatchLogGroupARN = Lens.lens (\UpdateGatewayInformation' {cloudWatchLogGroupARN} -> cloudWatchLogGroupARN) (\s@UpdateGatewayInformation' {} a -> s {cloudWatchLogGroupARN = a} :: UpdateGatewayInformation)++-- | Specifies the size of the gateway\'s metadata cache.+updateGatewayInformation_gatewayCapacity :: Lens.Lens' UpdateGatewayInformation (Prelude.Maybe GatewayCapacity)+updateGatewayInformation_gatewayCapacity = Lens.lens (\UpdateGatewayInformation' {gatewayCapacity} -> gatewayCapacity) (\s@UpdateGatewayInformation' {} a -> s {gatewayCapacity = a} :: UpdateGatewayInformation)++-- | Undocumented member.+updateGatewayInformation_gatewayName :: Lens.Lens' UpdateGatewayInformation (Prelude.Maybe Prelude.Text)+updateGatewayInformation_gatewayName = Lens.lens (\UpdateGatewayInformation' {gatewayName} -> gatewayName) (\s@UpdateGatewayInformation' {} a -> s {gatewayName = a} :: UpdateGatewayInformation)++-- | A value that indicates the time zone of the gateway.+updateGatewayInformation_gatewayTimezone :: Lens.Lens' UpdateGatewayInformation (Prelude.Maybe Prelude.Text)+updateGatewayInformation_gatewayTimezone = Lens.lens (\UpdateGatewayInformation' {gatewayTimezone} -> gatewayTimezone) (\s@UpdateGatewayInformation' {} a -> s {gatewayTimezone = a} :: UpdateGatewayInformation)++-- | Undocumented member.+updateGatewayInformation_gatewayARN :: Lens.Lens' UpdateGatewayInformation Prelude.Text+updateGatewayInformation_gatewayARN = Lens.lens (\UpdateGatewayInformation' {gatewayARN} -> gatewayARN) (\s@UpdateGatewayInformation' {} a -> s {gatewayARN = a} :: UpdateGatewayInformation)++instance Core.AWSRequest UpdateGatewayInformation where+ type+ AWSResponse UpdateGatewayInformation =+ UpdateGatewayInformationResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ UpdateGatewayInformationResponse'+ Prelude.<$> (x Data..?> "GatewayARN")+ Prelude.<*> (x Data..?> "GatewayName")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable UpdateGatewayInformation where+ hashWithSalt _salt UpdateGatewayInformation' {..} =+ _salt+ `Prelude.hashWithSalt` cloudWatchLogGroupARN+ `Prelude.hashWithSalt` gatewayCapacity+ `Prelude.hashWithSalt` gatewayName+ `Prelude.hashWithSalt` gatewayTimezone+ `Prelude.hashWithSalt` gatewayARN++instance Prelude.NFData UpdateGatewayInformation where+ rnf UpdateGatewayInformation' {..} =+ Prelude.rnf cloudWatchLogGroupARN+ `Prelude.seq` Prelude.rnf gatewayCapacity+ `Prelude.seq` Prelude.rnf gatewayName+ `Prelude.seq` Prelude.rnf gatewayTimezone+ `Prelude.seq` Prelude.rnf gatewayARN++instance Data.ToHeaders UpdateGatewayInformation where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.UpdateGatewayInformation" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON UpdateGatewayInformation where+ toJSON UpdateGatewayInformation' {..} =+ Data.object+ ( Prelude.catMaybes+ [ ("CloudWatchLogGroupARN" Data..=)+ Prelude.<$> cloudWatchLogGroupARN,+ ("GatewayCapacity" Data..=)+ Prelude.<$> gatewayCapacity,+ ("GatewayName" Data..=) Prelude.<$> gatewayName,+ ("GatewayTimezone" Data..=)+ Prelude.<$> gatewayTimezone,+ Prelude.Just ("GatewayARN" Data..= gatewayARN)+ ]+ )++instance Data.ToPath UpdateGatewayInformation where+ toPath = Prelude.const "/"++instance Data.ToQuery UpdateGatewayInformation where+ toQuery = Prelude.const Prelude.mempty++-- | A JSON object containing the Amazon Resource Name (ARN) of the gateway+-- that was updated.+--+-- /See:/ 'newUpdateGatewayInformationResponse' smart constructor.+data UpdateGatewayInformationResponse = UpdateGatewayInformationResponse'+ { gatewayARN :: Prelude.Maybe Prelude.Text,+ -- | The name you configured for your gateway.+ gatewayName :: 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 'UpdateGatewayInformationResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'updateGatewayInformationResponse_gatewayARN' - Undocumented member.+--+-- 'gatewayName', 'updateGatewayInformationResponse_gatewayName' - The name you configured for your gateway.+--+-- 'httpStatus', 'updateGatewayInformationResponse_httpStatus' - The response's http status code.+newUpdateGatewayInformationResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ UpdateGatewayInformationResponse+newUpdateGatewayInformationResponse pHttpStatus_ =+ UpdateGatewayInformationResponse'+ { gatewayARN =+ Prelude.Nothing,+ gatewayName = Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | Undocumented member.+updateGatewayInformationResponse_gatewayARN :: Lens.Lens' UpdateGatewayInformationResponse (Prelude.Maybe Prelude.Text)+updateGatewayInformationResponse_gatewayARN = Lens.lens (\UpdateGatewayInformationResponse' {gatewayARN} -> gatewayARN) (\s@UpdateGatewayInformationResponse' {} a -> s {gatewayARN = a} :: UpdateGatewayInformationResponse)++-- | The name you configured for your gateway.+updateGatewayInformationResponse_gatewayName :: Lens.Lens' UpdateGatewayInformationResponse (Prelude.Maybe Prelude.Text)+updateGatewayInformationResponse_gatewayName = Lens.lens (\UpdateGatewayInformationResponse' {gatewayName} -> gatewayName) (\s@UpdateGatewayInformationResponse' {} a -> s {gatewayName = a} :: UpdateGatewayInformationResponse)++-- | The response's http status code.+updateGatewayInformationResponse_httpStatus :: Lens.Lens' UpdateGatewayInformationResponse Prelude.Int+updateGatewayInformationResponse_httpStatus = Lens.lens (\UpdateGatewayInformationResponse' {httpStatus} -> httpStatus) (\s@UpdateGatewayInformationResponse' {} a -> s {httpStatus = a} :: UpdateGatewayInformationResponse)++instance+ Prelude.NFData+ UpdateGatewayInformationResponse+ where+ rnf UpdateGatewayInformationResponse' {..} =+ Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf gatewayName+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/UpdateGatewaySoftwareNow.hs view
@@ -0,0 +1,194 @@+{-# 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.UpdateGatewaySoftwareNow+-- 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 the gateway virtual machine (VM) software. The request+-- immediately triggers the software update.+--+-- When you make this request, you get a @200 OK@ success response+-- immediately. However, it might take some time for the update to+-- complete. You can call DescribeGatewayInformation to verify the gateway+-- is in the @STATE_RUNNING@ state.+--+-- A software update forces a system restart of your gateway. You can+-- minimize the chance of any disruption to your applications by increasing+-- your iSCSI Initiators\' timeouts. For more information about increasing+-- iSCSI Initiator timeouts for Windows and Linux, see+-- <https://docs.aws.amazon.com/storagegateway/latest/userguide/ConfiguringiSCSIClientInitiatorWindowsClient.html#CustomizeWindowsiSCSISettings Customizing your Windows iSCSI settings>+-- and+-- <https://docs.aws.amazon.com/storagegateway/latest/userguide/ConfiguringiSCSIClientInitiatorRedHatClient.html#CustomizeLinuxiSCSISettings Customizing your Linux iSCSI settings>,+-- respectively.+module Amazonka.StorageGateway.UpdateGatewaySoftwareNow+ ( -- * Creating a Request+ UpdateGatewaySoftwareNow (..),+ newUpdateGatewaySoftwareNow,++ -- * Request Lenses+ updateGatewaySoftwareNow_gatewayARN,++ -- * Destructuring the Response+ UpdateGatewaySoftwareNowResponse (..),+ newUpdateGatewaySoftwareNowResponse,++ -- * Response Lenses+ updateGatewaySoftwareNowResponse_gatewayARN,+ updateGatewaySoftwareNowResponse_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++-- | A JSON object containing the Amazon Resource Name (ARN) of the gateway+-- to update.+--+-- /See:/ 'newUpdateGatewaySoftwareNow' smart constructor.+data UpdateGatewaySoftwareNow = UpdateGatewaySoftwareNow'+ { gatewayARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'UpdateGatewaySoftwareNow' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'updateGatewaySoftwareNow_gatewayARN' - Undocumented member.+newUpdateGatewaySoftwareNow ::+ -- | 'gatewayARN'+ Prelude.Text ->+ UpdateGatewaySoftwareNow+newUpdateGatewaySoftwareNow pGatewayARN_ =+ UpdateGatewaySoftwareNow'+ { gatewayARN =+ pGatewayARN_+ }++-- | Undocumented member.+updateGatewaySoftwareNow_gatewayARN :: Lens.Lens' UpdateGatewaySoftwareNow Prelude.Text+updateGatewaySoftwareNow_gatewayARN = Lens.lens (\UpdateGatewaySoftwareNow' {gatewayARN} -> gatewayARN) (\s@UpdateGatewaySoftwareNow' {} a -> s {gatewayARN = a} :: UpdateGatewaySoftwareNow)++instance Core.AWSRequest UpdateGatewaySoftwareNow where+ type+ AWSResponse UpdateGatewaySoftwareNow =+ UpdateGatewaySoftwareNowResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ UpdateGatewaySoftwareNowResponse'+ Prelude.<$> (x Data..?> "GatewayARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable UpdateGatewaySoftwareNow where+ hashWithSalt _salt UpdateGatewaySoftwareNow' {..} =+ _salt `Prelude.hashWithSalt` gatewayARN++instance Prelude.NFData UpdateGatewaySoftwareNow where+ rnf UpdateGatewaySoftwareNow' {..} =+ Prelude.rnf gatewayARN++instance Data.ToHeaders UpdateGatewaySoftwareNow where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.UpdateGatewaySoftwareNow" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON UpdateGatewaySoftwareNow where+ toJSON UpdateGatewaySoftwareNow' {..} =+ Data.object+ ( Prelude.catMaybes+ [Prelude.Just ("GatewayARN" Data..= gatewayARN)]+ )++instance Data.ToPath UpdateGatewaySoftwareNow where+ toPath = Prelude.const "/"++instance Data.ToQuery UpdateGatewaySoftwareNow where+ toQuery = Prelude.const Prelude.mempty++-- | A JSON object containing the Amazon Resource Name (ARN) of the gateway+-- that was updated.+--+-- /See:/ 'newUpdateGatewaySoftwareNowResponse' smart constructor.+data UpdateGatewaySoftwareNowResponse = UpdateGatewaySoftwareNowResponse'+ { gatewayARN :: 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 'UpdateGatewaySoftwareNowResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'updateGatewaySoftwareNowResponse_gatewayARN' - Undocumented member.+--+-- 'httpStatus', 'updateGatewaySoftwareNowResponse_httpStatus' - The response's http status code.+newUpdateGatewaySoftwareNowResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ UpdateGatewaySoftwareNowResponse+newUpdateGatewaySoftwareNowResponse pHttpStatus_ =+ UpdateGatewaySoftwareNowResponse'+ { gatewayARN =+ Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | Undocumented member.+updateGatewaySoftwareNowResponse_gatewayARN :: Lens.Lens' UpdateGatewaySoftwareNowResponse (Prelude.Maybe Prelude.Text)+updateGatewaySoftwareNowResponse_gatewayARN = Lens.lens (\UpdateGatewaySoftwareNowResponse' {gatewayARN} -> gatewayARN) (\s@UpdateGatewaySoftwareNowResponse' {} a -> s {gatewayARN = a} :: UpdateGatewaySoftwareNowResponse)++-- | The response's http status code.+updateGatewaySoftwareNowResponse_httpStatus :: Lens.Lens' UpdateGatewaySoftwareNowResponse Prelude.Int+updateGatewaySoftwareNowResponse_httpStatus = Lens.lens (\UpdateGatewaySoftwareNowResponse' {httpStatus} -> httpStatus) (\s@UpdateGatewaySoftwareNowResponse' {} a -> s {httpStatus = a} :: UpdateGatewaySoftwareNowResponse)++instance+ Prelude.NFData+ UpdateGatewaySoftwareNowResponse+ where+ rnf UpdateGatewaySoftwareNowResponse' {..} =+ Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/UpdateMaintenanceStartTime.hs view
@@ -0,0 +1,273 @@+{-# 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.UpdateMaintenanceStartTime+-- 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 gateway\'s weekly maintenance start time information,+-- including day and time of the week. The maintenance time is the time in+-- your gateway\'s time zone.+module Amazonka.StorageGateway.UpdateMaintenanceStartTime+ ( -- * Creating a Request+ UpdateMaintenanceStartTime (..),+ newUpdateMaintenanceStartTime,++ -- * Request Lenses+ updateMaintenanceStartTime_dayOfMonth,+ updateMaintenanceStartTime_dayOfWeek,+ updateMaintenanceStartTime_gatewayARN,+ updateMaintenanceStartTime_hourOfDay,+ updateMaintenanceStartTime_minuteOfHour,++ -- * Destructuring the Response+ UpdateMaintenanceStartTimeResponse (..),+ newUpdateMaintenanceStartTimeResponse,++ -- * Response Lenses+ updateMaintenanceStartTimeResponse_gatewayARN,+ updateMaintenanceStartTimeResponse_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++-- | A JSON object containing the following fields:+--+-- - UpdateMaintenanceStartTimeInput$DayOfMonth+--+-- - UpdateMaintenanceStartTimeInput$DayOfWeek+--+-- - UpdateMaintenanceStartTimeInput$HourOfDay+--+-- - UpdateMaintenanceStartTimeInput$MinuteOfHour+--+-- /See:/ 'newUpdateMaintenanceStartTime' smart constructor.+data UpdateMaintenanceStartTime = UpdateMaintenanceStartTime'+ { -- | The day of the month component of the maintenance start time represented+ -- as an ordinal number from 1 to 28, where 1 represents the first day of+ -- the month and 28 represents the last day of the month.+ dayOfMonth :: Prelude.Maybe Prelude.Natural,+ -- | The day of the week component of the maintenance start time week+ -- represented as an ordinal number from 0 to 6, where 0 represents Sunday+ -- and 6 Saturday.+ dayOfWeek :: Prelude.Maybe Prelude.Natural,+ gatewayARN :: Prelude.Text,+ -- | The hour component of the maintenance start time represented as /hh/,+ -- where /hh/ is the hour (00 to 23). The hour of the day is in the time+ -- zone of the gateway.+ hourOfDay :: Prelude.Natural,+ -- | The minute component of the maintenance start time represented as /mm/,+ -- where /mm/ is the minute (00 to 59). The minute of the hour is in the+ -- time zone of the gateway.+ minuteOfHour :: Prelude.Natural+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'UpdateMaintenanceStartTime' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'dayOfMonth', 'updateMaintenanceStartTime_dayOfMonth' - The day of the month component of the maintenance start time represented+-- as an ordinal number from 1 to 28, where 1 represents the first day of+-- the month and 28 represents the last day of the month.+--+-- 'dayOfWeek', 'updateMaintenanceStartTime_dayOfWeek' - The day of the week component of the maintenance start time week+-- represented as an ordinal number from 0 to 6, where 0 represents Sunday+-- and 6 Saturday.+--+-- 'gatewayARN', 'updateMaintenanceStartTime_gatewayARN' - Undocumented member.+--+-- 'hourOfDay', 'updateMaintenanceStartTime_hourOfDay' - The hour component of the maintenance start time represented as /hh/,+-- where /hh/ is the hour (00 to 23). The hour of the day is in the time+-- zone of the gateway.+--+-- 'minuteOfHour', 'updateMaintenanceStartTime_minuteOfHour' - The minute component of the maintenance start time represented as /mm/,+-- where /mm/ is the minute (00 to 59). The minute of the hour is in the+-- time zone of the gateway.+newUpdateMaintenanceStartTime ::+ -- | 'gatewayARN'+ Prelude.Text ->+ -- | 'hourOfDay'+ Prelude.Natural ->+ -- | 'minuteOfHour'+ Prelude.Natural ->+ UpdateMaintenanceStartTime+newUpdateMaintenanceStartTime+ pGatewayARN_+ pHourOfDay_+ pMinuteOfHour_ =+ UpdateMaintenanceStartTime'+ { dayOfMonth =+ Prelude.Nothing,+ dayOfWeek = Prelude.Nothing,+ gatewayARN = pGatewayARN_,+ hourOfDay = pHourOfDay_,+ minuteOfHour = pMinuteOfHour_+ }++-- | The day of the month component of the maintenance start time represented+-- as an ordinal number from 1 to 28, where 1 represents the first day of+-- the month and 28 represents the last day of the month.+updateMaintenanceStartTime_dayOfMonth :: Lens.Lens' UpdateMaintenanceStartTime (Prelude.Maybe Prelude.Natural)+updateMaintenanceStartTime_dayOfMonth = Lens.lens (\UpdateMaintenanceStartTime' {dayOfMonth} -> dayOfMonth) (\s@UpdateMaintenanceStartTime' {} a -> s {dayOfMonth = a} :: UpdateMaintenanceStartTime)++-- | The day of the week component of the maintenance start time week+-- represented as an ordinal number from 0 to 6, where 0 represents Sunday+-- and 6 Saturday.+updateMaintenanceStartTime_dayOfWeek :: Lens.Lens' UpdateMaintenanceStartTime (Prelude.Maybe Prelude.Natural)+updateMaintenanceStartTime_dayOfWeek = Lens.lens (\UpdateMaintenanceStartTime' {dayOfWeek} -> dayOfWeek) (\s@UpdateMaintenanceStartTime' {} a -> s {dayOfWeek = a} :: UpdateMaintenanceStartTime)++-- | Undocumented member.+updateMaintenanceStartTime_gatewayARN :: Lens.Lens' UpdateMaintenanceStartTime Prelude.Text+updateMaintenanceStartTime_gatewayARN = Lens.lens (\UpdateMaintenanceStartTime' {gatewayARN} -> gatewayARN) (\s@UpdateMaintenanceStartTime' {} a -> s {gatewayARN = a} :: UpdateMaintenanceStartTime)++-- | The hour component of the maintenance start time represented as /hh/,+-- where /hh/ is the hour (00 to 23). The hour of the day is in the time+-- zone of the gateway.+updateMaintenanceStartTime_hourOfDay :: Lens.Lens' UpdateMaintenanceStartTime Prelude.Natural+updateMaintenanceStartTime_hourOfDay = Lens.lens (\UpdateMaintenanceStartTime' {hourOfDay} -> hourOfDay) (\s@UpdateMaintenanceStartTime' {} a -> s {hourOfDay = a} :: UpdateMaintenanceStartTime)++-- | The minute component of the maintenance start time represented as /mm/,+-- where /mm/ is the minute (00 to 59). The minute of the hour is in the+-- time zone of the gateway.+updateMaintenanceStartTime_minuteOfHour :: Lens.Lens' UpdateMaintenanceStartTime Prelude.Natural+updateMaintenanceStartTime_minuteOfHour = Lens.lens (\UpdateMaintenanceStartTime' {minuteOfHour} -> minuteOfHour) (\s@UpdateMaintenanceStartTime' {} a -> s {minuteOfHour = a} :: UpdateMaintenanceStartTime)++instance Core.AWSRequest UpdateMaintenanceStartTime where+ type+ AWSResponse UpdateMaintenanceStartTime =+ UpdateMaintenanceStartTimeResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ UpdateMaintenanceStartTimeResponse'+ Prelude.<$> (x Data..?> "GatewayARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable UpdateMaintenanceStartTime where+ hashWithSalt _salt UpdateMaintenanceStartTime' {..} =+ _salt+ `Prelude.hashWithSalt` dayOfMonth+ `Prelude.hashWithSalt` dayOfWeek+ `Prelude.hashWithSalt` gatewayARN+ `Prelude.hashWithSalt` hourOfDay+ `Prelude.hashWithSalt` minuteOfHour++instance Prelude.NFData UpdateMaintenanceStartTime where+ rnf UpdateMaintenanceStartTime' {..} =+ Prelude.rnf dayOfMonth+ `Prelude.seq` Prelude.rnf dayOfWeek+ `Prelude.seq` Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf hourOfDay+ `Prelude.seq` Prelude.rnf minuteOfHour++instance Data.ToHeaders UpdateMaintenanceStartTime where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.UpdateMaintenanceStartTime" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON UpdateMaintenanceStartTime where+ toJSON UpdateMaintenanceStartTime' {..} =+ Data.object+ ( Prelude.catMaybes+ [ ("DayOfMonth" Data..=) Prelude.<$> dayOfMonth,+ ("DayOfWeek" Data..=) Prelude.<$> dayOfWeek,+ Prelude.Just ("GatewayARN" Data..= gatewayARN),+ Prelude.Just ("HourOfDay" Data..= hourOfDay),+ Prelude.Just ("MinuteOfHour" Data..= minuteOfHour)+ ]+ )++instance Data.ToPath UpdateMaintenanceStartTime where+ toPath = Prelude.const "/"++instance Data.ToQuery UpdateMaintenanceStartTime where+ toQuery = Prelude.const Prelude.mempty++-- | A JSON object containing the Amazon Resource Name (ARN) of the gateway+-- whose maintenance start time is updated.+--+-- /See:/ 'newUpdateMaintenanceStartTimeResponse' smart constructor.+data UpdateMaintenanceStartTimeResponse = UpdateMaintenanceStartTimeResponse'+ { gatewayARN :: 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 'UpdateMaintenanceStartTimeResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'updateMaintenanceStartTimeResponse_gatewayARN' - Undocumented member.+--+-- 'httpStatus', 'updateMaintenanceStartTimeResponse_httpStatus' - The response's http status code.+newUpdateMaintenanceStartTimeResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ UpdateMaintenanceStartTimeResponse+newUpdateMaintenanceStartTimeResponse pHttpStatus_ =+ UpdateMaintenanceStartTimeResponse'+ { gatewayARN =+ Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | Undocumented member.+updateMaintenanceStartTimeResponse_gatewayARN :: Lens.Lens' UpdateMaintenanceStartTimeResponse (Prelude.Maybe Prelude.Text)+updateMaintenanceStartTimeResponse_gatewayARN = Lens.lens (\UpdateMaintenanceStartTimeResponse' {gatewayARN} -> gatewayARN) (\s@UpdateMaintenanceStartTimeResponse' {} a -> s {gatewayARN = a} :: UpdateMaintenanceStartTimeResponse)++-- | The response's http status code.+updateMaintenanceStartTimeResponse_httpStatus :: Lens.Lens' UpdateMaintenanceStartTimeResponse Prelude.Int+updateMaintenanceStartTimeResponse_httpStatus = Lens.lens (\UpdateMaintenanceStartTimeResponse' {httpStatus} -> httpStatus) (\s@UpdateMaintenanceStartTimeResponse' {} a -> s {httpStatus = a} :: UpdateMaintenanceStartTimeResponse)++instance+ Prelude.NFData+ UpdateMaintenanceStartTimeResponse+ where+ rnf UpdateMaintenanceStartTimeResponse' {..} =+ Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf httpStatus
@@ -0,0 +1,553 @@+{-# 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 <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> 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 <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> 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
@@ -0,0 +1,677 @@+{-# 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.UpdateSMBFileShare+-- 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 Server Message Block (SMB) file share. This operation is only+-- supported for S3 File Gateways.+--+-- To leave a file share field unchanged, set the corresponding input field+-- to null.+--+-- File gateways require Security Token Service (Amazon Web Services STS)+-- to be activated to enable you to create a file share. Make sure that+-- Amazon Web Services STS is activated in the Amazon Web Services Region+-- you are creating your file gateway in. If Amazon Web Services STS is not+-- activated in this Amazon Web Services Region, activate it. For+-- information about how to activate Amazon Web Services STS, see+-- <https://docs.aws.amazon.com/IAM/latest/UserGuide/id_credentials_temp_enable-regions.html Activating and deactivating Amazon Web Services STS in an Amazon Web Services Region>+-- in the /Identity and Access Management User Guide/.+--+-- File gateways don\'t support creating hard or symbolic links on a file+-- share.+module Amazonka.StorageGateway.UpdateSMBFileShare+ ( -- * Creating a Request+ UpdateSMBFileShare (..),+ newUpdateSMBFileShare,++ -- * Request Lenses+ 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,++ -- * Destructuring the Response+ UpdateSMBFileShareResponse (..),+ newUpdateSMBFileShareResponse,++ -- * Response Lenses+ 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++-- | UpdateSMBFileShareInput+--+-- /See:/ 'newUpdateSMBFileShare' smart constructor.+data UpdateSMBFileShare = UpdateSMBFileShare'+ { -- | The files and folders on this share will only be visible to users with+ -- read access.+ accessBasedEnumeration :: Prelude.Maybe Prelude.Bool,+ -- | A list of users or groups in the Active Directory that have+ -- administrator rights to the file share. A group must be prefixed with+ -- the \@ character. Acceptable formats include: @DOMAIN\\User1@, @user1@,+ -- @\@group1@, and @\@DOMAIN\\group1@. Can only be set if Authentication is+ -- set to @ActiveDirectory@.+ adminUserList :: Prelude.Maybe [Prelude.Text],+ -- | 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 case of an object name in an Amazon S3 bucket. For+ -- @ClientSpecified@, the client determines the case sensitivity. For+ -- @CaseSensitive@, the gateway determines the case sensitivity. The+ -- default value is @ClientSpecified@.+ caseSensitivity :: Prelude.Maybe CaseSensitivity,+ -- | 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,+ -- | A list of users or groups in the Active Directory that are not allowed+ -- to access the file share. A group must be prefixed with the \@+ -- character. Acceptable formats include: @DOMAIN\\User1@, @user1@,+ -- @\@group1@, and @\@DOMAIN\\group1@. Can only be set if Authentication is+ -- set to @ActiveDirectory@.+ invalidUserList :: Prelude.Maybe [Prelude.Text],+ -- | 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 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,+ -- | Specifies whether opportunistic locking is enabled for the SMB file+ -- share.+ --+ -- Enabling opportunistic locking on case-sensitive shares is not+ -- recommended for workloads that involve access to files with the same+ -- name in different case.+ --+ -- Valid Values: @true@ | @false@+ oplocksEnabled :: Prelude.Maybe Prelude.Bool,+ -- | A value that sets the write status of a file share. Set this value to+ -- @true@ to set 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,+ -- | Set this value to @true@ to enable access control list (ACL) on the SMB+ -- file share. Set it to @false@ to map file and directory permissions to+ -- the POSIX permissions.+ --+ -- For more information, see+ -- <https://docs.aws.amazon.com/storagegateway/latest/userguide/smb-acl.html Using Microsoft Windows ACLs to control access to an SMB file share>+ -- in the /Storage Gateway User Guide/.+ --+ -- Valid Values: @true@ | @false@+ sMBACLEnabled :: Prelude.Maybe Prelude.Bool,+ -- | A list of users or groups in the Active Directory that are allowed to+ -- access the file share. A group must be prefixed with the \@ character.+ -- Acceptable formats include: @DOMAIN\\User1@, @user1@, @\@group1@, and+ -- @\@DOMAIN\\group1@. Can only be set if Authentication is set to+ -- @ActiveDirectory@.+ validUserList :: Prelude.Maybe [Prelude.Text],+ -- | The Amazon Resource Name (ARN) of the SMB file share that you want to+ -- update.+ fileShareARN :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'UpdateSMBFileShare' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'accessBasedEnumeration', 'updateSMBFileShare_accessBasedEnumeration' - The files and folders on this share will only be visible to users with+-- read access.+--+-- 'adminUserList', 'updateSMBFileShare_adminUserList' - A list of users or groups in the Active Directory that have+-- administrator rights to the file share. A group must be prefixed with+-- the \@ character. Acceptable formats include: @DOMAIN\\User1@, @user1@,+-- @\@group1@, and @\@DOMAIN\\group1@. Can only be set if Authentication is+-- set to @ActiveDirectory@.+--+-- 'auditDestinationARN', 'updateSMBFileShare_auditDestinationARN' - The Amazon Resource Name (ARN) of the storage used for audit logs.+--+-- 'cacheAttributes', 'updateSMBFileShare_cacheAttributes' - Specifies refresh cache information for the file share.+--+-- 'caseSensitivity', 'updateSMBFileShare_caseSensitivity' - The case of an object name in an Amazon S3 bucket. For+-- @ClientSpecified@, the client determines the case sensitivity. For+-- @CaseSensitive@, the gateway determines the case sensitivity. The+-- default value is @ClientSpecified@.+--+-- 'defaultStorageClass', 'updateSMBFileShare_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', 'updateSMBFileShare_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', 'updateSMBFileShare_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@+--+-- 'invalidUserList', 'updateSMBFileShare_invalidUserList' - A list of users or groups in the Active Directory that are not allowed+-- to access the file share. A group must be prefixed with the \@+-- character. Acceptable formats include: @DOMAIN\\User1@, @user1@,+-- @\@group1@, and @\@DOMAIN\\group1@. Can only be set if Authentication is+-- set to @ActiveDirectory@.+--+-- 'kmsEncrypted', 'updateSMBFileShare_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', 'updateSMBFileShare_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.+--+-- 'notificationPolicy', 'updateSMBFileShare_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', 'updateSMBFileShare_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@.+--+-- 'oplocksEnabled', 'updateSMBFileShare_oplocksEnabled' - Specifies whether opportunistic locking is enabled for the SMB file+-- share.+--+-- Enabling opportunistic locking on case-sensitive shares is not+-- recommended for workloads that involve access to files with the same+-- name in different case.+--+-- Valid Values: @true@ | @false@+--+-- 'readOnly', 'updateSMBFileShare_readOnly' - A value that sets the write status of a file share. Set this value to+-- @true@ to set write status to read-only, otherwise set to @false@.+--+-- Valid Values: @true@ | @false@+--+-- 'requesterPays', 'updateSMBFileShare_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@+--+-- 'sMBACLEnabled', 'updateSMBFileShare_sMBACLEnabled' - Set this value to @true@ to enable access control list (ACL) on the SMB+-- file share. Set it to @false@ to map file and directory permissions to+-- the POSIX permissions.+--+-- For more information, see+-- <https://docs.aws.amazon.com/storagegateway/latest/userguide/smb-acl.html Using Microsoft Windows ACLs to control access to an SMB file share>+-- in the /Storage Gateway User Guide/.+--+-- Valid Values: @true@ | @false@+--+-- 'validUserList', 'updateSMBFileShare_validUserList' - A list of users or groups in the Active Directory that are allowed to+-- access the file share. A group must be prefixed with the \@ character.+-- Acceptable formats include: @DOMAIN\\User1@, @user1@, @\@group1@, and+-- @\@DOMAIN\\group1@. Can only be set if Authentication is set to+-- @ActiveDirectory@.+--+-- 'fileShareARN', 'updateSMBFileShare_fileShareARN' - The Amazon Resource Name (ARN) of the SMB file share that you want to+-- update.+newUpdateSMBFileShare ::+ -- | 'fileShareARN'+ Prelude.Text ->+ UpdateSMBFileShare+newUpdateSMBFileShare pFileShareARN_ =+ UpdateSMBFileShare'+ { accessBasedEnumeration =+ Prelude.Nothing,+ adminUserList = Prelude.Nothing,+ auditDestinationARN = Prelude.Nothing,+ cacheAttributes = Prelude.Nothing,+ caseSensitivity = Prelude.Nothing,+ defaultStorageClass = Prelude.Nothing,+ fileShareName = Prelude.Nothing,+ guessMIMETypeEnabled = Prelude.Nothing,+ invalidUserList = Prelude.Nothing,+ kmsEncrypted = Prelude.Nothing,+ kmsKey = Prelude.Nothing,+ notificationPolicy = Prelude.Nothing,+ objectACL = Prelude.Nothing,+ oplocksEnabled = Prelude.Nothing,+ readOnly = Prelude.Nothing,+ requesterPays = Prelude.Nothing,+ sMBACLEnabled = Prelude.Nothing,+ validUserList = Prelude.Nothing,+ fileShareARN = pFileShareARN_+ }++-- | The files and folders on this share will only be visible to users with+-- read access.+updateSMBFileShare_accessBasedEnumeration :: Lens.Lens' UpdateSMBFileShare (Prelude.Maybe Prelude.Bool)+updateSMBFileShare_accessBasedEnumeration = Lens.lens (\UpdateSMBFileShare' {accessBasedEnumeration} -> accessBasedEnumeration) (\s@UpdateSMBFileShare' {} a -> s {accessBasedEnumeration = a} :: UpdateSMBFileShare)++-- | A list of users or groups in the Active Directory that have+-- administrator rights to the file share. A group must be prefixed with+-- the \@ character. Acceptable formats include: @DOMAIN\\User1@, @user1@,+-- @\@group1@, and @\@DOMAIN\\group1@. Can only be set if Authentication is+-- set to @ActiveDirectory@.+updateSMBFileShare_adminUserList :: Lens.Lens' UpdateSMBFileShare (Prelude.Maybe [Prelude.Text])+updateSMBFileShare_adminUserList = Lens.lens (\UpdateSMBFileShare' {adminUserList} -> adminUserList) (\s@UpdateSMBFileShare' {} a -> s {adminUserList = a} :: UpdateSMBFileShare) Prelude.. Lens.mapping Lens.coerced++-- | The Amazon Resource Name (ARN) of the storage used for audit logs.+updateSMBFileShare_auditDestinationARN :: Lens.Lens' UpdateSMBFileShare (Prelude.Maybe Prelude.Text)+updateSMBFileShare_auditDestinationARN = Lens.lens (\UpdateSMBFileShare' {auditDestinationARN} -> auditDestinationARN) (\s@UpdateSMBFileShare' {} a -> s {auditDestinationARN = a} :: UpdateSMBFileShare)++-- | Specifies refresh cache information for the file share.+updateSMBFileShare_cacheAttributes :: Lens.Lens' UpdateSMBFileShare (Prelude.Maybe CacheAttributes)+updateSMBFileShare_cacheAttributes = Lens.lens (\UpdateSMBFileShare' {cacheAttributes} -> cacheAttributes) (\s@UpdateSMBFileShare' {} a -> s {cacheAttributes = a} :: UpdateSMBFileShare)++-- | The case of an object name in an Amazon S3 bucket. For+-- @ClientSpecified@, the client determines the case sensitivity. For+-- @CaseSensitive@, the gateway determines the case sensitivity. The+-- default value is @ClientSpecified@.+updateSMBFileShare_caseSensitivity :: Lens.Lens' UpdateSMBFileShare (Prelude.Maybe CaseSensitivity)+updateSMBFileShare_caseSensitivity = Lens.lens (\UpdateSMBFileShare' {caseSensitivity} -> caseSensitivity) (\s@UpdateSMBFileShare' {} a -> s {caseSensitivity = a} :: UpdateSMBFileShare)++-- | 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@+updateSMBFileShare_defaultStorageClass :: Lens.Lens' UpdateSMBFileShare (Prelude.Maybe Prelude.Text)+updateSMBFileShare_defaultStorageClass = Lens.lens (\UpdateSMBFileShare' {defaultStorageClass} -> defaultStorageClass) (\s@UpdateSMBFileShare' {} a -> s {defaultStorageClass = a} :: UpdateSMBFileShare)++-- | 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.+updateSMBFileShare_fileShareName :: Lens.Lens' UpdateSMBFileShare (Prelude.Maybe Prelude.Text)+updateSMBFileShare_fileShareName = Lens.lens (\UpdateSMBFileShare' {fileShareName} -> fileShareName) (\s@UpdateSMBFileShare' {} a -> s {fileShareName = a} :: UpdateSMBFileShare)++-- | 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@+updateSMBFileShare_guessMIMETypeEnabled :: Lens.Lens' UpdateSMBFileShare (Prelude.Maybe Prelude.Bool)+updateSMBFileShare_guessMIMETypeEnabled = Lens.lens (\UpdateSMBFileShare' {guessMIMETypeEnabled} -> guessMIMETypeEnabled) (\s@UpdateSMBFileShare' {} a -> s {guessMIMETypeEnabled = a} :: UpdateSMBFileShare)++-- | A list of users or groups in the Active Directory that are not allowed+-- to access the file share. A group must be prefixed with the \@+-- character. Acceptable formats include: @DOMAIN\\User1@, @user1@,+-- @\@group1@, and @\@DOMAIN\\group1@. Can only be set if Authentication is+-- set to @ActiveDirectory@.+updateSMBFileShare_invalidUserList :: Lens.Lens' UpdateSMBFileShare (Prelude.Maybe [Prelude.Text])+updateSMBFileShare_invalidUserList = Lens.lens (\UpdateSMBFileShare' {invalidUserList} -> invalidUserList) (\s@UpdateSMBFileShare' {} a -> s {invalidUserList = a} :: UpdateSMBFileShare) Prelude.. Lens.mapping Lens.coerced++-- | 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@+updateSMBFileShare_kmsEncrypted :: Lens.Lens' UpdateSMBFileShare (Prelude.Maybe Prelude.Bool)+updateSMBFileShare_kmsEncrypted = Lens.lens (\UpdateSMBFileShare' {kmsEncrypted} -> kmsEncrypted) (\s@UpdateSMBFileShare' {} a -> s {kmsEncrypted = a} :: UpdateSMBFileShare)++-- | 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.+updateSMBFileShare_kmsKey :: Lens.Lens' UpdateSMBFileShare (Prelude.Maybe Prelude.Text)+updateSMBFileShare_kmsKey = Lens.lens (\UpdateSMBFileShare' {kmsKey} -> kmsKey) (\s@UpdateSMBFileShare' {} a -> s {kmsKey = a} :: UpdateSMBFileShare)++-- | 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.+--+-- @{}@+updateSMBFileShare_notificationPolicy :: Lens.Lens' UpdateSMBFileShare (Prelude.Maybe Prelude.Text)+updateSMBFileShare_notificationPolicy = Lens.lens (\UpdateSMBFileShare' {notificationPolicy} -> notificationPolicy) (\s@UpdateSMBFileShare' {} a -> s {notificationPolicy = a} :: UpdateSMBFileShare)++-- | 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@.+updateSMBFileShare_objectACL :: Lens.Lens' UpdateSMBFileShare (Prelude.Maybe ObjectACL)+updateSMBFileShare_objectACL = Lens.lens (\UpdateSMBFileShare' {objectACL} -> objectACL) (\s@UpdateSMBFileShare' {} a -> s {objectACL = a} :: UpdateSMBFileShare)++-- | Specifies whether opportunistic locking is enabled for the SMB file+-- share.+--+-- Enabling opportunistic locking on case-sensitive shares is not+-- recommended for workloads that involve access to files with the same+-- name in different case.+--+-- Valid Values: @true@ | @false@+updateSMBFileShare_oplocksEnabled :: Lens.Lens' UpdateSMBFileShare (Prelude.Maybe Prelude.Bool)+updateSMBFileShare_oplocksEnabled = Lens.lens (\UpdateSMBFileShare' {oplocksEnabled} -> oplocksEnabled) (\s@UpdateSMBFileShare' {} a -> s {oplocksEnabled = a} :: UpdateSMBFileShare)++-- | A value that sets the write status of a file share. Set this value to+-- @true@ to set write status to read-only, otherwise set to @false@.+--+-- Valid Values: @true@ | @false@+updateSMBFileShare_readOnly :: Lens.Lens' UpdateSMBFileShare (Prelude.Maybe Prelude.Bool)+updateSMBFileShare_readOnly = Lens.lens (\UpdateSMBFileShare' {readOnly} -> readOnly) (\s@UpdateSMBFileShare' {} a -> s {readOnly = a} :: UpdateSMBFileShare)++-- | 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@+updateSMBFileShare_requesterPays :: Lens.Lens' UpdateSMBFileShare (Prelude.Maybe Prelude.Bool)+updateSMBFileShare_requesterPays = Lens.lens (\UpdateSMBFileShare' {requesterPays} -> requesterPays) (\s@UpdateSMBFileShare' {} a -> s {requesterPays = a} :: UpdateSMBFileShare)++-- | Set this value to @true@ to enable access control list (ACL) on the SMB+-- file share. Set it to @false@ to map file and directory permissions to+-- the POSIX permissions.+--+-- For more information, see+-- <https://docs.aws.amazon.com/storagegateway/latest/userguide/smb-acl.html Using Microsoft Windows ACLs to control access to an SMB file share>+-- in the /Storage Gateway User Guide/.+--+-- Valid Values: @true@ | @false@+updateSMBFileShare_sMBACLEnabled :: Lens.Lens' UpdateSMBFileShare (Prelude.Maybe Prelude.Bool)+updateSMBFileShare_sMBACLEnabled = Lens.lens (\UpdateSMBFileShare' {sMBACLEnabled} -> sMBACLEnabled) (\s@UpdateSMBFileShare' {} a -> s {sMBACLEnabled = a} :: UpdateSMBFileShare)++-- | A list of users or groups in the Active Directory that are allowed to+-- access the file share. A group must be prefixed with the \@ character.+-- Acceptable formats include: @DOMAIN\\User1@, @user1@, @\@group1@, and+-- @\@DOMAIN\\group1@. Can only be set if Authentication is set to+-- @ActiveDirectory@.+updateSMBFileShare_validUserList :: Lens.Lens' UpdateSMBFileShare (Prelude.Maybe [Prelude.Text])+updateSMBFileShare_validUserList = Lens.lens (\UpdateSMBFileShare' {validUserList} -> validUserList) (\s@UpdateSMBFileShare' {} a -> s {validUserList = a} :: UpdateSMBFileShare) Prelude.. Lens.mapping Lens.coerced++-- | The Amazon Resource Name (ARN) of the SMB file share that you want to+-- update.+updateSMBFileShare_fileShareARN :: Lens.Lens' UpdateSMBFileShare Prelude.Text+updateSMBFileShare_fileShareARN = Lens.lens (\UpdateSMBFileShare' {fileShareARN} -> fileShareARN) (\s@UpdateSMBFileShare' {} a -> s {fileShareARN = a} :: UpdateSMBFileShare)++instance Core.AWSRequest UpdateSMBFileShare where+ type+ AWSResponse UpdateSMBFileShare =+ UpdateSMBFileShareResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ UpdateSMBFileShareResponse'+ Prelude.<$> (x Data..?> "FileShareARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable UpdateSMBFileShare where+ hashWithSalt _salt UpdateSMBFileShare' {..} =+ _salt+ `Prelude.hashWithSalt` accessBasedEnumeration+ `Prelude.hashWithSalt` adminUserList+ `Prelude.hashWithSalt` auditDestinationARN+ `Prelude.hashWithSalt` cacheAttributes+ `Prelude.hashWithSalt` caseSensitivity+ `Prelude.hashWithSalt` defaultStorageClass+ `Prelude.hashWithSalt` fileShareName+ `Prelude.hashWithSalt` guessMIMETypeEnabled+ `Prelude.hashWithSalt` invalidUserList+ `Prelude.hashWithSalt` kmsEncrypted+ `Prelude.hashWithSalt` kmsKey+ `Prelude.hashWithSalt` notificationPolicy+ `Prelude.hashWithSalt` objectACL+ `Prelude.hashWithSalt` oplocksEnabled+ `Prelude.hashWithSalt` readOnly+ `Prelude.hashWithSalt` requesterPays+ `Prelude.hashWithSalt` sMBACLEnabled+ `Prelude.hashWithSalt` validUserList+ `Prelude.hashWithSalt` fileShareARN++instance Prelude.NFData UpdateSMBFileShare where+ rnf UpdateSMBFileShare' {..} =+ Prelude.rnf accessBasedEnumeration+ `Prelude.seq` Prelude.rnf adminUserList+ `Prelude.seq` Prelude.rnf auditDestinationARN+ `Prelude.seq` Prelude.rnf cacheAttributes+ `Prelude.seq` Prelude.rnf caseSensitivity+ `Prelude.seq` Prelude.rnf defaultStorageClass+ `Prelude.seq` Prelude.rnf fileShareName+ `Prelude.seq` Prelude.rnf guessMIMETypeEnabled+ `Prelude.seq` Prelude.rnf invalidUserList+ `Prelude.seq` Prelude.rnf kmsEncrypted+ `Prelude.seq` Prelude.rnf kmsKey+ `Prelude.seq` Prelude.rnf notificationPolicy+ `Prelude.seq` Prelude.rnf objectACL+ `Prelude.seq` Prelude.rnf oplocksEnabled+ `Prelude.seq` Prelude.rnf readOnly+ `Prelude.seq` Prelude.rnf requesterPays+ `Prelude.seq` Prelude.rnf sMBACLEnabled+ `Prelude.seq` Prelude.rnf validUserList+ `Prelude.seq` Prelude.rnf fileShareARN++instance Data.ToHeaders UpdateSMBFileShare where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.UpdateSMBFileShare" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON UpdateSMBFileShare where+ toJSON UpdateSMBFileShare' {..} =+ Data.object+ ( Prelude.catMaybes+ [ ("AccessBasedEnumeration" Data..=)+ Prelude.<$> accessBasedEnumeration,+ ("AdminUserList" Data..=) Prelude.<$> adminUserList,+ ("AuditDestinationARN" Data..=)+ Prelude.<$> auditDestinationARN,+ ("CacheAttributes" Data..=)+ Prelude.<$> cacheAttributes,+ ("CaseSensitivity" Data..=)+ Prelude.<$> caseSensitivity,+ ("DefaultStorageClass" Data..=)+ Prelude.<$> defaultStorageClass,+ ("FileShareName" Data..=) Prelude.<$> fileShareName,+ ("GuessMIMETypeEnabled" Data..=)+ Prelude.<$> guessMIMETypeEnabled,+ ("InvalidUserList" Data..=)+ Prelude.<$> invalidUserList,+ ("KMSEncrypted" Data..=) Prelude.<$> kmsEncrypted,+ ("KMSKey" Data..=) Prelude.<$> kmsKey,+ ("NotificationPolicy" Data..=)+ Prelude.<$> notificationPolicy,+ ("ObjectACL" Data..=) Prelude.<$> objectACL,+ ("OplocksEnabled" Data..=)+ Prelude.<$> oplocksEnabled,+ ("ReadOnly" Data..=) Prelude.<$> readOnly,+ ("RequesterPays" Data..=) Prelude.<$> requesterPays,+ ("SMBACLEnabled" Data..=) Prelude.<$> sMBACLEnabled,+ ("ValidUserList" Data..=) Prelude.<$> validUserList,+ Prelude.Just ("FileShareARN" Data..= fileShareARN)+ ]+ )++instance Data.ToPath UpdateSMBFileShare where+ toPath = Prelude.const "/"++instance Data.ToQuery UpdateSMBFileShare where+ toQuery = Prelude.const Prelude.mempty++-- | UpdateSMBFileShareOutput+--+-- /See:/ 'newUpdateSMBFileShareResponse' smart constructor.+data UpdateSMBFileShareResponse = UpdateSMBFileShareResponse'+ { -- | The Amazon Resource Name (ARN) of the updated SMB 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 'UpdateSMBFileShareResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'fileShareARN', 'updateSMBFileShareResponse_fileShareARN' - The Amazon Resource Name (ARN) of the updated SMB file share.+--+-- 'httpStatus', 'updateSMBFileShareResponse_httpStatus' - The response's http status code.+newUpdateSMBFileShareResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ UpdateSMBFileShareResponse+newUpdateSMBFileShareResponse pHttpStatus_ =+ UpdateSMBFileShareResponse'+ { fileShareARN =+ Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | The Amazon Resource Name (ARN) of the updated SMB file share.+updateSMBFileShareResponse_fileShareARN :: Lens.Lens' UpdateSMBFileShareResponse (Prelude.Maybe Prelude.Text)+updateSMBFileShareResponse_fileShareARN = Lens.lens (\UpdateSMBFileShareResponse' {fileShareARN} -> fileShareARN) (\s@UpdateSMBFileShareResponse' {} a -> s {fileShareARN = a} :: UpdateSMBFileShareResponse)++-- | The response's http status code.+updateSMBFileShareResponse_httpStatus :: Lens.Lens' UpdateSMBFileShareResponse Prelude.Int+updateSMBFileShareResponse_httpStatus = Lens.lens (\UpdateSMBFileShareResponse' {httpStatus} -> httpStatus) (\s@UpdateSMBFileShareResponse' {} a -> s {httpStatus = a} :: UpdateSMBFileShareResponse)++instance Prelude.NFData UpdateSMBFileShareResponse where+ rnf UpdateSMBFileShareResponse' {..} =+ Prelude.rnf fileShareARN+ `Prelude.seq` Prelude.rnf httpStatus
@@ -0,0 +1,198 @@+{-# 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.UpdateSMBFileShareVisibility+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Controls whether the shares on an S3 File Gateway are visible in a net+-- view or browse list. The operation is only supported for S3 File+-- Gateways.+module Amazonka.StorageGateway.UpdateSMBFileShareVisibility+ ( -- * Creating a Request+ UpdateSMBFileShareVisibility (..),+ newUpdateSMBFileShareVisibility,++ -- * Request Lenses+ updateSMBFileShareVisibility_gatewayARN,+ updateSMBFileShareVisibility_fileSharesVisible,++ -- * Destructuring the Response+ UpdateSMBFileShareVisibilityResponse (..),+ newUpdateSMBFileShareVisibilityResponse,++ -- * Response Lenses+ updateSMBFileShareVisibilityResponse_gatewayARN,+ updateSMBFileShareVisibilityResponse_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++-- | /See:/ 'newUpdateSMBFileShareVisibility' smart constructor.+data UpdateSMBFileShareVisibility = UpdateSMBFileShareVisibility'+ { gatewayARN :: Prelude.Text,+ -- | The shares on this gateway appear when listing shares.+ fileSharesVisible :: Prelude.Bool+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'UpdateSMBFileShareVisibility' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'updateSMBFileShareVisibility_gatewayARN' - Undocumented member.+--+-- 'fileSharesVisible', 'updateSMBFileShareVisibility_fileSharesVisible' - The shares on this gateway appear when listing shares.+newUpdateSMBFileShareVisibility ::+ -- | 'gatewayARN'+ Prelude.Text ->+ -- | 'fileSharesVisible'+ Prelude.Bool ->+ UpdateSMBFileShareVisibility+newUpdateSMBFileShareVisibility+ pGatewayARN_+ pFileSharesVisible_ =+ UpdateSMBFileShareVisibility'+ { gatewayARN =+ pGatewayARN_,+ fileSharesVisible = pFileSharesVisible_+ }++-- | Undocumented member.+updateSMBFileShareVisibility_gatewayARN :: Lens.Lens' UpdateSMBFileShareVisibility Prelude.Text+updateSMBFileShareVisibility_gatewayARN = Lens.lens (\UpdateSMBFileShareVisibility' {gatewayARN} -> gatewayARN) (\s@UpdateSMBFileShareVisibility' {} a -> s {gatewayARN = a} :: UpdateSMBFileShareVisibility)++-- | The shares on this gateway appear when listing shares.+updateSMBFileShareVisibility_fileSharesVisible :: Lens.Lens' UpdateSMBFileShareVisibility Prelude.Bool+updateSMBFileShareVisibility_fileSharesVisible = Lens.lens (\UpdateSMBFileShareVisibility' {fileSharesVisible} -> fileSharesVisible) (\s@UpdateSMBFileShareVisibility' {} a -> s {fileSharesVisible = a} :: UpdateSMBFileShareVisibility)++instance Core.AWSRequest UpdateSMBFileShareVisibility where+ type+ AWSResponse UpdateSMBFileShareVisibility =+ UpdateSMBFileShareVisibilityResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ UpdateSMBFileShareVisibilityResponse'+ Prelude.<$> (x Data..?> "GatewayARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance+ Prelude.Hashable+ UpdateSMBFileShareVisibility+ where+ hashWithSalt _salt UpdateSMBFileShareVisibility' {..} =+ _salt+ `Prelude.hashWithSalt` gatewayARN+ `Prelude.hashWithSalt` fileSharesVisible++instance Prelude.NFData UpdateSMBFileShareVisibility where+ rnf UpdateSMBFileShareVisibility' {..} =+ Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf fileSharesVisible++instance Data.ToHeaders UpdateSMBFileShareVisibility where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.UpdateSMBFileShareVisibility" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON UpdateSMBFileShareVisibility where+ toJSON UpdateSMBFileShareVisibility' {..} =+ Data.object+ ( Prelude.catMaybes+ [ Prelude.Just ("GatewayARN" Data..= gatewayARN),+ Prelude.Just+ ("FileSharesVisible" Data..= fileSharesVisible)+ ]+ )++instance Data.ToPath UpdateSMBFileShareVisibility where+ toPath = Prelude.const "/"++instance Data.ToQuery UpdateSMBFileShareVisibility where+ toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newUpdateSMBFileShareVisibilityResponse' smart constructor.+data UpdateSMBFileShareVisibilityResponse = UpdateSMBFileShareVisibilityResponse'+ { gatewayARN :: 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 'UpdateSMBFileShareVisibilityResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'updateSMBFileShareVisibilityResponse_gatewayARN' - Undocumented member.+--+-- 'httpStatus', 'updateSMBFileShareVisibilityResponse_httpStatus' - The response's http status code.+newUpdateSMBFileShareVisibilityResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ UpdateSMBFileShareVisibilityResponse+newUpdateSMBFileShareVisibilityResponse pHttpStatus_ =+ UpdateSMBFileShareVisibilityResponse'+ { gatewayARN =+ Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | Undocumented member.+updateSMBFileShareVisibilityResponse_gatewayARN :: Lens.Lens' UpdateSMBFileShareVisibilityResponse (Prelude.Maybe Prelude.Text)+updateSMBFileShareVisibilityResponse_gatewayARN = Lens.lens (\UpdateSMBFileShareVisibilityResponse' {gatewayARN} -> gatewayARN) (\s@UpdateSMBFileShareVisibilityResponse' {} a -> s {gatewayARN = a} :: UpdateSMBFileShareVisibilityResponse)++-- | The response's http status code.+updateSMBFileShareVisibilityResponse_httpStatus :: Lens.Lens' UpdateSMBFileShareVisibilityResponse Prelude.Int+updateSMBFileShareVisibilityResponse_httpStatus = Lens.lens (\UpdateSMBFileShareVisibilityResponse' {httpStatus} -> httpStatus) (\s@UpdateSMBFileShareVisibilityResponse' {} a -> s {httpStatus = a} :: UpdateSMBFileShareVisibilityResponse)++instance+ Prelude.NFData+ UpdateSMBFileShareVisibilityResponse+ where+ rnf UpdateSMBFileShareVisibilityResponse' {..} =+ Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/UpdateSMBLocalGroups.hs view
@@ -0,0 +1,191 @@+{-# 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.UpdateSMBLocalGroups+-- 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 the list of Active Directory users and groups that have special+-- permissions for SMB file shares on the gateway.+module Amazonka.StorageGateway.UpdateSMBLocalGroups+ ( -- * Creating a Request+ UpdateSMBLocalGroups (..),+ newUpdateSMBLocalGroups,++ -- * Request Lenses+ updateSMBLocalGroups_gatewayARN,+ updateSMBLocalGroups_sMBLocalGroups,++ -- * Destructuring the Response+ UpdateSMBLocalGroupsResponse (..),+ newUpdateSMBLocalGroupsResponse,++ -- * Response Lenses+ updateSMBLocalGroupsResponse_gatewayARN,+ updateSMBLocalGroupsResponse_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++-- | /See:/ 'newUpdateSMBLocalGroups' smart constructor.+data UpdateSMBLocalGroups = UpdateSMBLocalGroups'+ { gatewayARN :: Prelude.Text,+ -- | A list of Active Directory users and groups that you want to grant+ -- special permissions for SMB file shares on the gateway.+ sMBLocalGroups :: SMBLocalGroups+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'UpdateSMBLocalGroups' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'updateSMBLocalGroups_gatewayARN' - Undocumented member.+--+-- 'sMBLocalGroups', 'updateSMBLocalGroups_sMBLocalGroups' - A list of Active Directory users and groups that you want to grant+-- special permissions for SMB file shares on the gateway.+newUpdateSMBLocalGroups ::+ -- | 'gatewayARN'+ Prelude.Text ->+ -- | 'sMBLocalGroups'+ SMBLocalGroups ->+ UpdateSMBLocalGroups+newUpdateSMBLocalGroups pGatewayARN_ pSMBLocalGroups_ =+ UpdateSMBLocalGroups'+ { gatewayARN = pGatewayARN_,+ sMBLocalGroups = pSMBLocalGroups_+ }++-- | Undocumented member.+updateSMBLocalGroups_gatewayARN :: Lens.Lens' UpdateSMBLocalGroups Prelude.Text+updateSMBLocalGroups_gatewayARN = Lens.lens (\UpdateSMBLocalGroups' {gatewayARN} -> gatewayARN) (\s@UpdateSMBLocalGroups' {} a -> s {gatewayARN = a} :: UpdateSMBLocalGroups)++-- | A list of Active Directory users and groups that you want to grant+-- special permissions for SMB file shares on the gateway.+updateSMBLocalGroups_sMBLocalGroups :: Lens.Lens' UpdateSMBLocalGroups SMBLocalGroups+updateSMBLocalGroups_sMBLocalGroups = Lens.lens (\UpdateSMBLocalGroups' {sMBLocalGroups} -> sMBLocalGroups) (\s@UpdateSMBLocalGroups' {} a -> s {sMBLocalGroups = a} :: UpdateSMBLocalGroups)++instance Core.AWSRequest UpdateSMBLocalGroups where+ type+ AWSResponse UpdateSMBLocalGroups =+ UpdateSMBLocalGroupsResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ UpdateSMBLocalGroupsResponse'+ Prelude.<$> (x Data..?> "GatewayARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable UpdateSMBLocalGroups where+ hashWithSalt _salt UpdateSMBLocalGroups' {..} =+ _salt+ `Prelude.hashWithSalt` gatewayARN+ `Prelude.hashWithSalt` sMBLocalGroups++instance Prelude.NFData UpdateSMBLocalGroups where+ rnf UpdateSMBLocalGroups' {..} =+ Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf sMBLocalGroups++instance Data.ToHeaders UpdateSMBLocalGroups where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.UpdateSMBLocalGroups" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON UpdateSMBLocalGroups where+ toJSON UpdateSMBLocalGroups' {..} =+ Data.object+ ( Prelude.catMaybes+ [ Prelude.Just ("GatewayARN" Data..= gatewayARN),+ Prelude.Just+ ("SMBLocalGroups" Data..= sMBLocalGroups)+ ]+ )++instance Data.ToPath UpdateSMBLocalGroups where+ toPath = Prelude.const "/"++instance Data.ToQuery UpdateSMBLocalGroups where+ toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newUpdateSMBLocalGroupsResponse' smart constructor.+data UpdateSMBLocalGroupsResponse = UpdateSMBLocalGroupsResponse'+ { gatewayARN :: 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 'UpdateSMBLocalGroupsResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'updateSMBLocalGroupsResponse_gatewayARN' - Undocumented member.+--+-- 'httpStatus', 'updateSMBLocalGroupsResponse_httpStatus' - The response's http status code.+newUpdateSMBLocalGroupsResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ UpdateSMBLocalGroupsResponse+newUpdateSMBLocalGroupsResponse pHttpStatus_ =+ UpdateSMBLocalGroupsResponse'+ { gatewayARN =+ Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | Undocumented member.+updateSMBLocalGroupsResponse_gatewayARN :: Lens.Lens' UpdateSMBLocalGroupsResponse (Prelude.Maybe Prelude.Text)+updateSMBLocalGroupsResponse_gatewayARN = Lens.lens (\UpdateSMBLocalGroupsResponse' {gatewayARN} -> gatewayARN) (\s@UpdateSMBLocalGroupsResponse' {} a -> s {gatewayARN = a} :: UpdateSMBLocalGroupsResponse)++-- | The response's http status code.+updateSMBLocalGroupsResponse_httpStatus :: Lens.Lens' UpdateSMBLocalGroupsResponse Prelude.Int+updateSMBLocalGroupsResponse_httpStatus = Lens.lens (\UpdateSMBLocalGroupsResponse' {httpStatus} -> httpStatus) (\s@UpdateSMBLocalGroupsResponse' {} a -> s {httpStatus = a} :: UpdateSMBLocalGroupsResponse)++instance Prelude.NFData UpdateSMBLocalGroupsResponse where+ rnf UpdateSMBLocalGroupsResponse' {..} =+ Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/UpdateSMBSecurityStrategy.hs view
@@ -0,0 +1,246 @@+{-# 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.UpdateSMBSecurityStrategy+-- 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 the SMB security strategy on a file gateway. This action is only+-- supported in file gateways.+--+-- This API is called Security level in the User Guide.+--+-- A higher security level can affect performance of the gateway.+module Amazonka.StorageGateway.UpdateSMBSecurityStrategy+ ( -- * Creating a Request+ UpdateSMBSecurityStrategy (..),+ newUpdateSMBSecurityStrategy,++ -- * Request Lenses+ updateSMBSecurityStrategy_gatewayARN,+ updateSMBSecurityStrategy_sMBSecurityStrategy,++ -- * Destructuring the Response+ UpdateSMBSecurityStrategyResponse (..),+ newUpdateSMBSecurityStrategyResponse,++ -- * Response Lenses+ updateSMBSecurityStrategyResponse_gatewayARN,+ updateSMBSecurityStrategyResponse_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++-- | /See:/ 'newUpdateSMBSecurityStrategy' smart constructor.+data UpdateSMBSecurityStrategy = UpdateSMBSecurityStrategy'+ { gatewayARN :: Prelude.Text,+ -- | Specifies the type of security strategy.+ --+ -- ClientSpecified: if you use this option, requests are established based+ -- on what is negotiated by the client. This option is recommended when you+ -- want to maximize compatibility across different clients in your+ -- environment. Supported only in S3 File Gateway.+ --+ -- MandatorySigning: if you use this option, file gateway only allows+ -- connections from SMBv2 or SMBv3 clients that have signing enabled. This+ -- option works with SMB clients on Microsoft Windows Vista, Windows Server+ -- 2008 or newer.+ --+ -- MandatoryEncryption: if you use this option, file gateway only allows+ -- connections from SMBv3 clients that have encryption enabled. This option+ -- is highly recommended for environments that handle sensitive data. This+ -- option works with SMB clients on Microsoft Windows 8, Windows Server+ -- 2012 or newer.+ sMBSecurityStrategy :: SMBSecurityStrategy+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'UpdateSMBSecurityStrategy' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'updateSMBSecurityStrategy_gatewayARN' - Undocumented member.+--+-- 'sMBSecurityStrategy', 'updateSMBSecurityStrategy_sMBSecurityStrategy' - Specifies the type of security strategy.+--+-- ClientSpecified: if you use this option, requests are established based+-- on what is negotiated by the client. This option is recommended when you+-- want to maximize compatibility across different clients in your+-- environment. Supported only in S3 File Gateway.+--+-- MandatorySigning: if you use this option, file gateway only allows+-- connections from SMBv2 or SMBv3 clients that have signing enabled. This+-- option works with SMB clients on Microsoft Windows Vista, Windows Server+-- 2008 or newer.+--+-- MandatoryEncryption: if you use this option, file gateway only allows+-- connections from SMBv3 clients that have encryption enabled. This option+-- is highly recommended for environments that handle sensitive data. This+-- option works with SMB clients on Microsoft Windows 8, Windows Server+-- 2012 or newer.+newUpdateSMBSecurityStrategy ::+ -- | 'gatewayARN'+ Prelude.Text ->+ -- | 'sMBSecurityStrategy'+ SMBSecurityStrategy ->+ UpdateSMBSecurityStrategy+newUpdateSMBSecurityStrategy+ pGatewayARN_+ pSMBSecurityStrategy_ =+ UpdateSMBSecurityStrategy'+ { gatewayARN =+ pGatewayARN_,+ sMBSecurityStrategy = pSMBSecurityStrategy_+ }++-- | Undocumented member.+updateSMBSecurityStrategy_gatewayARN :: Lens.Lens' UpdateSMBSecurityStrategy Prelude.Text+updateSMBSecurityStrategy_gatewayARN = Lens.lens (\UpdateSMBSecurityStrategy' {gatewayARN} -> gatewayARN) (\s@UpdateSMBSecurityStrategy' {} a -> s {gatewayARN = a} :: UpdateSMBSecurityStrategy)++-- | Specifies the type of security strategy.+--+-- ClientSpecified: if you use this option, requests are established based+-- on what is negotiated by the client. This option is recommended when you+-- want to maximize compatibility across different clients in your+-- environment. Supported only in S3 File Gateway.+--+-- MandatorySigning: if you use this option, file gateway only allows+-- connections from SMBv2 or SMBv3 clients that have signing enabled. This+-- option works with SMB clients on Microsoft Windows Vista, Windows Server+-- 2008 or newer.+--+-- MandatoryEncryption: if you use this option, file gateway only allows+-- connections from SMBv3 clients that have encryption enabled. This option+-- is highly recommended for environments that handle sensitive data. This+-- option works with SMB clients on Microsoft Windows 8, Windows Server+-- 2012 or newer.+updateSMBSecurityStrategy_sMBSecurityStrategy :: Lens.Lens' UpdateSMBSecurityStrategy SMBSecurityStrategy+updateSMBSecurityStrategy_sMBSecurityStrategy = Lens.lens (\UpdateSMBSecurityStrategy' {sMBSecurityStrategy} -> sMBSecurityStrategy) (\s@UpdateSMBSecurityStrategy' {} a -> s {sMBSecurityStrategy = a} :: UpdateSMBSecurityStrategy)++instance Core.AWSRequest UpdateSMBSecurityStrategy where+ type+ AWSResponse UpdateSMBSecurityStrategy =+ UpdateSMBSecurityStrategyResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ UpdateSMBSecurityStrategyResponse'+ Prelude.<$> (x Data..?> "GatewayARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable UpdateSMBSecurityStrategy where+ hashWithSalt _salt UpdateSMBSecurityStrategy' {..} =+ _salt+ `Prelude.hashWithSalt` gatewayARN+ `Prelude.hashWithSalt` sMBSecurityStrategy++instance Prelude.NFData UpdateSMBSecurityStrategy where+ rnf UpdateSMBSecurityStrategy' {..} =+ Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf sMBSecurityStrategy++instance Data.ToHeaders UpdateSMBSecurityStrategy where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.UpdateSMBSecurityStrategy" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON UpdateSMBSecurityStrategy where+ toJSON UpdateSMBSecurityStrategy' {..} =+ Data.object+ ( Prelude.catMaybes+ [ Prelude.Just ("GatewayARN" Data..= gatewayARN),+ Prelude.Just+ ("SMBSecurityStrategy" Data..= sMBSecurityStrategy)+ ]+ )++instance Data.ToPath UpdateSMBSecurityStrategy where+ toPath = Prelude.const "/"++instance Data.ToQuery UpdateSMBSecurityStrategy where+ toQuery = Prelude.const Prelude.mempty++-- | /See:/ 'newUpdateSMBSecurityStrategyResponse' smart constructor.+data UpdateSMBSecurityStrategyResponse = UpdateSMBSecurityStrategyResponse'+ { gatewayARN :: 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 'UpdateSMBSecurityStrategyResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'gatewayARN', 'updateSMBSecurityStrategyResponse_gatewayARN' - Undocumented member.+--+-- 'httpStatus', 'updateSMBSecurityStrategyResponse_httpStatus' - The response's http status code.+newUpdateSMBSecurityStrategyResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ UpdateSMBSecurityStrategyResponse+newUpdateSMBSecurityStrategyResponse pHttpStatus_ =+ UpdateSMBSecurityStrategyResponse'+ { gatewayARN =+ Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | Undocumented member.+updateSMBSecurityStrategyResponse_gatewayARN :: Lens.Lens' UpdateSMBSecurityStrategyResponse (Prelude.Maybe Prelude.Text)+updateSMBSecurityStrategyResponse_gatewayARN = Lens.lens (\UpdateSMBSecurityStrategyResponse' {gatewayARN} -> gatewayARN) (\s@UpdateSMBSecurityStrategyResponse' {} a -> s {gatewayARN = a} :: UpdateSMBSecurityStrategyResponse)++-- | The response's http status code.+updateSMBSecurityStrategyResponse_httpStatus :: Lens.Lens' UpdateSMBSecurityStrategyResponse Prelude.Int+updateSMBSecurityStrategyResponse_httpStatus = Lens.lens (\UpdateSMBSecurityStrategyResponse' {httpStatus} -> httpStatus) (\s@UpdateSMBSecurityStrategyResponse' {} a -> s {httpStatus = a} :: UpdateSMBSecurityStrategyResponse)++instance+ Prelude.NFData+ UpdateSMBSecurityStrategyResponse+ where+ rnf UpdateSMBSecurityStrategyResponse' {..} =+ Prelude.rnf gatewayARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/UpdateSnapshotSchedule.hs view
@@ -0,0 +1,294 @@+{-# 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.UpdateSnapshotSchedule+-- 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 snapshot schedule configured for a gateway volume. This+-- operation is only supported in the cached volume and stored volume+-- gateway types.+--+-- The default snapshot schedule for volume is once every 24 hours,+-- starting at the creation time of the volume. You can use this API to+-- change the snapshot schedule configured for the volume.+--+-- In the request you must identify the gateway volume whose snapshot+-- schedule you want to update, and the schedule information, including+-- when you want the snapshot to begin on a day and the frequency (in+-- hours) of snapshots.+module Amazonka.StorageGateway.UpdateSnapshotSchedule+ ( -- * Creating a Request+ UpdateSnapshotSchedule (..),+ newUpdateSnapshotSchedule,++ -- * Request Lenses+ updateSnapshotSchedule_description,+ updateSnapshotSchedule_tags,+ updateSnapshotSchedule_volumeARN,+ updateSnapshotSchedule_startAt,+ updateSnapshotSchedule_recurrenceInHours,++ -- * Destructuring the Response+ UpdateSnapshotScheduleResponse (..),+ newUpdateSnapshotScheduleResponse,++ -- * Response Lenses+ updateSnapshotScheduleResponse_volumeARN,+ updateSnapshotScheduleResponse_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++-- | A JSON object containing one or more of the following fields:+--+-- - UpdateSnapshotScheduleInput$Description+--+-- - UpdateSnapshotScheduleInput$RecurrenceInHours+--+-- - UpdateSnapshotScheduleInput$StartAt+--+-- - UpdateSnapshotScheduleInput$VolumeARN+--+-- /See:/ 'newUpdateSnapshotSchedule' smart constructor.+data UpdateSnapshotSchedule = UpdateSnapshotSchedule'+ { -- | Optional description of the snapshot that overwrites the existing+ -- description.+ description :: Prelude.Maybe Prelude.Text,+ -- | A list of up to 50 tags that can be assigned to a snapshot. Each tag is+ -- a key-value pair.+ --+ -- Valid characters for key and value are letters, spaces, and numbers+ -- representable in UTF-8 format, and the following special characters: + -+ -- = . _ : \/ \@. The maximum length of a tag\'s key is 128 characters, and+ -- the maximum length for a tag\'s value is 256.+ tags :: Prelude.Maybe [Tag],+ -- | The Amazon Resource Name (ARN) of the volume. Use the ListVolumes+ -- operation to return a list of gateway volumes.+ volumeARN :: Prelude.Text,+ -- | The hour of the day at which the snapshot schedule begins represented as+ -- /hh/, where /hh/ is the hour (0 to 23). The hour of the day is in the+ -- time zone of the gateway.+ startAt :: Prelude.Natural,+ -- | Frequency of snapshots. Specify the number of hours between snapshots.+ recurrenceInHours :: Prelude.Natural+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'UpdateSnapshotSchedule' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'description', 'updateSnapshotSchedule_description' - Optional description of the snapshot that overwrites the existing+-- description.+--+-- 'tags', 'updateSnapshotSchedule_tags' - A list of up to 50 tags that can be assigned to a snapshot. Each tag is+-- a key-value pair.+--+-- Valid characters for key and value are letters, spaces, and numbers+-- representable in UTF-8 format, and the following special characters: + -+-- = . _ : \/ \@. The maximum length of a tag\'s key is 128 characters, and+-- the maximum length for a tag\'s value is 256.+--+-- 'volumeARN', 'updateSnapshotSchedule_volumeARN' - The Amazon Resource Name (ARN) of the volume. Use the ListVolumes+-- operation to return a list of gateway volumes.+--+-- 'startAt', 'updateSnapshotSchedule_startAt' - The hour of the day at which the snapshot schedule begins represented as+-- /hh/, where /hh/ is the hour (0 to 23). The hour of the day is in the+-- time zone of the gateway.+--+-- 'recurrenceInHours', 'updateSnapshotSchedule_recurrenceInHours' - Frequency of snapshots. Specify the number of hours between snapshots.+newUpdateSnapshotSchedule ::+ -- | 'volumeARN'+ Prelude.Text ->+ -- | 'startAt'+ Prelude.Natural ->+ -- | 'recurrenceInHours'+ Prelude.Natural ->+ UpdateSnapshotSchedule+newUpdateSnapshotSchedule+ pVolumeARN_+ pStartAt_+ pRecurrenceInHours_ =+ UpdateSnapshotSchedule'+ { description =+ Prelude.Nothing,+ tags = Prelude.Nothing,+ volumeARN = pVolumeARN_,+ startAt = pStartAt_,+ recurrenceInHours = pRecurrenceInHours_+ }++-- | Optional description of the snapshot that overwrites the existing+-- description.+updateSnapshotSchedule_description :: Lens.Lens' UpdateSnapshotSchedule (Prelude.Maybe Prelude.Text)+updateSnapshotSchedule_description = Lens.lens (\UpdateSnapshotSchedule' {description} -> description) (\s@UpdateSnapshotSchedule' {} a -> s {description = a} :: UpdateSnapshotSchedule)++-- | A list of up to 50 tags that can be assigned to a snapshot. Each tag is+-- a key-value pair.+--+-- Valid characters for key and value are letters, spaces, and numbers+-- representable in UTF-8 format, and the following special characters: + -+-- = . _ : \/ \@. The maximum length of a tag\'s key is 128 characters, and+-- the maximum length for a tag\'s value is 256.+updateSnapshotSchedule_tags :: Lens.Lens' UpdateSnapshotSchedule (Prelude.Maybe [Tag])+updateSnapshotSchedule_tags = Lens.lens (\UpdateSnapshotSchedule' {tags} -> tags) (\s@UpdateSnapshotSchedule' {} a -> s {tags = a} :: UpdateSnapshotSchedule) Prelude.. Lens.mapping Lens.coerced++-- | The Amazon Resource Name (ARN) of the volume. Use the ListVolumes+-- operation to return a list of gateway volumes.+updateSnapshotSchedule_volumeARN :: Lens.Lens' UpdateSnapshotSchedule Prelude.Text+updateSnapshotSchedule_volumeARN = Lens.lens (\UpdateSnapshotSchedule' {volumeARN} -> volumeARN) (\s@UpdateSnapshotSchedule' {} a -> s {volumeARN = a} :: UpdateSnapshotSchedule)++-- | The hour of the day at which the snapshot schedule begins represented as+-- /hh/, where /hh/ is the hour (0 to 23). The hour of the day is in the+-- time zone of the gateway.+updateSnapshotSchedule_startAt :: Lens.Lens' UpdateSnapshotSchedule Prelude.Natural+updateSnapshotSchedule_startAt = Lens.lens (\UpdateSnapshotSchedule' {startAt} -> startAt) (\s@UpdateSnapshotSchedule' {} a -> s {startAt = a} :: UpdateSnapshotSchedule)++-- | Frequency of snapshots. Specify the number of hours between snapshots.+updateSnapshotSchedule_recurrenceInHours :: Lens.Lens' UpdateSnapshotSchedule Prelude.Natural+updateSnapshotSchedule_recurrenceInHours = Lens.lens (\UpdateSnapshotSchedule' {recurrenceInHours} -> recurrenceInHours) (\s@UpdateSnapshotSchedule' {} a -> s {recurrenceInHours = a} :: UpdateSnapshotSchedule)++instance Core.AWSRequest UpdateSnapshotSchedule where+ type+ AWSResponse UpdateSnapshotSchedule =+ UpdateSnapshotScheduleResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ UpdateSnapshotScheduleResponse'+ Prelude.<$> (x Data..?> "VolumeARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable UpdateSnapshotSchedule where+ hashWithSalt _salt UpdateSnapshotSchedule' {..} =+ _salt+ `Prelude.hashWithSalt` description+ `Prelude.hashWithSalt` tags+ `Prelude.hashWithSalt` volumeARN+ `Prelude.hashWithSalt` startAt+ `Prelude.hashWithSalt` recurrenceInHours++instance Prelude.NFData UpdateSnapshotSchedule where+ rnf UpdateSnapshotSchedule' {..} =+ Prelude.rnf description+ `Prelude.seq` Prelude.rnf tags+ `Prelude.seq` Prelude.rnf volumeARN+ `Prelude.seq` Prelude.rnf startAt+ `Prelude.seq` Prelude.rnf recurrenceInHours++instance Data.ToHeaders UpdateSnapshotSchedule where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.UpdateSnapshotSchedule" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON UpdateSnapshotSchedule where+ toJSON UpdateSnapshotSchedule' {..} =+ Data.object+ ( Prelude.catMaybes+ [ ("Description" Data..=) Prelude.<$> description,+ ("Tags" Data..=) Prelude.<$> tags,+ Prelude.Just ("VolumeARN" Data..= volumeARN),+ Prelude.Just ("StartAt" Data..= startAt),+ Prelude.Just+ ("RecurrenceInHours" Data..= recurrenceInHours)+ ]+ )++instance Data.ToPath UpdateSnapshotSchedule where+ toPath = Prelude.const "/"++instance Data.ToQuery UpdateSnapshotSchedule where+ toQuery = Prelude.const Prelude.mempty++-- | A JSON object containing the Amazon Resource Name (ARN) of the updated+-- storage volume.+--+-- /See:/ 'newUpdateSnapshotScheduleResponse' smart constructor.+data UpdateSnapshotScheduleResponse = UpdateSnapshotScheduleResponse'+ { -- | The Amazon Resource Name (ARN) of the volume. Use the ListVolumes+ -- operation to return a list of gateway volumes.+ volumeARN :: 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 'UpdateSnapshotScheduleResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'volumeARN', 'updateSnapshotScheduleResponse_volumeARN' - The Amazon Resource Name (ARN) of the volume. Use the ListVolumes+-- operation to return a list of gateway volumes.+--+-- 'httpStatus', 'updateSnapshotScheduleResponse_httpStatus' - The response's http status code.+newUpdateSnapshotScheduleResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ UpdateSnapshotScheduleResponse+newUpdateSnapshotScheduleResponse pHttpStatus_ =+ UpdateSnapshotScheduleResponse'+ { volumeARN =+ Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | The Amazon Resource Name (ARN) of the volume. Use the ListVolumes+-- operation to return a list of gateway volumes.+updateSnapshotScheduleResponse_volumeARN :: Lens.Lens' UpdateSnapshotScheduleResponse (Prelude.Maybe Prelude.Text)+updateSnapshotScheduleResponse_volumeARN = Lens.lens (\UpdateSnapshotScheduleResponse' {volumeARN} -> volumeARN) (\s@UpdateSnapshotScheduleResponse' {} a -> s {volumeARN = a} :: UpdateSnapshotScheduleResponse)++-- | The response's http status code.+updateSnapshotScheduleResponse_httpStatus :: Lens.Lens' UpdateSnapshotScheduleResponse Prelude.Int+updateSnapshotScheduleResponse_httpStatus = Lens.lens (\UpdateSnapshotScheduleResponse' {httpStatus} -> httpStatus) (\s@UpdateSnapshotScheduleResponse' {} a -> s {httpStatus = a} :: UpdateSnapshotScheduleResponse)++instance+ Prelude.NFData+ UpdateSnapshotScheduleResponse+ where+ rnf UpdateSnapshotScheduleResponse' {..} =+ Prelude.rnf volumeARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/UpdateVTLDeviceType.hs view
@@ -0,0 +1,200 @@+{-# 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.UpdateVTLDeviceType+-- 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 the type of medium changer in a tape gateway. When you activate+-- a tape gateway, you select a medium changer type for the tape gateway.+-- This operation enables you to select a different type of medium changer+-- after a tape gateway is activated. This operation is only supported in+-- the tape gateway type.+module Amazonka.StorageGateway.UpdateVTLDeviceType+ ( -- * Creating a Request+ UpdateVTLDeviceType (..),+ newUpdateVTLDeviceType,++ -- * Request Lenses+ updateVTLDeviceType_vTLDeviceARN,+ updateVTLDeviceType_deviceType,++ -- * Destructuring the Response+ UpdateVTLDeviceTypeResponse (..),+ newUpdateVTLDeviceTypeResponse,++ -- * Response Lenses+ updateVTLDeviceTypeResponse_vTLDeviceARN,+ updateVTLDeviceTypeResponse_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++-- | /See:/ 'newUpdateVTLDeviceType' smart constructor.+data UpdateVTLDeviceType = UpdateVTLDeviceType'+ { -- | The Amazon Resource Name (ARN) of the medium changer you want to select.+ vTLDeviceARN :: Prelude.Text,+ -- | The type of medium changer you want to select.+ --+ -- Valid Values: @STK-L700@ | @AWS-Gateway-VTL@ | @IBM-03584L32-0402@+ deviceType :: Prelude.Text+ }+ deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic)++-- |+-- Create a value of 'UpdateVTLDeviceType' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'vTLDeviceARN', 'updateVTLDeviceType_vTLDeviceARN' - The Amazon Resource Name (ARN) of the medium changer you want to select.+--+-- 'deviceType', 'updateVTLDeviceType_deviceType' - The type of medium changer you want to select.+--+-- Valid Values: @STK-L700@ | @AWS-Gateway-VTL@ | @IBM-03584L32-0402@+newUpdateVTLDeviceType ::+ -- | 'vTLDeviceARN'+ Prelude.Text ->+ -- | 'deviceType'+ Prelude.Text ->+ UpdateVTLDeviceType+newUpdateVTLDeviceType pVTLDeviceARN_ pDeviceType_ =+ UpdateVTLDeviceType'+ { vTLDeviceARN = pVTLDeviceARN_,+ deviceType = pDeviceType_+ }++-- | The Amazon Resource Name (ARN) of the medium changer you want to select.+updateVTLDeviceType_vTLDeviceARN :: Lens.Lens' UpdateVTLDeviceType Prelude.Text+updateVTLDeviceType_vTLDeviceARN = Lens.lens (\UpdateVTLDeviceType' {vTLDeviceARN} -> vTLDeviceARN) (\s@UpdateVTLDeviceType' {} a -> s {vTLDeviceARN = a} :: UpdateVTLDeviceType)++-- | The type of medium changer you want to select.+--+-- Valid Values: @STK-L700@ | @AWS-Gateway-VTL@ | @IBM-03584L32-0402@+updateVTLDeviceType_deviceType :: Lens.Lens' UpdateVTLDeviceType Prelude.Text+updateVTLDeviceType_deviceType = Lens.lens (\UpdateVTLDeviceType' {deviceType} -> deviceType) (\s@UpdateVTLDeviceType' {} a -> s {deviceType = a} :: UpdateVTLDeviceType)++instance Core.AWSRequest UpdateVTLDeviceType where+ type+ AWSResponse UpdateVTLDeviceType =+ UpdateVTLDeviceTypeResponse+ request overrides =+ Request.postJSON (overrides defaultService)+ response =+ Response.receiveJSON+ ( \s h x ->+ UpdateVTLDeviceTypeResponse'+ Prelude.<$> (x Data..?> "VTLDeviceARN")+ Prelude.<*> (Prelude.pure (Prelude.fromEnum s))+ )++instance Prelude.Hashable UpdateVTLDeviceType where+ hashWithSalt _salt UpdateVTLDeviceType' {..} =+ _salt+ `Prelude.hashWithSalt` vTLDeviceARN+ `Prelude.hashWithSalt` deviceType++instance Prelude.NFData UpdateVTLDeviceType where+ rnf UpdateVTLDeviceType' {..} =+ Prelude.rnf vTLDeviceARN+ `Prelude.seq` Prelude.rnf deviceType++instance Data.ToHeaders UpdateVTLDeviceType where+ toHeaders =+ Prelude.const+ ( Prelude.mconcat+ [ "X-Amz-Target"+ Data.=# ( "StorageGateway_20130630.UpdateVTLDeviceType" ::+ Prelude.ByteString+ ),+ "Content-Type"+ Data.=# ( "application/x-amz-json-1.1" ::+ Prelude.ByteString+ )+ ]+ )++instance Data.ToJSON UpdateVTLDeviceType where+ toJSON UpdateVTLDeviceType' {..} =+ Data.object+ ( Prelude.catMaybes+ [ Prelude.Just ("VTLDeviceARN" Data..= vTLDeviceARN),+ Prelude.Just ("DeviceType" Data..= deviceType)+ ]+ )++instance Data.ToPath UpdateVTLDeviceType where+ toPath = Prelude.const "/"++instance Data.ToQuery UpdateVTLDeviceType where+ toQuery = Prelude.const Prelude.mempty++-- | UpdateVTLDeviceTypeOutput+--+-- /See:/ 'newUpdateVTLDeviceTypeResponse' smart constructor.+data UpdateVTLDeviceTypeResponse = UpdateVTLDeviceTypeResponse'+ { -- | The Amazon Resource Name (ARN) of the medium changer you have selected.+ vTLDeviceARN :: 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 'UpdateVTLDeviceTypeResponse' with all optional fields omitted.+--+-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.+--+-- The following record fields are available, with the corresponding lenses provided+-- for backwards compatibility:+--+-- 'vTLDeviceARN', 'updateVTLDeviceTypeResponse_vTLDeviceARN' - The Amazon Resource Name (ARN) of the medium changer you have selected.+--+-- 'httpStatus', 'updateVTLDeviceTypeResponse_httpStatus' - The response's http status code.+newUpdateVTLDeviceTypeResponse ::+ -- | 'httpStatus'+ Prelude.Int ->+ UpdateVTLDeviceTypeResponse+newUpdateVTLDeviceTypeResponse pHttpStatus_ =+ UpdateVTLDeviceTypeResponse'+ { vTLDeviceARN =+ Prelude.Nothing,+ httpStatus = pHttpStatus_+ }++-- | The Amazon Resource Name (ARN) of the medium changer you have selected.+updateVTLDeviceTypeResponse_vTLDeviceARN :: Lens.Lens' UpdateVTLDeviceTypeResponse (Prelude.Maybe Prelude.Text)+updateVTLDeviceTypeResponse_vTLDeviceARN = Lens.lens (\UpdateVTLDeviceTypeResponse' {vTLDeviceARN} -> vTLDeviceARN) (\s@UpdateVTLDeviceTypeResponse' {} a -> s {vTLDeviceARN = a} :: UpdateVTLDeviceTypeResponse)++-- | The response's http status code.+updateVTLDeviceTypeResponse_httpStatus :: Lens.Lens' UpdateVTLDeviceTypeResponse Prelude.Int+updateVTLDeviceTypeResponse_httpStatus = Lens.lens (\UpdateVTLDeviceTypeResponse' {httpStatus} -> httpStatus) (\s@UpdateVTLDeviceTypeResponse' {} a -> s {httpStatus = a} :: UpdateVTLDeviceTypeResponse)++instance Prelude.NFData UpdateVTLDeviceTypeResponse where+ rnf UpdateVTLDeviceTypeResponse' {..} =+ Prelude.rnf vTLDeviceARN+ `Prelude.seq` Prelude.rnf httpStatus
+ gen/Amazonka/StorageGateway/Waiters.hs view
@@ -0,0 +1,24 @@+{-# LANGUAGE DisambiguateRecordFields #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module : Amazonka.StorageGateway.Waiters+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Amazonka.StorageGateway.Waiters 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 Amazonka.StorageGateway.Lens+import Amazonka.StorageGateway.Types
− gen/Network/AWS/StorageGateway.hs
@@ -1,547 +0,0 @@-{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ __AWS Storage Gateway Service__------ AWS Storage Gateway is the service that connects an on-premises software appliance with cloud-based storage to provide seamless and secure integration between an organization's on-premises IT environment and AWS's storage infrastructure. The service enables you to securely upload data to the AWS cloud for cost effective backup and rapid disaster recovery.------ Use the following links to get started using the /AWS Storage Gateway Service API Reference/ :------ * <http://docs.aws.amazon.com/storagegateway/latest/userguide/AWSStorageGatewayAPI.html#AWSStorageGatewayHTTPRequestsHeaders AWS Storage Gateway Required Request Headers> : Describes the required headers that you must send with every POST request to AWS Storage Gateway.------ * <http://docs.aws.amazon.com/storagegateway/latest/userguide/AWSStorageGatewayAPI.html#AWSStorageGatewaySigningRequests Signing Requests> : AWS Storage Gateway requires that you authenticate every request you send; this topic describes how sign such a request.------ * <http://docs.aws.amazon.com/storagegateway/latest/userguide/AWSStorageGatewayAPI.html#APIErrorResponses Error Responses> : Provides reference information about AWS Storage Gateway errors.------ * <http://docs.aws.amazon.com/storagegateway/latest/APIReference/API_Operations.html Operations in AWS Storage Gateway> : Contains detailed descriptions of all AWS Storage Gateway operations, their request parameters, response elements, possible errors, and examples of requests and responses.------ * <http://docs.aws.amazon.com/general/latest/gr/rande.html#sg_region AWS Storage Gateway Regions and Endpoints:> Provides a list of each region and endpoints available for use with AWS Storage Gateway.------------ /Important:/ IDs for Storage Gateway volumes and Amazon EBS snapshots created from gateway volumes are changing to a longer format. Starting in December 2016, all new volumes and snapshots will be created with a 17-character string. Starting in April 2016, you will be able to use these longer IDs so you can test your systems with the new format. For more information, see <https://aws.amazon.com/ec2/faqs/#longer-ids Longer EC2 and EBS Resource IDs> .------ For example, a volume Amazon Resource Name (ARN) with the longer volume ID format looks like the following:------ @arn:aws:storagegateway:us-west-2:111122223333:gateway/sgw-12A3456B/volume/vol-1122AABBCCDDEEFFG@ .------ A snapshot ID with the longer ID format looks like the following: @snap-78e226633445566ee@ .------ For more information, see <https://forums.aws.amazon.com/ann.jspa?annID=3557 Announcement: Heads-up – Longer AWS Storage Gateway volume and snapshot IDs coming in 2016> .----module Network.AWS.StorageGateway- (- -- * Service Configuration- storageGateway-- -- * Errors- -- $errors-- -- ** InvalidGatewayRequestException- , _InvalidGatewayRequestException-- -- ** ServiceUnavailableError- , _ServiceUnavailableError-- -- ** InternalServerError- , _InternalServerError-- -- * Waiters- -- $waiters-- -- * Operations- -- $operations-- -- ** CancelArchival- , module Network.AWS.StorageGateway.CancelArchival-- -- ** CreateStorediSCSIVolume- , module Network.AWS.StorageGateway.CreateStorediSCSIVolume-- -- ** CreateNFSFileShare- , module Network.AWS.StorageGateway.CreateNFSFileShare-- -- ** DescribeChapCredentials- , module Network.AWS.StorageGateway.DescribeChapCredentials-- -- ** SetLocalConsolePassword- , module Network.AWS.StorageGateway.SetLocalConsolePassword-- -- ** CreateTapes- , module Network.AWS.StorageGateway.CreateTapes-- -- ** UpdateVTLDeviceType- , module Network.AWS.StorageGateway.UpdateVTLDeviceType-- -- ** CreateCachediSCSIVolume- , module Network.AWS.StorageGateway.CreateCachediSCSIVolume-- -- ** ListFileShares- , module Network.AWS.StorageGateway.ListFileShares-- -- ** DeleteFileShare- , module Network.AWS.StorageGateway.DeleteFileShare-- -- ** ListVolumeInitiators- , module Network.AWS.StorageGateway.ListVolumeInitiators-- -- ** AddUploadBuffer- , module Network.AWS.StorageGateway.AddUploadBuffer-- -- ** ListTagsForResource- , module Network.AWS.StorageGateway.ListTagsForResource-- -- ** NotifyWhenUploaded- , module Network.AWS.StorageGateway.NotifyWhenUploaded-- -- ** UpdateGatewayInformation- , module Network.AWS.StorageGateway.UpdateGatewayInformation-- -- ** DescribeMaintenanceStartTime- , module Network.AWS.StorageGateway.DescribeMaintenanceStartTime-- -- ** DescribeWorkingStorage- , module Network.AWS.StorageGateway.DescribeWorkingStorage-- -- ** DescribeCachediSCSIVolumes- , module Network.AWS.StorageGateway.DescribeCachediSCSIVolumes-- -- ** AddCache- , module Network.AWS.StorageGateway.AddCache-- -- ** StartGateway- , module Network.AWS.StorageGateway.StartGateway-- -- ** ShutdownGateway- , module Network.AWS.StorageGateway.ShutdownGateway-- -- ** UpdateGatewaySoftwareNow- , module Network.AWS.StorageGateway.UpdateGatewaySoftwareNow-- -- ** RemoveTagsFromResource- , module Network.AWS.StorageGateway.RemoveTagsFromResource-- -- ** DeleteChapCredentials- , module Network.AWS.StorageGateway.DeleteChapCredentials-- -- ** UpdateChapCredentials- , module Network.AWS.StorageGateway.UpdateChapCredentials-- -- ** DescribeUploadBuffer- , module Network.AWS.StorageGateway.DescribeUploadBuffer-- -- ** DescribeTapes (Paginated)- , module Network.AWS.StorageGateway.DescribeTapes-- -- ** DescribeStorediSCSIVolumes- , module Network.AWS.StorageGateway.DescribeStorediSCSIVolumes-- -- ** CreateSnapshotFromVolumeRecoveryPoint- , module Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint-- -- ** RetrieveTapeRecoveryPoint- , module Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint-- -- ** AddTagsToResource- , module Network.AWS.StorageGateway.AddTagsToResource-- -- ** DeleteGateway- , module Network.AWS.StorageGateway.DeleteGateway-- -- ** UpdateMaintenanceStartTime- , module Network.AWS.StorageGateway.UpdateMaintenanceStartTime-- -- ** DescribeGatewayInformation- , module Network.AWS.StorageGateway.DescribeGatewayInformation-- -- ** RefreshCache- , module Network.AWS.StorageGateway.RefreshCache-- -- ** UpdateNFSFileShare- , module Network.AWS.StorageGateway.UpdateNFSFileShare-- -- ** RetrieveTapeArchive- , module Network.AWS.StorageGateway.RetrieveTapeArchive-- -- ** DescribeTapeArchives (Paginated)- , module Network.AWS.StorageGateway.DescribeTapeArchives-- -- ** DisableGateway- , module Network.AWS.StorageGateway.DisableGateway-- -- ** DescribeSnapshotSchedule- , module Network.AWS.StorageGateway.DescribeSnapshotSchedule-- -- ** CreateTapeWithBarcode- , module Network.AWS.StorageGateway.CreateTapeWithBarcode-- -- ** DescribeBandwidthRateLimit- , module Network.AWS.StorageGateway.DescribeBandwidthRateLimit-- -- ** DeleteSnapshotSchedule- , module Network.AWS.StorageGateway.DeleteSnapshotSchedule-- -- ** UpdateSnapshotSchedule- , module Network.AWS.StorageGateway.UpdateSnapshotSchedule-- -- ** CreateSnapshot- , module Network.AWS.StorageGateway.CreateSnapshot-- -- ** CancelRetrieval- , module Network.AWS.StorageGateway.CancelRetrieval-- -- ** DescribeVTLDevices (Paginated)- , module Network.AWS.StorageGateway.DescribeVTLDevices-- -- ** DeleteTapeArchive- , module Network.AWS.StorageGateway.DeleteTapeArchive-- -- ** DescribeNFSFileShares- , module Network.AWS.StorageGateway.DescribeNFSFileShares-- -- ** ListVolumeRecoveryPoints- , module Network.AWS.StorageGateway.ListVolumeRecoveryPoints-- -- ** ListTapes- , module Network.AWS.StorageGateway.ListTapes-- -- ** ResetCache- , module Network.AWS.StorageGateway.ResetCache-- -- ** ListGateways (Paginated)- , module Network.AWS.StorageGateway.ListGateways-- -- ** DeleteTape- , module Network.AWS.StorageGateway.DeleteTape-- -- ** ListLocalDisks- , module Network.AWS.StorageGateway.ListLocalDisks-- -- ** ListVolumes (Paginated)- , module Network.AWS.StorageGateway.ListVolumes-- -- ** UpdateBandwidthRateLimit- , module Network.AWS.StorageGateway.UpdateBandwidthRateLimit-- -- ** AddWorkingStorage- , module Network.AWS.StorageGateway.AddWorkingStorage-- -- ** DescribeTapeRecoveryPoints (Paginated)- , module Network.AWS.StorageGateway.DescribeTapeRecoveryPoints-- -- ** DeleteBandwidthRateLimit- , module Network.AWS.StorageGateway.DeleteBandwidthRateLimit-- -- ** ActivateGateway- , module Network.AWS.StorageGateway.ActivateGateway-- -- ** DescribeCache- , module Network.AWS.StorageGateway.DescribeCache-- -- ** DeleteVolume- , module Network.AWS.StorageGateway.DeleteVolume-- -- * Types-- -- ** ObjectACL- , ObjectACL (..)-- -- ** CachediSCSIVolume- , CachediSCSIVolume- , cachediSCSIVolume- , cscsivVolumeiSCSIAttributes- , cscsivVolumeStatus- , cscsivSourceSnapshotId- , cscsivVolumeARN- , cscsivVolumeProgress- , cscsivVolumeSizeInBytes- , cscsivVolumeUsedInBytes- , cscsivCreatedDate- , cscsivVolumeId- , cscsivVolumeType-- -- ** ChapInfo- , ChapInfo- , chapInfo- , ciTargetARN- , ciSecretToAuthenticateInitiator- , ciInitiatorName- , ciSecretToAuthenticateTarget-- -- ** DeviceiSCSIAttributes- , DeviceiSCSIAttributes- , deviceiSCSIAttributes- , dscsiaTargetARN- , dscsiaChapEnabled- , dscsiaNetworkInterfaceId- , dscsiaNetworkInterfacePort-- -- ** Disk- , Disk- , disk- , dDiskAllocationResource- , dDiskAllocationType- , dDiskNode- , dDiskPath- , dDiskSizeInBytes- , dDiskStatus- , dDiskId-- -- ** FileShareInfo- , FileShareInfo- , fileShareInfo- , fsiFileShareStatus- , fsiGatewayARN- , fsiFileShareId- , fsiFileShareARN-- -- ** GatewayInfo- , GatewayInfo- , gatewayInfo- , giGatewayARN- , giGatewayOperationalState- , giGatewayName- , giGatewayId- , giGatewayType-- -- ** NFSFileShareDefaults- , NFSFileShareDefaults- , nFSFileShareDefaults- , nfsfsdFileMode- , nfsfsdOwnerId- , nfsfsdDirectoryMode- , nfsfsdGroupId-- -- ** NFSFileShareInfo- , NFSFileShareInfo- , nFSFileShareInfo- , nfsfsiFileShareStatus- , nfsfsiKMSKey- , nfsfsiGatewayARN- , nfsfsiPath- , nfsfsiObjectACL- , nfsfsiKMSEncrypted- , nfsfsiFileShareId- , nfsfsiFileShareARN- , nfsfsiDefaultStorageClass- , nfsfsiRole- , nfsfsiSquash- , nfsfsiRequesterPays- , nfsfsiNFSFileShareDefaults- , nfsfsiLocationARN- , nfsfsiClientList- , nfsfsiGuessMIMETypeEnabled- , nfsfsiReadOnly-- -- ** NetworkInterface- , NetworkInterface- , networkInterface- , niIPv6Address- , niMACAddress- , niIPv4Address-- -- ** StorediSCSIVolume- , StorediSCSIVolume- , storediSCSIVolume- , sscsivVolumeiSCSIAttributes- , sscsivVolumeStatus- , sscsivSourceSnapshotId- , sscsivPreservedExistingData- , sscsivVolumeARN- , sscsivVolumeProgress- , sscsivVolumeSizeInBytes- , sscsivVolumeUsedInBytes- , sscsivCreatedDate- , sscsivVolumeId- , sscsivVolumeDiskId- , sscsivVolumeType-- -- ** Tag- , Tag- , tag- , tagKey- , tagValue-- -- ** Tape- , Tape- , tape- , tTapeBarcode- , tTapeStatus- , tTapeARN- , tProgress- , tTapeSizeInBytes- , tVTLDevice- , tTapeUsedInBytes- , tTapeCreatedDate-- -- ** TapeArchive- , TapeArchive- , tapeArchive- , taTapeBarcode- , taTapeStatus- , taTapeARN- , taTapeSizeInBytes- , taCompletionTime- , taTapeUsedInBytes- , taTapeCreatedDate- , taRetrievedTo-- -- ** TapeInfo- , TapeInfo- , tapeInfo- , tiTapeBarcode- , tiTapeStatus- , tiTapeARN- , tiGatewayARN- , tiTapeSizeInBytes-- -- ** TapeRecoveryPointInfo- , TapeRecoveryPointInfo- , tapeRecoveryPointInfo- , trpiTapeStatus- , trpiTapeRecoveryPointTime- , trpiTapeARN- , trpiTapeSizeInBytes-- -- ** VTLDevice- , VTLDevice- , vTLDevice- , vtldDeviceiSCSIAttributes- , vtldVTLDeviceVendor- , vtldVTLDeviceARN- , vtldVTLDeviceType- , vtldVTLDeviceProductIdentifier-- -- ** VolumeInfo- , VolumeInfo- , volumeInfo- , viGatewayARN- , viVolumeARN- , viVolumeSizeInBytes- , viVolumeId- , viGatewayId- , viVolumeType-- -- ** VolumeRecoveryPointInfo- , VolumeRecoveryPointInfo- , volumeRecoveryPointInfo- , vrpiVolumeRecoveryPointTime- , vrpiVolumeARN- , vrpiVolumeSizeInBytes- , vrpiVolumeUsageInBytes-- -- ** VolumeiSCSIAttributes- , VolumeiSCSIAttributes- , volumeiSCSIAttributes- , vscsiaLunNumber- , vscsiaTargetARN- , vscsiaChapEnabled- , vscsiaNetworkInterfaceId- , vscsiaNetworkInterfacePort- ) where--import Network.AWS.StorageGateway.ActivateGateway-import Network.AWS.StorageGateway.AddCache-import Network.AWS.StorageGateway.AddTagsToResource-import Network.AWS.StorageGateway.AddUploadBuffer-import Network.AWS.StorageGateway.AddWorkingStorage-import Network.AWS.StorageGateway.CancelArchival-import Network.AWS.StorageGateway.CancelRetrieval-import Network.AWS.StorageGateway.CreateCachediSCSIVolume-import Network.AWS.StorageGateway.CreateNFSFileShare-import Network.AWS.StorageGateway.CreateSnapshot-import Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint-import Network.AWS.StorageGateway.CreateStorediSCSIVolume-import Network.AWS.StorageGateway.CreateTapes-import Network.AWS.StorageGateway.CreateTapeWithBarcode-import Network.AWS.StorageGateway.DeleteBandwidthRateLimit-import Network.AWS.StorageGateway.DeleteChapCredentials-import Network.AWS.StorageGateway.DeleteFileShare-import Network.AWS.StorageGateway.DeleteGateway-import Network.AWS.StorageGateway.DeleteSnapshotSchedule-import Network.AWS.StorageGateway.DeleteTape-import Network.AWS.StorageGateway.DeleteTapeArchive-import Network.AWS.StorageGateway.DeleteVolume-import Network.AWS.StorageGateway.DescribeBandwidthRateLimit-import Network.AWS.StorageGateway.DescribeCache-import Network.AWS.StorageGateway.DescribeCachediSCSIVolumes-import Network.AWS.StorageGateway.DescribeChapCredentials-import Network.AWS.StorageGateway.DescribeGatewayInformation-import Network.AWS.StorageGateway.DescribeMaintenanceStartTime-import Network.AWS.StorageGateway.DescribeNFSFileShares-import Network.AWS.StorageGateway.DescribeSnapshotSchedule-import Network.AWS.StorageGateway.DescribeStorediSCSIVolumes-import Network.AWS.StorageGateway.DescribeTapeArchives-import Network.AWS.StorageGateway.DescribeTapeRecoveryPoints-import Network.AWS.StorageGateway.DescribeTapes-import Network.AWS.StorageGateway.DescribeUploadBuffer-import Network.AWS.StorageGateway.DescribeVTLDevices-import Network.AWS.StorageGateway.DescribeWorkingStorage-import Network.AWS.StorageGateway.DisableGateway-import Network.AWS.StorageGateway.ListFileShares-import Network.AWS.StorageGateway.ListGateways-import Network.AWS.StorageGateway.ListLocalDisks-import Network.AWS.StorageGateway.ListTagsForResource-import Network.AWS.StorageGateway.ListTapes-import Network.AWS.StorageGateway.ListVolumeInitiators-import Network.AWS.StorageGateway.ListVolumeRecoveryPoints-import Network.AWS.StorageGateway.ListVolumes-import Network.AWS.StorageGateway.NotifyWhenUploaded-import Network.AWS.StorageGateway.RefreshCache-import Network.AWS.StorageGateway.RemoveTagsFromResource-import Network.AWS.StorageGateway.ResetCache-import Network.AWS.StorageGateway.RetrieveTapeArchive-import Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint-import Network.AWS.StorageGateway.SetLocalConsolePassword-import Network.AWS.StorageGateway.ShutdownGateway-import Network.AWS.StorageGateway.StartGateway-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.UpdateBandwidthRateLimit-import Network.AWS.StorageGateway.UpdateChapCredentials-import Network.AWS.StorageGateway.UpdateGatewayInformation-import Network.AWS.StorageGateway.UpdateGatewaySoftwareNow-import Network.AWS.StorageGateway.UpdateMaintenanceStartTime-import Network.AWS.StorageGateway.UpdateNFSFileShare-import Network.AWS.StorageGateway.UpdateSnapshotSchedule-import Network.AWS.StorageGateway.UpdateVTLDeviceType-import Network.AWS.StorageGateway.Waiters--{- $errors-Error matchers are designed for use with the functions provided by-<http://hackage.haskell.org/package/lens/docs/Control-Exception-Lens.html Control.Exception.Lens>.-This allows catching (and rethrowing) service specific errors returned-by 'StorageGateway'.--}--{- $operations-Some AWS operations return results that are incomplete and require subsequent-requests in order to obtain the entire result set. The process of sending-subsequent requests to continue where a previous request left off is called-pagination. For example, the 'ListObjects' operation of Amazon S3 returns up to-1000 objects at a time, and you must send subsequent requests with the-appropriate Marker in order to retrieve the next page of results.--Operations that have an 'AWSPager' instance can transparently perform subsequent-requests, correctly setting Markers and other request facets to iterate through-the entire result set of a truncated API operation. Operations which support-this have an additional note in the documentation.--Many operations have the ability to filter results on the server side. See the-individual operation parameters for details.--}--{- $waiters-Waiters poll by repeatedly sending a request until some remote success condition-configured by the 'Wait' specification is fulfilled. The 'Wait' specification-determines how many attempts should be made, in addition to delay and retry strategies.--}
− gen/Network/AWS/StorageGateway/ActivateGateway.hs
@@ -1,223 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.ActivateGateway--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Activates the gateway you previously deployed on your host. In the activation process, you specify information such as the region you want to use for storing snapshots or tapes, the time zone for scheduled snapshots the gateway snapshot schedule window, an activation key, and a name for your gateway. The activation process also associates your gateway with your account; for more information, see 'UpdateGatewayInformation' .-------module Network.AWS.StorageGateway.ActivateGateway- (- -- * Creating a Request- activateGateway- , ActivateGateway- -- * Request Lenses- , agMediumChangerType- , agTapeDriveType- , agGatewayType- , agActivationKey- , agGatewayName- , agGatewayTimezone- , agGatewayRegion-- -- * Destructuring the Response- , activateGatewayResponse- , ActivateGatewayResponse- -- * Response Lenses- , agrsGatewayARN- , agrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | A JSON object containing one or more of the following fields:--------- * 'ActivateGatewayInput$ActivationKey'------ * 'ActivateGatewayInput$GatewayName'------ * 'ActivateGatewayInput$GatewayRegion'------ * 'ActivateGatewayInput$GatewayTimezone'------ * 'ActivateGatewayInput$GatewayType'------ * 'ActivateGatewayInput$TapeDriveType'------ * 'ActivateGatewayInput$MediumChangerType'--------------- /See:/ 'activateGateway' smart constructor.-data ActivateGateway = ActivateGateway'- { _agMediumChangerType :: !(Maybe Text)- , _agTapeDriveType :: !(Maybe Text)- , _agGatewayType :: !(Maybe Text)- , _agActivationKey :: !Text- , _agGatewayName :: !Text- , _agGatewayTimezone :: !Text- , _agGatewayRegion :: !Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'ActivateGateway' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'agMediumChangerType' - The value that indicates the type of medium changer to use for tape gateway. This field is optional. Valid Values: "STK-L700", "AWS-Gateway-VTL"------ * 'agTapeDriveType' - The value that indicates the type of tape drive to use for tape gateway. This field is optional. Valid Values: "IBM-ULT3580-TD5"------ * 'agGatewayType' - A value that defines the type of gateway to activate. The type specified is critical to all later functions of the gateway and cannot be changed after activation. The default value is @STORED@ . Valid Values: "STORED", "CACHED", "VTL", "FILE_S3"------ * 'agActivationKey' - Your gateway activation key. You can obtain the activation key by sending an HTTP GET request with redirects enabled to the gateway IP address (port 80). The redirect URL returned in the response provides you the activation key for your gateway in the query string parameter @activationKey@ . It may also include other activation-related parameters, however, these are merely defaults -- the arguments you pass to the @ActivateGateway@ API call determine the actual configuration of your gateway. For more information, see https://docs.aws.amazon.com/storagegateway/latest/userguide/get-activation-key.html in the Storage Gateway User Guide.------ * 'agGatewayName' - The name you configured for your gateway.------ * 'agGatewayTimezone' - A value that indicates the time zone you want to set for the gateway. The time zone is of the format "GMT-hr:mm" or "GMT+hr:mm". For example, GMT-4:00 indicates the time is 4 hours behind GMT. GMT+2:00 indicates the time is 2 hours ahead of GMT. The time zone is used, for example, for scheduling snapshots and your gateway's maintenance schedule.------ * 'agGatewayRegion' - A value that indicates the region where you want to store your data. The gateway region specified must be the same region as the region in your @Host@ header in the request. For more information about available regions and endpoints for AWS Storage Gateway, see <http://docs.aws.amazon.com/general/latest/gr/rande.html#sg_region Regions and Endpoints> in the /Amazon Web Services Glossary/ . Valid Values: "us-east-1", "us-east-2", "us-west-1", "us-west-2", "ca-central-1", "eu-west-1", "eu-central-1", "eu-west-2", "eu-west-3", "ap-northeast-1", "ap-northeast-2", "ap-southeast-1", "ap-southeast-2", "ap-south-1", "sa-east-1"-activateGateway- :: Text -- ^ 'agActivationKey'- -> Text -- ^ 'agGatewayName'- -> Text -- ^ 'agGatewayTimezone'- -> Text -- ^ 'agGatewayRegion'- -> ActivateGateway-activateGateway pActivationKey_ pGatewayName_ pGatewayTimezone_ pGatewayRegion_ =- ActivateGateway'- { _agMediumChangerType = Nothing- , _agTapeDriveType = Nothing- , _agGatewayType = Nothing- , _agActivationKey = pActivationKey_- , _agGatewayName = pGatewayName_- , _agGatewayTimezone = pGatewayTimezone_- , _agGatewayRegion = pGatewayRegion_- }----- | The value that indicates the type of medium changer to use for tape gateway. This field is optional. Valid Values: "STK-L700", "AWS-Gateway-VTL"-agMediumChangerType :: Lens' ActivateGateway (Maybe Text)-agMediumChangerType = lens _agMediumChangerType (\ s a -> s{_agMediumChangerType = a})---- | The value that indicates the type of tape drive to use for tape gateway. This field is optional. Valid Values: "IBM-ULT3580-TD5"-agTapeDriveType :: Lens' ActivateGateway (Maybe Text)-agTapeDriveType = lens _agTapeDriveType (\ s a -> s{_agTapeDriveType = a})---- | A value that defines the type of gateway to activate. The type specified is critical to all later functions of the gateway and cannot be changed after activation. The default value is @STORED@ . Valid Values: "STORED", "CACHED", "VTL", "FILE_S3"-agGatewayType :: Lens' ActivateGateway (Maybe Text)-agGatewayType = lens _agGatewayType (\ s a -> s{_agGatewayType = a})---- | Your gateway activation key. You can obtain the activation key by sending an HTTP GET request with redirects enabled to the gateway IP address (port 80). The redirect URL returned in the response provides you the activation key for your gateway in the query string parameter @activationKey@ . It may also include other activation-related parameters, however, these are merely defaults -- the arguments you pass to the @ActivateGateway@ API call determine the actual configuration of your gateway. For more information, see https://docs.aws.amazon.com/storagegateway/latest/userguide/get-activation-key.html in the Storage Gateway User Guide.-agActivationKey :: Lens' ActivateGateway Text-agActivationKey = lens _agActivationKey (\ s a -> s{_agActivationKey = a})---- | The name you configured for your gateway.-agGatewayName :: Lens' ActivateGateway Text-agGatewayName = lens _agGatewayName (\ s a -> s{_agGatewayName = a})---- | A value that indicates the time zone you want to set for the gateway. The time zone is of the format "GMT-hr:mm" or "GMT+hr:mm". For example, GMT-4:00 indicates the time is 4 hours behind GMT. GMT+2:00 indicates the time is 2 hours ahead of GMT. The time zone is used, for example, for scheduling snapshots and your gateway's maintenance schedule.-agGatewayTimezone :: Lens' ActivateGateway Text-agGatewayTimezone = lens _agGatewayTimezone (\ s a -> s{_agGatewayTimezone = a})---- | A value that indicates the region where you want to store your data. The gateway region specified must be the same region as the region in your @Host@ header in the request. For more information about available regions and endpoints for AWS Storage Gateway, see <http://docs.aws.amazon.com/general/latest/gr/rande.html#sg_region Regions and Endpoints> in the /Amazon Web Services Glossary/ . Valid Values: "us-east-1", "us-east-2", "us-west-1", "us-west-2", "ca-central-1", "eu-west-1", "eu-central-1", "eu-west-2", "eu-west-3", "ap-northeast-1", "ap-northeast-2", "ap-southeast-1", "ap-southeast-2", "ap-south-1", "sa-east-1"-agGatewayRegion :: Lens' ActivateGateway Text-agGatewayRegion = lens _agGatewayRegion (\ s a -> s{_agGatewayRegion = a})--instance AWSRequest ActivateGateway where- type Rs ActivateGateway = ActivateGatewayResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- ActivateGatewayResponse' <$>- (x .?> "GatewayARN") <*> (pure (fromEnum s)))--instance Hashable ActivateGateway where--instance NFData ActivateGateway where--instance ToHeaders ActivateGateway where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.ActivateGateway" ::- ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON ActivateGateway where- toJSON ActivateGateway'{..}- = object- (catMaybes- [("MediumChangerType" .=) <$> _agMediumChangerType,- ("TapeDriveType" .=) <$> _agTapeDriveType,- ("GatewayType" .=) <$> _agGatewayType,- Just ("ActivationKey" .= _agActivationKey),- Just ("GatewayName" .= _agGatewayName),- Just ("GatewayTimezone" .= _agGatewayTimezone),- Just ("GatewayRegion" .= _agGatewayRegion)])--instance ToPath ActivateGateway where- toPath = const "/"--instance ToQuery ActivateGateway where- toQuery = const mempty---- | AWS Storage Gateway returns the Amazon Resource Name (ARN) of the activated gateway. It is a string made of information such as your account, gateway name, and region. This ARN is used to reference the gateway in other API operations as well as resource-based authorization.------------ /See:/ 'activateGatewayResponse' smart constructor.-data ActivateGatewayResponse = ActivateGatewayResponse'- { _agrsGatewayARN :: !(Maybe Text)- , _agrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'ActivateGatewayResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'agrsGatewayARN' - Undocumented member.------ * 'agrsResponseStatus' - -- | The response status code.-activateGatewayResponse- :: Int -- ^ 'agrsResponseStatus'- -> ActivateGatewayResponse-activateGatewayResponse pResponseStatus_ =- ActivateGatewayResponse'- {_agrsGatewayARN = Nothing, _agrsResponseStatus = pResponseStatus_}----- | Undocumented member.-agrsGatewayARN :: Lens' ActivateGatewayResponse (Maybe Text)-agrsGatewayARN = lens _agrsGatewayARN (\ s a -> s{_agrsGatewayARN = a})---- | -- | The response status code.-agrsResponseStatus :: Lens' ActivateGatewayResponse Int-agrsResponseStatus = lens _agrsResponseStatus (\ s a -> s{_agrsResponseStatus = a})--instance NFData ActivateGatewayResponse where
− gen/Network/AWS/StorageGateway/AddCache.hs
@@ -1,144 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.AddCache--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Configures one or more gateway local disks as cache for a gateway. This operation is only supported in the cached volume, tape and file gateway type (see <http://docs.aws.amazon.com/storagegateway/latest/userguide/StorageGatewayConcepts.html Storage Gateway Concepts> ).--------- In the request, you specify the gateway Amazon Resource Name (ARN) to which you want to add cache, and one or more disk IDs that you want to configure as cache.----module Network.AWS.StorageGateway.AddCache- (- -- * Creating a Request- addCache- , AddCache- -- * Request Lenses- , acGatewayARN- , acDiskIds-- -- * Destructuring the Response- , addCacheResponse- , AddCacheResponse- -- * Response Lenses- , acrsGatewayARN- , acrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | /See:/ 'addCache' smart constructor.-data AddCache = AddCache'- { _acGatewayARN :: !Text- , _acDiskIds :: ![Text]- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'AddCache' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'acGatewayARN' - Undocumented member.------ * 'acDiskIds' - Undocumented member.-addCache- :: Text -- ^ 'acGatewayARN'- -> AddCache-addCache pGatewayARN_ =- AddCache' {_acGatewayARN = pGatewayARN_, _acDiskIds = mempty}----- | Undocumented member.-acGatewayARN :: Lens' AddCache Text-acGatewayARN = lens _acGatewayARN (\ s a -> s{_acGatewayARN = a})---- | Undocumented member.-acDiskIds :: Lens' AddCache [Text]-acDiskIds = lens _acDiskIds (\ s a -> s{_acDiskIds = a}) . _Coerce--instance AWSRequest AddCache where- type Rs AddCache = AddCacheResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- AddCacheResponse' <$>- (x .?> "GatewayARN") <*> (pure (fromEnum s)))--instance Hashable AddCache where--instance NFData AddCache where--instance ToHeaders AddCache where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.AddCache" :: ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON AddCache where- toJSON AddCache'{..}- = object- (catMaybes- [Just ("GatewayARN" .= _acGatewayARN),- Just ("DiskIds" .= _acDiskIds)])--instance ToPath AddCache where- toPath = const "/"--instance ToQuery AddCache where- toQuery = const mempty---- | /See:/ 'addCacheResponse' smart constructor.-data AddCacheResponse = AddCacheResponse'- { _acrsGatewayARN :: !(Maybe Text)- , _acrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'AddCacheResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'acrsGatewayARN' - Undocumented member.------ * 'acrsResponseStatus' - -- | The response status code.-addCacheResponse- :: Int -- ^ 'acrsResponseStatus'- -> AddCacheResponse-addCacheResponse pResponseStatus_ =- AddCacheResponse'- {_acrsGatewayARN = Nothing, _acrsResponseStatus = pResponseStatus_}----- | Undocumented member.-acrsGatewayARN :: Lens' AddCacheResponse (Maybe Text)-acrsGatewayARN = lens _acrsGatewayARN (\ s a -> s{_acrsGatewayARN = a})---- | -- | The response status code.-acrsResponseStatus :: Lens' AddCacheResponse Int-acrsResponseStatus = lens _acrsResponseStatus (\ s a -> s{_acrsResponseStatus = a})--instance NFData AddCacheResponse where
− gen/Network/AWS/StorageGateway/AddTagsToResource.hs
@@ -1,165 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.AddTagsToResource--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Adds one or more tags to the specified resource. You use tags to add metadata to resources, which you can use to categorize these resources. For example, you can categorize resources by purpose, owner, environment, or team. Each tag consists of a key and a value, which you define. You can add tags to the following AWS Storage Gateway resources:--------- * Storage gateways of all types------------ * Storage Volumes------------ * Virtual Tapes------------ You can create a maximum of 10 tags for each resource. Virtual tapes and storage volumes that are recovered to a new gateway maintain their tags.----module Network.AWS.StorageGateway.AddTagsToResource- (- -- * Creating a Request- addTagsToResource- , AddTagsToResource- -- * Request Lenses- , attrResourceARN- , attrTags-- -- * Destructuring the Response- , addTagsToResourceResponse- , AddTagsToResourceResponse- -- * Response Lenses- , attrrsResourceARN- , attrrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | AddTagsToResourceInput------------ /See:/ 'addTagsToResource' smart constructor.-data AddTagsToResource = AddTagsToResource'- { _attrResourceARN :: !Text- , _attrTags :: ![Tag]- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'AddTagsToResource' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'attrResourceARN' - The Amazon Resource Name (ARN) of the resource you want to add tags to.------ * 'attrTags' - The key-value pair that represents the tag you want to add to the resource. The value can be an empty string.-addTagsToResource- :: Text -- ^ 'attrResourceARN'- -> AddTagsToResource-addTagsToResource pResourceARN_ =- AddTagsToResource' {_attrResourceARN = pResourceARN_, _attrTags = mempty}----- | The Amazon Resource Name (ARN) of the resource you want to add tags to.-attrResourceARN :: Lens' AddTagsToResource Text-attrResourceARN = lens _attrResourceARN (\ s a -> s{_attrResourceARN = a})---- | The key-value pair that represents the tag you want to add to the resource. The value can be an empty string.-attrTags :: Lens' AddTagsToResource [Tag]-attrTags = lens _attrTags (\ s a -> s{_attrTags = a}) . _Coerce--instance AWSRequest AddTagsToResource where- type Rs AddTagsToResource = AddTagsToResourceResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- AddTagsToResourceResponse' <$>- (x .?> "ResourceARN") <*> (pure (fromEnum s)))--instance Hashable AddTagsToResource where--instance NFData AddTagsToResource where--instance ToHeaders AddTagsToResource where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.AddTagsToResource" ::- ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON AddTagsToResource where- toJSON AddTagsToResource'{..}- = object- (catMaybes- [Just ("ResourceARN" .= _attrResourceARN),- Just ("Tags" .= _attrTags)])--instance ToPath AddTagsToResource where- toPath = const "/"--instance ToQuery AddTagsToResource where- toQuery = const mempty---- | AddTagsToResourceOutput------------ /See:/ 'addTagsToResourceResponse' smart constructor.-data AddTagsToResourceResponse = AddTagsToResourceResponse'- { _attrrsResourceARN :: !(Maybe Text)- , _attrrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'AddTagsToResourceResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'attrrsResourceARN' - The Amazon Resource Name (ARN) of the resource you want to add tags to.------ * 'attrrsResponseStatus' - -- | The response status code.-addTagsToResourceResponse- :: Int -- ^ 'attrrsResponseStatus'- -> AddTagsToResourceResponse-addTagsToResourceResponse pResponseStatus_ =- AddTagsToResourceResponse'- {_attrrsResourceARN = Nothing, _attrrsResponseStatus = pResponseStatus_}----- | The Amazon Resource Name (ARN) of the resource you want to add tags to.-attrrsResourceARN :: Lens' AddTagsToResourceResponse (Maybe Text)-attrrsResourceARN = lens _attrrsResourceARN (\ s a -> s{_attrrsResourceARN = a})---- | -- | The response status code.-attrrsResponseStatus :: Lens' AddTagsToResourceResponse Int-attrrsResponseStatus = lens _attrrsResponseStatus (\ s a -> s{_attrrsResponseStatus = a})--instance NFData AddTagsToResourceResponse where
− gen/Network/AWS/StorageGateway/AddUploadBuffer.hs
@@ -1,145 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.AddUploadBuffer--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Configures one or more gateway local disks as upload buffer for a specified gateway. This operation is supported for the stored volume, cached volume and tape gateway types.--------- In the request, you specify the gateway Amazon Resource Name (ARN) to which you want to add upload buffer, and one or more disk IDs that you want to configure as upload buffer.----module Network.AWS.StorageGateway.AddUploadBuffer- (- -- * Creating a Request- addUploadBuffer- , AddUploadBuffer- -- * Request Lenses- , aubGatewayARN- , aubDiskIds-- -- * Destructuring the Response- , addUploadBufferResponse- , AddUploadBufferResponse- -- * Response Lenses- , aubrsGatewayARN- , aubrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | /See:/ 'addUploadBuffer' smart constructor.-data AddUploadBuffer = AddUploadBuffer'- { _aubGatewayARN :: !Text- , _aubDiskIds :: ![Text]- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'AddUploadBuffer' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'aubGatewayARN' - Undocumented member.------ * 'aubDiskIds' - Undocumented member.-addUploadBuffer- :: Text -- ^ 'aubGatewayARN'- -> AddUploadBuffer-addUploadBuffer pGatewayARN_ =- AddUploadBuffer' {_aubGatewayARN = pGatewayARN_, _aubDiskIds = mempty}----- | Undocumented member.-aubGatewayARN :: Lens' AddUploadBuffer Text-aubGatewayARN = lens _aubGatewayARN (\ s a -> s{_aubGatewayARN = a})---- | Undocumented member.-aubDiskIds :: Lens' AddUploadBuffer [Text]-aubDiskIds = lens _aubDiskIds (\ s a -> s{_aubDiskIds = a}) . _Coerce--instance AWSRequest AddUploadBuffer where- type Rs AddUploadBuffer = AddUploadBufferResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- AddUploadBufferResponse' <$>- (x .?> "GatewayARN") <*> (pure (fromEnum s)))--instance Hashable AddUploadBuffer where--instance NFData AddUploadBuffer where--instance ToHeaders AddUploadBuffer where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.AddUploadBuffer" ::- ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON AddUploadBuffer where- toJSON AddUploadBuffer'{..}- = object- (catMaybes- [Just ("GatewayARN" .= _aubGatewayARN),- Just ("DiskIds" .= _aubDiskIds)])--instance ToPath AddUploadBuffer where- toPath = const "/"--instance ToQuery AddUploadBuffer where- toQuery = const mempty---- | /See:/ 'addUploadBufferResponse' smart constructor.-data AddUploadBufferResponse = AddUploadBufferResponse'- { _aubrsGatewayARN :: !(Maybe Text)- , _aubrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'AddUploadBufferResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'aubrsGatewayARN' - Undocumented member.------ * 'aubrsResponseStatus' - -- | The response status code.-addUploadBufferResponse- :: Int -- ^ 'aubrsResponseStatus'- -> AddUploadBufferResponse-addUploadBufferResponse pResponseStatus_ =- AddUploadBufferResponse'- {_aubrsGatewayARN = Nothing, _aubrsResponseStatus = pResponseStatus_}----- | Undocumented member.-aubrsGatewayARN :: Lens' AddUploadBufferResponse (Maybe Text)-aubrsGatewayARN = lens _aubrsGatewayARN (\ s a -> s{_aubrsGatewayARN = a})---- | -- | The response status code.-aubrsResponseStatus :: Lens' AddUploadBufferResponse Int-aubrsResponseStatus = lens _aubrsResponseStatus (\ s a -> s{_aubrsResponseStatus = a})--instance NFData AddUploadBufferResponse where
− gen/Network/AWS/StorageGateway/AddWorkingStorage.hs
@@ -1,157 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.AddWorkingStorage--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Configures one or more gateway local disks as working storage for a gateway. This operation is only supported in the stored volume gateway type. This operation is deprecated in cached volume API version 20120630. Use 'AddUploadBuffer' instead.--------- In the request, you specify the gateway Amazon Resource Name (ARN) to which you want to add working storage, and one or more disk IDs that you want to configure as working storage.----module Network.AWS.StorageGateway.AddWorkingStorage- (- -- * Creating a Request- addWorkingStorage- , AddWorkingStorage- -- * Request Lenses- , awsGatewayARN- , awsDiskIds-- -- * Destructuring the Response- , addWorkingStorageResponse- , AddWorkingStorageResponse- -- * Response Lenses- , awsrsGatewayARN- , awsrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | A JSON object containing one or more of the following fields:--------- * 'AddWorkingStorageInput$DiskIds'--------------- /See:/ 'addWorkingStorage' smart constructor.-data AddWorkingStorage = AddWorkingStorage'- { _awsGatewayARN :: !Text- , _awsDiskIds :: ![Text]- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'AddWorkingStorage' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'awsGatewayARN' - Undocumented member.------ * 'awsDiskIds' - An array of strings that identify disks that are to be configured as working storage. Each string have a minimum length of 1 and maximum length of 300. You can get the disk IDs from the 'ListLocalDisks' API.-addWorkingStorage- :: Text -- ^ 'awsGatewayARN'- -> AddWorkingStorage-addWorkingStorage pGatewayARN_ =- AddWorkingStorage' {_awsGatewayARN = pGatewayARN_, _awsDiskIds = mempty}----- | Undocumented member.-awsGatewayARN :: Lens' AddWorkingStorage Text-awsGatewayARN = lens _awsGatewayARN (\ s a -> s{_awsGatewayARN = a})---- | An array of strings that identify disks that are to be configured as working storage. Each string have a minimum length of 1 and maximum length of 300. You can get the disk IDs from the 'ListLocalDisks' API.-awsDiskIds :: Lens' AddWorkingStorage [Text]-awsDiskIds = lens _awsDiskIds (\ s a -> s{_awsDiskIds = a}) . _Coerce--instance AWSRequest AddWorkingStorage where- type Rs AddWorkingStorage = AddWorkingStorageResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- AddWorkingStorageResponse' <$>- (x .?> "GatewayARN") <*> (pure (fromEnum s)))--instance Hashable AddWorkingStorage where--instance NFData AddWorkingStorage where--instance ToHeaders AddWorkingStorage where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.AddWorkingStorage" ::- ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON AddWorkingStorage where- toJSON AddWorkingStorage'{..}- = object- (catMaybes- [Just ("GatewayARN" .= _awsGatewayARN),- Just ("DiskIds" .= _awsDiskIds)])--instance ToPath AddWorkingStorage where- toPath = const "/"--instance ToQuery AddWorkingStorage where- toQuery = const mempty---- | A JSON object containing the of the gateway for which working storage was configured.------------ /See:/ 'addWorkingStorageResponse' smart constructor.-data AddWorkingStorageResponse = AddWorkingStorageResponse'- { _awsrsGatewayARN :: !(Maybe Text)- , _awsrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'AddWorkingStorageResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'awsrsGatewayARN' - Undocumented member.------ * 'awsrsResponseStatus' - -- | The response status code.-addWorkingStorageResponse- :: Int -- ^ 'awsrsResponseStatus'- -> AddWorkingStorageResponse-addWorkingStorageResponse pResponseStatus_ =- AddWorkingStorageResponse'- {_awsrsGatewayARN = Nothing, _awsrsResponseStatus = pResponseStatus_}----- | Undocumented member.-awsrsGatewayARN :: Lens' AddWorkingStorageResponse (Maybe Text)-awsrsGatewayARN = lens _awsrsGatewayARN (\ s a -> s{_awsrsGatewayARN = a})---- | -- | The response status code.-awsrsResponseStatus :: Lens' AddWorkingStorageResponse Int-awsrsResponseStatus = lens _awsrsResponseStatus (\ s a -> s{_awsrsResponseStatus = a})--instance NFData AddWorkingStorageResponse where
− gen/Network/AWS/StorageGateway/CancelArchival.hs
@@ -1,152 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.CancelArchival--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Cancels archiving of a virtual tape to the virtual tape shelf (VTS) after the archiving process is initiated. This operation is only supported in the tape gateway type.-------module Network.AWS.StorageGateway.CancelArchival- (- -- * Creating a Request- cancelArchival- , CancelArchival- -- * Request Lenses- , caGatewayARN- , caTapeARN-- -- * Destructuring the Response- , cancelArchivalResponse- , CancelArchivalResponse- -- * Response Lenses- , carsTapeARN- , carsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | CancelArchivalInput------------ /See:/ 'cancelArchival' smart constructor.-data CancelArchival = CancelArchival'- { _caGatewayARN :: !Text- , _caTapeARN :: !Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'CancelArchival' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'caGatewayARN' - Undocumented member.------ * 'caTapeARN' - The Amazon Resource Name (ARN) of the virtual tape you want to cancel archiving for.-cancelArchival- :: Text -- ^ 'caGatewayARN'- -> Text -- ^ 'caTapeARN'- -> CancelArchival-cancelArchival pGatewayARN_ pTapeARN_ =- CancelArchival' {_caGatewayARN = pGatewayARN_, _caTapeARN = pTapeARN_}----- | Undocumented member.-caGatewayARN :: Lens' CancelArchival Text-caGatewayARN = lens _caGatewayARN (\ s a -> s{_caGatewayARN = a})---- | The Amazon Resource Name (ARN) of the virtual tape you want to cancel archiving for.-caTapeARN :: Lens' CancelArchival Text-caTapeARN = lens _caTapeARN (\ s a -> s{_caTapeARN = a})--instance AWSRequest CancelArchival where- type Rs CancelArchival = CancelArchivalResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- CancelArchivalResponse' <$>- (x .?> "TapeARN") <*> (pure (fromEnum s)))--instance Hashable CancelArchival where--instance NFData CancelArchival where--instance ToHeaders CancelArchival where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.CancelArchival" ::- ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON CancelArchival where- toJSON CancelArchival'{..}- = object- (catMaybes- [Just ("GatewayARN" .= _caGatewayARN),- Just ("TapeARN" .= _caTapeARN)])--instance ToPath CancelArchival where- toPath = const "/"--instance ToQuery CancelArchival where- toQuery = const mempty---- | CancelArchivalOutput------------ /See:/ 'cancelArchivalResponse' smart constructor.-data CancelArchivalResponse = CancelArchivalResponse'- { _carsTapeARN :: !(Maybe Text)- , _carsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'CancelArchivalResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'carsTapeARN' - The Amazon Resource Name (ARN) of the virtual tape for which archiving was canceled.------ * 'carsResponseStatus' - -- | The response status code.-cancelArchivalResponse- :: Int -- ^ 'carsResponseStatus'- -> CancelArchivalResponse-cancelArchivalResponse pResponseStatus_ =- CancelArchivalResponse'- {_carsTapeARN = Nothing, _carsResponseStatus = pResponseStatus_}----- | The Amazon Resource Name (ARN) of the virtual tape for which archiving was canceled.-carsTapeARN :: Lens' CancelArchivalResponse (Maybe Text)-carsTapeARN = lens _carsTapeARN (\ s a -> s{_carsTapeARN = a})---- | -- | The response status code.-carsResponseStatus :: Lens' CancelArchivalResponse Int-carsResponseStatus = lens _carsResponseStatus (\ s a -> s{_carsResponseStatus = a})--instance NFData CancelArchivalResponse where
− gen/Network/AWS/StorageGateway/CancelRetrieval.hs
@@ -1,152 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.CancelRetrieval--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Cancels retrieval of a virtual tape from the virtual tape shelf (VTS) to a gateway after the retrieval process is initiated. The virtual tape is returned to the VTS. This operation is only supported in the tape gateway type.-------module Network.AWS.StorageGateway.CancelRetrieval- (- -- * Creating a Request- cancelRetrieval- , CancelRetrieval- -- * Request Lenses- , crGatewayARN- , crTapeARN-- -- * Destructuring the Response- , cancelRetrievalResponse- , CancelRetrievalResponse- -- * Response Lenses- , crrsTapeARN- , crrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | CancelRetrievalInput------------ /See:/ 'cancelRetrieval' smart constructor.-data CancelRetrieval = CancelRetrieval'- { _crGatewayARN :: !Text- , _crTapeARN :: !Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'CancelRetrieval' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'crGatewayARN' - Undocumented member.------ * 'crTapeARN' - The Amazon Resource Name (ARN) of the virtual tape you want to cancel retrieval for.-cancelRetrieval- :: Text -- ^ 'crGatewayARN'- -> Text -- ^ 'crTapeARN'- -> CancelRetrieval-cancelRetrieval pGatewayARN_ pTapeARN_ =- CancelRetrieval' {_crGatewayARN = pGatewayARN_, _crTapeARN = pTapeARN_}----- | Undocumented member.-crGatewayARN :: Lens' CancelRetrieval Text-crGatewayARN = lens _crGatewayARN (\ s a -> s{_crGatewayARN = a})---- | The Amazon Resource Name (ARN) of the virtual tape you want to cancel retrieval for.-crTapeARN :: Lens' CancelRetrieval Text-crTapeARN = lens _crTapeARN (\ s a -> s{_crTapeARN = a})--instance AWSRequest CancelRetrieval where- type Rs CancelRetrieval = CancelRetrievalResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- CancelRetrievalResponse' <$>- (x .?> "TapeARN") <*> (pure (fromEnum s)))--instance Hashable CancelRetrieval where--instance NFData CancelRetrieval where--instance ToHeaders CancelRetrieval where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.CancelRetrieval" ::- ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON CancelRetrieval where- toJSON CancelRetrieval'{..}- = object- (catMaybes- [Just ("GatewayARN" .= _crGatewayARN),- Just ("TapeARN" .= _crTapeARN)])--instance ToPath CancelRetrieval where- toPath = const "/"--instance ToQuery CancelRetrieval where- toQuery = const mempty---- | CancelRetrievalOutput------------ /See:/ 'cancelRetrievalResponse' smart constructor.-data CancelRetrievalResponse = CancelRetrievalResponse'- { _crrsTapeARN :: !(Maybe Text)- , _crrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'CancelRetrievalResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'crrsTapeARN' - The Amazon Resource Name (ARN) of the virtual tape for which retrieval was canceled.------ * 'crrsResponseStatus' - -- | The response status code.-cancelRetrievalResponse- :: Int -- ^ 'crrsResponseStatus'- -> CancelRetrievalResponse-cancelRetrievalResponse pResponseStatus_ =- CancelRetrievalResponse'- {_crrsTapeARN = Nothing, _crrsResponseStatus = pResponseStatus_}----- | The Amazon Resource Name (ARN) of the virtual tape for which retrieval was canceled.-crrsTapeARN :: Lens' CancelRetrievalResponse (Maybe Text)-crrsTapeARN = lens _crrsTapeARN (\ s a -> s{_crrsTapeARN = a})---- | -- | The response status code.-crrsResponseStatus :: Lens' CancelRetrievalResponse Int-crrsResponseStatus = lens _crrsResponseStatus (\ s a -> s{_crrsResponseStatus = a})--instance NFData CancelRetrievalResponse where
− gen/Network/AWS/StorageGateway/CreateCachediSCSIVolume.hs
@@ -1,219 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.CreateCachediSCSIVolume--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Creates a cached volume on a specified cached volume gateway. This operation is only supported in the cached volume gateway type.--------- In the request, you must specify the gateway, size of the volume in bytes, the iSCSI target name, an IP address on which to expose the target, and a unique client token. In response, the gateway creates the volume and returns information about it. This information includes the volume Amazon Resource Name (ARN), its size, and the iSCSI target ARN that initiators can use to connect to the volume target.------ Optionally, you can provide the ARN for an existing volume as the @SourceVolumeARN@ for this cached volume, which creates an exact copy of the existing volume’s latest recovery point. The @VolumeSizeInBytes@ value must be equal to or larger than the size of the copied volume, in bytes.----module Network.AWS.StorageGateway.CreateCachediSCSIVolume- (- -- * Creating a Request- createCachediSCSIVolume- , CreateCachediSCSIVolume- -- * Request Lenses- , ccscsivSourceVolumeARN- , ccscsivSnapshotId- , ccscsivGatewayARN- , ccscsivVolumeSizeInBytes- , ccscsivTargetName- , ccscsivNetworkInterfaceId- , ccscsivClientToken-- -- * Destructuring the Response- , createCachediSCSIVolumeResponse- , CreateCachediSCSIVolumeResponse- -- * Response Lenses- , ccscsivrsTargetARN- , ccscsivrsVolumeARN- , ccscsivrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | /See:/ 'createCachediSCSIVolume' smart constructor.-data CreateCachediSCSIVolume = CreateCachediSCSIVolume'- { _ccscsivSourceVolumeARN :: !(Maybe Text)- , _ccscsivSnapshotId :: !(Maybe Text)- , _ccscsivGatewayARN :: !Text- , _ccscsivVolumeSizeInBytes :: !Integer- , _ccscsivTargetName :: !Text- , _ccscsivNetworkInterfaceId :: !Text- , _ccscsivClientToken :: !Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'CreateCachediSCSIVolume' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ccscsivSourceVolumeARN' - The ARN for an existing volume. Specifying this ARN makes the new volume into an exact copy of the specified existing volume's latest recovery point. The @VolumeSizeInBytes@ value for this new volume must be equal to or larger than the size of the existing volume, in bytes.------ * 'ccscsivSnapshotId' - Undocumented member.------ * 'ccscsivGatewayARN' - Undocumented member.------ * 'ccscsivVolumeSizeInBytes' - Undocumented member.------ * 'ccscsivTargetName' - Undocumented member.------ * 'ccscsivNetworkInterfaceId' - Undocumented member.------ * 'ccscsivClientToken' - Undocumented member.-createCachediSCSIVolume- :: Text -- ^ 'ccscsivGatewayARN'- -> Integer -- ^ 'ccscsivVolumeSizeInBytes'- -> Text -- ^ 'ccscsivTargetName'- -> Text -- ^ 'ccscsivNetworkInterfaceId'- -> Text -- ^ 'ccscsivClientToken'- -> CreateCachediSCSIVolume-createCachediSCSIVolume pGatewayARN_ pVolumeSizeInBytes_ pTargetName_ pNetworkInterfaceId_ pClientToken_ =- CreateCachediSCSIVolume'- { _ccscsivSourceVolumeARN = Nothing- , _ccscsivSnapshotId = Nothing- , _ccscsivGatewayARN = pGatewayARN_- , _ccscsivVolumeSizeInBytes = pVolumeSizeInBytes_- , _ccscsivTargetName = pTargetName_- , _ccscsivNetworkInterfaceId = pNetworkInterfaceId_- , _ccscsivClientToken = pClientToken_- }----- | The ARN for an existing volume. Specifying this ARN makes the new volume into an exact copy of the specified existing volume's latest recovery point. The @VolumeSizeInBytes@ value for this new volume must be equal to or larger than the size of the existing volume, in bytes.-ccscsivSourceVolumeARN :: Lens' CreateCachediSCSIVolume (Maybe Text)-ccscsivSourceVolumeARN = lens _ccscsivSourceVolumeARN (\ s a -> s{_ccscsivSourceVolumeARN = a})---- | Undocumented member.-ccscsivSnapshotId :: Lens' CreateCachediSCSIVolume (Maybe Text)-ccscsivSnapshotId = lens _ccscsivSnapshotId (\ s a -> s{_ccscsivSnapshotId = a})---- | Undocumented member.-ccscsivGatewayARN :: Lens' CreateCachediSCSIVolume Text-ccscsivGatewayARN = lens _ccscsivGatewayARN (\ s a -> s{_ccscsivGatewayARN = a})---- | Undocumented member.-ccscsivVolumeSizeInBytes :: Lens' CreateCachediSCSIVolume Integer-ccscsivVolumeSizeInBytes = lens _ccscsivVolumeSizeInBytes (\ s a -> s{_ccscsivVolumeSizeInBytes = a})---- | Undocumented member.-ccscsivTargetName :: Lens' CreateCachediSCSIVolume Text-ccscsivTargetName = lens _ccscsivTargetName (\ s a -> s{_ccscsivTargetName = a})---- | Undocumented member.-ccscsivNetworkInterfaceId :: Lens' CreateCachediSCSIVolume Text-ccscsivNetworkInterfaceId = lens _ccscsivNetworkInterfaceId (\ s a -> s{_ccscsivNetworkInterfaceId = a})---- | Undocumented member.-ccscsivClientToken :: Lens' CreateCachediSCSIVolume Text-ccscsivClientToken = lens _ccscsivClientToken (\ s a -> s{_ccscsivClientToken = a})--instance AWSRequest CreateCachediSCSIVolume where- type Rs CreateCachediSCSIVolume =- CreateCachediSCSIVolumeResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- CreateCachediSCSIVolumeResponse' <$>- (x .?> "TargetARN") <*> (x .?> "VolumeARN") <*>- (pure (fromEnum s)))--instance Hashable CreateCachediSCSIVolume where--instance NFData CreateCachediSCSIVolume where--instance ToHeaders CreateCachediSCSIVolume where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.CreateCachediSCSIVolume" ::- ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON CreateCachediSCSIVolume where- toJSON CreateCachediSCSIVolume'{..}- = object- (catMaybes- [("SourceVolumeARN" .=) <$> _ccscsivSourceVolumeARN,- ("SnapshotId" .=) <$> _ccscsivSnapshotId,- Just ("GatewayARN" .= _ccscsivGatewayARN),- Just- ("VolumeSizeInBytes" .= _ccscsivVolumeSizeInBytes),- Just ("TargetName" .= _ccscsivTargetName),- Just- ("NetworkInterfaceId" .= _ccscsivNetworkInterfaceId),- Just ("ClientToken" .= _ccscsivClientToken)])--instance ToPath CreateCachediSCSIVolume where- toPath = const "/"--instance ToQuery CreateCachediSCSIVolume where- toQuery = const mempty---- | /See:/ 'createCachediSCSIVolumeResponse' smart constructor.-data CreateCachediSCSIVolumeResponse = CreateCachediSCSIVolumeResponse'- { _ccscsivrsTargetARN :: !(Maybe Text)- , _ccscsivrsVolumeARN :: !(Maybe Text)- , _ccscsivrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'CreateCachediSCSIVolumeResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ccscsivrsTargetARN' - Undocumented member.------ * 'ccscsivrsVolumeARN' - Undocumented member.------ * 'ccscsivrsResponseStatus' - -- | The response status code.-createCachediSCSIVolumeResponse- :: Int -- ^ 'ccscsivrsResponseStatus'- -> CreateCachediSCSIVolumeResponse-createCachediSCSIVolumeResponse pResponseStatus_ =- CreateCachediSCSIVolumeResponse'- { _ccscsivrsTargetARN = Nothing- , _ccscsivrsVolumeARN = Nothing- , _ccscsivrsResponseStatus = pResponseStatus_- }----- | Undocumented member.-ccscsivrsTargetARN :: Lens' CreateCachediSCSIVolumeResponse (Maybe Text)-ccscsivrsTargetARN = lens _ccscsivrsTargetARN (\ s a -> s{_ccscsivrsTargetARN = a})---- | Undocumented member.-ccscsivrsVolumeARN :: Lens' CreateCachediSCSIVolumeResponse (Maybe Text)-ccscsivrsVolumeARN = lens _ccscsivrsVolumeARN (\ s a -> s{_ccscsivrsVolumeARN = a})---- | -- | The response status code.-ccscsivrsResponseStatus :: Lens' CreateCachediSCSIVolumeResponse Int-ccscsivrsResponseStatus = lens _ccscsivrsResponseStatus (\ s a -> s{_ccscsivrsResponseStatus = a})--instance NFData CreateCachediSCSIVolumeResponse where
@@ -1,287 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.CreateNFSFileShare--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Creates a file share on an existing file gateway. In Storage Gateway, a file share is a file system mount point backed by Amazon S3 cloud storage. Storage Gateway exposes file shares using a Network File System (NFS) interface. This operation is only supported in the file gateway type.--------- /Important:/ File gateway requires AWS Security Token Service (AWS STS) to be activated to enable you create a file share. Make sure AWS STS is activated in the region you are creating your file gateway in. If AWS STS is not activated in the region, activate it. For information about how to activate AWS STS, see Activating and Deactivating AWS STS in an AWS Region in the AWS Identity and Access Management User Guide.------ File gateway does not support creating hard or symbolic links on a file share.----module Network.AWS.StorageGateway.CreateNFSFileShare- (- -- * Creating a Request- createNFSFileShare- , CreateNFSFileShare- -- * Request Lenses- , cnfsfsKMSKey- , cnfsfsObjectACL- , cnfsfsKMSEncrypted- , cnfsfsDefaultStorageClass- , cnfsfsSquash- , cnfsfsRequesterPays- , cnfsfsNFSFileShareDefaults- , cnfsfsClientList- , cnfsfsGuessMIMETypeEnabled- , cnfsfsReadOnly- , cnfsfsClientToken- , cnfsfsGatewayARN- , cnfsfsRole- , cnfsfsLocationARN-- -- * Destructuring the Response- , createNFSFileShareResponse- , CreateNFSFileShareResponse- -- * Response Lenses- , cnfsfsrsFileShareARN- , cnfsfsrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | CreateNFSFileShareInput------------ /See:/ 'createNFSFileShare' smart constructor.-data CreateNFSFileShare = CreateNFSFileShare'- { _cnfsfsKMSKey :: !(Maybe Text)- , _cnfsfsObjectACL :: !(Maybe ObjectACL)- , _cnfsfsKMSEncrypted :: !(Maybe Bool)- , _cnfsfsDefaultStorageClass :: !(Maybe Text)- , _cnfsfsSquash :: !(Maybe Text)- , _cnfsfsRequesterPays :: !(Maybe Bool)- , _cnfsfsNFSFileShareDefaults :: !(Maybe NFSFileShareDefaults)- , _cnfsfsClientList :: !(Maybe (List1 Text))- , _cnfsfsGuessMIMETypeEnabled :: !(Maybe Bool)- , _cnfsfsReadOnly :: !(Maybe Bool)- , _cnfsfsClientToken :: !Text- , _cnfsfsGatewayARN :: !Text- , _cnfsfsRole :: !Text- , _cnfsfsLocationARN :: !Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'CreateNFSFileShare' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cnfsfsKMSKey' - The KMS key used for Amazon S3 server side encryption. This value can only be set when KmsEncrypted is true. Optional.------ * 'cnfsfsObjectACL' - Sets the access control list permission for objects in the Amazon S3 bucket that a file gateway puts objects into. The default value is "private".------ * 'cnfsfsKMSEncrypted' - True to use Amazon S3 server side encryption with your own AWS KMS key, or false to use a key managed by Amazon S3. Optional.------ * 'cnfsfsDefaultStorageClass' - The default storage class for objects put into an Amazon S3 bucket by file gateway. Possible values are S3_STANDARD or S3_STANDARD_IA. If this field is not populated, the default value S3_STANDARD is used. Optional.------ * 'cnfsfsSquash' - Maps a user to anonymous user. Valid options 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.------ * 'cnfsfsRequesterPays' - Sets who pays the cost of the request and the data download from the Amazon S3 bucket. Set this value to true if you want the requester to pay instead of the bucket owner, and otherwise to false.------ * 'cnfsfsNFSFileShareDefaults' - File share default values. Optional.------ * 'cnfsfsClientList' - The list of clients that are allowed to access the file gateway. The list must contain either valid IP addresses or valid CIDR blocks.------ * 'cnfsfsGuessMIMETypeEnabled' - Enables guessing of the MIME type for uploaded objects based on file extensions. Set this value to true to enable MIME type guessing, and otherwise to false. The default value is true.------ * 'cnfsfsReadOnly' - Sets the write status of a file share. This value is true if the write status is read-only, and otherwise false.------ * 'cnfsfsClientToken' - A unique string value that you supply that is used by file gateway to ensure idempotent file share creation.------ * 'cnfsfsGatewayARN' - The Amazon Resource Name (ARN) of the file gateway on which you want to create a file share.------ * 'cnfsfsRole' - The ARN of the AWS Identity and Access Management (IAM) role that a file gateway assumes when it accesses the underlying storage.------ * 'cnfsfsLocationARN' - The ARN of the backed storage used for storing file data.-createNFSFileShare- :: Text -- ^ 'cnfsfsClientToken'- -> Text -- ^ 'cnfsfsGatewayARN'- -> Text -- ^ 'cnfsfsRole'- -> Text -- ^ 'cnfsfsLocationARN'- -> CreateNFSFileShare-createNFSFileShare pClientToken_ pGatewayARN_ pRole_ pLocationARN_ =- CreateNFSFileShare'- { _cnfsfsKMSKey = Nothing- , _cnfsfsObjectACL = Nothing- , _cnfsfsKMSEncrypted = Nothing- , _cnfsfsDefaultStorageClass = Nothing- , _cnfsfsSquash = Nothing- , _cnfsfsRequesterPays = Nothing- , _cnfsfsNFSFileShareDefaults = Nothing- , _cnfsfsClientList = Nothing- , _cnfsfsGuessMIMETypeEnabled = Nothing- , _cnfsfsReadOnly = Nothing- , _cnfsfsClientToken = pClientToken_- , _cnfsfsGatewayARN = pGatewayARN_- , _cnfsfsRole = pRole_- , _cnfsfsLocationARN = pLocationARN_- }----- | The KMS key used for Amazon S3 server side encryption. This value can only be set when KmsEncrypted is true. Optional.-cnfsfsKMSKey :: Lens' CreateNFSFileShare (Maybe Text)-cnfsfsKMSKey = lens _cnfsfsKMSKey (\ s a -> s{_cnfsfsKMSKey = a})---- | Sets the access control list permission for objects in the Amazon S3 bucket that a file gateway puts objects into. The default value is "private".-cnfsfsObjectACL :: Lens' CreateNFSFileShare (Maybe ObjectACL)-cnfsfsObjectACL = lens _cnfsfsObjectACL (\ s a -> s{_cnfsfsObjectACL = a})---- | True to use Amazon S3 server side encryption with your own AWS KMS key, or false to use a key managed by Amazon S3. Optional.-cnfsfsKMSEncrypted :: Lens' CreateNFSFileShare (Maybe Bool)-cnfsfsKMSEncrypted = lens _cnfsfsKMSEncrypted (\ s a -> s{_cnfsfsKMSEncrypted = a})---- | The default storage class for objects put into an Amazon S3 bucket by file gateway. Possible values are S3_STANDARD or S3_STANDARD_IA. If this field is not populated, the default value S3_STANDARD is used. Optional.-cnfsfsDefaultStorageClass :: Lens' CreateNFSFileShare (Maybe Text)-cnfsfsDefaultStorageClass = lens _cnfsfsDefaultStorageClass (\ s a -> s{_cnfsfsDefaultStorageClass = a})---- | Maps a user to anonymous user. Valid options 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.-cnfsfsSquash :: Lens' CreateNFSFileShare (Maybe Text)-cnfsfsSquash = lens _cnfsfsSquash (\ s a -> s{_cnfsfsSquash = a})---- | Sets who pays the cost of the request and the data download from the Amazon S3 bucket. Set this value to true if you want the requester to pay instead of the bucket owner, and otherwise to false.-cnfsfsRequesterPays :: Lens' CreateNFSFileShare (Maybe Bool)-cnfsfsRequesterPays = lens _cnfsfsRequesterPays (\ s a -> s{_cnfsfsRequesterPays = a})---- | File share default values. Optional.-cnfsfsNFSFileShareDefaults :: Lens' CreateNFSFileShare (Maybe NFSFileShareDefaults)-cnfsfsNFSFileShareDefaults = lens _cnfsfsNFSFileShareDefaults (\ s a -> s{_cnfsfsNFSFileShareDefaults = a})---- | The list of clients that are allowed to access the file gateway. The list must contain either valid IP addresses or valid CIDR blocks.-cnfsfsClientList :: Lens' CreateNFSFileShare (Maybe (NonEmpty Text))-cnfsfsClientList = lens _cnfsfsClientList (\ s a -> s{_cnfsfsClientList = a}) . mapping _List1---- | Enables guessing of the MIME type for uploaded objects based on file extensions. Set this value to true to enable MIME type guessing, and otherwise to false. The default value is true.-cnfsfsGuessMIMETypeEnabled :: Lens' CreateNFSFileShare (Maybe Bool)-cnfsfsGuessMIMETypeEnabled = lens _cnfsfsGuessMIMETypeEnabled (\ s a -> s{_cnfsfsGuessMIMETypeEnabled = a})---- | Sets the write status of a file share. This value is true if the write status is read-only, and otherwise false.-cnfsfsReadOnly :: Lens' CreateNFSFileShare (Maybe Bool)-cnfsfsReadOnly = lens _cnfsfsReadOnly (\ s a -> s{_cnfsfsReadOnly = a})---- | A unique string value that you supply that is used by file gateway to ensure idempotent file share creation.-cnfsfsClientToken :: Lens' CreateNFSFileShare Text-cnfsfsClientToken = lens _cnfsfsClientToken (\ s a -> s{_cnfsfsClientToken = a})---- | The Amazon Resource Name (ARN) of the file gateway on which you want to create a file share.-cnfsfsGatewayARN :: Lens' CreateNFSFileShare Text-cnfsfsGatewayARN = lens _cnfsfsGatewayARN (\ s a -> s{_cnfsfsGatewayARN = a})---- | The ARN of the AWS Identity and Access Management (IAM) role that a file gateway assumes when it accesses the underlying storage.-cnfsfsRole :: Lens' CreateNFSFileShare Text-cnfsfsRole = lens _cnfsfsRole (\ s a -> s{_cnfsfsRole = a})---- | The ARN of the backed storage used for storing file data.-cnfsfsLocationARN :: Lens' CreateNFSFileShare Text-cnfsfsLocationARN = lens _cnfsfsLocationARN (\ s a -> s{_cnfsfsLocationARN = a})--instance AWSRequest CreateNFSFileShare where- type Rs CreateNFSFileShare =- CreateNFSFileShareResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- CreateNFSFileShareResponse' <$>- (x .?> "FileShareARN") <*> (pure (fromEnum s)))--instance Hashable CreateNFSFileShare where--instance NFData CreateNFSFileShare where--instance ToHeaders CreateNFSFileShare where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.CreateNFSFileShare" ::- ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON CreateNFSFileShare where- toJSON CreateNFSFileShare'{..}- = object- (catMaybes- [("KMSKey" .=) <$> _cnfsfsKMSKey,- ("ObjectACL" .=) <$> _cnfsfsObjectACL,- ("KMSEncrypted" .=) <$> _cnfsfsKMSEncrypted,- ("DefaultStorageClass" .=) <$>- _cnfsfsDefaultStorageClass,- ("Squash" .=) <$> _cnfsfsSquash,- ("RequesterPays" .=) <$> _cnfsfsRequesterPays,- ("NFSFileShareDefaults" .=) <$>- _cnfsfsNFSFileShareDefaults,- ("ClientList" .=) <$> _cnfsfsClientList,- ("GuessMIMETypeEnabled" .=) <$>- _cnfsfsGuessMIMETypeEnabled,- ("ReadOnly" .=) <$> _cnfsfsReadOnly,- Just ("ClientToken" .= _cnfsfsClientToken),- Just ("GatewayARN" .= _cnfsfsGatewayARN),- Just ("Role" .= _cnfsfsRole),- Just ("LocationARN" .= _cnfsfsLocationARN)])--instance ToPath CreateNFSFileShare where- toPath = const "/"--instance ToQuery CreateNFSFileShare where- toQuery = const mempty---- | CreateNFSFileShareOutput------------ /See:/ 'createNFSFileShareResponse' smart constructor.-data CreateNFSFileShareResponse = CreateNFSFileShareResponse'- { _cnfsfsrsFileShareARN :: !(Maybe Text)- , _cnfsfsrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'CreateNFSFileShareResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cnfsfsrsFileShareARN' - The Amazon Resource Name (ARN) of the newly created file share.------ * 'cnfsfsrsResponseStatus' - -- | The response status code.-createNFSFileShareResponse- :: Int -- ^ 'cnfsfsrsResponseStatus'- -> CreateNFSFileShareResponse-createNFSFileShareResponse pResponseStatus_ =- CreateNFSFileShareResponse'- { _cnfsfsrsFileShareARN = Nothing- , _cnfsfsrsResponseStatus = pResponseStatus_- }----- | The Amazon Resource Name (ARN) of the newly created file share.-cnfsfsrsFileShareARN :: Lens' CreateNFSFileShareResponse (Maybe Text)-cnfsfsrsFileShareARN = lens _cnfsfsrsFileShareARN (\ s a -> s{_cnfsfsrsFileShareARN = a})---- | -- | The response status code.-cnfsfsrsResponseStatus :: Lens' CreateNFSFileShareResponse Int-cnfsfsrsResponseStatus = lens _cnfsfsrsResponseStatus (\ s a -> s{_cnfsfsrsResponseStatus = a})--instance NFData CreateNFSFileShareResponse where
− gen/Network/AWS/StorageGateway/CreateSnapshot.hs
@@ -1,178 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.CreateSnapshot--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Initiates a snapshot of a volume.--------- AWS Storage Gateway provides the ability to back up point-in-time snapshots of your data to Amazon Simple Storage (S3) for durable off-site recovery, as well as import the data to an Amazon Elastic Block Store (EBS) volume in Amazon Elastic Compute Cloud (EC2). You can take snapshots of your gateway volume on a scheduled or ad-hoc basis. This API enables you to take ad-hoc snapshot. For more information, see <http://docs.aws.amazon.com/storagegateway/latest/userguide/managing-volumes.html#SchedulingSnapshot Editing a Snapshot Schedule> .------ In the CreateSnapshot request you identify the volume by providing its Amazon Resource Name (ARN). You must also provide description for the snapshot. When AWS Storage Gateway takes the snapshot of specified volume, the snapshot and description appears in the AWS Storage Gateway Console. In response, AWS Storage Gateway returns you a snapshot ID. You can use this snapshot ID to check the snapshot progress or later use it when you want to create a volume from a snapshot. This operation is only supported in stored and cached volume gateway type.------ /Important:/ Volume and snapshot IDs are changing to a longer length ID format. For more information, see the important note on the <http://docs.aws.amazon.com/storagegateway/latest/APIReference/Welcome.html Welcome> page.----module Network.AWS.StorageGateway.CreateSnapshot- (- -- * Creating a Request- createSnapshot- , CreateSnapshot- -- * Request Lenses- , csVolumeARN- , csSnapshotDescription-- -- * Destructuring the Response- , createSnapshotResponse- , CreateSnapshotResponse- -- * Response Lenses- , csrsVolumeARN- , csrsSnapshotId- , csrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | A JSON object containing one or more of the following fields:--------- * 'CreateSnapshotInput$SnapshotDescription'------ * 'CreateSnapshotInput$VolumeARN'--------------- /See:/ 'createSnapshot' smart constructor.-data CreateSnapshot = CreateSnapshot'- { _csVolumeARN :: !Text- , _csSnapshotDescription :: !Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'CreateSnapshot' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'csVolumeARN' - The Amazon Resource Name (ARN) of the volume. Use the 'ListVolumes' operation to return a list of gateway volumes.------ * 'csSnapshotDescription' - Textual description of the snapshot that appears in the Amazon EC2 console, Elastic Block Store snapshots panel in the __Description__ field, and in the AWS Storage Gateway snapshot __Details__ pane, __Description__ field-createSnapshot- :: Text -- ^ 'csVolumeARN'- -> Text -- ^ 'csSnapshotDescription'- -> CreateSnapshot-createSnapshot pVolumeARN_ pSnapshotDescription_ =- CreateSnapshot'- {_csVolumeARN = pVolumeARN_, _csSnapshotDescription = pSnapshotDescription_}----- | The Amazon Resource Name (ARN) of the volume. Use the 'ListVolumes' operation to return a list of gateway volumes.-csVolumeARN :: Lens' CreateSnapshot Text-csVolumeARN = lens _csVolumeARN (\ s a -> s{_csVolumeARN = a})---- | Textual description of the snapshot that appears in the Amazon EC2 console, Elastic Block Store snapshots panel in the __Description__ field, and in the AWS Storage Gateway snapshot __Details__ pane, __Description__ field-csSnapshotDescription :: Lens' CreateSnapshot Text-csSnapshotDescription = lens _csSnapshotDescription (\ s a -> s{_csSnapshotDescription = a})--instance AWSRequest CreateSnapshot where- type Rs CreateSnapshot = CreateSnapshotResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- CreateSnapshotResponse' <$>- (x .?> "VolumeARN") <*> (x .?> "SnapshotId") <*>- (pure (fromEnum s)))--instance Hashable CreateSnapshot where--instance NFData CreateSnapshot where--instance ToHeaders CreateSnapshot where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.CreateSnapshot" ::- ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON CreateSnapshot where- toJSON CreateSnapshot'{..}- = object- (catMaybes- [Just ("VolumeARN" .= _csVolumeARN),- Just- ("SnapshotDescription" .= _csSnapshotDescription)])--instance ToPath CreateSnapshot where- toPath = const "/"--instance ToQuery CreateSnapshot where- toQuery = const mempty---- | A JSON object containing the following fields:------------ /See:/ 'createSnapshotResponse' smart constructor.-data CreateSnapshotResponse = CreateSnapshotResponse'- { _csrsVolumeARN :: !(Maybe Text)- , _csrsSnapshotId :: !(Maybe Text)- , _csrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'CreateSnapshotResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'csrsVolumeARN' - The Amazon Resource Name (ARN) of the volume of which the snapshot was taken.------ * 'csrsSnapshotId' - The snapshot ID that is used to refer to the snapshot in future operations such as describing snapshots (Amazon Elastic Compute Cloud API @DescribeSnapshots@ ) or creating a volume from a snapshot ('CreateStorediSCSIVolume' ).------ * 'csrsResponseStatus' - -- | The response status code.-createSnapshotResponse- :: Int -- ^ 'csrsResponseStatus'- -> CreateSnapshotResponse-createSnapshotResponse pResponseStatus_ =- CreateSnapshotResponse'- { _csrsVolumeARN = Nothing- , _csrsSnapshotId = Nothing- , _csrsResponseStatus = pResponseStatus_- }----- | The Amazon Resource Name (ARN) of the volume of which the snapshot was taken.-csrsVolumeARN :: Lens' CreateSnapshotResponse (Maybe Text)-csrsVolumeARN = lens _csrsVolumeARN (\ s a -> s{_csrsVolumeARN = a})---- | The snapshot ID that is used to refer to the snapshot in future operations such as describing snapshots (Amazon Elastic Compute Cloud API @DescribeSnapshots@ ) or creating a volume from a snapshot ('CreateStorediSCSIVolume' ).-csrsSnapshotId :: Lens' CreateSnapshotResponse (Maybe Text)-csrsSnapshotId = lens _csrsSnapshotId (\ s a -> s{_csrsSnapshotId = a})---- | -- | The response status code.-csrsResponseStatus :: Lens' CreateSnapshotResponse Int-csrsResponseStatus = lens _csrsResponseStatus (\ s a -> s{_csrsResponseStatus = a})--instance NFData CreateSnapshotResponse where
− gen/Network/AWS/StorageGateway/CreateSnapshotFromVolumeRecoveryPoint.hs
@@ -1,190 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Initiates a snapshot of a gateway from a volume recovery point. This operation is only supported in the cached volume gateway type.--------- A volume recovery point is a point in time at which all data of the volume is consistent and from which you can create a snapshot. To get a list of volume recovery point for cached volume gateway, use 'ListVolumeRecoveryPoints' .------ In the @CreateSnapshotFromVolumeRecoveryPoint@ request, you identify the volume by providing its Amazon Resource Name (ARN). You must also provide a description for the snapshot. When the gateway takes a snapshot of the specified volume, the snapshot and its description appear in the AWS Storage Gateway console. In response, the gateway returns you a snapshot ID. You can use this snapshot ID to check the snapshot progress or later use it when you want to create a volume from a snapshot.----module Network.AWS.StorageGateway.CreateSnapshotFromVolumeRecoveryPoint- (- -- * Creating a Request- createSnapshotFromVolumeRecoveryPoint- , CreateSnapshotFromVolumeRecoveryPoint- -- * Request Lenses- , csfvrpVolumeARN- , csfvrpSnapshotDescription-- -- * Destructuring the Response- , createSnapshotFromVolumeRecoveryPointResponse- , CreateSnapshotFromVolumeRecoveryPointResponse- -- * Response Lenses- , csfvrprsVolumeRecoveryPointTime- , csfvrprsVolumeARN- , csfvrprsSnapshotId- , csfvrprsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | /See:/ 'createSnapshotFromVolumeRecoveryPoint' smart constructor.-data CreateSnapshotFromVolumeRecoveryPoint = CreateSnapshotFromVolumeRecoveryPoint'- { _csfvrpVolumeARN :: !Text- , _csfvrpSnapshotDescription :: !Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'CreateSnapshotFromVolumeRecoveryPoint' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'csfvrpVolumeARN' - Undocumented member.------ * 'csfvrpSnapshotDescription' - Undocumented member.-createSnapshotFromVolumeRecoveryPoint- :: Text -- ^ 'csfvrpVolumeARN'- -> Text -- ^ 'csfvrpSnapshotDescription'- -> CreateSnapshotFromVolumeRecoveryPoint-createSnapshotFromVolumeRecoveryPoint pVolumeARN_ pSnapshotDescription_ =- CreateSnapshotFromVolumeRecoveryPoint'- { _csfvrpVolumeARN = pVolumeARN_- , _csfvrpSnapshotDescription = pSnapshotDescription_- }----- | Undocumented member.-csfvrpVolumeARN :: Lens' CreateSnapshotFromVolumeRecoveryPoint Text-csfvrpVolumeARN = lens _csfvrpVolumeARN (\ s a -> s{_csfvrpVolumeARN = a})---- | Undocumented member.-csfvrpSnapshotDescription :: Lens' CreateSnapshotFromVolumeRecoveryPoint Text-csfvrpSnapshotDescription = lens _csfvrpSnapshotDescription (\ s a -> s{_csfvrpSnapshotDescription = a})--instance AWSRequest- CreateSnapshotFromVolumeRecoveryPoint- where- type Rs CreateSnapshotFromVolumeRecoveryPoint =- CreateSnapshotFromVolumeRecoveryPointResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- CreateSnapshotFromVolumeRecoveryPointResponse' <$>- (x .?> "VolumeRecoveryPointTime") <*>- (x .?> "VolumeARN")- <*> (x .?> "SnapshotId")- <*> (pure (fromEnum s)))--instance Hashable- CreateSnapshotFromVolumeRecoveryPoint- where--instance NFData CreateSnapshotFromVolumeRecoveryPoint- where--instance ToHeaders- CreateSnapshotFromVolumeRecoveryPoint- where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.CreateSnapshotFromVolumeRecoveryPoint"- :: ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON CreateSnapshotFromVolumeRecoveryPoint- where- toJSON CreateSnapshotFromVolumeRecoveryPoint'{..}- = object- (catMaybes- [Just ("VolumeARN" .= _csfvrpVolumeARN),- Just- ("SnapshotDescription" .=- _csfvrpSnapshotDescription)])--instance ToPath CreateSnapshotFromVolumeRecoveryPoint- where- toPath = const "/"--instance ToQuery- CreateSnapshotFromVolumeRecoveryPoint- where- toQuery = const mempty---- | /See:/ 'createSnapshotFromVolumeRecoveryPointResponse' smart constructor.-data CreateSnapshotFromVolumeRecoveryPointResponse = CreateSnapshotFromVolumeRecoveryPointResponse'- { _csfvrprsVolumeRecoveryPointTime :: !(Maybe Text)- , _csfvrprsVolumeARN :: !(Maybe Text)- , _csfvrprsSnapshotId :: !(Maybe Text)- , _csfvrprsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'CreateSnapshotFromVolumeRecoveryPointResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'csfvrprsVolumeRecoveryPointTime' - Undocumented member.------ * 'csfvrprsVolumeARN' - Undocumented member.------ * 'csfvrprsSnapshotId' - Undocumented member.------ * 'csfvrprsResponseStatus' - -- | The response status code.-createSnapshotFromVolumeRecoveryPointResponse- :: Int -- ^ 'csfvrprsResponseStatus'- -> CreateSnapshotFromVolumeRecoveryPointResponse-createSnapshotFromVolumeRecoveryPointResponse pResponseStatus_ =- CreateSnapshotFromVolumeRecoveryPointResponse'- { _csfvrprsVolumeRecoveryPointTime = Nothing- , _csfvrprsVolumeARN = Nothing- , _csfvrprsSnapshotId = Nothing- , _csfvrprsResponseStatus = pResponseStatus_- }----- | Undocumented member.-csfvrprsVolumeRecoveryPointTime :: Lens' CreateSnapshotFromVolumeRecoveryPointResponse (Maybe Text)-csfvrprsVolumeRecoveryPointTime = lens _csfvrprsVolumeRecoveryPointTime (\ s a -> s{_csfvrprsVolumeRecoveryPointTime = a})---- | Undocumented member.-csfvrprsVolumeARN :: Lens' CreateSnapshotFromVolumeRecoveryPointResponse (Maybe Text)-csfvrprsVolumeARN = lens _csfvrprsVolumeARN (\ s a -> s{_csfvrprsVolumeARN = a})---- | Undocumented member.-csfvrprsSnapshotId :: Lens' CreateSnapshotFromVolumeRecoveryPointResponse (Maybe Text)-csfvrprsSnapshotId = lens _csfvrprsSnapshotId (\ s a -> s{_csfvrprsSnapshotId = a})---- | -- | The response status code.-csfvrprsResponseStatus :: Lens' CreateSnapshotFromVolumeRecoveryPointResponse Int-csfvrprsResponseStatus = lens _csfvrprsResponseStatus (\ s a -> s{_csfvrprsResponseStatus = a})--instance NFData- CreateSnapshotFromVolumeRecoveryPointResponse- where
− gen/Network/AWS/StorageGateway/CreateStorediSCSIVolume.hs
@@ -1,241 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.CreateStorediSCSIVolume--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Creates a volume on a specified gateway. This operation is only supported in the stored volume gateway type.--------- The size of the volume to create is inferred from the disk size. You can choose to preserve existing data on the disk, create volume from an existing snapshot, or create an empty volume. If you choose to create an empty gateway volume, then any existing data on the disk is erased.------ In the request you must specify the gateway and the disk information on which you are creating the volume. In response, the gateway creates the volume and returns volume information such as the volume Amazon Resource Name (ARN), its size, and the iSCSI target ARN that initiators can use to connect to the volume target.----module Network.AWS.StorageGateway.CreateStorediSCSIVolume- (- -- * Creating a Request- createStorediSCSIVolume- , CreateStorediSCSIVolume- -- * Request Lenses- , csscsivSnapshotId- , csscsivGatewayARN- , csscsivDiskId- , csscsivPreserveExistingData- , csscsivTargetName- , csscsivNetworkInterfaceId-- -- * Destructuring the Response- , createStorediSCSIVolumeResponse- , CreateStorediSCSIVolumeResponse- -- * Response Lenses- , csscsivrsTargetARN- , csscsivrsVolumeARN- , csscsivrsVolumeSizeInBytes- , csscsivrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | A JSON object containing one or more of the following fields:--------- * 'CreateStorediSCSIVolumeInput$DiskId'------ * 'CreateStorediSCSIVolumeInput$NetworkInterfaceId'------ * 'CreateStorediSCSIVolumeInput$PreserveExistingData'------ * 'CreateStorediSCSIVolumeInput$SnapshotId'------ * 'CreateStorediSCSIVolumeInput$TargetName'--------------- /See:/ 'createStorediSCSIVolume' smart constructor.-data CreateStorediSCSIVolume = CreateStorediSCSIVolume'- { _csscsivSnapshotId :: !(Maybe Text)- , _csscsivGatewayARN :: !Text- , _csscsivDiskId :: !Text- , _csscsivPreserveExistingData :: !Bool- , _csscsivTargetName :: !Text- , _csscsivNetworkInterfaceId :: !Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'CreateStorediSCSIVolume' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'csscsivSnapshotId' - The snapshot ID (e.g. "snap-1122aabb") of the snapshot to restore as the new stored volume. Specify this field if you want to create the iSCSI storage volume from a snapshot otherwise do not include this field. To list snapshots for your account use <http://docs.aws.amazon.com/AWSEC2/latest/APIReference/ApiReference-query-DescribeSnapshots.html DescribeSnapshots> in the /Amazon Elastic Compute Cloud API Reference/ .------ * 'csscsivGatewayARN' - Undocumented member.------ * 'csscsivDiskId' - The unique identifier for the gateway local disk that is configured as a stored volume. Use <http://docs.aws.amazon.com/storagegateway/latest/userguide/API_ListLocalDisks.html ListLocalDisks> to list disk IDs for a gateway.------ * 'csscsivPreserveExistingData' - Specify this field as true if you want to preserve the data on the local disk. Otherwise, specifying this field as false creates an empty volume. Valid Values: true, false------ * 'csscsivTargetName' - The name of the iSCSI target used by initiators to connect to the target and as a suffix for the target ARN. For example, specifying @TargetName@ as /myvolume/ results in the target ARN of arn:aws:storagegateway:us-east-2:111122223333:gateway/sgw-12A3456B/target/iqn.1997-05.com.amazon:myvolume. The target name must be unique across all volumes of a gateway.------ * 'csscsivNetworkInterfaceId' - The network interface of the gateway on which to expose the iSCSI target. Only IPv4 addresses are accepted. Use 'DescribeGatewayInformation' to get a list of the network interfaces available on a gateway. Valid Values: A valid IP address.-createStorediSCSIVolume- :: Text -- ^ 'csscsivGatewayARN'- -> Text -- ^ 'csscsivDiskId'- -> Bool -- ^ 'csscsivPreserveExistingData'- -> Text -- ^ 'csscsivTargetName'- -> Text -- ^ 'csscsivNetworkInterfaceId'- -> CreateStorediSCSIVolume-createStorediSCSIVolume pGatewayARN_ pDiskId_ pPreserveExistingData_ pTargetName_ pNetworkInterfaceId_ =- CreateStorediSCSIVolume'- { _csscsivSnapshotId = Nothing- , _csscsivGatewayARN = pGatewayARN_- , _csscsivDiskId = pDiskId_- , _csscsivPreserveExistingData = pPreserveExistingData_- , _csscsivTargetName = pTargetName_- , _csscsivNetworkInterfaceId = pNetworkInterfaceId_- }----- | The snapshot ID (e.g. "snap-1122aabb") of the snapshot to restore as the new stored volume. Specify this field if you want to create the iSCSI storage volume from a snapshot otherwise do not include this field. To list snapshots for your account use <http://docs.aws.amazon.com/AWSEC2/latest/APIReference/ApiReference-query-DescribeSnapshots.html DescribeSnapshots> in the /Amazon Elastic Compute Cloud API Reference/ .-csscsivSnapshotId :: Lens' CreateStorediSCSIVolume (Maybe Text)-csscsivSnapshotId = lens _csscsivSnapshotId (\ s a -> s{_csscsivSnapshotId = a})---- | Undocumented member.-csscsivGatewayARN :: Lens' CreateStorediSCSIVolume Text-csscsivGatewayARN = lens _csscsivGatewayARN (\ s a -> s{_csscsivGatewayARN = a})---- | The unique identifier for the gateway local disk that is configured as a stored volume. Use <http://docs.aws.amazon.com/storagegateway/latest/userguide/API_ListLocalDisks.html ListLocalDisks> to list disk IDs for a gateway.-csscsivDiskId :: Lens' CreateStorediSCSIVolume Text-csscsivDiskId = lens _csscsivDiskId (\ s a -> s{_csscsivDiskId = a})---- | Specify this field as true if you want to preserve the data on the local disk. Otherwise, specifying this field as false creates an empty volume. Valid Values: true, false-csscsivPreserveExistingData :: Lens' CreateStorediSCSIVolume Bool-csscsivPreserveExistingData = lens _csscsivPreserveExistingData (\ s a -> s{_csscsivPreserveExistingData = a})---- | The name of the iSCSI target used by initiators to connect to the target and as a suffix for the target ARN. For example, specifying @TargetName@ as /myvolume/ results in the target ARN of arn:aws:storagegateway:us-east-2:111122223333:gateway/sgw-12A3456B/target/iqn.1997-05.com.amazon:myvolume. The target name must be unique across all volumes of a gateway.-csscsivTargetName :: Lens' CreateStorediSCSIVolume Text-csscsivTargetName = lens _csscsivTargetName (\ s a -> s{_csscsivTargetName = a})---- | The network interface of the gateway on which to expose the iSCSI target. Only IPv4 addresses are accepted. Use 'DescribeGatewayInformation' to get a list of the network interfaces available on a gateway. Valid Values: A valid IP address.-csscsivNetworkInterfaceId :: Lens' CreateStorediSCSIVolume Text-csscsivNetworkInterfaceId = lens _csscsivNetworkInterfaceId (\ s a -> s{_csscsivNetworkInterfaceId = a})--instance AWSRequest CreateStorediSCSIVolume where- type Rs CreateStorediSCSIVolume =- CreateStorediSCSIVolumeResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- CreateStorediSCSIVolumeResponse' <$>- (x .?> "TargetARN") <*> (x .?> "VolumeARN") <*>- (x .?> "VolumeSizeInBytes")- <*> (pure (fromEnum s)))--instance Hashable CreateStorediSCSIVolume where--instance NFData CreateStorediSCSIVolume where--instance ToHeaders CreateStorediSCSIVolume where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.CreateStorediSCSIVolume" ::- ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON CreateStorediSCSIVolume where- toJSON CreateStorediSCSIVolume'{..}- = object- (catMaybes- [("SnapshotId" .=) <$> _csscsivSnapshotId,- Just ("GatewayARN" .= _csscsivGatewayARN),- Just ("DiskId" .= _csscsivDiskId),- Just- ("PreserveExistingData" .=- _csscsivPreserveExistingData),- Just ("TargetName" .= _csscsivTargetName),- Just- ("NetworkInterfaceId" .=- _csscsivNetworkInterfaceId)])--instance ToPath CreateStorediSCSIVolume where- toPath = const "/"--instance ToQuery CreateStorediSCSIVolume where- toQuery = const mempty---- | A JSON object containing the following fields:------------ /See:/ 'createStorediSCSIVolumeResponse' smart constructor.-data CreateStorediSCSIVolumeResponse = CreateStorediSCSIVolumeResponse'- { _csscsivrsTargetARN :: !(Maybe Text)- , _csscsivrsVolumeARN :: !(Maybe Text)- , _csscsivrsVolumeSizeInBytes :: !(Maybe Integer)- , _csscsivrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'CreateStorediSCSIVolumeResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'csscsivrsTargetARN' - he Amazon Resource Name (ARN) of the volume target that includes the iSCSI name that initiators can use to connect to the target.------ * 'csscsivrsVolumeARN' - The Amazon Resource Name (ARN) of the configured volume.------ * 'csscsivrsVolumeSizeInBytes' - The size of the volume in bytes.------ * 'csscsivrsResponseStatus' - -- | The response status code.-createStorediSCSIVolumeResponse- :: Int -- ^ 'csscsivrsResponseStatus'- -> CreateStorediSCSIVolumeResponse-createStorediSCSIVolumeResponse pResponseStatus_ =- CreateStorediSCSIVolumeResponse'- { _csscsivrsTargetARN = Nothing- , _csscsivrsVolumeARN = Nothing- , _csscsivrsVolumeSizeInBytes = Nothing- , _csscsivrsResponseStatus = pResponseStatus_- }----- | he Amazon Resource Name (ARN) of the volume target that includes the iSCSI name that initiators can use to connect to the target.-csscsivrsTargetARN :: Lens' CreateStorediSCSIVolumeResponse (Maybe Text)-csscsivrsTargetARN = lens _csscsivrsTargetARN (\ s a -> s{_csscsivrsTargetARN = a})---- | The Amazon Resource Name (ARN) of the configured volume.-csscsivrsVolumeARN :: Lens' CreateStorediSCSIVolumeResponse (Maybe Text)-csscsivrsVolumeARN = lens _csscsivrsVolumeARN (\ s a -> s{_csscsivrsVolumeARN = a})---- | The size of the volume in bytes.-csscsivrsVolumeSizeInBytes :: Lens' CreateStorediSCSIVolumeResponse (Maybe Integer)-csscsivrsVolumeSizeInBytes = lens _csscsivrsVolumeSizeInBytes (\ s a -> s{_csscsivrsVolumeSizeInBytes = a})---- | -- | The response status code.-csscsivrsResponseStatus :: Lens' CreateStorediSCSIVolumeResponse Int-csscsivrsResponseStatus = lens _csscsivrsResponseStatus (\ s a -> s{_csscsivrsResponseStatus = a})--instance NFData CreateStorediSCSIVolumeResponse where
− gen/Network/AWS/StorageGateway/CreateTapeWithBarcode.hs
@@ -1,167 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.CreateTapeWithBarcode--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Creates a virtual tape by using your own barcode. You write data to the virtual tape and then archive the tape. A barcode is unique and can not be reused if it has already been used on a tape . This applies to barcodes used on deleted tapes. This operation is only supported in the tape gateway type.-------module Network.AWS.StorageGateway.CreateTapeWithBarcode- (- -- * Creating a Request- createTapeWithBarcode- , CreateTapeWithBarcode- -- * Request Lenses- , ctwbGatewayARN- , ctwbTapeSizeInBytes- , ctwbTapeBarcode-- -- * Destructuring the Response- , createTapeWithBarcodeResponse- , CreateTapeWithBarcodeResponse- -- * Response Lenses- , ctwbrsTapeARN- , ctwbrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | CreateTapeWithBarcodeInput------------ /See:/ 'createTapeWithBarcode' smart constructor.-data CreateTapeWithBarcode = CreateTapeWithBarcode'- { _ctwbGatewayARN :: !Text- , _ctwbTapeSizeInBytes :: !Integer- , _ctwbTapeBarcode :: !Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'CreateTapeWithBarcode' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ctwbGatewayARN' - The unique Amazon Resource Name (ARN) that represents the gateway to associate the virtual tape with. Use the 'ListGateways' operation to return a list of gateways for your account and region.------ * 'ctwbTapeSizeInBytes' - The size, in bytes, of the virtual tape that you want to create.------ * 'ctwbTapeBarcode' - The barcode that you want to assign to the tape.-createTapeWithBarcode- :: Text -- ^ 'ctwbGatewayARN'- -> Integer -- ^ 'ctwbTapeSizeInBytes'- -> Text -- ^ 'ctwbTapeBarcode'- -> CreateTapeWithBarcode-createTapeWithBarcode pGatewayARN_ pTapeSizeInBytes_ pTapeBarcode_ =- CreateTapeWithBarcode'- { _ctwbGatewayARN = pGatewayARN_- , _ctwbTapeSizeInBytes = pTapeSizeInBytes_- , _ctwbTapeBarcode = pTapeBarcode_- }----- | The unique Amazon Resource Name (ARN) that represents the gateway to associate the virtual tape with. Use the 'ListGateways' operation to return a list of gateways for your account and region.-ctwbGatewayARN :: Lens' CreateTapeWithBarcode Text-ctwbGatewayARN = lens _ctwbGatewayARN (\ s a -> s{_ctwbGatewayARN = a})---- | The size, in bytes, of the virtual tape that you want to create.-ctwbTapeSizeInBytes :: Lens' CreateTapeWithBarcode Integer-ctwbTapeSizeInBytes = lens _ctwbTapeSizeInBytes (\ s a -> s{_ctwbTapeSizeInBytes = a})---- | The barcode that you want to assign to the tape.-ctwbTapeBarcode :: Lens' CreateTapeWithBarcode Text-ctwbTapeBarcode = lens _ctwbTapeBarcode (\ s a -> s{_ctwbTapeBarcode = a})--instance AWSRequest CreateTapeWithBarcode where- type Rs CreateTapeWithBarcode =- CreateTapeWithBarcodeResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- CreateTapeWithBarcodeResponse' <$>- (x .?> "TapeARN") <*> (pure (fromEnum s)))--instance Hashable CreateTapeWithBarcode where--instance NFData CreateTapeWithBarcode where--instance ToHeaders CreateTapeWithBarcode where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.CreateTapeWithBarcode" ::- ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON CreateTapeWithBarcode where- toJSON CreateTapeWithBarcode'{..}- = object- (catMaybes- [Just ("GatewayARN" .= _ctwbGatewayARN),- Just ("TapeSizeInBytes" .= _ctwbTapeSizeInBytes),- Just ("TapeBarcode" .= _ctwbTapeBarcode)])--instance ToPath CreateTapeWithBarcode where- toPath = const "/"--instance ToQuery CreateTapeWithBarcode where- toQuery = const mempty---- | CreateTapeOutput------------ /See:/ 'createTapeWithBarcodeResponse' smart constructor.-data CreateTapeWithBarcodeResponse = CreateTapeWithBarcodeResponse'- { _ctwbrsTapeARN :: !(Maybe Text)- , _ctwbrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'CreateTapeWithBarcodeResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ctwbrsTapeARN' - A unique Amazon Resource Name (ARN) that represents the virtual tape that was created.------ * 'ctwbrsResponseStatus' - -- | The response status code.-createTapeWithBarcodeResponse- :: Int -- ^ 'ctwbrsResponseStatus'- -> CreateTapeWithBarcodeResponse-createTapeWithBarcodeResponse pResponseStatus_ =- CreateTapeWithBarcodeResponse'- {_ctwbrsTapeARN = Nothing, _ctwbrsResponseStatus = pResponseStatus_}----- | A unique Amazon Resource Name (ARN) that represents the virtual tape that was created.-ctwbrsTapeARN :: Lens' CreateTapeWithBarcodeResponse (Maybe Text)-ctwbrsTapeARN = lens _ctwbrsTapeARN (\ s a -> s{_ctwbrsTapeARN = a})---- | -- | The response status code.-ctwbrsResponseStatus :: Lens' CreateTapeWithBarcodeResponse Int-ctwbrsResponseStatus = lens _ctwbrsResponseStatus (\ s a -> s{_ctwbrsResponseStatus = a})--instance NFData CreateTapeWithBarcodeResponse where
− gen/Network/AWS/StorageGateway/CreateTapes.hs
@@ -1,189 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.CreateTapes--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Creates one or more virtual tapes. You write data to the virtual tapes and then archive the tapes. This operation is only supported in the tape gateway type.-------module Network.AWS.StorageGateway.CreateTapes- (- -- * Creating a Request- createTapes- , CreateTapes- -- * Request Lenses- , ctGatewayARN- , ctTapeSizeInBytes- , ctClientToken- , ctNumTapesToCreate- , ctTapeBarcodePrefix-- -- * Destructuring the Response- , createTapesResponse- , CreateTapesResponse- -- * Response Lenses- , ctrsTapeARNs- , ctrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | CreateTapesInput------------ /See:/ 'createTapes' smart constructor.-data CreateTapes = CreateTapes'- { _ctGatewayARN :: !Text- , _ctTapeSizeInBytes :: !Integer- , _ctClientToken :: !Text- , _ctNumTapesToCreate :: !Nat- , _ctTapeBarcodePrefix :: !Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'CreateTapes' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ctGatewayARN' - The unique Amazon Resource Name (ARN) that represents the gateway to associate the virtual tapes with. Use the 'ListGateways' operation to return a list of gateways for your account and region.------ * 'ctTapeSizeInBytes' - The size, in bytes, of the virtual tapes that you want to create.------ * 'ctClientToken' - A unique identifier that you use to retry a request. If you retry a request, use the same @ClientToken@ you specified in the initial request.------ * 'ctNumTapesToCreate' - The number of virtual tapes that you want to create.------ * 'ctTapeBarcodePrefix' - A prefix that you append to the barcode of the virtual tape you are creating. This prefix makes the barcode unique.-createTapes- :: Text -- ^ 'ctGatewayARN'- -> Integer -- ^ 'ctTapeSizeInBytes'- -> Text -- ^ 'ctClientToken'- -> Natural -- ^ 'ctNumTapesToCreate'- -> Text -- ^ 'ctTapeBarcodePrefix'- -> CreateTapes-createTapes pGatewayARN_ pTapeSizeInBytes_ pClientToken_ pNumTapesToCreate_ pTapeBarcodePrefix_ =- CreateTapes'- { _ctGatewayARN = pGatewayARN_- , _ctTapeSizeInBytes = pTapeSizeInBytes_- , _ctClientToken = pClientToken_- , _ctNumTapesToCreate = _Nat # pNumTapesToCreate_- , _ctTapeBarcodePrefix = pTapeBarcodePrefix_- }----- | The unique Amazon Resource Name (ARN) that represents the gateway to associate the virtual tapes with. Use the 'ListGateways' operation to return a list of gateways for your account and region.-ctGatewayARN :: Lens' CreateTapes Text-ctGatewayARN = lens _ctGatewayARN (\ s a -> s{_ctGatewayARN = a})---- | The size, in bytes, of the virtual tapes that you want to create.-ctTapeSizeInBytes :: Lens' CreateTapes Integer-ctTapeSizeInBytes = lens _ctTapeSizeInBytes (\ s a -> s{_ctTapeSizeInBytes = a})---- | A unique identifier that you use to retry a request. If you retry a request, use the same @ClientToken@ you specified in the initial request.-ctClientToken :: Lens' CreateTapes Text-ctClientToken = lens _ctClientToken (\ s a -> s{_ctClientToken = a})---- | The number of virtual tapes that you want to create.-ctNumTapesToCreate :: Lens' CreateTapes Natural-ctNumTapesToCreate = lens _ctNumTapesToCreate (\ s a -> s{_ctNumTapesToCreate = a}) . _Nat---- | A prefix that you append to the barcode of the virtual tape you are creating. This prefix makes the barcode unique.-ctTapeBarcodePrefix :: Lens' CreateTapes Text-ctTapeBarcodePrefix = lens _ctTapeBarcodePrefix (\ s a -> s{_ctTapeBarcodePrefix = a})--instance AWSRequest CreateTapes where- type Rs CreateTapes = CreateTapesResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- CreateTapesResponse' <$>- (x .?> "TapeARNs" .!@ mempty) <*>- (pure (fromEnum s)))--instance Hashable CreateTapes where--instance NFData CreateTapes where--instance ToHeaders CreateTapes where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.CreateTapes" ::- ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON CreateTapes where- toJSON CreateTapes'{..}- = object- (catMaybes- [Just ("GatewayARN" .= _ctGatewayARN),- Just ("TapeSizeInBytes" .= _ctTapeSizeInBytes),- Just ("ClientToken" .= _ctClientToken),- Just ("NumTapesToCreate" .= _ctNumTapesToCreate),- Just ("TapeBarcodePrefix" .= _ctTapeBarcodePrefix)])--instance ToPath CreateTapes where- toPath = const "/"--instance ToQuery CreateTapes where- toQuery = const mempty---- | CreateTapeOutput------------ /See:/ 'createTapesResponse' smart constructor.-data CreateTapesResponse = CreateTapesResponse'- { _ctrsTapeARNs :: !(Maybe [Text])- , _ctrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'CreateTapesResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ctrsTapeARNs' - A list of unique Amazon Resource Names (ARNs) that represents the virtual tapes that were created.------ * 'ctrsResponseStatus' - -- | The response status code.-createTapesResponse- :: Int -- ^ 'ctrsResponseStatus'- -> CreateTapesResponse-createTapesResponse pResponseStatus_ =- CreateTapesResponse'- {_ctrsTapeARNs = Nothing, _ctrsResponseStatus = pResponseStatus_}----- | A list of unique Amazon Resource Names (ARNs) that represents the virtual tapes that were created.-ctrsTapeARNs :: Lens' CreateTapesResponse [Text]-ctrsTapeARNs = lens _ctrsTapeARNs (\ s a -> s{_ctrsTapeARNs = a}) . _Default . _Coerce---- | -- | The response status code.-ctrsResponseStatus :: Lens' CreateTapesResponse Int-ctrsResponseStatus = lens _ctrsResponseStatus (\ s a -> s{_ctrsResponseStatus = a})--instance NFData CreateTapesResponse where
− gen/Network/AWS/StorageGateway/DeleteBandwidthRateLimit.hs
@@ -1,159 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.DeleteBandwidthRateLimit--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Deletes the bandwidth rate limits of a gateway. You can delete either the upload and download bandwidth rate limit, or you can delete both. If you delete only one of the limits, the other limit remains unchanged. To specify which gateway to work with, use the Amazon Resource Name (ARN) of the gateway in your request.-------module Network.AWS.StorageGateway.DeleteBandwidthRateLimit- (- -- * Creating a Request- deleteBandwidthRateLimit- , DeleteBandwidthRateLimit- -- * Request Lenses- , dbrlbGatewayARN- , dbrlbBandwidthType-- -- * Destructuring the Response- , deleteBandwidthRateLimitResponse- , DeleteBandwidthRateLimitResponse- -- * Response Lenses- , delrsGatewayARN- , delrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | A JSON object containing the following fields:--------- * 'DeleteBandwidthRateLimitInput$BandwidthType'--------------- /See:/ 'deleteBandwidthRateLimit' smart constructor.-data DeleteBandwidthRateLimit = DeleteBandwidthRateLimit'- { _dbrlbGatewayARN :: !Text- , _dbrlbBandwidthType :: !Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DeleteBandwidthRateLimit' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dbrlbGatewayARN' - Undocumented member.------ * 'dbrlbBandwidthType' - One of the BandwidthType values that indicates the gateway bandwidth rate limit to delete. Valid Values: @Upload@ , @Download@ , @All@ .-deleteBandwidthRateLimit- :: Text -- ^ 'dbrlbGatewayARN'- -> Text -- ^ 'dbrlbBandwidthType'- -> DeleteBandwidthRateLimit-deleteBandwidthRateLimit pGatewayARN_ pBandwidthType_ =- DeleteBandwidthRateLimit'- {_dbrlbGatewayARN = pGatewayARN_, _dbrlbBandwidthType = pBandwidthType_}----- | Undocumented member.-dbrlbGatewayARN :: Lens' DeleteBandwidthRateLimit Text-dbrlbGatewayARN = lens _dbrlbGatewayARN (\ s a -> s{_dbrlbGatewayARN = a})---- | One of the BandwidthType values that indicates the gateway bandwidth rate limit to delete. Valid Values: @Upload@ , @Download@ , @All@ .-dbrlbBandwidthType :: Lens' DeleteBandwidthRateLimit Text-dbrlbBandwidthType = lens _dbrlbBandwidthType (\ s a -> s{_dbrlbBandwidthType = a})--instance AWSRequest DeleteBandwidthRateLimit where- type Rs DeleteBandwidthRateLimit =- DeleteBandwidthRateLimitResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- DeleteBandwidthRateLimitResponse' <$>- (x .?> "GatewayARN") <*> (pure (fromEnum s)))--instance Hashable DeleteBandwidthRateLimit where--instance NFData DeleteBandwidthRateLimit where--instance ToHeaders DeleteBandwidthRateLimit where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.DeleteBandwidthRateLimit"- :: ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON DeleteBandwidthRateLimit where- toJSON DeleteBandwidthRateLimit'{..}- = object- (catMaybes- [Just ("GatewayARN" .= _dbrlbGatewayARN),- Just ("BandwidthType" .= _dbrlbBandwidthType)])--instance ToPath DeleteBandwidthRateLimit where- toPath = const "/"--instance ToQuery DeleteBandwidthRateLimit where- toQuery = const mempty---- | A JSON object containing the of the gateway whose bandwidth rate information was deleted.------------ /See:/ 'deleteBandwidthRateLimitResponse' smart constructor.-data DeleteBandwidthRateLimitResponse = DeleteBandwidthRateLimitResponse'- { _delrsGatewayARN :: !(Maybe Text)- , _delrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DeleteBandwidthRateLimitResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'delrsGatewayARN' - Undocumented member.------ * 'delrsResponseStatus' - -- | The response status code.-deleteBandwidthRateLimitResponse- :: Int -- ^ 'delrsResponseStatus'- -> DeleteBandwidthRateLimitResponse-deleteBandwidthRateLimitResponse pResponseStatus_ =- DeleteBandwidthRateLimitResponse'- {_delrsGatewayARN = Nothing, _delrsResponseStatus = pResponseStatus_}----- | Undocumented member.-delrsGatewayARN :: Lens' DeleteBandwidthRateLimitResponse (Maybe Text)-delrsGatewayARN = lens _delrsGatewayARN (\ s a -> s{_delrsGatewayARN = a})---- | -- | The response status code.-delrsResponseStatus :: Lens' DeleteBandwidthRateLimitResponse Int-delrsResponseStatus = lens _delrsResponseStatus (\ s a -> s{_delrsResponseStatus = a})--instance NFData DeleteBandwidthRateLimitResponse- where
− gen/Network/AWS/StorageGateway/DeleteChapCredentials.hs
@@ -1,172 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.DeleteChapCredentials--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Deletes Challenge-Handshake Authentication Protocol (CHAP) credentials for a specified iSCSI target and initiator pair.-------module Network.AWS.StorageGateway.DeleteChapCredentials- (- -- * Creating a Request- deleteChapCredentials- , DeleteChapCredentials- -- * Request Lenses- , dTargetARN- , dInitiatorName-- -- * Destructuring the Response- , deleteChapCredentialsResponse- , DeleteChapCredentialsResponse- -- * Response Lenses- , drsTargetARN- , drsInitiatorName- , drsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | A JSON object containing one or more of the following fields:--------- * 'DeleteChapCredentialsInput$InitiatorName'------ * 'DeleteChapCredentialsInput$TargetARN'--------------- /See:/ 'deleteChapCredentials' smart constructor.-data DeleteChapCredentials = DeleteChapCredentials'- { _dTargetARN :: !Text- , _dInitiatorName :: !Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DeleteChapCredentials' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dTargetARN' - The Amazon Resource Name (ARN) of the iSCSI volume target. Use the 'DescribeStorediSCSIVolumes' operation to return to retrieve the TargetARN for specified VolumeARN.------ * 'dInitiatorName' - The iSCSI initiator that connects to the target.-deleteChapCredentials- :: Text -- ^ 'dTargetARN'- -> Text -- ^ 'dInitiatorName'- -> DeleteChapCredentials-deleteChapCredentials pTargetARN_ pInitiatorName_ =- DeleteChapCredentials'- {_dTargetARN = pTargetARN_, _dInitiatorName = pInitiatorName_}----- | The Amazon Resource Name (ARN) of the iSCSI volume target. Use the 'DescribeStorediSCSIVolumes' operation to return to retrieve the TargetARN for specified VolumeARN.-dTargetARN :: Lens' DeleteChapCredentials Text-dTargetARN = lens _dTargetARN (\ s a -> s{_dTargetARN = a})---- | The iSCSI initiator that connects to the target.-dInitiatorName :: Lens' DeleteChapCredentials Text-dInitiatorName = lens _dInitiatorName (\ s a -> s{_dInitiatorName = a})--instance AWSRequest DeleteChapCredentials where- type Rs DeleteChapCredentials =- DeleteChapCredentialsResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- DeleteChapCredentialsResponse' <$>- (x .?> "TargetARN") <*> (x .?> "InitiatorName") <*>- (pure (fromEnum s)))--instance Hashable DeleteChapCredentials where--instance NFData DeleteChapCredentials where--instance ToHeaders DeleteChapCredentials where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.DeleteChapCredentials" ::- ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON DeleteChapCredentials where- toJSON DeleteChapCredentials'{..}- = object- (catMaybes- [Just ("TargetARN" .= _dTargetARN),- Just ("InitiatorName" .= _dInitiatorName)])--instance ToPath DeleteChapCredentials where- toPath = const "/"--instance ToQuery DeleteChapCredentials where- toQuery = const mempty---- | A JSON object containing the following fields:------------ /See:/ 'deleteChapCredentialsResponse' smart constructor.-data DeleteChapCredentialsResponse = DeleteChapCredentialsResponse'- { _drsTargetARN :: !(Maybe Text)- , _drsInitiatorName :: !(Maybe Text)- , _drsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DeleteChapCredentialsResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'drsTargetARN' - The Amazon Resource Name (ARN) of the target.------ * 'drsInitiatorName' - The iSCSI initiator that connects to the target.------ * 'drsResponseStatus' - -- | The response status code.-deleteChapCredentialsResponse- :: Int -- ^ 'drsResponseStatus'- -> DeleteChapCredentialsResponse-deleteChapCredentialsResponse pResponseStatus_ =- DeleteChapCredentialsResponse'- { _drsTargetARN = Nothing- , _drsInitiatorName = Nothing- , _drsResponseStatus = pResponseStatus_- }----- | The Amazon Resource Name (ARN) of the target.-drsTargetARN :: Lens' DeleteChapCredentialsResponse (Maybe Text)-drsTargetARN = lens _drsTargetARN (\ s a -> s{_drsTargetARN = a})---- | The iSCSI initiator that connects to the target.-drsInitiatorName :: Lens' DeleteChapCredentialsResponse (Maybe Text)-drsInitiatorName = lens _drsInitiatorName (\ s a -> s{_drsInitiatorName = a})---- | -- | The response status code.-drsResponseStatus :: Lens' DeleteChapCredentialsResponse Int-drsResponseStatus = lens _drsResponseStatus (\ s a -> s{_drsResponseStatus = a})--instance NFData DeleteChapCredentialsResponse where
@@ -1,152 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.DeleteFileShare--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Deletes a file share from a file gateway. This operation is only supported in the file gateway type.-------module Network.AWS.StorageGateway.DeleteFileShare- (- -- * Creating a Request- deleteFileShare- , DeleteFileShare- -- * Request Lenses- , dfsForceDelete- , dfsFileShareARN-- -- * Destructuring the Response- , deleteFileShareResponse- , DeleteFileShareResponse- -- * Response Lenses- , dfsrsFileShareARN- , dfsrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | DeleteFileShareInput------------ /See:/ 'deleteFileShare' smart constructor.-data DeleteFileShare = DeleteFileShare'- { _dfsForceDelete :: !(Maybe Bool)- , _dfsFileShareARN :: !Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DeleteFileShare' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dfsForceDelete' - If this value is set to true, the operation deletes a file share immediately and aborts all data uploads to AWS. Otherwise, the file share is not deleted until all data is uploaded to AWS. This process aborts the data upload process, and the file share enters the FORCE_DELETING status.------ * 'dfsFileShareARN' - The Amazon Resource Name (ARN) of the file share to be deleted.-deleteFileShare- :: Text -- ^ 'dfsFileShareARN'- -> DeleteFileShare-deleteFileShare pFileShareARN_ =- DeleteFileShare'- {_dfsForceDelete = Nothing, _dfsFileShareARN = pFileShareARN_}----- | If this value is set to true, the operation deletes a file share immediately and aborts all data uploads to AWS. Otherwise, the file share is not deleted until all data is uploaded to AWS. This process aborts the data upload process, and the file share enters the FORCE_DELETING status.-dfsForceDelete :: Lens' DeleteFileShare (Maybe Bool)-dfsForceDelete = lens _dfsForceDelete (\ s a -> s{_dfsForceDelete = a})---- | The Amazon Resource Name (ARN) of the file share to be deleted.-dfsFileShareARN :: Lens' DeleteFileShare Text-dfsFileShareARN = lens _dfsFileShareARN (\ s a -> s{_dfsFileShareARN = a})--instance AWSRequest DeleteFileShare where- type Rs DeleteFileShare = DeleteFileShareResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- DeleteFileShareResponse' <$>- (x .?> "FileShareARN") <*> (pure (fromEnum s)))--instance Hashable DeleteFileShare where--instance NFData DeleteFileShare where--instance ToHeaders DeleteFileShare where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.DeleteFileShare" ::- ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON DeleteFileShare where- toJSON DeleteFileShare'{..}- = object- (catMaybes- [("ForceDelete" .=) <$> _dfsForceDelete,- Just ("FileShareARN" .= _dfsFileShareARN)])--instance ToPath DeleteFileShare where- toPath = const "/"--instance ToQuery DeleteFileShare where- toQuery = const mempty---- | DeleteFileShareOutput------------ /See:/ 'deleteFileShareResponse' smart constructor.-data DeleteFileShareResponse = DeleteFileShareResponse'- { _dfsrsFileShareARN :: !(Maybe Text)- , _dfsrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DeleteFileShareResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dfsrsFileShareARN' - The Amazon Resource Name (ARN) of the deleted file share.------ * 'dfsrsResponseStatus' - -- | The response status code.-deleteFileShareResponse- :: Int -- ^ 'dfsrsResponseStatus'- -> DeleteFileShareResponse-deleteFileShareResponse pResponseStatus_ =- DeleteFileShareResponse'- {_dfsrsFileShareARN = Nothing, _dfsrsResponseStatus = pResponseStatus_}----- | The Amazon Resource Name (ARN) of the deleted file share.-dfsrsFileShareARN :: Lens' DeleteFileShareResponse (Maybe Text)-dfsrsFileShareARN = lens _dfsrsFileShareARN (\ s a -> s{_dfsrsFileShareARN = a})---- | -- | The response status code.-dfsrsResponseStatus :: Lens' DeleteFileShareResponse Int-dfsrsResponseStatus = lens _dfsrsResponseStatus (\ s a -> s{_dfsrsResponseStatus = a})--instance NFData DeleteFileShareResponse where
− gen/Network/AWS/StorageGateway/DeleteGateway.hs
@@ -1,144 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.DeleteGateway--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Deletes a gateway. To specify which gateway to delete, use the Amazon Resource Name (ARN) of the gateway in your request. The operation deletes the gateway; however, it does not delete the gateway virtual machine (VM) from your host computer.--------- After you delete a gateway, you cannot reactivate it. Completed snapshots of the gateway volumes are not deleted upon deleting the gateway, however, pending snapshots will not complete. After you delete a gateway, your next step is to remove it from your environment.------ /Important:/ You no longer pay software charges after the gateway is deleted; however, your existing Amazon EBS snapshots persist and you will continue to be billed for these snapshots. You can choose to remove all remaining Amazon EBS snapshots by canceling your Amazon EC2 subscription. If you prefer not to cancel your Amazon EC2 subscription, you can delete your snapshots using the Amazon EC2 console. For more information, see the <http://aws.amazon.com/storagegateway AWS Storage Gateway Detail Page> .----module Network.AWS.StorageGateway.DeleteGateway- (- -- * Creating a Request- deleteGateway- , DeleteGateway- -- * Request Lenses- , dgGatewayARN-- -- * Destructuring the Response- , deleteGatewayResponse- , DeleteGatewayResponse- -- * Response Lenses- , dgrsGatewayARN- , dgrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | A JSON object containing the ID of the gateway to delete.------------ /See:/ 'deleteGateway' smart constructor.-newtype DeleteGateway = DeleteGateway'- { _dgGatewayARN :: Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DeleteGateway' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dgGatewayARN' - Undocumented member.-deleteGateway- :: Text -- ^ 'dgGatewayARN'- -> DeleteGateway-deleteGateway pGatewayARN_ = DeleteGateway' {_dgGatewayARN = pGatewayARN_}----- | Undocumented member.-dgGatewayARN :: Lens' DeleteGateway Text-dgGatewayARN = lens _dgGatewayARN (\ s a -> s{_dgGatewayARN = a})--instance AWSRequest DeleteGateway where- type Rs DeleteGateway = DeleteGatewayResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- DeleteGatewayResponse' <$>- (x .?> "GatewayARN") <*> (pure (fromEnum s)))--instance Hashable DeleteGateway where--instance NFData DeleteGateway where--instance ToHeaders DeleteGateway where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.DeleteGateway" ::- ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON DeleteGateway where- toJSON DeleteGateway'{..}- = object- (catMaybes [Just ("GatewayARN" .= _dgGatewayARN)])--instance ToPath DeleteGateway where- toPath = const "/"--instance ToQuery DeleteGateway where- toQuery = const mempty---- | A JSON object containing the ID of the deleted gateway.------------ /See:/ 'deleteGatewayResponse' smart constructor.-data DeleteGatewayResponse = DeleteGatewayResponse'- { _dgrsGatewayARN :: !(Maybe Text)- , _dgrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DeleteGatewayResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dgrsGatewayARN' - Undocumented member.------ * 'dgrsResponseStatus' - -- | The response status code.-deleteGatewayResponse- :: Int -- ^ 'dgrsResponseStatus'- -> DeleteGatewayResponse-deleteGatewayResponse pResponseStatus_ =- DeleteGatewayResponse'- {_dgrsGatewayARN = Nothing, _dgrsResponseStatus = pResponseStatus_}----- | Undocumented member.-dgrsGatewayARN :: Lens' DeleteGatewayResponse (Maybe Text)-dgrsGatewayARN = lens _dgrsGatewayARN (\ s a -> s{_dgrsGatewayARN = a})---- | -- | The response status code.-dgrsResponseStatus :: Lens' DeleteGatewayResponse Int-dgrsResponseStatus = lens _dgrsResponseStatus (\ s a -> s{_dgrsResponseStatus = a})--instance NFData DeleteGatewayResponse where
− gen/Network/AWS/StorageGateway/DeleteSnapshotSchedule.hs
@@ -1,136 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.DeleteSnapshotSchedule--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Deletes a snapshot of a volume.--------- You can take snapshots of your gateway volumes on a scheduled or ad hoc basis. This API action enables you to delete a snapshot schedule for a volume. For more information, see <http://docs.aws.amazon.com/storagegateway/latest/userguide/WorkingWithSnapshots.html Working with Snapshots> . In the @DeleteSnapshotSchedule@ request, you identify the volume by providing its Amazon Resource Name (ARN). This operation is only supported in stored and cached volume gateway types.----module Network.AWS.StorageGateway.DeleteSnapshotSchedule- (- -- * Creating a Request- deleteSnapshotSchedule- , DeleteSnapshotSchedule- -- * Request Lenses- , dVolumeARN-- -- * Destructuring the Response- , deleteSnapshotScheduleResponse- , DeleteSnapshotScheduleResponse- -- * Response Lenses- , dsssrsVolumeARN- , dsssrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | /See:/ 'deleteSnapshotSchedule' smart constructor.-newtype DeleteSnapshotSchedule = DeleteSnapshotSchedule'- { _dVolumeARN :: Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DeleteSnapshotSchedule' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dVolumeARN' - Undocumented member.-deleteSnapshotSchedule- :: Text -- ^ 'dVolumeARN'- -> DeleteSnapshotSchedule-deleteSnapshotSchedule pVolumeARN_ =- DeleteSnapshotSchedule' {_dVolumeARN = pVolumeARN_}----- | Undocumented member.-dVolumeARN :: Lens' DeleteSnapshotSchedule Text-dVolumeARN = lens _dVolumeARN (\ s a -> s{_dVolumeARN = a})--instance AWSRequest DeleteSnapshotSchedule where- type Rs DeleteSnapshotSchedule =- DeleteSnapshotScheduleResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- DeleteSnapshotScheduleResponse' <$>- (x .?> "VolumeARN") <*> (pure (fromEnum s)))--instance Hashable DeleteSnapshotSchedule where--instance NFData DeleteSnapshotSchedule where--instance ToHeaders DeleteSnapshotSchedule where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.DeleteSnapshotSchedule" ::- ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON DeleteSnapshotSchedule where- toJSON DeleteSnapshotSchedule'{..}- = object- (catMaybes [Just ("VolumeARN" .= _dVolumeARN)])--instance ToPath DeleteSnapshotSchedule where- toPath = const "/"--instance ToQuery DeleteSnapshotSchedule where- toQuery = const mempty---- | /See:/ 'deleteSnapshotScheduleResponse' smart constructor.-data DeleteSnapshotScheduleResponse = DeleteSnapshotScheduleResponse'- { _dsssrsVolumeARN :: !(Maybe Text)- , _dsssrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DeleteSnapshotScheduleResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dsssrsVolumeARN' - Undocumented member.------ * 'dsssrsResponseStatus' - -- | The response status code.-deleteSnapshotScheduleResponse- :: Int -- ^ 'dsssrsResponseStatus'- -> DeleteSnapshotScheduleResponse-deleteSnapshotScheduleResponse pResponseStatus_ =- DeleteSnapshotScheduleResponse'- {_dsssrsVolumeARN = Nothing, _dsssrsResponseStatus = pResponseStatus_}----- | Undocumented member.-dsssrsVolumeARN :: Lens' DeleteSnapshotScheduleResponse (Maybe Text)-dsssrsVolumeARN = lens _dsssrsVolumeARN (\ s a -> s{_dsssrsVolumeARN = a})---- | -- | The response status code.-dsssrsResponseStatus :: Lens' DeleteSnapshotScheduleResponse Int-dsssrsResponseStatus = lens _dsssrsResponseStatus (\ s a -> s{_dsssrsResponseStatus = a})--instance NFData DeleteSnapshotScheduleResponse where
− gen/Network/AWS/StorageGateway/DeleteTape.hs
@@ -1,151 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.DeleteTape--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Deletes the specified virtual tape. This operation is only supported in the tape gateway type.-------module Network.AWS.StorageGateway.DeleteTape- (- -- * Creating a Request- deleteTape- , DeleteTape- -- * Request Lenses- , delGatewayARN- , delTapeARN-- -- * Destructuring the Response- , deleteTapeResponse- , DeleteTapeResponse- -- * Response Lenses- , dtrsTapeARN- , dtrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | DeleteTapeInput------------ /See:/ 'deleteTape' smart constructor.-data DeleteTape = DeleteTape'- { _delGatewayARN :: !Text- , _delTapeARN :: !Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DeleteTape' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'delGatewayARN' - The unique Amazon Resource Name (ARN) of the gateway that the virtual tape to delete is associated with. Use the 'ListGateways' operation to return a list of gateways for your account and region.------ * 'delTapeARN' - The Amazon Resource Name (ARN) of the virtual tape to delete.-deleteTape- :: Text -- ^ 'delGatewayARN'- -> Text -- ^ 'delTapeARN'- -> DeleteTape-deleteTape pGatewayARN_ pTapeARN_ =- DeleteTape' {_delGatewayARN = pGatewayARN_, _delTapeARN = pTapeARN_}----- | The unique Amazon Resource Name (ARN) of the gateway that the virtual tape to delete is associated with. Use the 'ListGateways' operation to return a list of gateways for your account and region.-delGatewayARN :: Lens' DeleteTape Text-delGatewayARN = lens _delGatewayARN (\ s a -> s{_delGatewayARN = a})---- | The Amazon Resource Name (ARN) of the virtual tape to delete.-delTapeARN :: Lens' DeleteTape Text-delTapeARN = lens _delTapeARN (\ s a -> s{_delTapeARN = a})--instance AWSRequest DeleteTape where- type Rs DeleteTape = DeleteTapeResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- DeleteTapeResponse' <$>- (x .?> "TapeARN") <*> (pure (fromEnum s)))--instance Hashable DeleteTape where--instance NFData DeleteTape where--instance ToHeaders DeleteTape where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.DeleteTape" :: ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON DeleteTape where- toJSON DeleteTape'{..}- = object- (catMaybes- [Just ("GatewayARN" .= _delGatewayARN),- Just ("TapeARN" .= _delTapeARN)])--instance ToPath DeleteTape where- toPath = const "/"--instance ToQuery DeleteTape where- toQuery = const mempty---- | DeleteTapeOutput------------ /See:/ 'deleteTapeResponse' smart constructor.-data DeleteTapeResponse = DeleteTapeResponse'- { _dtrsTapeARN :: !(Maybe Text)- , _dtrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DeleteTapeResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dtrsTapeARN' - The Amazon Resource Name (ARN) of the deleted virtual tape.------ * 'dtrsResponseStatus' - -- | The response status code.-deleteTapeResponse- :: Int -- ^ 'dtrsResponseStatus'- -> DeleteTapeResponse-deleteTapeResponse pResponseStatus_ =- DeleteTapeResponse'- {_dtrsTapeARN = Nothing, _dtrsResponseStatus = pResponseStatus_}----- | The Amazon Resource Name (ARN) of the deleted virtual tape.-dtrsTapeARN :: Lens' DeleteTapeResponse (Maybe Text)-dtrsTapeARN = lens _dtrsTapeARN (\ s a -> s{_dtrsTapeARN = a})---- | -- | The response status code.-dtrsResponseStatus :: Lens' DeleteTapeResponse Int-dtrsResponseStatus = lens _dtrsResponseStatus (\ s a -> s{_dtrsResponseStatus = a})--instance NFData DeleteTapeResponse where
− gen/Network/AWS/StorageGateway/DeleteTapeArchive.hs
@@ -1,140 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.DeleteTapeArchive--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Deletes the specified virtual tape from the virtual tape shelf (VTS). This operation is only supported in the tape gateway type.-------module Network.AWS.StorageGateway.DeleteTapeArchive- (- -- * Creating a Request- deleteTapeArchive- , DeleteTapeArchive- -- * Request Lenses- , dtaTapeARN-- -- * Destructuring the Response- , deleteTapeArchiveResponse- , DeleteTapeArchiveResponse- -- * Response Lenses- , dtatrsTapeARN- , dtatrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | DeleteTapeArchiveInput------------ /See:/ 'deleteTapeArchive' smart constructor.-newtype DeleteTapeArchive = DeleteTapeArchive'- { _dtaTapeARN :: Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DeleteTapeArchive' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dtaTapeARN' - The Amazon Resource Name (ARN) of the virtual tape to delete from the virtual tape shelf (VTS).-deleteTapeArchive- :: Text -- ^ 'dtaTapeARN'- -> DeleteTapeArchive-deleteTapeArchive pTapeARN_ = DeleteTapeArchive' {_dtaTapeARN = pTapeARN_}----- | The Amazon Resource Name (ARN) of the virtual tape to delete from the virtual tape shelf (VTS).-dtaTapeARN :: Lens' DeleteTapeArchive Text-dtaTapeARN = lens _dtaTapeARN (\ s a -> s{_dtaTapeARN = a})--instance AWSRequest DeleteTapeArchive where- type Rs DeleteTapeArchive = DeleteTapeArchiveResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- DeleteTapeArchiveResponse' <$>- (x .?> "TapeARN") <*> (pure (fromEnum s)))--instance Hashable DeleteTapeArchive where--instance NFData DeleteTapeArchive where--instance ToHeaders DeleteTapeArchive where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.DeleteTapeArchive" ::- ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON DeleteTapeArchive where- toJSON DeleteTapeArchive'{..}- = object- (catMaybes [Just ("TapeARN" .= _dtaTapeARN)])--instance ToPath DeleteTapeArchive where- toPath = const "/"--instance ToQuery DeleteTapeArchive where- toQuery = const mempty---- | DeleteTapeArchiveOutput------------ /See:/ 'deleteTapeArchiveResponse' smart constructor.-data DeleteTapeArchiveResponse = DeleteTapeArchiveResponse'- { _dtatrsTapeARN :: !(Maybe Text)- , _dtatrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DeleteTapeArchiveResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dtatrsTapeARN' - The Amazon Resource Name (ARN) of the virtual tape that was deleted from the virtual tape shelf (VTS).------ * 'dtatrsResponseStatus' - -- | The response status code.-deleteTapeArchiveResponse- :: Int -- ^ 'dtatrsResponseStatus'- -> DeleteTapeArchiveResponse-deleteTapeArchiveResponse pResponseStatus_ =- DeleteTapeArchiveResponse'- {_dtatrsTapeARN = Nothing, _dtatrsResponseStatus = pResponseStatus_}----- | The Amazon Resource Name (ARN) of the virtual tape that was deleted from the virtual tape shelf (VTS).-dtatrsTapeARN :: Lens' DeleteTapeArchiveResponse (Maybe Text)-dtatrsTapeARN = lens _dtatrsTapeARN (\ s a -> s{_dtatrsTapeARN = a})---- | -- | The response status code.-dtatrsResponseStatus :: Lens' DeleteTapeArchiveResponse Int-dtatrsResponseStatus = lens _dtatrsResponseStatus (\ s a -> s{_dtatrsResponseStatus = a})--instance NFData DeleteTapeArchiveResponse where
− gen/Network/AWS/StorageGateway/DeleteVolume.hs
@@ -1,144 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.DeleteVolume--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Deletes the specified storage volume that you previously created using the 'CreateCachediSCSIVolume' or 'CreateStorediSCSIVolume' API. This operation is only supported in the cached volume and stored volume types. For stored volume gateways, the local disk that was configured as the storage volume is not deleted. You can reuse the local disk to create another storage volume.--------- Before you delete a volume, make sure there are no iSCSI connections to the volume you are deleting. You should also make sure there is no snapshot in progress. You can use the Amazon Elastic Compute Cloud (Amazon EC2) API to query snapshots on the volume you are deleting and check the snapshot status. For more information, go to <http://docs.aws.amazon.com/AWSEC2/latest/APIReference/ApiReference-query-DescribeSnapshots.html DescribeSnapshots> in the /Amazon Elastic Compute Cloud API Reference/ .------ In the request, you must provide the Amazon Resource Name (ARN) of the storage volume you want to delete.----module Network.AWS.StorageGateway.DeleteVolume- (- -- * Creating a Request- deleteVolume- , DeleteVolume- -- * Request Lenses- , dvVolumeARN-- -- * Destructuring the Response- , deleteVolumeResponse- , DeleteVolumeResponse- -- * Response Lenses- , dvrsVolumeARN- , dvrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | A JSON object containing the 'DeleteVolumeInput$VolumeARN' to delete.------------ /See:/ 'deleteVolume' smart constructor.-newtype DeleteVolume = DeleteVolume'- { _dvVolumeARN :: Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DeleteVolume' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dvVolumeARN' - The Amazon Resource Name (ARN) of the volume. Use the 'ListVolumes' operation to return a list of gateway volumes.-deleteVolume- :: Text -- ^ 'dvVolumeARN'- -> DeleteVolume-deleteVolume pVolumeARN_ = DeleteVolume' {_dvVolumeARN = pVolumeARN_}----- | The Amazon Resource Name (ARN) of the volume. Use the 'ListVolumes' operation to return a list of gateway volumes.-dvVolumeARN :: Lens' DeleteVolume Text-dvVolumeARN = lens _dvVolumeARN (\ s a -> s{_dvVolumeARN = a})--instance AWSRequest DeleteVolume where- type Rs DeleteVolume = DeleteVolumeResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- DeleteVolumeResponse' <$>- (x .?> "VolumeARN") <*> (pure (fromEnum s)))--instance Hashable DeleteVolume where--instance NFData DeleteVolume where--instance ToHeaders DeleteVolume where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.DeleteVolume" ::- ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON DeleteVolume where- toJSON DeleteVolume'{..}- = object- (catMaybes [Just ("VolumeARN" .= _dvVolumeARN)])--instance ToPath DeleteVolume where- toPath = const "/"--instance ToQuery DeleteVolume where- toQuery = const mempty---- | A JSON object containing the of the storage volume that was deleted------------ /See:/ 'deleteVolumeResponse' smart constructor.-data DeleteVolumeResponse = DeleteVolumeResponse'- { _dvrsVolumeARN :: !(Maybe Text)- , _dvrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DeleteVolumeResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dvrsVolumeARN' - The Amazon Resource Name (ARN) of the storage volume that was deleted. It is the same ARN you provided in the request.------ * 'dvrsResponseStatus' - -- | The response status code.-deleteVolumeResponse- :: Int -- ^ 'dvrsResponseStatus'- -> DeleteVolumeResponse-deleteVolumeResponse pResponseStatus_ =- DeleteVolumeResponse'- {_dvrsVolumeARN = Nothing, _dvrsResponseStatus = pResponseStatus_}----- | The Amazon Resource Name (ARN) of the storage volume that was deleted. It is the same ARN you provided in the request.-dvrsVolumeARN :: Lens' DeleteVolumeResponse (Maybe Text)-dvrsVolumeARN = lens _dvrsVolumeARN (\ s a -> s{_dvrsVolumeARN = a})---- | -- | The response status code.-dvrsResponseStatus :: Lens' DeleteVolumeResponse Int-dvrsResponseStatus = lens _dvrsResponseStatus (\ s a -> s{_dvrsResponseStatus = a})--instance NFData DeleteVolumeResponse where
− gen/Network/AWS/StorageGateway/DescribeBandwidthRateLimit.hs
@@ -1,168 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.DescribeBandwidthRateLimit--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Returns the bandwidth rate limits of a gateway. By default, these limits are not set, which means no bandwidth rate limiting is in effect.--------- This operation only returns a value for a bandwidth rate limit only if the limit is set. If no limits are set for the gateway, then this operation returns only the gateway ARN in the response body. To specify which gateway to describe, use the Amazon Resource Name (ARN) of the gateway in your request.----module Network.AWS.StorageGateway.DescribeBandwidthRateLimit- (- -- * Creating a Request- describeBandwidthRateLimit- , DescribeBandwidthRateLimit- -- * Request Lenses- , dbrlGatewayARN-- -- * Destructuring the Response- , describeBandwidthRateLimitResponse- , DescribeBandwidthRateLimitResponse- -- * Response Lenses- , dbrlrsGatewayARN- , dbrlrsAverageUploadRateLimitInBitsPerSec- , dbrlrsAverageDownloadRateLimitInBitsPerSec- , dbrlrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | A JSON object containing the of the gateway.------------ /See:/ 'describeBandwidthRateLimit' smart constructor.-newtype DescribeBandwidthRateLimit = DescribeBandwidthRateLimit'- { _dbrlGatewayARN :: Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeBandwidthRateLimit' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dbrlGatewayARN' - Undocumented member.-describeBandwidthRateLimit- :: Text -- ^ 'dbrlGatewayARN'- -> DescribeBandwidthRateLimit-describeBandwidthRateLimit pGatewayARN_ =- DescribeBandwidthRateLimit' {_dbrlGatewayARN = pGatewayARN_}----- | Undocumented member.-dbrlGatewayARN :: Lens' DescribeBandwidthRateLimit Text-dbrlGatewayARN = lens _dbrlGatewayARN (\ s a -> s{_dbrlGatewayARN = a})--instance AWSRequest DescribeBandwidthRateLimit where- type Rs DescribeBandwidthRateLimit =- DescribeBandwidthRateLimitResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- DescribeBandwidthRateLimitResponse' <$>- (x .?> "GatewayARN") <*>- (x .?> "AverageUploadRateLimitInBitsPerSec")- <*> (x .?> "AverageDownloadRateLimitInBitsPerSec")- <*> (pure (fromEnum s)))--instance Hashable DescribeBandwidthRateLimit where--instance NFData DescribeBandwidthRateLimit where--instance ToHeaders DescribeBandwidthRateLimit where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.DescribeBandwidthRateLimit"- :: ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON DescribeBandwidthRateLimit where- toJSON DescribeBandwidthRateLimit'{..}- = object- (catMaybes [Just ("GatewayARN" .= _dbrlGatewayARN)])--instance ToPath DescribeBandwidthRateLimit where- toPath = const "/"--instance ToQuery DescribeBandwidthRateLimit where- toQuery = const mempty---- | A JSON object containing the following fields:------------ /See:/ 'describeBandwidthRateLimitResponse' smart constructor.-data DescribeBandwidthRateLimitResponse = DescribeBandwidthRateLimitResponse'- { _dbrlrsGatewayARN :: !(Maybe Text)- , _dbrlrsAverageUploadRateLimitInBitsPerSec :: !(Maybe Nat)- , _dbrlrsAverageDownloadRateLimitInBitsPerSec :: !(Maybe Nat)- , _dbrlrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeBandwidthRateLimitResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dbrlrsGatewayARN' - Undocumented member.------ * 'dbrlrsAverageUploadRateLimitInBitsPerSec' - The average upload bandwidth rate limit in bits per second. This field does not appear in the response if the upload rate limit is not set.------ * 'dbrlrsAverageDownloadRateLimitInBitsPerSec' - The average download bandwidth rate limit in bits per second. This field does not appear in the response if the download rate limit is not set.------ * 'dbrlrsResponseStatus' - -- | The response status code.-describeBandwidthRateLimitResponse- :: Int -- ^ 'dbrlrsResponseStatus'- -> DescribeBandwidthRateLimitResponse-describeBandwidthRateLimitResponse pResponseStatus_ =- DescribeBandwidthRateLimitResponse'- { _dbrlrsGatewayARN = Nothing- , _dbrlrsAverageUploadRateLimitInBitsPerSec = Nothing- , _dbrlrsAverageDownloadRateLimitInBitsPerSec = Nothing- , _dbrlrsResponseStatus = pResponseStatus_- }----- | Undocumented member.-dbrlrsGatewayARN :: Lens' DescribeBandwidthRateLimitResponse (Maybe Text)-dbrlrsGatewayARN = lens _dbrlrsGatewayARN (\ s a -> s{_dbrlrsGatewayARN = a})---- | The average upload bandwidth rate limit in bits per second. This field does not appear in the response if the upload rate limit is not set.-dbrlrsAverageUploadRateLimitInBitsPerSec :: Lens' DescribeBandwidthRateLimitResponse (Maybe Natural)-dbrlrsAverageUploadRateLimitInBitsPerSec = lens _dbrlrsAverageUploadRateLimitInBitsPerSec (\ s a -> s{_dbrlrsAverageUploadRateLimitInBitsPerSec = a}) . mapping _Nat---- | The average download bandwidth rate limit in bits per second. This field does not appear in the response if the download rate limit is not set.-dbrlrsAverageDownloadRateLimitInBitsPerSec :: Lens' DescribeBandwidthRateLimitResponse (Maybe Natural)-dbrlrsAverageDownloadRateLimitInBitsPerSec = lens _dbrlrsAverageDownloadRateLimitInBitsPerSec (\ s a -> s{_dbrlrsAverageDownloadRateLimitInBitsPerSec = a}) . mapping _Nat---- | -- | The response status code.-dbrlrsResponseStatus :: Lens' DescribeBandwidthRateLimitResponse Int-dbrlrsResponseStatus = lens _dbrlrsResponseStatus (\ s a -> s{_dbrlrsResponseStatus = a})--instance NFData DescribeBandwidthRateLimitResponse- where
− gen/Network/AWS/StorageGateway/DescribeCache.hs
@@ -1,196 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.DescribeCache--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Returns information about the cache of a gateway. This operation is only supported in the cached volume, tape and file gateway types.--------- The response includes disk IDs that are configured as cache, and it includes the amount of cache allocated and used.----module Network.AWS.StorageGateway.DescribeCache- (- -- * Creating a Request- describeCache- , DescribeCache- -- * Request Lenses- , dcGatewayARN-- -- * Destructuring the Response- , describeCacheResponse- , DescribeCacheResponse- -- * Response Lenses- , dcrsGatewayARN- , dcrsDiskIds- , dcrsCacheUsedPercentage- , dcrsCacheHitPercentage- , dcrsCacheMissPercentage- , dcrsCacheAllocatedInBytes- , dcrsCacheDirtyPercentage- , dcrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | /See:/ 'describeCache' smart constructor.-newtype DescribeCache = DescribeCache'- { _dcGatewayARN :: Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeCache' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dcGatewayARN' - Undocumented member.-describeCache- :: Text -- ^ 'dcGatewayARN'- -> DescribeCache-describeCache pGatewayARN_ = DescribeCache' {_dcGatewayARN = pGatewayARN_}----- | Undocumented member.-dcGatewayARN :: Lens' DescribeCache Text-dcGatewayARN = lens _dcGatewayARN (\ s a -> s{_dcGatewayARN = a})--instance AWSRequest DescribeCache where- type Rs DescribeCache = DescribeCacheResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- DescribeCacheResponse' <$>- (x .?> "GatewayARN") <*> (x .?> "DiskIds" .!@ mempty)- <*> (x .?> "CacheUsedPercentage")- <*> (x .?> "CacheHitPercentage")- <*> (x .?> "CacheMissPercentage")- <*> (x .?> "CacheAllocatedInBytes")- <*> (x .?> "CacheDirtyPercentage")- <*> (pure (fromEnum s)))--instance Hashable DescribeCache where--instance NFData DescribeCache where--instance ToHeaders DescribeCache where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.DescribeCache" ::- ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON DescribeCache where- toJSON DescribeCache'{..}- = object- (catMaybes [Just ("GatewayARN" .= _dcGatewayARN)])--instance ToPath DescribeCache where- toPath = const "/"--instance ToQuery DescribeCache where- toQuery = const mempty---- | /See:/ 'describeCacheResponse' smart constructor.-data DescribeCacheResponse = DescribeCacheResponse'- { _dcrsGatewayARN :: !(Maybe Text)- , _dcrsDiskIds :: !(Maybe [Text])- , _dcrsCacheUsedPercentage :: !(Maybe Double)- , _dcrsCacheHitPercentage :: !(Maybe Double)- , _dcrsCacheMissPercentage :: !(Maybe Double)- , _dcrsCacheAllocatedInBytes :: !(Maybe Integer)- , _dcrsCacheDirtyPercentage :: !(Maybe Double)- , _dcrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeCacheResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dcrsGatewayARN' - Undocumented member.------ * 'dcrsDiskIds' - Undocumented member.------ * 'dcrsCacheUsedPercentage' - Undocumented member.------ * 'dcrsCacheHitPercentage' - Undocumented member.------ * 'dcrsCacheMissPercentage' - Undocumented member.------ * 'dcrsCacheAllocatedInBytes' - Undocumented member.------ * 'dcrsCacheDirtyPercentage' - Undocumented member.------ * 'dcrsResponseStatus' - -- | The response status code.-describeCacheResponse- :: Int -- ^ 'dcrsResponseStatus'- -> DescribeCacheResponse-describeCacheResponse pResponseStatus_ =- DescribeCacheResponse'- { _dcrsGatewayARN = Nothing- , _dcrsDiskIds = Nothing- , _dcrsCacheUsedPercentage = Nothing- , _dcrsCacheHitPercentage = Nothing- , _dcrsCacheMissPercentage = Nothing- , _dcrsCacheAllocatedInBytes = Nothing- , _dcrsCacheDirtyPercentage = Nothing- , _dcrsResponseStatus = pResponseStatus_- }----- | Undocumented member.-dcrsGatewayARN :: Lens' DescribeCacheResponse (Maybe Text)-dcrsGatewayARN = lens _dcrsGatewayARN (\ s a -> s{_dcrsGatewayARN = a})---- | Undocumented member.-dcrsDiskIds :: Lens' DescribeCacheResponse [Text]-dcrsDiskIds = lens _dcrsDiskIds (\ s a -> s{_dcrsDiskIds = a}) . _Default . _Coerce---- | Undocumented member.-dcrsCacheUsedPercentage :: Lens' DescribeCacheResponse (Maybe Double)-dcrsCacheUsedPercentage = lens _dcrsCacheUsedPercentage (\ s a -> s{_dcrsCacheUsedPercentage = a})---- | Undocumented member.-dcrsCacheHitPercentage :: Lens' DescribeCacheResponse (Maybe Double)-dcrsCacheHitPercentage = lens _dcrsCacheHitPercentage (\ s a -> s{_dcrsCacheHitPercentage = a})---- | Undocumented member.-dcrsCacheMissPercentage :: Lens' DescribeCacheResponse (Maybe Double)-dcrsCacheMissPercentage = lens _dcrsCacheMissPercentage (\ s a -> s{_dcrsCacheMissPercentage = a})---- | Undocumented member.-dcrsCacheAllocatedInBytes :: Lens' DescribeCacheResponse (Maybe Integer)-dcrsCacheAllocatedInBytes = lens _dcrsCacheAllocatedInBytes (\ s a -> s{_dcrsCacheAllocatedInBytes = a})---- | Undocumented member.-dcrsCacheDirtyPercentage :: Lens' DescribeCacheResponse (Maybe Double)-dcrsCacheDirtyPercentage = lens _dcrsCacheDirtyPercentage (\ s a -> s{_dcrsCacheDirtyPercentage = a})---- | -- | The response status code.-dcrsResponseStatus :: Lens' DescribeCacheResponse Int-dcrsResponseStatus = lens _dcrsResponseStatus (\ s a -> s{_dcrsResponseStatus = a})--instance NFData DescribeCacheResponse where
− gen/Network/AWS/StorageGateway/DescribeCachediSCSIVolumes.hs
@@ -1,144 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.DescribeCachediSCSIVolumes--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Returns a description of the gateway volumes specified in the request. This operation is only supported in the cached volume gateway types.--------- The list of gateway volumes in the request must be from one gateway. In the response Amazon Storage Gateway returns volume information sorted by volume Amazon Resource Name (ARN).----module Network.AWS.StorageGateway.DescribeCachediSCSIVolumes- (- -- * Creating a Request- describeCachediSCSIVolumes- , DescribeCachediSCSIVolumes- -- * Request Lenses- , dcscsivVolumeARNs-- -- * Destructuring the Response- , describeCachediSCSIVolumesResponse- , DescribeCachediSCSIVolumesResponse- -- * Response Lenses- , dcscsivrsCachediSCSIVolumes- , dcscsivrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | /See:/ 'describeCachediSCSIVolumes' smart constructor.-newtype DescribeCachediSCSIVolumes = DescribeCachediSCSIVolumes'- { _dcscsivVolumeARNs :: [Text]- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeCachediSCSIVolumes' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dcscsivVolumeARNs' - Undocumented member.-describeCachediSCSIVolumes- :: DescribeCachediSCSIVolumes-describeCachediSCSIVolumes =- DescribeCachediSCSIVolumes' {_dcscsivVolumeARNs = mempty}----- | Undocumented member.-dcscsivVolumeARNs :: Lens' DescribeCachediSCSIVolumes [Text]-dcscsivVolumeARNs = lens _dcscsivVolumeARNs (\ s a -> s{_dcscsivVolumeARNs = a}) . _Coerce--instance AWSRequest DescribeCachediSCSIVolumes where- type Rs DescribeCachediSCSIVolumes =- DescribeCachediSCSIVolumesResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- DescribeCachediSCSIVolumesResponse' <$>- (x .?> "CachediSCSIVolumes" .!@ mempty) <*>- (pure (fromEnum s)))--instance Hashable DescribeCachediSCSIVolumes where--instance NFData DescribeCachediSCSIVolumes where--instance ToHeaders DescribeCachediSCSIVolumes where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.DescribeCachediSCSIVolumes"- :: ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON DescribeCachediSCSIVolumes where- toJSON DescribeCachediSCSIVolumes'{..}- = object- (catMaybes- [Just ("VolumeARNs" .= _dcscsivVolumeARNs)])--instance ToPath DescribeCachediSCSIVolumes where- toPath = const "/"--instance ToQuery DescribeCachediSCSIVolumes where- toQuery = const mempty---- | A JSON object containing the following fields:------------ /See:/ 'describeCachediSCSIVolumesResponse' smart constructor.-data DescribeCachediSCSIVolumesResponse = DescribeCachediSCSIVolumesResponse'- { _dcscsivrsCachediSCSIVolumes :: !(Maybe [CachediSCSIVolume])- , _dcscsivrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeCachediSCSIVolumesResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dcscsivrsCachediSCSIVolumes' - An array of objects where each object contains metadata about one cached volume.------ * 'dcscsivrsResponseStatus' - -- | The response status code.-describeCachediSCSIVolumesResponse- :: Int -- ^ 'dcscsivrsResponseStatus'- -> DescribeCachediSCSIVolumesResponse-describeCachediSCSIVolumesResponse pResponseStatus_ =- DescribeCachediSCSIVolumesResponse'- { _dcscsivrsCachediSCSIVolumes = Nothing- , _dcscsivrsResponseStatus = pResponseStatus_- }----- | An array of objects where each object contains metadata about one cached volume.-dcscsivrsCachediSCSIVolumes :: Lens' DescribeCachediSCSIVolumesResponse [CachediSCSIVolume]-dcscsivrsCachediSCSIVolumes = lens _dcscsivrsCachediSCSIVolumes (\ s a -> s{_dcscsivrsCachediSCSIVolumes = a}) . _Default . _Coerce---- | -- | The response status code.-dcscsivrsResponseStatus :: Lens' DescribeCachediSCSIVolumesResponse Int-dcscsivrsResponseStatus = lens _dcscsivrsResponseStatus (\ s a -> s{_dcscsivrsResponseStatus = a})--instance NFData DescribeCachediSCSIVolumesResponse- where
− gen/Network/AWS/StorageGateway/DescribeChapCredentials.hs
@@ -1,143 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.DescribeChapCredentials--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Returns an array of Challenge-Handshake Authentication Protocol (CHAP) credentials information for a specified iSCSI target, one for each target-initiator pair.-------module Network.AWS.StorageGateway.DescribeChapCredentials- (- -- * Creating a Request- describeChapCredentials- , DescribeChapCredentials- -- * Request Lenses- , dccTargetARN-- -- * Destructuring the Response- , describeChapCredentialsResponse- , DescribeChapCredentialsResponse- -- * Response Lenses- , dccrsChapCredentials- , dccrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | A JSON object containing the Amazon Resource Name (ARN) of the iSCSI volume target.------------ /See:/ 'describeChapCredentials' smart constructor.-newtype DescribeChapCredentials = DescribeChapCredentials'- { _dccTargetARN :: Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeChapCredentials' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dccTargetARN' - The Amazon Resource Name (ARN) of the iSCSI volume target. Use the 'DescribeStorediSCSIVolumes' operation to return to retrieve the TargetARN for specified VolumeARN.-describeChapCredentials- :: Text -- ^ 'dccTargetARN'- -> DescribeChapCredentials-describeChapCredentials pTargetARN_ =- DescribeChapCredentials' {_dccTargetARN = pTargetARN_}----- | The Amazon Resource Name (ARN) of the iSCSI volume target. Use the 'DescribeStorediSCSIVolumes' operation to return to retrieve the TargetARN for specified VolumeARN.-dccTargetARN :: Lens' DescribeChapCredentials Text-dccTargetARN = lens _dccTargetARN (\ s a -> s{_dccTargetARN = a})--instance AWSRequest DescribeChapCredentials where- type Rs DescribeChapCredentials =- DescribeChapCredentialsResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- DescribeChapCredentialsResponse' <$>- (x .?> "ChapCredentials" .!@ mempty) <*>- (pure (fromEnum s)))--instance Hashable DescribeChapCredentials where--instance NFData DescribeChapCredentials where--instance ToHeaders DescribeChapCredentials where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.DescribeChapCredentials" ::- ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON DescribeChapCredentials where- toJSON DescribeChapCredentials'{..}- = object- (catMaybes [Just ("TargetARN" .= _dccTargetARN)])--instance ToPath DescribeChapCredentials where- toPath = const "/"--instance ToQuery DescribeChapCredentials where- toQuery = const mempty---- | A JSON object containing a .------------ /See:/ 'describeChapCredentialsResponse' smart constructor.-data DescribeChapCredentialsResponse = DescribeChapCredentialsResponse'- { _dccrsChapCredentials :: !(Maybe [ChapInfo])- , _dccrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeChapCredentialsResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dccrsChapCredentials' - An array of 'ChapInfo' objects that represent CHAP credentials. Each object in the array contains CHAP credential information for one target-initiator pair. If no CHAP credentials are set, an empty array is returned. CHAP credential information is provided in a JSON object with the following fields: * __InitiatorName__ : The iSCSI initiator that connects to the target. * __SecretToAuthenticateInitiator__ : The secret key that the initiator (for example, the Windows client) must provide to participate in mutual CHAP with the target. * __SecretToAuthenticateTarget__ : The secret key that the target must provide to participate in mutual CHAP with the initiator (e.g. Windows client). * __TargetARN__ : The Amazon Resource Name (ARN) of the storage volume.------ * 'dccrsResponseStatus' - -- | The response status code.-describeChapCredentialsResponse- :: Int -- ^ 'dccrsResponseStatus'- -> DescribeChapCredentialsResponse-describeChapCredentialsResponse pResponseStatus_ =- DescribeChapCredentialsResponse'- {_dccrsChapCredentials = Nothing, _dccrsResponseStatus = pResponseStatus_}----- | An array of 'ChapInfo' objects that represent CHAP credentials. Each object in the array contains CHAP credential information for one target-initiator pair. If no CHAP credentials are set, an empty array is returned. CHAP credential information is provided in a JSON object with the following fields: * __InitiatorName__ : The iSCSI initiator that connects to the target. * __SecretToAuthenticateInitiator__ : The secret key that the initiator (for example, the Windows client) must provide to participate in mutual CHAP with the target. * __SecretToAuthenticateTarget__ : The secret key that the target must provide to participate in mutual CHAP with the initiator (e.g. Windows client). * __TargetARN__ : The Amazon Resource Name (ARN) of the storage volume.-dccrsChapCredentials :: Lens' DescribeChapCredentialsResponse [ChapInfo]-dccrsChapCredentials = lens _dccrsChapCredentials (\ s a -> s{_dccrsChapCredentials = a}) . _Default . _Coerce---- | -- | The response status code.-dccrsResponseStatus :: Lens' DescribeChapCredentialsResponse Int-dccrsResponseStatus = lens _dccrsResponseStatus (\ s a -> s{_dccrsResponseStatus = a})--instance NFData DescribeChapCredentialsResponse where
− gen/Network/AWS/StorageGateway/DescribeGatewayInformation.hs
@@ -1,225 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.DescribeGatewayInformation--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Returns metadata about a gateway such as its name, network interfaces, configured time zone, and the state (whether the gateway is running or not). To specify which gateway to describe, use the Amazon Resource Name (ARN) of the gateway in your request.-------module Network.AWS.StorageGateway.DescribeGatewayInformation- (- -- * Creating a Request- describeGatewayInformation- , DescribeGatewayInformation- -- * Request Lenses- , dgiGatewayARN-- -- * Destructuring the Response- , describeGatewayInformationResponse- , DescribeGatewayInformationResponse- -- * Response Lenses- , dgirsGatewayState- , dgirsGatewayARN- , dgirsGatewayNetworkInterfaces- , dgirsNextUpdateAvailabilityDate- , dgirsLastSoftwareUpdate- , dgirsGatewayName- , dgirsGatewayId- , dgirsGatewayType- , dgirsGatewayTimezone- , dgirsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | A JSON object containing the ID of the gateway.------------ /See:/ 'describeGatewayInformation' smart constructor.-newtype DescribeGatewayInformation = DescribeGatewayInformation'- { _dgiGatewayARN :: Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeGatewayInformation' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dgiGatewayARN' - Undocumented member.-describeGatewayInformation- :: Text -- ^ 'dgiGatewayARN'- -> DescribeGatewayInformation-describeGatewayInformation pGatewayARN_ =- DescribeGatewayInformation' {_dgiGatewayARN = pGatewayARN_}----- | Undocumented member.-dgiGatewayARN :: Lens' DescribeGatewayInformation Text-dgiGatewayARN = lens _dgiGatewayARN (\ s a -> s{_dgiGatewayARN = a})--instance AWSRequest DescribeGatewayInformation where- type Rs DescribeGatewayInformation =- DescribeGatewayInformationResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- DescribeGatewayInformationResponse' <$>- (x .?> "GatewayState") <*> (x .?> "GatewayARN") <*>- (x .?> "GatewayNetworkInterfaces" .!@ mempty)- <*> (x .?> "NextUpdateAvailabilityDate")- <*> (x .?> "LastSoftwareUpdate")- <*> (x .?> "GatewayName")- <*> (x .?> "GatewayId")- <*> (x .?> "GatewayType")- <*> (x .?> "GatewayTimezone")- <*> (pure (fromEnum s)))--instance Hashable DescribeGatewayInformation where--instance NFData DescribeGatewayInformation where--instance ToHeaders DescribeGatewayInformation where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.DescribeGatewayInformation"- :: ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON DescribeGatewayInformation where- toJSON DescribeGatewayInformation'{..}- = object- (catMaybes [Just ("GatewayARN" .= _dgiGatewayARN)])--instance ToPath DescribeGatewayInformation where- toPath = const "/"--instance ToQuery DescribeGatewayInformation where- toQuery = const mempty---- | A JSON object containing the following fields:------------ /See:/ 'describeGatewayInformationResponse' smart constructor.-data DescribeGatewayInformationResponse = DescribeGatewayInformationResponse'- { _dgirsGatewayState :: !(Maybe Text)- , _dgirsGatewayARN :: !(Maybe Text)- , _dgirsGatewayNetworkInterfaces :: !(Maybe [NetworkInterface])- , _dgirsNextUpdateAvailabilityDate :: !(Maybe Text)- , _dgirsLastSoftwareUpdate :: !(Maybe Text)- , _dgirsGatewayName :: !(Maybe Text)- , _dgirsGatewayId :: !(Maybe Text)- , _dgirsGatewayType :: !(Maybe Text)- , _dgirsGatewayTimezone :: !(Maybe Text)- , _dgirsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeGatewayInformationResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dgirsGatewayState' - A value that indicates the operating state of the gateway.------ * 'dgirsGatewayARN' - Undocumented member.------ * 'dgirsGatewayNetworkInterfaces' - A 'NetworkInterface' array that contains descriptions of the gateway network interfaces.------ * 'dgirsNextUpdateAvailabilityDate' - The date on which an update to the gateway is available. This date is in the time zone of the gateway. If the gateway is not available for an update this field is not returned in the response.------ * 'dgirsLastSoftwareUpdate' - The date on which the last software update was applied to the gateway. If the gateway has never been updated, this field does not return a value in the response.------ * 'dgirsGatewayName' - The name you configured for your gateway.------ * 'dgirsGatewayId' - The unique identifier assigned to your gateway during activation. This ID becomes part of the gateway Amazon Resource Name (ARN), which you use as input for other operations.------ * 'dgirsGatewayType' - The type of the gateway.------ * 'dgirsGatewayTimezone' - A value that indicates the time zone configured for the gateway.------ * 'dgirsResponseStatus' - -- | The response status code.-describeGatewayInformationResponse- :: Int -- ^ 'dgirsResponseStatus'- -> DescribeGatewayInformationResponse-describeGatewayInformationResponse pResponseStatus_ =- DescribeGatewayInformationResponse'- { _dgirsGatewayState = Nothing- , _dgirsGatewayARN = Nothing- , _dgirsGatewayNetworkInterfaces = Nothing- , _dgirsNextUpdateAvailabilityDate = Nothing- , _dgirsLastSoftwareUpdate = Nothing- , _dgirsGatewayName = Nothing- , _dgirsGatewayId = Nothing- , _dgirsGatewayType = Nothing- , _dgirsGatewayTimezone = Nothing- , _dgirsResponseStatus = pResponseStatus_- }----- | A value that indicates the operating state of the gateway.-dgirsGatewayState :: Lens' DescribeGatewayInformationResponse (Maybe Text)-dgirsGatewayState = lens _dgirsGatewayState (\ s a -> s{_dgirsGatewayState = a})---- | Undocumented member.-dgirsGatewayARN :: Lens' DescribeGatewayInformationResponse (Maybe Text)-dgirsGatewayARN = lens _dgirsGatewayARN (\ s a -> s{_dgirsGatewayARN = a})---- | A 'NetworkInterface' array that contains descriptions of the gateway network interfaces.-dgirsGatewayNetworkInterfaces :: Lens' DescribeGatewayInformationResponse [NetworkInterface]-dgirsGatewayNetworkInterfaces = lens _dgirsGatewayNetworkInterfaces (\ s a -> s{_dgirsGatewayNetworkInterfaces = a}) . _Default . _Coerce---- | The date on which an update to the gateway is available. This date is in the time zone of the gateway. If the gateway is not available for an update this field is not returned in the response.-dgirsNextUpdateAvailabilityDate :: Lens' DescribeGatewayInformationResponse (Maybe Text)-dgirsNextUpdateAvailabilityDate = lens _dgirsNextUpdateAvailabilityDate (\ s a -> s{_dgirsNextUpdateAvailabilityDate = a})---- | The date on which the last software update was applied to the gateway. If the gateway has never been updated, this field does not return a value in the response.-dgirsLastSoftwareUpdate :: Lens' DescribeGatewayInformationResponse (Maybe Text)-dgirsLastSoftwareUpdate = lens _dgirsLastSoftwareUpdate (\ s a -> s{_dgirsLastSoftwareUpdate = a})---- | The name you configured for your gateway.-dgirsGatewayName :: Lens' DescribeGatewayInformationResponse (Maybe Text)-dgirsGatewayName = lens _dgirsGatewayName (\ s a -> s{_dgirsGatewayName = a})---- | The unique identifier assigned to your gateway during activation. This ID becomes part of the gateway Amazon Resource Name (ARN), which you use as input for other operations.-dgirsGatewayId :: Lens' DescribeGatewayInformationResponse (Maybe Text)-dgirsGatewayId = lens _dgirsGatewayId (\ s a -> s{_dgirsGatewayId = a})---- | The type of the gateway.-dgirsGatewayType :: Lens' DescribeGatewayInformationResponse (Maybe Text)-dgirsGatewayType = lens _dgirsGatewayType (\ s a -> s{_dgirsGatewayType = a})---- | A value that indicates the time zone configured for the gateway.-dgirsGatewayTimezone :: Lens' DescribeGatewayInformationResponse (Maybe Text)-dgirsGatewayTimezone = lens _dgirsGatewayTimezone (\ s a -> s{_dgirsGatewayTimezone = a})---- | -- | The response status code.-dgirsResponseStatus :: Lens' DescribeGatewayInformationResponse Int-dgirsResponseStatus = lens _dgirsResponseStatus (\ s a -> s{_dgirsResponseStatus = a})--instance NFData DescribeGatewayInformationResponse- where
− gen/Network/AWS/StorageGateway/DescribeMaintenanceStartTime.hs
@@ -1,196 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.DescribeMaintenanceStartTime--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Returns your gateway's weekly maintenance start time including the day and time of the week. Note that values are in terms of the gateway's time zone.-------module Network.AWS.StorageGateway.DescribeMaintenanceStartTime- (- -- * Creating a Request- describeMaintenanceStartTime- , DescribeMaintenanceStartTime- -- * Request Lenses- , dmstGatewayARN-- -- * Destructuring the Response- , describeMaintenanceStartTimeResponse- , DescribeMaintenanceStartTimeResponse- -- * Response Lenses- , dmstrsGatewayARN- , dmstrsMinuteOfHour- , dmstrsHourOfDay- , dmstrsTimezone- , dmstrsDayOfWeek- , dmstrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | A JSON object containing the of the gateway.------------ /See:/ 'describeMaintenanceStartTime' smart constructor.-newtype DescribeMaintenanceStartTime = DescribeMaintenanceStartTime'- { _dmstGatewayARN :: Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeMaintenanceStartTime' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dmstGatewayARN' - Undocumented member.-describeMaintenanceStartTime- :: Text -- ^ 'dmstGatewayARN'- -> DescribeMaintenanceStartTime-describeMaintenanceStartTime pGatewayARN_ =- DescribeMaintenanceStartTime' {_dmstGatewayARN = pGatewayARN_}----- | Undocumented member.-dmstGatewayARN :: Lens' DescribeMaintenanceStartTime Text-dmstGatewayARN = lens _dmstGatewayARN (\ s a -> s{_dmstGatewayARN = a})--instance AWSRequest DescribeMaintenanceStartTime- where- type Rs DescribeMaintenanceStartTime =- DescribeMaintenanceStartTimeResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- DescribeMaintenanceStartTimeResponse' <$>- (x .?> "GatewayARN") <*> (x .?> "MinuteOfHour") <*>- (x .?> "HourOfDay")- <*> (x .?> "Timezone")- <*> (x .?> "DayOfWeek")- <*> (pure (fromEnum s)))--instance Hashable DescribeMaintenanceStartTime where--instance NFData DescribeMaintenanceStartTime where--instance ToHeaders DescribeMaintenanceStartTime where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.DescribeMaintenanceStartTime"- :: ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON DescribeMaintenanceStartTime where- toJSON DescribeMaintenanceStartTime'{..}- = object- (catMaybes [Just ("GatewayARN" .= _dmstGatewayARN)])--instance ToPath DescribeMaintenanceStartTime where- toPath = const "/"--instance ToQuery DescribeMaintenanceStartTime where- toQuery = const mempty---- | A JSON object containing the following fields:--------- * 'DescribeMaintenanceStartTimeOutput$DayOfWeek'------ * 'DescribeMaintenanceStartTimeOutput$HourOfDay'------ * 'DescribeMaintenanceStartTimeOutput$MinuteOfHour'------ * 'DescribeMaintenanceStartTimeOutput$Timezone'--------------- /See:/ 'describeMaintenanceStartTimeResponse' smart constructor.-data DescribeMaintenanceStartTimeResponse = DescribeMaintenanceStartTimeResponse'- { _dmstrsGatewayARN :: !(Maybe Text)- , _dmstrsMinuteOfHour :: !(Maybe Nat)- , _dmstrsHourOfDay :: !(Maybe Nat)- , _dmstrsTimezone :: !(Maybe Text)- , _dmstrsDayOfWeek :: !(Maybe Nat)- , _dmstrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeMaintenanceStartTimeResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dmstrsGatewayARN' - Undocumented member.------ * 'dmstrsMinuteOfHour' - The minute component of the maintenance start time represented as /mm/ , where /mm/ is the minute (0 to 59). The minute of the hour is in the time zone of the gateway.------ * 'dmstrsHourOfDay' - The hour component of the maintenance start time represented as /hh/ , where /hh/ is the hour (0 to 23). The hour of the day is in the time zone of the gateway.------ * 'dmstrsTimezone' - Undocumented member.------ * 'dmstrsDayOfWeek' - An ordinal number between 0 and 6 that represents the day of the week, where 0 represents Sunday and 6 represents Saturday. The day of week is in the time zone of the gateway.------ * 'dmstrsResponseStatus' - -- | The response status code.-describeMaintenanceStartTimeResponse- :: Int -- ^ 'dmstrsResponseStatus'- -> DescribeMaintenanceStartTimeResponse-describeMaintenanceStartTimeResponse pResponseStatus_ =- DescribeMaintenanceStartTimeResponse'- { _dmstrsGatewayARN = Nothing- , _dmstrsMinuteOfHour = Nothing- , _dmstrsHourOfDay = Nothing- , _dmstrsTimezone = Nothing- , _dmstrsDayOfWeek = Nothing- , _dmstrsResponseStatus = pResponseStatus_- }----- | Undocumented member.-dmstrsGatewayARN :: Lens' DescribeMaintenanceStartTimeResponse (Maybe Text)-dmstrsGatewayARN = lens _dmstrsGatewayARN (\ s a -> s{_dmstrsGatewayARN = a})---- | The minute component of the maintenance start time represented as /mm/ , where /mm/ is the minute (0 to 59). The minute of the hour is in the time zone of the gateway.-dmstrsMinuteOfHour :: Lens' DescribeMaintenanceStartTimeResponse (Maybe Natural)-dmstrsMinuteOfHour = lens _dmstrsMinuteOfHour (\ s a -> s{_dmstrsMinuteOfHour = a}) . mapping _Nat---- | The hour component of the maintenance start time represented as /hh/ , where /hh/ is the hour (0 to 23). The hour of the day is in the time zone of the gateway.-dmstrsHourOfDay :: Lens' DescribeMaintenanceStartTimeResponse (Maybe Natural)-dmstrsHourOfDay = lens _dmstrsHourOfDay (\ s a -> s{_dmstrsHourOfDay = a}) . mapping _Nat---- | Undocumented member.-dmstrsTimezone :: Lens' DescribeMaintenanceStartTimeResponse (Maybe Text)-dmstrsTimezone = lens _dmstrsTimezone (\ s a -> s{_dmstrsTimezone = a})---- | An ordinal number between 0 and 6 that represents the day of the week, where 0 represents Sunday and 6 represents Saturday. The day of week is in the time zone of the gateway.-dmstrsDayOfWeek :: Lens' DescribeMaintenanceStartTimeResponse (Maybe Natural)-dmstrsDayOfWeek = lens _dmstrsDayOfWeek (\ s a -> s{_dmstrsDayOfWeek = a}) . mapping _Nat---- | -- | The response status code.-dmstrsResponseStatus :: Lens' DescribeMaintenanceStartTimeResponse Int-dmstrsResponseStatus = lens _dmstrsResponseStatus (\ s a -> s{_dmstrsResponseStatus = a})--instance NFData DescribeMaintenanceStartTimeResponse- where
@@ -1,147 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.DescribeNFSFileShares--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Gets a description for one or more file shares from a file gateway. This operation is only supported in the file gateway type.-------module Network.AWS.StorageGateway.DescribeNFSFileShares- (- -- * Creating a Request- describeNFSFileShares- , DescribeNFSFileShares- -- * Request Lenses- , dnfsfsFileShareARNList-- -- * Destructuring the Response- , describeNFSFileSharesResponse- , DescribeNFSFileSharesResponse- -- * Response Lenses- , dnfsfsrsNFSFileShareInfoList- , dnfsfsrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | DescribeNFSFileSharesInput------------ /See:/ 'describeNFSFileShares' smart constructor.-newtype DescribeNFSFileShares = DescribeNFSFileShares'- { _dnfsfsFileShareARNList :: List1 Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeNFSFileShares' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dnfsfsFileShareARNList' - An array containing the Amazon Resource Name (ARN) of each file share to be described.-describeNFSFileShares- :: NonEmpty Text -- ^ 'dnfsfsFileShareARNList'- -> DescribeNFSFileShares-describeNFSFileShares pFileShareARNList_ =- DescribeNFSFileShares' {_dnfsfsFileShareARNList = _List1 # pFileShareARNList_}----- | An array containing the Amazon Resource Name (ARN) of each file share to be described.-dnfsfsFileShareARNList :: Lens' DescribeNFSFileShares (NonEmpty Text)-dnfsfsFileShareARNList = lens _dnfsfsFileShareARNList (\ s a -> s{_dnfsfsFileShareARNList = a}) . _List1--instance AWSRequest DescribeNFSFileShares where- type Rs DescribeNFSFileShares =- DescribeNFSFileSharesResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- DescribeNFSFileSharesResponse' <$>- (x .?> "NFSFileShareInfoList" .!@ mempty) <*>- (pure (fromEnum s)))--instance Hashable DescribeNFSFileShares where--instance NFData DescribeNFSFileShares where--instance ToHeaders DescribeNFSFileShares where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.DescribeNFSFileShares" ::- ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON DescribeNFSFileShares where- toJSON DescribeNFSFileShares'{..}- = object- (catMaybes- [Just- ("FileShareARNList" .= _dnfsfsFileShareARNList)])--instance ToPath DescribeNFSFileShares where- toPath = const "/"--instance ToQuery DescribeNFSFileShares where- toQuery = const mempty---- | DescribeNFSFileSharesOutput------------ /See:/ 'describeNFSFileSharesResponse' smart constructor.-data DescribeNFSFileSharesResponse = DescribeNFSFileSharesResponse'- { _dnfsfsrsNFSFileShareInfoList :: !(Maybe [NFSFileShareInfo])- , _dnfsfsrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeNFSFileSharesResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dnfsfsrsNFSFileShareInfoList' - An array containing a description for each requested file share.------ * 'dnfsfsrsResponseStatus' - -- | The response status code.-describeNFSFileSharesResponse- :: Int -- ^ 'dnfsfsrsResponseStatus'- -> DescribeNFSFileSharesResponse-describeNFSFileSharesResponse pResponseStatus_ =- DescribeNFSFileSharesResponse'- { _dnfsfsrsNFSFileShareInfoList = Nothing- , _dnfsfsrsResponseStatus = pResponseStatus_- }----- | An array containing a description for each requested file share.-dnfsfsrsNFSFileShareInfoList :: Lens' DescribeNFSFileSharesResponse [NFSFileShareInfo]-dnfsfsrsNFSFileShareInfoList = lens _dnfsfsrsNFSFileShareInfoList (\ s a -> s{_dnfsfsrsNFSFileShareInfoList = a}) . _Default . _Coerce---- | -- | The response status code.-dnfsfsrsResponseStatus :: Lens' DescribeNFSFileSharesResponse Int-dnfsfsrsResponseStatus = lens _dnfsfsrsResponseStatus (\ s a -> s{_dnfsfsrsResponseStatus = a})--instance NFData DescribeNFSFileSharesResponse where
− gen/Network/AWS/StorageGateway/DescribeSnapshotSchedule.hs
@@ -1,181 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.DescribeSnapshotSchedule--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Describes the snapshot schedule for the specified gateway volume. The snapshot schedule information includes intervals at which snapshots are automatically initiated on the volume. This operation is only supported in the cached volume and stored volume types.-------module Network.AWS.StorageGateway.DescribeSnapshotSchedule- (- -- * Creating a Request- describeSnapshotSchedule- , DescribeSnapshotSchedule- -- * Request Lenses- , dssVolumeARN-- -- * Destructuring the Response- , describeSnapshotScheduleResponse- , DescribeSnapshotScheduleResponse- -- * Response Lenses- , dssrsStartAt- , dssrsVolumeARN- , dssrsRecurrenceInHours- , dssrsTimezone- , dssrsDescription- , dssrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | A JSON object containing the 'DescribeSnapshotScheduleInput$VolumeARN' of the volume.------------ /See:/ 'describeSnapshotSchedule' smart constructor.-newtype DescribeSnapshotSchedule = DescribeSnapshotSchedule'- { _dssVolumeARN :: Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeSnapshotSchedule' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dssVolumeARN' - The Amazon Resource Name (ARN) of the volume. Use the 'ListVolumes' operation to return a list of gateway volumes.-describeSnapshotSchedule- :: Text -- ^ 'dssVolumeARN'- -> DescribeSnapshotSchedule-describeSnapshotSchedule pVolumeARN_ =- DescribeSnapshotSchedule' {_dssVolumeARN = pVolumeARN_}----- | The Amazon Resource Name (ARN) of the volume. Use the 'ListVolumes' operation to return a list of gateway volumes.-dssVolumeARN :: Lens' DescribeSnapshotSchedule Text-dssVolumeARN = lens _dssVolumeARN (\ s a -> s{_dssVolumeARN = a})--instance AWSRequest DescribeSnapshotSchedule where- type Rs DescribeSnapshotSchedule =- DescribeSnapshotScheduleResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- DescribeSnapshotScheduleResponse' <$>- (x .?> "StartAt") <*> (x .?> "VolumeARN") <*>- (x .?> "RecurrenceInHours")- <*> (x .?> "Timezone")- <*> (x .?> "Description")- <*> (pure (fromEnum s)))--instance Hashable DescribeSnapshotSchedule where--instance NFData DescribeSnapshotSchedule where--instance ToHeaders DescribeSnapshotSchedule where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.DescribeSnapshotSchedule"- :: ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON DescribeSnapshotSchedule where- toJSON DescribeSnapshotSchedule'{..}- = object- (catMaybes [Just ("VolumeARN" .= _dssVolumeARN)])--instance ToPath DescribeSnapshotSchedule where- toPath = const "/"--instance ToQuery DescribeSnapshotSchedule where- toQuery = const mempty---- | /See:/ 'describeSnapshotScheduleResponse' smart constructor.-data DescribeSnapshotScheduleResponse = DescribeSnapshotScheduleResponse'- { _dssrsStartAt :: !(Maybe Nat)- , _dssrsVolumeARN :: !(Maybe Text)- , _dssrsRecurrenceInHours :: !(Maybe Nat)- , _dssrsTimezone :: !(Maybe Text)- , _dssrsDescription :: !(Maybe Text)- , _dssrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeSnapshotScheduleResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dssrsStartAt' - Undocumented member.------ * 'dssrsVolumeARN' - Undocumented member.------ * 'dssrsRecurrenceInHours' - Undocumented member.------ * 'dssrsTimezone' - Undocumented member.------ * 'dssrsDescription' - Undocumented member.------ * 'dssrsResponseStatus' - -- | The response status code.-describeSnapshotScheduleResponse- :: Int -- ^ 'dssrsResponseStatus'- -> DescribeSnapshotScheduleResponse-describeSnapshotScheduleResponse pResponseStatus_ =- DescribeSnapshotScheduleResponse'- { _dssrsStartAt = Nothing- , _dssrsVolumeARN = Nothing- , _dssrsRecurrenceInHours = Nothing- , _dssrsTimezone = Nothing- , _dssrsDescription = Nothing- , _dssrsResponseStatus = pResponseStatus_- }----- | Undocumented member.-dssrsStartAt :: Lens' DescribeSnapshotScheduleResponse (Maybe Natural)-dssrsStartAt = lens _dssrsStartAt (\ s a -> s{_dssrsStartAt = a}) . mapping _Nat---- | Undocumented member.-dssrsVolumeARN :: Lens' DescribeSnapshotScheduleResponse (Maybe Text)-dssrsVolumeARN = lens _dssrsVolumeARN (\ s a -> s{_dssrsVolumeARN = a})---- | Undocumented member.-dssrsRecurrenceInHours :: Lens' DescribeSnapshotScheduleResponse (Maybe Natural)-dssrsRecurrenceInHours = lens _dssrsRecurrenceInHours (\ s a -> s{_dssrsRecurrenceInHours = a}) . mapping _Nat---- | Undocumented member.-dssrsTimezone :: Lens' DescribeSnapshotScheduleResponse (Maybe Text)-dssrsTimezone = lens _dssrsTimezone (\ s a -> s{_dssrsTimezone = a})---- | Undocumented member.-dssrsDescription :: Lens' DescribeSnapshotScheduleResponse (Maybe Text)-dssrsDescription = lens _dssrsDescription (\ s a -> s{_dssrsDescription = a})---- | -- | The response status code.-dssrsResponseStatus :: Lens' DescribeSnapshotScheduleResponse Int-dssrsResponseStatus = lens _dssrsResponseStatus (\ s a -> s{_dssrsResponseStatus = a})--instance NFData DescribeSnapshotScheduleResponse- where
− gen/Network/AWS/StorageGateway/DescribeStorediSCSIVolumes.hs
@@ -1,142 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.DescribeStorediSCSIVolumes--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Returns the description of the gateway volumes specified in the request. The list of gateway volumes in the request must be from one gateway. In the response Amazon Storage Gateway returns volume information sorted by volume ARNs. This operation is only supported in stored volume gateway type.-------module Network.AWS.StorageGateway.DescribeStorediSCSIVolumes- (- -- * Creating a Request- describeStorediSCSIVolumes- , DescribeStorediSCSIVolumes- -- * Request Lenses- , dsscsivVolumeARNs-- -- * Destructuring the Response- , describeStorediSCSIVolumesResponse- , DescribeStorediSCSIVolumesResponse- -- * Response Lenses- , dsscsivrsStorediSCSIVolumes- , dsscsivrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | A JSON object containing a list of 'DescribeStorediSCSIVolumesInput$VolumeARNs' .------------ /See:/ 'describeStorediSCSIVolumes' smart constructor.-newtype DescribeStorediSCSIVolumes = DescribeStorediSCSIVolumes'- { _dsscsivVolumeARNs :: [Text]- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeStorediSCSIVolumes' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dsscsivVolumeARNs' - An array of strings where each string represents the Amazon Resource Name (ARN) of a stored volume. All of the specified stored volumes must from the same gateway. Use 'ListVolumes' to get volume ARNs for a gateway.-describeStorediSCSIVolumes- :: DescribeStorediSCSIVolumes-describeStorediSCSIVolumes =- DescribeStorediSCSIVolumes' {_dsscsivVolumeARNs = mempty}----- | An array of strings where each string represents the Amazon Resource Name (ARN) of a stored volume. All of the specified stored volumes must from the same gateway. Use 'ListVolumes' to get volume ARNs for a gateway.-dsscsivVolumeARNs :: Lens' DescribeStorediSCSIVolumes [Text]-dsscsivVolumeARNs = lens _dsscsivVolumeARNs (\ s a -> s{_dsscsivVolumeARNs = a}) . _Coerce--instance AWSRequest DescribeStorediSCSIVolumes where- type Rs DescribeStorediSCSIVolumes =- DescribeStorediSCSIVolumesResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- DescribeStorediSCSIVolumesResponse' <$>- (x .?> "StorediSCSIVolumes" .!@ mempty) <*>- (pure (fromEnum s)))--instance Hashable DescribeStorediSCSIVolumes where--instance NFData DescribeStorediSCSIVolumes where--instance ToHeaders DescribeStorediSCSIVolumes where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.DescribeStorediSCSIVolumes"- :: ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON DescribeStorediSCSIVolumes where- toJSON DescribeStorediSCSIVolumes'{..}- = object- (catMaybes- [Just ("VolumeARNs" .= _dsscsivVolumeARNs)])--instance ToPath DescribeStorediSCSIVolumes where- toPath = const "/"--instance ToQuery DescribeStorediSCSIVolumes where- toQuery = const mempty---- | /See:/ 'describeStorediSCSIVolumesResponse' smart constructor.-data DescribeStorediSCSIVolumesResponse = DescribeStorediSCSIVolumesResponse'- { _dsscsivrsStorediSCSIVolumes :: !(Maybe [StorediSCSIVolume])- , _dsscsivrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeStorediSCSIVolumesResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dsscsivrsStorediSCSIVolumes' - Undocumented member.------ * 'dsscsivrsResponseStatus' - -- | The response status code.-describeStorediSCSIVolumesResponse- :: Int -- ^ 'dsscsivrsResponseStatus'- -> DescribeStorediSCSIVolumesResponse-describeStorediSCSIVolumesResponse pResponseStatus_ =- DescribeStorediSCSIVolumesResponse'- { _dsscsivrsStorediSCSIVolumes = Nothing- , _dsscsivrsResponseStatus = pResponseStatus_- }----- | Undocumented member.-dsscsivrsStorediSCSIVolumes :: Lens' DescribeStorediSCSIVolumesResponse [StorediSCSIVolume]-dsscsivrsStorediSCSIVolumes = lens _dsscsivrsStorediSCSIVolumes (\ s a -> s{_dsscsivrsStorediSCSIVolumes = a}) . _Default . _Coerce---- | -- | The response status code.-dsscsivrsResponseStatus :: Lens' DescribeStorediSCSIVolumesResponse Int-dsscsivrsResponseStatus = lens _dsscsivrsResponseStatus (\ s a -> s{_dsscsivrsResponseStatus = a})--instance NFData DescribeStorediSCSIVolumesResponse- where
− gen/Network/AWS/StorageGateway/DescribeTapeArchives.hs
@@ -1,186 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.DescribeTapeArchives--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Returns a description of specified virtual tapes in the virtual tape shelf (VTS). This operation is only supported in the tape gateway type.--------- If a specific @TapeARN@ is not specified, AWS Storage Gateway returns a description of all virtual tapes found in the VTS associated with your account.--------- This operation returns paginated results.-module Network.AWS.StorageGateway.DescribeTapeArchives- (- -- * Creating a Request- describeTapeArchives- , DescribeTapeArchives- -- * Request Lenses- , dtaMarker- , dtaLimit- , dtaTapeARNs-- -- * Destructuring the Response- , describeTapeArchivesResponse- , DescribeTapeArchivesResponse- -- * Response Lenses- , dtarsTapeArchives- , dtarsMarker- , dtarsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Pager-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | DescribeTapeArchivesInput------------ /See:/ 'describeTapeArchives' smart constructor.-data DescribeTapeArchives = DescribeTapeArchives'- { _dtaMarker :: !(Maybe Text)- , _dtaLimit :: !(Maybe Nat)- , _dtaTapeARNs :: !(Maybe [Text])- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeTapeArchives' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dtaMarker' - An opaque string that indicates the position at which to begin describing virtual tapes.------ * 'dtaLimit' - Specifies that the number of virtual tapes descried be limited to the specified number.------ * 'dtaTapeARNs' - Specifies one or more unique Amazon Resource Names (ARNs) that represent the virtual tapes you want to describe.-describeTapeArchives- :: DescribeTapeArchives-describeTapeArchives =- DescribeTapeArchives'- {_dtaMarker = Nothing, _dtaLimit = Nothing, _dtaTapeARNs = Nothing}----- | An opaque string that indicates the position at which to begin describing virtual tapes.-dtaMarker :: Lens' DescribeTapeArchives (Maybe Text)-dtaMarker = lens _dtaMarker (\ s a -> s{_dtaMarker = a})---- | Specifies that the number of virtual tapes descried be limited to the specified number.-dtaLimit :: Lens' DescribeTapeArchives (Maybe Natural)-dtaLimit = lens _dtaLimit (\ s a -> s{_dtaLimit = a}) . mapping _Nat---- | Specifies one or more unique Amazon Resource Names (ARNs) that represent the virtual tapes you want to describe.-dtaTapeARNs :: Lens' DescribeTapeArchives [Text]-dtaTapeARNs = lens _dtaTapeARNs (\ s a -> s{_dtaTapeARNs = a}) . _Default . _Coerce--instance AWSPager DescribeTapeArchives where- page rq rs- | stop (rs ^. dtarsMarker) = Nothing- | stop (rs ^. dtarsTapeArchives) = Nothing- | otherwise =- Just $ rq & dtaMarker .~ rs ^. dtarsMarker--instance AWSRequest DescribeTapeArchives where- type Rs DescribeTapeArchives =- DescribeTapeArchivesResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- DescribeTapeArchivesResponse' <$>- (x .?> "TapeArchives" .!@ mempty) <*>- (x .?> "Marker")- <*> (pure (fromEnum s)))--instance Hashable DescribeTapeArchives where--instance NFData DescribeTapeArchives where--instance ToHeaders DescribeTapeArchives where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.DescribeTapeArchives" ::- ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON DescribeTapeArchives where- toJSON DescribeTapeArchives'{..}- = object- (catMaybes- [("Marker" .=) <$> _dtaMarker,- ("Limit" .=) <$> _dtaLimit,- ("TapeARNs" .=) <$> _dtaTapeARNs])--instance ToPath DescribeTapeArchives where- toPath = const "/"--instance ToQuery DescribeTapeArchives where- toQuery = const mempty---- | DescribeTapeArchivesOutput------------ /See:/ 'describeTapeArchivesResponse' smart constructor.-data DescribeTapeArchivesResponse = DescribeTapeArchivesResponse'- { _dtarsTapeArchives :: !(Maybe [TapeArchive])- , _dtarsMarker :: !(Maybe Text)- , _dtarsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeTapeArchivesResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dtarsTapeArchives' - An array of virtual tape objects in the virtual tape shelf (VTS). The description includes of the Amazon Resource Name(ARN) of the virtual tapes. The information returned includes the Amazon Resource Names (ARNs) of the tapes, size of the tapes, status of the tapes, progress of the description and tape barcode.------ * 'dtarsMarker' - An opaque string that indicates the position at which the virtual tapes that were fetched for description ended. Use this marker in your next request to fetch the next set of virtual tapes in the virtual tape shelf (VTS). If there are no more virtual tapes to describe, this field does not appear in the response.------ * 'dtarsResponseStatus' - -- | The response status code.-describeTapeArchivesResponse- :: Int -- ^ 'dtarsResponseStatus'- -> DescribeTapeArchivesResponse-describeTapeArchivesResponse pResponseStatus_ =- DescribeTapeArchivesResponse'- { _dtarsTapeArchives = Nothing- , _dtarsMarker = Nothing- , _dtarsResponseStatus = pResponseStatus_- }----- | An array of virtual tape objects in the virtual tape shelf (VTS). The description includes of the Amazon Resource Name(ARN) of the virtual tapes. The information returned includes the Amazon Resource Names (ARNs) of the tapes, size of the tapes, status of the tapes, progress of the description and tape barcode.-dtarsTapeArchives :: Lens' DescribeTapeArchivesResponse [TapeArchive]-dtarsTapeArchives = lens _dtarsTapeArchives (\ s a -> s{_dtarsTapeArchives = a}) . _Default . _Coerce---- | An opaque string that indicates the position at which the virtual tapes that were fetched for description ended. Use this marker in your next request to fetch the next set of virtual tapes in the virtual tape shelf (VTS). If there are no more virtual tapes to describe, this field does not appear in the response.-dtarsMarker :: Lens' DescribeTapeArchivesResponse (Maybe Text)-dtarsMarker = lens _dtarsMarker (\ s a -> s{_dtarsMarker = a})---- | -- | The response status code.-dtarsResponseStatus :: Lens' DescribeTapeArchivesResponse Int-dtarsResponseStatus = lens _dtarsResponseStatus (\ s a -> s{_dtarsResponseStatus = a})--instance NFData DescribeTapeArchivesResponse where
− gen/Network/AWS/StorageGateway/DescribeTapeRecoveryPoints.hs
@@ -1,201 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.DescribeTapeRecoveryPoints--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Returns a list of virtual tape recovery points that are available for the specified tape gateway.--------- A recovery point is a point-in-time view of a virtual tape at which all the data on the virtual tape is consistent. If your gateway crashes, virtual tapes that have recovery points can be recovered to a new gateway. This operation is only supported in the tape gateway type.--------- This operation returns paginated results.-module Network.AWS.StorageGateway.DescribeTapeRecoveryPoints- (- -- * Creating a Request- describeTapeRecoveryPoints- , DescribeTapeRecoveryPoints- -- * Request Lenses- , dtrpMarker- , dtrpLimit- , dtrpGatewayARN-- -- * Destructuring the Response- , describeTapeRecoveryPointsResponse- , DescribeTapeRecoveryPointsResponse- -- * Response Lenses- , dtrprsTapeRecoveryPointInfos- , dtrprsGatewayARN- , dtrprsMarker- , dtrprsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Pager-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | DescribeTapeRecoveryPointsInput------------ /See:/ 'describeTapeRecoveryPoints' smart constructor.-data DescribeTapeRecoveryPoints = DescribeTapeRecoveryPoints'- { _dtrpMarker :: !(Maybe Text)- , _dtrpLimit :: !(Maybe Nat)- , _dtrpGatewayARN :: !Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeTapeRecoveryPoints' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dtrpMarker' - An opaque string that indicates the position at which to begin describing the virtual tape recovery points.------ * 'dtrpLimit' - Specifies that the number of virtual tape recovery points that are described be limited to the specified number.------ * 'dtrpGatewayARN' - Undocumented member.-describeTapeRecoveryPoints- :: Text -- ^ 'dtrpGatewayARN'- -> DescribeTapeRecoveryPoints-describeTapeRecoveryPoints pGatewayARN_ =- DescribeTapeRecoveryPoints'- { _dtrpMarker = Nothing- , _dtrpLimit = Nothing- , _dtrpGatewayARN = pGatewayARN_- }----- | An opaque string that indicates the position at which to begin describing the virtual tape recovery points.-dtrpMarker :: Lens' DescribeTapeRecoveryPoints (Maybe Text)-dtrpMarker = lens _dtrpMarker (\ s a -> s{_dtrpMarker = a})---- | Specifies that the number of virtual tape recovery points that are described be limited to the specified number.-dtrpLimit :: Lens' DescribeTapeRecoveryPoints (Maybe Natural)-dtrpLimit = lens _dtrpLimit (\ s a -> s{_dtrpLimit = a}) . mapping _Nat---- | Undocumented member.-dtrpGatewayARN :: Lens' DescribeTapeRecoveryPoints Text-dtrpGatewayARN = lens _dtrpGatewayARN (\ s a -> s{_dtrpGatewayARN = a})--instance AWSPager DescribeTapeRecoveryPoints where- page rq rs- | stop (rs ^. dtrprsMarker) = Nothing- | stop (rs ^. dtrprsTapeRecoveryPointInfos) = Nothing- | otherwise =- Just $ rq & dtrpMarker .~ rs ^. dtrprsMarker--instance AWSRequest DescribeTapeRecoveryPoints where- type Rs DescribeTapeRecoveryPoints =- DescribeTapeRecoveryPointsResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- DescribeTapeRecoveryPointsResponse' <$>- (x .?> "TapeRecoveryPointInfos" .!@ mempty) <*>- (x .?> "GatewayARN")- <*> (x .?> "Marker")- <*> (pure (fromEnum s)))--instance Hashable DescribeTapeRecoveryPoints where--instance NFData DescribeTapeRecoveryPoints where--instance ToHeaders DescribeTapeRecoveryPoints where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.DescribeTapeRecoveryPoints"- :: ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON DescribeTapeRecoveryPoints where- toJSON DescribeTapeRecoveryPoints'{..}- = object- (catMaybes- [("Marker" .=) <$> _dtrpMarker,- ("Limit" .=) <$> _dtrpLimit,- Just ("GatewayARN" .= _dtrpGatewayARN)])--instance ToPath DescribeTapeRecoveryPoints where- toPath = const "/"--instance ToQuery DescribeTapeRecoveryPoints where- toQuery = const mempty---- | DescribeTapeRecoveryPointsOutput------------ /See:/ 'describeTapeRecoveryPointsResponse' smart constructor.-data DescribeTapeRecoveryPointsResponse = DescribeTapeRecoveryPointsResponse'- { _dtrprsTapeRecoveryPointInfos :: !(Maybe [TapeRecoveryPointInfo])- , _dtrprsGatewayARN :: !(Maybe Text)- , _dtrprsMarker :: !(Maybe Text)- , _dtrprsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeTapeRecoveryPointsResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dtrprsTapeRecoveryPointInfos' - An array of TapeRecoveryPointInfos that are available for the specified gateway.------ * 'dtrprsGatewayARN' - Undocumented member.------ * 'dtrprsMarker' - An opaque string that indicates the position at which the virtual tape recovery points that were listed for description ended. Use this marker in your next request to list the next set of virtual tape recovery points in the list. If there are no more recovery points to describe, this field does not appear in the response.------ * 'dtrprsResponseStatus' - -- | The response status code.-describeTapeRecoveryPointsResponse- :: Int -- ^ 'dtrprsResponseStatus'- -> DescribeTapeRecoveryPointsResponse-describeTapeRecoveryPointsResponse pResponseStatus_ =- DescribeTapeRecoveryPointsResponse'- { _dtrprsTapeRecoveryPointInfos = Nothing- , _dtrprsGatewayARN = Nothing- , _dtrprsMarker = Nothing- , _dtrprsResponseStatus = pResponseStatus_- }----- | An array of TapeRecoveryPointInfos that are available for the specified gateway.-dtrprsTapeRecoveryPointInfos :: Lens' DescribeTapeRecoveryPointsResponse [TapeRecoveryPointInfo]-dtrprsTapeRecoveryPointInfos = lens _dtrprsTapeRecoveryPointInfos (\ s a -> s{_dtrprsTapeRecoveryPointInfos = a}) . _Default . _Coerce---- | Undocumented member.-dtrprsGatewayARN :: Lens' DescribeTapeRecoveryPointsResponse (Maybe Text)-dtrprsGatewayARN = lens _dtrprsGatewayARN (\ s a -> s{_dtrprsGatewayARN = a})---- | An opaque string that indicates the position at which the virtual tape recovery points that were listed for description ended. Use this marker in your next request to list the next set of virtual tape recovery points in the list. If there are no more recovery points to describe, this field does not appear in the response.-dtrprsMarker :: Lens' DescribeTapeRecoveryPointsResponse (Maybe Text)-dtrprsMarker = lens _dtrprsMarker (\ s a -> s{_dtrprsMarker = a})---- | -- | The response status code.-dtrprsResponseStatus :: Lens' DescribeTapeRecoveryPointsResponse Int-dtrprsResponseStatus = lens _dtrprsResponseStatus (\ s a -> s{_dtrprsResponseStatus = a})--instance NFData DescribeTapeRecoveryPointsResponse- where
− gen/Network/AWS/StorageGateway/DescribeTapes.hs
@@ -1,196 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.DescribeTapes--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Returns a description of the specified Amazon Resource Name (ARN) of virtual tapes. If a @TapeARN@ is not specified, returns a description of all virtual tapes associated with the specified gateway. This operation is only supported in the tape gateway type.------------ This operation returns paginated results.-module Network.AWS.StorageGateway.DescribeTapes- (- -- * Creating a Request- describeTapes- , DescribeTapes- -- * Request Lenses- , dtMarker- , dtLimit- , dtTapeARNs- , dtGatewayARN-- -- * Destructuring the Response- , describeTapesResponse- , DescribeTapesResponse- -- * Response Lenses- , dtsrsMarker- , dtsrsTapes- , dtsrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Pager-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | DescribeTapesInput------------ /See:/ 'describeTapes' smart constructor.-data DescribeTapes = DescribeTapes'- { _dtMarker :: !(Maybe Text)- , _dtLimit :: !(Maybe Nat)- , _dtTapeARNs :: !(Maybe [Text])- , _dtGatewayARN :: !Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeTapes' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dtMarker' - A marker value, obtained in a previous call to @DescribeTapes@ . This marker indicates which page of results to retrieve. If not specified, the first page of results is retrieved.------ * 'dtLimit' - Specifies that the number of virtual tapes described be limited to the specified number.------ * 'dtTapeARNs' - Specifies one or more unique Amazon Resource Names (ARNs) that represent the virtual tapes you want to describe. If this parameter is not specified, Tape gateway returns a description of all virtual tapes associated with the specified gateway.------ * 'dtGatewayARN' - Undocumented member.-describeTapes- :: Text -- ^ 'dtGatewayARN'- -> DescribeTapes-describeTapes pGatewayARN_ =- DescribeTapes'- { _dtMarker = Nothing- , _dtLimit = Nothing- , _dtTapeARNs = Nothing- , _dtGatewayARN = pGatewayARN_- }----- | A marker value, obtained in a previous call to @DescribeTapes@ . This marker indicates which page of results to retrieve. If not specified, the first page of results is retrieved.-dtMarker :: Lens' DescribeTapes (Maybe Text)-dtMarker = lens _dtMarker (\ s a -> s{_dtMarker = a})---- | Specifies that the number of virtual tapes described be limited to the specified number.-dtLimit :: Lens' DescribeTapes (Maybe Natural)-dtLimit = lens _dtLimit (\ s a -> s{_dtLimit = a}) . mapping _Nat---- | Specifies one or more unique Amazon Resource Names (ARNs) that represent the virtual tapes you want to describe. If this parameter is not specified, Tape gateway returns a description of all virtual tapes associated with the specified gateway.-dtTapeARNs :: Lens' DescribeTapes [Text]-dtTapeARNs = lens _dtTapeARNs (\ s a -> s{_dtTapeARNs = a}) . _Default . _Coerce---- | Undocumented member.-dtGatewayARN :: Lens' DescribeTapes Text-dtGatewayARN = lens _dtGatewayARN (\ s a -> s{_dtGatewayARN = a})--instance AWSPager DescribeTapes where- page rq rs- | stop (rs ^. dtsrsMarker) = Nothing- | stop (rs ^. dtsrsTapes) = Nothing- | otherwise =- Just $ rq & dtMarker .~ rs ^. dtsrsMarker--instance AWSRequest DescribeTapes where- type Rs DescribeTapes = DescribeTapesResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- DescribeTapesResponse' <$>- (x .?> "Marker") <*> (x .?> "Tapes" .!@ mempty) <*>- (pure (fromEnum s)))--instance Hashable DescribeTapes where--instance NFData DescribeTapes where--instance ToHeaders DescribeTapes where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.DescribeTapes" ::- ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON DescribeTapes where- toJSON DescribeTapes'{..}- = object- (catMaybes- [("Marker" .=) <$> _dtMarker,- ("Limit" .=) <$> _dtLimit,- ("TapeARNs" .=) <$> _dtTapeARNs,- Just ("GatewayARN" .= _dtGatewayARN)])--instance ToPath DescribeTapes where- toPath = const "/"--instance ToQuery DescribeTapes where- toQuery = const mempty---- | DescribeTapesOutput------------ /See:/ 'describeTapesResponse' smart constructor.-data DescribeTapesResponse = DescribeTapesResponse'- { _dtsrsMarker :: !(Maybe Text)- , _dtsrsTapes :: !(Maybe [Tape])- , _dtsrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeTapesResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dtsrsMarker' - An opaque string which can be used as part of a subsequent DescribeTapes call to retrieve the next page of results. If a response does not contain a marker, then there are no more results to be retrieved.------ * 'dtsrsTapes' - An array of virtual tape descriptions.------ * 'dtsrsResponseStatus' - -- | The response status code.-describeTapesResponse- :: Int -- ^ 'dtsrsResponseStatus'- -> DescribeTapesResponse-describeTapesResponse pResponseStatus_ =- DescribeTapesResponse'- { _dtsrsMarker = Nothing- , _dtsrsTapes = Nothing- , _dtsrsResponseStatus = pResponseStatus_- }----- | An opaque string which can be used as part of a subsequent DescribeTapes call to retrieve the next page of results. If a response does not contain a marker, then there are no more results to be retrieved.-dtsrsMarker :: Lens' DescribeTapesResponse (Maybe Text)-dtsrsMarker = lens _dtsrsMarker (\ s a -> s{_dtsrsMarker = a})---- | An array of virtual tape descriptions.-dtsrsTapes :: Lens' DescribeTapesResponse [Tape]-dtsrsTapes = lens _dtsrsTapes (\ s a -> s{_dtsrsTapes = a}) . _Default . _Coerce---- | -- | The response status code.-dtsrsResponseStatus :: Lens' DescribeTapesResponse Int-dtsrsResponseStatus = lens _dtsrsResponseStatus (\ s a -> s{_dtsrsResponseStatus = a})--instance NFData DescribeTapesResponse where
− gen/Network/AWS/StorageGateway/DescribeUploadBuffer.hs
@@ -1,169 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.DescribeUploadBuffer--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Returns information about the upload buffer of a gateway. This operation is supported for the stored volume, cached volume and tape gateway types.--------- The response includes disk IDs that are configured as upload buffer space, and it includes the amount of upload buffer space allocated and used.----module Network.AWS.StorageGateway.DescribeUploadBuffer- (- -- * Creating a Request- describeUploadBuffer- , DescribeUploadBuffer- -- * Request Lenses- , dubGatewayARN-- -- * Destructuring the Response- , describeUploadBufferResponse- , DescribeUploadBufferResponse- -- * Response Lenses- , dubrsUploadBufferAllocatedInBytes- , dubrsGatewayARN- , dubrsDiskIds- , dubrsUploadBufferUsedInBytes- , dubrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | /See:/ 'describeUploadBuffer' smart constructor.-newtype DescribeUploadBuffer = DescribeUploadBuffer'- { _dubGatewayARN :: Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeUploadBuffer' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dubGatewayARN' - Undocumented member.-describeUploadBuffer- :: Text -- ^ 'dubGatewayARN'- -> DescribeUploadBuffer-describeUploadBuffer pGatewayARN_ =- DescribeUploadBuffer' {_dubGatewayARN = pGatewayARN_}----- | Undocumented member.-dubGatewayARN :: Lens' DescribeUploadBuffer Text-dubGatewayARN = lens _dubGatewayARN (\ s a -> s{_dubGatewayARN = a})--instance AWSRequest DescribeUploadBuffer where- type Rs DescribeUploadBuffer =- DescribeUploadBufferResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- DescribeUploadBufferResponse' <$>- (x .?> "UploadBufferAllocatedInBytes") <*>- (x .?> "GatewayARN")- <*> (x .?> "DiskIds" .!@ mempty)- <*> (x .?> "UploadBufferUsedInBytes")- <*> (pure (fromEnum s)))--instance Hashable DescribeUploadBuffer where--instance NFData DescribeUploadBuffer where--instance ToHeaders DescribeUploadBuffer where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.DescribeUploadBuffer" ::- ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON DescribeUploadBuffer where- toJSON DescribeUploadBuffer'{..}- = object- (catMaybes [Just ("GatewayARN" .= _dubGatewayARN)])--instance ToPath DescribeUploadBuffer where- toPath = const "/"--instance ToQuery DescribeUploadBuffer where- toQuery = const mempty---- | /See:/ 'describeUploadBufferResponse' smart constructor.-data DescribeUploadBufferResponse = DescribeUploadBufferResponse'- { _dubrsUploadBufferAllocatedInBytes :: !(Maybe Integer)- , _dubrsGatewayARN :: !(Maybe Text)- , _dubrsDiskIds :: !(Maybe [Text])- , _dubrsUploadBufferUsedInBytes :: !(Maybe Integer)- , _dubrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeUploadBufferResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dubrsUploadBufferAllocatedInBytes' - Undocumented member.------ * 'dubrsGatewayARN' - Undocumented member.------ * 'dubrsDiskIds' - Undocumented member.------ * 'dubrsUploadBufferUsedInBytes' - Undocumented member.------ * 'dubrsResponseStatus' - -- | The response status code.-describeUploadBufferResponse- :: Int -- ^ 'dubrsResponseStatus'- -> DescribeUploadBufferResponse-describeUploadBufferResponse pResponseStatus_ =- DescribeUploadBufferResponse'- { _dubrsUploadBufferAllocatedInBytes = Nothing- , _dubrsGatewayARN = Nothing- , _dubrsDiskIds = Nothing- , _dubrsUploadBufferUsedInBytes = Nothing- , _dubrsResponseStatus = pResponseStatus_- }----- | Undocumented member.-dubrsUploadBufferAllocatedInBytes :: Lens' DescribeUploadBufferResponse (Maybe Integer)-dubrsUploadBufferAllocatedInBytes = lens _dubrsUploadBufferAllocatedInBytes (\ s a -> s{_dubrsUploadBufferAllocatedInBytes = a})---- | Undocumented member.-dubrsGatewayARN :: Lens' DescribeUploadBufferResponse (Maybe Text)-dubrsGatewayARN = lens _dubrsGatewayARN (\ s a -> s{_dubrsGatewayARN = a})---- | Undocumented member.-dubrsDiskIds :: Lens' DescribeUploadBufferResponse [Text]-dubrsDiskIds = lens _dubrsDiskIds (\ s a -> s{_dubrsDiskIds = a}) . _Default . _Coerce---- | Undocumented member.-dubrsUploadBufferUsedInBytes :: Lens' DescribeUploadBufferResponse (Maybe Integer)-dubrsUploadBufferUsedInBytes = lens _dubrsUploadBufferUsedInBytes (\ s a -> s{_dubrsUploadBufferUsedInBytes = a})---- | -- | The response status code.-dubrsResponseStatus :: Lens' DescribeUploadBufferResponse Int-dubrsResponseStatus = lens _dubrsResponseStatus (\ s a -> s{_dubrsResponseStatus = a})--instance NFData DescribeUploadBufferResponse where
− gen/Network/AWS/StorageGateway/DescribeVTLDevices.hs
@@ -1,210 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.DescribeVTLDevices--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Returns a description of virtual tape library (VTL) devices for the specified tape gateway. In the response, AWS Storage Gateway returns VTL device information.--------- This operation is only supported in the tape gateway type.--------- This operation returns paginated results.-module Network.AWS.StorageGateway.DescribeVTLDevices- (- -- * Creating a Request- describeVTLDevices- , DescribeVTLDevices- -- * Request Lenses- , dvtldMarker- , dvtldLimit- , dvtldVTLDeviceARNs- , dvtldGatewayARN-- -- * Destructuring the Response- , describeVTLDevicesResponse- , DescribeVTLDevicesResponse- -- * Response Lenses- , dvtldrsVTLDevices- , dvtldrsGatewayARN- , dvtldrsMarker- , dvtldrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Pager-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | DescribeVTLDevicesInput------------ /See:/ 'describeVTLDevices' smart constructor.-data DescribeVTLDevices = DescribeVTLDevices'- { _dvtldMarker :: !(Maybe Text)- , _dvtldLimit :: !(Maybe Nat)- , _dvtldVTLDeviceARNs :: !(Maybe [Text])- , _dvtldGatewayARN :: !Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeVTLDevices' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dvtldMarker' - An opaque string that indicates the position at which to begin describing the VTL devices.------ * 'dvtldLimit' - Specifies that the number of VTL devices described be limited to the specified number.------ * 'dvtldVTLDeviceARNs' - An array of strings, where each string represents the Amazon Resource Name (ARN) of a VTL device.------ * 'dvtldGatewayARN' - Undocumented member.-describeVTLDevices- :: Text -- ^ 'dvtldGatewayARN'- -> DescribeVTLDevices-describeVTLDevices pGatewayARN_ =- DescribeVTLDevices'- { _dvtldMarker = Nothing- , _dvtldLimit = Nothing- , _dvtldVTLDeviceARNs = Nothing- , _dvtldGatewayARN = pGatewayARN_- }----- | An opaque string that indicates the position at which to begin describing the VTL devices.-dvtldMarker :: Lens' DescribeVTLDevices (Maybe Text)-dvtldMarker = lens _dvtldMarker (\ s a -> s{_dvtldMarker = a})---- | Specifies that the number of VTL devices described be limited to the specified number.-dvtldLimit :: Lens' DescribeVTLDevices (Maybe Natural)-dvtldLimit = lens _dvtldLimit (\ s a -> s{_dvtldLimit = a}) . mapping _Nat---- | An array of strings, where each string represents the Amazon Resource Name (ARN) of a VTL device.-dvtldVTLDeviceARNs :: Lens' DescribeVTLDevices [Text]-dvtldVTLDeviceARNs = lens _dvtldVTLDeviceARNs (\ s a -> s{_dvtldVTLDeviceARNs = a}) . _Default . _Coerce---- | Undocumented member.-dvtldGatewayARN :: Lens' DescribeVTLDevices Text-dvtldGatewayARN = lens _dvtldGatewayARN (\ s a -> s{_dvtldGatewayARN = a})--instance AWSPager DescribeVTLDevices where- page rq rs- | stop (rs ^. dvtldrsMarker) = Nothing- | stop (rs ^. dvtldrsVTLDevices) = Nothing- | otherwise =- Just $ rq & dvtldMarker .~ rs ^. dvtldrsMarker--instance AWSRequest DescribeVTLDevices where- type Rs DescribeVTLDevices =- DescribeVTLDevicesResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- DescribeVTLDevicesResponse' <$>- (x .?> "VTLDevices" .!@ mempty) <*>- (x .?> "GatewayARN")- <*> (x .?> "Marker")- <*> (pure (fromEnum s)))--instance Hashable DescribeVTLDevices where--instance NFData DescribeVTLDevices where--instance ToHeaders DescribeVTLDevices where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.DescribeVTLDevices" ::- ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON DescribeVTLDevices where- toJSON DescribeVTLDevices'{..}- = object- (catMaybes- [("Marker" .=) <$> _dvtldMarker,- ("Limit" .=) <$> _dvtldLimit,- ("VTLDeviceARNs" .=) <$> _dvtldVTLDeviceARNs,- Just ("GatewayARN" .= _dvtldGatewayARN)])--instance ToPath DescribeVTLDevices where- toPath = const "/"--instance ToQuery DescribeVTLDevices where- toQuery = const mempty---- | DescribeVTLDevicesOutput------------ /See:/ 'describeVTLDevicesResponse' smart constructor.-data DescribeVTLDevicesResponse = DescribeVTLDevicesResponse'- { _dvtldrsVTLDevices :: !(Maybe [VTLDevice])- , _dvtldrsGatewayARN :: !(Maybe Text)- , _dvtldrsMarker :: !(Maybe Text)- , _dvtldrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeVTLDevicesResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dvtldrsVTLDevices' - An array of VTL device objects composed of the Amazon Resource Name(ARN) of the VTL devices.------ * 'dvtldrsGatewayARN' - Undocumented member.------ * 'dvtldrsMarker' - An opaque string that indicates the position at which the VTL devices that were fetched for description ended. Use the marker in your next request to fetch the next set of VTL devices in the list. If there are no more VTL devices to describe, this field does not appear in the response.------ * 'dvtldrsResponseStatus' - -- | The response status code.-describeVTLDevicesResponse- :: Int -- ^ 'dvtldrsResponseStatus'- -> DescribeVTLDevicesResponse-describeVTLDevicesResponse pResponseStatus_ =- DescribeVTLDevicesResponse'- { _dvtldrsVTLDevices = Nothing- , _dvtldrsGatewayARN = Nothing- , _dvtldrsMarker = Nothing- , _dvtldrsResponseStatus = pResponseStatus_- }----- | An array of VTL device objects composed of the Amazon Resource Name(ARN) of the VTL devices.-dvtldrsVTLDevices :: Lens' DescribeVTLDevicesResponse [VTLDevice]-dvtldrsVTLDevices = lens _dvtldrsVTLDevices (\ s a -> s{_dvtldrsVTLDevices = a}) . _Default . _Coerce---- | Undocumented member.-dvtldrsGatewayARN :: Lens' DescribeVTLDevicesResponse (Maybe Text)-dvtldrsGatewayARN = lens _dvtldrsGatewayARN (\ s a -> s{_dvtldrsGatewayARN = a})---- | An opaque string that indicates the position at which the VTL devices that were fetched for description ended. Use the marker in your next request to fetch the next set of VTL devices in the list. If there are no more VTL devices to describe, this field does not appear in the response.-dvtldrsMarker :: Lens' DescribeVTLDevicesResponse (Maybe Text)-dvtldrsMarker = lens _dvtldrsMarker (\ s a -> s{_dvtldrsMarker = a})---- | -- | The response status code.-dvtldrsResponseStatus :: Lens' DescribeVTLDevicesResponse Int-dvtldrsResponseStatus = lens _dvtldrsResponseStatus (\ s a -> s{_dvtldrsResponseStatus = a})--instance NFData DescribeVTLDevicesResponse where
− gen/Network/AWS/StorageGateway/DescribeWorkingStorage.hs
@@ -1,176 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.DescribeWorkingStorage--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Returns information about the working storage of a gateway. This operation is only supported in the stored volumes gateway type. This operation is deprecated in cached volumes API version (20120630). Use DescribeUploadBuffer instead.--------- The response includes disk IDs that are configured as working storage, and it includes the amount of working storage allocated and used.----module Network.AWS.StorageGateway.DescribeWorkingStorage- (- -- * Creating a Request- describeWorkingStorage- , DescribeWorkingStorage- -- * Request Lenses- , dwsGatewayARN-- -- * Destructuring the Response- , describeWorkingStorageResponse- , DescribeWorkingStorageResponse- -- * Response Lenses- , dwsrsGatewayARN- , dwsrsDiskIds- , dwsrsWorkingStorageAllocatedInBytes- , dwsrsWorkingStorageUsedInBytes- , dwsrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | A JSON object containing the of the gateway.------------ /See:/ 'describeWorkingStorage' smart constructor.-newtype DescribeWorkingStorage = DescribeWorkingStorage'- { _dwsGatewayARN :: Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeWorkingStorage' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dwsGatewayARN' - Undocumented member.-describeWorkingStorage- :: Text -- ^ 'dwsGatewayARN'- -> DescribeWorkingStorage-describeWorkingStorage pGatewayARN_ =- DescribeWorkingStorage' {_dwsGatewayARN = pGatewayARN_}----- | Undocumented member.-dwsGatewayARN :: Lens' DescribeWorkingStorage Text-dwsGatewayARN = lens _dwsGatewayARN (\ s a -> s{_dwsGatewayARN = a})--instance AWSRequest DescribeWorkingStorage where- type Rs DescribeWorkingStorage =- DescribeWorkingStorageResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- DescribeWorkingStorageResponse' <$>- (x .?> "GatewayARN") <*> (x .?> "DiskIds" .!@ mempty)- <*> (x .?> "WorkingStorageAllocatedInBytes")- <*> (x .?> "WorkingStorageUsedInBytes")- <*> (pure (fromEnum s)))--instance Hashable DescribeWorkingStorage where--instance NFData DescribeWorkingStorage where--instance ToHeaders DescribeWorkingStorage where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.DescribeWorkingStorage" ::- ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON DescribeWorkingStorage where- toJSON DescribeWorkingStorage'{..}- = object- (catMaybes [Just ("GatewayARN" .= _dwsGatewayARN)])--instance ToPath DescribeWorkingStorage where- toPath = const "/"--instance ToQuery DescribeWorkingStorage where- toQuery = const mempty---- | A JSON object containing the following fields:------------ /See:/ 'describeWorkingStorageResponse' smart constructor.-data DescribeWorkingStorageResponse = DescribeWorkingStorageResponse'- { _dwsrsGatewayARN :: !(Maybe Text)- , _dwsrsDiskIds :: !(Maybe [Text])- , _dwsrsWorkingStorageAllocatedInBytes :: !(Maybe Integer)- , _dwsrsWorkingStorageUsedInBytes :: !(Maybe Integer)- , _dwsrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DescribeWorkingStorageResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dwsrsGatewayARN' - Undocumented member.------ * 'dwsrsDiskIds' - An array of the gateway's local disk IDs that are configured as working storage. Each local disk ID is specified as a string (minimum length of 1 and maximum length of 300). If no local disks are configured as working storage, then the DiskIds array is empty.------ * 'dwsrsWorkingStorageAllocatedInBytes' - The total working storage in bytes allocated for the gateway. If no working storage is configured for the gateway, this field returns 0.------ * 'dwsrsWorkingStorageUsedInBytes' - The total working storage in bytes in use by the gateway. If no working storage is configured for the gateway, this field returns 0.------ * 'dwsrsResponseStatus' - -- | The response status code.-describeWorkingStorageResponse- :: Int -- ^ 'dwsrsResponseStatus'- -> DescribeWorkingStorageResponse-describeWorkingStorageResponse pResponseStatus_ =- DescribeWorkingStorageResponse'- { _dwsrsGatewayARN = Nothing- , _dwsrsDiskIds = Nothing- , _dwsrsWorkingStorageAllocatedInBytes = Nothing- , _dwsrsWorkingStorageUsedInBytes = Nothing- , _dwsrsResponseStatus = pResponseStatus_- }----- | Undocumented member.-dwsrsGatewayARN :: Lens' DescribeWorkingStorageResponse (Maybe Text)-dwsrsGatewayARN = lens _dwsrsGatewayARN (\ s a -> s{_dwsrsGatewayARN = a})---- | An array of the gateway's local disk IDs that are configured as working storage. Each local disk ID is specified as a string (minimum length of 1 and maximum length of 300). If no local disks are configured as working storage, then the DiskIds array is empty.-dwsrsDiskIds :: Lens' DescribeWorkingStorageResponse [Text]-dwsrsDiskIds = lens _dwsrsDiskIds (\ s a -> s{_dwsrsDiskIds = a}) . _Default . _Coerce---- | The total working storage in bytes allocated for the gateway. If no working storage is configured for the gateway, this field returns 0.-dwsrsWorkingStorageAllocatedInBytes :: Lens' DescribeWorkingStorageResponse (Maybe Integer)-dwsrsWorkingStorageAllocatedInBytes = lens _dwsrsWorkingStorageAllocatedInBytes (\ s a -> s{_dwsrsWorkingStorageAllocatedInBytes = a})---- | The total working storage in bytes in use by the gateway. If no working storage is configured for the gateway, this field returns 0.-dwsrsWorkingStorageUsedInBytes :: Lens' DescribeWorkingStorageResponse (Maybe Integer)-dwsrsWorkingStorageUsedInBytes = lens _dwsrsWorkingStorageUsedInBytes (\ s a -> s{_dwsrsWorkingStorageUsedInBytes = a})---- | -- | The response status code.-dwsrsResponseStatus :: Lens' DescribeWorkingStorageResponse Int-dwsrsResponseStatus = lens _dwsrsResponseStatus (\ s a -> s{_dwsrsResponseStatus = a})--instance NFData DescribeWorkingStorageResponse where
− gen/Network/AWS/StorageGateway/DisableGateway.hs
@@ -1,144 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.DisableGateway--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Disables a tape gateway when the gateway is no longer functioning. For example, if your gateway VM is damaged, you can disable the gateway so you can recover virtual tapes.--------- Use this operation for a tape gateway that is not reachable or not functioning. This operation is only supported in the tape gateway type.------ /Important:/ Once a gateway is disabled it cannot be enabled.----module Network.AWS.StorageGateway.DisableGateway- (- -- * Creating a Request- disableGateway- , DisableGateway- -- * Request Lenses- , dGatewayARN-- -- * Destructuring the Response- , disableGatewayResponse- , DisableGatewayResponse- -- * Response Lenses- , disrsGatewayARN- , disrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | DisableGatewayInput------------ /See:/ 'disableGateway' smart constructor.-newtype DisableGateway = DisableGateway'- { _dGatewayARN :: Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DisableGateway' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dGatewayARN' - Undocumented member.-disableGateway- :: Text -- ^ 'dGatewayARN'- -> DisableGateway-disableGateway pGatewayARN_ = DisableGateway' {_dGatewayARN = pGatewayARN_}----- | Undocumented member.-dGatewayARN :: Lens' DisableGateway Text-dGatewayARN = lens _dGatewayARN (\ s a -> s{_dGatewayARN = a})--instance AWSRequest DisableGateway where- type Rs DisableGateway = DisableGatewayResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- DisableGatewayResponse' <$>- (x .?> "GatewayARN") <*> (pure (fromEnum s)))--instance Hashable DisableGateway where--instance NFData DisableGateway where--instance ToHeaders DisableGateway where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.DisableGateway" ::- ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON DisableGateway where- toJSON DisableGateway'{..}- = object- (catMaybes [Just ("GatewayARN" .= _dGatewayARN)])--instance ToPath DisableGateway where- toPath = const "/"--instance ToQuery DisableGateway where- toQuery = const mempty---- | DisableGatewayOutput------------ /See:/ 'disableGatewayResponse' smart constructor.-data DisableGatewayResponse = DisableGatewayResponse'- { _disrsGatewayARN :: !(Maybe Text)- , _disrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DisableGatewayResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'disrsGatewayARN' - The unique Amazon Resource Name of the disabled gateway.------ * 'disrsResponseStatus' - -- | The response status code.-disableGatewayResponse- :: Int -- ^ 'disrsResponseStatus'- -> DisableGatewayResponse-disableGatewayResponse pResponseStatus_ =- DisableGatewayResponse'- {_disrsGatewayARN = Nothing, _disrsResponseStatus = pResponseStatus_}----- | The unique Amazon Resource Name of the disabled gateway.-disrsGatewayARN :: Lens' DisableGatewayResponse (Maybe Text)-disrsGatewayARN = lens _disrsGatewayARN (\ s a -> s{_disrsGatewayARN = a})---- | -- | The response status code.-disrsResponseStatus :: Lens' DisableGatewayResponse Int-disrsResponseStatus = lens _disrsResponseStatus (\ s a -> s{_disrsResponseStatus = a})--instance NFData DisableGatewayResponse where
@@ -1,183 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.ListFileShares--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Gets a list of the file shares for a specific file gateway, or the list of file shares that belong to the calling user account. This operation is only supported in the file gateway type.-------module Network.AWS.StorageGateway.ListFileShares- (- -- * Creating a Request- listFileShares- , ListFileShares- -- * Request Lenses- , lfsGatewayARN- , lfsMarker- , lfsLimit-- -- * Destructuring the Response- , listFileSharesResponse- , ListFileSharesResponse- -- * Response Lenses- , lfsrsFileShareInfoList- , lfsrsMarker- , lfsrsNextMarker- , lfsrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | ListFileShareInput------------ /See:/ 'listFileShares' smart constructor.-data ListFileShares = ListFileShares'- { _lfsGatewayARN :: !(Maybe Text)- , _lfsMarker :: !(Maybe Text)- , _lfsLimit :: !(Maybe Nat)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'ListFileShares' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'lfsGatewayARN' - The Amazon resource Name (ARN) of the gateway whose file shares you want to list. If this field is not present, all file shares under your account are listed.------ * 'lfsMarker' - Opaque pagination token returned from a previous ListFileShares operation. If present, @Marker@ specifies where to continue the list from after a previous call to ListFileShares. Optional.------ * 'lfsLimit' - The maximum number of file shares to return in the response. The value must be an integer with a value greater than zero. Optional.-listFileShares- :: ListFileShares-listFileShares =- ListFileShares'- {_lfsGatewayARN = Nothing, _lfsMarker = Nothing, _lfsLimit = Nothing}----- | The Amazon resource Name (ARN) of the gateway whose file shares you want to list. If this field is not present, all file shares under your account are listed.-lfsGatewayARN :: Lens' ListFileShares (Maybe Text)-lfsGatewayARN = lens _lfsGatewayARN (\ s a -> s{_lfsGatewayARN = a})---- | Opaque pagination token returned from a previous ListFileShares operation. If present, @Marker@ specifies where to continue the list from after a previous call to ListFileShares. Optional.-lfsMarker :: Lens' ListFileShares (Maybe Text)-lfsMarker = lens _lfsMarker (\ s a -> s{_lfsMarker = a})---- | The maximum number of file shares to return in the response. The value must be an integer with a value greater than zero. Optional.-lfsLimit :: Lens' ListFileShares (Maybe Natural)-lfsLimit = lens _lfsLimit (\ s a -> s{_lfsLimit = a}) . mapping _Nat--instance AWSRequest ListFileShares where- type Rs ListFileShares = ListFileSharesResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- ListFileSharesResponse' <$>- (x .?> "FileShareInfoList" .!@ mempty) <*>- (x .?> "Marker")- <*> (x .?> "NextMarker")- <*> (pure (fromEnum s)))--instance Hashable ListFileShares where--instance NFData ListFileShares where--instance ToHeaders ListFileShares where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.ListFileShares" ::- ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON ListFileShares where- toJSON ListFileShares'{..}- = object- (catMaybes- [("GatewayARN" .=) <$> _lfsGatewayARN,- ("Marker" .=) <$> _lfsMarker,- ("Limit" .=) <$> _lfsLimit])--instance ToPath ListFileShares where- toPath = const "/"--instance ToQuery ListFileShares where- toQuery = const mempty---- | ListFileShareOutput------------ /See:/ 'listFileSharesResponse' smart constructor.-data ListFileSharesResponse = ListFileSharesResponse'- { _lfsrsFileShareInfoList :: !(Maybe [FileShareInfo])- , _lfsrsMarker :: !(Maybe Text)- , _lfsrsNextMarker :: !(Maybe Text)- , _lfsrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'ListFileSharesResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'lfsrsFileShareInfoList' - An array of information about the file gateway's file shares.------ * 'lfsrsMarker' - If the request includes @Marker@ , the response returns that value in this field.------ * 'lfsrsNextMarker' - If a value is present, there are more file shares to return. In a subsequent request, use @NextMarker@ as the value for @Marker@ to retrieve the next set of file shares.------ * 'lfsrsResponseStatus' - -- | The response status code.-listFileSharesResponse- :: Int -- ^ 'lfsrsResponseStatus'- -> ListFileSharesResponse-listFileSharesResponse pResponseStatus_ =- ListFileSharesResponse'- { _lfsrsFileShareInfoList = Nothing- , _lfsrsMarker = Nothing- , _lfsrsNextMarker = Nothing- , _lfsrsResponseStatus = pResponseStatus_- }----- | An array of information about the file gateway's file shares.-lfsrsFileShareInfoList :: Lens' ListFileSharesResponse [FileShareInfo]-lfsrsFileShareInfoList = lens _lfsrsFileShareInfoList (\ s a -> s{_lfsrsFileShareInfoList = a}) . _Default . _Coerce---- | If the request includes @Marker@ , the response returns that value in this field.-lfsrsMarker :: Lens' ListFileSharesResponse (Maybe Text)-lfsrsMarker = lens _lfsrsMarker (\ s a -> s{_lfsrsMarker = a})---- | If a value is present, there are more file shares to return. In a subsequent request, use @NextMarker@ as the value for @Marker@ to retrieve the next set of file shares.-lfsrsNextMarker :: Lens' ListFileSharesResponse (Maybe Text)-lfsrsNextMarker = lens _lfsrsNextMarker (\ s a -> s{_lfsrsNextMarker = a})---- | -- | The response status code.-lfsrsResponseStatus :: Lens' ListFileSharesResponse Int-lfsrsResponseStatus = lens _lfsrsResponseStatus (\ s a -> s{_lfsrsResponseStatus = a})--instance NFData ListFileSharesResponse where
− gen/Network/AWS/StorageGateway/ListGateways.hs
@@ -1,177 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.ListGateways--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Lists gateways owned by an AWS account in a region specified in the request. The returned list is ordered by gateway Amazon Resource Name (ARN).--------- By default, the operation returns a maximum of 100 gateways. This operation supports pagination that allows you to optionally reduce the number of gateways returned in a response.------ If you have more gateways than are returned in a response (that is, the response returns only a truncated list of your gateways), the response contains a marker that you can specify in your next request to fetch the next page of gateways.--------- This operation returns paginated results.-module Network.AWS.StorageGateway.ListGateways- (- -- * Creating a Request- listGateways- , ListGateways- -- * Request Lenses- , lgMarker- , lgLimit-- -- * Destructuring the Response- , listGatewaysResponse- , ListGatewaysResponse- -- * Response Lenses- , lgrsMarker- , lgrsGateways- , lgrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Pager-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | A JSON object containing zero or more of the following fields:--------- * 'ListGatewaysInput$Limit'------ * 'ListGatewaysInput$Marker'--------------- /See:/ 'listGateways' smart constructor.-data ListGateways = ListGateways'- { _lgMarker :: !(Maybe Text)- , _lgLimit :: !(Maybe Nat)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'ListGateways' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'lgMarker' - An opaque string that indicates the position at which to begin the returned list of gateways.------ * 'lgLimit' - Specifies that the list of gateways returned be limited to the specified number of items.-listGateways- :: ListGateways-listGateways = ListGateways' {_lgMarker = Nothing, _lgLimit = Nothing}----- | An opaque string that indicates the position at which to begin the returned list of gateways.-lgMarker :: Lens' ListGateways (Maybe Text)-lgMarker = lens _lgMarker (\ s a -> s{_lgMarker = a})---- | Specifies that the list of gateways returned be limited to the specified number of items.-lgLimit :: Lens' ListGateways (Maybe Natural)-lgLimit = lens _lgLimit (\ s a -> s{_lgLimit = a}) . mapping _Nat--instance AWSPager ListGateways where- page rq rs- | stop (rs ^. lgrsMarker) = Nothing- | stop (rs ^. lgrsGateways) = Nothing- | otherwise =- Just $ rq & lgMarker .~ rs ^. lgrsMarker--instance AWSRequest ListGateways where- type Rs ListGateways = ListGatewaysResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- ListGatewaysResponse' <$>- (x .?> "Marker") <*> (x .?> "Gateways" .!@ mempty)- <*> (pure (fromEnum s)))--instance Hashable ListGateways where--instance NFData ListGateways where--instance ToHeaders ListGateways where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.ListGateways" ::- ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON ListGateways where- toJSON ListGateways'{..}- = object- (catMaybes- [("Marker" .=) <$> _lgMarker,- ("Limit" .=) <$> _lgLimit])--instance ToPath ListGateways where- toPath = const "/"--instance ToQuery ListGateways where- toQuery = const mempty---- | /See:/ 'listGatewaysResponse' smart constructor.-data ListGatewaysResponse = ListGatewaysResponse'- { _lgrsMarker :: !(Maybe Text)- , _lgrsGateways :: !(Maybe [GatewayInfo])- , _lgrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'ListGatewaysResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'lgrsMarker' - Undocumented member.------ * 'lgrsGateways' - Undocumented member.------ * 'lgrsResponseStatus' - -- | The response status code.-listGatewaysResponse- :: Int -- ^ 'lgrsResponseStatus'- -> ListGatewaysResponse-listGatewaysResponse pResponseStatus_ =- ListGatewaysResponse'- { _lgrsMarker = Nothing- , _lgrsGateways = Nothing- , _lgrsResponseStatus = pResponseStatus_- }----- | Undocumented member.-lgrsMarker :: Lens' ListGatewaysResponse (Maybe Text)-lgrsMarker = lens _lgrsMarker (\ s a -> s{_lgrsMarker = a})---- | Undocumented member.-lgrsGateways :: Lens' ListGatewaysResponse [GatewayInfo]-lgrsGateways = lens _lgrsGateways (\ s a -> s{_lgrsGateways = a}) . _Default . _Coerce---- | -- | The response status code.-lgrsResponseStatus :: Lens' ListGatewaysResponse Int-lgrsResponseStatus = lens _lgrsResponseStatus (\ s a -> s{_lgrsResponseStatus = a})--instance NFData ListGatewaysResponse where
− gen/Network/AWS/StorageGateway/ListLocalDisks.hs
@@ -1,150 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.ListLocalDisks--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Returns a list of the gateway's local disks. To specify which gateway to describe, you use the Amazon Resource Name (ARN) of the gateway in the body of the request.--------- The request returns a list of all disks, specifying which are configured as working storage, cache storage, or stored volume or not configured at all. The response includes a @DiskStatus@ field. This field can have a value of present (the disk is available to use), missing (the disk is no longer connected to the gateway), or mismatch (the disk node is occupied by a disk that has incorrect metadata or the disk content is corrupted).----module Network.AWS.StorageGateway.ListLocalDisks- (- -- * Creating a Request- listLocalDisks- , ListLocalDisks- -- * Request Lenses- , lldGatewayARN-- -- * Destructuring the Response- , listLocalDisksResponse- , ListLocalDisksResponse- -- * Response Lenses- , lldrsGatewayARN- , lldrsDisks- , lldrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | A JSON object containing the of the gateway.------------ /See:/ 'listLocalDisks' smart constructor.-newtype ListLocalDisks = ListLocalDisks'- { _lldGatewayARN :: Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'ListLocalDisks' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'lldGatewayARN' - Undocumented member.-listLocalDisks- :: Text -- ^ 'lldGatewayARN'- -> ListLocalDisks-listLocalDisks pGatewayARN_ = ListLocalDisks' {_lldGatewayARN = pGatewayARN_}----- | Undocumented member.-lldGatewayARN :: Lens' ListLocalDisks Text-lldGatewayARN = lens _lldGatewayARN (\ s a -> s{_lldGatewayARN = a})--instance AWSRequest ListLocalDisks where- type Rs ListLocalDisks = ListLocalDisksResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- ListLocalDisksResponse' <$>- (x .?> "GatewayARN") <*> (x .?> "Disks" .!@ mempty)- <*> (pure (fromEnum s)))--instance Hashable ListLocalDisks where--instance NFData ListLocalDisks where--instance ToHeaders ListLocalDisks where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.ListLocalDisks" ::- ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON ListLocalDisks where- toJSON ListLocalDisks'{..}- = object- (catMaybes [Just ("GatewayARN" .= _lldGatewayARN)])--instance ToPath ListLocalDisks where- toPath = const "/"--instance ToQuery ListLocalDisks where- toQuery = const mempty---- | /See:/ 'listLocalDisksResponse' smart constructor.-data ListLocalDisksResponse = ListLocalDisksResponse'- { _lldrsGatewayARN :: !(Maybe Text)- , _lldrsDisks :: !(Maybe [Disk])- , _lldrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'ListLocalDisksResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'lldrsGatewayARN' - Undocumented member.------ * 'lldrsDisks' - Undocumented member.------ * 'lldrsResponseStatus' - -- | The response status code.-listLocalDisksResponse- :: Int -- ^ 'lldrsResponseStatus'- -> ListLocalDisksResponse-listLocalDisksResponse pResponseStatus_ =- ListLocalDisksResponse'- { _lldrsGatewayARN = Nothing- , _lldrsDisks = Nothing- , _lldrsResponseStatus = pResponseStatus_- }----- | Undocumented member.-lldrsGatewayARN :: Lens' ListLocalDisksResponse (Maybe Text)-lldrsGatewayARN = lens _lldrsGatewayARN (\ s a -> s{_lldrsGatewayARN = a})---- | Undocumented member.-lldrsDisks :: Lens' ListLocalDisksResponse [Disk]-lldrsDisks = lens _lldrsDisks (\ s a -> s{_lldrsDisks = a}) . _Default . _Coerce---- | -- | The response status code.-lldrsResponseStatus :: Lens' ListLocalDisksResponse Int-lldrsResponseStatus = lens _lldrsResponseStatus (\ s a -> s{_lldrsResponseStatus = a})--instance NFData ListLocalDisksResponse where
− gen/Network/AWS/StorageGateway/ListTagsForResource.hs
@@ -1,187 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.ListTagsForResource--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Lists the tags that have been added to the specified resource. This operation is only supported in the cached volume, stored volume and tape gateway type.-------module Network.AWS.StorageGateway.ListTagsForResource- (- -- * Creating a Request- listTagsForResource- , ListTagsForResource- -- * Request Lenses- , ltfrMarker- , ltfrLimit- , ltfrResourceARN-- -- * Destructuring the Response- , listTagsForResourceResponse- , ListTagsForResourceResponse- -- * Response Lenses- , ltfrrsResourceARN- , ltfrrsMarker- , ltfrrsTags- , ltfrrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | ListTagsForResourceInput------------ /See:/ 'listTagsForResource' smart constructor.-data ListTagsForResource = ListTagsForResource'- { _ltfrMarker :: !(Maybe Text)- , _ltfrLimit :: !(Maybe Nat)- , _ltfrResourceARN :: !Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'ListTagsForResource' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ltfrMarker' - An opaque string that indicates the position at which to begin returning the list of tags.------ * 'ltfrLimit' - Specifies that the list of tags returned be limited to the specified number of items.------ * 'ltfrResourceARN' - The Amazon Resource Name (ARN) of the resource for which you want to list tags.-listTagsForResource- :: Text -- ^ 'ltfrResourceARN'- -> ListTagsForResource-listTagsForResource pResourceARN_ =- ListTagsForResource'- { _ltfrMarker = Nothing- , _ltfrLimit = Nothing- , _ltfrResourceARN = pResourceARN_- }----- | An opaque string that indicates the position at which to begin returning the list of tags.-ltfrMarker :: Lens' ListTagsForResource (Maybe Text)-ltfrMarker = lens _ltfrMarker (\ s a -> s{_ltfrMarker = a})---- | Specifies that the list of tags returned be limited to the specified number of items.-ltfrLimit :: Lens' ListTagsForResource (Maybe Natural)-ltfrLimit = lens _ltfrLimit (\ s a -> s{_ltfrLimit = a}) . mapping _Nat---- | The Amazon Resource Name (ARN) of the resource for which you want to list tags.-ltfrResourceARN :: Lens' ListTagsForResource Text-ltfrResourceARN = lens _ltfrResourceARN (\ s a -> s{_ltfrResourceARN = a})--instance AWSRequest ListTagsForResource where- type Rs ListTagsForResource =- ListTagsForResourceResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- ListTagsForResourceResponse' <$>- (x .?> "ResourceARN") <*> (x .?> "Marker") <*>- (x .?> "Tags" .!@ mempty)- <*> (pure (fromEnum s)))--instance Hashable ListTagsForResource where--instance NFData ListTagsForResource where--instance ToHeaders ListTagsForResource where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.ListTagsForResource" ::- ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON ListTagsForResource where- toJSON ListTagsForResource'{..}- = object- (catMaybes- [("Marker" .=) <$> _ltfrMarker,- ("Limit" .=) <$> _ltfrLimit,- Just ("ResourceARN" .= _ltfrResourceARN)])--instance ToPath ListTagsForResource where- toPath = const "/"--instance ToQuery ListTagsForResource where- toQuery = const mempty---- | ListTagsForResourceOutput------------ /See:/ 'listTagsForResourceResponse' smart constructor.-data ListTagsForResourceResponse = ListTagsForResourceResponse'- { _ltfrrsResourceARN :: !(Maybe Text)- , _ltfrrsMarker :: !(Maybe Text)- , _ltfrrsTags :: !(Maybe [Tag])- , _ltfrrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'ListTagsForResourceResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ltfrrsResourceARN' - he Amazon Resource Name (ARN) of the resource for which you want to list tags.------ * 'ltfrrsMarker' - An opaque string that indicates the position at which to stop returning the list of tags.------ * 'ltfrrsTags' - An array that contains the tags for the specified resource.------ * 'ltfrrsResponseStatus' - -- | The response status code.-listTagsForResourceResponse- :: Int -- ^ 'ltfrrsResponseStatus'- -> ListTagsForResourceResponse-listTagsForResourceResponse pResponseStatus_ =- ListTagsForResourceResponse'- { _ltfrrsResourceARN = Nothing- , _ltfrrsMarker = Nothing- , _ltfrrsTags = Nothing- , _ltfrrsResponseStatus = pResponseStatus_- }----- | he Amazon Resource Name (ARN) of the resource for which you want to list tags.-ltfrrsResourceARN :: Lens' ListTagsForResourceResponse (Maybe Text)-ltfrrsResourceARN = lens _ltfrrsResourceARN (\ s a -> s{_ltfrrsResourceARN = a})---- | An opaque string that indicates the position at which to stop returning the list of tags.-ltfrrsMarker :: Lens' ListTagsForResourceResponse (Maybe Text)-ltfrrsMarker = lens _ltfrrsMarker (\ s a -> s{_ltfrrsMarker = a})---- | An array that contains the tags for the specified resource.-ltfrrsTags :: Lens' ListTagsForResourceResponse [Tag]-ltfrrsTags = lens _ltfrrsTags (\ s a -> s{_ltfrrsTags = a}) . _Default . _Coerce---- | -- | The response status code.-ltfrrsResponseStatus :: Lens' ListTagsForResourceResponse Int-ltfrrsResponseStatus = lens _ltfrrsResponseStatus (\ s a -> s{_ltfrrsResponseStatus = a})--instance NFData ListTagsForResourceResponse where
− gen/Network/AWS/StorageGateway/ListTapes.hs
@@ -1,186 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.ListTapes--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Lists virtual tapes in your virtual tape library (VTL) and your virtual tape shelf (VTS). You specify the tapes to list by specifying one or more tape Amazon Resource Names (ARNs). If you don't specify a tape ARN, the operation lists all virtual tapes in both your VTL and VTS.--------- This operation supports pagination. By default, the operation returns a maximum of up to 100 tapes. You can optionally specify the @Limit@ parameter in the body to limit the number of tapes in the response. If the number of tapes returned in the response is truncated, the response includes a @Marker@ element that you can use in your subsequent request to retrieve the next set of tapes. This operation is only supported in the tape gateway type.----module Network.AWS.StorageGateway.ListTapes- (- -- * Creating a Request- listTapes- , ListTapes- -- * Request Lenses- , ltMarker- , ltLimit- , ltTapeARNs-- -- * Destructuring the Response- , listTapesResponse- , ListTapesResponse- -- * Response Lenses- , ltrsMarker- , ltrsTapeInfos- , ltrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | A JSON object that contains one or more of the following fields:--------- * 'ListTapesInput$Limit'------ * 'ListTapesInput$Marker'------ * 'ListTapesInput$TapeARNs'--------------- /See:/ 'listTapes' smart constructor.-data ListTapes = ListTapes'- { _ltMarker :: !(Maybe Text)- , _ltLimit :: !(Maybe Nat)- , _ltTapeARNs :: !(Maybe [Text])- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'ListTapes' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ltMarker' - A string that indicates the position at which to begin the returned list of tapes.------ * 'ltLimit' - An optional number limit for the tapes in the list returned by this call.------ * 'ltTapeARNs' - Undocumented member.-listTapes- :: ListTapes-listTapes =- ListTapes' {_ltMarker = Nothing, _ltLimit = Nothing, _ltTapeARNs = Nothing}----- | A string that indicates the position at which to begin the returned list of tapes.-ltMarker :: Lens' ListTapes (Maybe Text)-ltMarker = lens _ltMarker (\ s a -> s{_ltMarker = a})---- | An optional number limit for the tapes in the list returned by this call.-ltLimit :: Lens' ListTapes (Maybe Natural)-ltLimit = lens _ltLimit (\ s a -> s{_ltLimit = a}) . mapping _Nat---- | Undocumented member.-ltTapeARNs :: Lens' ListTapes [Text]-ltTapeARNs = lens _ltTapeARNs (\ s a -> s{_ltTapeARNs = a}) . _Default . _Coerce--instance AWSRequest ListTapes where- type Rs ListTapes = ListTapesResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- ListTapesResponse' <$>- (x .?> "Marker") <*> (x .?> "TapeInfos" .!@ mempty)- <*> (pure (fromEnum s)))--instance Hashable ListTapes where--instance NFData ListTapes where--instance ToHeaders ListTapes where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.ListTapes" :: ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON ListTapes where- toJSON ListTapes'{..}- = object- (catMaybes- [("Marker" .=) <$> _ltMarker,- ("Limit" .=) <$> _ltLimit,- ("TapeARNs" .=) <$> _ltTapeARNs])--instance ToPath ListTapes where- toPath = const "/"--instance ToQuery ListTapes where- toQuery = const mempty---- | A JSON object containing the following fields:--------- * 'ListTapesOutput$Marker'------ * 'ListTapesOutput$VolumeInfos'--------------- /See:/ 'listTapesResponse' smart constructor.-data ListTapesResponse = ListTapesResponse'- { _ltrsMarker :: !(Maybe Text)- , _ltrsTapeInfos :: !(Maybe [TapeInfo])- , _ltrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'ListTapesResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ltrsMarker' - A string that indicates the position at which to begin returning the next list of tapes. Use the marker in your next request to continue pagination of tapes. If there are no more tapes to list, this element does not appear in the response body.------ * 'ltrsTapeInfos' - Undocumented member.------ * 'ltrsResponseStatus' - -- | The response status code.-listTapesResponse- :: Int -- ^ 'ltrsResponseStatus'- -> ListTapesResponse-listTapesResponse pResponseStatus_ =- ListTapesResponse'- { _ltrsMarker = Nothing- , _ltrsTapeInfos = Nothing- , _ltrsResponseStatus = pResponseStatus_- }----- | A string that indicates the position at which to begin returning the next list of tapes. Use the marker in your next request to continue pagination of tapes. If there are no more tapes to list, this element does not appear in the response body.-ltrsMarker :: Lens' ListTapesResponse (Maybe Text)-ltrsMarker = lens _ltrsMarker (\ s a -> s{_ltrsMarker = a})---- | Undocumented member.-ltrsTapeInfos :: Lens' ListTapesResponse [TapeInfo]-ltrsTapeInfos = lens _ltrsTapeInfos (\ s a -> s{_ltrsTapeInfos = a}) . _Default . _Coerce---- | -- | The response status code.-ltrsResponseStatus :: Lens' ListTapesResponse Int-ltrsResponseStatus = lens _ltrsResponseStatus (\ s a -> s{_ltrsResponseStatus = a})--instance NFData ListTapesResponse where
− gen/Network/AWS/StorageGateway/ListVolumeInitiators.hs
@@ -1,143 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.ListVolumeInitiators--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Lists iSCSI initiators that are connected to a volume. You can use this operation to determine whether a volume is being used or not. This operation is only supported in the cached volume and stored volume gateway types.-------module Network.AWS.StorageGateway.ListVolumeInitiators- (- -- * Creating a Request- listVolumeInitiators- , ListVolumeInitiators- -- * Request Lenses- , lviVolumeARN-- -- * Destructuring the Response- , listVolumeInitiatorsResponse- , ListVolumeInitiatorsResponse- -- * Response Lenses- , lvirsInitiators- , lvirsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | ListVolumeInitiatorsInput------------ /See:/ 'listVolumeInitiators' smart constructor.-newtype ListVolumeInitiators = ListVolumeInitiators'- { _lviVolumeARN :: Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'ListVolumeInitiators' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'lviVolumeARN' - The Amazon Resource Name (ARN) of the volume. Use the 'ListVolumes' operation to return a list of gateway volumes for the gateway.-listVolumeInitiators- :: Text -- ^ 'lviVolumeARN'- -> ListVolumeInitiators-listVolumeInitiators pVolumeARN_ =- ListVolumeInitiators' {_lviVolumeARN = pVolumeARN_}----- | The Amazon Resource Name (ARN) of the volume. Use the 'ListVolumes' operation to return a list of gateway volumes for the gateway.-lviVolumeARN :: Lens' ListVolumeInitiators Text-lviVolumeARN = lens _lviVolumeARN (\ s a -> s{_lviVolumeARN = a})--instance AWSRequest ListVolumeInitiators where- type Rs ListVolumeInitiators =- ListVolumeInitiatorsResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- ListVolumeInitiatorsResponse' <$>- (x .?> "Initiators" .!@ mempty) <*>- (pure (fromEnum s)))--instance Hashable ListVolumeInitiators where--instance NFData ListVolumeInitiators where--instance ToHeaders ListVolumeInitiators where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.ListVolumeInitiators" ::- ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON ListVolumeInitiators where- toJSON ListVolumeInitiators'{..}- = object- (catMaybes [Just ("VolumeARN" .= _lviVolumeARN)])--instance ToPath ListVolumeInitiators where- toPath = const "/"--instance ToQuery ListVolumeInitiators where- toQuery = const mempty---- | ListVolumeInitiatorsOutput------------ /See:/ 'listVolumeInitiatorsResponse' smart constructor.-data ListVolumeInitiatorsResponse = ListVolumeInitiatorsResponse'- { _lvirsInitiators :: !(Maybe [Text])- , _lvirsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'ListVolumeInitiatorsResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'lvirsInitiators' - The host names and port numbers of all iSCSI initiators that are connected to the gateway.------ * 'lvirsResponseStatus' - -- | The response status code.-listVolumeInitiatorsResponse- :: Int -- ^ 'lvirsResponseStatus'- -> ListVolumeInitiatorsResponse-listVolumeInitiatorsResponse pResponseStatus_ =- ListVolumeInitiatorsResponse'- {_lvirsInitiators = Nothing, _lvirsResponseStatus = pResponseStatus_}----- | The host names and port numbers of all iSCSI initiators that are connected to the gateway.-lvirsInitiators :: Lens' ListVolumeInitiatorsResponse [Text]-lvirsInitiators = lens _lvirsInitiators (\ s a -> s{_lvirsInitiators = a}) . _Default . _Coerce---- | -- | The response status code.-lvirsResponseStatus :: Lens' ListVolumeInitiatorsResponse Int-lvirsResponseStatus = lens _lvirsResponseStatus (\ s a -> s{_lvirsResponseStatus = a})--instance NFData ListVolumeInitiatorsResponse where
− gen/Network/AWS/StorageGateway/ListVolumeRecoveryPoints.hs
@@ -1,150 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.ListVolumeRecoveryPoints--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Lists the recovery points for a specified gateway. This operation is only supported in the cached volume gateway type.--------- Each cache volume has one recovery point. A volume recovery point is a point in time at which all data of the volume is consistent and from which you can create a snapshot or clone a new cached volume from a source volume. To create a snapshot from a volume recovery point use the 'CreateSnapshotFromVolumeRecoveryPoint' operation.----module Network.AWS.StorageGateway.ListVolumeRecoveryPoints- (- -- * Creating a Request- listVolumeRecoveryPoints- , ListVolumeRecoveryPoints- -- * Request Lenses- , lvrpGatewayARN-- -- * Destructuring the Response- , listVolumeRecoveryPointsResponse- , ListVolumeRecoveryPointsResponse- -- * Response Lenses- , lvrprsVolumeRecoveryPointInfos- , lvrprsGatewayARN- , lvrprsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | /See:/ 'listVolumeRecoveryPoints' smart constructor.-newtype ListVolumeRecoveryPoints = ListVolumeRecoveryPoints'- { _lvrpGatewayARN :: Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'ListVolumeRecoveryPoints' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'lvrpGatewayARN' - Undocumented member.-listVolumeRecoveryPoints- :: Text -- ^ 'lvrpGatewayARN'- -> ListVolumeRecoveryPoints-listVolumeRecoveryPoints pGatewayARN_ =- ListVolumeRecoveryPoints' {_lvrpGatewayARN = pGatewayARN_}----- | Undocumented member.-lvrpGatewayARN :: Lens' ListVolumeRecoveryPoints Text-lvrpGatewayARN = lens _lvrpGatewayARN (\ s a -> s{_lvrpGatewayARN = a})--instance AWSRequest ListVolumeRecoveryPoints where- type Rs ListVolumeRecoveryPoints =- ListVolumeRecoveryPointsResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- ListVolumeRecoveryPointsResponse' <$>- (x .?> "VolumeRecoveryPointInfos" .!@ mempty) <*>- (x .?> "GatewayARN")- <*> (pure (fromEnum s)))--instance Hashable ListVolumeRecoveryPoints where--instance NFData ListVolumeRecoveryPoints where--instance ToHeaders ListVolumeRecoveryPoints where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.ListVolumeRecoveryPoints"- :: ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON ListVolumeRecoveryPoints where- toJSON ListVolumeRecoveryPoints'{..}- = object- (catMaybes [Just ("GatewayARN" .= _lvrpGatewayARN)])--instance ToPath ListVolumeRecoveryPoints where- toPath = const "/"--instance ToQuery ListVolumeRecoveryPoints where- toQuery = const mempty---- | /See:/ 'listVolumeRecoveryPointsResponse' smart constructor.-data ListVolumeRecoveryPointsResponse = ListVolumeRecoveryPointsResponse'- { _lvrprsVolumeRecoveryPointInfos :: !(Maybe [VolumeRecoveryPointInfo])- , _lvrprsGatewayARN :: !(Maybe Text)- , _lvrprsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'ListVolumeRecoveryPointsResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'lvrprsVolumeRecoveryPointInfos' - Undocumented member.------ * 'lvrprsGatewayARN' - Undocumented member.------ * 'lvrprsResponseStatus' - -- | The response status code.-listVolumeRecoveryPointsResponse- :: Int -- ^ 'lvrprsResponseStatus'- -> ListVolumeRecoveryPointsResponse-listVolumeRecoveryPointsResponse pResponseStatus_ =- ListVolumeRecoveryPointsResponse'- { _lvrprsVolumeRecoveryPointInfos = Nothing- , _lvrprsGatewayARN = Nothing- , _lvrprsResponseStatus = pResponseStatus_- }----- | Undocumented member.-lvrprsVolumeRecoveryPointInfos :: Lens' ListVolumeRecoveryPointsResponse [VolumeRecoveryPointInfo]-lvrprsVolumeRecoveryPointInfos = lens _lvrprsVolumeRecoveryPointInfos (\ s a -> s{_lvrprsVolumeRecoveryPointInfos = a}) . _Default . _Coerce---- | Undocumented member.-lvrprsGatewayARN :: Lens' ListVolumeRecoveryPointsResponse (Maybe Text)-lvrprsGatewayARN = lens _lvrprsGatewayARN (\ s a -> s{_lvrprsGatewayARN = a})---- | -- | The response status code.-lvrprsResponseStatus :: Lens' ListVolumeRecoveryPointsResponse Int-lvrprsResponseStatus = lens _lvrprsResponseStatus (\ s a -> s{_lvrprsResponseStatus = a})--instance NFData ListVolumeRecoveryPointsResponse- where
− gen/Network/AWS/StorageGateway/ListVolumes.hs
@@ -1,196 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.ListVolumes--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Lists the iSCSI stored volumes of a gateway. Results are sorted by volume ARN. The response includes only the volume ARNs. If you want additional volume information, use the 'DescribeStorediSCSIVolumes' or the 'DescribeCachediSCSIVolumes' API.--------- The operation supports pagination. By default, the operation returns a maximum of up to 100 volumes. You can optionally specify the @Limit@ field in the body to limit the number of volumes in the response. If the number of volumes returned in the response is truncated, the response includes a Marker field. You can use this Marker value in your subsequent request to retrieve the next set of volumes. This operation is only supported in the cached volume and stored volume gateway types.--------- This operation returns paginated results.-module Network.AWS.StorageGateway.ListVolumes- (- -- * Creating a Request- listVolumes- , ListVolumes- -- * Request Lenses- , lvGatewayARN- , lvMarker- , lvLimit-- -- * Destructuring the Response- , listVolumesResponse- , ListVolumesResponse- -- * Response Lenses- , lvrsGatewayARN- , lvrsMarker- , lvrsVolumeInfos- , lvrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Pager-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | A JSON object that contains one or more of the following fields:--------- * 'ListVolumesInput$Limit'------ * 'ListVolumesInput$Marker'--------------- /See:/ 'listVolumes' smart constructor.-data ListVolumes = ListVolumes'- { _lvGatewayARN :: !(Maybe Text)- , _lvMarker :: !(Maybe Text)- , _lvLimit :: !(Maybe Nat)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'ListVolumes' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'lvGatewayARN' - Undocumented member.------ * 'lvMarker' - A string that indicates the position at which to begin the returned list of volumes. Obtain the marker from the response of a previous List iSCSI Volumes request.------ * 'lvLimit' - Specifies that the list of volumes returned be limited to the specified number of items.-listVolumes- :: ListVolumes-listVolumes =- ListVolumes'- {_lvGatewayARN = Nothing, _lvMarker = Nothing, _lvLimit = Nothing}----- | Undocumented member.-lvGatewayARN :: Lens' ListVolumes (Maybe Text)-lvGatewayARN = lens _lvGatewayARN (\ s a -> s{_lvGatewayARN = a})---- | A string that indicates the position at which to begin the returned list of volumes. Obtain the marker from the response of a previous List iSCSI Volumes request.-lvMarker :: Lens' ListVolumes (Maybe Text)-lvMarker = lens _lvMarker (\ s a -> s{_lvMarker = a})---- | Specifies that the list of volumes returned be limited to the specified number of items.-lvLimit :: Lens' ListVolumes (Maybe Natural)-lvLimit = lens _lvLimit (\ s a -> s{_lvLimit = a}) . mapping _Nat--instance AWSPager ListVolumes where- page rq rs- | stop (rs ^. lvrsMarker) = Nothing- | stop (rs ^. lvrsVolumeInfos) = Nothing- | otherwise =- Just $ rq & lvMarker .~ rs ^. lvrsMarker--instance AWSRequest ListVolumes where- type Rs ListVolumes = ListVolumesResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- ListVolumesResponse' <$>- (x .?> "GatewayARN") <*> (x .?> "Marker") <*>- (x .?> "VolumeInfos" .!@ mempty)- <*> (pure (fromEnum s)))--instance Hashable ListVolumes where--instance NFData ListVolumes where--instance ToHeaders ListVolumes where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.ListVolumes" ::- ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON ListVolumes where- toJSON ListVolumes'{..}- = object- (catMaybes- [("GatewayARN" .=) <$> _lvGatewayARN,- ("Marker" .=) <$> _lvMarker,- ("Limit" .=) <$> _lvLimit])--instance ToPath ListVolumes where- toPath = const "/"--instance ToQuery ListVolumes where- toQuery = const mempty---- | /See:/ 'listVolumesResponse' smart constructor.-data ListVolumesResponse = ListVolumesResponse'- { _lvrsGatewayARN :: !(Maybe Text)- , _lvrsMarker :: !(Maybe Text)- , _lvrsVolumeInfos :: !(Maybe [VolumeInfo])- , _lvrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'ListVolumesResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'lvrsGatewayARN' - Undocumented member.------ * 'lvrsMarker' - Undocumented member.------ * 'lvrsVolumeInfos' - Undocumented member.------ * 'lvrsResponseStatus' - -- | The response status code.-listVolumesResponse- :: Int -- ^ 'lvrsResponseStatus'- -> ListVolumesResponse-listVolumesResponse pResponseStatus_ =- ListVolumesResponse'- { _lvrsGatewayARN = Nothing- , _lvrsMarker = Nothing- , _lvrsVolumeInfos = Nothing- , _lvrsResponseStatus = pResponseStatus_- }----- | Undocumented member.-lvrsGatewayARN :: Lens' ListVolumesResponse (Maybe Text)-lvrsGatewayARN = lens _lvrsGatewayARN (\ s a -> s{_lvrsGatewayARN = a})---- | Undocumented member.-lvrsMarker :: Lens' ListVolumesResponse (Maybe Text)-lvrsMarker = lens _lvrsMarker (\ s a -> s{_lvrsMarker = a})---- | Undocumented member.-lvrsVolumeInfos :: Lens' ListVolumesResponse [VolumeInfo]-lvrsVolumeInfos = lens _lvrsVolumeInfos (\ s a -> s{_lvrsVolumeInfos = a}) . _Default . _Coerce---- | -- | The response status code.-lvrsResponseStatus :: Lens' ListVolumesResponse Int-lvrsResponseStatus = lens _lvrsResponseStatus (\ s a -> s{_lvrsResponseStatus = a})--instance NFData ListVolumesResponse where
− gen/Network/AWS/StorageGateway/NotifyWhenUploaded.hs
@@ -1,151 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.NotifyWhenUploaded--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Sends you notification through CloudWatch Events when all files written to your NFS file share have been uploaded to Amazon S3.--------- AWS Storage Gateway can send a notification through Amazon CloudWatch Events when all files written to your file share up to that point in time have been uploaded to Amazon S3. These files include files written to the NFS file share up to the time that you make a request for notification. When the upload is done, Storage Gateway sends you notification through an Amazon CloudWatch Event. You can configure CloudWatch Events to send the notification through event targets such as Amazon SNS or AWS Lambda function. This operation is only supported in the file gateway type.------ For more information, see Getting File Upload Notification in the Storage Gateway User Guide (https://docs.aws.amazon.com/storagegateway/latest/userguide/monitoring-file-gateway.html#get-upload-notification).----module Network.AWS.StorageGateway.NotifyWhenUploaded- (- -- * Creating a Request- notifyWhenUploaded- , NotifyWhenUploaded- -- * Request Lenses- , nwuFileShareARN-- -- * Destructuring the Response- , notifyWhenUploadedResponse- , NotifyWhenUploadedResponse- -- * Response Lenses- , nwursFileShareARN- , nwursNotificationId- , nwursResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | /See:/ 'notifyWhenUploaded' smart constructor.-newtype NotifyWhenUploaded = NotifyWhenUploaded'- { _nwuFileShareARN :: Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'NotifyWhenUploaded' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'nwuFileShareARN' - Undocumented member.-notifyWhenUploaded- :: Text -- ^ 'nwuFileShareARN'- -> NotifyWhenUploaded-notifyWhenUploaded pFileShareARN_ =- NotifyWhenUploaded' {_nwuFileShareARN = pFileShareARN_}----- | Undocumented member.-nwuFileShareARN :: Lens' NotifyWhenUploaded Text-nwuFileShareARN = lens _nwuFileShareARN (\ s a -> s{_nwuFileShareARN = a})--instance AWSRequest NotifyWhenUploaded where- type Rs NotifyWhenUploaded =- NotifyWhenUploadedResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- NotifyWhenUploadedResponse' <$>- (x .?> "FileShareARN") <*> (x .?> "NotificationId")- <*> (pure (fromEnum s)))--instance Hashable NotifyWhenUploaded where--instance NFData NotifyWhenUploaded where--instance ToHeaders NotifyWhenUploaded where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.NotifyWhenUploaded" ::- ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON NotifyWhenUploaded where- toJSON NotifyWhenUploaded'{..}- = object- (catMaybes- [Just ("FileShareARN" .= _nwuFileShareARN)])--instance ToPath NotifyWhenUploaded where- toPath = const "/"--instance ToQuery NotifyWhenUploaded where- toQuery = const mempty---- | /See:/ 'notifyWhenUploadedResponse' smart constructor.-data NotifyWhenUploadedResponse = NotifyWhenUploadedResponse'- { _nwursFileShareARN :: !(Maybe Text)- , _nwursNotificationId :: !(Maybe Text)- , _nwursResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'NotifyWhenUploadedResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'nwursFileShareARN' - Undocumented member.------ * 'nwursNotificationId' - Undocumented member.------ * 'nwursResponseStatus' - -- | The response status code.-notifyWhenUploadedResponse- :: Int -- ^ 'nwursResponseStatus'- -> NotifyWhenUploadedResponse-notifyWhenUploadedResponse pResponseStatus_ =- NotifyWhenUploadedResponse'- { _nwursFileShareARN = Nothing- , _nwursNotificationId = Nothing- , _nwursResponseStatus = pResponseStatus_- }----- | Undocumented member.-nwursFileShareARN :: Lens' NotifyWhenUploadedResponse (Maybe Text)-nwursFileShareARN = lens _nwursFileShareARN (\ s a -> s{_nwursFileShareARN = a})---- | Undocumented member.-nwursNotificationId :: Lens' NotifyWhenUploadedResponse (Maybe Text)-nwursNotificationId = lens _nwursNotificationId (\ s a -> s{_nwursNotificationId = a})---- | -- | The response status code.-nwursResponseStatus :: Lens' NotifyWhenUploadedResponse Int-nwursResponseStatus = lens _nwursResponseStatus (\ s a -> s{_nwursResponseStatus = a})--instance NFData NotifyWhenUploadedResponse where
− gen/Network/AWS/StorageGateway/RefreshCache.hs
@@ -1,133 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.RefreshCache--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Refreshes the cache for the specified file share. This operation finds objects in the Amazon S3 bucket that were added, removed or replaced since the gateway last listed the bucket's contents and cached the results. This operation is only supported in the file gateway type.-------module Network.AWS.StorageGateway.RefreshCache- (- -- * Creating a Request- refreshCache- , RefreshCache- -- * Request Lenses- , rcFileShareARN-- -- * Destructuring the Response- , refreshCacheResponse- , RefreshCacheResponse- -- * Response Lenses- , rcrsFileShareARN- , rcrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | /See:/ 'refreshCache' smart constructor.-newtype RefreshCache = RefreshCache'- { _rcFileShareARN :: Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'RefreshCache' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rcFileShareARN' - Undocumented member.-refreshCache- :: Text -- ^ 'rcFileShareARN'- -> RefreshCache-refreshCache pFileShareARN_ = RefreshCache' {_rcFileShareARN = pFileShareARN_}----- | Undocumented member.-rcFileShareARN :: Lens' RefreshCache Text-rcFileShareARN = lens _rcFileShareARN (\ s a -> s{_rcFileShareARN = a})--instance AWSRequest RefreshCache where- type Rs RefreshCache = RefreshCacheResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- RefreshCacheResponse' <$>- (x .?> "FileShareARN") <*> (pure (fromEnum s)))--instance Hashable RefreshCache where--instance NFData RefreshCache where--instance ToHeaders RefreshCache where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.RefreshCache" ::- ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON RefreshCache where- toJSON RefreshCache'{..}- = object- (catMaybes- [Just ("FileShareARN" .= _rcFileShareARN)])--instance ToPath RefreshCache where- toPath = const "/"--instance ToQuery RefreshCache where- toQuery = const mempty---- | /See:/ 'refreshCacheResponse' smart constructor.-data RefreshCacheResponse = RefreshCacheResponse'- { _rcrsFileShareARN :: !(Maybe Text)- , _rcrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'RefreshCacheResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rcrsFileShareARN' - Undocumented member.------ * 'rcrsResponseStatus' - -- | The response status code.-refreshCacheResponse- :: Int -- ^ 'rcrsResponseStatus'- -> RefreshCacheResponse-refreshCacheResponse pResponseStatus_ =- RefreshCacheResponse'- {_rcrsFileShareARN = Nothing, _rcrsResponseStatus = pResponseStatus_}----- | Undocumented member.-rcrsFileShareARN :: Lens' RefreshCacheResponse (Maybe Text)-rcrsFileShareARN = lens _rcrsFileShareARN (\ s a -> s{_rcrsFileShareARN = a})---- | -- | The response status code.-rcrsResponseStatus :: Lens' RefreshCacheResponse Int-rcrsResponseStatus = lens _rcrsResponseStatus (\ s a -> s{_rcrsResponseStatus = a})--instance NFData RefreshCacheResponse where
− gen/Network/AWS/StorageGateway/RemoveTagsFromResource.hs
@@ -1,153 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.RemoveTagsFromResource--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Removes one or more tags from the specified resource. This operation is only supported in the cached volume, stored volume and tape gateway types.-------module Network.AWS.StorageGateway.RemoveTagsFromResource- (- -- * Creating a Request- removeTagsFromResource- , RemoveTagsFromResource- -- * Request Lenses- , rtfrResourceARN- , rtfrTagKeys-- -- * Destructuring the Response- , removeTagsFromResourceResponse- , RemoveTagsFromResourceResponse- -- * Response Lenses- , rtfrrsResourceARN- , rtfrrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | RemoveTagsFromResourceInput------------ /See:/ 'removeTagsFromResource' smart constructor.-data RemoveTagsFromResource = RemoveTagsFromResource'- { _rtfrResourceARN :: !Text- , _rtfrTagKeys :: ![Text]- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'RemoveTagsFromResource' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rtfrResourceARN' - The Amazon Resource Name (ARN) of the resource you want to remove the tags from.------ * 'rtfrTagKeys' - The keys of the tags you want to remove from the specified resource. A tag is composed of a key/value pair.-removeTagsFromResource- :: Text -- ^ 'rtfrResourceARN'- -> RemoveTagsFromResource-removeTagsFromResource pResourceARN_ =- RemoveTagsFromResource'- {_rtfrResourceARN = pResourceARN_, _rtfrTagKeys = mempty}----- | The Amazon Resource Name (ARN) of the resource you want to remove the tags from.-rtfrResourceARN :: Lens' RemoveTagsFromResource Text-rtfrResourceARN = lens _rtfrResourceARN (\ s a -> s{_rtfrResourceARN = a})---- | The keys of the tags you want to remove from the specified resource. A tag is composed of a key/value pair.-rtfrTagKeys :: Lens' RemoveTagsFromResource [Text]-rtfrTagKeys = lens _rtfrTagKeys (\ s a -> s{_rtfrTagKeys = a}) . _Coerce--instance AWSRequest RemoveTagsFromResource where- type Rs RemoveTagsFromResource =- RemoveTagsFromResourceResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- RemoveTagsFromResourceResponse' <$>- (x .?> "ResourceARN") <*> (pure (fromEnum s)))--instance Hashable RemoveTagsFromResource where--instance NFData RemoveTagsFromResource where--instance ToHeaders RemoveTagsFromResource where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.RemoveTagsFromResource" ::- ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON RemoveTagsFromResource where- toJSON RemoveTagsFromResource'{..}- = object- (catMaybes- [Just ("ResourceARN" .= _rtfrResourceARN),- Just ("TagKeys" .= _rtfrTagKeys)])--instance ToPath RemoveTagsFromResource where- toPath = const "/"--instance ToQuery RemoveTagsFromResource where- toQuery = const mempty---- | RemoveTagsFromResourceOutput------------ /See:/ 'removeTagsFromResourceResponse' smart constructor.-data RemoveTagsFromResourceResponse = RemoveTagsFromResourceResponse'- { _rtfrrsResourceARN :: !(Maybe Text)- , _rtfrrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'RemoveTagsFromResourceResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rtfrrsResourceARN' - The Amazon Resource Name (ARN) of the resource that the tags were removed from.------ * 'rtfrrsResponseStatus' - -- | The response status code.-removeTagsFromResourceResponse- :: Int -- ^ 'rtfrrsResponseStatus'- -> RemoveTagsFromResourceResponse-removeTagsFromResourceResponse pResponseStatus_ =- RemoveTagsFromResourceResponse'- {_rtfrrsResourceARN = Nothing, _rtfrrsResponseStatus = pResponseStatus_}----- | The Amazon Resource Name (ARN) of the resource that the tags were removed from.-rtfrrsResourceARN :: Lens' RemoveTagsFromResourceResponse (Maybe Text)-rtfrrsResourceARN = lens _rtfrrsResourceARN (\ s a -> s{_rtfrrsResourceARN = a})---- | -- | The response status code.-rtfrrsResponseStatus :: Lens' RemoveTagsFromResourceResponse Int-rtfrrsResponseStatus = lens _rtfrrsResponseStatus (\ s a -> s{_rtfrrsResponseStatus = a})--instance NFData RemoveTagsFromResourceResponse where
− gen/Network/AWS/StorageGateway/ResetCache.hs
@@ -1,133 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.ResetCache--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Resets all cache disks that have encountered a error and makes the disks available for reconfiguration as cache storage. If your cache disk encounters a error, the gateway prevents read and write operations on virtual tapes in the gateway. For example, an error can occur when a disk is corrupted or removed from the gateway. When a cache is reset, the gateway loses its cache storage. At this point you can reconfigure the disks as cache disks. This operation is only supported in the cached volume and tape types.--------- /Important:/ If the cache disk you are resetting contains data that has not been uploaded to Amazon S3 yet, that data can be lost. After you reset cache disks, there will be no configured cache disks left in the gateway, so you must configure at least one new cache disk for your gateway to function properly.----module Network.AWS.StorageGateway.ResetCache- (- -- * Creating a Request- resetCache- , ResetCache- -- * Request Lenses- , rcGatewayARN-- -- * Destructuring the Response- , resetCacheResponse- , ResetCacheResponse- -- * Response Lenses- , rrsGatewayARN- , rrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | /See:/ 'resetCache' smart constructor.-newtype ResetCache = ResetCache'- { _rcGatewayARN :: Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'ResetCache' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rcGatewayARN' - Undocumented member.-resetCache- :: Text -- ^ 'rcGatewayARN'- -> ResetCache-resetCache pGatewayARN_ = ResetCache' {_rcGatewayARN = pGatewayARN_}----- | Undocumented member.-rcGatewayARN :: Lens' ResetCache Text-rcGatewayARN = lens _rcGatewayARN (\ s a -> s{_rcGatewayARN = a})--instance AWSRequest ResetCache where- type Rs ResetCache = ResetCacheResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- ResetCacheResponse' <$>- (x .?> "GatewayARN") <*> (pure (fromEnum s)))--instance Hashable ResetCache where--instance NFData ResetCache where--instance ToHeaders ResetCache where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.ResetCache" :: ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON ResetCache where- toJSON ResetCache'{..}- = object- (catMaybes [Just ("GatewayARN" .= _rcGatewayARN)])--instance ToPath ResetCache where- toPath = const "/"--instance ToQuery ResetCache where- toQuery = const mempty---- | /See:/ 'resetCacheResponse' smart constructor.-data ResetCacheResponse = ResetCacheResponse'- { _rrsGatewayARN :: !(Maybe Text)- , _rrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'ResetCacheResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rrsGatewayARN' - Undocumented member.------ * 'rrsResponseStatus' - -- | The response status code.-resetCacheResponse- :: Int -- ^ 'rrsResponseStatus'- -> ResetCacheResponse-resetCacheResponse pResponseStatus_ =- ResetCacheResponse'- {_rrsGatewayARN = Nothing, _rrsResponseStatus = pResponseStatus_}----- | Undocumented member.-rrsGatewayARN :: Lens' ResetCacheResponse (Maybe Text)-rrsGatewayARN = lens _rrsGatewayARN (\ s a -> s{_rrsGatewayARN = a})---- | -- | The response status code.-rrsResponseStatus :: Lens' ResetCacheResponse Int-rrsResponseStatus = lens _rrsResponseStatus (\ s a -> s{_rrsResponseStatus = a})--instance NFData ResetCacheResponse where
− gen/Network/AWS/StorageGateway/RetrieveTapeArchive.hs
@@ -1,155 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.RetrieveTapeArchive--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Retrieves an archived virtual tape from the virtual tape shelf (VTS) to a tape gateway. Virtual tapes archived in the VTS are not associated with any gateway. However after a tape is retrieved, it is associated with a gateway, even though it is also listed in the VTS, that is, archive. This operation is only supported in the tape gateway type.--------- Once a tape is successfully retrieved to a gateway, it cannot be retrieved again to another gateway. You must archive the tape again before you can retrieve it to another gateway. This operation is only supported in the tape gateway type.----module Network.AWS.StorageGateway.RetrieveTapeArchive- (- -- * Creating a Request- retrieveTapeArchive- , RetrieveTapeArchive- -- * Request Lenses- , rtaTapeARN- , rtaGatewayARN-- -- * Destructuring the Response- , retrieveTapeArchiveResponse- , RetrieveTapeArchiveResponse- -- * Response Lenses- , rtarsTapeARN- , rtarsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | RetrieveTapeArchiveInput------------ /See:/ 'retrieveTapeArchive' smart constructor.-data RetrieveTapeArchive = RetrieveTapeArchive'- { _rtaTapeARN :: !Text- , _rtaGatewayARN :: !Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'RetrieveTapeArchive' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rtaTapeARN' - The Amazon Resource Name (ARN) of the virtual tape you want to retrieve from the virtual tape shelf (VTS).------ * 'rtaGatewayARN' - The Amazon Resource Name (ARN) of the gateway you want to retrieve the virtual tape to. Use the 'ListGateways' operation to return a list of gateways for your account and region. You retrieve archived virtual tapes to only one gateway and the gateway must be a tape gateway.-retrieveTapeArchive- :: Text -- ^ 'rtaTapeARN'- -> Text -- ^ 'rtaGatewayARN'- -> RetrieveTapeArchive-retrieveTapeArchive pTapeARN_ pGatewayARN_ =- RetrieveTapeArchive' {_rtaTapeARN = pTapeARN_, _rtaGatewayARN = pGatewayARN_}----- | The Amazon Resource Name (ARN) of the virtual tape you want to retrieve from the virtual tape shelf (VTS).-rtaTapeARN :: Lens' RetrieveTapeArchive Text-rtaTapeARN = lens _rtaTapeARN (\ s a -> s{_rtaTapeARN = a})---- | The Amazon Resource Name (ARN) of the gateway you want to retrieve the virtual tape to. Use the 'ListGateways' operation to return a list of gateways for your account and region. You retrieve archived virtual tapes to only one gateway and the gateway must be a tape gateway.-rtaGatewayARN :: Lens' RetrieveTapeArchive Text-rtaGatewayARN = lens _rtaGatewayARN (\ s a -> s{_rtaGatewayARN = a})--instance AWSRequest RetrieveTapeArchive where- type Rs RetrieveTapeArchive =- RetrieveTapeArchiveResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- RetrieveTapeArchiveResponse' <$>- (x .?> "TapeARN") <*> (pure (fromEnum s)))--instance Hashable RetrieveTapeArchive where--instance NFData RetrieveTapeArchive where--instance ToHeaders RetrieveTapeArchive where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.RetrieveTapeArchive" ::- ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON RetrieveTapeArchive where- toJSON RetrieveTapeArchive'{..}- = object- (catMaybes- [Just ("TapeARN" .= _rtaTapeARN),- Just ("GatewayARN" .= _rtaGatewayARN)])--instance ToPath RetrieveTapeArchive where- toPath = const "/"--instance ToQuery RetrieveTapeArchive where- toQuery = const mempty---- | RetrieveTapeArchiveOutput------------ /See:/ 'retrieveTapeArchiveResponse' smart constructor.-data RetrieveTapeArchiveResponse = RetrieveTapeArchiveResponse'- { _rtarsTapeARN :: !(Maybe Text)- , _rtarsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'RetrieveTapeArchiveResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rtarsTapeARN' - The Amazon Resource Name (ARN) of the retrieved virtual tape.------ * 'rtarsResponseStatus' - -- | The response status code.-retrieveTapeArchiveResponse- :: Int -- ^ 'rtarsResponseStatus'- -> RetrieveTapeArchiveResponse-retrieveTapeArchiveResponse pResponseStatus_ =- RetrieveTapeArchiveResponse'- {_rtarsTapeARN = Nothing, _rtarsResponseStatus = pResponseStatus_}----- | The Amazon Resource Name (ARN) of the retrieved virtual tape.-rtarsTapeARN :: Lens' RetrieveTapeArchiveResponse (Maybe Text)-rtarsTapeARN = lens _rtarsTapeARN (\ s a -> s{_rtarsTapeARN = a})---- | -- | The response status code.-rtarsResponseStatus :: Lens' RetrieveTapeArchiveResponse Int-rtarsResponseStatus = lens _rtarsResponseStatus (\ s a -> s{_rtarsResponseStatus = a})--instance NFData RetrieveTapeArchiveResponse where
− gen/Network/AWS/StorageGateway/RetrieveTapeRecoveryPoint.hs
@@ -1,157 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Retrieves the recovery point for the specified virtual tape. This operation is only supported in the tape gateway type.--------- A recovery point is a point in time view of a virtual tape at which all the data on the tape is consistent. If your gateway crashes, virtual tapes that have recovery points can be recovered to a new gateway.----module Network.AWS.StorageGateway.RetrieveTapeRecoveryPoint- (- -- * Creating a Request- retrieveTapeRecoveryPoint- , RetrieveTapeRecoveryPoint- -- * Request Lenses- , rtrpTapeARN- , rtrpGatewayARN-- -- * Destructuring the Response- , retrieveTapeRecoveryPointResponse- , RetrieveTapeRecoveryPointResponse- -- * Response Lenses- , rtrprsTapeARN- , rtrprsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | RetrieveTapeRecoveryPointInput------------ /See:/ 'retrieveTapeRecoveryPoint' smart constructor.-data RetrieveTapeRecoveryPoint = RetrieveTapeRecoveryPoint'- { _rtrpTapeARN :: !Text- , _rtrpGatewayARN :: !Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'RetrieveTapeRecoveryPoint' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rtrpTapeARN' - The Amazon Resource Name (ARN) of the virtual tape for which you want to retrieve the recovery point.------ * 'rtrpGatewayARN' - Undocumented member.-retrieveTapeRecoveryPoint- :: Text -- ^ 'rtrpTapeARN'- -> Text -- ^ 'rtrpGatewayARN'- -> RetrieveTapeRecoveryPoint-retrieveTapeRecoveryPoint pTapeARN_ pGatewayARN_ =- RetrieveTapeRecoveryPoint'- {_rtrpTapeARN = pTapeARN_, _rtrpGatewayARN = pGatewayARN_}----- | The Amazon Resource Name (ARN) of the virtual tape for which you want to retrieve the recovery point.-rtrpTapeARN :: Lens' RetrieveTapeRecoveryPoint Text-rtrpTapeARN = lens _rtrpTapeARN (\ s a -> s{_rtrpTapeARN = a})---- | Undocumented member.-rtrpGatewayARN :: Lens' RetrieveTapeRecoveryPoint Text-rtrpGatewayARN = lens _rtrpGatewayARN (\ s a -> s{_rtrpGatewayARN = a})--instance AWSRequest RetrieveTapeRecoveryPoint where- type Rs RetrieveTapeRecoveryPoint =- RetrieveTapeRecoveryPointResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- RetrieveTapeRecoveryPointResponse' <$>- (x .?> "TapeARN") <*> (pure (fromEnum s)))--instance Hashable RetrieveTapeRecoveryPoint where--instance NFData RetrieveTapeRecoveryPoint where--instance ToHeaders RetrieveTapeRecoveryPoint where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.RetrieveTapeRecoveryPoint"- :: ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON RetrieveTapeRecoveryPoint where- toJSON RetrieveTapeRecoveryPoint'{..}- = object- (catMaybes- [Just ("TapeARN" .= _rtrpTapeARN),- Just ("GatewayARN" .= _rtrpGatewayARN)])--instance ToPath RetrieveTapeRecoveryPoint where- toPath = const "/"--instance ToQuery RetrieveTapeRecoveryPoint where- toQuery = const mempty---- | RetrieveTapeRecoveryPointOutput------------ /See:/ 'retrieveTapeRecoveryPointResponse' smart constructor.-data RetrieveTapeRecoveryPointResponse = RetrieveTapeRecoveryPointResponse'- { _rtrprsTapeARN :: !(Maybe Text)- , _rtrprsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'RetrieveTapeRecoveryPointResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rtrprsTapeARN' - The Amazon Resource Name (ARN) of the virtual tape for which the recovery point was retrieved.------ * 'rtrprsResponseStatus' - -- | The response status code.-retrieveTapeRecoveryPointResponse- :: Int -- ^ 'rtrprsResponseStatus'- -> RetrieveTapeRecoveryPointResponse-retrieveTapeRecoveryPointResponse pResponseStatus_ =- RetrieveTapeRecoveryPointResponse'- {_rtrprsTapeARN = Nothing, _rtrprsResponseStatus = pResponseStatus_}----- | The Amazon Resource Name (ARN) of the virtual tape for which the recovery point was retrieved.-rtrprsTapeARN :: Lens' RetrieveTapeRecoveryPointResponse (Maybe Text)-rtrprsTapeARN = lens _rtrprsTapeARN (\ s a -> s{_rtrprsTapeARN = a})---- | -- | The response status code.-rtrprsResponseStatus :: Lens' RetrieveTapeRecoveryPointResponse Int-rtrprsResponseStatus = lens _rtrprsResponseStatus (\ s a -> s{_rtrprsResponseStatus = a})--instance NFData RetrieveTapeRecoveryPointResponse- where
− gen/Network/AWS/StorageGateway/SetLocalConsolePassword.hs
@@ -1,154 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.SetLocalConsolePassword--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Sets the password for your VM local console. When you log in to the local console for the first time, you log in to the VM with the default credentials. We recommend that you set a new password. You don't need to know the default password to set a new password.-------module Network.AWS.StorageGateway.SetLocalConsolePassword- (- -- * Creating a Request- setLocalConsolePassword- , SetLocalConsolePassword- -- * Request Lenses- , slcpGatewayARN- , slcpLocalConsolePassword-- -- * Destructuring the Response- , setLocalConsolePasswordResponse- , SetLocalConsolePasswordResponse- -- * Response Lenses- , slcprsGatewayARN- , slcprsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | SetLocalConsolePasswordInput------------ /See:/ 'setLocalConsolePassword' smart constructor.-data SetLocalConsolePassword = SetLocalConsolePassword'- { _slcpGatewayARN :: !Text- , _slcpLocalConsolePassword :: !(Sensitive Text)- } deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SetLocalConsolePassword' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'slcpGatewayARN' - Undocumented member.------ * 'slcpLocalConsolePassword' - The password you want to set for your VM local console.-setLocalConsolePassword- :: Text -- ^ 'slcpGatewayARN'- -> Text -- ^ 'slcpLocalConsolePassword'- -> SetLocalConsolePassword-setLocalConsolePassword pGatewayARN_ pLocalConsolePassword_ =- SetLocalConsolePassword'- { _slcpGatewayARN = pGatewayARN_- , _slcpLocalConsolePassword = _Sensitive # pLocalConsolePassword_- }----- | Undocumented member.-slcpGatewayARN :: Lens' SetLocalConsolePassword Text-slcpGatewayARN = lens _slcpGatewayARN (\ s a -> s{_slcpGatewayARN = a})---- | The password you want to set for your VM local console.-slcpLocalConsolePassword :: Lens' SetLocalConsolePassword Text-slcpLocalConsolePassword = lens _slcpLocalConsolePassword (\ s a -> s{_slcpLocalConsolePassword = a}) . _Sensitive--instance AWSRequest SetLocalConsolePassword where- type Rs SetLocalConsolePassword =- SetLocalConsolePasswordResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- SetLocalConsolePasswordResponse' <$>- (x .?> "GatewayARN") <*> (pure (fromEnum s)))--instance Hashable SetLocalConsolePassword where--instance NFData SetLocalConsolePassword where--instance ToHeaders SetLocalConsolePassword where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.SetLocalConsolePassword" ::- ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON SetLocalConsolePassword where- toJSON SetLocalConsolePassword'{..}- = object- (catMaybes- [Just ("GatewayARN" .= _slcpGatewayARN),- Just- ("LocalConsolePassword" .=- _slcpLocalConsolePassword)])--instance ToPath SetLocalConsolePassword where- toPath = const "/"--instance ToQuery SetLocalConsolePassword where- toQuery = const mempty---- | /See:/ 'setLocalConsolePasswordResponse' smart constructor.-data SetLocalConsolePasswordResponse = SetLocalConsolePasswordResponse'- { _slcprsGatewayARN :: !(Maybe Text)- , _slcprsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'SetLocalConsolePasswordResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'slcprsGatewayARN' - Undocumented member.------ * 'slcprsResponseStatus' - -- | The response status code.-setLocalConsolePasswordResponse- :: Int -- ^ 'slcprsResponseStatus'- -> SetLocalConsolePasswordResponse-setLocalConsolePasswordResponse pResponseStatus_ =- SetLocalConsolePasswordResponse'- {_slcprsGatewayARN = Nothing, _slcprsResponseStatus = pResponseStatus_}----- | Undocumented member.-slcprsGatewayARN :: Lens' SetLocalConsolePasswordResponse (Maybe Text)-slcprsGatewayARN = lens _slcprsGatewayARN (\ s a -> s{_slcprsGatewayARN = a})---- | -- | The response status code.-slcprsResponseStatus :: Lens' SetLocalConsolePasswordResponse Int-slcprsResponseStatus = lens _slcprsResponseStatus (\ s a -> s{_slcprsResponseStatus = a})--instance NFData SetLocalConsolePasswordResponse where
− gen/Network/AWS/StorageGateway/ShutdownGateway.hs
@@ -1,146 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.ShutdownGateway--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Shuts down a gateway. To specify which gateway to shut down, use the Amazon Resource Name (ARN) of the gateway in the body of your request.--------- The operation shuts down the gateway service component running in the gateway's virtual machine (VM) and not the host VM.------ After the gateway is shutdown, you cannot call any other API except 'StartGateway' , 'DescribeGatewayInformation' , and 'ListGateways' . For more information, see 'ActivateGateway' . Your applications cannot read from or write to the gateway's storage volumes, and there are no snapshots taken.------ If do not intend to use the gateway again, you must delete the gateway (using 'DeleteGateway' ) to no longer pay software charges associated with the gateway.----module Network.AWS.StorageGateway.ShutdownGateway- (- -- * Creating a Request- shutdownGateway- , ShutdownGateway- -- * Request Lenses- , sGatewayARN-- -- * Destructuring the Response- , shutdownGatewayResponse- , ShutdownGatewayResponse- -- * Response Lenses- , srsGatewayARN- , srsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | A JSON object containing the of the gateway to shut down.------------ /See:/ 'shutdownGateway' smart constructor.-newtype ShutdownGateway = ShutdownGateway'- { _sGatewayARN :: Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'ShutdownGateway' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'sGatewayARN' - Undocumented member.-shutdownGateway- :: Text -- ^ 'sGatewayARN'- -> ShutdownGateway-shutdownGateway pGatewayARN_ = ShutdownGateway' {_sGatewayARN = pGatewayARN_}----- | Undocumented member.-sGatewayARN :: Lens' ShutdownGateway Text-sGatewayARN = lens _sGatewayARN (\ s a -> s{_sGatewayARN = a})--instance AWSRequest ShutdownGateway where- type Rs ShutdownGateway = ShutdownGatewayResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- ShutdownGatewayResponse' <$>- (x .?> "GatewayARN") <*> (pure (fromEnum s)))--instance Hashable ShutdownGateway where--instance NFData ShutdownGateway where--instance ToHeaders ShutdownGateway where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.ShutdownGateway" ::- ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON ShutdownGateway where- toJSON ShutdownGateway'{..}- = object- (catMaybes [Just ("GatewayARN" .= _sGatewayARN)])--instance ToPath ShutdownGateway where- toPath = const "/"--instance ToQuery ShutdownGateway where- toQuery = const mempty---- | A JSON object containing the of the gateway that was shut down.------------ /See:/ 'shutdownGatewayResponse' smart constructor.-data ShutdownGatewayResponse = ShutdownGatewayResponse'- { _srsGatewayARN :: !(Maybe Text)- , _srsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'ShutdownGatewayResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'srsGatewayARN' - Undocumented member.------ * 'srsResponseStatus' - -- | The response status code.-shutdownGatewayResponse- :: Int -- ^ 'srsResponseStatus'- -> ShutdownGatewayResponse-shutdownGatewayResponse pResponseStatus_ =- ShutdownGatewayResponse'- {_srsGatewayARN = Nothing, _srsResponseStatus = pResponseStatus_}----- | Undocumented member.-srsGatewayARN :: Lens' ShutdownGatewayResponse (Maybe Text)-srsGatewayARN = lens _srsGatewayARN (\ s a -> s{_srsGatewayARN = a})---- | -- | The response status code.-srsResponseStatus :: Lens' ShutdownGatewayResponse Int-srsResponseStatus = lens _srsResponseStatus (\ s a -> s{_srsResponseStatus = a})--instance NFData ShutdownGatewayResponse where
− gen/Network/AWS/StorageGateway/StartGateway.hs
@@ -1,142 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.StartGateway--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Starts a gateway that you previously shut down (see 'ShutdownGateway' ). After the gateway starts, you can then make other API calls, your applications can read from or write to the gateway's storage volumes and you will be able to take snapshot backups.--------- To specify which gateway to start, use the Amazon Resource Name (ARN) of the gateway in your request.----module Network.AWS.StorageGateway.StartGateway- (- -- * Creating a Request- startGateway- , StartGateway- -- * Request Lenses- , sgGatewayARN-- -- * Destructuring the Response- , startGatewayResponse- , StartGatewayResponse- -- * Response Lenses- , sgrsGatewayARN- , sgrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | A JSON object containing the of the gateway to start.------------ /See:/ 'startGateway' smart constructor.-newtype StartGateway = StartGateway'- { _sgGatewayARN :: Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'StartGateway' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'sgGatewayARN' - Undocumented member.-startGateway- :: Text -- ^ 'sgGatewayARN'- -> StartGateway-startGateway pGatewayARN_ = StartGateway' {_sgGatewayARN = pGatewayARN_}----- | Undocumented member.-sgGatewayARN :: Lens' StartGateway Text-sgGatewayARN = lens _sgGatewayARN (\ s a -> s{_sgGatewayARN = a})--instance AWSRequest StartGateway where- type Rs StartGateway = StartGatewayResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- StartGatewayResponse' <$>- (x .?> "GatewayARN") <*> (pure (fromEnum s)))--instance Hashable StartGateway where--instance NFData StartGateway where--instance ToHeaders StartGateway where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.StartGateway" ::- ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON StartGateway where- toJSON StartGateway'{..}- = object- (catMaybes [Just ("GatewayARN" .= _sgGatewayARN)])--instance ToPath StartGateway where- toPath = const "/"--instance ToQuery StartGateway where- toQuery = const mempty---- | A JSON object containing the of the gateway that was restarted.------------ /See:/ 'startGatewayResponse' smart constructor.-data StartGatewayResponse = StartGatewayResponse'- { _sgrsGatewayARN :: !(Maybe Text)- , _sgrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'StartGatewayResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'sgrsGatewayARN' - Undocumented member.------ * 'sgrsResponseStatus' - -- | The response status code.-startGatewayResponse- :: Int -- ^ 'sgrsResponseStatus'- -> StartGatewayResponse-startGatewayResponse pResponseStatus_ =- StartGatewayResponse'- {_sgrsGatewayARN = Nothing, _sgrsResponseStatus = pResponseStatus_}----- | Undocumented member.-sgrsGatewayARN :: Lens' StartGatewayResponse (Maybe Text)-sgrsGatewayARN = lens _sgrsGatewayARN (\ s a -> s{_sgrsGatewayARN = a})---- | -- | The response status code.-sgrsResponseStatus :: Lens' StartGatewayResponse Int-sgrsResponseStatus = lens _sgrsResponseStatus (\ s a -> s{_sgrsResponseStatus = a})--instance NFData StartGatewayResponse where
− gen/Network/AWS/StorageGateway/Types.hs
@@ -1,286 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.Types--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)----module Network.AWS.StorageGateway.Types- (- -- * Service Configuration- storageGateway-- -- * Errors- , _InvalidGatewayRequestException- , _ServiceUnavailableError- , _InternalServerError-- -- * ObjectACL- , ObjectACL (..)-- -- * CachediSCSIVolume- , CachediSCSIVolume- , cachediSCSIVolume- , cscsivVolumeiSCSIAttributes- , cscsivVolumeStatus- , cscsivSourceSnapshotId- , cscsivVolumeARN- , cscsivVolumeProgress- , cscsivVolumeSizeInBytes- , cscsivVolumeUsedInBytes- , cscsivCreatedDate- , cscsivVolumeId- , cscsivVolumeType-- -- * ChapInfo- , ChapInfo- , chapInfo- , ciTargetARN- , ciSecretToAuthenticateInitiator- , ciInitiatorName- , ciSecretToAuthenticateTarget-- -- * DeviceiSCSIAttributes- , DeviceiSCSIAttributes- , deviceiSCSIAttributes- , dscsiaTargetARN- , dscsiaChapEnabled- , dscsiaNetworkInterfaceId- , dscsiaNetworkInterfacePort-- -- * Disk- , Disk- , disk- , dDiskAllocationResource- , dDiskAllocationType- , dDiskNode- , dDiskPath- , dDiskSizeInBytes- , dDiskStatus- , dDiskId-- -- * FileShareInfo- , FileShareInfo- , fileShareInfo- , fsiFileShareStatus- , fsiGatewayARN- , fsiFileShareId- , fsiFileShareARN-- -- * GatewayInfo- , GatewayInfo- , gatewayInfo- , giGatewayARN- , giGatewayOperationalState- , giGatewayName- , giGatewayId- , giGatewayType-- -- * NFSFileShareDefaults- , NFSFileShareDefaults- , nFSFileShareDefaults- , nfsfsdFileMode- , nfsfsdOwnerId- , nfsfsdDirectoryMode- , nfsfsdGroupId-- -- * NFSFileShareInfo- , NFSFileShareInfo- , nFSFileShareInfo- , nfsfsiFileShareStatus- , nfsfsiKMSKey- , nfsfsiGatewayARN- , nfsfsiPath- , nfsfsiObjectACL- , nfsfsiKMSEncrypted- , nfsfsiFileShareId- , nfsfsiFileShareARN- , nfsfsiDefaultStorageClass- , nfsfsiRole- , nfsfsiSquash- , nfsfsiRequesterPays- , nfsfsiNFSFileShareDefaults- , nfsfsiLocationARN- , nfsfsiClientList- , nfsfsiGuessMIMETypeEnabled- , nfsfsiReadOnly-- -- * NetworkInterface- , NetworkInterface- , networkInterface- , niIPv6Address- , niMACAddress- , niIPv4Address-- -- * StorediSCSIVolume- , StorediSCSIVolume- , storediSCSIVolume- , sscsivVolumeiSCSIAttributes- , sscsivVolumeStatus- , sscsivSourceSnapshotId- , sscsivPreservedExistingData- , sscsivVolumeARN- , sscsivVolumeProgress- , sscsivVolumeSizeInBytes- , sscsivVolumeUsedInBytes- , sscsivCreatedDate- , sscsivVolumeId- , sscsivVolumeDiskId- , sscsivVolumeType-- -- * Tag- , Tag- , tag- , tagKey- , tagValue-- -- * Tape- , Tape- , tape- , tTapeBarcode- , tTapeStatus- , tTapeARN- , tProgress- , tTapeSizeInBytes- , tVTLDevice- , tTapeUsedInBytes- , tTapeCreatedDate-- -- * TapeArchive- , TapeArchive- , tapeArchive- , taTapeBarcode- , taTapeStatus- , taTapeARN- , taTapeSizeInBytes- , taCompletionTime- , taTapeUsedInBytes- , taTapeCreatedDate- , taRetrievedTo-- -- * TapeInfo- , TapeInfo- , tapeInfo- , tiTapeBarcode- , tiTapeStatus- , tiTapeARN- , tiGatewayARN- , tiTapeSizeInBytes-- -- * TapeRecoveryPointInfo- , TapeRecoveryPointInfo- , tapeRecoveryPointInfo- , trpiTapeStatus- , trpiTapeRecoveryPointTime- , trpiTapeARN- , trpiTapeSizeInBytes-- -- * VTLDevice- , VTLDevice- , vTLDevice- , vtldDeviceiSCSIAttributes- , vtldVTLDeviceVendor- , vtldVTLDeviceARN- , vtldVTLDeviceType- , vtldVTLDeviceProductIdentifier-- -- * VolumeInfo- , VolumeInfo- , volumeInfo- , viGatewayARN- , viVolumeARN- , viVolumeSizeInBytes- , viVolumeId- , viGatewayId- , viVolumeType-- -- * VolumeRecoveryPointInfo- , VolumeRecoveryPointInfo- , volumeRecoveryPointInfo- , vrpiVolumeRecoveryPointTime- , vrpiVolumeARN- , vrpiVolumeSizeInBytes- , vrpiVolumeUsageInBytes-- -- * VolumeiSCSIAttributes- , VolumeiSCSIAttributes- , volumeiSCSIAttributes- , vscsiaLunNumber- , vscsiaTargetARN- , vscsiaChapEnabled- , vscsiaNetworkInterfaceId- , vscsiaNetworkInterfacePort- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Sign.V4-import Network.AWS.StorageGateway.Types.Product-import Network.AWS.StorageGateway.Types.Sum---- | API version @2013-06-30@ of the Amazon Storage Gateway SDK configuration.-storageGateway :: Service-storageGateway =- Service- { _svcAbbrev = "StorageGateway"- , _svcSigner = v4- , _svcPrefix = "storagegateway"- , _svcVersion = "2013-06-30"- , _svcEndpoint = defaultEndpoint storageGateway- , _svcTimeout = Just 70- , _svcCheck = statusSuccess- , _svcError = parseJSONError "StorageGateway"- , _svcRetry = retry- }- where- retry =- Exponential- { _retryBase = 5.0e-2- , _retryGrowth = 2- , _retryAttempts = 5- , _retryCheck = check- }- check e- | has (hasCode "ThrottledException" . hasStatus 400) e =- Just "throttled_exception"- | has (hasStatus 429) e = Just "too_many_requests"- | has (hasCode "ThrottlingException" . hasStatus 400) e =- Just "throttling_exception"- | has (hasCode "Throttling" . hasStatus 400) e = Just "throttling"- | has (hasStatus 504) e = Just "gateway_timeout"- | has (hasCode "RequestThrottledException" . hasStatus 400) e =- Just "request_throttled_exception"- | has (hasStatus 502) e = Just "bad_gateway"- | has (hasStatus 503) e = Just "service_unavailable"- | has (hasStatus 500) e = Just "general_server_error"- | has (hasStatus 509) e = Just "limit_exceeded"- | otherwise = Nothing----- | An exception occurred because an invalid gateway request was issued to the service. For more information, see the error and message fields.-------_InvalidGatewayRequestException :: AsError a => Getting (First ServiceError) a ServiceError-_InvalidGatewayRequestException =- _MatchServiceError storageGateway "InvalidGatewayRequestException"----- | An internal server error has occurred because the service is unavailable. For more information, see the error and message fields.-------_ServiceUnavailableError :: AsError a => Getting (First ServiceError) a ServiceError-_ServiceUnavailableError =- _MatchServiceError storageGateway "ServiceUnavailableError"----- | An internal server error has occurred during the request. For more information, see the error and message fields.-------_InternalServerError :: AsError a => Getting (First ServiceError) a ServiceError-_InternalServerError = _MatchServiceError storageGateway "InternalServerError"-
− gen/Network/AWS/StorageGateway/Types/Product.hs
@@ -1,1615 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.Types.Product--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)----module Network.AWS.StorageGateway.Types.Product where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.StorageGateway.Types.Sum---- | Describes an iSCSI cached volume.------------ /See:/ 'cachediSCSIVolume' smart constructor.-data CachediSCSIVolume = CachediSCSIVolume'- { _cscsivVolumeiSCSIAttributes :: !(Maybe VolumeiSCSIAttributes)- , _cscsivVolumeStatus :: !(Maybe Text)- , _cscsivSourceSnapshotId :: !(Maybe Text)- , _cscsivVolumeARN :: !(Maybe Text)- , _cscsivVolumeProgress :: !(Maybe Double)- , _cscsivVolumeSizeInBytes :: !(Maybe Integer)- , _cscsivVolumeUsedInBytes :: !(Maybe Integer)- , _cscsivCreatedDate :: !(Maybe POSIX)- , _cscsivVolumeId :: !(Maybe Text)- , _cscsivVolumeType :: !(Maybe Text)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'CachediSCSIVolume' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cscsivVolumeiSCSIAttributes' - An 'VolumeiSCSIAttributes' object that represents a collection of iSCSI attributes for one stored volume.------ * 'cscsivVolumeStatus' - One of the VolumeStatus values that indicates the state of the storage volume.------ * 'cscsivSourceSnapshotId' - If the cached volume was created from a snapshot, this field contains the snapshot ID used, e.g. snap-78e22663. Otherwise, this field is not included.------ * 'cscsivVolumeARN' - The Amazon Resource Name (ARN) of the storage volume.------ * 'cscsivVolumeProgress' - Represents the percentage complete if the volume is restoring or bootstrapping that represents the percent of data transferred. This field does not appear in the response if the cached volume is not restoring or bootstrapping.------ * 'cscsivVolumeSizeInBytes' - The size, in bytes, of the volume capacity.------ * 'cscsivVolumeUsedInBytes' - The size of the data stored on the volume in bytes.------ * 'cscsivCreatedDate' - The date the volume was created. Volumes created prior to March 28, 2017 don’t have this time stamp.------ * 'cscsivVolumeId' - The unique identifier of the volume, e.g. vol-AE4B946D.------ * 'cscsivVolumeType' - One of the VolumeType enumeration values that describes the type of the volume.-cachediSCSIVolume- :: CachediSCSIVolume-cachediSCSIVolume =- CachediSCSIVolume'- { _cscsivVolumeiSCSIAttributes = Nothing- , _cscsivVolumeStatus = Nothing- , _cscsivSourceSnapshotId = Nothing- , _cscsivVolumeARN = Nothing- , _cscsivVolumeProgress = Nothing- , _cscsivVolumeSizeInBytes = Nothing- , _cscsivVolumeUsedInBytes = Nothing- , _cscsivCreatedDate = Nothing- , _cscsivVolumeId = Nothing- , _cscsivVolumeType = Nothing- }----- | An 'VolumeiSCSIAttributes' object that represents a collection of iSCSI attributes for one stored volume.-cscsivVolumeiSCSIAttributes :: Lens' CachediSCSIVolume (Maybe VolumeiSCSIAttributes)-cscsivVolumeiSCSIAttributes = lens _cscsivVolumeiSCSIAttributes (\ s a -> s{_cscsivVolumeiSCSIAttributes = a})---- | One of the VolumeStatus values that indicates the state of the storage volume.-cscsivVolumeStatus :: Lens' CachediSCSIVolume (Maybe Text)-cscsivVolumeStatus = lens _cscsivVolumeStatus (\ s a -> s{_cscsivVolumeStatus = a})---- | If the cached volume was created from a snapshot, this field contains the snapshot ID used, e.g. snap-78e22663. Otherwise, this field is not included.-cscsivSourceSnapshotId :: Lens' CachediSCSIVolume (Maybe Text)-cscsivSourceSnapshotId = lens _cscsivSourceSnapshotId (\ s a -> s{_cscsivSourceSnapshotId = a})---- | The Amazon Resource Name (ARN) of the storage volume.-cscsivVolumeARN :: Lens' CachediSCSIVolume (Maybe Text)-cscsivVolumeARN = lens _cscsivVolumeARN (\ s a -> s{_cscsivVolumeARN = a})---- | Represents the percentage complete if the volume is restoring or bootstrapping that represents the percent of data transferred. This field does not appear in the response if the cached volume is not restoring or bootstrapping.-cscsivVolumeProgress :: Lens' CachediSCSIVolume (Maybe Double)-cscsivVolumeProgress = lens _cscsivVolumeProgress (\ s a -> s{_cscsivVolumeProgress = a})---- | The size, in bytes, of the volume capacity.-cscsivVolumeSizeInBytes :: Lens' CachediSCSIVolume (Maybe Integer)-cscsivVolumeSizeInBytes = lens _cscsivVolumeSizeInBytes (\ s a -> s{_cscsivVolumeSizeInBytes = a})---- | The size of the data stored on the volume in bytes.-cscsivVolumeUsedInBytes :: Lens' CachediSCSIVolume (Maybe Integer)-cscsivVolumeUsedInBytes = lens _cscsivVolumeUsedInBytes (\ s a -> s{_cscsivVolumeUsedInBytes = a})---- | The date the volume was created. Volumes created prior to March 28, 2017 don’t have this time stamp.-cscsivCreatedDate :: Lens' CachediSCSIVolume (Maybe UTCTime)-cscsivCreatedDate = lens _cscsivCreatedDate (\ s a -> s{_cscsivCreatedDate = a}) . mapping _Time---- | The unique identifier of the volume, e.g. vol-AE4B946D.-cscsivVolumeId :: Lens' CachediSCSIVolume (Maybe Text)-cscsivVolumeId = lens _cscsivVolumeId (\ s a -> s{_cscsivVolumeId = a})---- | One of the VolumeType enumeration values that describes the type of the volume.-cscsivVolumeType :: Lens' CachediSCSIVolume (Maybe Text)-cscsivVolumeType = lens _cscsivVolumeType (\ s a -> s{_cscsivVolumeType = a})--instance FromJSON CachediSCSIVolume where- parseJSON- = withObject "CachediSCSIVolume"- (\ x ->- CachediSCSIVolume' <$>- (x .:? "VolumeiSCSIAttributes") <*>- (x .:? "VolumeStatus")- <*> (x .:? "SourceSnapshotId")- <*> (x .:? "VolumeARN")- <*> (x .:? "VolumeProgress")- <*> (x .:? "VolumeSizeInBytes")- <*> (x .:? "VolumeUsedInBytes")- <*> (x .:? "CreatedDate")- <*> (x .:? "VolumeId")- <*> (x .:? "VolumeType"))--instance Hashable CachediSCSIVolume where--instance NFData CachediSCSIVolume where---- | Describes Challenge-Handshake Authentication Protocol (CHAP) information that supports authentication between your gateway and iSCSI initiators.------------ /See:/ 'chapInfo' smart constructor.-data ChapInfo = ChapInfo'- { _ciTargetARN :: !(Maybe Text)- , _ciSecretToAuthenticateInitiator :: !(Maybe Text)- , _ciInitiatorName :: !(Maybe Text)- , _ciSecretToAuthenticateTarget :: !(Maybe Text)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'ChapInfo' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ciTargetARN' - The Amazon Resource Name (ARN) of the volume. Valid Values: 50 to 500 lowercase letters, numbers, periods (.), and hyphens (-).------ * 'ciSecretToAuthenticateInitiator' - The secret key that the initiator (for example, the Windows client) must provide to participate in mutual CHAP with the target.------ * 'ciInitiatorName' - The iSCSI initiator that connects to the target.------ * 'ciSecretToAuthenticateTarget' - The secret key that the target must provide to participate in mutual CHAP with the initiator (e.g. Windows client).-chapInfo- :: ChapInfo-chapInfo =- ChapInfo'- { _ciTargetARN = Nothing- , _ciSecretToAuthenticateInitiator = Nothing- , _ciInitiatorName = Nothing- , _ciSecretToAuthenticateTarget = Nothing- }----- | The Amazon Resource Name (ARN) of the volume. Valid Values: 50 to 500 lowercase letters, numbers, periods (.), and hyphens (-).-ciTargetARN :: Lens' ChapInfo (Maybe Text)-ciTargetARN = lens _ciTargetARN (\ s a -> s{_ciTargetARN = a})---- | The secret key that the initiator (for example, the Windows client) must provide to participate in mutual CHAP with the target.-ciSecretToAuthenticateInitiator :: Lens' ChapInfo (Maybe Text)-ciSecretToAuthenticateInitiator = lens _ciSecretToAuthenticateInitiator (\ s a -> s{_ciSecretToAuthenticateInitiator = a})---- | The iSCSI initiator that connects to the target.-ciInitiatorName :: Lens' ChapInfo (Maybe Text)-ciInitiatorName = lens _ciInitiatorName (\ s a -> s{_ciInitiatorName = a})---- | The secret key that the target must provide to participate in mutual CHAP with the initiator (e.g. Windows client).-ciSecretToAuthenticateTarget :: Lens' ChapInfo (Maybe Text)-ciSecretToAuthenticateTarget = lens _ciSecretToAuthenticateTarget (\ s a -> s{_ciSecretToAuthenticateTarget = a})--instance FromJSON ChapInfo where- parseJSON- = withObject "ChapInfo"- (\ x ->- ChapInfo' <$>- (x .:? "TargetARN") <*>- (x .:? "SecretToAuthenticateInitiator")- <*> (x .:? "InitiatorName")- <*> (x .:? "SecretToAuthenticateTarget"))--instance Hashable ChapInfo where--instance NFData ChapInfo where---- | Lists iSCSI information about a VTL device.------------ /See:/ 'deviceiSCSIAttributes' smart constructor.-data DeviceiSCSIAttributes = DeviceiSCSIAttributes'- { _dscsiaTargetARN :: !(Maybe Text)- , _dscsiaChapEnabled :: !(Maybe Bool)- , _dscsiaNetworkInterfaceId :: !(Maybe Text)- , _dscsiaNetworkInterfacePort :: !(Maybe Int)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'DeviceiSCSIAttributes' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dscsiaTargetARN' - Specifies the unique Amazon Resource Name(ARN) that encodes the iSCSI qualified name(iqn) of a tape drive or media changer target.------ * 'dscsiaChapEnabled' - Indicates whether mutual CHAP is enabled for the iSCSI target.------ * 'dscsiaNetworkInterfaceId' - The network interface identifier of the VTL device.------ * 'dscsiaNetworkInterfacePort' - The port used to communicate with iSCSI VTL device targets.-deviceiSCSIAttributes- :: DeviceiSCSIAttributes-deviceiSCSIAttributes =- DeviceiSCSIAttributes'- { _dscsiaTargetARN = Nothing- , _dscsiaChapEnabled = Nothing- , _dscsiaNetworkInterfaceId = Nothing- , _dscsiaNetworkInterfacePort = Nothing- }----- | Specifies the unique Amazon Resource Name(ARN) that encodes the iSCSI qualified name(iqn) of a tape drive or media changer target.-dscsiaTargetARN :: Lens' DeviceiSCSIAttributes (Maybe Text)-dscsiaTargetARN = lens _dscsiaTargetARN (\ s a -> s{_dscsiaTargetARN = a})---- | Indicates whether mutual CHAP is enabled for the iSCSI target.-dscsiaChapEnabled :: Lens' DeviceiSCSIAttributes (Maybe Bool)-dscsiaChapEnabled = lens _dscsiaChapEnabled (\ s a -> s{_dscsiaChapEnabled = a})---- | The network interface identifier of the VTL device.-dscsiaNetworkInterfaceId :: Lens' DeviceiSCSIAttributes (Maybe Text)-dscsiaNetworkInterfaceId = lens _dscsiaNetworkInterfaceId (\ s a -> s{_dscsiaNetworkInterfaceId = a})---- | The port used to communicate with iSCSI VTL device targets.-dscsiaNetworkInterfacePort :: Lens' DeviceiSCSIAttributes (Maybe Int)-dscsiaNetworkInterfacePort = lens _dscsiaNetworkInterfacePort (\ s a -> s{_dscsiaNetworkInterfacePort = a})--instance FromJSON DeviceiSCSIAttributes where- parseJSON- = withObject "DeviceiSCSIAttributes"- (\ x ->- DeviceiSCSIAttributes' <$>- (x .:? "TargetARN") <*> (x .:? "ChapEnabled") <*>- (x .:? "NetworkInterfaceId")- <*> (x .:? "NetworkInterfacePort"))--instance Hashable DeviceiSCSIAttributes where--instance NFData DeviceiSCSIAttributes where---- | /See:/ 'disk' smart constructor.-data Disk = Disk'- { _dDiskAllocationResource :: !(Maybe Text)- , _dDiskAllocationType :: !(Maybe Text)- , _dDiskNode :: !(Maybe Text)- , _dDiskPath :: !(Maybe Text)- , _dDiskSizeInBytes :: !(Maybe Integer)- , _dDiskStatus :: !(Maybe Text)- , _dDiskId :: !(Maybe Text)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'Disk' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dDiskAllocationResource' - Undocumented member.------ * 'dDiskAllocationType' - Undocumented member.------ * 'dDiskNode' - Undocumented member.------ * 'dDiskPath' - Undocumented member.------ * 'dDiskSizeInBytes' - Undocumented member.------ * 'dDiskStatus' - Undocumented member.------ * 'dDiskId' - Undocumented member.-disk- :: Disk-disk =- Disk'- { _dDiskAllocationResource = Nothing- , _dDiskAllocationType = Nothing- , _dDiskNode = Nothing- , _dDiskPath = Nothing- , _dDiskSizeInBytes = Nothing- , _dDiskStatus = Nothing- , _dDiskId = Nothing- }----- | Undocumented member.-dDiskAllocationResource :: Lens' Disk (Maybe Text)-dDiskAllocationResource = lens _dDiskAllocationResource (\ s a -> s{_dDiskAllocationResource = a})---- | Undocumented member.-dDiskAllocationType :: Lens' Disk (Maybe Text)-dDiskAllocationType = lens _dDiskAllocationType (\ s a -> s{_dDiskAllocationType = a})---- | Undocumented member.-dDiskNode :: Lens' Disk (Maybe Text)-dDiskNode = lens _dDiskNode (\ s a -> s{_dDiskNode = a})---- | Undocumented member.-dDiskPath :: Lens' Disk (Maybe Text)-dDiskPath = lens _dDiskPath (\ s a -> s{_dDiskPath = a})---- | Undocumented member.-dDiskSizeInBytes :: Lens' Disk (Maybe Integer)-dDiskSizeInBytes = lens _dDiskSizeInBytes (\ s a -> s{_dDiskSizeInBytes = a})---- | Undocumented member.-dDiskStatus :: Lens' Disk (Maybe Text)-dDiskStatus = lens _dDiskStatus (\ s a -> s{_dDiskStatus = a})---- | Undocumented member.-dDiskId :: Lens' Disk (Maybe Text)-dDiskId = lens _dDiskId (\ s a -> s{_dDiskId = a})--instance FromJSON Disk where- parseJSON- = withObject "Disk"- (\ x ->- Disk' <$>- (x .:? "DiskAllocationResource") <*>- (x .:? "DiskAllocationType")- <*> (x .:? "DiskNode")- <*> (x .:? "DiskPath")- <*> (x .:? "DiskSizeInBytes")- <*> (x .:? "DiskStatus")- <*> (x .:? "DiskId"))--instance Hashable Disk where--instance NFData Disk where---- | Describes a file share.------------ /See:/ 'fileShareInfo' smart constructor.-data FileShareInfo = FileShareInfo'- { _fsiFileShareStatus :: !(Maybe Text)- , _fsiGatewayARN :: !(Maybe Text)- , _fsiFileShareId :: !(Maybe Text)- , _fsiFileShareARN :: !(Maybe Text)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'FileShareInfo' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'fsiFileShareStatus' - Undocumented member.------ * 'fsiGatewayARN' - Undocumented member.------ * 'fsiFileShareId' - Undocumented member.------ * 'fsiFileShareARN' - Undocumented member.-fileShareInfo- :: FileShareInfo-fileShareInfo =- FileShareInfo'- { _fsiFileShareStatus = Nothing- , _fsiGatewayARN = Nothing- , _fsiFileShareId = Nothing- , _fsiFileShareARN = Nothing- }----- | Undocumented member.-fsiFileShareStatus :: Lens' FileShareInfo (Maybe Text)-fsiFileShareStatus = lens _fsiFileShareStatus (\ s a -> s{_fsiFileShareStatus = a})---- | Undocumented member.-fsiGatewayARN :: Lens' FileShareInfo (Maybe Text)-fsiGatewayARN = lens _fsiGatewayARN (\ s a -> s{_fsiGatewayARN = a})---- | Undocumented member.-fsiFileShareId :: Lens' FileShareInfo (Maybe Text)-fsiFileShareId = lens _fsiFileShareId (\ s a -> s{_fsiFileShareId = a})---- | Undocumented member.-fsiFileShareARN :: Lens' FileShareInfo (Maybe Text)-fsiFileShareARN = lens _fsiFileShareARN (\ s a -> s{_fsiFileShareARN = a})--instance FromJSON FileShareInfo where- parseJSON- = withObject "FileShareInfo"- (\ x ->- FileShareInfo' <$>- (x .:? "FileShareStatus") <*> (x .:? "GatewayARN")- <*> (x .:? "FileShareId")- <*> (x .:? "FileShareARN"))--instance Hashable FileShareInfo where--instance NFData FileShareInfo where---- | Describes a gateway object.------------ /See:/ 'gatewayInfo' smart constructor.-data GatewayInfo = GatewayInfo'- { _giGatewayARN :: !(Maybe Text)- , _giGatewayOperationalState :: !(Maybe Text)- , _giGatewayName :: !(Maybe Text)- , _giGatewayId :: !(Maybe Text)- , _giGatewayType :: !(Maybe Text)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'GatewayInfo' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'giGatewayARN' - The Amazon Resource Name (ARN) of the gateway. Use the 'ListGateways' operation to return a list of gateways for your account and region.------ * 'giGatewayOperationalState' - The state of the gateway. Valid Values: DISABLED or ACTIVE------ * 'giGatewayName' - The name of the gateway.------ * 'giGatewayId' - The unique identifier assigned to your gateway during activation. This ID becomes part of the gateway Amazon Resource Name (ARN), which you use as input for other operations.------ * 'giGatewayType' - The type of the gateway.-gatewayInfo- :: GatewayInfo-gatewayInfo =- GatewayInfo'- { _giGatewayARN = Nothing- , _giGatewayOperationalState = Nothing- , _giGatewayName = Nothing- , _giGatewayId = Nothing- , _giGatewayType = Nothing- }----- | The Amazon Resource Name (ARN) of the gateway. Use the 'ListGateways' operation to return a list of gateways for your account and region.-giGatewayARN :: Lens' GatewayInfo (Maybe Text)-giGatewayARN = lens _giGatewayARN (\ s a -> s{_giGatewayARN = a})---- | The state of the gateway. Valid Values: DISABLED or ACTIVE-giGatewayOperationalState :: Lens' GatewayInfo (Maybe Text)-giGatewayOperationalState = lens _giGatewayOperationalState (\ s a -> s{_giGatewayOperationalState = a})---- | The name of the gateway.-giGatewayName :: Lens' GatewayInfo (Maybe Text)-giGatewayName = lens _giGatewayName (\ s a -> s{_giGatewayName = a})---- | The unique identifier assigned to your gateway during activation. This ID becomes part of the gateway Amazon Resource Name (ARN), which you use as input for other operations.-giGatewayId :: Lens' GatewayInfo (Maybe Text)-giGatewayId = lens _giGatewayId (\ s a -> s{_giGatewayId = a})---- | The type of the gateway.-giGatewayType :: Lens' GatewayInfo (Maybe Text)-giGatewayType = lens _giGatewayType (\ s a -> s{_giGatewayType = a})--instance FromJSON GatewayInfo where- parseJSON- = withObject "GatewayInfo"- (\ x ->- GatewayInfo' <$>- (x .:? "GatewayARN") <*>- (x .:? "GatewayOperationalState")- <*> (x .:? "GatewayName")- <*> (x .:? "GatewayId")- <*> (x .:? "GatewayType"))--instance Hashable GatewayInfo where--instance NFData GatewayInfo where---- | Describes file share default values. Files and folders stored as Amazon S3 objects in S3 buckets don't, by default, have Unix file permissions assigned to them. Upon discovery in an S3 bucket by Storage Gateway, the S3 objects that represent files and folders are assigned these default Unix permissions. This operation is only supported in the file gateway type.------------ /See:/ 'nFSFileShareDefaults' smart constructor.-data NFSFileShareDefaults = NFSFileShareDefaults'- { _nfsfsdFileMode :: !(Maybe Text)- , _nfsfsdOwnerId :: !(Maybe Nat)- , _nfsfsdDirectoryMode :: !(Maybe Text)- , _nfsfsdGroupId :: !(Maybe Nat)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'NFSFileShareDefaults' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'nfsfsdFileMode' - The Unix file mode in the form "nnnn". For example, "0666" represents the default file mode inside the file share. The default value is 0666.------ * 'nfsfsdOwnerId' - The default owner ID for files in the file share (unless the files have another owner ID specified). The default value is nfsnobody.------ * 'nfsfsdDirectoryMode' - The Unix directory mode in the form "nnnn". For example, "0666" represents the default access mode for all directories inside the file share. The default value is 0777.------ * 'nfsfsdGroupId' - The default group ID for the file share (unless the files have another group ID specified). The default value is nfsnobody.-nFSFileShareDefaults- :: NFSFileShareDefaults-nFSFileShareDefaults =- NFSFileShareDefaults'- { _nfsfsdFileMode = Nothing- , _nfsfsdOwnerId = Nothing- , _nfsfsdDirectoryMode = Nothing- , _nfsfsdGroupId = Nothing- }----- | The Unix file mode in the form "nnnn". For example, "0666" represents the default file mode inside the file share. The default value is 0666.-nfsfsdFileMode :: Lens' NFSFileShareDefaults (Maybe Text)-nfsfsdFileMode = lens _nfsfsdFileMode (\ s a -> s{_nfsfsdFileMode = a})---- | The default owner ID for files in the file share (unless the files have another owner ID specified). The default value is nfsnobody.-nfsfsdOwnerId :: Lens' NFSFileShareDefaults (Maybe Natural)-nfsfsdOwnerId = lens _nfsfsdOwnerId (\ s a -> s{_nfsfsdOwnerId = a}) . mapping _Nat---- | The Unix directory mode in the form "nnnn". For example, "0666" represents the default access mode for all directories inside the file share. The default value is 0777.-nfsfsdDirectoryMode :: Lens' NFSFileShareDefaults (Maybe Text)-nfsfsdDirectoryMode = lens _nfsfsdDirectoryMode (\ s a -> s{_nfsfsdDirectoryMode = a})---- | The default group ID for the file share (unless the files have another group ID specified). The default value is nfsnobody.-nfsfsdGroupId :: Lens' NFSFileShareDefaults (Maybe Natural)-nfsfsdGroupId = lens _nfsfsdGroupId (\ s a -> s{_nfsfsdGroupId = a}) . mapping _Nat--instance FromJSON NFSFileShareDefaults where- parseJSON- = withObject "NFSFileShareDefaults"- (\ x ->- NFSFileShareDefaults' <$>- (x .:? "FileMode") <*> (x .:? "OwnerId") <*>- (x .:? "DirectoryMode")- <*> (x .:? "GroupId"))--instance Hashable NFSFileShareDefaults where--instance NFData NFSFileShareDefaults where--instance ToJSON NFSFileShareDefaults where- toJSON NFSFileShareDefaults'{..}- = object- (catMaybes- [("FileMode" .=) <$> _nfsfsdFileMode,- ("OwnerId" .=) <$> _nfsfsdOwnerId,- ("DirectoryMode" .=) <$> _nfsfsdDirectoryMode,- ("GroupId" .=) <$> _nfsfsdGroupId])---- | The Unix file permissions and ownership information assigned, by default, to native S3 objects when file gateway discovers them in S3 buckets. This operation is only supported in file gateways.------------ /See:/ 'nFSFileShareInfo' smart constructor.-data NFSFileShareInfo = NFSFileShareInfo'- { _nfsfsiFileShareStatus :: !(Maybe Text)- , _nfsfsiKMSKey :: !(Maybe Text)- , _nfsfsiGatewayARN :: !(Maybe Text)- , _nfsfsiPath :: !(Maybe Text)- , _nfsfsiObjectACL :: !(Maybe ObjectACL)- , _nfsfsiKMSEncrypted :: !(Maybe Bool)- , _nfsfsiFileShareId :: !(Maybe Text)- , _nfsfsiFileShareARN :: !(Maybe Text)- , _nfsfsiDefaultStorageClass :: !(Maybe Text)- , _nfsfsiRole :: !(Maybe Text)- , _nfsfsiSquash :: !(Maybe Text)- , _nfsfsiRequesterPays :: !(Maybe Bool)- , _nfsfsiNFSFileShareDefaults :: !(Maybe NFSFileShareDefaults)- , _nfsfsiLocationARN :: !(Maybe Text)- , _nfsfsiClientList :: !(Maybe (List1 Text))- , _nfsfsiGuessMIMETypeEnabled :: !(Maybe Bool)- , _nfsfsiReadOnly :: !(Maybe Bool)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'NFSFileShareInfo' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'nfsfsiFileShareStatus' - Undocumented member.------ * 'nfsfsiKMSKey' - Undocumented member.------ * 'nfsfsiGatewayARN' - Undocumented member.------ * 'nfsfsiPath' - Undocumented member.------ * 'nfsfsiObjectACL' - Undocumented member.------ * 'nfsfsiKMSEncrypted' - True to use Amazon S3 server side encryption with your own KMS key, or false to use a key managed by Amazon S3. Optional.------ * 'nfsfsiFileShareId' - Undocumented member.------ * 'nfsfsiFileShareARN' - Undocumented member.------ * 'nfsfsiDefaultStorageClass' - The default storage class for objects put into an Amazon S3 bucket by file gateway. Possible values are S3_STANDARD or S3_STANDARD_IA. If this field is not populated, the default value S3_STANDARD is used. Optional.------ * 'nfsfsiRole' - Undocumented member.------ * 'nfsfsiSquash' - Undocumented member.------ * 'nfsfsiRequesterPays' - Sets who pays the cost of the request and the data download from the Amazon S3 bucket. Set this value to true if you want the requester to pay instead of the bucket owner, and otherwise to false.------ * 'nfsfsiNFSFileShareDefaults' - Undocumented member.------ * 'nfsfsiLocationARN' - Undocumented member.------ * 'nfsfsiClientList' - Undocumented member.------ * 'nfsfsiGuessMIMETypeEnabled' - Enables guessing of the MIME type for uploaded objects based on file extensions. Set this value to true to enable MIME type guessing, and otherwise to false. The default value is true.------ * 'nfsfsiReadOnly' - Sets the write status of a file share. This value is true if the write status is read-only, and otherwise false.-nFSFileShareInfo- :: NFSFileShareInfo-nFSFileShareInfo =- NFSFileShareInfo'- { _nfsfsiFileShareStatus = Nothing- , _nfsfsiKMSKey = Nothing- , _nfsfsiGatewayARN = Nothing- , _nfsfsiPath = Nothing- , _nfsfsiObjectACL = Nothing- , _nfsfsiKMSEncrypted = Nothing- , _nfsfsiFileShareId = Nothing- , _nfsfsiFileShareARN = Nothing- , _nfsfsiDefaultStorageClass = Nothing- , _nfsfsiRole = Nothing- , _nfsfsiSquash = Nothing- , _nfsfsiRequesterPays = Nothing- , _nfsfsiNFSFileShareDefaults = Nothing- , _nfsfsiLocationARN = Nothing- , _nfsfsiClientList = Nothing- , _nfsfsiGuessMIMETypeEnabled = Nothing- , _nfsfsiReadOnly = Nothing- }----- | Undocumented member.-nfsfsiFileShareStatus :: Lens' NFSFileShareInfo (Maybe Text)-nfsfsiFileShareStatus = lens _nfsfsiFileShareStatus (\ s a -> s{_nfsfsiFileShareStatus = a})---- | Undocumented member.-nfsfsiKMSKey :: Lens' NFSFileShareInfo (Maybe Text)-nfsfsiKMSKey = lens _nfsfsiKMSKey (\ s a -> s{_nfsfsiKMSKey = a})---- | Undocumented member.-nfsfsiGatewayARN :: Lens' NFSFileShareInfo (Maybe Text)-nfsfsiGatewayARN = lens _nfsfsiGatewayARN (\ s a -> s{_nfsfsiGatewayARN = a})---- | Undocumented member.-nfsfsiPath :: Lens' NFSFileShareInfo (Maybe Text)-nfsfsiPath = lens _nfsfsiPath (\ s a -> s{_nfsfsiPath = a})---- | Undocumented member.-nfsfsiObjectACL :: Lens' NFSFileShareInfo (Maybe ObjectACL)-nfsfsiObjectACL = lens _nfsfsiObjectACL (\ s a -> s{_nfsfsiObjectACL = a})---- | True to use Amazon S3 server side encryption with your own KMS key, or false to use a key managed by Amazon S3. Optional.-nfsfsiKMSEncrypted :: Lens' NFSFileShareInfo (Maybe Bool)-nfsfsiKMSEncrypted = lens _nfsfsiKMSEncrypted (\ s a -> s{_nfsfsiKMSEncrypted = a})---- | Undocumented member.-nfsfsiFileShareId :: Lens' NFSFileShareInfo (Maybe Text)-nfsfsiFileShareId = lens _nfsfsiFileShareId (\ s a -> s{_nfsfsiFileShareId = a})---- | Undocumented member.-nfsfsiFileShareARN :: Lens' NFSFileShareInfo (Maybe Text)-nfsfsiFileShareARN = lens _nfsfsiFileShareARN (\ s a -> s{_nfsfsiFileShareARN = a})---- | The default storage class for objects put into an Amazon S3 bucket by file gateway. Possible values are S3_STANDARD or S3_STANDARD_IA. If this field is not populated, the default value S3_STANDARD is used. Optional.-nfsfsiDefaultStorageClass :: Lens' NFSFileShareInfo (Maybe Text)-nfsfsiDefaultStorageClass = lens _nfsfsiDefaultStorageClass (\ s a -> s{_nfsfsiDefaultStorageClass = a})---- | Undocumented member.-nfsfsiRole :: Lens' NFSFileShareInfo (Maybe Text)-nfsfsiRole = lens _nfsfsiRole (\ s a -> s{_nfsfsiRole = a})---- | Undocumented member.-nfsfsiSquash :: Lens' NFSFileShareInfo (Maybe Text)-nfsfsiSquash = lens _nfsfsiSquash (\ s a -> s{_nfsfsiSquash = a})---- | Sets who pays the cost of the request and the data download from the Amazon S3 bucket. Set this value to true if you want the requester to pay instead of the bucket owner, and otherwise to false.-nfsfsiRequesterPays :: Lens' NFSFileShareInfo (Maybe Bool)-nfsfsiRequesterPays = lens _nfsfsiRequesterPays (\ s a -> s{_nfsfsiRequesterPays = a})---- | Undocumented member.-nfsfsiNFSFileShareDefaults :: Lens' NFSFileShareInfo (Maybe NFSFileShareDefaults)-nfsfsiNFSFileShareDefaults = lens _nfsfsiNFSFileShareDefaults (\ s a -> s{_nfsfsiNFSFileShareDefaults = a})---- | Undocumented member.-nfsfsiLocationARN :: Lens' NFSFileShareInfo (Maybe Text)-nfsfsiLocationARN = lens _nfsfsiLocationARN (\ s a -> s{_nfsfsiLocationARN = a})---- | Undocumented member.-nfsfsiClientList :: Lens' NFSFileShareInfo (Maybe (NonEmpty Text))-nfsfsiClientList = lens _nfsfsiClientList (\ s a -> s{_nfsfsiClientList = a}) . mapping _List1---- | Enables guessing of the MIME type for uploaded objects based on file extensions. Set this value to true to enable MIME type guessing, and otherwise to false. The default value is true.-nfsfsiGuessMIMETypeEnabled :: Lens' NFSFileShareInfo (Maybe Bool)-nfsfsiGuessMIMETypeEnabled = lens _nfsfsiGuessMIMETypeEnabled (\ s a -> s{_nfsfsiGuessMIMETypeEnabled = a})---- | Sets the write status of a file share. This value is true if the write status is read-only, and otherwise false.-nfsfsiReadOnly :: Lens' NFSFileShareInfo (Maybe Bool)-nfsfsiReadOnly = lens _nfsfsiReadOnly (\ s a -> s{_nfsfsiReadOnly = a})--instance FromJSON NFSFileShareInfo where- parseJSON- = withObject "NFSFileShareInfo"- (\ x ->- NFSFileShareInfo' <$>- (x .:? "FileShareStatus") <*> (x .:? "KMSKey") <*>- (x .:? "GatewayARN")- <*> (x .:? "Path")- <*> (x .:? "ObjectACL")- <*> (x .:? "KMSEncrypted")- <*> (x .:? "FileShareId")- <*> (x .:? "FileShareARN")- <*> (x .:? "DefaultStorageClass")- <*> (x .:? "Role")- <*> (x .:? "Squash")- <*> (x .:? "RequesterPays")- <*> (x .:? "NFSFileShareDefaults")- <*> (x .:? "LocationARN")- <*> (x .:? "ClientList")- <*> (x .:? "GuessMIMETypeEnabled")- <*> (x .:? "ReadOnly"))--instance Hashable NFSFileShareInfo where--instance NFData NFSFileShareInfo where---- | Describes a gateway's network interface.------------ /See:/ 'networkInterface' smart constructor.-data NetworkInterface = NetworkInterface'- { _niIPv6Address :: !(Maybe Text)- , _niMACAddress :: !(Maybe Text)- , _niIPv4Address :: !(Maybe Text)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'NetworkInterface' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'niIPv6Address' - The Internet Protocol version 6 (IPv6) address of the interface. /Currently not supported/ .------ * 'niMACAddress' - The Media Access Control (MAC) address of the interface.------ * 'niIPv4Address' - The Internet Protocol version 4 (IPv4) address of the interface.-networkInterface- :: NetworkInterface-networkInterface =- NetworkInterface'- { _niIPv6Address = Nothing- , _niMACAddress = Nothing- , _niIPv4Address = Nothing- }----- | The Internet Protocol version 6 (IPv6) address of the interface. /Currently not supported/ .-niIPv6Address :: Lens' NetworkInterface (Maybe Text)-niIPv6Address = lens _niIPv6Address (\ s a -> s{_niIPv6Address = a})---- | The Media Access Control (MAC) address of the interface.-niMACAddress :: Lens' NetworkInterface (Maybe Text)-niMACAddress = lens _niMACAddress (\ s a -> s{_niMACAddress = a})---- | The Internet Protocol version 4 (IPv4) address of the interface.-niIPv4Address :: Lens' NetworkInterface (Maybe Text)-niIPv4Address = lens _niIPv4Address (\ s a -> s{_niIPv4Address = a})--instance FromJSON NetworkInterface where- parseJSON- = withObject "NetworkInterface"- (\ x ->- NetworkInterface' <$>- (x .:? "Ipv6Address") <*> (x .:? "MacAddress") <*>- (x .:? "Ipv4Address"))--instance Hashable NetworkInterface where--instance NFData NetworkInterface where---- | Describes an iSCSI stored volume.------------ /See:/ 'storediSCSIVolume' smart constructor.-data StorediSCSIVolume = StorediSCSIVolume'- { _sscsivVolumeiSCSIAttributes :: !(Maybe VolumeiSCSIAttributes)- , _sscsivVolumeStatus :: !(Maybe Text)- , _sscsivSourceSnapshotId :: !(Maybe Text)- , _sscsivPreservedExistingData :: !(Maybe Bool)- , _sscsivVolumeARN :: !(Maybe Text)- , _sscsivVolumeProgress :: !(Maybe Double)- , _sscsivVolumeSizeInBytes :: !(Maybe Integer)- , _sscsivVolumeUsedInBytes :: !(Maybe Integer)- , _sscsivCreatedDate :: !(Maybe POSIX)- , _sscsivVolumeId :: !(Maybe Text)- , _sscsivVolumeDiskId :: !(Maybe Text)- , _sscsivVolumeType :: !(Maybe Text)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'StorediSCSIVolume' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'sscsivVolumeiSCSIAttributes' - An 'VolumeiSCSIAttributes' object that represents a collection of iSCSI attributes for one stored volume.------ * 'sscsivVolumeStatus' - One of the VolumeStatus values that indicates the state of the storage volume.------ * 'sscsivSourceSnapshotId' - If the stored volume was created from a snapshot, this field contains the snapshot ID used, e.g. snap-78e22663. Otherwise, this field is not included.------ * 'sscsivPreservedExistingData' - Indicates if when the stored volume was created, existing data on the underlying local disk was preserved. Valid Values: true, false------ * 'sscsivVolumeARN' - The Amazon Resource Name (ARN) of the storage volume.------ * 'sscsivVolumeProgress' - Represents the percentage complete if the volume is restoring or bootstrapping that represents the percent of data transferred. This field does not appear in the response if the stored volume is not restoring or bootstrapping.------ * 'sscsivVolumeSizeInBytes' - The size of the volume in bytes.------ * 'sscsivVolumeUsedInBytes' - The size of the data stored on the volume in bytes.------ * 'sscsivCreatedDate' - The date the volume was created. Volumes created prior to March 28, 2017 don’t have this time stamp.------ * 'sscsivVolumeId' - The unique identifier of the volume, e.g. vol-AE4B946D.------ * 'sscsivVolumeDiskId' - The ID of the local disk that was specified in the 'CreateStorediSCSIVolume' operation.------ * 'sscsivVolumeType' - One of the VolumeType enumeration values describing the type of the volume.-storediSCSIVolume- :: StorediSCSIVolume-storediSCSIVolume =- StorediSCSIVolume'- { _sscsivVolumeiSCSIAttributes = Nothing- , _sscsivVolumeStatus = Nothing- , _sscsivSourceSnapshotId = Nothing- , _sscsivPreservedExistingData = Nothing- , _sscsivVolumeARN = Nothing- , _sscsivVolumeProgress = Nothing- , _sscsivVolumeSizeInBytes = Nothing- , _sscsivVolumeUsedInBytes = Nothing- , _sscsivCreatedDate = Nothing- , _sscsivVolumeId = Nothing- , _sscsivVolumeDiskId = Nothing- , _sscsivVolumeType = Nothing- }----- | An 'VolumeiSCSIAttributes' object that represents a collection of iSCSI attributes for one stored volume.-sscsivVolumeiSCSIAttributes :: Lens' StorediSCSIVolume (Maybe VolumeiSCSIAttributes)-sscsivVolumeiSCSIAttributes = lens _sscsivVolumeiSCSIAttributes (\ s a -> s{_sscsivVolumeiSCSIAttributes = a})---- | One of the VolumeStatus values that indicates the state of the storage volume.-sscsivVolumeStatus :: Lens' StorediSCSIVolume (Maybe Text)-sscsivVolumeStatus = lens _sscsivVolumeStatus (\ s a -> s{_sscsivVolumeStatus = a})---- | If the stored volume was created from a snapshot, this field contains the snapshot ID used, e.g. snap-78e22663. Otherwise, this field is not included.-sscsivSourceSnapshotId :: Lens' StorediSCSIVolume (Maybe Text)-sscsivSourceSnapshotId = lens _sscsivSourceSnapshotId (\ s a -> s{_sscsivSourceSnapshotId = a})---- | Indicates if when the stored volume was created, existing data on the underlying local disk was preserved. Valid Values: true, false-sscsivPreservedExistingData :: Lens' StorediSCSIVolume (Maybe Bool)-sscsivPreservedExistingData = lens _sscsivPreservedExistingData (\ s a -> s{_sscsivPreservedExistingData = a})---- | The Amazon Resource Name (ARN) of the storage volume.-sscsivVolumeARN :: Lens' StorediSCSIVolume (Maybe Text)-sscsivVolumeARN = lens _sscsivVolumeARN (\ s a -> s{_sscsivVolumeARN = a})---- | Represents the percentage complete if the volume is restoring or bootstrapping that represents the percent of data transferred. This field does not appear in the response if the stored volume is not restoring or bootstrapping.-sscsivVolumeProgress :: Lens' StorediSCSIVolume (Maybe Double)-sscsivVolumeProgress = lens _sscsivVolumeProgress (\ s a -> s{_sscsivVolumeProgress = a})---- | The size of the volume in bytes.-sscsivVolumeSizeInBytes :: Lens' StorediSCSIVolume (Maybe Integer)-sscsivVolumeSizeInBytes = lens _sscsivVolumeSizeInBytes (\ s a -> s{_sscsivVolumeSizeInBytes = a})---- | The size of the data stored on the volume in bytes.-sscsivVolumeUsedInBytes :: Lens' StorediSCSIVolume (Maybe Integer)-sscsivVolumeUsedInBytes = lens _sscsivVolumeUsedInBytes (\ s a -> s{_sscsivVolumeUsedInBytes = a})---- | The date the volume was created. Volumes created prior to March 28, 2017 don’t have this time stamp.-sscsivCreatedDate :: Lens' StorediSCSIVolume (Maybe UTCTime)-sscsivCreatedDate = lens _sscsivCreatedDate (\ s a -> s{_sscsivCreatedDate = a}) . mapping _Time---- | The unique identifier of the volume, e.g. vol-AE4B946D.-sscsivVolumeId :: Lens' StorediSCSIVolume (Maybe Text)-sscsivVolumeId = lens _sscsivVolumeId (\ s a -> s{_sscsivVolumeId = a})---- | The ID of the local disk that was specified in the 'CreateStorediSCSIVolume' operation.-sscsivVolumeDiskId :: Lens' StorediSCSIVolume (Maybe Text)-sscsivVolumeDiskId = lens _sscsivVolumeDiskId (\ s a -> s{_sscsivVolumeDiskId = a})---- | One of the VolumeType enumeration values describing the type of the volume.-sscsivVolumeType :: Lens' StorediSCSIVolume (Maybe Text)-sscsivVolumeType = lens _sscsivVolumeType (\ s a -> s{_sscsivVolumeType = a})--instance FromJSON StorediSCSIVolume where- parseJSON- = withObject "StorediSCSIVolume"- (\ x ->- StorediSCSIVolume' <$>- (x .:? "VolumeiSCSIAttributes") <*>- (x .:? "VolumeStatus")- <*> (x .:? "SourceSnapshotId")- <*> (x .:? "PreservedExistingData")- <*> (x .:? "VolumeARN")- <*> (x .:? "VolumeProgress")- <*> (x .:? "VolumeSizeInBytes")- <*> (x .:? "VolumeUsedInBytes")- <*> (x .:? "CreatedDate")- <*> (x .:? "VolumeId")- <*> (x .:? "VolumeDiskId")- <*> (x .:? "VolumeType"))--instance Hashable StorediSCSIVolume where--instance NFData StorediSCSIVolume where---- | /See:/ 'tag' smart constructor.-data Tag = Tag'- { _tagKey :: !Text- , _tagValue :: !Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'Tag' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tagKey' - Undocumented member.------ * 'tagValue' - Undocumented member.-tag- :: Text -- ^ 'tagKey'- -> Text -- ^ 'tagValue'- -> Tag-tag pKey_ pValue_ = Tag' {_tagKey = pKey_, _tagValue = pValue_}----- | Undocumented member.-tagKey :: Lens' Tag Text-tagKey = lens _tagKey (\ s a -> s{_tagKey = a})---- | Undocumented member.-tagValue :: Lens' Tag Text-tagValue = lens _tagValue (\ s a -> s{_tagValue = a})--instance FromJSON Tag where- parseJSON- = withObject "Tag"- (\ x -> Tag' <$> (x .: "Key") <*> (x .: "Value"))--instance Hashable Tag where--instance NFData Tag where--instance ToJSON Tag where- toJSON Tag'{..}- = object- (catMaybes- [Just ("Key" .= _tagKey),- Just ("Value" .= _tagValue)])---- | Describes a virtual tape object.------------ /See:/ 'tape' smart constructor.-data Tape = Tape'- { _tTapeBarcode :: !(Maybe Text)- , _tTapeStatus :: !(Maybe Text)- , _tTapeARN :: !(Maybe Text)- , _tProgress :: !(Maybe Double)- , _tTapeSizeInBytes :: !(Maybe Integer)- , _tVTLDevice :: !(Maybe Text)- , _tTapeUsedInBytes :: !(Maybe Integer)- , _tTapeCreatedDate :: !(Maybe POSIX)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'Tape' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tTapeBarcode' - The barcode that identifies a specific virtual tape.------ * 'tTapeStatus' - The current state of the virtual tape.------ * 'tTapeARN' - The Amazon Resource Name (ARN) of the virtual tape.------ * 'tProgress' - For archiving virtual tapes, indicates how much data remains to be uploaded before archiving is complete. Range: 0 (not started) to 100 (complete).------ * 'tTapeSizeInBytes' - The size, in bytes, of the virtual tape capacity.------ * 'tVTLDevice' - The virtual tape library (VTL) device that the virtual tape is associated with.------ * 'tTapeUsedInBytes' - The size, in bytes, of data stored on the virtual tape.------ * 'tTapeCreatedDate' - The date the virtual tape was created.-tape- :: Tape-tape =- Tape'- { _tTapeBarcode = Nothing- , _tTapeStatus = Nothing- , _tTapeARN = Nothing- , _tProgress = Nothing- , _tTapeSizeInBytes = Nothing- , _tVTLDevice = Nothing- , _tTapeUsedInBytes = Nothing- , _tTapeCreatedDate = Nothing- }----- | The barcode that identifies a specific virtual tape.-tTapeBarcode :: Lens' Tape (Maybe Text)-tTapeBarcode = lens _tTapeBarcode (\ s a -> s{_tTapeBarcode = a})---- | The current state of the virtual tape.-tTapeStatus :: Lens' Tape (Maybe Text)-tTapeStatus = lens _tTapeStatus (\ s a -> s{_tTapeStatus = a})---- | The Amazon Resource Name (ARN) of the virtual tape.-tTapeARN :: Lens' Tape (Maybe Text)-tTapeARN = lens _tTapeARN (\ s a -> s{_tTapeARN = a})---- | For archiving virtual tapes, indicates how much data remains to be uploaded before archiving is complete. Range: 0 (not started) to 100 (complete).-tProgress :: Lens' Tape (Maybe Double)-tProgress = lens _tProgress (\ s a -> s{_tProgress = a})---- | The size, in bytes, of the virtual tape capacity.-tTapeSizeInBytes :: Lens' Tape (Maybe Integer)-tTapeSizeInBytes = lens _tTapeSizeInBytes (\ s a -> s{_tTapeSizeInBytes = a})---- | The virtual tape library (VTL) device that the virtual tape is associated with.-tVTLDevice :: Lens' Tape (Maybe Text)-tVTLDevice = lens _tVTLDevice (\ s a -> s{_tVTLDevice = a})---- | The size, in bytes, of data stored on the virtual tape.-tTapeUsedInBytes :: Lens' Tape (Maybe Integer)-tTapeUsedInBytes = lens _tTapeUsedInBytes (\ s a -> s{_tTapeUsedInBytes = a})---- | The date the virtual tape was created.-tTapeCreatedDate :: Lens' Tape (Maybe UTCTime)-tTapeCreatedDate = lens _tTapeCreatedDate (\ s a -> s{_tTapeCreatedDate = a}) . mapping _Time--instance FromJSON Tape where- parseJSON- = withObject "Tape"- (\ x ->- Tape' <$>- (x .:? "TapeBarcode") <*> (x .:? "TapeStatus") <*>- (x .:? "TapeARN")- <*> (x .:? "Progress")- <*> (x .:? "TapeSizeInBytes")- <*> (x .:? "VTLDevice")- <*> (x .:? "TapeUsedInBytes")- <*> (x .:? "TapeCreatedDate"))--instance Hashable Tape where--instance NFData Tape where---- | Represents a virtual tape that is archived in the virtual tape shelf (VTS).------------ /See:/ 'tapeArchive' smart constructor.-data TapeArchive = TapeArchive'- { _taTapeBarcode :: !(Maybe Text)- , _taTapeStatus :: !(Maybe Text)- , _taTapeARN :: !(Maybe Text)- , _taTapeSizeInBytes :: !(Maybe Integer)- , _taCompletionTime :: !(Maybe POSIX)- , _taTapeUsedInBytes :: !(Maybe Integer)- , _taTapeCreatedDate :: !(Maybe POSIX)- , _taRetrievedTo :: !(Maybe Text)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'TapeArchive' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'taTapeBarcode' - The barcode that identifies the archived virtual tape.------ * 'taTapeStatus' - The current state of the archived virtual tape.------ * 'taTapeARN' - The Amazon Resource Name (ARN) of an archived virtual tape.------ * 'taTapeSizeInBytes' - The size, in bytes, of the archived virtual tape.------ * 'taCompletionTime' - The time that the archiving of the virtual tape was completed. The string format of the completion time is in the ISO8601 extended YYYY-MM-DD'T'HH:MM:SS'Z' format.------ * 'taTapeUsedInBytes' - The size, in bytes, of data stored on the virtual tape.------ * 'taTapeCreatedDate' - Undocumented member.------ * 'taRetrievedTo' - The Amazon Resource Name (ARN) of the tape gateway that the virtual tape is being retrieved to. The virtual tape is retrieved from the virtual tape shelf (VTS).-tapeArchive- :: TapeArchive-tapeArchive =- TapeArchive'- { _taTapeBarcode = Nothing- , _taTapeStatus = Nothing- , _taTapeARN = Nothing- , _taTapeSizeInBytes = Nothing- , _taCompletionTime = Nothing- , _taTapeUsedInBytes = Nothing- , _taTapeCreatedDate = Nothing- , _taRetrievedTo = Nothing- }----- | The barcode that identifies the archived virtual tape.-taTapeBarcode :: Lens' TapeArchive (Maybe Text)-taTapeBarcode = lens _taTapeBarcode (\ s a -> s{_taTapeBarcode = a})---- | The current state of the archived virtual tape.-taTapeStatus :: Lens' TapeArchive (Maybe Text)-taTapeStatus = lens _taTapeStatus (\ s a -> s{_taTapeStatus = a})---- | The Amazon Resource Name (ARN) of an archived virtual tape.-taTapeARN :: Lens' TapeArchive (Maybe Text)-taTapeARN = lens _taTapeARN (\ s a -> s{_taTapeARN = a})---- | The size, in bytes, of the archived virtual tape.-taTapeSizeInBytes :: Lens' TapeArchive (Maybe Integer)-taTapeSizeInBytes = lens _taTapeSizeInBytes (\ s a -> s{_taTapeSizeInBytes = a})---- | The time that the archiving of the virtual tape was completed. The string format of the completion time is in the ISO8601 extended YYYY-MM-DD'T'HH:MM:SS'Z' format.-taCompletionTime :: Lens' TapeArchive (Maybe UTCTime)-taCompletionTime = lens _taCompletionTime (\ s a -> s{_taCompletionTime = a}) . mapping _Time---- | The size, in bytes, of data stored on the virtual tape.-taTapeUsedInBytes :: Lens' TapeArchive (Maybe Integer)-taTapeUsedInBytes = lens _taTapeUsedInBytes (\ s a -> s{_taTapeUsedInBytes = a})---- | Undocumented member.-taTapeCreatedDate :: Lens' TapeArchive (Maybe UTCTime)-taTapeCreatedDate = lens _taTapeCreatedDate (\ s a -> s{_taTapeCreatedDate = a}) . mapping _Time---- | The Amazon Resource Name (ARN) of the tape gateway that the virtual tape is being retrieved to. The virtual tape is retrieved from the virtual tape shelf (VTS).-taRetrievedTo :: Lens' TapeArchive (Maybe Text)-taRetrievedTo = lens _taRetrievedTo (\ s a -> s{_taRetrievedTo = a})--instance FromJSON TapeArchive where- parseJSON- = withObject "TapeArchive"- (\ x ->- TapeArchive' <$>- (x .:? "TapeBarcode") <*> (x .:? "TapeStatus") <*>- (x .:? "TapeARN")- <*> (x .:? "TapeSizeInBytes")- <*> (x .:? "CompletionTime")- <*> (x .:? "TapeUsedInBytes")- <*> (x .:? "TapeCreatedDate")- <*> (x .:? "RetrievedTo"))--instance Hashable TapeArchive where--instance NFData TapeArchive where---- | Describes a virtual tape.------------ /See:/ 'tapeInfo' smart constructor.-data TapeInfo = TapeInfo'- { _tiTapeBarcode :: !(Maybe Text)- , _tiTapeStatus :: !(Maybe Text)- , _tiTapeARN :: !(Maybe Text)- , _tiGatewayARN :: !(Maybe Text)- , _tiTapeSizeInBytes :: !(Maybe Integer)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'TapeInfo' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tiTapeBarcode' - The barcode that identifies a specific virtual tape.------ * 'tiTapeStatus' - The status of the tape.------ * 'tiTapeARN' - The Amazon Resource Name (ARN) of a virtual tape.------ * 'tiGatewayARN' - The Amazon Resource Name (ARN) of the gateway. Use the 'ListGateways' operation to return a list of gateways for your account and region.------ * 'tiTapeSizeInBytes' - The size, in bytes, of a virtual tape.-tapeInfo- :: TapeInfo-tapeInfo =- TapeInfo'- { _tiTapeBarcode = Nothing- , _tiTapeStatus = Nothing- , _tiTapeARN = Nothing- , _tiGatewayARN = Nothing- , _tiTapeSizeInBytes = Nothing- }----- | The barcode that identifies a specific virtual tape.-tiTapeBarcode :: Lens' TapeInfo (Maybe Text)-tiTapeBarcode = lens _tiTapeBarcode (\ s a -> s{_tiTapeBarcode = a})---- | The status of the tape.-tiTapeStatus :: Lens' TapeInfo (Maybe Text)-tiTapeStatus = lens _tiTapeStatus (\ s a -> s{_tiTapeStatus = a})---- | The Amazon Resource Name (ARN) of a virtual tape.-tiTapeARN :: Lens' TapeInfo (Maybe Text)-tiTapeARN = lens _tiTapeARN (\ s a -> s{_tiTapeARN = a})---- | The Amazon Resource Name (ARN) of the gateway. Use the 'ListGateways' operation to return a list of gateways for your account and region.-tiGatewayARN :: Lens' TapeInfo (Maybe Text)-tiGatewayARN = lens _tiGatewayARN (\ s a -> s{_tiGatewayARN = a})---- | The size, in bytes, of a virtual tape.-tiTapeSizeInBytes :: Lens' TapeInfo (Maybe Integer)-tiTapeSizeInBytes = lens _tiTapeSizeInBytes (\ s a -> s{_tiTapeSizeInBytes = a})--instance FromJSON TapeInfo where- parseJSON- = withObject "TapeInfo"- (\ x ->- TapeInfo' <$>- (x .:? "TapeBarcode") <*> (x .:? "TapeStatus") <*>- (x .:? "TapeARN")- <*> (x .:? "GatewayARN")- <*> (x .:? "TapeSizeInBytes"))--instance Hashable TapeInfo where--instance NFData TapeInfo where---- | Describes a recovery point.------------ /See:/ 'tapeRecoveryPointInfo' smart constructor.-data TapeRecoveryPointInfo = TapeRecoveryPointInfo'- { _trpiTapeStatus :: !(Maybe Text)- , _trpiTapeRecoveryPointTime :: !(Maybe POSIX)- , _trpiTapeARN :: !(Maybe Text)- , _trpiTapeSizeInBytes :: !(Maybe Integer)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'TapeRecoveryPointInfo' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'trpiTapeStatus' - Undocumented member.------ * 'trpiTapeRecoveryPointTime' - The time when the point-in-time view of the virtual tape was replicated for later recovery. The string format of the tape recovery point time is in the ISO8601 extended YYYY-MM-DD'T'HH:MM:SS'Z' format.------ * 'trpiTapeARN' - The Amazon Resource Name (ARN) of the virtual tape.------ * 'trpiTapeSizeInBytes' - The size, in bytes, of the virtual tapes to recover.-tapeRecoveryPointInfo- :: TapeRecoveryPointInfo-tapeRecoveryPointInfo =- TapeRecoveryPointInfo'- { _trpiTapeStatus = Nothing- , _trpiTapeRecoveryPointTime = Nothing- , _trpiTapeARN = Nothing- , _trpiTapeSizeInBytes = Nothing- }----- | Undocumented member.-trpiTapeStatus :: Lens' TapeRecoveryPointInfo (Maybe Text)-trpiTapeStatus = lens _trpiTapeStatus (\ s a -> s{_trpiTapeStatus = a})---- | The time when the point-in-time view of the virtual tape was replicated for later recovery. The string format of the tape recovery point time is in the ISO8601 extended YYYY-MM-DD'T'HH:MM:SS'Z' format.-trpiTapeRecoveryPointTime :: Lens' TapeRecoveryPointInfo (Maybe UTCTime)-trpiTapeRecoveryPointTime = lens _trpiTapeRecoveryPointTime (\ s a -> s{_trpiTapeRecoveryPointTime = a}) . mapping _Time---- | The Amazon Resource Name (ARN) of the virtual tape.-trpiTapeARN :: Lens' TapeRecoveryPointInfo (Maybe Text)-trpiTapeARN = lens _trpiTapeARN (\ s a -> s{_trpiTapeARN = a})---- | The size, in bytes, of the virtual tapes to recover.-trpiTapeSizeInBytes :: Lens' TapeRecoveryPointInfo (Maybe Integer)-trpiTapeSizeInBytes = lens _trpiTapeSizeInBytes (\ s a -> s{_trpiTapeSizeInBytes = a})--instance FromJSON TapeRecoveryPointInfo where- parseJSON- = withObject "TapeRecoveryPointInfo"- (\ x ->- TapeRecoveryPointInfo' <$>- (x .:? "TapeStatus") <*>- (x .:? "TapeRecoveryPointTime")- <*> (x .:? "TapeARN")- <*> (x .:? "TapeSizeInBytes"))--instance Hashable TapeRecoveryPointInfo where--instance NFData TapeRecoveryPointInfo where---- | Represents a device object associated with a tape gateway.------------ /See:/ 'vTLDevice' smart constructor.-data VTLDevice = VTLDevice'- { _vtldDeviceiSCSIAttributes :: !(Maybe DeviceiSCSIAttributes)- , _vtldVTLDeviceVendor :: !(Maybe Text)- , _vtldVTLDeviceARN :: !(Maybe Text)- , _vtldVTLDeviceType :: !(Maybe Text)- , _vtldVTLDeviceProductIdentifier :: !(Maybe Text)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'VTLDevice' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'vtldDeviceiSCSIAttributes' - A list of iSCSI information about a VTL device.------ * 'vtldVTLDeviceVendor' - Undocumented member.------ * 'vtldVTLDeviceARN' - Specifies the unique Amazon Resource Name (ARN) of the device (tape drive or media changer).------ * 'vtldVTLDeviceType' - Undocumented member.------ * 'vtldVTLDeviceProductIdentifier' - Undocumented member.-vTLDevice- :: VTLDevice-vTLDevice =- VTLDevice'- { _vtldDeviceiSCSIAttributes = Nothing- , _vtldVTLDeviceVendor = Nothing- , _vtldVTLDeviceARN = Nothing- , _vtldVTLDeviceType = Nothing- , _vtldVTLDeviceProductIdentifier = Nothing- }----- | A list of iSCSI information about a VTL device.-vtldDeviceiSCSIAttributes :: Lens' VTLDevice (Maybe DeviceiSCSIAttributes)-vtldDeviceiSCSIAttributes = lens _vtldDeviceiSCSIAttributes (\ s a -> s{_vtldDeviceiSCSIAttributes = a})---- | Undocumented member.-vtldVTLDeviceVendor :: Lens' VTLDevice (Maybe Text)-vtldVTLDeviceVendor = lens _vtldVTLDeviceVendor (\ s a -> s{_vtldVTLDeviceVendor = a})---- | Specifies the unique Amazon Resource Name (ARN) of the device (tape drive or media changer).-vtldVTLDeviceARN :: Lens' VTLDevice (Maybe Text)-vtldVTLDeviceARN = lens _vtldVTLDeviceARN (\ s a -> s{_vtldVTLDeviceARN = a})---- | Undocumented member.-vtldVTLDeviceType :: Lens' VTLDevice (Maybe Text)-vtldVTLDeviceType = lens _vtldVTLDeviceType (\ s a -> s{_vtldVTLDeviceType = a})---- | Undocumented member.-vtldVTLDeviceProductIdentifier :: Lens' VTLDevice (Maybe Text)-vtldVTLDeviceProductIdentifier = lens _vtldVTLDeviceProductIdentifier (\ s a -> s{_vtldVTLDeviceProductIdentifier = a})--instance FromJSON VTLDevice where- parseJSON- = withObject "VTLDevice"- (\ x ->- VTLDevice' <$>- (x .:? "DeviceiSCSIAttributes") <*>- (x .:? "VTLDeviceVendor")- <*> (x .:? "VTLDeviceARN")- <*> (x .:? "VTLDeviceType")- <*> (x .:? "VTLDeviceProductIdentifier"))--instance Hashable VTLDevice where--instance NFData VTLDevice where---- | Describes a storage volume object.------------ /See:/ 'volumeInfo' smart constructor.-data VolumeInfo = VolumeInfo'- { _viGatewayARN :: !(Maybe Text)- , _viVolumeARN :: !(Maybe Text)- , _viVolumeSizeInBytes :: !(Maybe Integer)- , _viVolumeId :: !(Maybe Text)- , _viGatewayId :: !(Maybe Text)- , _viVolumeType :: !(Maybe Text)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'VolumeInfo' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'viGatewayARN' - Undocumented member.------ * 'viVolumeARN' - The Amazon Resource Name (ARN) for the storage volume. For example, the following is a valid ARN: @arn:aws:storagegateway:us-east-2:111122223333:gateway/sgw-12A3456B/volume/vol-1122AABB@ Valid Values: 50 to 500 lowercase letters, numbers, periods (.), and hyphens (-).------ * 'viVolumeSizeInBytes' - The size of the volume in bytes. Valid Values: 50 to 500 lowercase letters, numbers, periods (.), and hyphens (-).------ * 'viVolumeId' - The unique identifier assigned to the volume. This ID becomes part of the volume Amazon Resource Name (ARN), which you use as input for other operations. Valid Values: 50 to 500 lowercase letters, numbers, periods (.), and hyphens (-).------ * 'viGatewayId' - The unique identifier assigned to your gateway during activation. This ID becomes part of the gateway Amazon Resource Name (ARN), which you use as input for other operations. Valid Values: 50 to 500 lowercase letters, numbers, periods (.), and hyphens (-).------ * 'viVolumeType' - Undocumented member.-volumeInfo- :: VolumeInfo-volumeInfo =- VolumeInfo'- { _viGatewayARN = Nothing- , _viVolumeARN = Nothing- , _viVolumeSizeInBytes = Nothing- , _viVolumeId = Nothing- , _viGatewayId = Nothing- , _viVolumeType = Nothing- }----- | Undocumented member.-viGatewayARN :: Lens' VolumeInfo (Maybe Text)-viGatewayARN = lens _viGatewayARN (\ s a -> s{_viGatewayARN = a})---- | The Amazon Resource Name (ARN) for the storage volume. For example, the following is a valid ARN: @arn:aws:storagegateway:us-east-2:111122223333:gateway/sgw-12A3456B/volume/vol-1122AABB@ Valid Values: 50 to 500 lowercase letters, numbers, periods (.), and hyphens (-).-viVolumeARN :: Lens' VolumeInfo (Maybe Text)-viVolumeARN = lens _viVolumeARN (\ s a -> s{_viVolumeARN = a})---- | The size of the volume in bytes. Valid Values: 50 to 500 lowercase letters, numbers, periods (.), and hyphens (-).-viVolumeSizeInBytes :: Lens' VolumeInfo (Maybe Integer)-viVolumeSizeInBytes = lens _viVolumeSizeInBytes (\ s a -> s{_viVolumeSizeInBytes = a})---- | The unique identifier assigned to the volume. This ID becomes part of the volume Amazon Resource Name (ARN), which you use as input for other operations. Valid Values: 50 to 500 lowercase letters, numbers, periods (.), and hyphens (-).-viVolumeId :: Lens' VolumeInfo (Maybe Text)-viVolumeId = lens _viVolumeId (\ s a -> s{_viVolumeId = a})---- | The unique identifier assigned to your gateway during activation. This ID becomes part of the gateway Amazon Resource Name (ARN), which you use as input for other operations. Valid Values: 50 to 500 lowercase letters, numbers, periods (.), and hyphens (-).-viGatewayId :: Lens' VolumeInfo (Maybe Text)-viGatewayId = lens _viGatewayId (\ s a -> s{_viGatewayId = a})---- | Undocumented member.-viVolumeType :: Lens' VolumeInfo (Maybe Text)-viVolumeType = lens _viVolumeType (\ s a -> s{_viVolumeType = a})--instance FromJSON VolumeInfo where- parseJSON- = withObject "VolumeInfo"- (\ x ->- VolumeInfo' <$>- (x .:? "GatewayARN") <*> (x .:? "VolumeARN") <*>- (x .:? "VolumeSizeInBytes")- <*> (x .:? "VolumeId")- <*> (x .:? "GatewayId")- <*> (x .:? "VolumeType"))--instance Hashable VolumeInfo where--instance NFData VolumeInfo where---- | /See:/ 'volumeRecoveryPointInfo' smart constructor.-data VolumeRecoveryPointInfo = VolumeRecoveryPointInfo'- { _vrpiVolumeRecoveryPointTime :: !(Maybe Text)- , _vrpiVolumeARN :: !(Maybe Text)- , _vrpiVolumeSizeInBytes :: !(Maybe Integer)- , _vrpiVolumeUsageInBytes :: !(Maybe Integer)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'VolumeRecoveryPointInfo' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'vrpiVolumeRecoveryPointTime' - Undocumented member.------ * 'vrpiVolumeARN' - Undocumented member.------ * 'vrpiVolumeSizeInBytes' - Undocumented member.------ * 'vrpiVolumeUsageInBytes' - Undocumented member.-volumeRecoveryPointInfo- :: VolumeRecoveryPointInfo-volumeRecoveryPointInfo =- VolumeRecoveryPointInfo'- { _vrpiVolumeRecoveryPointTime = Nothing- , _vrpiVolumeARN = Nothing- , _vrpiVolumeSizeInBytes = Nothing- , _vrpiVolumeUsageInBytes = Nothing- }----- | Undocumented member.-vrpiVolumeRecoveryPointTime :: Lens' VolumeRecoveryPointInfo (Maybe Text)-vrpiVolumeRecoveryPointTime = lens _vrpiVolumeRecoveryPointTime (\ s a -> s{_vrpiVolumeRecoveryPointTime = a})---- | Undocumented member.-vrpiVolumeARN :: Lens' VolumeRecoveryPointInfo (Maybe Text)-vrpiVolumeARN = lens _vrpiVolumeARN (\ s a -> s{_vrpiVolumeARN = a})---- | Undocumented member.-vrpiVolumeSizeInBytes :: Lens' VolumeRecoveryPointInfo (Maybe Integer)-vrpiVolumeSizeInBytes = lens _vrpiVolumeSizeInBytes (\ s a -> s{_vrpiVolumeSizeInBytes = a})---- | Undocumented member.-vrpiVolumeUsageInBytes :: Lens' VolumeRecoveryPointInfo (Maybe Integer)-vrpiVolumeUsageInBytes = lens _vrpiVolumeUsageInBytes (\ s a -> s{_vrpiVolumeUsageInBytes = a})--instance FromJSON VolumeRecoveryPointInfo where- parseJSON- = withObject "VolumeRecoveryPointInfo"- (\ x ->- VolumeRecoveryPointInfo' <$>- (x .:? "VolumeRecoveryPointTime") <*>- (x .:? "VolumeARN")- <*> (x .:? "VolumeSizeInBytes")- <*> (x .:? "VolumeUsageInBytes"))--instance Hashable VolumeRecoveryPointInfo where--instance NFData VolumeRecoveryPointInfo where---- | Lists iSCSI information about a volume.------------ /See:/ 'volumeiSCSIAttributes' smart constructor.-data VolumeiSCSIAttributes = VolumeiSCSIAttributes'- { _vscsiaLunNumber :: !(Maybe Nat)- , _vscsiaTargetARN :: !(Maybe Text)- , _vscsiaChapEnabled :: !(Maybe Bool)- , _vscsiaNetworkInterfaceId :: !(Maybe Text)- , _vscsiaNetworkInterfacePort :: !(Maybe Int)- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'VolumeiSCSIAttributes' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'vscsiaLunNumber' - The logical disk number.------ * 'vscsiaTargetARN' - The Amazon Resource Name (ARN) of the volume target.------ * 'vscsiaChapEnabled' - Indicates whether mutual CHAP is enabled for the iSCSI target.------ * 'vscsiaNetworkInterfaceId' - The network interface identifier.------ * 'vscsiaNetworkInterfacePort' - The port used to communicate with iSCSI targets.-volumeiSCSIAttributes- :: VolumeiSCSIAttributes-volumeiSCSIAttributes =- VolumeiSCSIAttributes'- { _vscsiaLunNumber = Nothing- , _vscsiaTargetARN = Nothing- , _vscsiaChapEnabled = Nothing- , _vscsiaNetworkInterfaceId = Nothing- , _vscsiaNetworkInterfacePort = Nothing- }----- | The logical disk number.-vscsiaLunNumber :: Lens' VolumeiSCSIAttributes (Maybe Natural)-vscsiaLunNumber = lens _vscsiaLunNumber (\ s a -> s{_vscsiaLunNumber = a}) . mapping _Nat---- | The Amazon Resource Name (ARN) of the volume target.-vscsiaTargetARN :: Lens' VolumeiSCSIAttributes (Maybe Text)-vscsiaTargetARN = lens _vscsiaTargetARN (\ s a -> s{_vscsiaTargetARN = a})---- | Indicates whether mutual CHAP is enabled for the iSCSI target.-vscsiaChapEnabled :: Lens' VolumeiSCSIAttributes (Maybe Bool)-vscsiaChapEnabled = lens _vscsiaChapEnabled (\ s a -> s{_vscsiaChapEnabled = a})---- | The network interface identifier.-vscsiaNetworkInterfaceId :: Lens' VolumeiSCSIAttributes (Maybe Text)-vscsiaNetworkInterfaceId = lens _vscsiaNetworkInterfaceId (\ s a -> s{_vscsiaNetworkInterfaceId = a})---- | The port used to communicate with iSCSI targets.-vscsiaNetworkInterfacePort :: Lens' VolumeiSCSIAttributes (Maybe Int)-vscsiaNetworkInterfacePort = lens _vscsiaNetworkInterfacePort (\ s a -> s{_vscsiaNetworkInterfacePort = a})--instance FromJSON VolumeiSCSIAttributes where- parseJSON- = withObject "VolumeiSCSIAttributes"- (\ x ->- VolumeiSCSIAttributes' <$>- (x .:? "LunNumber") <*> (x .:? "TargetARN") <*>- (x .:? "ChapEnabled")- <*> (x .:? "NetworkInterfaceId")- <*> (x .:? "NetworkInterfacePort"))--instance Hashable VolumeiSCSIAttributes where--instance NFData VolumeiSCSIAttributes where
− gen/Network/AWS/StorageGateway/Types/Sum.hs
@@ -1,68 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE LambdaCase #-}-{-# LANGUAGE OverloadedStrings #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.Types.Sum--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)----module Network.AWS.StorageGateway.Types.Sum where--import Network.AWS.Prelude---- | Sets the access control list permission for objects in the S3 bucket that a file gateway puts objects into. The default value is "private".-------data ObjectACL- = AWSExecRead- | AuthenticatedRead- | BucketOwnerFullControl- | BucketOwnerRead- | Private- | PublicRead- | PublicReadWrite- deriving (Eq, Ord, Read, Show, Enum, Bounded, Data, Typeable, Generic)---instance FromText ObjectACL where- parser = takeLowerText >>= \case- "aws-exec-read" -> pure AWSExecRead- "authenticated-read" -> pure AuthenticatedRead- "bucket-owner-full-control" -> pure BucketOwnerFullControl- "bucket-owner-read" -> pure BucketOwnerRead- "private" -> pure Private- "public-read" -> pure PublicRead- "public-read-write" -> pure PublicReadWrite- e -> fromTextError $ "Failure parsing ObjectACL from value: '" <> e- <> "'. Accepted values: aws-exec-read, authenticated-read, bucket-owner-full-control, bucket-owner-read, private, public-read, public-read-write"--instance ToText ObjectACL where- toText = \case- AWSExecRead -> "aws-exec-read"- AuthenticatedRead -> "authenticated-read"- BucketOwnerFullControl -> "bucket-owner-full-control"- BucketOwnerRead -> "bucket-owner-read"- Private -> "private"- PublicRead -> "public-read"- PublicReadWrite -> "public-read-write"--instance Hashable ObjectACL-instance NFData ObjectACL-instance ToByteString ObjectACL-instance ToQuery ObjectACL-instance ToHeader ObjectACL--instance ToJSON ObjectACL where- toJSON = toJSONText--instance FromJSON ObjectACL where- parseJSON = parseJSONText "ObjectACL"
− gen/Network/AWS/StorageGateway/UpdateBandwidthRateLimit.hs
@@ -1,178 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.UpdateBandwidthRateLimit--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Updates the bandwidth rate limits of a gateway. You can update both the upload and download bandwidth rate limit or specify only one of the two. If you don't set a bandwidth rate limit, the existing rate limit remains.--------- By default, a gateway's bandwidth rate limits are not set. If you don't set any limit, the gateway does not have any limitations on its bandwidth usage and could potentially use the maximum available bandwidth.------ To specify which gateway to update, use the Amazon Resource Name (ARN) of the gateway in your request.----module Network.AWS.StorageGateway.UpdateBandwidthRateLimit- (- -- * Creating a Request- updateBandwidthRateLimit- , UpdateBandwidthRateLimit- -- * Request Lenses- , ubrlAverageUploadRateLimitInBitsPerSec- , ubrlAverageDownloadRateLimitInBitsPerSec- , ubrlGatewayARN-- -- * Destructuring the Response- , updateBandwidthRateLimitResponse- , UpdateBandwidthRateLimitResponse- -- * Response Lenses- , ubrlrsGatewayARN- , ubrlrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | A JSON object containing one or more of the following fields:--------- * 'UpdateBandwidthRateLimitInput$AverageDownloadRateLimitInBitsPerSec'------ * 'UpdateBandwidthRateLimitInput$AverageUploadRateLimitInBitsPerSec'--------------- /See:/ 'updateBandwidthRateLimit' smart constructor.-data UpdateBandwidthRateLimit = UpdateBandwidthRateLimit'- { _ubrlAverageUploadRateLimitInBitsPerSec :: !(Maybe Nat)- , _ubrlAverageDownloadRateLimitInBitsPerSec :: !(Maybe Nat)- , _ubrlGatewayARN :: !Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'UpdateBandwidthRateLimit' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ubrlAverageUploadRateLimitInBitsPerSec' - The average upload bandwidth rate limit in bits per second.------ * 'ubrlAverageDownloadRateLimitInBitsPerSec' - The average download bandwidth rate limit in bits per second.------ * 'ubrlGatewayARN' - Undocumented member.-updateBandwidthRateLimit- :: Text -- ^ 'ubrlGatewayARN'- -> UpdateBandwidthRateLimit-updateBandwidthRateLimit pGatewayARN_ =- UpdateBandwidthRateLimit'- { _ubrlAverageUploadRateLimitInBitsPerSec = Nothing- , _ubrlAverageDownloadRateLimitInBitsPerSec = Nothing- , _ubrlGatewayARN = pGatewayARN_- }----- | The average upload bandwidth rate limit in bits per second.-ubrlAverageUploadRateLimitInBitsPerSec :: Lens' UpdateBandwidthRateLimit (Maybe Natural)-ubrlAverageUploadRateLimitInBitsPerSec = lens _ubrlAverageUploadRateLimitInBitsPerSec (\ s a -> s{_ubrlAverageUploadRateLimitInBitsPerSec = a}) . mapping _Nat---- | The average download bandwidth rate limit in bits per second.-ubrlAverageDownloadRateLimitInBitsPerSec :: Lens' UpdateBandwidthRateLimit (Maybe Natural)-ubrlAverageDownloadRateLimitInBitsPerSec = lens _ubrlAverageDownloadRateLimitInBitsPerSec (\ s a -> s{_ubrlAverageDownloadRateLimitInBitsPerSec = a}) . mapping _Nat---- | Undocumented member.-ubrlGatewayARN :: Lens' UpdateBandwidthRateLimit Text-ubrlGatewayARN = lens _ubrlGatewayARN (\ s a -> s{_ubrlGatewayARN = a})--instance AWSRequest UpdateBandwidthRateLimit where- type Rs UpdateBandwidthRateLimit =- UpdateBandwidthRateLimitResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- UpdateBandwidthRateLimitResponse' <$>- (x .?> "GatewayARN") <*> (pure (fromEnum s)))--instance Hashable UpdateBandwidthRateLimit where--instance NFData UpdateBandwidthRateLimit where--instance ToHeaders UpdateBandwidthRateLimit where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.UpdateBandwidthRateLimit"- :: ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON UpdateBandwidthRateLimit where- toJSON UpdateBandwidthRateLimit'{..}- = object- (catMaybes- [("AverageUploadRateLimitInBitsPerSec" .=) <$>- _ubrlAverageUploadRateLimitInBitsPerSec,- ("AverageDownloadRateLimitInBitsPerSec" .=) <$>- _ubrlAverageDownloadRateLimitInBitsPerSec,- Just ("GatewayARN" .= _ubrlGatewayARN)])--instance ToPath UpdateBandwidthRateLimit where- toPath = const "/"--instance ToQuery UpdateBandwidthRateLimit where- toQuery = const mempty---- | A JSON object containing the of the gateway whose throttle information was updated.------------ /See:/ 'updateBandwidthRateLimitResponse' smart constructor.-data UpdateBandwidthRateLimitResponse = UpdateBandwidthRateLimitResponse'- { _ubrlrsGatewayARN :: !(Maybe Text)- , _ubrlrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'UpdateBandwidthRateLimitResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ubrlrsGatewayARN' - Undocumented member.------ * 'ubrlrsResponseStatus' - -- | The response status code.-updateBandwidthRateLimitResponse- :: Int -- ^ 'ubrlrsResponseStatus'- -> UpdateBandwidthRateLimitResponse-updateBandwidthRateLimitResponse pResponseStatus_ =- UpdateBandwidthRateLimitResponse'- {_ubrlrsGatewayARN = Nothing, _ubrlrsResponseStatus = pResponseStatus_}----- | Undocumented member.-ubrlrsGatewayARN :: Lens' UpdateBandwidthRateLimitResponse (Maybe Text)-ubrlrsGatewayARN = lens _ubrlrsGatewayARN (\ s a -> s{_ubrlrsGatewayARN = a})---- | -- | The response status code.-ubrlrsResponseStatus :: Lens' UpdateBandwidthRateLimitResponse Int-ubrlrsResponseStatus = lens _ubrlrsResponseStatus (\ s a -> s{_ubrlrsResponseStatus = a})--instance NFData UpdateBandwidthRateLimitResponse- where
− gen/Network/AWS/StorageGateway/UpdateChapCredentials.hs
@@ -1,204 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.UpdateChapCredentials--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Updates the Challenge-Handshake Authentication Protocol (CHAP) credentials for a specified iSCSI target. By default, a gateway does not have CHAP enabled; however, for added security, you might use it.--------- /Important:/ When you update CHAP credentials, all existing connections on the target are closed and initiators must reconnect with the new credentials.----module Network.AWS.StorageGateway.UpdateChapCredentials- (- -- * Creating a Request- updateChapCredentials- , UpdateChapCredentials- -- * Request Lenses- , uccSecretToAuthenticateTarget- , uccTargetARN- , uccSecretToAuthenticateInitiator- , uccInitiatorName-- -- * Destructuring the Response- , updateChapCredentialsResponse- , UpdateChapCredentialsResponse- -- * Response Lenses- , uccrsTargetARN- , uccrsInitiatorName- , uccrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | A JSON object containing one or more of the following fields:--------- * 'UpdateChapCredentialsInput$InitiatorName'------ * 'UpdateChapCredentialsInput$SecretToAuthenticateInitiator'------ * 'UpdateChapCredentialsInput$SecretToAuthenticateTarget'------ * 'UpdateChapCredentialsInput$TargetARN'--------------- /See:/ 'updateChapCredentials' smart constructor.-data UpdateChapCredentials = UpdateChapCredentials'- { _uccSecretToAuthenticateTarget :: !(Maybe Text)- , _uccTargetARN :: !Text- , _uccSecretToAuthenticateInitiator :: !Text- , _uccInitiatorName :: !Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'UpdateChapCredentials' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'uccSecretToAuthenticateTarget' - The secret key that the target must provide to participate in mutual CHAP with the initiator (e.g. Windows client). Byte constraints: Minimum bytes of 12. Maximum bytes of 16.------ * 'uccTargetARN' - The Amazon Resource Name (ARN) of the iSCSI volume target. Use the 'DescribeStorediSCSIVolumes' operation to return the TargetARN for specified VolumeARN.------ * 'uccSecretToAuthenticateInitiator' - The secret key that the initiator (for example, the Windows client) must provide to participate in mutual CHAP with the target.------ * 'uccInitiatorName' - The iSCSI initiator that connects to the target.-updateChapCredentials- :: Text -- ^ 'uccTargetARN'- -> Text -- ^ 'uccSecretToAuthenticateInitiator'- -> Text -- ^ 'uccInitiatorName'- -> UpdateChapCredentials-updateChapCredentials pTargetARN_ pSecretToAuthenticateInitiator_ pInitiatorName_ =- UpdateChapCredentials'- { _uccSecretToAuthenticateTarget = Nothing- , _uccTargetARN = pTargetARN_- , _uccSecretToAuthenticateInitiator = pSecretToAuthenticateInitiator_- , _uccInitiatorName = pInitiatorName_- }----- | The secret key that the target must provide to participate in mutual CHAP with the initiator (e.g. Windows client). Byte constraints: Minimum bytes of 12. Maximum bytes of 16.-uccSecretToAuthenticateTarget :: Lens' UpdateChapCredentials (Maybe Text)-uccSecretToAuthenticateTarget = lens _uccSecretToAuthenticateTarget (\ s a -> s{_uccSecretToAuthenticateTarget = a})---- | The Amazon Resource Name (ARN) of the iSCSI volume target. Use the 'DescribeStorediSCSIVolumes' operation to return the TargetARN for specified VolumeARN.-uccTargetARN :: Lens' UpdateChapCredentials Text-uccTargetARN = lens _uccTargetARN (\ s a -> s{_uccTargetARN = a})---- | The secret key that the initiator (for example, the Windows client) must provide to participate in mutual CHAP with the target.-uccSecretToAuthenticateInitiator :: Lens' UpdateChapCredentials Text-uccSecretToAuthenticateInitiator = lens _uccSecretToAuthenticateInitiator (\ s a -> s{_uccSecretToAuthenticateInitiator = a})---- | The iSCSI initiator that connects to the target.-uccInitiatorName :: Lens' UpdateChapCredentials Text-uccInitiatorName = lens _uccInitiatorName (\ s a -> s{_uccInitiatorName = a})--instance AWSRequest UpdateChapCredentials where- type Rs UpdateChapCredentials =- UpdateChapCredentialsResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- UpdateChapCredentialsResponse' <$>- (x .?> "TargetARN") <*> (x .?> "InitiatorName") <*>- (pure (fromEnum s)))--instance Hashable UpdateChapCredentials where--instance NFData UpdateChapCredentials where--instance ToHeaders UpdateChapCredentials where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.UpdateChapCredentials" ::- ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON UpdateChapCredentials where- toJSON UpdateChapCredentials'{..}- = object- (catMaybes- [("SecretToAuthenticateTarget" .=) <$>- _uccSecretToAuthenticateTarget,- Just ("TargetARN" .= _uccTargetARN),- Just- ("SecretToAuthenticateInitiator" .=- _uccSecretToAuthenticateInitiator),- Just ("InitiatorName" .= _uccInitiatorName)])--instance ToPath UpdateChapCredentials where- toPath = const "/"--instance ToQuery UpdateChapCredentials where- toQuery = const mempty---- | A JSON object containing the following fields:------------ /See:/ 'updateChapCredentialsResponse' smart constructor.-data UpdateChapCredentialsResponse = UpdateChapCredentialsResponse'- { _uccrsTargetARN :: !(Maybe Text)- , _uccrsInitiatorName :: !(Maybe Text)- , _uccrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'UpdateChapCredentialsResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'uccrsTargetARN' - The Amazon Resource Name (ARN) of the target. This is the same target specified in the request.------ * 'uccrsInitiatorName' - The iSCSI initiator that connects to the target. This is the same initiator name specified in the request.------ * 'uccrsResponseStatus' - -- | The response status code.-updateChapCredentialsResponse- :: Int -- ^ 'uccrsResponseStatus'- -> UpdateChapCredentialsResponse-updateChapCredentialsResponse pResponseStatus_ =- UpdateChapCredentialsResponse'- { _uccrsTargetARN = Nothing- , _uccrsInitiatorName = Nothing- , _uccrsResponseStatus = pResponseStatus_- }----- | The Amazon Resource Name (ARN) of the target. This is the same target specified in the request.-uccrsTargetARN :: Lens' UpdateChapCredentialsResponse (Maybe Text)-uccrsTargetARN = lens _uccrsTargetARN (\ s a -> s{_uccrsTargetARN = a})---- | The iSCSI initiator that connects to the target. This is the same initiator name specified in the request.-uccrsInitiatorName :: Lens' UpdateChapCredentialsResponse (Maybe Text)-uccrsInitiatorName = lens _uccrsInitiatorName (\ s a -> s{_uccrsInitiatorName = a})---- | -- | The response status code.-uccrsResponseStatus :: Lens' UpdateChapCredentialsResponse Int-uccrsResponseStatus = lens _uccrsResponseStatus (\ s a -> s{_uccrsResponseStatus = a})--instance NFData UpdateChapCredentialsResponse where
− gen/Network/AWS/StorageGateway/UpdateGatewayInformation.hs
@@ -1,174 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.UpdateGatewayInformation--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Updates a gateway's metadata, which includes the gateway's name and time zone. To specify which gateway to update, use the Amazon Resource Name (ARN) of the gateway in your request.-------module Network.AWS.StorageGateway.UpdateGatewayInformation- (- -- * Creating a Request- updateGatewayInformation- , UpdateGatewayInformation- -- * Request Lenses- , ugiGatewayName- , ugiGatewayTimezone- , ugiGatewayARN-- -- * Destructuring the Response- , updateGatewayInformationResponse- , UpdateGatewayInformationResponse- -- * Response Lenses- , ugirsGatewayARN- , ugirsGatewayName- , ugirsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | /See:/ 'updateGatewayInformation' smart constructor.-data UpdateGatewayInformation = UpdateGatewayInformation'- { _ugiGatewayName :: !(Maybe Text)- , _ugiGatewayTimezone :: !(Maybe Text)- , _ugiGatewayARN :: !Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'UpdateGatewayInformation' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ugiGatewayName' - Undocumented member.------ * 'ugiGatewayTimezone' - Undocumented member.------ * 'ugiGatewayARN' - Undocumented member.-updateGatewayInformation- :: Text -- ^ 'ugiGatewayARN'- -> UpdateGatewayInformation-updateGatewayInformation pGatewayARN_ =- UpdateGatewayInformation'- { _ugiGatewayName = Nothing- , _ugiGatewayTimezone = Nothing- , _ugiGatewayARN = pGatewayARN_- }----- | Undocumented member.-ugiGatewayName :: Lens' UpdateGatewayInformation (Maybe Text)-ugiGatewayName = lens _ugiGatewayName (\ s a -> s{_ugiGatewayName = a})---- | Undocumented member.-ugiGatewayTimezone :: Lens' UpdateGatewayInformation (Maybe Text)-ugiGatewayTimezone = lens _ugiGatewayTimezone (\ s a -> s{_ugiGatewayTimezone = a})---- | Undocumented member.-ugiGatewayARN :: Lens' UpdateGatewayInformation Text-ugiGatewayARN = lens _ugiGatewayARN (\ s a -> s{_ugiGatewayARN = a})--instance AWSRequest UpdateGatewayInformation where- type Rs UpdateGatewayInformation =- UpdateGatewayInformationResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- UpdateGatewayInformationResponse' <$>- (x .?> "GatewayARN") <*> (x .?> "GatewayName") <*>- (pure (fromEnum s)))--instance Hashable UpdateGatewayInformation where--instance NFData UpdateGatewayInformation where--instance ToHeaders UpdateGatewayInformation where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.UpdateGatewayInformation"- :: ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON UpdateGatewayInformation where- toJSON UpdateGatewayInformation'{..}- = object- (catMaybes- [("GatewayName" .=) <$> _ugiGatewayName,- ("GatewayTimezone" .=) <$> _ugiGatewayTimezone,- Just ("GatewayARN" .= _ugiGatewayARN)])--instance ToPath UpdateGatewayInformation where- toPath = const "/"--instance ToQuery UpdateGatewayInformation where- toQuery = const mempty---- | A JSON object containing the ARN of the gateway that was updated.------------ /See:/ 'updateGatewayInformationResponse' smart constructor.-data UpdateGatewayInformationResponse = UpdateGatewayInformationResponse'- { _ugirsGatewayARN :: !(Maybe Text)- , _ugirsGatewayName :: !(Maybe Text)- , _ugirsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'UpdateGatewayInformationResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ugirsGatewayARN' - Undocumented member.------ * 'ugirsGatewayName' - Undocumented member.------ * 'ugirsResponseStatus' - -- | The response status code.-updateGatewayInformationResponse- :: Int -- ^ 'ugirsResponseStatus'- -> UpdateGatewayInformationResponse-updateGatewayInformationResponse pResponseStatus_ =- UpdateGatewayInformationResponse'- { _ugirsGatewayARN = Nothing- , _ugirsGatewayName = Nothing- , _ugirsResponseStatus = pResponseStatus_- }----- | Undocumented member.-ugirsGatewayARN :: Lens' UpdateGatewayInformationResponse (Maybe Text)-ugirsGatewayARN = lens _ugirsGatewayARN (\ s a -> s{_ugirsGatewayARN = a})---- | Undocumented member.-ugirsGatewayName :: Lens' UpdateGatewayInformationResponse (Maybe Text)-ugirsGatewayName = lens _ugirsGatewayName (\ s a -> s{_ugirsGatewayName = a})---- | -- | The response status code.-ugirsResponseStatus :: Lens' UpdateGatewayInformationResponse Int-ugirsResponseStatus = lens _ugirsResponseStatus (\ s a -> s{_ugirsResponseStatus = a})--instance NFData UpdateGatewayInformationResponse- where
− gen/Network/AWS/StorageGateway/UpdateGatewaySoftwareNow.hs
@@ -1,145 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.UpdateGatewaySoftwareNow--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Updates the gateway virtual machine (VM) software. The request immediately triggers the software update.--------- /Important:/ A software update forces a system restart of your gateway. You can minimize the chance of any disruption to your applications by increasing your iSCSI Initiators' timeouts. For more information about increasing iSCSI Initiator timeouts for Windows and Linux, see <http://docs.aws.amazon.com/storagegateway/latest/userguide/ConfiguringiSCSIClientInitiatorWindowsClient.html#CustomizeWindowsiSCSISettings Customizing Your Windows iSCSI Settings> and <http://docs.aws.amazon.com/storagegateway/latest/userguide/ConfiguringiSCSIClientInitiatorRedHatClient.html#CustomizeLinuxiSCSISettings Customizing Your Linux iSCSI Settings> , respectively.----module Network.AWS.StorageGateway.UpdateGatewaySoftwareNow- (- -- * Creating a Request- updateGatewaySoftwareNow- , UpdateGatewaySoftwareNow- -- * Request Lenses- , ugsnGatewayARN-- -- * Destructuring the Response- , updateGatewaySoftwareNowResponse- , UpdateGatewaySoftwareNowResponse- -- * Response Lenses- , ugsnrsGatewayARN- , ugsnrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | A JSON object containing the of the gateway to update.------------ /See:/ 'updateGatewaySoftwareNow' smart constructor.-newtype UpdateGatewaySoftwareNow = UpdateGatewaySoftwareNow'- { _ugsnGatewayARN :: Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'UpdateGatewaySoftwareNow' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ugsnGatewayARN' - Undocumented member.-updateGatewaySoftwareNow- :: Text -- ^ 'ugsnGatewayARN'- -> UpdateGatewaySoftwareNow-updateGatewaySoftwareNow pGatewayARN_ =- UpdateGatewaySoftwareNow' {_ugsnGatewayARN = pGatewayARN_}----- | Undocumented member.-ugsnGatewayARN :: Lens' UpdateGatewaySoftwareNow Text-ugsnGatewayARN = lens _ugsnGatewayARN (\ s a -> s{_ugsnGatewayARN = a})--instance AWSRequest UpdateGatewaySoftwareNow where- type Rs UpdateGatewaySoftwareNow =- UpdateGatewaySoftwareNowResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- UpdateGatewaySoftwareNowResponse' <$>- (x .?> "GatewayARN") <*> (pure (fromEnum s)))--instance Hashable UpdateGatewaySoftwareNow where--instance NFData UpdateGatewaySoftwareNow where--instance ToHeaders UpdateGatewaySoftwareNow where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.UpdateGatewaySoftwareNow"- :: ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON UpdateGatewaySoftwareNow where- toJSON UpdateGatewaySoftwareNow'{..}- = object- (catMaybes [Just ("GatewayARN" .= _ugsnGatewayARN)])--instance ToPath UpdateGatewaySoftwareNow where- toPath = const "/"--instance ToQuery UpdateGatewaySoftwareNow where- toQuery = const mempty---- | A JSON object containing the of the gateway that was updated.------------ /See:/ 'updateGatewaySoftwareNowResponse' smart constructor.-data UpdateGatewaySoftwareNowResponse = UpdateGatewaySoftwareNowResponse'- { _ugsnrsGatewayARN :: !(Maybe Text)- , _ugsnrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'UpdateGatewaySoftwareNowResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ugsnrsGatewayARN' - Undocumented member.------ * 'ugsnrsResponseStatus' - -- | The response status code.-updateGatewaySoftwareNowResponse- :: Int -- ^ 'ugsnrsResponseStatus'- -> UpdateGatewaySoftwareNowResponse-updateGatewaySoftwareNowResponse pResponseStatus_ =- UpdateGatewaySoftwareNowResponse'- {_ugsnrsGatewayARN = Nothing, _ugsnrsResponseStatus = pResponseStatus_}----- | Undocumented member.-ugsnrsGatewayARN :: Lens' UpdateGatewaySoftwareNowResponse (Maybe Text)-ugsnrsGatewayARN = lens _ugsnrsGatewayARN (\ s a -> s{_ugsnrsGatewayARN = a})---- | -- | The response status code.-ugsnrsResponseStatus :: Lens' UpdateGatewaySoftwareNowResponse Int-ugsnrsResponseStatus = lens _ugsnrsResponseStatus (\ s a -> s{_ugsnrsResponseStatus = a})--instance NFData UpdateGatewaySoftwareNowResponse- where
− gen/Network/AWS/StorageGateway/UpdateMaintenanceStartTime.hs
@@ -1,187 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.UpdateMaintenanceStartTime--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Updates a gateway's weekly maintenance start time information, including day and time of the week. The maintenance time is the time in your gateway's time zone.-------module Network.AWS.StorageGateway.UpdateMaintenanceStartTime- (- -- * Creating a Request- updateMaintenanceStartTime- , UpdateMaintenanceStartTime- -- * Request Lenses- , umstGatewayARN- , umstHourOfDay- , umstMinuteOfHour- , umstDayOfWeek-- -- * Destructuring the Response- , updateMaintenanceStartTimeResponse- , UpdateMaintenanceStartTimeResponse- -- * Response Lenses- , umstrsGatewayARN- , umstrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | A JSON object containing the following fields:--------- * 'UpdateMaintenanceStartTimeInput$DayOfWeek'------ * 'UpdateMaintenanceStartTimeInput$HourOfDay'------ * 'UpdateMaintenanceStartTimeInput$MinuteOfHour'--------------- /See:/ 'updateMaintenanceStartTime' smart constructor.-data UpdateMaintenanceStartTime = UpdateMaintenanceStartTime'- { _umstGatewayARN :: !Text- , _umstHourOfDay :: !Nat- , _umstMinuteOfHour :: !Nat- , _umstDayOfWeek :: !Nat- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'UpdateMaintenanceStartTime' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'umstGatewayARN' - Undocumented member.------ * 'umstHourOfDay' - The hour component of the maintenance start time represented as /hh/ , where /hh/ is the hour (00 to 23). The hour of the day is in the time zone of the gateway.------ * 'umstMinuteOfHour' - The minute component of the maintenance start time represented as /mm/ , where /mm/ is the minute (00 to 59). The minute of the hour is in the time zone of the gateway.------ * 'umstDayOfWeek' - The maintenance start time day of the week represented as an ordinal number from 0 to 6, where 0 represents Sunday and 6 Saturday.-updateMaintenanceStartTime- :: Text -- ^ 'umstGatewayARN'- -> Natural -- ^ 'umstHourOfDay'- -> Natural -- ^ 'umstMinuteOfHour'- -> Natural -- ^ 'umstDayOfWeek'- -> UpdateMaintenanceStartTime-updateMaintenanceStartTime pGatewayARN_ pHourOfDay_ pMinuteOfHour_ pDayOfWeek_ =- UpdateMaintenanceStartTime'- { _umstGatewayARN = pGatewayARN_- , _umstHourOfDay = _Nat # pHourOfDay_- , _umstMinuteOfHour = _Nat # pMinuteOfHour_- , _umstDayOfWeek = _Nat # pDayOfWeek_- }----- | Undocumented member.-umstGatewayARN :: Lens' UpdateMaintenanceStartTime Text-umstGatewayARN = lens _umstGatewayARN (\ s a -> s{_umstGatewayARN = a})---- | The hour component of the maintenance start time represented as /hh/ , where /hh/ is the hour (00 to 23). The hour of the day is in the time zone of the gateway.-umstHourOfDay :: Lens' UpdateMaintenanceStartTime Natural-umstHourOfDay = lens _umstHourOfDay (\ s a -> s{_umstHourOfDay = a}) . _Nat---- | The minute component of the maintenance start time represented as /mm/ , where /mm/ is the minute (00 to 59). The minute of the hour is in the time zone of the gateway.-umstMinuteOfHour :: Lens' UpdateMaintenanceStartTime Natural-umstMinuteOfHour = lens _umstMinuteOfHour (\ s a -> s{_umstMinuteOfHour = a}) . _Nat---- | The maintenance start time day of the week represented as an ordinal number from 0 to 6, where 0 represents Sunday and 6 Saturday.-umstDayOfWeek :: Lens' UpdateMaintenanceStartTime Natural-umstDayOfWeek = lens _umstDayOfWeek (\ s a -> s{_umstDayOfWeek = a}) . _Nat--instance AWSRequest UpdateMaintenanceStartTime where- type Rs UpdateMaintenanceStartTime =- UpdateMaintenanceStartTimeResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- UpdateMaintenanceStartTimeResponse' <$>- (x .?> "GatewayARN") <*> (pure (fromEnum s)))--instance Hashable UpdateMaintenanceStartTime where--instance NFData UpdateMaintenanceStartTime where--instance ToHeaders UpdateMaintenanceStartTime where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.UpdateMaintenanceStartTime"- :: ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON UpdateMaintenanceStartTime where- toJSON UpdateMaintenanceStartTime'{..}- = object- (catMaybes- [Just ("GatewayARN" .= _umstGatewayARN),- Just ("HourOfDay" .= _umstHourOfDay),- Just ("MinuteOfHour" .= _umstMinuteOfHour),- Just ("DayOfWeek" .= _umstDayOfWeek)])--instance ToPath UpdateMaintenanceStartTime where- toPath = const "/"--instance ToQuery UpdateMaintenanceStartTime where- toQuery = const mempty---- | A JSON object containing the of the gateway whose maintenance start time is updated.------------ /See:/ 'updateMaintenanceStartTimeResponse' smart constructor.-data UpdateMaintenanceStartTimeResponse = UpdateMaintenanceStartTimeResponse'- { _umstrsGatewayARN :: !(Maybe Text)- , _umstrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'UpdateMaintenanceStartTimeResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'umstrsGatewayARN' - Undocumented member.------ * 'umstrsResponseStatus' - -- | The response status code.-updateMaintenanceStartTimeResponse- :: Int -- ^ 'umstrsResponseStatus'- -> UpdateMaintenanceStartTimeResponse-updateMaintenanceStartTimeResponse pResponseStatus_ =- UpdateMaintenanceStartTimeResponse'- {_umstrsGatewayARN = Nothing, _umstrsResponseStatus = pResponseStatus_}----- | Undocumented member.-umstrsGatewayARN :: Lens' UpdateMaintenanceStartTimeResponse (Maybe Text)-umstrsGatewayARN = lens _umstrsGatewayARN (\ s a -> s{_umstrsGatewayARN = a})---- | -- | The response status code.-umstrsResponseStatus :: Lens' UpdateMaintenanceStartTimeResponse Int-umstrsResponseStatus = lens _umstrsResponseStatus (\ s a -> s{_umstrsResponseStatus = a})--instance NFData UpdateMaintenanceStartTimeResponse- where
@@ -1,264 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.UpdateNFSFileShare--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Updates a file share. This operation is only supported in the file gateway type.--------- Updates the following file share setting:------ * 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 Network.AWS.StorageGateway.UpdateNFSFileShare- (- -- * Creating a Request- updateNFSFileShare- , UpdateNFSFileShare- -- * Request Lenses- , unfsfsKMSKey- , unfsfsObjectACL- , unfsfsKMSEncrypted- , unfsfsDefaultStorageClass- , unfsfsSquash- , unfsfsRequesterPays- , unfsfsNFSFileShareDefaults- , unfsfsClientList- , unfsfsGuessMIMETypeEnabled- , unfsfsReadOnly- , unfsfsFileShareARN-- -- * Destructuring the Response- , updateNFSFileShareResponse- , UpdateNFSFileShareResponse- -- * Response Lenses- , unfsfsrsFileShareARN- , unfsfsrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | UpdateNFSFileShareInput------------ /See:/ 'updateNFSFileShare' smart constructor.-data UpdateNFSFileShare = UpdateNFSFileShare'- { _unfsfsKMSKey :: !(Maybe Text)- , _unfsfsObjectACL :: !(Maybe ObjectACL)- , _unfsfsKMSEncrypted :: !(Maybe Bool)- , _unfsfsDefaultStorageClass :: !(Maybe Text)- , _unfsfsSquash :: !(Maybe Text)- , _unfsfsRequesterPays :: !(Maybe Bool)- , _unfsfsNFSFileShareDefaults :: !(Maybe NFSFileShareDefaults)- , _unfsfsClientList :: !(Maybe (List1 Text))- , _unfsfsGuessMIMETypeEnabled :: !(Maybe Bool)- , _unfsfsReadOnly :: !(Maybe Bool)- , _unfsfsFileShareARN :: !Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'UpdateNFSFileShare' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'unfsfsKMSKey' - The KMS key used for Amazon S3 server side encryption. This value can only be set when KmsEncrypted is true. Optional.------ * 'unfsfsObjectACL' - Sets the access control list permission for objects in the S3 bucket that a file gateway puts objects into. The default value is "private".------ * 'unfsfsKMSEncrypted' - True to use Amazon S3 server side encryption with your own AWS KMS key, or false to use a key managed by Amazon S3. Optional.------ * 'unfsfsDefaultStorageClass' - The default storage class for objects put into an Amazon S3 bucket by a file gateway. Possible values are S3_STANDARD or S3_STANDARD_IA. If this field is not populated, the default value S3_STANDARD is used. Optional.------ * 'unfsfsSquash' - The user mapped to anonymous user. Valid options 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.------ * 'unfsfsRequesterPays' - Sets who pays the cost of the request and the data download from the Amazon S3 bucket. Set this value to true if you want the requester to pay instead of the bucket owner, and otherwise to false.------ * 'unfsfsNFSFileShareDefaults' - The default values for the file share. Optional.------ * 'unfsfsClientList' - The list of clients that are allowed to access the file gateway. The list must contain either valid IP addresses or valid CIDR blocks.------ * 'unfsfsGuessMIMETypeEnabled' - Enables guessing of the MIME type for uploaded objects based on file extensions. Set this value to true to enable MIME type guessing, and otherwise to false. The default value is true.------ * 'unfsfsReadOnly' - Sets the write status of a file share. This value is true if the write status is read-only, and otherwise false.------ * 'unfsfsFileShareARN' - The Amazon Resource Name (ARN) of the file share to be updated.-updateNFSFileShare- :: Text -- ^ 'unfsfsFileShareARN'- -> UpdateNFSFileShare-updateNFSFileShare pFileShareARN_ =- UpdateNFSFileShare'- { _unfsfsKMSKey = Nothing- , _unfsfsObjectACL = Nothing- , _unfsfsKMSEncrypted = Nothing- , _unfsfsDefaultStorageClass = Nothing- , _unfsfsSquash = Nothing- , _unfsfsRequesterPays = Nothing- , _unfsfsNFSFileShareDefaults = Nothing- , _unfsfsClientList = Nothing- , _unfsfsGuessMIMETypeEnabled = Nothing- , _unfsfsReadOnly = Nothing- , _unfsfsFileShareARN = pFileShareARN_- }----- | The KMS key used for Amazon S3 server side encryption. This value can only be set when KmsEncrypted is true. Optional.-unfsfsKMSKey :: Lens' UpdateNFSFileShare (Maybe Text)-unfsfsKMSKey = lens _unfsfsKMSKey (\ s a -> s{_unfsfsKMSKey = a})---- | Sets the access control list permission for objects in the S3 bucket that a file gateway puts objects into. The default value is "private".-unfsfsObjectACL :: Lens' UpdateNFSFileShare (Maybe ObjectACL)-unfsfsObjectACL = lens _unfsfsObjectACL (\ s a -> s{_unfsfsObjectACL = a})---- | True to use Amazon S3 server side encryption with your own AWS KMS key, or false to use a key managed by Amazon S3. Optional.-unfsfsKMSEncrypted :: Lens' UpdateNFSFileShare (Maybe Bool)-unfsfsKMSEncrypted = lens _unfsfsKMSEncrypted (\ s a -> s{_unfsfsKMSEncrypted = a})---- | The default storage class for objects put into an Amazon S3 bucket by a file gateway. Possible values are S3_STANDARD or S3_STANDARD_IA. If this field is not populated, the default value S3_STANDARD is used. Optional.-unfsfsDefaultStorageClass :: Lens' UpdateNFSFileShare (Maybe Text)-unfsfsDefaultStorageClass = lens _unfsfsDefaultStorageClass (\ s a -> s{_unfsfsDefaultStorageClass = a})---- | The user mapped to anonymous user. Valid options 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.-unfsfsSquash :: Lens' UpdateNFSFileShare (Maybe Text)-unfsfsSquash = lens _unfsfsSquash (\ s a -> s{_unfsfsSquash = a})---- | Sets who pays the cost of the request and the data download from the Amazon S3 bucket. Set this value to true if you want the requester to pay instead of the bucket owner, and otherwise to false.-unfsfsRequesterPays :: Lens' UpdateNFSFileShare (Maybe Bool)-unfsfsRequesterPays = lens _unfsfsRequesterPays (\ s a -> s{_unfsfsRequesterPays = a})---- | The default values for the file share. Optional.-unfsfsNFSFileShareDefaults :: Lens' UpdateNFSFileShare (Maybe NFSFileShareDefaults)-unfsfsNFSFileShareDefaults = lens _unfsfsNFSFileShareDefaults (\ s a -> s{_unfsfsNFSFileShareDefaults = a})---- | The list of clients that are allowed to access the file gateway. The list must contain either valid IP addresses or valid CIDR blocks.-unfsfsClientList :: Lens' UpdateNFSFileShare (Maybe (NonEmpty Text))-unfsfsClientList = lens _unfsfsClientList (\ s a -> s{_unfsfsClientList = a}) . mapping _List1---- | Enables guessing of the MIME type for uploaded objects based on file extensions. Set this value to true to enable MIME type guessing, and otherwise to false. The default value is true.-unfsfsGuessMIMETypeEnabled :: Lens' UpdateNFSFileShare (Maybe Bool)-unfsfsGuessMIMETypeEnabled = lens _unfsfsGuessMIMETypeEnabled (\ s a -> s{_unfsfsGuessMIMETypeEnabled = a})---- | Sets the write status of a file share. This value is true if the write status is read-only, and otherwise false.-unfsfsReadOnly :: Lens' UpdateNFSFileShare (Maybe Bool)-unfsfsReadOnly = lens _unfsfsReadOnly (\ s a -> s{_unfsfsReadOnly = a})---- | The Amazon Resource Name (ARN) of the file share to be updated.-unfsfsFileShareARN :: Lens' UpdateNFSFileShare Text-unfsfsFileShareARN = lens _unfsfsFileShareARN (\ s a -> s{_unfsfsFileShareARN = a})--instance AWSRequest UpdateNFSFileShare where- type Rs UpdateNFSFileShare =- UpdateNFSFileShareResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- UpdateNFSFileShareResponse' <$>- (x .?> "FileShareARN") <*> (pure (fromEnum s)))--instance Hashable UpdateNFSFileShare where--instance NFData UpdateNFSFileShare where--instance ToHeaders UpdateNFSFileShare where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.UpdateNFSFileShare" ::- ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON UpdateNFSFileShare where- toJSON UpdateNFSFileShare'{..}- = object- (catMaybes- [("KMSKey" .=) <$> _unfsfsKMSKey,- ("ObjectACL" .=) <$> _unfsfsObjectACL,- ("KMSEncrypted" .=) <$> _unfsfsKMSEncrypted,- ("DefaultStorageClass" .=) <$>- _unfsfsDefaultStorageClass,- ("Squash" .=) <$> _unfsfsSquash,- ("RequesterPays" .=) <$> _unfsfsRequesterPays,- ("NFSFileShareDefaults" .=) <$>- _unfsfsNFSFileShareDefaults,- ("ClientList" .=) <$> _unfsfsClientList,- ("GuessMIMETypeEnabled" .=) <$>- _unfsfsGuessMIMETypeEnabled,- ("ReadOnly" .=) <$> _unfsfsReadOnly,- Just ("FileShareARN" .= _unfsfsFileShareARN)])--instance ToPath UpdateNFSFileShare where- toPath = const "/"--instance ToQuery UpdateNFSFileShare where- toQuery = const mempty---- | UpdateNFSFileShareOutput------------ /See:/ 'updateNFSFileShareResponse' smart constructor.-data UpdateNFSFileShareResponse = UpdateNFSFileShareResponse'- { _unfsfsrsFileShareARN :: !(Maybe Text)- , _unfsfsrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'UpdateNFSFileShareResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'unfsfsrsFileShareARN' - The Amazon Resource Name (ARN) of the updated file share.------ * 'unfsfsrsResponseStatus' - -- | The response status code.-updateNFSFileShareResponse- :: Int -- ^ 'unfsfsrsResponseStatus'- -> UpdateNFSFileShareResponse-updateNFSFileShareResponse pResponseStatus_ =- UpdateNFSFileShareResponse'- { _unfsfsrsFileShareARN = Nothing- , _unfsfsrsResponseStatus = pResponseStatus_- }----- | The Amazon Resource Name (ARN) of the updated file share.-unfsfsrsFileShareARN :: Lens' UpdateNFSFileShareResponse (Maybe Text)-unfsfsrsFileShareARN = lens _unfsfsrsFileShareARN (\ s a -> s{_unfsfsrsFileShareARN = a})---- | -- | The response status code.-unfsfsrsResponseStatus :: Lens' UpdateNFSFileShareResponse Int-unfsfsrsResponseStatus = lens _unfsfsrsResponseStatus (\ s a -> s{_unfsfsrsResponseStatus = a})--instance NFData UpdateNFSFileShareResponse where
− gen/Network/AWS/StorageGateway/UpdateSnapshotSchedule.hs
@@ -1,191 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.UpdateSnapshotSchedule--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Updates a snapshot schedule configured for a gateway volume. This operation is only supported in the cached volume and stored volume gateway types.--------- The default snapshot schedule for volume is once every 24 hours, starting at the creation time of the volume. You can use this API to change the snapshot schedule configured for the volume.------ In the request you must identify the gateway volume whose snapshot schedule you want to update, and the schedule information, including when you want the snapshot to begin on a day and the frequency (in hours) of snapshots.----module Network.AWS.StorageGateway.UpdateSnapshotSchedule- (- -- * Creating a Request- updateSnapshotSchedule- , UpdateSnapshotSchedule- -- * Request Lenses- , ussDescription- , ussVolumeARN- , ussStartAt- , ussRecurrenceInHours-- -- * Destructuring the Response- , updateSnapshotScheduleResponse- , UpdateSnapshotScheduleResponse- -- * Response Lenses- , ussrsVolumeARN- , ussrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | A JSON object containing one or more of the following fields:--------- * 'UpdateSnapshotScheduleInput$Description'------ * 'UpdateSnapshotScheduleInput$RecurrenceInHours'------ * 'UpdateSnapshotScheduleInput$StartAt'------ * 'UpdateSnapshotScheduleInput$VolumeARN'--------------- /See:/ 'updateSnapshotSchedule' smart constructor.-data UpdateSnapshotSchedule = UpdateSnapshotSchedule'- { _ussDescription :: !(Maybe Text)- , _ussVolumeARN :: !Text- , _ussStartAt :: !Nat- , _ussRecurrenceInHours :: !Nat- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'UpdateSnapshotSchedule' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ussDescription' - Optional description of the snapshot that overwrites the existing description.------ * 'ussVolumeARN' - The Amazon Resource Name (ARN) of the volume. Use the 'ListVolumes' operation to return a list of gateway volumes.------ * 'ussStartAt' - The hour of the day at which the snapshot schedule begins represented as /hh/ , where /hh/ is the hour (0 to 23). The hour of the day is in the time zone of the gateway.------ * 'ussRecurrenceInHours' - Frequency of snapshots. Specify the number of hours between snapshots.-updateSnapshotSchedule- :: Text -- ^ 'ussVolumeARN'- -> Natural -- ^ 'ussStartAt'- -> Natural -- ^ 'ussRecurrenceInHours'- -> UpdateSnapshotSchedule-updateSnapshotSchedule pVolumeARN_ pStartAt_ pRecurrenceInHours_ =- UpdateSnapshotSchedule'- { _ussDescription = Nothing- , _ussVolumeARN = pVolumeARN_- , _ussStartAt = _Nat # pStartAt_- , _ussRecurrenceInHours = _Nat # pRecurrenceInHours_- }----- | Optional description of the snapshot that overwrites the existing description.-ussDescription :: Lens' UpdateSnapshotSchedule (Maybe Text)-ussDescription = lens _ussDescription (\ s a -> s{_ussDescription = a})---- | The Amazon Resource Name (ARN) of the volume. Use the 'ListVolumes' operation to return a list of gateway volumes.-ussVolumeARN :: Lens' UpdateSnapshotSchedule Text-ussVolumeARN = lens _ussVolumeARN (\ s a -> s{_ussVolumeARN = a})---- | The hour of the day at which the snapshot schedule begins represented as /hh/ , where /hh/ is the hour (0 to 23). The hour of the day is in the time zone of the gateway.-ussStartAt :: Lens' UpdateSnapshotSchedule Natural-ussStartAt = lens _ussStartAt (\ s a -> s{_ussStartAt = a}) . _Nat---- | Frequency of snapshots. Specify the number of hours between snapshots.-ussRecurrenceInHours :: Lens' UpdateSnapshotSchedule Natural-ussRecurrenceInHours = lens _ussRecurrenceInHours (\ s a -> s{_ussRecurrenceInHours = a}) . _Nat--instance AWSRequest UpdateSnapshotSchedule where- type Rs UpdateSnapshotSchedule =- UpdateSnapshotScheduleResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- UpdateSnapshotScheduleResponse' <$>- (x .?> "VolumeARN") <*> (pure (fromEnum s)))--instance Hashable UpdateSnapshotSchedule where--instance NFData UpdateSnapshotSchedule where--instance ToHeaders UpdateSnapshotSchedule where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.UpdateSnapshotSchedule" ::- ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON UpdateSnapshotSchedule where- toJSON UpdateSnapshotSchedule'{..}- = object- (catMaybes- [("Description" .=) <$> _ussDescription,- Just ("VolumeARN" .= _ussVolumeARN),- Just ("StartAt" .= _ussStartAt),- Just ("RecurrenceInHours" .= _ussRecurrenceInHours)])--instance ToPath UpdateSnapshotSchedule where- toPath = const "/"--instance ToQuery UpdateSnapshotSchedule where- toQuery = const mempty---- | A JSON object containing the of the updated storage volume.------------ /See:/ 'updateSnapshotScheduleResponse' smart constructor.-data UpdateSnapshotScheduleResponse = UpdateSnapshotScheduleResponse'- { _ussrsVolumeARN :: !(Maybe Text)- , _ussrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'UpdateSnapshotScheduleResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ussrsVolumeARN' ------- * 'ussrsResponseStatus' - -- | The response status code.-updateSnapshotScheduleResponse- :: Int -- ^ 'ussrsResponseStatus'- -> UpdateSnapshotScheduleResponse-updateSnapshotScheduleResponse pResponseStatus_ =- UpdateSnapshotScheduleResponse'- {_ussrsVolumeARN = Nothing, _ussrsResponseStatus = pResponseStatus_}----- |-ussrsVolumeARN :: Lens' UpdateSnapshotScheduleResponse (Maybe Text)-ussrsVolumeARN = lens _ussrsVolumeARN (\ s a -> s{_ussrsVolumeARN = a})---- | -- | The response status code.-ussrsResponseStatus :: Lens' UpdateSnapshotScheduleResponse Int-ussrsResponseStatus = lens _ussrsResponseStatus (\ s a -> s{_ussrsResponseStatus = a})--instance NFData UpdateSnapshotScheduleResponse where
− gen/Network/AWS/StorageGateway/UpdateVTLDeviceType.hs
@@ -1,152 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds #-}-{-# OPTIONS_GHC -fno-warn-unused-matches #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.UpdateVTLDeviceType--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)------ Updates the type of medium changer in a tape gateway. When you activate a tape gateway, you select a medium changer type for the tape gateway. This operation enables you to select a different type of medium changer after a tape gateway is activated. This operation is only supported in the tape gateway type.-------module Network.AWS.StorageGateway.UpdateVTLDeviceType- (- -- * Creating a Request- updateVTLDeviceType- , UpdateVTLDeviceType- -- * Request Lenses- , uvtldtVTLDeviceARN- , uvtldtDeviceType-- -- * Destructuring the Response- , updateVTLDeviceTypeResponse- , UpdateVTLDeviceTypeResponse- -- * Response Lenses- , uvtldtrsVTLDeviceARN- , uvtldtrsResponseStatus- ) where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.Request-import Network.AWS.Response-import Network.AWS.StorageGateway.Types-import Network.AWS.StorageGateway.Types.Product---- | /See:/ 'updateVTLDeviceType' smart constructor.-data UpdateVTLDeviceType = UpdateVTLDeviceType'- { _uvtldtVTLDeviceARN :: !Text- , _uvtldtDeviceType :: !Text- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'UpdateVTLDeviceType' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'uvtldtVTLDeviceARN' - The Amazon Resource Name (ARN) of the medium changer you want to select.------ * 'uvtldtDeviceType' - The type of medium changer you want to select. Valid Values: "STK-L700", "AWS-Gateway-VTL"-updateVTLDeviceType- :: Text -- ^ 'uvtldtVTLDeviceARN'- -> Text -- ^ 'uvtldtDeviceType'- -> UpdateVTLDeviceType-updateVTLDeviceType pVTLDeviceARN_ pDeviceType_ =- UpdateVTLDeviceType'- {_uvtldtVTLDeviceARN = pVTLDeviceARN_, _uvtldtDeviceType = pDeviceType_}----- | The Amazon Resource Name (ARN) of the medium changer you want to select.-uvtldtVTLDeviceARN :: Lens' UpdateVTLDeviceType Text-uvtldtVTLDeviceARN = lens _uvtldtVTLDeviceARN (\ s a -> s{_uvtldtVTLDeviceARN = a})---- | The type of medium changer you want to select. Valid Values: "STK-L700", "AWS-Gateway-VTL"-uvtldtDeviceType :: Lens' UpdateVTLDeviceType Text-uvtldtDeviceType = lens _uvtldtDeviceType (\ s a -> s{_uvtldtDeviceType = a})--instance AWSRequest UpdateVTLDeviceType where- type Rs UpdateVTLDeviceType =- UpdateVTLDeviceTypeResponse- request = postJSON storageGateway- response- = receiveJSON- (\ s h x ->- UpdateVTLDeviceTypeResponse' <$>- (x .?> "VTLDeviceARN") <*> (pure (fromEnum s)))--instance Hashable UpdateVTLDeviceType where--instance NFData UpdateVTLDeviceType where--instance ToHeaders UpdateVTLDeviceType where- toHeaders- = const- (mconcat- ["X-Amz-Target" =#- ("StorageGateway_20130630.UpdateVTLDeviceType" ::- ByteString),- "Content-Type" =#- ("application/x-amz-json-1.1" :: ByteString)])--instance ToJSON UpdateVTLDeviceType where- toJSON UpdateVTLDeviceType'{..}- = object- (catMaybes- [Just ("VTLDeviceARN" .= _uvtldtVTLDeviceARN),- Just ("DeviceType" .= _uvtldtDeviceType)])--instance ToPath UpdateVTLDeviceType where- toPath = const "/"--instance ToQuery UpdateVTLDeviceType where- toQuery = const mempty---- | UpdateVTLDeviceTypeOutput------------ /See:/ 'updateVTLDeviceTypeResponse' smart constructor.-data UpdateVTLDeviceTypeResponse = UpdateVTLDeviceTypeResponse'- { _uvtldtrsVTLDeviceARN :: !(Maybe Text)- , _uvtldtrsResponseStatus :: !Int- } deriving (Eq, Read, Show, Data, Typeable, Generic)----- | Creates a value of 'UpdateVTLDeviceTypeResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'uvtldtrsVTLDeviceARN' - The Amazon Resource Name (ARN) of the medium changer you have selected.------ * 'uvtldtrsResponseStatus' - -- | The response status code.-updateVTLDeviceTypeResponse- :: Int -- ^ 'uvtldtrsResponseStatus'- -> UpdateVTLDeviceTypeResponse-updateVTLDeviceTypeResponse pResponseStatus_ =- UpdateVTLDeviceTypeResponse'- { _uvtldtrsVTLDeviceARN = Nothing- , _uvtldtrsResponseStatus = pResponseStatus_- }----- | The Amazon Resource Name (ARN) of the medium changer you have selected.-uvtldtrsVTLDeviceARN :: Lens' UpdateVTLDeviceTypeResponse (Maybe Text)-uvtldtrsVTLDeviceARN = lens _uvtldtrsVTLDeviceARN (\ s a -> s{_uvtldtrsVTLDeviceARN = a})---- | -- | The response status code.-uvtldtrsResponseStatus :: Lens' UpdateVTLDeviceTypeResponse Int-uvtldtrsResponseStatus = lens _uvtldtrsResponseStatus (\ s a -> s{_uvtldtrsResponseStatus = a})--instance NFData UpdateVTLDeviceTypeResponse where
− gen/Network/AWS/StorageGateway/Waiters.hs
@@ -1,21 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE TypeFamilies #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Network.AWS.StorageGateway.Waiters--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)----module Network.AWS.StorageGateway.Waiters where--import Network.AWS.Lens-import Network.AWS.Prelude-import Network.AWS.StorageGateway.Types-import Network.AWS.Waiter
test/Main.hs view
@@ -2,20 +2,22 @@ -- | -- Module : Main--- Copyright : (c) 2013-2018 Brendan Hay+-- Copyright : (c) 2013-2023 Brendan Hay -- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>+-- Maintainer : Brendan Hay -- Stability : auto-generated -- Portability : non-portable (GHC extensions)--- module Main (main) where +import Test.Amazonka.StorageGateway+import Test.Amazonka.StorageGateway.Internal import Test.Tasty-import Test.AWS.StorageGateway-import Test.AWS.StorageGateway.Internal main :: IO ()-main = defaultMain $ testGroup "StorageGateway"- [ testGroup "tests" tests- , testGroup "fixtures" fixtures- ]+main =+ defaultMain $+ testGroup+ "StorageGateway"+ [ testGroup "tests" tests,+ testGroup "fixtures" fixtures+ ]
− test/Test/AWS/Gen/StorageGateway.hs
@@ -1,1173 +0,0 @@-{-# OPTIONS_GHC -fno-warn-unused-imports #-}-{-# OPTIONS_GHC -fno-warn-orphans #-}---- Derived from AWS service descriptions, licensed under Apache 2.0.---- |--- Module : Test.AWS.Gen.StorageGateway--- Copyright : (c) 2013-2018 Brendan Hay--- License : Mozilla Public License, v. 2.0.--- Maintainer : Brendan Hay <brendan.g.hay+amazonka@gmail.com>--- Stability : auto-generated--- Portability : non-portable (GHC extensions)----module Test.AWS.Gen.StorageGateway where--import Data.Proxy-import Network.AWS.StorageGateway-import Test.AWS.Fixture-import Test.AWS.Prelude-import Test.AWS.StorageGateway.Internal-import Test.Tasty---- Auto-generated: the actual test selection needs to be manually placed into--- the top-level so that real test data can be incrementally added.------ This commented snippet is what the entire set should look like:---- fixtures :: TestTree--- fixtures =--- [ testGroup "request"--- [ requestCancelArchival $--- cancelArchival------ , requestCreateStorediSCSIVolume $--- createStorediSCSIVolume------ , requestCreateNFSFileShare $--- createNFSFileShare------ , requestDescribeChapCredentials $--- describeChapCredentials------ , requestSetLocalConsolePassword $--- setLocalConsolePassword------ , requestCreateTapes $--- createTapes------ , requestUpdateVTLDeviceType $--- updateVTLDeviceType------ , requestCreateCachediSCSIVolume $--- createCachediSCSIVolume------ , requestListFileShares $--- listFileShares------ , requestDeleteFileShare $--- deleteFileShare------ , requestListVolumeInitiators $--- listVolumeInitiators------ , requestAddUploadBuffer $--- addUploadBuffer------ , requestListTagsForResource $--- listTagsForResource------ , requestNotifyWhenUploaded $--- notifyWhenUploaded------ , requestUpdateGatewayInformation $--- updateGatewayInformation------ , requestDescribeMaintenanceStartTime $--- describeMaintenanceStartTime------ , requestDescribeWorkingStorage $--- describeWorkingStorage------ , requestDescribeCachediSCSIVolumes $--- describeCachediSCSIVolumes------ , requestAddCache $--- addCache------ , requestStartGateway $--- startGateway------ , requestShutdownGateway $--- shutdownGateway------ , requestUpdateGatewaySoftwareNow $--- updateGatewaySoftwareNow------ , requestRemoveTagsFromResource $--- removeTagsFromResource------ , requestDeleteChapCredentials $--- deleteChapCredentials------ , requestUpdateChapCredentials $--- updateChapCredentials------ , requestDescribeUploadBuffer $--- describeUploadBuffer------ , requestDescribeTapes $--- describeTapes------ , requestDescribeStorediSCSIVolumes $--- describeStorediSCSIVolumes------ , requestCreateSnapshotFromVolumeRecoveryPoint $--- createSnapshotFromVolumeRecoveryPoint------ , requestRetrieveTapeRecoveryPoint $--- retrieveTapeRecoveryPoint------ , requestAddTagsToResource $--- addTagsToResource------ , requestDeleteGateway $--- deleteGateway------ , requestUpdateMaintenanceStartTime $--- updateMaintenanceStartTime------ , requestDescribeGatewayInformation $--- describeGatewayInformation------ , requestRefreshCache $--- refreshCache------ , requestUpdateNFSFileShare $--- updateNFSFileShare------ , requestRetrieveTapeArchive $--- retrieveTapeArchive------ , requestDescribeTapeArchives $--- describeTapeArchives------ , requestDisableGateway $--- disableGateway------ , requestDescribeSnapshotSchedule $--- describeSnapshotSchedule------ , requestCreateTapeWithBarcode $--- createTapeWithBarcode------ , requestDescribeBandwidthRateLimit $--- describeBandwidthRateLimit------ , requestDeleteSnapshotSchedule $--- deleteSnapshotSchedule------ , requestUpdateSnapshotSchedule $--- updateSnapshotSchedule------ , requestCreateSnapshot $--- createSnapshot------ , requestCancelRetrieval $--- cancelRetrieval------ , requestDescribeVTLDevices $--- describeVTLDevices------ , requestDeleteTapeArchive $--- deleteTapeArchive------ , requestDescribeNFSFileShares $--- describeNFSFileShares------ , requestListVolumeRecoveryPoints $--- listVolumeRecoveryPoints------ , requestListTapes $--- listTapes------ , requestResetCache $--- resetCache------ , requestListGateways $--- listGateways------ , requestDeleteTape $--- deleteTape------ , requestListLocalDisks $--- listLocalDisks------ , requestListVolumes $--- listVolumes------ , requestUpdateBandwidthRateLimit $--- updateBandwidthRateLimit------ , requestAddWorkingStorage $--- addWorkingStorage------ , requestDescribeTapeRecoveryPoints $--- describeTapeRecoveryPoints------ , requestDeleteBandwidthRateLimit $--- deleteBandwidthRateLimit------ , requestActivateGateway $--- activateGateway------ , requestDescribeCache $--- describeCache------ , requestDeleteVolume $--- deleteVolume------ ]---- , testGroup "response"--- [ responseCancelArchival $--- cancelArchivalResponse------ , responseCreateStorediSCSIVolume $--- createStorediSCSIVolumeResponse------ , responseCreateNFSFileShare $--- createNFSFileShareResponse------ , responseDescribeChapCredentials $--- describeChapCredentialsResponse------ , responseSetLocalConsolePassword $--- setLocalConsolePasswordResponse------ , responseCreateTapes $--- createTapesResponse------ , responseUpdateVTLDeviceType $--- updateVTLDeviceTypeResponse------ , responseCreateCachediSCSIVolume $--- createCachediSCSIVolumeResponse------ , responseListFileShares $--- listFileSharesResponse------ , responseDeleteFileShare $--- deleteFileShareResponse------ , responseListVolumeInitiators $--- listVolumeInitiatorsResponse------ , responseAddUploadBuffer $--- addUploadBufferResponse------ , responseListTagsForResource $--- listTagsForResourceResponse------ , responseNotifyWhenUploaded $--- notifyWhenUploadedResponse------ , responseUpdateGatewayInformation $--- updateGatewayInformationResponse------ , responseDescribeMaintenanceStartTime $--- describeMaintenanceStartTimeResponse------ , responseDescribeWorkingStorage $--- describeWorkingStorageResponse------ , responseDescribeCachediSCSIVolumes $--- describeCachediSCSIVolumesResponse------ , responseAddCache $--- addCacheResponse------ , responseStartGateway $--- startGatewayResponse------ , responseShutdownGateway $--- shutdownGatewayResponse------ , responseUpdateGatewaySoftwareNow $--- updateGatewaySoftwareNowResponse------ , responseRemoveTagsFromResource $--- removeTagsFromResourceResponse------ , responseDeleteChapCredentials $--- deleteChapCredentialsResponse------ , responseUpdateChapCredentials $--- updateChapCredentialsResponse------ , responseDescribeUploadBuffer $--- describeUploadBufferResponse------ , responseDescribeTapes $--- describeTapesResponse------ , responseDescribeStorediSCSIVolumes $--- describeStorediSCSIVolumesResponse------ , responseCreateSnapshotFromVolumeRecoveryPoint $--- createSnapshotFromVolumeRecoveryPointResponse------ , responseRetrieveTapeRecoveryPoint $--- retrieveTapeRecoveryPointResponse------ , responseAddTagsToResource $--- addTagsToResourceResponse------ , responseDeleteGateway $--- deleteGatewayResponse------ , responseUpdateMaintenanceStartTime $--- updateMaintenanceStartTimeResponse------ , responseDescribeGatewayInformation $--- describeGatewayInformationResponse------ , responseRefreshCache $--- refreshCacheResponse------ , responseUpdateNFSFileShare $--- updateNFSFileShareResponse------ , responseRetrieveTapeArchive $--- retrieveTapeArchiveResponse------ , responseDescribeTapeArchives $--- describeTapeArchivesResponse------ , responseDisableGateway $--- disableGatewayResponse------ , responseDescribeSnapshotSchedule $--- describeSnapshotScheduleResponse------ , responseCreateTapeWithBarcode $--- createTapeWithBarcodeResponse------ , responseDescribeBandwidthRateLimit $--- describeBandwidthRateLimitResponse------ , responseDeleteSnapshotSchedule $--- deleteSnapshotScheduleResponse------ , responseUpdateSnapshotSchedule $--- updateSnapshotScheduleResponse------ , responseCreateSnapshot $--- createSnapshotResponse------ , responseCancelRetrieval $--- cancelRetrievalResponse------ , responseDescribeVTLDevices $--- describeVTLDevicesResponse------ , responseDeleteTapeArchive $--- deleteTapeArchiveResponse------ , responseDescribeNFSFileShares $--- describeNFSFileSharesResponse------ , responseListVolumeRecoveryPoints $--- listVolumeRecoveryPointsResponse------ , responseListTapes $--- listTapesResponse------ , responseResetCache $--- resetCacheResponse------ , responseListGateways $--- listGatewaysResponse------ , responseDeleteTape $--- deleteTapeResponse------ , responseListLocalDisks $--- listLocalDisksResponse------ , responseListVolumes $--- listVolumesResponse------ , responseUpdateBandwidthRateLimit $--- updateBandwidthRateLimitResponse------ , responseAddWorkingStorage $--- addWorkingStorageResponse------ , responseDescribeTapeRecoveryPoints $--- describeTapeRecoveryPointsResponse------ , responseDeleteBandwidthRateLimit $--- deleteBandwidthRateLimitResponse------ , responseActivateGateway $--- activateGatewayResponse------ , responseDescribeCache $--- describeCacheResponse------ , responseDeleteVolume $--- deleteVolumeResponse------ ]--- ]---- Requests--requestCancelArchival :: CancelArchival -> TestTree-requestCancelArchival = req- "CancelArchival"- "fixture/CancelArchival.yaml"--requestCreateStorediSCSIVolume :: CreateStorediSCSIVolume -> TestTree-requestCreateStorediSCSIVolume = req- "CreateStorediSCSIVolume"- "fixture/CreateStorediSCSIVolume.yaml"--requestCreateNFSFileShare :: CreateNFSFileShare -> TestTree-requestCreateNFSFileShare = req- "CreateNFSFileShare"- "fixture/CreateNFSFileShare.yaml"--requestDescribeChapCredentials :: DescribeChapCredentials -> TestTree-requestDescribeChapCredentials = req- "DescribeChapCredentials"- "fixture/DescribeChapCredentials.yaml"--requestSetLocalConsolePassword :: SetLocalConsolePassword -> TestTree-requestSetLocalConsolePassword = req- "SetLocalConsolePassword"- "fixture/SetLocalConsolePassword.yaml"--requestCreateTapes :: CreateTapes -> TestTree-requestCreateTapes = req- "CreateTapes"- "fixture/CreateTapes.yaml"--requestUpdateVTLDeviceType :: UpdateVTLDeviceType -> TestTree-requestUpdateVTLDeviceType = req- "UpdateVTLDeviceType"- "fixture/UpdateVTLDeviceType.yaml"--requestCreateCachediSCSIVolume :: CreateCachediSCSIVolume -> TestTree-requestCreateCachediSCSIVolume = req- "CreateCachediSCSIVolume"- "fixture/CreateCachediSCSIVolume.yaml"--requestListFileShares :: ListFileShares -> TestTree-requestListFileShares = req- "ListFileShares"- "fixture/ListFileShares.yaml"--requestDeleteFileShare :: DeleteFileShare -> TestTree-requestDeleteFileShare = req- "DeleteFileShare"- "fixture/DeleteFileShare.yaml"--requestListVolumeInitiators :: ListVolumeInitiators -> TestTree-requestListVolumeInitiators = req- "ListVolumeInitiators"- "fixture/ListVolumeInitiators.yaml"--requestAddUploadBuffer :: AddUploadBuffer -> TestTree-requestAddUploadBuffer = req- "AddUploadBuffer"- "fixture/AddUploadBuffer.yaml"--requestListTagsForResource :: ListTagsForResource -> TestTree-requestListTagsForResource = req- "ListTagsForResource"- "fixture/ListTagsForResource.yaml"--requestNotifyWhenUploaded :: NotifyWhenUploaded -> TestTree-requestNotifyWhenUploaded = req- "NotifyWhenUploaded"- "fixture/NotifyWhenUploaded.yaml"--requestUpdateGatewayInformation :: UpdateGatewayInformation -> TestTree-requestUpdateGatewayInformation = req- "UpdateGatewayInformation"- "fixture/UpdateGatewayInformation.yaml"--requestDescribeMaintenanceStartTime :: DescribeMaintenanceStartTime -> TestTree-requestDescribeMaintenanceStartTime = req- "DescribeMaintenanceStartTime"- "fixture/DescribeMaintenanceStartTime.yaml"--requestDescribeWorkingStorage :: DescribeWorkingStorage -> TestTree-requestDescribeWorkingStorage = req- "DescribeWorkingStorage"- "fixture/DescribeWorkingStorage.yaml"--requestDescribeCachediSCSIVolumes :: DescribeCachediSCSIVolumes -> TestTree-requestDescribeCachediSCSIVolumes = req- "DescribeCachediSCSIVolumes"- "fixture/DescribeCachediSCSIVolumes.yaml"--requestAddCache :: AddCache -> TestTree-requestAddCache = req- "AddCache"- "fixture/AddCache.yaml"--requestStartGateway :: StartGateway -> TestTree-requestStartGateway = req- "StartGateway"- "fixture/StartGateway.yaml"--requestShutdownGateway :: ShutdownGateway -> TestTree-requestShutdownGateway = req- "ShutdownGateway"- "fixture/ShutdownGateway.yaml"--requestUpdateGatewaySoftwareNow :: UpdateGatewaySoftwareNow -> TestTree-requestUpdateGatewaySoftwareNow = req- "UpdateGatewaySoftwareNow"- "fixture/UpdateGatewaySoftwareNow.yaml"--requestRemoveTagsFromResource :: RemoveTagsFromResource -> TestTree-requestRemoveTagsFromResource = req- "RemoveTagsFromResource"- "fixture/RemoveTagsFromResource.yaml"--requestDeleteChapCredentials :: DeleteChapCredentials -> TestTree-requestDeleteChapCredentials = req- "DeleteChapCredentials"- "fixture/DeleteChapCredentials.yaml"--requestUpdateChapCredentials :: UpdateChapCredentials -> TestTree-requestUpdateChapCredentials = req- "UpdateChapCredentials"- "fixture/UpdateChapCredentials.yaml"--requestDescribeUploadBuffer :: DescribeUploadBuffer -> TestTree-requestDescribeUploadBuffer = req- "DescribeUploadBuffer"- "fixture/DescribeUploadBuffer.yaml"--requestDescribeTapes :: DescribeTapes -> TestTree-requestDescribeTapes = req- "DescribeTapes"- "fixture/DescribeTapes.yaml"--requestDescribeStorediSCSIVolumes :: DescribeStorediSCSIVolumes -> TestTree-requestDescribeStorediSCSIVolumes = req- "DescribeStorediSCSIVolumes"- "fixture/DescribeStorediSCSIVolumes.yaml"--requestCreateSnapshotFromVolumeRecoveryPoint :: CreateSnapshotFromVolumeRecoveryPoint -> TestTree-requestCreateSnapshotFromVolumeRecoveryPoint = req- "CreateSnapshotFromVolumeRecoveryPoint"- "fixture/CreateSnapshotFromVolumeRecoveryPoint.yaml"--requestRetrieveTapeRecoveryPoint :: RetrieveTapeRecoveryPoint -> TestTree-requestRetrieveTapeRecoveryPoint = req- "RetrieveTapeRecoveryPoint"- "fixture/RetrieveTapeRecoveryPoint.yaml"--requestAddTagsToResource :: AddTagsToResource -> TestTree-requestAddTagsToResource = req- "AddTagsToResource"- "fixture/AddTagsToResource.yaml"--requestDeleteGateway :: DeleteGateway -> TestTree-requestDeleteGateway = req- "DeleteGateway"- "fixture/DeleteGateway.yaml"--requestUpdateMaintenanceStartTime :: UpdateMaintenanceStartTime -> TestTree-requestUpdateMaintenanceStartTime = req- "UpdateMaintenanceStartTime"- "fixture/UpdateMaintenanceStartTime.yaml"--requestDescribeGatewayInformation :: DescribeGatewayInformation -> TestTree-requestDescribeGatewayInformation = req- "DescribeGatewayInformation"- "fixture/DescribeGatewayInformation.yaml"--requestRefreshCache :: RefreshCache -> TestTree-requestRefreshCache = req- "RefreshCache"- "fixture/RefreshCache.yaml"--requestUpdateNFSFileShare :: UpdateNFSFileShare -> TestTree-requestUpdateNFSFileShare = req- "UpdateNFSFileShare"- "fixture/UpdateNFSFileShare.yaml"--requestRetrieveTapeArchive :: RetrieveTapeArchive -> TestTree-requestRetrieveTapeArchive = req- "RetrieveTapeArchive"- "fixture/RetrieveTapeArchive.yaml"--requestDescribeTapeArchives :: DescribeTapeArchives -> TestTree-requestDescribeTapeArchives = req- "DescribeTapeArchives"- "fixture/DescribeTapeArchives.yaml"--requestDisableGateway :: DisableGateway -> TestTree-requestDisableGateway = req- "DisableGateway"- "fixture/DisableGateway.yaml"--requestDescribeSnapshotSchedule :: DescribeSnapshotSchedule -> TestTree-requestDescribeSnapshotSchedule = req- "DescribeSnapshotSchedule"- "fixture/DescribeSnapshotSchedule.yaml"--requestCreateTapeWithBarcode :: CreateTapeWithBarcode -> TestTree-requestCreateTapeWithBarcode = req- "CreateTapeWithBarcode"- "fixture/CreateTapeWithBarcode.yaml"--requestDescribeBandwidthRateLimit :: DescribeBandwidthRateLimit -> TestTree-requestDescribeBandwidthRateLimit = req- "DescribeBandwidthRateLimit"- "fixture/DescribeBandwidthRateLimit.yaml"--requestDeleteSnapshotSchedule :: DeleteSnapshotSchedule -> TestTree-requestDeleteSnapshotSchedule = req- "DeleteSnapshotSchedule"- "fixture/DeleteSnapshotSchedule.yaml"--requestUpdateSnapshotSchedule :: UpdateSnapshotSchedule -> TestTree-requestUpdateSnapshotSchedule = req- "UpdateSnapshotSchedule"- "fixture/UpdateSnapshotSchedule.yaml"--requestCreateSnapshot :: CreateSnapshot -> TestTree-requestCreateSnapshot = req- "CreateSnapshot"- "fixture/CreateSnapshot.yaml"--requestCancelRetrieval :: CancelRetrieval -> TestTree-requestCancelRetrieval = req- "CancelRetrieval"- "fixture/CancelRetrieval.yaml"--requestDescribeVTLDevices :: DescribeVTLDevices -> TestTree-requestDescribeVTLDevices = req- "DescribeVTLDevices"- "fixture/DescribeVTLDevices.yaml"--requestDeleteTapeArchive :: DeleteTapeArchive -> TestTree-requestDeleteTapeArchive = req- "DeleteTapeArchive"- "fixture/DeleteTapeArchive.yaml"--requestDescribeNFSFileShares :: DescribeNFSFileShares -> TestTree-requestDescribeNFSFileShares = req- "DescribeNFSFileShares"- "fixture/DescribeNFSFileShares.yaml"--requestListVolumeRecoveryPoints :: ListVolumeRecoveryPoints -> TestTree-requestListVolumeRecoveryPoints = req- "ListVolumeRecoveryPoints"- "fixture/ListVolumeRecoveryPoints.yaml"--requestListTapes :: ListTapes -> TestTree-requestListTapes = req- "ListTapes"- "fixture/ListTapes.yaml"--requestResetCache :: ResetCache -> TestTree-requestResetCache = req- "ResetCache"- "fixture/ResetCache.yaml"--requestListGateways :: ListGateways -> TestTree-requestListGateways = req- "ListGateways"- "fixture/ListGateways.yaml"--requestDeleteTape :: DeleteTape -> TestTree-requestDeleteTape = req- "DeleteTape"- "fixture/DeleteTape.yaml"--requestListLocalDisks :: ListLocalDisks -> TestTree-requestListLocalDisks = req- "ListLocalDisks"- "fixture/ListLocalDisks.yaml"--requestListVolumes :: ListVolumes -> TestTree-requestListVolumes = req- "ListVolumes"- "fixture/ListVolumes.yaml"--requestUpdateBandwidthRateLimit :: UpdateBandwidthRateLimit -> TestTree-requestUpdateBandwidthRateLimit = req- "UpdateBandwidthRateLimit"- "fixture/UpdateBandwidthRateLimit.yaml"--requestAddWorkingStorage :: AddWorkingStorage -> TestTree-requestAddWorkingStorage = req- "AddWorkingStorage"- "fixture/AddWorkingStorage.yaml"--requestDescribeTapeRecoveryPoints :: DescribeTapeRecoveryPoints -> TestTree-requestDescribeTapeRecoveryPoints = req- "DescribeTapeRecoveryPoints"- "fixture/DescribeTapeRecoveryPoints.yaml"--requestDeleteBandwidthRateLimit :: DeleteBandwidthRateLimit -> TestTree-requestDeleteBandwidthRateLimit = req- "DeleteBandwidthRateLimit"- "fixture/DeleteBandwidthRateLimit.yaml"--requestActivateGateway :: ActivateGateway -> TestTree-requestActivateGateway = req- "ActivateGateway"- "fixture/ActivateGateway.yaml"--requestDescribeCache :: DescribeCache -> TestTree-requestDescribeCache = req- "DescribeCache"- "fixture/DescribeCache.yaml"--requestDeleteVolume :: DeleteVolume -> TestTree-requestDeleteVolume = req- "DeleteVolume"- "fixture/DeleteVolume.yaml"---- Responses--responseCancelArchival :: CancelArchivalResponse -> TestTree-responseCancelArchival = res- "CancelArchivalResponse"- "fixture/CancelArchivalResponse.proto"- storageGateway- (Proxy :: Proxy CancelArchival)--responseCreateStorediSCSIVolume :: CreateStorediSCSIVolumeResponse -> TestTree-responseCreateStorediSCSIVolume = res- "CreateStorediSCSIVolumeResponse"- "fixture/CreateStorediSCSIVolumeResponse.proto"- storageGateway- (Proxy :: Proxy CreateStorediSCSIVolume)--responseCreateNFSFileShare :: CreateNFSFileShareResponse -> TestTree-responseCreateNFSFileShare = res- "CreateNFSFileShareResponse"- "fixture/CreateNFSFileShareResponse.proto"- storageGateway- (Proxy :: Proxy CreateNFSFileShare)--responseDescribeChapCredentials :: DescribeChapCredentialsResponse -> TestTree-responseDescribeChapCredentials = res- "DescribeChapCredentialsResponse"- "fixture/DescribeChapCredentialsResponse.proto"- storageGateway- (Proxy :: Proxy DescribeChapCredentials)--responseSetLocalConsolePassword :: SetLocalConsolePasswordResponse -> TestTree-responseSetLocalConsolePassword = res- "SetLocalConsolePasswordResponse"- "fixture/SetLocalConsolePasswordResponse.proto"- storageGateway- (Proxy :: Proxy SetLocalConsolePassword)--responseCreateTapes :: CreateTapesResponse -> TestTree-responseCreateTapes = res- "CreateTapesResponse"- "fixture/CreateTapesResponse.proto"- storageGateway- (Proxy :: Proxy CreateTapes)--responseUpdateVTLDeviceType :: UpdateVTLDeviceTypeResponse -> TestTree-responseUpdateVTLDeviceType = res- "UpdateVTLDeviceTypeResponse"- "fixture/UpdateVTLDeviceTypeResponse.proto"- storageGateway- (Proxy :: Proxy UpdateVTLDeviceType)--responseCreateCachediSCSIVolume :: CreateCachediSCSIVolumeResponse -> TestTree-responseCreateCachediSCSIVolume = res- "CreateCachediSCSIVolumeResponse"- "fixture/CreateCachediSCSIVolumeResponse.proto"- storageGateway- (Proxy :: Proxy CreateCachediSCSIVolume)--responseListFileShares :: ListFileSharesResponse -> TestTree-responseListFileShares = res- "ListFileSharesResponse"- "fixture/ListFileSharesResponse.proto"- storageGateway- (Proxy :: Proxy ListFileShares)--responseDeleteFileShare :: DeleteFileShareResponse -> TestTree-responseDeleteFileShare = res- "DeleteFileShareResponse"- "fixture/DeleteFileShareResponse.proto"- storageGateway- (Proxy :: Proxy DeleteFileShare)--responseListVolumeInitiators :: ListVolumeInitiatorsResponse -> TestTree-responseListVolumeInitiators = res- "ListVolumeInitiatorsResponse"- "fixture/ListVolumeInitiatorsResponse.proto"- storageGateway- (Proxy :: Proxy ListVolumeInitiators)--responseAddUploadBuffer :: AddUploadBufferResponse -> TestTree-responseAddUploadBuffer = res- "AddUploadBufferResponse"- "fixture/AddUploadBufferResponse.proto"- storageGateway- (Proxy :: Proxy AddUploadBuffer)--responseListTagsForResource :: ListTagsForResourceResponse -> TestTree-responseListTagsForResource = res- "ListTagsForResourceResponse"- "fixture/ListTagsForResourceResponse.proto"- storageGateway- (Proxy :: Proxy ListTagsForResource)--responseNotifyWhenUploaded :: NotifyWhenUploadedResponse -> TestTree-responseNotifyWhenUploaded = res- "NotifyWhenUploadedResponse"- "fixture/NotifyWhenUploadedResponse.proto"- storageGateway- (Proxy :: Proxy NotifyWhenUploaded)--responseUpdateGatewayInformation :: UpdateGatewayInformationResponse -> TestTree-responseUpdateGatewayInformation = res- "UpdateGatewayInformationResponse"- "fixture/UpdateGatewayInformationResponse.proto"- storageGateway- (Proxy :: Proxy UpdateGatewayInformation)--responseDescribeMaintenanceStartTime :: DescribeMaintenanceStartTimeResponse -> TestTree-responseDescribeMaintenanceStartTime = res- "DescribeMaintenanceStartTimeResponse"- "fixture/DescribeMaintenanceStartTimeResponse.proto"- storageGateway- (Proxy :: Proxy DescribeMaintenanceStartTime)--responseDescribeWorkingStorage :: DescribeWorkingStorageResponse -> TestTree-responseDescribeWorkingStorage = res- "DescribeWorkingStorageResponse"- "fixture/DescribeWorkingStorageResponse.proto"- storageGateway- (Proxy :: Proxy DescribeWorkingStorage)--responseDescribeCachediSCSIVolumes :: DescribeCachediSCSIVolumesResponse -> TestTree-responseDescribeCachediSCSIVolumes = res- "DescribeCachediSCSIVolumesResponse"- "fixture/DescribeCachediSCSIVolumesResponse.proto"- storageGateway- (Proxy :: Proxy DescribeCachediSCSIVolumes)--responseAddCache :: AddCacheResponse -> TestTree-responseAddCache = res- "AddCacheResponse"- "fixture/AddCacheResponse.proto"- storageGateway- (Proxy :: Proxy AddCache)--responseStartGateway :: StartGatewayResponse -> TestTree-responseStartGateway = res- "StartGatewayResponse"- "fixture/StartGatewayResponse.proto"- storageGateway- (Proxy :: Proxy StartGateway)--responseShutdownGateway :: ShutdownGatewayResponse -> TestTree-responseShutdownGateway = res- "ShutdownGatewayResponse"- "fixture/ShutdownGatewayResponse.proto"- storageGateway- (Proxy :: Proxy ShutdownGateway)--responseUpdateGatewaySoftwareNow :: UpdateGatewaySoftwareNowResponse -> TestTree-responseUpdateGatewaySoftwareNow = res- "UpdateGatewaySoftwareNowResponse"- "fixture/UpdateGatewaySoftwareNowResponse.proto"- storageGateway- (Proxy :: Proxy UpdateGatewaySoftwareNow)--responseRemoveTagsFromResource :: RemoveTagsFromResourceResponse -> TestTree-responseRemoveTagsFromResource = res- "RemoveTagsFromResourceResponse"- "fixture/RemoveTagsFromResourceResponse.proto"- storageGateway- (Proxy :: Proxy RemoveTagsFromResource)--responseDeleteChapCredentials :: DeleteChapCredentialsResponse -> TestTree-responseDeleteChapCredentials = res- "DeleteChapCredentialsResponse"- "fixture/DeleteChapCredentialsResponse.proto"- storageGateway- (Proxy :: Proxy DeleteChapCredentials)--responseUpdateChapCredentials :: UpdateChapCredentialsResponse -> TestTree-responseUpdateChapCredentials = res- "UpdateChapCredentialsResponse"- "fixture/UpdateChapCredentialsResponse.proto"- storageGateway- (Proxy :: Proxy UpdateChapCredentials)--responseDescribeUploadBuffer :: DescribeUploadBufferResponse -> TestTree-responseDescribeUploadBuffer = res- "DescribeUploadBufferResponse"- "fixture/DescribeUploadBufferResponse.proto"- storageGateway- (Proxy :: Proxy DescribeUploadBuffer)--responseDescribeTapes :: DescribeTapesResponse -> TestTree-responseDescribeTapes = res- "DescribeTapesResponse"- "fixture/DescribeTapesResponse.proto"- storageGateway- (Proxy :: Proxy DescribeTapes)--responseDescribeStorediSCSIVolumes :: DescribeStorediSCSIVolumesResponse -> TestTree-responseDescribeStorediSCSIVolumes = res- "DescribeStorediSCSIVolumesResponse"- "fixture/DescribeStorediSCSIVolumesResponse.proto"- storageGateway- (Proxy :: Proxy DescribeStorediSCSIVolumes)--responseCreateSnapshotFromVolumeRecoveryPoint :: CreateSnapshotFromVolumeRecoveryPointResponse -> TestTree-responseCreateSnapshotFromVolumeRecoveryPoint = res- "CreateSnapshotFromVolumeRecoveryPointResponse"- "fixture/CreateSnapshotFromVolumeRecoveryPointResponse.proto"- storageGateway- (Proxy :: Proxy CreateSnapshotFromVolumeRecoveryPoint)--responseRetrieveTapeRecoveryPoint :: RetrieveTapeRecoveryPointResponse -> TestTree-responseRetrieveTapeRecoveryPoint = res- "RetrieveTapeRecoveryPointResponse"- "fixture/RetrieveTapeRecoveryPointResponse.proto"- storageGateway- (Proxy :: Proxy RetrieveTapeRecoveryPoint)--responseAddTagsToResource :: AddTagsToResourceResponse -> TestTree-responseAddTagsToResource = res- "AddTagsToResourceResponse"- "fixture/AddTagsToResourceResponse.proto"- storageGateway- (Proxy :: Proxy AddTagsToResource)--responseDeleteGateway :: DeleteGatewayResponse -> TestTree-responseDeleteGateway = res- "DeleteGatewayResponse"- "fixture/DeleteGatewayResponse.proto"- storageGateway- (Proxy :: Proxy DeleteGateway)--responseUpdateMaintenanceStartTime :: UpdateMaintenanceStartTimeResponse -> TestTree-responseUpdateMaintenanceStartTime = res- "UpdateMaintenanceStartTimeResponse"- "fixture/UpdateMaintenanceStartTimeResponse.proto"- storageGateway- (Proxy :: Proxy UpdateMaintenanceStartTime)--responseDescribeGatewayInformation :: DescribeGatewayInformationResponse -> TestTree-responseDescribeGatewayInformation = res- "DescribeGatewayInformationResponse"- "fixture/DescribeGatewayInformationResponse.proto"- storageGateway- (Proxy :: Proxy DescribeGatewayInformation)--responseRefreshCache :: RefreshCacheResponse -> TestTree-responseRefreshCache = res- "RefreshCacheResponse"- "fixture/RefreshCacheResponse.proto"- storageGateway- (Proxy :: Proxy RefreshCache)--responseUpdateNFSFileShare :: UpdateNFSFileShareResponse -> TestTree-responseUpdateNFSFileShare = res- "UpdateNFSFileShareResponse"- "fixture/UpdateNFSFileShareResponse.proto"- storageGateway- (Proxy :: Proxy UpdateNFSFileShare)--responseRetrieveTapeArchive :: RetrieveTapeArchiveResponse -> TestTree-responseRetrieveTapeArchive = res- "RetrieveTapeArchiveResponse"- "fixture/RetrieveTapeArchiveResponse.proto"- storageGateway- (Proxy :: Proxy RetrieveTapeArchive)--responseDescribeTapeArchives :: DescribeTapeArchivesResponse -> TestTree-responseDescribeTapeArchives = res- "DescribeTapeArchivesResponse"- "fixture/DescribeTapeArchivesResponse.proto"- storageGateway- (Proxy :: Proxy DescribeTapeArchives)--responseDisableGateway :: DisableGatewayResponse -> TestTree-responseDisableGateway = res- "DisableGatewayResponse"- "fixture/DisableGatewayResponse.proto"- storageGateway- (Proxy :: Proxy DisableGateway)--responseDescribeSnapshotSchedule :: DescribeSnapshotScheduleResponse -> TestTree-responseDescribeSnapshotSchedule = res- "DescribeSnapshotScheduleResponse"- "fixture/DescribeSnapshotScheduleResponse.proto"- storageGateway- (Proxy :: Proxy DescribeSnapshotSchedule)--responseCreateTapeWithBarcode :: CreateTapeWithBarcodeResponse -> TestTree-responseCreateTapeWithBarcode = res- "CreateTapeWithBarcodeResponse"- "fixture/CreateTapeWithBarcodeResponse.proto"- storageGateway- (Proxy :: Proxy CreateTapeWithBarcode)--responseDescribeBandwidthRateLimit :: DescribeBandwidthRateLimitResponse -> TestTree-responseDescribeBandwidthRateLimit = res- "DescribeBandwidthRateLimitResponse"- "fixture/DescribeBandwidthRateLimitResponse.proto"- storageGateway- (Proxy :: Proxy DescribeBandwidthRateLimit)--responseDeleteSnapshotSchedule :: DeleteSnapshotScheduleResponse -> TestTree-responseDeleteSnapshotSchedule = res- "DeleteSnapshotScheduleResponse"- "fixture/DeleteSnapshotScheduleResponse.proto"- storageGateway- (Proxy :: Proxy DeleteSnapshotSchedule)--responseUpdateSnapshotSchedule :: UpdateSnapshotScheduleResponse -> TestTree-responseUpdateSnapshotSchedule = res- "UpdateSnapshotScheduleResponse"- "fixture/UpdateSnapshotScheduleResponse.proto"- storageGateway- (Proxy :: Proxy UpdateSnapshotSchedule)--responseCreateSnapshot :: CreateSnapshotResponse -> TestTree-responseCreateSnapshot = res- "CreateSnapshotResponse"- "fixture/CreateSnapshotResponse.proto"- storageGateway- (Proxy :: Proxy CreateSnapshot)--responseCancelRetrieval :: CancelRetrievalResponse -> TestTree-responseCancelRetrieval = res- "CancelRetrievalResponse"- "fixture/CancelRetrievalResponse.proto"- storageGateway- (Proxy :: Proxy CancelRetrieval)--responseDescribeVTLDevices :: DescribeVTLDevicesResponse -> TestTree-responseDescribeVTLDevices = res- "DescribeVTLDevicesResponse"- "fixture/DescribeVTLDevicesResponse.proto"- storageGateway- (Proxy :: Proxy DescribeVTLDevices)--responseDeleteTapeArchive :: DeleteTapeArchiveResponse -> TestTree-responseDeleteTapeArchive = res- "DeleteTapeArchiveResponse"- "fixture/DeleteTapeArchiveResponse.proto"- storageGateway- (Proxy :: Proxy DeleteTapeArchive)--responseDescribeNFSFileShares :: DescribeNFSFileSharesResponse -> TestTree-responseDescribeNFSFileShares = res- "DescribeNFSFileSharesResponse"- "fixture/DescribeNFSFileSharesResponse.proto"- storageGateway- (Proxy :: Proxy DescribeNFSFileShares)--responseListVolumeRecoveryPoints :: ListVolumeRecoveryPointsResponse -> TestTree-responseListVolumeRecoveryPoints = res- "ListVolumeRecoveryPointsResponse"- "fixture/ListVolumeRecoveryPointsResponse.proto"- storageGateway- (Proxy :: Proxy ListVolumeRecoveryPoints)--responseListTapes :: ListTapesResponse -> TestTree-responseListTapes = res- "ListTapesResponse"- "fixture/ListTapesResponse.proto"- storageGateway- (Proxy :: Proxy ListTapes)--responseResetCache :: ResetCacheResponse -> TestTree-responseResetCache = res- "ResetCacheResponse"- "fixture/ResetCacheResponse.proto"- storageGateway- (Proxy :: Proxy ResetCache)--responseListGateways :: ListGatewaysResponse -> TestTree-responseListGateways = res- "ListGatewaysResponse"- "fixture/ListGatewaysResponse.proto"- storageGateway- (Proxy :: Proxy ListGateways)--responseDeleteTape :: DeleteTapeResponse -> TestTree-responseDeleteTape = res- "DeleteTapeResponse"- "fixture/DeleteTapeResponse.proto"- storageGateway- (Proxy :: Proxy DeleteTape)--responseListLocalDisks :: ListLocalDisksResponse -> TestTree-responseListLocalDisks = res- "ListLocalDisksResponse"- "fixture/ListLocalDisksResponse.proto"- storageGateway- (Proxy :: Proxy ListLocalDisks)--responseListVolumes :: ListVolumesResponse -> TestTree-responseListVolumes = res- "ListVolumesResponse"- "fixture/ListVolumesResponse.proto"- storageGateway- (Proxy :: Proxy ListVolumes)--responseUpdateBandwidthRateLimit :: UpdateBandwidthRateLimitResponse -> TestTree-responseUpdateBandwidthRateLimit = res- "UpdateBandwidthRateLimitResponse"- "fixture/UpdateBandwidthRateLimitResponse.proto"- storageGateway- (Proxy :: Proxy UpdateBandwidthRateLimit)--responseAddWorkingStorage :: AddWorkingStorageResponse -> TestTree-responseAddWorkingStorage = res- "AddWorkingStorageResponse"- "fixture/AddWorkingStorageResponse.proto"- storageGateway- (Proxy :: Proxy AddWorkingStorage)--responseDescribeTapeRecoveryPoints :: DescribeTapeRecoveryPointsResponse -> TestTree-responseDescribeTapeRecoveryPoints = res- "DescribeTapeRecoveryPointsResponse"- "fixture/DescribeTapeRecoveryPointsResponse.proto"- storageGateway- (Proxy :: Proxy DescribeTapeRecoveryPoints)--responseDeleteBandwidthRateLimit :: DeleteBandwidthRateLimitResponse -> TestTree-responseDeleteBandwidthRateLimit = res- "DeleteBandwidthRateLimitResponse"- "fixture/DeleteBandwidthRateLimitResponse.proto"- storageGateway- (Proxy :: Proxy DeleteBandwidthRateLimit)--responseActivateGateway :: ActivateGatewayResponse -> TestTree-responseActivateGateway = res- "ActivateGatewayResponse"- "fixture/ActivateGatewayResponse.proto"- storageGateway- (Proxy :: Proxy ActivateGateway)--responseDescribeCache :: DescribeCacheResponse -> TestTree-responseDescribeCache = res- "DescribeCacheResponse"- "fixture/DescribeCacheResponse.proto"- storageGateway- (Proxy :: Proxy DescribeCache)--responseDeleteVolume :: DeleteVolumeResponse -> TestTree-responseDeleteVolume = res- "DeleteVolumeResponse"- "fixture/DeleteVolumeResponse.proto"- storageGateway- (Proxy :: Proxy DeleteVolume)
− test/Test/AWS/StorageGateway.hs
@@ -1,26 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}---- Module : Test.AWS.StorageGateway--- Copyright : (c) 2013-2018 Brendan Hay--- License : This Source Code Form is subject to the terms of--- the Mozilla Public License, v. 2.0.--- A copy of the MPL can be found in the LICENSE file or--- you can obtain it at http://mozilla.org/MPL/2.0/.--- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>--- Stability : experimental--- Portability : non-portable (GHC extensions)--module Test.AWS.StorageGateway- ( tests- , fixtures- ) where--import Network.AWS.StorageGateway-import Test.AWS.Gen.StorageGateway-import Test.Tasty--tests :: [TestTree]-tests = []--fixtures :: [TestTree]-fixtures = []
− test/Test/AWS/StorageGateway/Internal.hs
@@ -1,16 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# OPTIONS_GHC -fno-warn-unused-imports #-}---- Module : Test.AWS.StorageGateway.Internal--- Copyright : (c) 2013-2018 Brendan Hay--- License : This Source Code Form is subject to the terms of--- the Mozilla Public License, v. 2.0.--- A copy of the MPL can be found in the LICENSE file or--- you can obtain it at http://mozilla.org/MPL/2.0/.--- Maintainer : Brendan Hay <brendan.g.hay@gmail.com>--- Stability : experimental--- Portability : non-portable (GHC extensions)--module Test.AWS.StorageGateway.Internal where--import Test.AWS.Prelude
+ test/Test/Amazonka/Gen/StorageGateway.hs view
@@ -0,0 +1,1838 @@+{-# OPTIONS_GHC -fno-warn-orphans #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module : Test.Amazonka.Gen.StorageGateway+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Test.Amazonka.Gen.StorageGateway where++import Amazonka.StorageGateway+import qualified Data.Proxy as Proxy+import Test.Amazonka.Fixture+import Test.Amazonka.Prelude+import Test.Amazonka.StorageGateway.Internal+import Test.Tasty++-- Auto-generated: the actual test selection needs to be manually placed into+-- the top-level so that real test data can be incrementally added.+--+-- This commented snippet is what the entire set should look like:++-- fixtures :: TestTree+-- fixtures =+-- [ testGroup "request"+-- [ requestActivateGateway $+-- newActivateGateway+--+-- , requestAddCache $+-- newAddCache+--+-- , requestAddTagsToResource $+-- newAddTagsToResource+--+-- , requestAddUploadBuffer $+-- newAddUploadBuffer+--+-- , requestAddWorkingStorage $+-- newAddWorkingStorage+--+-- , requestAssignTapePool $+-- newAssignTapePool+--+-- , requestAssociateFileSystem $+-- newAssociateFileSystem+--+-- , requestAttachVolume $+-- newAttachVolume+--+-- , requestCancelArchival $+-- newCancelArchival+--+-- , requestCancelRetrieval $+-- newCancelRetrieval+--+-- , requestCreateCachediSCSIVolume $+-- newCreateCachediSCSIVolume+--+-- , requestCreateNFSFileShare $+-- newCreateNFSFileShare+--+-- , requestCreateSMBFileShare $+-- newCreateSMBFileShare+--+-- , requestCreateSnapshot $+-- newCreateSnapshot+--+-- , requestCreateSnapshotFromVolumeRecoveryPoint $+-- newCreateSnapshotFromVolumeRecoveryPoint+--+-- , requestCreateStorediSCSIVolume $+-- newCreateStorediSCSIVolume+--+-- , requestCreateTapePool $+-- newCreateTapePool+--+-- , requestCreateTapeWithBarcode $+-- newCreateTapeWithBarcode+--+-- , requestCreateTapes $+-- newCreateTapes+--+-- , requestDeleteAutomaticTapeCreationPolicy $+-- newDeleteAutomaticTapeCreationPolicy+--+-- , requestDeleteBandwidthRateLimit $+-- newDeleteBandwidthRateLimit+--+-- , requestDeleteChapCredentials $+-- newDeleteChapCredentials+--+-- , requestDeleteFileShare $+-- newDeleteFileShare+--+-- , requestDeleteGateway $+-- newDeleteGateway+--+-- , requestDeleteSnapshotSchedule $+-- newDeleteSnapshotSchedule+--+-- , requestDeleteTape $+-- newDeleteTape+--+-- , requestDeleteTapeArchive $+-- newDeleteTapeArchive+--+-- , requestDeleteTapePool $+-- newDeleteTapePool+--+-- , requestDeleteVolume $+-- newDeleteVolume+--+-- , requestDescribeAvailabilityMonitorTest $+-- newDescribeAvailabilityMonitorTest+--+-- , requestDescribeBandwidthRateLimit $+-- newDescribeBandwidthRateLimit+--+-- , requestDescribeBandwidthRateLimitSchedule $+-- newDescribeBandwidthRateLimitSchedule+--+-- , requestDescribeCache $+-- newDescribeCache+--+-- , requestDescribeCachediSCSIVolumes $+-- newDescribeCachediSCSIVolumes+--+-- , requestDescribeChapCredentials $+-- newDescribeChapCredentials+--+-- , requestDescribeFileSystemAssociations $+-- newDescribeFileSystemAssociations+--+-- , requestDescribeGatewayInformation $+-- newDescribeGatewayInformation+--+-- , requestDescribeMaintenanceStartTime $+-- newDescribeMaintenanceStartTime+--+-- , requestDescribeNFSFileShares $+-- newDescribeNFSFileShares+--+-- , requestDescribeSMBFileShares $+-- newDescribeSMBFileShares+--+-- , requestDescribeSMBSettings $+-- newDescribeSMBSettings+--+-- , requestDescribeSnapshotSchedule $+-- newDescribeSnapshotSchedule+--+-- , requestDescribeStorediSCSIVolumes $+-- newDescribeStorediSCSIVolumes+--+-- , requestDescribeTapeArchives $+-- newDescribeTapeArchives+--+-- , requestDescribeTapeRecoveryPoints $+-- newDescribeTapeRecoveryPoints+--+-- , requestDescribeTapes $+-- newDescribeTapes+--+-- , requestDescribeUploadBuffer $+-- newDescribeUploadBuffer+--+-- , requestDescribeVTLDevices $+-- newDescribeVTLDevices+--+-- , requestDescribeWorkingStorage $+-- newDescribeWorkingStorage+--+-- , requestDetachVolume $+-- newDetachVolume+--+-- , requestDisableGateway $+-- newDisableGateway+--+-- , requestDisassociateFileSystem $+-- newDisassociateFileSystem+--+-- , requestJoinDomain $+-- newJoinDomain+--+-- , requestListAutomaticTapeCreationPolicies $+-- newListAutomaticTapeCreationPolicies+--+-- , requestListFileShares $+-- newListFileShares+--+-- , requestListFileSystemAssociations $+-- newListFileSystemAssociations+--+-- , requestListGateways $+-- newListGateways+--+-- , requestListLocalDisks $+-- newListLocalDisks+--+-- , requestListTagsForResource $+-- newListTagsForResource+--+-- , requestListTapePools $+-- newListTapePools+--+-- , requestListTapes $+-- newListTapes+--+-- , requestListVolumeInitiators $+-- newListVolumeInitiators+--+-- , requestListVolumeRecoveryPoints $+-- newListVolumeRecoveryPoints+--+-- , requestListVolumes $+-- newListVolumes+--+-- , requestNotifyWhenUploaded $+-- newNotifyWhenUploaded+--+-- , requestRefreshCache $+-- newRefreshCache+--+-- , requestRemoveTagsFromResource $+-- newRemoveTagsFromResource+--+-- , requestResetCache $+-- newResetCache+--+-- , requestRetrieveTapeArchive $+-- newRetrieveTapeArchive+--+-- , requestRetrieveTapeRecoveryPoint $+-- newRetrieveTapeRecoveryPoint+--+-- , requestSetLocalConsolePassword $+-- newSetLocalConsolePassword+--+-- , requestSetSMBGuestPassword $+-- newSetSMBGuestPassword+--+-- , requestShutdownGateway $+-- newShutdownGateway+--+-- , requestStartAvailabilityMonitorTest $+-- newStartAvailabilityMonitorTest+--+-- , requestStartGateway $+-- newStartGateway+--+-- , requestUpdateAutomaticTapeCreationPolicy $+-- newUpdateAutomaticTapeCreationPolicy+--+-- , requestUpdateBandwidthRateLimit $+-- newUpdateBandwidthRateLimit+--+-- , requestUpdateBandwidthRateLimitSchedule $+-- newUpdateBandwidthRateLimitSchedule+--+-- , requestUpdateChapCredentials $+-- newUpdateChapCredentials+--+-- , requestUpdateFileSystemAssociation $+-- newUpdateFileSystemAssociation+--+-- , requestUpdateGatewayInformation $+-- newUpdateGatewayInformation+--+-- , requestUpdateGatewaySoftwareNow $+-- newUpdateGatewaySoftwareNow+--+-- , requestUpdateMaintenanceStartTime $+-- newUpdateMaintenanceStartTime+--+-- , requestUpdateNFSFileShare $+-- newUpdateNFSFileShare+--+-- , requestUpdateSMBFileShare $+-- newUpdateSMBFileShare+--+-- , requestUpdateSMBFileShareVisibility $+-- newUpdateSMBFileShareVisibility+--+-- , requestUpdateSMBLocalGroups $+-- newUpdateSMBLocalGroups+--+-- , requestUpdateSMBSecurityStrategy $+-- newUpdateSMBSecurityStrategy+--+-- , requestUpdateSnapshotSchedule $+-- newUpdateSnapshotSchedule+--+-- , requestUpdateVTLDeviceType $+-- newUpdateVTLDeviceType+--+-- ]++-- , testGroup "response"+-- [ responseActivateGateway $+-- newActivateGatewayResponse+--+-- , responseAddCache $+-- newAddCacheResponse+--+-- , responseAddTagsToResource $+-- newAddTagsToResourceResponse+--+-- , responseAddUploadBuffer $+-- newAddUploadBufferResponse+--+-- , responseAddWorkingStorage $+-- newAddWorkingStorageResponse+--+-- , responseAssignTapePool $+-- newAssignTapePoolResponse+--+-- , responseAssociateFileSystem $+-- newAssociateFileSystemResponse+--+-- , responseAttachVolume $+-- newAttachVolumeResponse+--+-- , responseCancelArchival $+-- newCancelArchivalResponse+--+-- , responseCancelRetrieval $+-- newCancelRetrievalResponse+--+-- , responseCreateCachediSCSIVolume $+-- newCreateCachediSCSIVolumeResponse+--+-- , responseCreateNFSFileShare $+-- newCreateNFSFileShareResponse+--+-- , responseCreateSMBFileShare $+-- newCreateSMBFileShareResponse+--+-- , responseCreateSnapshot $+-- newCreateSnapshotResponse+--+-- , responseCreateSnapshotFromVolumeRecoveryPoint $+-- newCreateSnapshotFromVolumeRecoveryPointResponse+--+-- , responseCreateStorediSCSIVolume $+-- newCreateStorediSCSIVolumeResponse+--+-- , responseCreateTapePool $+-- newCreateTapePoolResponse+--+-- , responseCreateTapeWithBarcode $+-- newCreateTapeWithBarcodeResponse+--+-- , responseCreateTapes $+-- newCreateTapesResponse+--+-- , responseDeleteAutomaticTapeCreationPolicy $+-- newDeleteAutomaticTapeCreationPolicyResponse+--+-- , responseDeleteBandwidthRateLimit $+-- newDeleteBandwidthRateLimitResponse+--+-- , responseDeleteChapCredentials $+-- newDeleteChapCredentialsResponse+--+-- , responseDeleteFileShare $+-- newDeleteFileShareResponse+--+-- , responseDeleteGateway $+-- newDeleteGatewayResponse+--+-- , responseDeleteSnapshotSchedule $+-- newDeleteSnapshotScheduleResponse+--+-- , responseDeleteTape $+-- newDeleteTapeResponse+--+-- , responseDeleteTapeArchive $+-- newDeleteTapeArchiveResponse+--+-- , responseDeleteTapePool $+-- newDeleteTapePoolResponse+--+-- , responseDeleteVolume $+-- newDeleteVolumeResponse+--+-- , responseDescribeAvailabilityMonitorTest $+-- newDescribeAvailabilityMonitorTestResponse+--+-- , responseDescribeBandwidthRateLimit $+-- newDescribeBandwidthRateLimitResponse+--+-- , responseDescribeBandwidthRateLimitSchedule $+-- newDescribeBandwidthRateLimitScheduleResponse+--+-- , responseDescribeCache $+-- newDescribeCacheResponse+--+-- , responseDescribeCachediSCSIVolumes $+-- newDescribeCachediSCSIVolumesResponse+--+-- , responseDescribeChapCredentials $+-- newDescribeChapCredentialsResponse+--+-- , responseDescribeFileSystemAssociations $+-- newDescribeFileSystemAssociationsResponse+--+-- , responseDescribeGatewayInformation $+-- newDescribeGatewayInformationResponse+--+-- , responseDescribeMaintenanceStartTime $+-- newDescribeMaintenanceStartTimeResponse+--+-- , responseDescribeNFSFileShares $+-- newDescribeNFSFileSharesResponse+--+-- , responseDescribeSMBFileShares $+-- newDescribeSMBFileSharesResponse+--+-- , responseDescribeSMBSettings $+-- newDescribeSMBSettingsResponse+--+-- , responseDescribeSnapshotSchedule $+-- newDescribeSnapshotScheduleResponse+--+-- , responseDescribeStorediSCSIVolumes $+-- newDescribeStorediSCSIVolumesResponse+--+-- , responseDescribeTapeArchives $+-- newDescribeTapeArchivesResponse+--+-- , responseDescribeTapeRecoveryPoints $+-- newDescribeTapeRecoveryPointsResponse+--+-- , responseDescribeTapes $+-- newDescribeTapesResponse+--+-- , responseDescribeUploadBuffer $+-- newDescribeUploadBufferResponse+--+-- , responseDescribeVTLDevices $+-- newDescribeVTLDevicesResponse+--+-- , responseDescribeWorkingStorage $+-- newDescribeWorkingStorageResponse+--+-- , responseDetachVolume $+-- newDetachVolumeResponse+--+-- , responseDisableGateway $+-- newDisableGatewayResponse+--+-- , responseDisassociateFileSystem $+-- newDisassociateFileSystemResponse+--+-- , responseJoinDomain $+-- newJoinDomainResponse+--+-- , responseListAutomaticTapeCreationPolicies $+-- newListAutomaticTapeCreationPoliciesResponse+--+-- , responseListFileShares $+-- newListFileSharesResponse+--+-- , responseListFileSystemAssociations $+-- newListFileSystemAssociationsResponse+--+-- , responseListGateways $+-- newListGatewaysResponse+--+-- , responseListLocalDisks $+-- newListLocalDisksResponse+--+-- , responseListTagsForResource $+-- newListTagsForResourceResponse+--+-- , responseListTapePools $+-- newListTapePoolsResponse+--+-- , responseListTapes $+-- newListTapesResponse+--+-- , responseListVolumeInitiators $+-- newListVolumeInitiatorsResponse+--+-- , responseListVolumeRecoveryPoints $+-- newListVolumeRecoveryPointsResponse+--+-- , responseListVolumes $+-- newListVolumesResponse+--+-- , responseNotifyWhenUploaded $+-- newNotifyWhenUploadedResponse+--+-- , responseRefreshCache $+-- newRefreshCacheResponse+--+-- , responseRemoveTagsFromResource $+-- newRemoveTagsFromResourceResponse+--+-- , responseResetCache $+-- newResetCacheResponse+--+-- , responseRetrieveTapeArchive $+-- newRetrieveTapeArchiveResponse+--+-- , responseRetrieveTapeRecoveryPoint $+-- newRetrieveTapeRecoveryPointResponse+--+-- , responseSetLocalConsolePassword $+-- newSetLocalConsolePasswordResponse+--+-- , responseSetSMBGuestPassword $+-- newSetSMBGuestPasswordResponse+--+-- , responseShutdownGateway $+-- newShutdownGatewayResponse+--+-- , responseStartAvailabilityMonitorTest $+-- newStartAvailabilityMonitorTestResponse+--+-- , responseStartGateway $+-- newStartGatewayResponse+--+-- , responseUpdateAutomaticTapeCreationPolicy $+-- newUpdateAutomaticTapeCreationPolicyResponse+--+-- , responseUpdateBandwidthRateLimit $+-- newUpdateBandwidthRateLimitResponse+--+-- , responseUpdateBandwidthRateLimitSchedule $+-- newUpdateBandwidthRateLimitScheduleResponse+--+-- , responseUpdateChapCredentials $+-- newUpdateChapCredentialsResponse+--+-- , responseUpdateFileSystemAssociation $+-- newUpdateFileSystemAssociationResponse+--+-- , responseUpdateGatewayInformation $+-- newUpdateGatewayInformationResponse+--+-- , responseUpdateGatewaySoftwareNow $+-- newUpdateGatewaySoftwareNowResponse+--+-- , responseUpdateMaintenanceStartTime $+-- newUpdateMaintenanceStartTimeResponse+--+-- , responseUpdateNFSFileShare $+-- newUpdateNFSFileShareResponse+--+-- , responseUpdateSMBFileShare $+-- newUpdateSMBFileShareResponse+--+-- , responseUpdateSMBFileShareVisibility $+-- newUpdateSMBFileShareVisibilityResponse+--+-- , responseUpdateSMBLocalGroups $+-- newUpdateSMBLocalGroupsResponse+--+-- , responseUpdateSMBSecurityStrategy $+-- newUpdateSMBSecurityStrategyResponse+--+-- , responseUpdateSnapshotSchedule $+-- newUpdateSnapshotScheduleResponse+--+-- , responseUpdateVTLDeviceType $+-- newUpdateVTLDeviceTypeResponse+--+-- ]+-- ]++-- Requests++requestActivateGateway :: ActivateGateway -> TestTree+requestActivateGateway =+ req+ "ActivateGateway"+ "fixture/ActivateGateway.yaml"++requestAddCache :: AddCache -> TestTree+requestAddCache =+ req+ "AddCache"+ "fixture/AddCache.yaml"++requestAddTagsToResource :: AddTagsToResource -> TestTree+requestAddTagsToResource =+ req+ "AddTagsToResource"+ "fixture/AddTagsToResource.yaml"++requestAddUploadBuffer :: AddUploadBuffer -> TestTree+requestAddUploadBuffer =+ req+ "AddUploadBuffer"+ "fixture/AddUploadBuffer.yaml"++requestAddWorkingStorage :: AddWorkingStorage -> TestTree+requestAddWorkingStorage =+ req+ "AddWorkingStorage"+ "fixture/AddWorkingStorage.yaml"++requestAssignTapePool :: AssignTapePool -> TestTree+requestAssignTapePool =+ req+ "AssignTapePool"+ "fixture/AssignTapePool.yaml"++requestAssociateFileSystem :: AssociateFileSystem -> TestTree+requestAssociateFileSystem =+ req+ "AssociateFileSystem"+ "fixture/AssociateFileSystem.yaml"++requestAttachVolume :: AttachVolume -> TestTree+requestAttachVolume =+ req+ "AttachVolume"+ "fixture/AttachVolume.yaml"++requestCancelArchival :: CancelArchival -> TestTree+requestCancelArchival =+ req+ "CancelArchival"+ "fixture/CancelArchival.yaml"++requestCancelRetrieval :: CancelRetrieval -> TestTree+requestCancelRetrieval =+ req+ "CancelRetrieval"+ "fixture/CancelRetrieval.yaml"++requestCreateCachediSCSIVolume :: CreateCachediSCSIVolume -> TestTree+requestCreateCachediSCSIVolume =+ req+ "CreateCachediSCSIVolume"+ "fixture/CreateCachediSCSIVolume.yaml"++requestCreateNFSFileShare :: CreateNFSFileShare -> TestTree+requestCreateNFSFileShare =+ req+ "CreateNFSFileShare"+ "fixture/CreateNFSFileShare.yaml"++requestCreateSMBFileShare :: CreateSMBFileShare -> TestTree+requestCreateSMBFileShare =+ req+ "CreateSMBFileShare"+ "fixture/CreateSMBFileShare.yaml"++requestCreateSnapshot :: CreateSnapshot -> TestTree+requestCreateSnapshot =+ req+ "CreateSnapshot"+ "fixture/CreateSnapshot.yaml"++requestCreateSnapshotFromVolumeRecoveryPoint :: CreateSnapshotFromVolumeRecoveryPoint -> TestTree+requestCreateSnapshotFromVolumeRecoveryPoint =+ req+ "CreateSnapshotFromVolumeRecoveryPoint"+ "fixture/CreateSnapshotFromVolumeRecoveryPoint.yaml"++requestCreateStorediSCSIVolume :: CreateStorediSCSIVolume -> TestTree+requestCreateStorediSCSIVolume =+ req+ "CreateStorediSCSIVolume"+ "fixture/CreateStorediSCSIVolume.yaml"++requestCreateTapePool :: CreateTapePool -> TestTree+requestCreateTapePool =+ req+ "CreateTapePool"+ "fixture/CreateTapePool.yaml"++requestCreateTapeWithBarcode :: CreateTapeWithBarcode -> TestTree+requestCreateTapeWithBarcode =+ req+ "CreateTapeWithBarcode"+ "fixture/CreateTapeWithBarcode.yaml"++requestCreateTapes :: CreateTapes -> TestTree+requestCreateTapes =+ req+ "CreateTapes"+ "fixture/CreateTapes.yaml"++requestDeleteAutomaticTapeCreationPolicy :: DeleteAutomaticTapeCreationPolicy -> TestTree+requestDeleteAutomaticTapeCreationPolicy =+ req+ "DeleteAutomaticTapeCreationPolicy"+ "fixture/DeleteAutomaticTapeCreationPolicy.yaml"++requestDeleteBandwidthRateLimit :: DeleteBandwidthRateLimit -> TestTree+requestDeleteBandwidthRateLimit =+ req+ "DeleteBandwidthRateLimit"+ "fixture/DeleteBandwidthRateLimit.yaml"++requestDeleteChapCredentials :: DeleteChapCredentials -> TestTree+requestDeleteChapCredentials =+ req+ "DeleteChapCredentials"+ "fixture/DeleteChapCredentials.yaml"++requestDeleteFileShare :: DeleteFileShare -> TestTree+requestDeleteFileShare =+ req+ "DeleteFileShare"+ "fixture/DeleteFileShare.yaml"++requestDeleteGateway :: DeleteGateway -> TestTree+requestDeleteGateway =+ req+ "DeleteGateway"+ "fixture/DeleteGateway.yaml"++requestDeleteSnapshotSchedule :: DeleteSnapshotSchedule -> TestTree+requestDeleteSnapshotSchedule =+ req+ "DeleteSnapshotSchedule"+ "fixture/DeleteSnapshotSchedule.yaml"++requestDeleteTape :: DeleteTape -> TestTree+requestDeleteTape =+ req+ "DeleteTape"+ "fixture/DeleteTape.yaml"++requestDeleteTapeArchive :: DeleteTapeArchive -> TestTree+requestDeleteTapeArchive =+ req+ "DeleteTapeArchive"+ "fixture/DeleteTapeArchive.yaml"++requestDeleteTapePool :: DeleteTapePool -> TestTree+requestDeleteTapePool =+ req+ "DeleteTapePool"+ "fixture/DeleteTapePool.yaml"++requestDeleteVolume :: DeleteVolume -> TestTree+requestDeleteVolume =+ req+ "DeleteVolume"+ "fixture/DeleteVolume.yaml"++requestDescribeAvailabilityMonitorTest :: DescribeAvailabilityMonitorTest -> TestTree+requestDescribeAvailabilityMonitorTest =+ req+ "DescribeAvailabilityMonitorTest"+ "fixture/DescribeAvailabilityMonitorTest.yaml"++requestDescribeBandwidthRateLimit :: DescribeBandwidthRateLimit -> TestTree+requestDescribeBandwidthRateLimit =+ req+ "DescribeBandwidthRateLimit"+ "fixture/DescribeBandwidthRateLimit.yaml"++requestDescribeBandwidthRateLimitSchedule :: DescribeBandwidthRateLimitSchedule -> TestTree+requestDescribeBandwidthRateLimitSchedule =+ req+ "DescribeBandwidthRateLimitSchedule"+ "fixture/DescribeBandwidthRateLimitSchedule.yaml"++requestDescribeCache :: DescribeCache -> TestTree+requestDescribeCache =+ req+ "DescribeCache"+ "fixture/DescribeCache.yaml"++requestDescribeCachediSCSIVolumes :: DescribeCachediSCSIVolumes -> TestTree+requestDescribeCachediSCSIVolumes =+ req+ "DescribeCachediSCSIVolumes"+ "fixture/DescribeCachediSCSIVolumes.yaml"++requestDescribeChapCredentials :: DescribeChapCredentials -> TestTree+requestDescribeChapCredentials =+ req+ "DescribeChapCredentials"+ "fixture/DescribeChapCredentials.yaml"++requestDescribeFileSystemAssociations :: DescribeFileSystemAssociations -> TestTree+requestDescribeFileSystemAssociations =+ req+ "DescribeFileSystemAssociations"+ "fixture/DescribeFileSystemAssociations.yaml"++requestDescribeGatewayInformation :: DescribeGatewayInformation -> TestTree+requestDescribeGatewayInformation =+ req+ "DescribeGatewayInformation"+ "fixture/DescribeGatewayInformation.yaml"++requestDescribeMaintenanceStartTime :: DescribeMaintenanceStartTime -> TestTree+requestDescribeMaintenanceStartTime =+ req+ "DescribeMaintenanceStartTime"+ "fixture/DescribeMaintenanceStartTime.yaml"++requestDescribeNFSFileShares :: DescribeNFSFileShares -> TestTree+requestDescribeNFSFileShares =+ req+ "DescribeNFSFileShares"+ "fixture/DescribeNFSFileShares.yaml"++requestDescribeSMBFileShares :: DescribeSMBFileShares -> TestTree+requestDescribeSMBFileShares =+ req+ "DescribeSMBFileShares"+ "fixture/DescribeSMBFileShares.yaml"++requestDescribeSMBSettings :: DescribeSMBSettings -> TestTree+requestDescribeSMBSettings =+ req+ "DescribeSMBSettings"+ "fixture/DescribeSMBSettings.yaml"++requestDescribeSnapshotSchedule :: DescribeSnapshotSchedule -> TestTree+requestDescribeSnapshotSchedule =+ req+ "DescribeSnapshotSchedule"+ "fixture/DescribeSnapshotSchedule.yaml"++requestDescribeStorediSCSIVolumes :: DescribeStorediSCSIVolumes -> TestTree+requestDescribeStorediSCSIVolumes =+ req+ "DescribeStorediSCSIVolumes"+ "fixture/DescribeStorediSCSIVolumes.yaml"++requestDescribeTapeArchives :: DescribeTapeArchives -> TestTree+requestDescribeTapeArchives =+ req+ "DescribeTapeArchives"+ "fixture/DescribeTapeArchives.yaml"++requestDescribeTapeRecoveryPoints :: DescribeTapeRecoveryPoints -> TestTree+requestDescribeTapeRecoveryPoints =+ req+ "DescribeTapeRecoveryPoints"+ "fixture/DescribeTapeRecoveryPoints.yaml"++requestDescribeTapes :: DescribeTapes -> TestTree+requestDescribeTapes =+ req+ "DescribeTapes"+ "fixture/DescribeTapes.yaml"++requestDescribeUploadBuffer :: DescribeUploadBuffer -> TestTree+requestDescribeUploadBuffer =+ req+ "DescribeUploadBuffer"+ "fixture/DescribeUploadBuffer.yaml"++requestDescribeVTLDevices :: DescribeVTLDevices -> TestTree+requestDescribeVTLDevices =+ req+ "DescribeVTLDevices"+ "fixture/DescribeVTLDevices.yaml"++requestDescribeWorkingStorage :: DescribeWorkingStorage -> TestTree+requestDescribeWorkingStorage =+ req+ "DescribeWorkingStorage"+ "fixture/DescribeWorkingStorage.yaml"++requestDetachVolume :: DetachVolume -> TestTree+requestDetachVolume =+ req+ "DetachVolume"+ "fixture/DetachVolume.yaml"++requestDisableGateway :: DisableGateway -> TestTree+requestDisableGateway =+ req+ "DisableGateway"+ "fixture/DisableGateway.yaml"++requestDisassociateFileSystem :: DisassociateFileSystem -> TestTree+requestDisassociateFileSystem =+ req+ "DisassociateFileSystem"+ "fixture/DisassociateFileSystem.yaml"++requestJoinDomain :: JoinDomain -> TestTree+requestJoinDomain =+ req+ "JoinDomain"+ "fixture/JoinDomain.yaml"++requestListAutomaticTapeCreationPolicies :: ListAutomaticTapeCreationPolicies -> TestTree+requestListAutomaticTapeCreationPolicies =+ req+ "ListAutomaticTapeCreationPolicies"+ "fixture/ListAutomaticTapeCreationPolicies.yaml"++requestListFileShares :: ListFileShares -> TestTree+requestListFileShares =+ req+ "ListFileShares"+ "fixture/ListFileShares.yaml"++requestListFileSystemAssociations :: ListFileSystemAssociations -> TestTree+requestListFileSystemAssociations =+ req+ "ListFileSystemAssociations"+ "fixture/ListFileSystemAssociations.yaml"++requestListGateways :: ListGateways -> TestTree+requestListGateways =+ req+ "ListGateways"+ "fixture/ListGateways.yaml"++requestListLocalDisks :: ListLocalDisks -> TestTree+requestListLocalDisks =+ req+ "ListLocalDisks"+ "fixture/ListLocalDisks.yaml"++requestListTagsForResource :: ListTagsForResource -> TestTree+requestListTagsForResource =+ req+ "ListTagsForResource"+ "fixture/ListTagsForResource.yaml"++requestListTapePools :: ListTapePools -> TestTree+requestListTapePools =+ req+ "ListTapePools"+ "fixture/ListTapePools.yaml"++requestListTapes :: ListTapes -> TestTree+requestListTapes =+ req+ "ListTapes"+ "fixture/ListTapes.yaml"++requestListVolumeInitiators :: ListVolumeInitiators -> TestTree+requestListVolumeInitiators =+ req+ "ListVolumeInitiators"+ "fixture/ListVolumeInitiators.yaml"++requestListVolumeRecoveryPoints :: ListVolumeRecoveryPoints -> TestTree+requestListVolumeRecoveryPoints =+ req+ "ListVolumeRecoveryPoints"+ "fixture/ListVolumeRecoveryPoints.yaml"++requestListVolumes :: ListVolumes -> TestTree+requestListVolumes =+ req+ "ListVolumes"+ "fixture/ListVolumes.yaml"++requestNotifyWhenUploaded :: NotifyWhenUploaded -> TestTree+requestNotifyWhenUploaded =+ req+ "NotifyWhenUploaded"+ "fixture/NotifyWhenUploaded.yaml"++requestRefreshCache :: RefreshCache -> TestTree+requestRefreshCache =+ req+ "RefreshCache"+ "fixture/RefreshCache.yaml"++requestRemoveTagsFromResource :: RemoveTagsFromResource -> TestTree+requestRemoveTagsFromResource =+ req+ "RemoveTagsFromResource"+ "fixture/RemoveTagsFromResource.yaml"++requestResetCache :: ResetCache -> TestTree+requestResetCache =+ req+ "ResetCache"+ "fixture/ResetCache.yaml"++requestRetrieveTapeArchive :: RetrieveTapeArchive -> TestTree+requestRetrieveTapeArchive =+ req+ "RetrieveTapeArchive"+ "fixture/RetrieveTapeArchive.yaml"++requestRetrieveTapeRecoveryPoint :: RetrieveTapeRecoveryPoint -> TestTree+requestRetrieveTapeRecoveryPoint =+ req+ "RetrieveTapeRecoveryPoint"+ "fixture/RetrieveTapeRecoveryPoint.yaml"++requestSetLocalConsolePassword :: SetLocalConsolePassword -> TestTree+requestSetLocalConsolePassword =+ req+ "SetLocalConsolePassword"+ "fixture/SetLocalConsolePassword.yaml"++requestSetSMBGuestPassword :: SetSMBGuestPassword -> TestTree+requestSetSMBGuestPassword =+ req+ "SetSMBGuestPassword"+ "fixture/SetSMBGuestPassword.yaml"++requestShutdownGateway :: ShutdownGateway -> TestTree+requestShutdownGateway =+ req+ "ShutdownGateway"+ "fixture/ShutdownGateway.yaml"++requestStartAvailabilityMonitorTest :: StartAvailabilityMonitorTest -> TestTree+requestStartAvailabilityMonitorTest =+ req+ "StartAvailabilityMonitorTest"+ "fixture/StartAvailabilityMonitorTest.yaml"++requestStartGateway :: StartGateway -> TestTree+requestStartGateway =+ req+ "StartGateway"+ "fixture/StartGateway.yaml"++requestUpdateAutomaticTapeCreationPolicy :: UpdateAutomaticTapeCreationPolicy -> TestTree+requestUpdateAutomaticTapeCreationPolicy =+ req+ "UpdateAutomaticTapeCreationPolicy"+ "fixture/UpdateAutomaticTapeCreationPolicy.yaml"++requestUpdateBandwidthRateLimit :: UpdateBandwidthRateLimit -> TestTree+requestUpdateBandwidthRateLimit =+ req+ "UpdateBandwidthRateLimit"+ "fixture/UpdateBandwidthRateLimit.yaml"++requestUpdateBandwidthRateLimitSchedule :: UpdateBandwidthRateLimitSchedule -> TestTree+requestUpdateBandwidthRateLimitSchedule =+ req+ "UpdateBandwidthRateLimitSchedule"+ "fixture/UpdateBandwidthRateLimitSchedule.yaml"++requestUpdateChapCredentials :: UpdateChapCredentials -> TestTree+requestUpdateChapCredentials =+ req+ "UpdateChapCredentials"+ "fixture/UpdateChapCredentials.yaml"++requestUpdateFileSystemAssociation :: UpdateFileSystemAssociation -> TestTree+requestUpdateFileSystemAssociation =+ req+ "UpdateFileSystemAssociation"+ "fixture/UpdateFileSystemAssociation.yaml"++requestUpdateGatewayInformation :: UpdateGatewayInformation -> TestTree+requestUpdateGatewayInformation =+ req+ "UpdateGatewayInformation"+ "fixture/UpdateGatewayInformation.yaml"++requestUpdateGatewaySoftwareNow :: UpdateGatewaySoftwareNow -> TestTree+requestUpdateGatewaySoftwareNow =+ req+ "UpdateGatewaySoftwareNow"+ "fixture/UpdateGatewaySoftwareNow.yaml"++requestUpdateMaintenanceStartTime :: UpdateMaintenanceStartTime -> TestTree+requestUpdateMaintenanceStartTime =+ req+ "UpdateMaintenanceStartTime"+ "fixture/UpdateMaintenanceStartTime.yaml"++requestUpdateNFSFileShare :: UpdateNFSFileShare -> TestTree+requestUpdateNFSFileShare =+ req+ "UpdateNFSFileShare"+ "fixture/UpdateNFSFileShare.yaml"++requestUpdateSMBFileShare :: UpdateSMBFileShare -> TestTree+requestUpdateSMBFileShare =+ req+ "UpdateSMBFileShare"+ "fixture/UpdateSMBFileShare.yaml"++requestUpdateSMBFileShareVisibility :: UpdateSMBFileShareVisibility -> TestTree+requestUpdateSMBFileShareVisibility =+ req+ "UpdateSMBFileShareVisibility"+ "fixture/UpdateSMBFileShareVisibility.yaml"++requestUpdateSMBLocalGroups :: UpdateSMBLocalGroups -> TestTree+requestUpdateSMBLocalGroups =+ req+ "UpdateSMBLocalGroups"+ "fixture/UpdateSMBLocalGroups.yaml"++requestUpdateSMBSecurityStrategy :: UpdateSMBSecurityStrategy -> TestTree+requestUpdateSMBSecurityStrategy =+ req+ "UpdateSMBSecurityStrategy"+ "fixture/UpdateSMBSecurityStrategy.yaml"++requestUpdateSnapshotSchedule :: UpdateSnapshotSchedule -> TestTree+requestUpdateSnapshotSchedule =+ req+ "UpdateSnapshotSchedule"+ "fixture/UpdateSnapshotSchedule.yaml"++requestUpdateVTLDeviceType :: UpdateVTLDeviceType -> TestTree+requestUpdateVTLDeviceType =+ req+ "UpdateVTLDeviceType"+ "fixture/UpdateVTLDeviceType.yaml"++-- Responses++responseActivateGateway :: ActivateGatewayResponse -> TestTree+responseActivateGateway =+ res+ "ActivateGatewayResponse"+ "fixture/ActivateGatewayResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy ActivateGateway)++responseAddCache :: AddCacheResponse -> TestTree+responseAddCache =+ res+ "AddCacheResponse"+ "fixture/AddCacheResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy AddCache)++responseAddTagsToResource :: AddTagsToResourceResponse -> TestTree+responseAddTagsToResource =+ res+ "AddTagsToResourceResponse"+ "fixture/AddTagsToResourceResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy AddTagsToResource)++responseAddUploadBuffer :: AddUploadBufferResponse -> TestTree+responseAddUploadBuffer =+ res+ "AddUploadBufferResponse"+ "fixture/AddUploadBufferResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy AddUploadBuffer)++responseAddWorkingStorage :: AddWorkingStorageResponse -> TestTree+responseAddWorkingStorage =+ res+ "AddWorkingStorageResponse"+ "fixture/AddWorkingStorageResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy AddWorkingStorage)++responseAssignTapePool :: AssignTapePoolResponse -> TestTree+responseAssignTapePool =+ res+ "AssignTapePoolResponse"+ "fixture/AssignTapePoolResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy AssignTapePool)++responseAssociateFileSystem :: AssociateFileSystemResponse -> TestTree+responseAssociateFileSystem =+ res+ "AssociateFileSystemResponse"+ "fixture/AssociateFileSystemResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy AssociateFileSystem)++responseAttachVolume :: AttachVolumeResponse -> TestTree+responseAttachVolume =+ res+ "AttachVolumeResponse"+ "fixture/AttachVolumeResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy AttachVolume)++responseCancelArchival :: CancelArchivalResponse -> TestTree+responseCancelArchival =+ res+ "CancelArchivalResponse"+ "fixture/CancelArchivalResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy CancelArchival)++responseCancelRetrieval :: CancelRetrievalResponse -> TestTree+responseCancelRetrieval =+ res+ "CancelRetrievalResponse"+ "fixture/CancelRetrievalResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy CancelRetrieval)++responseCreateCachediSCSIVolume :: CreateCachediSCSIVolumeResponse -> TestTree+responseCreateCachediSCSIVolume =+ res+ "CreateCachediSCSIVolumeResponse"+ "fixture/CreateCachediSCSIVolumeResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy CreateCachediSCSIVolume)++responseCreateNFSFileShare :: CreateNFSFileShareResponse -> TestTree+responseCreateNFSFileShare =+ res+ "CreateNFSFileShareResponse"+ "fixture/CreateNFSFileShareResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy CreateNFSFileShare)++responseCreateSMBFileShare :: CreateSMBFileShareResponse -> TestTree+responseCreateSMBFileShare =+ res+ "CreateSMBFileShareResponse"+ "fixture/CreateSMBFileShareResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy CreateSMBFileShare)++responseCreateSnapshot :: CreateSnapshotResponse -> TestTree+responseCreateSnapshot =+ res+ "CreateSnapshotResponse"+ "fixture/CreateSnapshotResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy CreateSnapshot)++responseCreateSnapshotFromVolumeRecoveryPoint :: CreateSnapshotFromVolumeRecoveryPointResponse -> TestTree+responseCreateSnapshotFromVolumeRecoveryPoint =+ res+ "CreateSnapshotFromVolumeRecoveryPointResponse"+ "fixture/CreateSnapshotFromVolumeRecoveryPointResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy CreateSnapshotFromVolumeRecoveryPoint)++responseCreateStorediSCSIVolume :: CreateStorediSCSIVolumeResponse -> TestTree+responseCreateStorediSCSIVolume =+ res+ "CreateStorediSCSIVolumeResponse"+ "fixture/CreateStorediSCSIVolumeResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy CreateStorediSCSIVolume)++responseCreateTapePool :: CreateTapePoolResponse -> TestTree+responseCreateTapePool =+ res+ "CreateTapePoolResponse"+ "fixture/CreateTapePoolResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy CreateTapePool)++responseCreateTapeWithBarcode :: CreateTapeWithBarcodeResponse -> TestTree+responseCreateTapeWithBarcode =+ res+ "CreateTapeWithBarcodeResponse"+ "fixture/CreateTapeWithBarcodeResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy CreateTapeWithBarcode)++responseCreateTapes :: CreateTapesResponse -> TestTree+responseCreateTapes =+ res+ "CreateTapesResponse"+ "fixture/CreateTapesResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy CreateTapes)++responseDeleteAutomaticTapeCreationPolicy :: DeleteAutomaticTapeCreationPolicyResponse -> TestTree+responseDeleteAutomaticTapeCreationPolicy =+ res+ "DeleteAutomaticTapeCreationPolicyResponse"+ "fixture/DeleteAutomaticTapeCreationPolicyResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy DeleteAutomaticTapeCreationPolicy)++responseDeleteBandwidthRateLimit :: DeleteBandwidthRateLimitResponse -> TestTree+responseDeleteBandwidthRateLimit =+ res+ "DeleteBandwidthRateLimitResponse"+ "fixture/DeleteBandwidthRateLimitResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy DeleteBandwidthRateLimit)++responseDeleteChapCredentials :: DeleteChapCredentialsResponse -> TestTree+responseDeleteChapCredentials =+ res+ "DeleteChapCredentialsResponse"+ "fixture/DeleteChapCredentialsResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy DeleteChapCredentials)++responseDeleteFileShare :: DeleteFileShareResponse -> TestTree+responseDeleteFileShare =+ res+ "DeleteFileShareResponse"+ "fixture/DeleteFileShareResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy DeleteFileShare)++responseDeleteGateway :: DeleteGatewayResponse -> TestTree+responseDeleteGateway =+ res+ "DeleteGatewayResponse"+ "fixture/DeleteGatewayResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy DeleteGateway)++responseDeleteSnapshotSchedule :: DeleteSnapshotScheduleResponse -> TestTree+responseDeleteSnapshotSchedule =+ res+ "DeleteSnapshotScheduleResponse"+ "fixture/DeleteSnapshotScheduleResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy DeleteSnapshotSchedule)++responseDeleteTape :: DeleteTapeResponse -> TestTree+responseDeleteTape =+ res+ "DeleteTapeResponse"+ "fixture/DeleteTapeResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy DeleteTape)++responseDeleteTapeArchive :: DeleteTapeArchiveResponse -> TestTree+responseDeleteTapeArchive =+ res+ "DeleteTapeArchiveResponse"+ "fixture/DeleteTapeArchiveResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy DeleteTapeArchive)++responseDeleteTapePool :: DeleteTapePoolResponse -> TestTree+responseDeleteTapePool =+ res+ "DeleteTapePoolResponse"+ "fixture/DeleteTapePoolResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy DeleteTapePool)++responseDeleteVolume :: DeleteVolumeResponse -> TestTree+responseDeleteVolume =+ res+ "DeleteVolumeResponse"+ "fixture/DeleteVolumeResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy DeleteVolume)++responseDescribeAvailabilityMonitorTest :: DescribeAvailabilityMonitorTestResponse -> TestTree+responseDescribeAvailabilityMonitorTest =+ res+ "DescribeAvailabilityMonitorTestResponse"+ "fixture/DescribeAvailabilityMonitorTestResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy DescribeAvailabilityMonitorTest)++responseDescribeBandwidthRateLimit :: DescribeBandwidthRateLimitResponse -> TestTree+responseDescribeBandwidthRateLimit =+ res+ "DescribeBandwidthRateLimitResponse"+ "fixture/DescribeBandwidthRateLimitResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy DescribeBandwidthRateLimit)++responseDescribeBandwidthRateLimitSchedule :: DescribeBandwidthRateLimitScheduleResponse -> TestTree+responseDescribeBandwidthRateLimitSchedule =+ res+ "DescribeBandwidthRateLimitScheduleResponse"+ "fixture/DescribeBandwidthRateLimitScheduleResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy DescribeBandwidthRateLimitSchedule)++responseDescribeCache :: DescribeCacheResponse -> TestTree+responseDescribeCache =+ res+ "DescribeCacheResponse"+ "fixture/DescribeCacheResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy DescribeCache)++responseDescribeCachediSCSIVolumes :: DescribeCachediSCSIVolumesResponse -> TestTree+responseDescribeCachediSCSIVolumes =+ res+ "DescribeCachediSCSIVolumesResponse"+ "fixture/DescribeCachediSCSIVolumesResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy DescribeCachediSCSIVolumes)++responseDescribeChapCredentials :: DescribeChapCredentialsResponse -> TestTree+responseDescribeChapCredentials =+ res+ "DescribeChapCredentialsResponse"+ "fixture/DescribeChapCredentialsResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy DescribeChapCredentials)++responseDescribeFileSystemAssociations :: DescribeFileSystemAssociationsResponse -> TestTree+responseDescribeFileSystemAssociations =+ res+ "DescribeFileSystemAssociationsResponse"+ "fixture/DescribeFileSystemAssociationsResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy DescribeFileSystemAssociations)++responseDescribeGatewayInformation :: DescribeGatewayInformationResponse -> TestTree+responseDescribeGatewayInformation =+ res+ "DescribeGatewayInformationResponse"+ "fixture/DescribeGatewayInformationResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy DescribeGatewayInformation)++responseDescribeMaintenanceStartTime :: DescribeMaintenanceStartTimeResponse -> TestTree+responseDescribeMaintenanceStartTime =+ res+ "DescribeMaintenanceStartTimeResponse"+ "fixture/DescribeMaintenanceStartTimeResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy DescribeMaintenanceStartTime)++responseDescribeNFSFileShares :: DescribeNFSFileSharesResponse -> TestTree+responseDescribeNFSFileShares =+ res+ "DescribeNFSFileSharesResponse"+ "fixture/DescribeNFSFileSharesResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy DescribeNFSFileShares)++responseDescribeSMBFileShares :: DescribeSMBFileSharesResponse -> TestTree+responseDescribeSMBFileShares =+ res+ "DescribeSMBFileSharesResponse"+ "fixture/DescribeSMBFileSharesResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy DescribeSMBFileShares)++responseDescribeSMBSettings :: DescribeSMBSettingsResponse -> TestTree+responseDescribeSMBSettings =+ res+ "DescribeSMBSettingsResponse"+ "fixture/DescribeSMBSettingsResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy DescribeSMBSettings)++responseDescribeSnapshotSchedule :: DescribeSnapshotScheduleResponse -> TestTree+responseDescribeSnapshotSchedule =+ res+ "DescribeSnapshotScheduleResponse"+ "fixture/DescribeSnapshotScheduleResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy DescribeSnapshotSchedule)++responseDescribeStorediSCSIVolumes :: DescribeStorediSCSIVolumesResponse -> TestTree+responseDescribeStorediSCSIVolumes =+ res+ "DescribeStorediSCSIVolumesResponse"+ "fixture/DescribeStorediSCSIVolumesResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy DescribeStorediSCSIVolumes)++responseDescribeTapeArchives :: DescribeTapeArchivesResponse -> TestTree+responseDescribeTapeArchives =+ res+ "DescribeTapeArchivesResponse"+ "fixture/DescribeTapeArchivesResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy DescribeTapeArchives)++responseDescribeTapeRecoveryPoints :: DescribeTapeRecoveryPointsResponse -> TestTree+responseDescribeTapeRecoveryPoints =+ res+ "DescribeTapeRecoveryPointsResponse"+ "fixture/DescribeTapeRecoveryPointsResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy DescribeTapeRecoveryPoints)++responseDescribeTapes :: DescribeTapesResponse -> TestTree+responseDescribeTapes =+ res+ "DescribeTapesResponse"+ "fixture/DescribeTapesResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy DescribeTapes)++responseDescribeUploadBuffer :: DescribeUploadBufferResponse -> TestTree+responseDescribeUploadBuffer =+ res+ "DescribeUploadBufferResponse"+ "fixture/DescribeUploadBufferResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy DescribeUploadBuffer)++responseDescribeVTLDevices :: DescribeVTLDevicesResponse -> TestTree+responseDescribeVTLDevices =+ res+ "DescribeVTLDevicesResponse"+ "fixture/DescribeVTLDevicesResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy DescribeVTLDevices)++responseDescribeWorkingStorage :: DescribeWorkingStorageResponse -> TestTree+responseDescribeWorkingStorage =+ res+ "DescribeWorkingStorageResponse"+ "fixture/DescribeWorkingStorageResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy DescribeWorkingStorage)++responseDetachVolume :: DetachVolumeResponse -> TestTree+responseDetachVolume =+ res+ "DetachVolumeResponse"+ "fixture/DetachVolumeResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy DetachVolume)++responseDisableGateway :: DisableGatewayResponse -> TestTree+responseDisableGateway =+ res+ "DisableGatewayResponse"+ "fixture/DisableGatewayResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy DisableGateway)++responseDisassociateFileSystem :: DisassociateFileSystemResponse -> TestTree+responseDisassociateFileSystem =+ res+ "DisassociateFileSystemResponse"+ "fixture/DisassociateFileSystemResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy DisassociateFileSystem)++responseJoinDomain :: JoinDomainResponse -> TestTree+responseJoinDomain =+ res+ "JoinDomainResponse"+ "fixture/JoinDomainResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy JoinDomain)++responseListAutomaticTapeCreationPolicies :: ListAutomaticTapeCreationPoliciesResponse -> TestTree+responseListAutomaticTapeCreationPolicies =+ res+ "ListAutomaticTapeCreationPoliciesResponse"+ "fixture/ListAutomaticTapeCreationPoliciesResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy ListAutomaticTapeCreationPolicies)++responseListFileShares :: ListFileSharesResponse -> TestTree+responseListFileShares =+ res+ "ListFileSharesResponse"+ "fixture/ListFileSharesResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy ListFileShares)++responseListFileSystemAssociations :: ListFileSystemAssociationsResponse -> TestTree+responseListFileSystemAssociations =+ res+ "ListFileSystemAssociationsResponse"+ "fixture/ListFileSystemAssociationsResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy ListFileSystemAssociations)++responseListGateways :: ListGatewaysResponse -> TestTree+responseListGateways =+ res+ "ListGatewaysResponse"+ "fixture/ListGatewaysResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy ListGateways)++responseListLocalDisks :: ListLocalDisksResponse -> TestTree+responseListLocalDisks =+ res+ "ListLocalDisksResponse"+ "fixture/ListLocalDisksResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy ListLocalDisks)++responseListTagsForResource :: ListTagsForResourceResponse -> TestTree+responseListTagsForResource =+ res+ "ListTagsForResourceResponse"+ "fixture/ListTagsForResourceResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy ListTagsForResource)++responseListTapePools :: ListTapePoolsResponse -> TestTree+responseListTapePools =+ res+ "ListTapePoolsResponse"+ "fixture/ListTapePoolsResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy ListTapePools)++responseListTapes :: ListTapesResponse -> TestTree+responseListTapes =+ res+ "ListTapesResponse"+ "fixture/ListTapesResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy ListTapes)++responseListVolumeInitiators :: ListVolumeInitiatorsResponse -> TestTree+responseListVolumeInitiators =+ res+ "ListVolumeInitiatorsResponse"+ "fixture/ListVolumeInitiatorsResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy ListVolumeInitiators)++responseListVolumeRecoveryPoints :: ListVolumeRecoveryPointsResponse -> TestTree+responseListVolumeRecoveryPoints =+ res+ "ListVolumeRecoveryPointsResponse"+ "fixture/ListVolumeRecoveryPointsResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy ListVolumeRecoveryPoints)++responseListVolumes :: ListVolumesResponse -> TestTree+responseListVolumes =+ res+ "ListVolumesResponse"+ "fixture/ListVolumesResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy ListVolumes)++responseNotifyWhenUploaded :: NotifyWhenUploadedResponse -> TestTree+responseNotifyWhenUploaded =+ res+ "NotifyWhenUploadedResponse"+ "fixture/NotifyWhenUploadedResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy NotifyWhenUploaded)++responseRefreshCache :: RefreshCacheResponse -> TestTree+responseRefreshCache =+ res+ "RefreshCacheResponse"+ "fixture/RefreshCacheResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy RefreshCache)++responseRemoveTagsFromResource :: RemoveTagsFromResourceResponse -> TestTree+responseRemoveTagsFromResource =+ res+ "RemoveTagsFromResourceResponse"+ "fixture/RemoveTagsFromResourceResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy RemoveTagsFromResource)++responseResetCache :: ResetCacheResponse -> TestTree+responseResetCache =+ res+ "ResetCacheResponse"+ "fixture/ResetCacheResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy ResetCache)++responseRetrieveTapeArchive :: RetrieveTapeArchiveResponse -> TestTree+responseRetrieveTapeArchive =+ res+ "RetrieveTapeArchiveResponse"+ "fixture/RetrieveTapeArchiveResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy RetrieveTapeArchive)++responseRetrieveTapeRecoveryPoint :: RetrieveTapeRecoveryPointResponse -> TestTree+responseRetrieveTapeRecoveryPoint =+ res+ "RetrieveTapeRecoveryPointResponse"+ "fixture/RetrieveTapeRecoveryPointResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy RetrieveTapeRecoveryPoint)++responseSetLocalConsolePassword :: SetLocalConsolePasswordResponse -> TestTree+responseSetLocalConsolePassword =+ res+ "SetLocalConsolePasswordResponse"+ "fixture/SetLocalConsolePasswordResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy SetLocalConsolePassword)++responseSetSMBGuestPassword :: SetSMBGuestPasswordResponse -> TestTree+responseSetSMBGuestPassword =+ res+ "SetSMBGuestPasswordResponse"+ "fixture/SetSMBGuestPasswordResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy SetSMBGuestPassword)++responseShutdownGateway :: ShutdownGatewayResponse -> TestTree+responseShutdownGateway =+ res+ "ShutdownGatewayResponse"+ "fixture/ShutdownGatewayResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy ShutdownGateway)++responseStartAvailabilityMonitorTest :: StartAvailabilityMonitorTestResponse -> TestTree+responseStartAvailabilityMonitorTest =+ res+ "StartAvailabilityMonitorTestResponse"+ "fixture/StartAvailabilityMonitorTestResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy StartAvailabilityMonitorTest)++responseStartGateway :: StartGatewayResponse -> TestTree+responseStartGateway =+ res+ "StartGatewayResponse"+ "fixture/StartGatewayResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy StartGateway)++responseUpdateAutomaticTapeCreationPolicy :: UpdateAutomaticTapeCreationPolicyResponse -> TestTree+responseUpdateAutomaticTapeCreationPolicy =+ res+ "UpdateAutomaticTapeCreationPolicyResponse"+ "fixture/UpdateAutomaticTapeCreationPolicyResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy UpdateAutomaticTapeCreationPolicy)++responseUpdateBandwidthRateLimit :: UpdateBandwidthRateLimitResponse -> TestTree+responseUpdateBandwidthRateLimit =+ res+ "UpdateBandwidthRateLimitResponse"+ "fixture/UpdateBandwidthRateLimitResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy UpdateBandwidthRateLimit)++responseUpdateBandwidthRateLimitSchedule :: UpdateBandwidthRateLimitScheduleResponse -> TestTree+responseUpdateBandwidthRateLimitSchedule =+ res+ "UpdateBandwidthRateLimitScheduleResponse"+ "fixture/UpdateBandwidthRateLimitScheduleResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy UpdateBandwidthRateLimitSchedule)++responseUpdateChapCredentials :: UpdateChapCredentialsResponse -> TestTree+responseUpdateChapCredentials =+ res+ "UpdateChapCredentialsResponse"+ "fixture/UpdateChapCredentialsResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy UpdateChapCredentials)++responseUpdateFileSystemAssociation :: UpdateFileSystemAssociationResponse -> TestTree+responseUpdateFileSystemAssociation =+ res+ "UpdateFileSystemAssociationResponse"+ "fixture/UpdateFileSystemAssociationResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy UpdateFileSystemAssociation)++responseUpdateGatewayInformation :: UpdateGatewayInformationResponse -> TestTree+responseUpdateGatewayInformation =+ res+ "UpdateGatewayInformationResponse"+ "fixture/UpdateGatewayInformationResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy UpdateGatewayInformation)++responseUpdateGatewaySoftwareNow :: UpdateGatewaySoftwareNowResponse -> TestTree+responseUpdateGatewaySoftwareNow =+ res+ "UpdateGatewaySoftwareNowResponse"+ "fixture/UpdateGatewaySoftwareNowResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy UpdateGatewaySoftwareNow)++responseUpdateMaintenanceStartTime :: UpdateMaintenanceStartTimeResponse -> TestTree+responseUpdateMaintenanceStartTime =+ res+ "UpdateMaintenanceStartTimeResponse"+ "fixture/UpdateMaintenanceStartTimeResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy UpdateMaintenanceStartTime)++responseUpdateNFSFileShare :: UpdateNFSFileShareResponse -> TestTree+responseUpdateNFSFileShare =+ res+ "UpdateNFSFileShareResponse"+ "fixture/UpdateNFSFileShareResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy UpdateNFSFileShare)++responseUpdateSMBFileShare :: UpdateSMBFileShareResponse -> TestTree+responseUpdateSMBFileShare =+ res+ "UpdateSMBFileShareResponse"+ "fixture/UpdateSMBFileShareResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy UpdateSMBFileShare)++responseUpdateSMBFileShareVisibility :: UpdateSMBFileShareVisibilityResponse -> TestTree+responseUpdateSMBFileShareVisibility =+ res+ "UpdateSMBFileShareVisibilityResponse"+ "fixture/UpdateSMBFileShareVisibilityResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy UpdateSMBFileShareVisibility)++responseUpdateSMBLocalGroups :: UpdateSMBLocalGroupsResponse -> TestTree+responseUpdateSMBLocalGroups =+ res+ "UpdateSMBLocalGroupsResponse"+ "fixture/UpdateSMBLocalGroupsResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy UpdateSMBLocalGroups)++responseUpdateSMBSecurityStrategy :: UpdateSMBSecurityStrategyResponse -> TestTree+responseUpdateSMBSecurityStrategy =+ res+ "UpdateSMBSecurityStrategyResponse"+ "fixture/UpdateSMBSecurityStrategyResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy UpdateSMBSecurityStrategy)++responseUpdateSnapshotSchedule :: UpdateSnapshotScheduleResponse -> TestTree+responseUpdateSnapshotSchedule =+ res+ "UpdateSnapshotScheduleResponse"+ "fixture/UpdateSnapshotScheduleResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy UpdateSnapshotSchedule)++responseUpdateVTLDeviceType :: UpdateVTLDeviceTypeResponse -> TestTree+responseUpdateVTLDeviceType =+ res+ "UpdateVTLDeviceTypeResponse"+ "fixture/UpdateVTLDeviceTypeResponse.proto"+ defaultService+ (Proxy.Proxy :: Proxy.Proxy UpdateVTLDeviceType)
+ test/Test/Amazonka/StorageGateway.hs view
@@ -0,0 +1,20 @@+-- |+-- Module : Test.Amazonka.StorageGateway+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Test.Amazonka.StorageGateway+ ( tests,+ fixtures,+ )+where++import Test.Tasty (TestTree)++tests :: [TestTree]+tests = []++fixtures :: [TestTree]+fixtures = []
+ test/Test/Amazonka/StorageGateway/Internal.hs view
@@ -0,0 +1,8 @@+-- |+-- Module : Test.Amazonka.StorageGateway.Internal+-- Copyright : (c) 2013-2023 Brendan Hay+-- License : Mozilla Public License, v. 2.0.+-- Maintainer : Brendan Hay+-- Stability : auto-generated+-- Portability : non-portable (GHC extensions)+module Test.Amazonka.StorageGateway.Internal where