amazonka-storagegateway 1.4.0 → 1.4.1

raw patch · 63 files changed

+569/−157 lines, 63 filesdep ~amazonka-coredep ~amazonka-storagegatewaydep ~amazonka-testPVP: major bump suggested

API removals or changes: PVP suggests a major version bump

Dependency ranges changed: amazonka-core, amazonka-storagegateway, amazonka-test

API changes (from Hackage documentation)

Files

• README.md +3/−3
• amazonka-storagegateway.cabal +8/−7
• fixture/SetLocalConsolePassword.yaml +0/−0
• fixture/SetLocalConsolePasswordResponse.proto +0/−0
• gen/Network/AWS/StorageGateway.hs +6/−2
• gen/Network/AWS/StorageGateway/ActivateGateway.hs +12/−9
• gen/Network/AWS/StorageGateway/AddCache.hs +7/−3
• gen/Network/AWS/StorageGateway/AddTagsToResource.hs +7/−3
• gen/Network/AWS/StorageGateway/AddUploadBuffer.hs +6/−2
• gen/Network/AWS/StorageGateway/AddWorkingStorage.hs +8/−4
• gen/Network/AWS/StorageGateway/CancelArchival.hs +4/−0
• gen/Network/AWS/StorageGateway/CancelRetrieval.hs +4/−0
• gen/Network/AWS/StorageGateway/CreateCachediSCSIVolume.hs +6/−3
• gen/Network/AWS/StorageGateway/CreateSnapshot.hs +5/−1
• gen/Network/AWS/StorageGateway/CreateSnapshotFromVolumeRecoveryPoint.hs +7/−3
• gen/Network/AWS/StorageGateway/CreateStorediSCSIVolume.hs +6/−2
• gen/Network/AWS/StorageGateway/CreateTapeWithBarcode.hs +4/−0
• gen/Network/AWS/StorageGateway/CreateTapes.hs +4/−0
• gen/Network/AWS/StorageGateway/DeleteBandwidthRateLimit.hs +9/−5
• gen/Network/AWS/StorageGateway/DeleteChapCredentials.hs +6/−2
• gen/Network/AWS/StorageGateway/DeleteGateway.hs +8/−4
• gen/Network/AWS/StorageGateway/DeleteSnapshotSchedule.hs +8/−4
• gen/Network/AWS/StorageGateway/DeleteTape.hs +4/−0
• gen/Network/AWS/StorageGateway/DeleteTapeArchive.hs +4/−0
• gen/Network/AWS/StorageGateway/DeleteVolume.hs +9/−5
• gen/Network/AWS/StorageGateway/DescribeBandwidthRateLimit.hs +6/−3
• gen/Network/AWS/StorageGateway/DescribeCache.hs +6/−2
• gen/Network/AWS/StorageGateway/DescribeCachediSCSIVolumes.hs +7/−3
• gen/Network/AWS/StorageGateway/DescribeChapCredentials.hs +7/−3
• gen/Network/AWS/StorageGateway/DescribeGatewayInformation.hs +8/−4
• gen/Network/AWS/StorageGateway/DescribeMaintenanceStartTime.hs +7/−3
• gen/Network/AWS/StorageGateway/DescribeSnapshotSchedule.hs +7/−3
• gen/Network/AWS/StorageGateway/DescribeStorediSCSIVolumes.hs +9/−5
• gen/Network/AWS/StorageGateway/DescribeTapeArchives.hs +4/−0
• gen/Network/AWS/StorageGateway/DescribeTapeRecoveryPoints.hs +5/−1
• gen/Network/AWS/StorageGateway/DescribeTapes.hs +4/−0
• gen/Network/AWS/StorageGateway/DescribeUploadBuffer.hs +7/−3
• gen/Network/AWS/StorageGateway/DescribeVTLDevices.hs +4/−0
• gen/Network/AWS/StorageGateway/DescribeWorkingStorage.hs +8/−4
• gen/Network/AWS/StorageGateway/DisableGateway.hs +4/−0
• gen/Network/AWS/StorageGateway/ListGateways.hs +9/−5
• gen/Network/AWS/StorageGateway/ListLocalDisks.hs +7/−3
• gen/Network/AWS/StorageGateway/ListTagsForResource.hs +5/−2
• gen/Network/AWS/StorageGateway/ListVolumeInitiators.hs +6/−3
• gen/Network/AWS/StorageGateway/ListVolumeRecoveryPoints.hs +6/−2
• gen/Network/AWS/StorageGateway/ListVolumes.hs +8/−4
• gen/Network/AWS/StorageGateway/RemoveTagsFromResource.hs +5/−1
• gen/Network/AWS/StorageGateway/ResetCache.hs +11/−7
• gen/Network/AWS/StorageGateway/RetrieveTapeArchive.hs +4/−0
• gen/Network/AWS/StorageGateway/RetrieveTapeRecoveryPoint.hs +4/−0
• gen/Network/AWS/StorageGateway/SetLocalConsolePassword.hs +151/−0
• gen/Network/AWS/StorageGateway/ShutdownGateway.hs +6/−3
• gen/Network/AWS/StorageGateway/StartGateway.hs +8/−4
• gen/Network/AWS/StorageGateway/Types.hs +2/−0
• gen/Network/AWS/StorageGateway/Types/Product.hs +30/−0
• gen/Network/AWS/StorageGateway/UpdateBandwidthRateLimit.hs +8/−4
• gen/Network/AWS/StorageGateway/UpdateChapCredentials.hs +7/−4
• gen/Network/AWS/StorageGateway/UpdateGatewayInformation.hs +9/−5
• gen/Network/AWS/StorageGateway/UpdateGatewaySoftwareNow.hs +6/−2
• gen/Network/AWS/StorageGateway/UpdateMaintenanceStartTime.hs +7/−3
• gen/Network/AWS/StorageGateway/UpdateSnapshotSchedule.hs +5/−2
• gen/Network/AWS/StorageGateway/UpdateVTLDeviceType.hs +9/−7
• test/Test/AWS/Gen/StorageGateway.hs +18/−0

@@ -8,7 +8,7 @@  ## Version -`1.4.0`+`1.4.1`   ## Description@@ -38,8 +38,8 @@     operations, their request parameters, response elements, possible     errors, and examples of requests and responses. -   <http://docs.aws.amazon.com/general/latest/gr/index.html?rande.html AWS Storage Gateway Regions and Endpoints>:-    Provides a list of each of the regions and endpoints available for-    use with AWS Storage Gateway.+    Provides a list of each of the s and endpoints available for use+    with AWS Storage Gateway.  AWS Storage Gateway resource IDs are in uppercase. When you use these resource IDs with the Amazon EC2 API, EC2 expects resource IDs in

@@ -1,5 +1,5 @@ name:                  amazonka-storagegateway-version:               1.4.0+version:               1.4.1 synopsis:              Amazon Storage Gateway SDK. homepage:              https://github.com/brendanhay/amazonka bug-reports:           https://github.com/brendanhay/amazonka/issues@@ -38,8 +38,8 @@         operations, their request parameters, response elements, possible         errors, and examples of requests and responses.     -   <http://docs.aws.amazon.com/general/latest/gr/index.html?rande.html AWS Storage Gateway Regions and Endpoints>:-        Provides a list of each of the regions and endpoints available for-        use with AWS Storage Gateway.+        Provides a list of each of the s and endpoints available for use+        with AWS Storage Gateway.      AWS Storage Gateway resource IDs are in uppercase. When you use these     resource IDs with the Amazon EC2 API, EC2 expects resource IDs in@@ -119,6 +119,7 @@         , 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@@ -136,7 +137,7 @@         , Network.AWS.StorageGateway.Types.Sum      build-depends:-          amazonka-core == 1.4.0.*+          amazonka-core == 1.4.1.*         , base          >= 4.7     && < 5  test-suite amazonka-storagegateway-test@@ -156,9 +157,9 @@         , Test.AWS.StorageGateway.Internal      build-depends:-          amazonka-core == 1.4.0.*-        , amazonka-test == 1.4.0.*-        , amazonka-storagegateway == 1.4.0.*+          amazonka-core == 1.4.1.*+        , amazonka-test == 1.4.1.*+        , amazonka-storagegateway == 1.4.1.*         , base         , bytestring         , tasty

@@ -36,8 +36,8 @@ --     operations, their request parameters, response elements, possible --     errors, and examples of requests and responses. -- -   <http://docs.aws.amazon.com/general/latest/gr/index.html?rande.html AWS Storage Gateway Regions and Endpoints>:---     Provides a list of each of the regions and endpoints available for---     use with AWS Storage Gateway.+--     Provides a list of each of the s and endpoints available for use+--     with AWS Storage Gateway. -- -- AWS Storage Gateway resource IDs are in uppercase. When you use these -- resource IDs with the Amazon EC2 API, EC2 expects resource IDs in@@ -74,6 +74,9 @@     -- ** DescribeChapCredentials     , module Network.AWS.StorageGateway.DescribeChapCredentials +    -- ** SetLocalConsolePassword+    , module Network.AWS.StorageGateway.SetLocalConsolePassword+     -- ** CreateTapes     , module Network.AWS.StorageGateway.CreateTapes @@ -409,6 +412,7 @@ 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

@@ -18,15 +18,14 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- This operation activates the gateway you previously deployed on your--- host. For more information, see+-- Activates the gateway you previously deployed on your host. For more+-- information, see -- <http://docs.aws.amazon.com/storagegateway/latest/userguide/GettingStartedActivateGateway-common.html Activate the AWS Storage Gateway>.--- In the activation process, you specify information such as the region--- you want to use for storing snapshots, 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>.+-- In the activation process, you specify information such as the you want+-- to use for storing snapshots, 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 Network.AWS.StorageGateway.ActivateGateway@@ -178,6 +177,8 @@  instance Hashable ActivateGateway +instance NFData ActivateGateway+ instance ToHeaders ActivateGateway where         toHeaders           = const@@ -211,7 +212,7 @@ -- account, gateway name, and 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+-- 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. --@@ -244,3 +245,5 @@ -- | The response status code. agrsResponseStatus :: Lens' ActivateGatewayResponse Int agrsResponseStatus = lens _agrsResponseStatus (\ s a -> s{_agrsResponseStatus = a});++instance NFData ActivateGatewayResponse

@@ -18,9 +18,9 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- This operation configures one or more gateway local disks as cache for a--- cached-volume gateway. This operation is supported only for the--- gateway-cached volume architecture (see+-- Configures one or more gateway local disks as cache for a cached-volume+-- gateway. This operation is supported only for the gateway-cached volume+-- architecture (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@@ -91,6 +91,8 @@  instance Hashable AddCache +instance NFData AddCache+ instance ToHeaders AddCache where         toHeaders           = const@@ -142,3 +144,5 @@ -- | The response status code. acrsResponseStatus :: Lens' AddCacheResponse Int acrsResponseStatus = lens _acrsResponseStatus (\ s a -> s{_acrsResponseStatus = a});++instance NFData AddCacheResponse

@@ -18,9 +18,9 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- This operation 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,+-- 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: --@@ -104,6 +104,8 @@  instance Hashable AddTagsToResource +instance NFData AddTagsToResource+ instance ToHeaders AddTagsToResource where         toHeaders           = const@@ -158,3 +160,5 @@ -- | The response status code. attrrsResponseStatus :: Lens' AddTagsToResourceResponse Int attrrsResponseStatus = lens _attrrsResponseStatus (\ s a -> s{_attrrsResponseStatus = a});++instance NFData AddTagsToResourceResponse

@@ -18,8 +18,8 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- This operation configures one or more gateway local disks as upload--- buffer for a specified gateway. This operation is supported for both the+-- Configures one or more gateway local disks as upload buffer for a+-- specified gateway. This operation is supported for both the -- gateway-stored and gateway-cached volume architectures. -- -- In the request, you specify the gateway Amazon Resource Name (ARN) to@@ -90,6 +90,8 @@  instance Hashable AddUploadBuffer +instance NFData AddUploadBuffer+ instance ToHeaders AddUploadBuffer where         toHeaders           = const@@ -142,3 +144,5 @@ -- | The response status code. aubrsResponseStatus :: Lens' AddUploadBufferResponse Int aubrsResponseStatus = lens _aubrsResponseStatus (\ s a -> s{_aubrsResponseStatus = a});++instance NFData AddUploadBufferResponse

@@ -18,10 +18,10 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- This operation configures one or more gateway local disks as working--- storage for a gateway. This operation is supported only for the--- gateway-stored volume architecture. This operation is deprecated method--- in cached-volumes API version (20120630). Use AddUploadBuffer instead.+-- Configures one or more gateway local disks as working storage for a+-- gateway. This operation is supported only for the gateway-stored volume+-- architecture. This operation is deprecated in cached-volumes 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@@ -101,6 +101,8 @@  instance Hashable AddWorkingStorage +instance NFData AddWorkingStorage+ instance ToHeaders AddWorkingStorage where         toHeaders           = const@@ -156,3 +158,5 @@ -- | The response status code. awsrsResponseStatus :: Lens' AddWorkingStorageResponse Int awsrsResponseStatus = lens _awsrsResponseStatus (\ s a -> s{_awsrsResponseStatus = a});++instance NFData AddWorkingStorageResponse

@@ -89,6 +89,8 @@  instance Hashable CancelArchival +instance NFData CancelArchival+ instance ToHeaders CancelArchival where         toHeaders           = const@@ -144,3 +146,5 @@ -- | The response status code. carsResponseStatus :: Lens' CancelArchivalResponse Int carsResponseStatus = lens _carsResponseStatus (\ s a -> s{_carsResponseStatus = a});++instance NFData CancelArchivalResponse

@@ -90,6 +90,8 @@  instance Hashable CancelRetrieval +instance NFData CancelRetrieval+ instance ToHeaders CancelRetrieval where         toHeaders           = const@@ -145,3 +147,5 @@ -- | The response status code. crrsResponseStatus :: Lens' CancelRetrievalResponse Int crrsResponseStatus = lens _crrsResponseStatus (\ s a -> s{_crrsResponseStatus = a});++instance NFData CancelRetrievalResponse

@@ -18,9 +18,8 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- This operation creates a cached volume on a specified cached gateway.--- This operation is supported only for the gateway-cached volume--- architecture.+-- Creates a cached volume on a specified cached gateway. This operation is+-- supported only for the gateway-cached volume architecture. -- -- 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@@ -140,6 +139,8 @@  instance Hashable CreateCachediSCSIVolume +instance NFData CreateCachediSCSIVolume+ instance ToHeaders CreateCachediSCSIVolume where         toHeaders           = const@@ -206,3 +207,5 @@ -- | The response status code. ccscsivrsResponseStatus :: Lens' CreateCachediSCSIVolumeResponse Int ccscsivrsResponseStatus = lens _ccscsivrsResponseStatus (\ s a -> s{_ccscsivrsResponseStatus = a});++instance NFData CreateCachediSCSIVolumeResponse

@@ -18,7 +18,7 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- This operation initiates a snapshot of a volume.+-- 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@@ -116,6 +116,8 @@  instance Hashable CreateSnapshot +instance NFData CreateSnapshot+ instance ToHeaders CreateSnapshot where         toHeaders           = const@@ -183,3 +185,5 @@ -- | The response status code. csrsResponseStatus :: Lens' CreateSnapshotResponse Int csrsResponseStatus = lens _csrsResponseStatus (\ s a -> s{_csrsResponseStatus = a});++instance NFData CreateSnapshotResponse

@@ -18,9 +18,8 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- This operation initiates a snapshot of a gateway from a volume recovery--- point. This operation is supported only for the gateway-cached volume--- architecture (see ).+-- Initiates a snapshot of a gateway from a volume recovery point. This+-- operation is supported only for the gateway-cached volume architecture. -- -- 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@@ -112,6 +111,8 @@ instance Hashable          CreateSnapshotFromVolumeRecoveryPoint +instance NFData CreateSnapshotFromVolumeRecoveryPoint+ instance ToHeaders          CreateSnapshotFromVolumeRecoveryPoint where         toHeaders@@ -186,3 +187,6 @@ -- | The response status code. csfvrprsResponseStatus :: Lens' CreateSnapshotFromVolumeRecoveryPointResponse Int csfvrprsResponseStatus = lens _csfvrprsResponseStatus (\ s a -> s{_csfvrprsResponseStatus = a});++instance NFData+         CreateSnapshotFromVolumeRecoveryPointResponse

@@ -18,8 +18,8 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- This operation creates a volume on a specified gateway. This operation--- is supported only for the gateway-stored volume architecture.+-- Creates a volume on a specified gateway. This operation is supported+-- only for the gateway-stored volume architecture. -- -- 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@@ -169,6 +169,8 @@  instance Hashable CreateStorediSCSIVolume +instance NFData CreateStorediSCSIVolume+ instance ToHeaders CreateStorediSCSIVolume where         toHeaders           = const@@ -248,3 +250,5 @@ -- | The response status code. csscsivrsResponseStatus :: Lens' CreateStorediSCSIVolumeResponse Int csscsivrsResponseStatus = lens _csscsivrsResponseStatus (\ s a -> s{_csscsivrsResponseStatus = a});++instance NFData CreateStorediSCSIVolumeResponse

@@ -107,6 +107,8 @@  instance Hashable CreateTapeWithBarcode +instance NFData CreateTapeWithBarcode+ instance ToHeaders CreateTapeWithBarcode where         toHeaders           = const@@ -163,3 +165,5 @@ -- | The response status code. ctwbrsResponseStatus :: Lens' CreateTapeWithBarcodeResponse Int ctwbrsResponseStatus = lens _ctwbrsResponseStatus (\ s a -> s{_ctwbrsResponseStatus = a});++instance NFData CreateTapeWithBarcodeResponse

@@ -135,6 +135,8 @@  instance Hashable CreateTapes +instance NFData CreateTapes+ instance ToHeaders CreateTapes where         toHeaders           = const@@ -193,3 +195,5 @@ -- | The response status code. ctrsResponseStatus :: Lens' CreateTapesResponse Int ctrsResponseStatus = lens _ctrsResponseStatus (\ s a -> s{_ctrsResponseStatus = a});++instance NFData CreateTapesResponse

@@ -18,11 +18,11 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- This operation 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.+-- 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@@ -90,6 +90,8 @@  instance Hashable DeleteBandwidthRateLimit +instance NFData DeleteBandwidthRateLimit+ instance ToHeaders DeleteBandwidthRateLimit where         toHeaders           = const@@ -145,3 +147,5 @@ -- | The response status code. delrsResponseStatus :: Lens' DeleteBandwidthRateLimitResponse Int delrsResponseStatus = lens _delrsResponseStatus (\ s a -> s{_delrsResponseStatus = a});++instance NFData DeleteBandwidthRateLimitResponse

@@ -18,8 +18,8 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- This operation deletes Challenge-Handshake Authentication Protocol--- (CHAP) credentials for a specified iSCSI target and initiator pair.+-- Deletes Challenge-Handshake Authentication Protocol (CHAP) credentials+-- for a specified iSCSI target and initiator pair. module Network.AWS.StorageGateway.DeleteChapCredentials     (     -- * Creating a Request@@ -96,6 +96,8 @@  instance Hashable DeleteChapCredentials +instance NFData DeleteChapCredentials+ instance ToHeaders DeleteChapCredentials where         toHeaders           = const@@ -158,3 +160,5 @@ -- | The response status code. drsResponseStatus :: Lens' DeleteChapCredentialsResponse Int drsResponseStatus = lens _drsResponseStatus (\ s a -> s{_drsResponseStatus = a});++instance NFData DeleteChapCredentialsResponse

@@ -18,10 +18,10 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- This operation 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.+-- 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@@ -94,6 +94,8 @@  instance Hashable DeleteGateway +instance NFData DeleteGateway+ instance ToHeaders DeleteGateway where         toHeaders           = const@@ -146,3 +148,5 @@ -- | The response status code. dgrsResponseStatus :: Lens' DeleteGatewayResponse Int dgrsResponseStatus = lens _dgrsResponseStatus (\ s a -> s{_dgrsResponseStatus = a});++instance NFData DeleteGatewayResponse

@@ -18,11 +18,11 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- This operation deletes a snapshot of a volume.+-- Deletes a snapshot of a volume. ----- You can take snapshots of your gateway volumes on a scheduled or ad-hoc--- basis. This API enables you to delete a snapshot schedule for a volume.--- For more information, see+-- 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).@@ -86,6 +86,8 @@  instance Hashable DeleteSnapshotSchedule +instance NFData DeleteSnapshotSchedule+ instance ToHeaders DeleteSnapshotSchedule where         toHeaders           = const@@ -136,3 +138,5 @@ -- | The response status code. dsssrsResponseStatus :: Lens' DeleteSnapshotScheduleResponse Int dsssrsResponseStatus = lens _dsssrsResponseStatus (\ s a -> s{_dsssrsResponseStatus = a});++instance NFData DeleteSnapshotScheduleResponse

@@ -89,6 +89,8 @@  instance Hashable DeleteTape +instance NFData DeleteTape+ instance ToHeaders DeleteTape where         toHeaders           = const@@ -142,3 +144,5 @@ -- | The response status code. dtrsResponseStatus :: Lens' DeleteTapeResponse Int dtrsResponseStatus = lens _dtrsResponseStatus (\ s a -> s{_dtrsResponseStatus = a});++instance NFData DeleteTapeResponse

@@ -78,6 +78,8 @@  instance Hashable DeleteTapeArchive +instance NFData DeleteTapeArchive+ instance ToHeaders DeleteTapeArchive where         toHeaders           = const@@ -131,3 +133,5 @@ -- | The response status code. dtatrsResponseStatus :: Lens' DeleteTapeArchiveResponse Int dtatrsResponseStatus = lens _dtatrsResponseStatus (\ s a -> s{_dtatrsResponseStatus = a});++instance NFData DeleteTapeArchiveResponse

@@ -18,11 +18,11 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- This operation deletes the specified gateway volume that you previously--- created using the < CreateCachediSCSIVolume> or--- < CreateStorediSCSIVolume> API. For gateway-stored volumes, the local--- disk that was configured as the storage volume is not deleted. You can--- reuse the local disk to create another storage volume.+-- Deletes the specified gateway volume that you previously created using+-- the < CreateCachediSCSIVolume> or < CreateStorediSCSIVolume> API. For+-- gateway-stored volumes, 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 gateway volume, make sure there are no iSCSI -- connections to the volume you are deleting. You should also make sure@@ -93,6 +93,8 @@  instance Hashable DeleteVolume +instance NFData DeleteVolume+ instance ToHeaders DeleteVolume where         toHeaders           = const@@ -146,3 +148,5 @@ -- | The response status code. dvrsResponseStatus :: Lens' DeleteVolumeResponse Int dvrsResponseStatus = lens _dvrsResponseStatus (\ s a -> s{_dvrsResponseStatus = a});++instance NFData DeleteVolumeResponse

@@ -18,9 +18,8 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- This operation returns the bandwidth rate limits of a gateway. By--- default, these limits are not set, which means no bandwidth rate--- limiting is in effect.+-- 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@@ -91,6 +90,8 @@  instance Hashable DescribeBandwidthRateLimit +instance NFData DescribeBandwidthRateLimit+ instance ToHeaders DescribeBandwidthRateLimit where         toHeaders           = const@@ -161,3 +162,5 @@ -- | The response status code. dbrlrsResponseStatus :: Lens' DescribeBandwidthRateLimitResponse Int dbrlrsResponseStatus = lens _dbrlrsResponseStatus (\ s a -> s{_dbrlrsResponseStatus = a});++instance NFData DescribeBandwidthRateLimitResponse

@@ -18,8 +18,8 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- This operation returns information about the cache of a gateway. This--- operation is supported only for the gateway-cached volume architecture.+-- Returns information about the cache of a gateway. This operation is+-- supported only for the gateway-cached volume architecture. -- -- The response includes disk IDs that are configured as cache, and it -- includes the amount of cache allocated and used.@@ -91,6 +91,8 @@  instance Hashable DescribeCache +instance NFData DescribeCache+ instance ToHeaders DescribeCache where         toHeaders           = const@@ -189,3 +191,5 @@ -- | The response status code. dcrsResponseStatus :: Lens' DescribeCacheResponse Int dcrsResponseStatus = lens _dcrsResponseStatus (\ s a -> s{_dcrsResponseStatus = a});++instance NFData DescribeCacheResponse

@@ -18,9 +18,9 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- This operation returns a description of the gateway volumes specified in--- the request. This operation is supported only for the gateway-cached--- volume architecture.+-- Returns a description of the gateway volumes specified in the request.+-- This operation is supported only for the gateway-cached volume+-- architecture. -- -- The list of gateway volumes in the request must be from one gateway. In -- the response Amazon Storage Gateway returns volume information sorted by@@ -82,6 +82,8 @@  instance Hashable DescribeCachediSCSIVolumes +instance NFData DescribeCachediSCSIVolumes+ instance ToHeaders DescribeCachediSCSIVolumes where         toHeaders           = const@@ -136,3 +138,5 @@ -- | The response status code. dcscsivrsResponseStatus :: Lens' DescribeCachediSCSIVolumesResponse Int dcscsivrsResponseStatus = lens _dcscsivrsResponseStatus (\ s a -> s{_dcscsivrsResponseStatus = a});++instance NFData DescribeCachediSCSIVolumesResponse

@@ -18,9 +18,9 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- This operation returns an array of Challenge-Handshake Authentication--- Protocol (CHAP) credentials information for a specified iSCSI target,--- one for each target-initiator pair.+-- 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@@ -84,6 +84,8 @@  instance Hashable DescribeChapCredentials +instance NFData DescribeChapCredentials+ instance ToHeaders DescribeChapCredentials where         toHeaders           = const@@ -153,3 +155,5 @@ -- | The response status code. dccrsResponseStatus :: Lens' DescribeChapCredentialsResponse Int dccrsResponseStatus = lens _dccrsResponseStatus (\ s a -> s{_dccrsResponseStatus = a});++instance NFData DescribeChapCredentialsResponse

@@ -18,10 +18,10 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- This operation 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.+-- 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@@ -97,6 +97,8 @@  instance Hashable DescribeGatewayInformation +instance NFData DescribeGatewayInformation+ instance ToHeaders DescribeGatewayInformation where         toHeaders           = const@@ -220,3 +222,5 @@ -- | The response status code. dgirsResponseStatus :: Lens' DescribeGatewayInformationResponse Int dgirsResponseStatus = lens _dgirsResponseStatus (\ s a -> s{_dgirsResponseStatus = a});++instance NFData DescribeGatewayInformationResponse

@@ -18,9 +18,9 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- This operation 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.+-- 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@@ -89,6 +89,8 @@  instance Hashable DescribeMaintenanceStartTime +instance NFData DescribeMaintenanceStartTime+ instance ToHeaders DescribeMaintenanceStartTime where         toHeaders           = const@@ -171,3 +173,5 @@ -- | The response status code. dmstrsResponseStatus :: Lens' DescribeMaintenanceStartTimeResponse Int dmstrsResponseStatus = lens _dmstrsResponseStatus (\ s a -> s{_dmstrsResponseStatus = a});++instance NFData DescribeMaintenanceStartTimeResponse

@@ -18,9 +18,9 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- This operation describes the snapshot schedule for the specified gateway--- volume. The snapshot schedule information includes intervals at which--- snapshots are automatically initiated on the volume.+-- Describes the snapshot schedule for the specified gateway volume. The+-- snapshot schedule information includes intervals at which snapshots are+-- automatically initiated on the volume. module Network.AWS.StorageGateway.DescribeSnapshotSchedule     (     -- * Creating a Request@@ -90,6 +90,8 @@  instance Hashable DescribeSnapshotSchedule +instance NFData DescribeSnapshotSchedule+ instance ToHeaders DescribeSnapshotSchedule where         toHeaders           = const@@ -172,3 +174,5 @@ -- | The response status code. dssrsResponseStatus :: Lens' DescribeSnapshotScheduleResponse Int dssrsResponseStatus = lens _dssrsResponseStatus (\ s a -> s{_dssrsResponseStatus = a});++instance NFData DescribeSnapshotScheduleResponse

@@ -18,10 +18,10 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- This operation 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.+-- 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. module Network.AWS.StorageGateway.DescribeStorediSCSIVolumes     (     -- * Creating a Request@@ -45,7 +45,7 @@ import           Network.AWS.StorageGateway.Types import           Network.AWS.StorageGateway.Types.Product --- | A JSON Object containing a list of+-- | A JSON object containing a list of -- < DescribeStorediSCSIVolumesInput$VolumeARNs>. -- -- /See:/ 'describeStorediSCSIVolumes' smart constructor.@@ -85,6 +85,8 @@  instance Hashable DescribeStorediSCSIVolumes +instance NFData DescribeStorediSCSIVolumes+ instance ToHeaders DescribeStorediSCSIVolumes where         toHeaders           = const@@ -136,3 +138,5 @@ -- | The response status code. dsscsivrsResponseStatus :: Lens' DescribeStorediSCSIVolumesResponse Int dsscsivrsResponseStatus = lens _dsscsivrsResponseStatus (\ s a -> s{_dsscsivrsResponseStatus = a});++instance NFData DescribeStorediSCSIVolumesResponse

@@ -116,6 +116,8 @@  instance Hashable DescribeTapeArchives +instance NFData DescribeTapeArchives+ instance ToHeaders DescribeTapeArchives where         toHeaders           = const@@ -187,3 +189,5 @@ -- | The response status code. dtarsResponseStatus :: Lens' DescribeTapeArchivesResponse Int dtarsResponseStatus = lens _dtarsResponseStatus (\ s a -> s{_dtarsResponseStatus = a});++instance NFData DescribeTapeArchivesResponse

@@ -21,7 +21,7 @@ -- Returns a list of virtual tape recovery points that are available for -- the specified gateway-VTL. ----- A recovery point is a point in time view of a virtual tape at which all+-- 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.@@ -119,6 +119,8 @@  instance Hashable DescribeTapeRecoveryPoints +instance NFData DescribeTapeRecoveryPoints+ instance ToHeaders DescribeTapeRecoveryPoints where         toHeaders           = const@@ -196,3 +198,5 @@ -- | The response status code. dtrprsResponseStatus :: Lens' DescribeTapeRecoveryPointsResponse Int dtrprsResponseStatus = lens _dtrprsResponseStatus (\ s a -> s{_dtrprsResponseStatus = a});++instance NFData DescribeTapeRecoveryPointsResponse

@@ -127,6 +127,8 @@  instance Hashable DescribeTapes +instance NFData DescribeTapes+ instance ToHeaders DescribeTapes where         toHeaders           = const@@ -195,3 +197,5 @@ -- | The response status code. dtsrsResponseStatus :: Lens' DescribeTapesResponse Int dtsrsResponseStatus = lens _dtsrsResponseStatus (\ s a -> s{_dtsrsResponseStatus = a});++instance NFData DescribeTapesResponse

@@ -18,9 +18,9 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- This operation returns information about the upload buffer of a gateway.--- This operation is supported for both the gateway-stored and--- gateway-cached volume architectures.+-- Returns information about the upload buffer of a gateway. This operation+-- is supported for both the gateway-stored and gateway-cached volume+-- architectures. -- -- The response includes disk IDs that are configured as upload buffer -- space, and it includes the amount of upload buffer space allocated and@@ -89,6 +89,8 @@  instance Hashable DescribeUploadBuffer +instance NFData DescribeUploadBuffer+ instance ToHeaders DescribeUploadBuffer where         toHeaders           = const@@ -163,3 +165,5 @@ -- | The response status code. dubrsResponseStatus :: Lens' DescribeUploadBufferResponse Int dubrsResponseStatus = lens _dubrsResponseStatus (\ s a -> s{_dubrsResponseStatus = a});++instance NFData DescribeUploadBufferResponse

@@ -131,6 +131,8 @@  instance Hashable DescribeVTLDevices +instance NFData DescribeVTLDevices+ instance ToHeaders DescribeVTLDevices where         toHeaders           = const@@ -208,3 +210,5 @@ -- | The response status code. dvtldrsResponseStatus :: Lens' DescribeVTLDevicesResponse Int dvtldrsResponseStatus = lens _dvtldrsResponseStatus (\ s a -> s{_dvtldrsResponseStatus = a});++instance NFData DescribeVTLDevicesResponse

@@ -18,10 +18,10 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- This operation returns information about the working storage of a--- gateway. This operation is supported only for the gateway-stored volume--- architecture. This operation is deprecated in cached-volumes API version--- (20120630). Use DescribeUploadBuffer instead.+-- Returns information about the working storage of a gateway. This+-- operation is supported only for the gateway-stored volume architecture.+-- 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@@ -94,6 +94,8 @@  instance Hashable DescribeWorkingStorage +instance NFData DescribeWorkingStorage+ instance ToHeaders DescribeWorkingStorage where         toHeaders           = const@@ -175,3 +177,5 @@ -- | The response status code. dwsrsResponseStatus :: Lens' DescribeWorkingStorageResponse Int dwsrsResponseStatus = lens _dwsrsResponseStatus (\ s a -> s{_dwsrsResponseStatus = a});++instance NFData DescribeWorkingStorageResponse

@@ -84,6 +84,8 @@  instance Hashable DisableGateway +instance NFData DisableGateway+ instance ToHeaders DisableGateway where         toHeaders           = const@@ -136,3 +138,5 @@ -- | The response status code. disrsResponseStatus :: Lens' DisableGatewayResponse Int disrsResponseStatus = lens _disrsResponseStatus (\ s a -> s{_disrsResponseStatus = a});++instance NFData DisableGatewayResponse

@@ -18,16 +18,16 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- This operation 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).+-- 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+-- 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. --@@ -113,6 +113,8 @@  instance Hashable ListGateways +instance NFData ListGateways+ instance ToHeaders ListGateways where         toHeaders           = const@@ -173,3 +175,5 @@ -- | The response status code. lgrsResponseStatus :: Lens' ListGatewaysResponse Int lgrsResponseStatus = lens _lgrsResponseStatus (\ s a -> s{_lgrsResponseStatus = a});++instance NFData ListGatewaysResponse

@@ -18,9 +18,9 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- This operation 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.+-- 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@@ -88,6 +88,8 @@  instance Hashable ListLocalDisks +instance NFData ListLocalDisks+ instance ToHeaders ListLocalDisks where         toHeaders           = const@@ -146,3 +148,5 @@ -- | The response status code. lldrsResponseStatus :: Lens' ListLocalDisksResponse Int lldrsResponseStatus = lens _lldrsResponseStatus (\ s a -> s{_lldrsResponseStatus = a});++instance NFData ListLocalDisksResponse

@@ -18,8 +18,7 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- This operation lists the tags that have been added to the specified--- resource.+-- Lists the tags that have been added to the specified resource. module Network.AWS.StorageGateway.ListTagsForResource     (     -- * Creating a Request@@ -104,6 +103,8 @@  instance Hashable ListTagsForResource +instance NFData ListTagsForResource+ instance ToHeaders ListTagsForResource where         toHeaders           = const@@ -177,3 +178,5 @@ -- | The response status code. ltfrrsResponseStatus :: Lens' ListTagsForResourceResponse Int ltfrrsResponseStatus = lens _ltfrrsResponseStatus (\ s a -> s{_ltfrrsResponseStatus = a});++instance NFData ListTagsForResourceResponse

@@ -18,9 +18,8 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- This operation lists iSCSI initiators that are connected to a volume.--- You can use this operation to determine whether a volume is being used--- or not.+-- Lists iSCSI initiators that are connected to a volume. You can use this+-- operation to determine whether a volume is being used or not. module Network.AWS.StorageGateway.ListVolumeInitiators     (     -- * Creating a Request@@ -82,6 +81,8 @@  instance Hashable ListVolumeInitiators +instance NFData ListVolumeInitiators+ instance ToHeaders ListVolumeInitiators where         toHeaders           = const@@ -135,3 +136,5 @@ -- | The response status code. lvirsResponseStatus :: Lens' ListVolumeInitiatorsResponse Int lvirsResponseStatus = lens _lvirsResponseStatus (\ s a -> s{_lvirsResponseStatus = a});++instance NFData ListVolumeInitiatorsResponse

@@ -18,8 +18,8 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- This operation lists the recovery points for a specified gateway. This--- operation is supported only for the gateway-cached volume architecture.+-- Lists the recovery points for a specified gateway. This operation is+-- supported only for the gateway-cached volume architecture. -- -- Each gateway-cached volume has one recovery point. A volume recovery -- point is a point in time at which all data of the volume is consistent@@ -86,6 +86,8 @@  instance Hashable ListVolumeRecoveryPoints +instance NFData ListVolumeRecoveryPoints+ instance ToHeaders ListVolumeRecoveryPoints where         toHeaders           = const@@ -144,3 +146,5 @@ -- | The response status code. lvrprsResponseStatus :: Lens' ListVolumeRecoveryPointsResponse Int lvrprsResponseStatus = lens _lvrprsResponseStatus (\ s a -> s{_lvrprsResponseStatus = a});++instance NFData ListVolumeRecoveryPointsResponse

@@ -18,10 +18,10 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- This operation 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> API.+-- 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>+-- API. -- -- The operation supports pagination. By default, the operation returns a -- maximum of up to 100 volumes. You can optionally specify the 'Limit'@@ -125,6 +125,8 @@  instance Hashable ListVolumes +instance NFData ListVolumes+ instance ToHeaders ListVolumes where         toHeaders           = const@@ -194,3 +196,5 @@ -- | The response status code. lvrsResponseStatus :: Lens' ListVolumesResponse Int lvrsResponseStatus = lens _lvrsResponseStatus (\ s a -> s{_lvrsResponseStatus = a});++instance NFData ListVolumesResponse

@@ -18,7 +18,7 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- This operation removes one or more tags from the specified resource.+-- Removes one or more tags from the specified resource. module Network.AWS.StorageGateway.RemoveTagsFromResource     (     -- * Creating a Request@@ -89,6 +89,8 @@  instance Hashable RemoveTagsFromResource +instance NFData RemoveTagsFromResource+ instance ToHeaders RemoveTagsFromResource where         toHeaders           = const@@ -144,3 +146,5 @@ -- | The response status code. rtfrrsResponseStatus :: Lens' RemoveTagsFromResourceResponse Int rtfrrsResponseStatus = lens _rtfrrsResponseStatus (\ s a -> s{_rtfrrsResponseStatus = a});++instance NFData RemoveTagsFromResourceResponse

@@ -18,13 +18,13 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- This operation 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.+-- 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. -- -- 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@@ -87,6 +87,8 @@  instance Hashable ResetCache +instance NFData ResetCache+ instance ToHeaders ResetCache where         toHeaders           = const@@ -136,3 +138,5 @@ -- | The response status code. rcrsResponseStatus :: Lens' ResetCacheResponse Int rcrsResponseStatus = lens _rcrsResponseStatus (\ s a -> s{_rcrsResponseStatus = a});++instance NFData ResetCacheResponse

@@ -101,6 +101,8 @@  instance Hashable RetrieveTapeArchive +instance NFData RetrieveTapeArchive+ instance ToHeaders RetrieveTapeArchive where         toHeaders           = const@@ -155,3 +157,5 @@ -- | The response status code. rtarsResponseStatus :: Lens' RetrieveTapeArchiveResponse Int rtarsResponseStatus = lens _rtarsResponseStatus (\ s a -> s{_rtarsResponseStatus = a});++instance NFData RetrieveTapeArchiveResponse

@@ -97,6 +97,8 @@  instance Hashable RetrieveTapeRecoveryPoint +instance NFData RetrieveTapeRecoveryPoint+ instance ToHeaders RetrieveTapeRecoveryPoint where         toHeaders           = const@@ -152,3 +154,5 @@ -- | The response status code. rtrprsResponseStatus :: Lens' RetrieveTapeRecoveryPointResponse Int rtrprsResponseStatus = lens _rtrprsResponseStatus (\ s a -> s{_rtrprsResponseStatus = a});++instance NFData RetrieveTapeRecoveryPointResponse

@@ -0,0 +1,151 @@+{-# 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-2016 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay@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,Read,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'+--+-- * 'slcpLocalConsolePassword'+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++instance NFData SetLocalConsolePassword++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'+--+-- * 'slcprsResponseStatus'+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

@@ -18,9 +18,8 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- This operation 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.+-- 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 -- storage gateway\'s virtual machine (VM) and not the VM.@@ -100,6 +99,8 @@  instance Hashable ShutdownGateway +instance NFData ShutdownGateway+ instance ToHeaders ShutdownGateway where         toHeaders           = const@@ -152,3 +153,5 @@ -- | The response status code. srsResponseStatus :: Lens' ShutdownGatewayResponse Int srsResponseStatus = lens _srsResponseStatus (\ s a -> s{_srsResponseStatus = a});++instance NFData ShutdownGatewayResponse

@@ -18,10 +18,10 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- This operation 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.+-- 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@@ -89,6 +89,8 @@  instance Hashable StartGateway +instance NFData StartGateway+ instance ToHeaders StartGateway where         toHeaders           = const@@ -141,3 +143,5 @@ -- | The response status code. sgrsResponseStatus :: Lens' StartGatewayResponse Int sgrsResponseStatus = lens _sgrsResponseStatus (\ s a -> s{_sgrsResponseStatus = a});++instance NFData StartGatewayResponse

@@ -187,6 +187,8 @@       | 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 (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"

@@ -114,6 +114,8 @@  instance Hashable CachediSCSIVolume +instance NFData CachediSCSIVolume+ -- | Describes Challenge-Handshake Authentication Protocol (CHAP) information -- that supports authentication between your gateway and iSCSI initiators. --@@ -179,6 +181,8 @@  instance Hashable ChapInfo +instance NFData ChapInfo+ -- | Lists iSCSI information about a VTL device. -- -- /See:/ 'deviceiSCSIAttributes' smart constructor.@@ -238,6 +242,8 @@  instance Hashable DeviceiSCSIAttributes +instance NFData DeviceiSCSIAttributes+ -- | /See:/ 'disk' smart constructor. data Disk = Disk'     { _dDiskAllocationResource :: !(Maybe Text)@@ -322,6 +328,8 @@  instance Hashable Disk +instance NFData Disk+ -- | /See:/ 'gatewayInfo' smart constructor. data GatewayInfo = GatewayInfo'     { _giGatewayARN              :: !(Maybe Text)@@ -379,6 +387,8 @@  instance Hashable GatewayInfo +instance NFData GatewayInfo+ -- | Describes a gateway\'s network interface. -- -- /See:/ 'networkInterface' smart constructor.@@ -431,6 +441,8 @@  instance Hashable NetworkInterface +instance NFData NetworkInterface+ -- | /See:/ 'storediSCSIVolume' smart constructor. data StorediSCSIVolume = StorediSCSIVolume'     { _sscsivVolumeiSCSIAttributes :: !(Maybe VolumeiSCSIAttributes)@@ -542,6 +554,8 @@  instance Hashable StorediSCSIVolume +instance NFData StorediSCSIVolume+ -- | /See:/ 'tag' smart constructor. data Tag = Tag'     { _tagKey   :: !Text@@ -580,6 +594,8 @@  instance Hashable Tag +instance NFData Tag+ instance ToJSON Tag where         toJSON Tag'{..}           = object@@ -667,6 +683,8 @@  instance Hashable Tape +instance NFData Tape+ -- | Represents a virtual tape that is archived in the virtual tape shelf -- (VTS). --@@ -750,6 +768,8 @@  instance Hashable TapeArchive +instance NFData TapeArchive+ -- | Describes a recovery point. -- -- /See:/ 'tapeRecoveryPointInfo' smart constructor.@@ -813,6 +833,8 @@  instance Hashable TapeRecoveryPointInfo +instance NFData TapeRecoveryPointInfo+ -- | Represents a device object associated with a gateway-VTL. -- -- /See:/ 'vTLDevice' smart constructor.@@ -882,6 +904,8 @@  instance Hashable VTLDevice +instance NFData VTLDevice+ -- | /See:/ 'volumeInfo' smart constructor. data VolumeInfo = VolumeInfo'     { _viVolumeARN  :: !(Maybe Text)@@ -920,6 +944,8 @@  instance Hashable VolumeInfo +instance NFData VolumeInfo+ -- | /See:/ 'volumeRecoveryPointInfo' smart constructor. data VolumeRecoveryPointInfo = VolumeRecoveryPointInfo'     { _vrpiVolumeRecoveryPointTime :: !(Maybe Text)@@ -977,6 +1003,8 @@  instance Hashable VolumeRecoveryPointInfo +instance NFData VolumeRecoveryPointInfo+ -- | Lists iSCSI information about a volume. -- -- /See:/ 'volumeiSCSIAttributes' smart constructor.@@ -1043,3 +1071,5 @@                      <*> (x .:? "NetworkInterfacePort"))  instance Hashable VolumeiSCSIAttributes++instance NFData VolumeiSCSIAttributes

@@ -18,10 +18,10 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- This operation 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.+-- 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@@ -110,6 +110,8 @@  instance Hashable UpdateBandwidthRateLimit +instance NFData UpdateBandwidthRateLimit+ instance ToHeaders UpdateBandwidthRateLimit where         toHeaders           = const@@ -168,3 +170,5 @@ -- | The response status code. ubrlrsResponseStatus :: Lens' UpdateBandwidthRateLimitResponse Int ubrlrsResponseStatus = lens _ubrlrsResponseStatus (\ s a -> s{_ubrlrsResponseStatus = a});++instance NFData UpdateBandwidthRateLimitResponse

@@ -18,10 +18,9 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- This operation 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.+-- 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. -- -- When you update CHAP credentials, all existing connections on the target -- are closed and initiators must reconnect with the new credentials.@@ -130,6 +129,8 @@  instance Hashable UpdateChapCredentials +instance NFData UpdateChapCredentials+ instance ToHeaders UpdateChapCredentials where         toHeaders           = const@@ -199,3 +200,5 @@ -- | The response status code. uccrsResponseStatus :: Lens' UpdateChapCredentialsResponse Int uccrsResponseStatus = lens _uccrsResponseStatus (\ s a -> s{_uccrsResponseStatus = a});++instance NFData UpdateChapCredentialsResponse

@@ -18,12 +18,12 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- This operation 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.+-- 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 02, 2015, the gateway\'s ARN--- contains the gateway id rather than the gateway name. However changing+-- 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 Network.AWS.StorageGateway.UpdateGatewayInformation     (@@ -102,6 +102,8 @@  instance Hashable UpdateGatewayInformation +instance NFData UpdateGatewayInformation+ instance ToHeaders UpdateGatewayInformation where         toHeaders           = const@@ -165,3 +167,5 @@ -- | The response status code. ugirsResponseStatus :: Lens' UpdateGatewayInformationResponse Int ugirsResponseStatus = lens _ugirsResponseStatus (\ s a -> s{_ugirsResponseStatus = a});++instance NFData UpdateGatewayInformationResponse

@@ -18,8 +18,8 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- This operation updates the gateway virtual machine (VM) software. The--- request immediately triggers the software update.+-- 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@@ -93,6 +93,8 @@  instance Hashable UpdateGatewaySoftwareNow +instance NFData UpdateGatewaySoftwareNow+ instance ToHeaders UpdateGatewaySoftwareNow where         toHeaders           = const@@ -145,3 +147,5 @@ -- | The response status code. ugsnrsResponseStatus :: Lens' UpdateGatewaySoftwareNowResponse Int ugsnrsResponseStatus = lens _ugsnrsResponseStatus (\ s a -> s{_ugsnrsResponseStatus = a});++instance NFData UpdateGatewaySoftwareNowResponse

@@ -18,9 +18,9 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- This operation 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.+-- 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@@ -118,6 +118,8 @@  instance Hashable UpdateMaintenanceStartTime +instance NFData UpdateMaintenanceStartTime+ instance ToHeaders UpdateMaintenanceStartTime where         toHeaders           = const@@ -175,3 +177,5 @@ -- | The response status code. umstrsResponseStatus :: Lens' UpdateMaintenanceStartTimeResponse Int umstrsResponseStatus = lens _umstrsResponseStatus (\ s a -> s{_umstrsResponseStatus = a});++instance NFData UpdateMaintenanceStartTimeResponse

@@ -18,8 +18,7 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- This operation updates a snapshot schedule configured for a gateway--- volume.+-- Updates a snapshot schedule configured for a gateway volume. -- -- 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@@ -126,6 +125,8 @@  instance Hashable UpdateSnapshotSchedule +instance NFData UpdateSnapshotSchedule+ instance ToHeaders UpdateSnapshotSchedule where         toHeaders           = const@@ -182,3 +183,5 @@ -- | The response status code. ussrsResponseStatus :: Lens' UpdateSnapshotScheduleResponse Int ussrsResponseStatus = lens _ussrsResponseStatus (\ s a -> s{_ussrsResponseStatus = a});++instance NFData UpdateSnapshotScheduleResponse

@@ -18,10 +18,10 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- This operation updates the type of medium changer in a gateway-VTL. When--- you activate a gateway-VTL, you select a medium changer type for the--- gateway-VTL. This operation enables you to select a different type of--- medium changer after a gateway-VTL is activated.+-- Updates the type of medium changer in a gateway-VTL. When you activate a+-- gateway-VTL, you select a medium changer type for the gateway-VTL. This+-- operation enables you to select a different type of medium changer after+-- a gateway-VTL is activated. module Network.AWS.StorageGateway.UpdateVTLDeviceType     (     -- * Creating a Request@@ -46,9 +46,7 @@ import           Network.AWS.StorageGateway.Types import           Network.AWS.StorageGateway.Types.Product --- | UpdateVTLDeviceTypeInput------ /See:/ 'updateVTLDeviceType' smart constructor.+-- | /See:/ 'updateVTLDeviceType' smart constructor. data UpdateVTLDeviceType = UpdateVTLDeviceType'     { _uvtldtVTLDeviceARN :: !Text     , _uvtldtDeviceType   :: !Text@@ -93,6 +91,8 @@  instance Hashable UpdateVTLDeviceType +instance NFData UpdateVTLDeviceType+ instance ToHeaders UpdateVTLDeviceType where         toHeaders           = const@@ -147,3 +147,5 @@ -- | The response status code. uvtldtrsResponseStatus :: Lens' UpdateVTLDeviceTypeResponse Int uvtldtrsResponseStatus = lens _uvtldtrsResponseStatus (\ s a -> s{_uvtldtrsResponseStatus = a});++instance NFData UpdateVTLDeviceTypeResponse

@@ -37,6 +37,9 @@ --         , testDescribeChapCredentials $ --             describeChapCredentials --+--         , testSetLocalConsolePassword $+--             setLocalConsolePassword+-- --         , testCreateTapes $ --             createTapes --@@ -202,6 +205,9 @@ --         , testDescribeChapCredentialsResponse $ --             describeChapCredentialsResponse --+--         , testSetLocalConsolePasswordResponse $+--             setLocalConsolePasswordResponse+-- --         , testCreateTapesResponse $ --             createTapesResponse --@@ -375,6 +381,11 @@     "DescribeChapCredentials"     "fixture/DescribeChapCredentials.yaml" +testSetLocalConsolePassword :: SetLocalConsolePassword -> TestTree+testSetLocalConsolePassword = req+    "SetLocalConsolePassword"+    "fixture/SetLocalConsolePassword.yaml"+ testCreateTapes :: CreateTapes -> TestTree testCreateTapes = req     "CreateTapes"@@ -652,6 +663,13 @@     "fixture/DescribeChapCredentialsResponse.proto"     storageGateway     (Proxy :: Proxy DescribeChapCredentials)++testSetLocalConsolePasswordResponse :: SetLocalConsolePasswordResponse -> TestTree+testSetLocalConsolePasswordResponse = res+    "SetLocalConsolePasswordResponse"+    "fixture/SetLocalConsolePasswordResponse.proto"+    storageGateway+    (Proxy :: Proxy SetLocalConsolePassword)  testCreateTapesResponse :: CreateTapesResponse -> TestTree testCreateTapesResponse = res