{-# 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.S3.RestoreObject
-- Copyright   : (c) 2013-2023 Brendan Hay
-- License     : Mozilla Public License, v. 2.0.
-- Maintainer  : Brendan Hay
-- Stability   : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Restores an archived copy of an object back into Amazon S3
--
-- This action is not supported by Amazon S3 on Outposts.
--
-- This action performs the following types of requests:
--
-- -   @select@ - Perform a select query on an archived object
--
-- -   @restore an archive@ - Restore an archived object
--
-- To use this operation, you must have permissions to perform the
-- @s3:RestoreObject@ action. The bucket owner has this permission by
-- default and can grant this permission to others. For more information
-- about permissions, see
-- <https://docs.aws.amazon.com/AmazonS3/latest/userguide/using-with-s3-actions.html#using-with-s3-actions-related-to-bucket-subresources Permissions Related to Bucket Subresource Operations>
-- and
-- <https://docs.aws.amazon.com/AmazonS3/latest/userguide/s3-access-control.html Managing Access Permissions to Your Amazon S3 Resources>
-- in the /Amazon S3 User Guide/.
--
-- __Querying Archives with Select Requests__
--
-- You use a select type of request to perform SQL queries on archived
-- objects. The archived objects that are being queried by the select
-- request must be formatted as uncompressed comma-separated values (CSV)
-- files. You can run queries and custom analytics on your archived data
-- without having to restore your data to a hotter Amazon S3 tier. For an
-- overview about select requests, see
-- <https://docs.aws.amazon.com/AmazonS3/latest/dev/querying-glacier-archives.html Querying Archived Objects>
-- in the /Amazon S3 User Guide/.
--
-- When making a select request, do the following:
--
-- -   Define an output location for the select query\'s output. This must
--     be an Amazon S3 bucket in the same Amazon Web Services Region as the
--     bucket that contains the archive object that is being queried. The
--     Amazon Web Services account that initiates the job must have
--     permissions to write to the S3 bucket. You can specify the storage
--     class and encryption for the output objects stored in the bucket.
--     For more information about output, see
--     <https://docs.aws.amazon.com/AmazonS3/latest/dev/querying-glacier-archives.html Querying Archived Objects>
--     in the /Amazon S3 User Guide/.
--
--     For more information about the @S3@ structure in the request body,
--     see the following:
--
--     -   <https://docs.aws.amazon.com/AmazonS3/latest/API/API_PutObject.html PutObject>
--
--     -   <https://docs.aws.amazon.com/AmazonS3/latest/dev/S3_ACLs_UsingACLs.html Managing Access with ACLs>
--         in the /Amazon S3 User Guide/
--
--     -   <https://docs.aws.amazon.com/AmazonS3/latest/dev/serv-side-encryption.html Protecting Data Using Server-Side Encryption>
--         in the /Amazon S3 User Guide/
--
-- -   Define the SQL expression for the @SELECT@ type of restoration for
--     your query in the request body\'s @SelectParameters@ structure. You
--     can use expressions like the following examples.
--
--     -   The following expression returns all records from the specified
--         object.
--
--         @SELECT * FROM Object@
--
--     -   Assuming that you are not using any headers for data stored in
--         the object, you can specify columns with positional headers.
--
--         @SELECT s._1, s._2 FROM Object s WHERE s._3 > 100@
--
--     -   If you have headers and you set the @fileHeaderInfo@ in the
--         @CSV@ structure in the request body to @USE@, you can specify
--         headers in the query. (If you set the @fileHeaderInfo@ field to
--         @IGNORE@, the first row is skipped for the query.) You cannot
--         mix ordinal positions with header column names.
--
--         @SELECT s.Id, s.FirstName, s.SSN FROM S3Object s@
--
-- For more information about using SQL with S3 Glacier Select restore, see
-- <https://docs.aws.amazon.com/AmazonS3/latest/dev/s3-glacier-select-sql-reference.html SQL Reference for Amazon S3 Select and S3 Glacier Select>
-- in the /Amazon S3 User Guide/.
--
-- When making a select request, you can also do the following:
--
-- -   To expedite your queries, specify the @Expedited@ tier. For more
--     information about tiers, see \"Restoring Archives,\" later in this
--     topic.
--
-- -   Specify details about the data serialization format of both the
--     input object that is being queried and the serialization of the
--     CSV-encoded query results.
--
-- The following are additional important facts about the select feature:
--
-- -   The output results are new Amazon S3 objects. Unlike archive
--     retrievals, they are stored until explicitly deleted-manually or
--     through a lifecycle policy.
--
-- -   You can issue more than one select request on the same Amazon S3
--     object. Amazon S3 doesn\'t deduplicate requests, so avoid issuing
--     duplicate requests.
--
-- -   Amazon S3 accepts a select request even if the object has already
--     been restored. A select request doesn’t return error response @409@.
--
-- __Restoring objects__
--
-- Objects that you archive to the S3 Glacier or S3 Glacier Deep Archive
-- storage class, and S3 Intelligent-Tiering Archive or S3
-- Intelligent-Tiering Deep Archive tiers are not accessible in real time.
-- For objects in Archive Access or Deep Archive Access tiers you must
-- first initiate a restore request, and then wait until the object is
-- moved into the Frequent Access tier. For objects in S3 Glacier or S3
-- Glacier Deep Archive storage classes you must first initiate a restore
-- request, and then wait until a temporary copy of the object is
-- available. To access an archived object, you must restore the object for
-- the duration (number of days) that you specify.
--
-- To restore a specific object version, you can provide a version ID. If
-- you don\'t provide a version ID, Amazon S3 restores the current version.
--
-- When restoring an archived object (or using a select request), you can
-- specify one of the following data access tier options in the @Tier@
-- element of the request body:
--
-- -   @Expedited@ - Expedited retrievals allow you to quickly access your
--     data stored in the S3 Glacier storage class or S3
--     Intelligent-Tiering Archive tier when occasional urgent requests for
--     a subset of archives are required. For all but the largest archived
--     objects (250 MB+), data accessed using Expedited retrievals is
--     typically made available within 1–5 minutes. Provisioned capacity
--     ensures that retrieval capacity for Expedited retrievals is
--     available when you need it. Expedited retrievals and provisioned
--     capacity are not available for objects stored in the S3 Glacier Deep
--     Archive storage class or S3 Intelligent-Tiering Deep Archive tier.
--
-- -   @Standard@ - Standard retrievals allow you to access any of your
--     archived objects within several hours. This is the default option
--     for retrieval requests that do not specify the retrieval option.
--     Standard retrievals typically finish within 3–5 hours for objects
--     stored in the S3 Glacier storage class or S3 Intelligent-Tiering
--     Archive tier. They typically finish within 12 hours for objects
--     stored in the S3 Glacier Deep Archive storage class or S3
--     Intelligent-Tiering Deep Archive tier. Standard retrievals are free
--     for objects stored in S3 Intelligent-Tiering.
--
-- -   @Bulk@ - Bulk retrievals are the lowest-cost retrieval option in S3
--     Glacier, enabling you to retrieve large amounts, even petabytes, of
--     data inexpensively. Bulk retrievals typically finish within 5–12
--     hours for objects stored in the S3 Glacier storage class or S3
--     Intelligent-Tiering Archive tier. They typically finish within 48
--     hours for objects stored in the S3 Glacier Deep Archive storage
--     class or S3 Intelligent-Tiering Deep Archive tier. Bulk retrievals
--     are free for objects stored in S3 Intelligent-Tiering.
--
-- For more information about archive retrieval options and provisioned
-- capacity for @Expedited@ data access, see
-- <https://docs.aws.amazon.com/AmazonS3/latest/dev/restoring-objects.html Restoring Archived Objects>
-- in the /Amazon S3 User Guide/.
--
-- You can use Amazon S3 restore speed upgrade to change the restore speed
-- to a faster speed while it is in progress. For more information, see
-- <https://docs.aws.amazon.com/AmazonS3/latest/dev/restoring-objects.html#restoring-objects-upgrade-tier.title.html Upgrading the speed of an in-progress restore>
-- in the /Amazon S3 User Guide/.
--
-- To get the status of object restoration, you can send a @HEAD@ request.
-- Operations return the @x-amz-restore@ header, which provides information
-- about the restoration status, in the response. You can use Amazon S3
-- event notifications to notify you when a restore is initiated or
-- completed. For more information, see
-- <https://docs.aws.amazon.com/AmazonS3/latest/dev/NotificationHowTo.html Configuring Amazon S3 Event Notifications>
-- in the /Amazon S3 User Guide/.
--
-- After restoring an archived object, you can update the restoration
-- period by reissuing the request with a new period. Amazon S3 updates the
-- restoration period relative to the current time and charges only for the
-- request-there are no data transfer charges. You cannot update the
-- restoration period when Amazon S3 is actively processing your current
-- restore request for the object.
--
-- If your bucket has a lifecycle configuration with a rule that includes
-- an expiration action, the object expiration overrides the life span that
-- you specify in a restore request. For example, if you restore an object
-- copy for 10 days, but the object is scheduled to expire in 3 days,
-- Amazon S3 deletes the object in 3 days. For more information about
-- lifecycle configuration, see
-- <https://docs.aws.amazon.com/AmazonS3/latest/API/API_PutBucketLifecycleConfiguration.html PutBucketLifecycleConfiguration>
-- and
-- <https://docs.aws.amazon.com/AmazonS3/latest/dev/object-lifecycle-mgmt.html Object Lifecycle Management>
-- in /Amazon S3 User Guide/.
--
-- __Responses__
--
-- A successful action returns either the @200 OK@ or @202 Accepted@ status
-- code.
--
-- -   If the object is not previously restored, then Amazon S3 returns
--     @202 Accepted@ in the response.
--
-- -   If the object is previously restored, Amazon S3 returns @200 OK@ in
--     the response.
--
-- __Special Errors__
--
-- -   -   /Code: RestoreAlreadyInProgress/
--
--     -   /Cause: Object restore is already in progress. (This error does
--         not apply to SELECT type requests.)/
--
--     -   /HTTP Status Code: 409 Conflict/
--
--     -   /SOAP Fault Code Prefix: Client/
--
-- -   -   /Code: GlacierExpeditedRetrievalNotAvailable/
--
--     -   /Cause: expedited retrievals are currently not available. Try
--         again later. (Returned if there is insufficient capacity to
--         process the Expedited request. This error applies only to
--         Expedited retrievals and not to S3 Standard or Bulk
--         retrievals.)/
--
--     -   /HTTP Status Code: 503/
--
--     -   /SOAP Fault Code Prefix: N\/A/
--
-- __Related Resources__
--
-- -   <https://docs.aws.amazon.com/AmazonS3/latest/API/API_PutBucketLifecycleConfiguration.html PutBucketLifecycleConfiguration>
--
-- -   <https://docs.aws.amazon.com/AmazonS3/latest/API/API_GetBucketNotificationConfiguration.html GetBucketNotificationConfiguration>
--
-- -   <https://docs.aws.amazon.com/AmazonS3/latest/dev/s3-glacier-select-sql-reference.html SQL Reference for Amazon S3 Select and S3 Glacier Select>
--     in the /Amazon S3 User Guide/
module Amazonka.S3.RestoreObject
  ( -- * Creating a Request
    RestoreObject (..),
    newRestoreObject,

    -- * Request Lenses
    restoreObject_checksumAlgorithm,
    restoreObject_expectedBucketOwner,
    restoreObject_requestPayer,
    restoreObject_restoreRequest,
    restoreObject_versionId,
    restoreObject_bucket,
    restoreObject_key,

    -- * Destructuring the Response
    RestoreObjectResponse (..),
    newRestoreObjectResponse,

    -- * Response Lenses
    restoreObjectResponse_requestCharged,
    restoreObjectResponse_restoreOutputPath,
    restoreObjectResponse_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.S3.Types

-- | /See:/ 'newRestoreObject' smart constructor.
data RestoreObject = RestoreObject'
  { -- | Indicates the algorithm used to create the checksum for the object when
    -- using the SDK. This header will not provide any additional functionality
    -- if not using the SDK. When sending this header, there must be a
    -- corresponding @x-amz-checksum@ or @x-amz-trailer@ header sent.
    -- Otherwise, Amazon S3 fails the request with the HTTP status code
    -- @400 Bad Request@. For more information, see
    -- <https://docs.aws.amazon.com/AmazonS3/latest/userguide/checking-object-integrity.html Checking object integrity>
    -- in the /Amazon S3 User Guide/.
    --
    -- If you provide an individual checksum, Amazon S3 ignores any provided
    -- @ChecksumAlgorithm@ parameter.
    RestoreObject -> Maybe ChecksumAlgorithm
checksumAlgorithm :: Prelude.Maybe ChecksumAlgorithm,
    -- | The account ID of the expected bucket owner. If the bucket is owned by a
    -- different account, the request fails with the HTTP status code
    -- @403 Forbidden@ (access denied).
    RestoreObject -> Maybe Text
expectedBucketOwner :: Prelude.Maybe Prelude.Text,
    RestoreObject -> Maybe RequestPayer
requestPayer :: Prelude.Maybe RequestPayer,
    RestoreObject -> Maybe RestoreRequest
restoreRequest :: Prelude.Maybe RestoreRequest,
    -- | VersionId used to reference a specific version of the object.
    RestoreObject -> Maybe ObjectVersionId
versionId :: Prelude.Maybe ObjectVersionId,
    -- | The bucket name containing the object to restore.
    --
    -- When using this action with an access point, you must direct requests to
    -- the access point hostname. The access point hostname takes the form
    -- /AccessPointName/-/AccountId/.s3-accesspoint./Region/.amazonaws.com.
    -- When using this action with an access point through the Amazon Web
    -- Services SDKs, you provide the access point ARN in place of the bucket
    -- name. For more information about access point ARNs, see
    -- <https://docs.aws.amazon.com/AmazonS3/latest/userguide/using-access-points.html Using access points>
    -- in the /Amazon S3 User Guide/.
    --
    -- When using this action with Amazon S3 on Outposts, you must direct
    -- requests to the S3 on Outposts hostname. The S3 on Outposts hostname
    -- takes the form
    -- @ @/@AccessPointName@/@-@/@AccountId@/@.@/@outpostID@/@.s3-outposts.@/@Region@/@.amazonaws.com@.
    -- When using this action with S3 on Outposts through the Amazon Web
    -- Services SDKs, you provide the Outposts bucket ARN in place of the
    -- bucket name. For more information about S3 on Outposts ARNs, see
    -- <https://docs.aws.amazon.com/AmazonS3/latest/userguide/S3onOutposts.html Using Amazon S3 on Outposts>
    -- in the /Amazon S3 User Guide/.
    RestoreObject -> BucketName
bucket :: BucketName,
    -- | Object key for which the action was initiated.
    RestoreObject -> ObjectKey
key :: ObjectKey
  }
  deriving (RestoreObject -> RestoreObject -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: RestoreObject -> RestoreObject -> Bool
$c/= :: RestoreObject -> RestoreObject -> Bool
== :: RestoreObject -> RestoreObject -> Bool
$c== :: RestoreObject -> RestoreObject -> Bool
Prelude.Eq, Int -> RestoreObject -> ShowS
[RestoreObject] -> ShowS
RestoreObject -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [RestoreObject] -> ShowS
$cshowList :: [RestoreObject] -> ShowS
show :: RestoreObject -> String
$cshow :: RestoreObject -> String
showsPrec :: Int -> RestoreObject -> ShowS
$cshowsPrec :: Int -> RestoreObject -> ShowS
Prelude.Show, forall x. Rep RestoreObject x -> RestoreObject
forall x. RestoreObject -> Rep RestoreObject x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep RestoreObject x -> RestoreObject
$cfrom :: forall x. RestoreObject -> Rep RestoreObject x
Prelude.Generic)

-- |
-- Create a value of 'RestoreObject' 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:
--
-- 'checksumAlgorithm', 'restoreObject_checksumAlgorithm' - Indicates the algorithm used to create the checksum for the object when
-- using the SDK. This header will not provide any additional functionality
-- if not using the SDK. When sending this header, there must be a
-- corresponding @x-amz-checksum@ or @x-amz-trailer@ header sent.
-- Otherwise, Amazon S3 fails the request with the HTTP status code
-- @400 Bad Request@. For more information, see
-- <https://docs.aws.amazon.com/AmazonS3/latest/userguide/checking-object-integrity.html Checking object integrity>
-- in the /Amazon S3 User Guide/.
--
-- If you provide an individual checksum, Amazon S3 ignores any provided
-- @ChecksumAlgorithm@ parameter.
--
-- 'expectedBucketOwner', 'restoreObject_expectedBucketOwner' - The account ID of the expected bucket owner. If the bucket is owned by a
-- different account, the request fails with the HTTP status code
-- @403 Forbidden@ (access denied).
--
-- 'requestPayer', 'restoreObject_requestPayer' - Undocumented member.
--
-- 'restoreRequest', 'restoreObject_restoreRequest' - Undocumented member.
--
-- 'versionId', 'restoreObject_versionId' - VersionId used to reference a specific version of the object.
--
-- 'bucket', 'restoreObject_bucket' - The bucket name containing the object to restore.
--
-- When using this action with an access point, you must direct requests to
-- the access point hostname. The access point hostname takes the form
-- /AccessPointName/-/AccountId/.s3-accesspoint./Region/.amazonaws.com.
-- When using this action with an access point through the Amazon Web
-- Services SDKs, you provide the access point ARN in place of the bucket
-- name. For more information about access point ARNs, see
-- <https://docs.aws.amazon.com/AmazonS3/latest/userguide/using-access-points.html Using access points>
-- in the /Amazon S3 User Guide/.
--
-- When using this action with Amazon S3 on Outposts, you must direct
-- requests to the S3 on Outposts hostname. The S3 on Outposts hostname
-- takes the form
-- @ @/@AccessPointName@/@-@/@AccountId@/@.@/@outpostID@/@.s3-outposts.@/@Region@/@.amazonaws.com@.
-- When using this action with S3 on Outposts through the Amazon Web
-- Services SDKs, you provide the Outposts bucket ARN in place of the
-- bucket name. For more information about S3 on Outposts ARNs, see
-- <https://docs.aws.amazon.com/AmazonS3/latest/userguide/S3onOutposts.html Using Amazon S3 on Outposts>
-- in the /Amazon S3 User Guide/.
--
-- 'key', 'restoreObject_key' - Object key for which the action was initiated.
newRestoreObject ::
  -- | 'bucket'
  BucketName ->
  -- | 'key'
  ObjectKey ->
  RestoreObject
newRestoreObject :: BucketName -> ObjectKey -> RestoreObject
newRestoreObject BucketName
pBucket_ ObjectKey
pKey_ =
  RestoreObject'
    { $sel:checksumAlgorithm:RestoreObject' :: Maybe ChecksumAlgorithm
checksumAlgorithm = forall a. Maybe a
Prelude.Nothing,
      $sel:expectedBucketOwner:RestoreObject' :: Maybe Text
expectedBucketOwner = forall a. Maybe a
Prelude.Nothing,
      $sel:requestPayer:RestoreObject' :: Maybe RequestPayer
requestPayer = forall a. Maybe a
Prelude.Nothing,
      $sel:restoreRequest:RestoreObject' :: Maybe RestoreRequest
restoreRequest = forall a. Maybe a
Prelude.Nothing,
      $sel:versionId:RestoreObject' :: Maybe ObjectVersionId
versionId = forall a. Maybe a
Prelude.Nothing,
      $sel:bucket:RestoreObject' :: BucketName
bucket = BucketName
pBucket_,
      $sel:key:RestoreObject' :: ObjectKey
key = ObjectKey
pKey_
    }

-- | Indicates the algorithm used to create the checksum for the object when
-- using the SDK. This header will not provide any additional functionality
-- if not using the SDK. When sending this header, there must be a
-- corresponding @x-amz-checksum@ or @x-amz-trailer@ header sent.
-- Otherwise, Amazon S3 fails the request with the HTTP status code
-- @400 Bad Request@. For more information, see
-- <https://docs.aws.amazon.com/AmazonS3/latest/userguide/checking-object-integrity.html Checking object integrity>
-- in the /Amazon S3 User Guide/.
--
-- If you provide an individual checksum, Amazon S3 ignores any provided
-- @ChecksumAlgorithm@ parameter.
restoreObject_checksumAlgorithm :: Lens.Lens' RestoreObject (Prelude.Maybe ChecksumAlgorithm)
restoreObject_checksumAlgorithm :: Lens' RestoreObject (Maybe ChecksumAlgorithm)
restoreObject_checksumAlgorithm = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RestoreObject' {Maybe ChecksumAlgorithm
checksumAlgorithm :: Maybe ChecksumAlgorithm
$sel:checksumAlgorithm:RestoreObject' :: RestoreObject -> Maybe ChecksumAlgorithm
checksumAlgorithm} -> Maybe ChecksumAlgorithm
checksumAlgorithm) (\s :: RestoreObject
s@RestoreObject' {} Maybe ChecksumAlgorithm
a -> RestoreObject
s {$sel:checksumAlgorithm:RestoreObject' :: Maybe ChecksumAlgorithm
checksumAlgorithm = Maybe ChecksumAlgorithm
a} :: RestoreObject)

-- | The account ID of the expected bucket owner. If the bucket is owned by a
-- different account, the request fails with the HTTP status code
-- @403 Forbidden@ (access denied).
restoreObject_expectedBucketOwner :: Lens.Lens' RestoreObject (Prelude.Maybe Prelude.Text)
restoreObject_expectedBucketOwner :: Lens' RestoreObject (Maybe Text)
restoreObject_expectedBucketOwner = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RestoreObject' {Maybe Text
expectedBucketOwner :: Maybe Text
$sel:expectedBucketOwner:RestoreObject' :: RestoreObject -> Maybe Text
expectedBucketOwner} -> Maybe Text
expectedBucketOwner) (\s :: RestoreObject
s@RestoreObject' {} Maybe Text
a -> RestoreObject
s {$sel:expectedBucketOwner:RestoreObject' :: Maybe Text
expectedBucketOwner = Maybe Text
a} :: RestoreObject)

-- | Undocumented member.
restoreObject_requestPayer :: Lens.Lens' RestoreObject (Prelude.Maybe RequestPayer)
restoreObject_requestPayer :: Lens' RestoreObject (Maybe RequestPayer)
restoreObject_requestPayer = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RestoreObject' {Maybe RequestPayer
requestPayer :: Maybe RequestPayer
$sel:requestPayer:RestoreObject' :: RestoreObject -> Maybe RequestPayer
requestPayer} -> Maybe RequestPayer
requestPayer) (\s :: RestoreObject
s@RestoreObject' {} Maybe RequestPayer
a -> RestoreObject
s {$sel:requestPayer:RestoreObject' :: Maybe RequestPayer
requestPayer = Maybe RequestPayer
a} :: RestoreObject)

-- | Undocumented member.
restoreObject_restoreRequest :: Lens.Lens' RestoreObject (Prelude.Maybe RestoreRequest)
restoreObject_restoreRequest :: Lens' RestoreObject (Maybe RestoreRequest)
restoreObject_restoreRequest = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RestoreObject' {Maybe RestoreRequest
restoreRequest :: Maybe RestoreRequest
$sel:restoreRequest:RestoreObject' :: RestoreObject -> Maybe RestoreRequest
restoreRequest} -> Maybe RestoreRequest
restoreRequest) (\s :: RestoreObject
s@RestoreObject' {} Maybe RestoreRequest
a -> RestoreObject
s {$sel:restoreRequest:RestoreObject' :: Maybe RestoreRequest
restoreRequest = Maybe RestoreRequest
a} :: RestoreObject)

-- | VersionId used to reference a specific version of the object.
restoreObject_versionId :: Lens.Lens' RestoreObject (Prelude.Maybe ObjectVersionId)
restoreObject_versionId :: Lens' RestoreObject (Maybe ObjectVersionId)
restoreObject_versionId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RestoreObject' {Maybe ObjectVersionId
versionId :: Maybe ObjectVersionId
$sel:versionId:RestoreObject' :: RestoreObject -> Maybe ObjectVersionId
versionId} -> Maybe ObjectVersionId
versionId) (\s :: RestoreObject
s@RestoreObject' {} Maybe ObjectVersionId
a -> RestoreObject
s {$sel:versionId:RestoreObject' :: Maybe ObjectVersionId
versionId = Maybe ObjectVersionId
a} :: RestoreObject)

-- | The bucket name containing the object to restore.
--
-- When using this action with an access point, you must direct requests to
-- the access point hostname. The access point hostname takes the form
-- /AccessPointName/-/AccountId/.s3-accesspoint./Region/.amazonaws.com.
-- When using this action with an access point through the Amazon Web
-- Services SDKs, you provide the access point ARN in place of the bucket
-- name. For more information about access point ARNs, see
-- <https://docs.aws.amazon.com/AmazonS3/latest/userguide/using-access-points.html Using access points>
-- in the /Amazon S3 User Guide/.
--
-- When using this action with Amazon S3 on Outposts, you must direct
-- requests to the S3 on Outposts hostname. The S3 on Outposts hostname
-- takes the form
-- @ @/@AccessPointName@/@-@/@AccountId@/@.@/@outpostID@/@.s3-outposts.@/@Region@/@.amazonaws.com@.
-- When using this action with S3 on Outposts through the Amazon Web
-- Services SDKs, you provide the Outposts bucket ARN in place of the
-- bucket name. For more information about S3 on Outposts ARNs, see
-- <https://docs.aws.amazon.com/AmazonS3/latest/userguide/S3onOutposts.html Using Amazon S3 on Outposts>
-- in the /Amazon S3 User Guide/.
restoreObject_bucket :: Lens.Lens' RestoreObject BucketName
restoreObject_bucket :: Lens' RestoreObject BucketName
restoreObject_bucket = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RestoreObject' {BucketName
bucket :: BucketName
$sel:bucket:RestoreObject' :: RestoreObject -> BucketName
bucket} -> BucketName
bucket) (\s :: RestoreObject
s@RestoreObject' {} BucketName
a -> RestoreObject
s {$sel:bucket:RestoreObject' :: BucketName
bucket = BucketName
a} :: RestoreObject)

-- | Object key for which the action was initiated.
restoreObject_key :: Lens.Lens' RestoreObject ObjectKey
restoreObject_key :: Lens' RestoreObject ObjectKey
restoreObject_key = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RestoreObject' {ObjectKey
key :: ObjectKey
$sel:key:RestoreObject' :: RestoreObject -> ObjectKey
key} -> ObjectKey
key) (\s :: RestoreObject
s@RestoreObject' {} ObjectKey
a -> RestoreObject
s {$sel:key:RestoreObject' :: ObjectKey
key = ObjectKey
a} :: RestoreObject)

instance Core.AWSRequest RestoreObject where
  type
    AWSResponse RestoreObject =
      RestoreObjectResponse
  request :: (Service -> Service) -> RestoreObject -> Request RestoreObject
request Service -> Service
overrides =
    forall a. Request a -> Request a
Request.s3vhost
      forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall a. (ToRequest a, ToElement a) => Service -> a -> Request a
Request.postXML (Service -> Service
overrides Service
defaultService)
  response :: forall (m :: * -> *).
MonadResource m =>
(ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy RestoreObject
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse RestoreObject)))
response =
    forall (m :: * -> *) a.
MonadResource m =>
(Int -> ResponseHeaders -> () -> Either String (AWSResponse a))
-> (ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy a
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse a)))
Response.receiveEmpty
      ( \Int
s ResponseHeaders
h ()
x ->
          Maybe RequestCharged -> Maybe Text -> Int -> RestoreObjectResponse
RestoreObjectResponse'
            forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (ResponseHeaders
h forall a.
FromText a =>
ResponseHeaders -> HeaderName -> Either String (Maybe a)
Data..#? HeaderName
"x-amz-request-charged")
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (ResponseHeaders
h forall a.
FromText a =>
ResponseHeaders -> HeaderName -> Either String (Maybe a)
Data..#? HeaderName
"x-amz-restore-output-path")
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure (forall a. Enum a => a -> Int
Prelude.fromEnum Int
s))
      )

instance Prelude.Hashable RestoreObject where
  hashWithSalt :: Int -> RestoreObject -> Int
hashWithSalt Int
_salt RestoreObject' {Maybe Text
Maybe ObjectVersionId
Maybe ChecksumAlgorithm
Maybe RequestPayer
Maybe RestoreRequest
ObjectKey
BucketName
key :: ObjectKey
bucket :: BucketName
versionId :: Maybe ObjectVersionId
restoreRequest :: Maybe RestoreRequest
requestPayer :: Maybe RequestPayer
expectedBucketOwner :: Maybe Text
checksumAlgorithm :: Maybe ChecksumAlgorithm
$sel:key:RestoreObject' :: RestoreObject -> ObjectKey
$sel:bucket:RestoreObject' :: RestoreObject -> BucketName
$sel:versionId:RestoreObject' :: RestoreObject -> Maybe ObjectVersionId
$sel:restoreRequest:RestoreObject' :: RestoreObject -> Maybe RestoreRequest
$sel:requestPayer:RestoreObject' :: RestoreObject -> Maybe RequestPayer
$sel:expectedBucketOwner:RestoreObject' :: RestoreObject -> Maybe Text
$sel:checksumAlgorithm:RestoreObject' :: RestoreObject -> Maybe ChecksumAlgorithm
..} =
    Int
_salt
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe ChecksumAlgorithm
checksumAlgorithm
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
expectedBucketOwner
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe RequestPayer
requestPayer
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe RestoreRequest
restoreRequest
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe ObjectVersionId
versionId
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` BucketName
bucket
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` ObjectKey
key

instance Prelude.NFData RestoreObject where
  rnf :: RestoreObject -> ()
rnf RestoreObject' {Maybe Text
Maybe ObjectVersionId
Maybe ChecksumAlgorithm
Maybe RequestPayer
Maybe RestoreRequest
ObjectKey
BucketName
key :: ObjectKey
bucket :: BucketName
versionId :: Maybe ObjectVersionId
restoreRequest :: Maybe RestoreRequest
requestPayer :: Maybe RequestPayer
expectedBucketOwner :: Maybe Text
checksumAlgorithm :: Maybe ChecksumAlgorithm
$sel:key:RestoreObject' :: RestoreObject -> ObjectKey
$sel:bucket:RestoreObject' :: RestoreObject -> BucketName
$sel:versionId:RestoreObject' :: RestoreObject -> Maybe ObjectVersionId
$sel:restoreRequest:RestoreObject' :: RestoreObject -> Maybe RestoreRequest
$sel:requestPayer:RestoreObject' :: RestoreObject -> Maybe RequestPayer
$sel:expectedBucketOwner:RestoreObject' :: RestoreObject -> Maybe Text
$sel:checksumAlgorithm:RestoreObject' :: RestoreObject -> Maybe ChecksumAlgorithm
..} =
    forall a. NFData a => a -> ()
Prelude.rnf Maybe ChecksumAlgorithm
checksumAlgorithm
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
expectedBucketOwner
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe RequestPayer
requestPayer
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe RestoreRequest
restoreRequest
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe ObjectVersionId
versionId
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf BucketName
bucket
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf ObjectKey
key

instance Data.ToElement RestoreObject where
  toElement :: RestoreObject -> Element
toElement RestoreObject' {Maybe Text
Maybe ObjectVersionId
Maybe ChecksumAlgorithm
Maybe RequestPayer
Maybe RestoreRequest
ObjectKey
BucketName
key :: ObjectKey
bucket :: BucketName
versionId :: Maybe ObjectVersionId
restoreRequest :: Maybe RestoreRequest
requestPayer :: Maybe RequestPayer
expectedBucketOwner :: Maybe Text
checksumAlgorithm :: Maybe ChecksumAlgorithm
$sel:key:RestoreObject' :: RestoreObject -> ObjectKey
$sel:bucket:RestoreObject' :: RestoreObject -> BucketName
$sel:versionId:RestoreObject' :: RestoreObject -> Maybe ObjectVersionId
$sel:restoreRequest:RestoreObject' :: RestoreObject -> Maybe RestoreRequest
$sel:requestPayer:RestoreObject' :: RestoreObject -> Maybe RequestPayer
$sel:expectedBucketOwner:RestoreObject' :: RestoreObject -> Maybe Text
$sel:checksumAlgorithm:RestoreObject' :: RestoreObject -> Maybe ChecksumAlgorithm
..} =
    forall a. ToXML a => Name -> a -> Element
Data.mkElement
      Name
"{http://s3.amazonaws.com/doc/2006-03-01/}RestoreRequest"
      Maybe RestoreRequest
restoreRequest

instance Data.ToHeaders RestoreObject where
  toHeaders :: RestoreObject -> ResponseHeaders
toHeaders RestoreObject' {Maybe Text
Maybe ObjectVersionId
Maybe ChecksumAlgorithm
Maybe RequestPayer
Maybe RestoreRequest
ObjectKey
BucketName
key :: ObjectKey
bucket :: BucketName
versionId :: Maybe ObjectVersionId
restoreRequest :: Maybe RestoreRequest
requestPayer :: Maybe RequestPayer
expectedBucketOwner :: Maybe Text
checksumAlgorithm :: Maybe ChecksumAlgorithm
$sel:key:RestoreObject' :: RestoreObject -> ObjectKey
$sel:bucket:RestoreObject' :: RestoreObject -> BucketName
$sel:versionId:RestoreObject' :: RestoreObject -> Maybe ObjectVersionId
$sel:restoreRequest:RestoreObject' :: RestoreObject -> Maybe RestoreRequest
$sel:requestPayer:RestoreObject' :: RestoreObject -> Maybe RequestPayer
$sel:expectedBucketOwner:RestoreObject' :: RestoreObject -> Maybe Text
$sel:checksumAlgorithm:RestoreObject' :: RestoreObject -> Maybe ChecksumAlgorithm
..} =
    forall a. Monoid a => [a] -> a
Prelude.mconcat
      [ HeaderName
"x-amz-sdk-checksum-algorithm"
          forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# Maybe ChecksumAlgorithm
checksumAlgorithm,
        HeaderName
"x-amz-expected-bucket-owner"
          forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# Maybe Text
expectedBucketOwner,
        HeaderName
"x-amz-request-payer" forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# Maybe RequestPayer
requestPayer
      ]

instance Data.ToPath RestoreObject where
  toPath :: RestoreObject -> ByteString
toPath RestoreObject' {Maybe Text
Maybe ObjectVersionId
Maybe ChecksumAlgorithm
Maybe RequestPayer
Maybe RestoreRequest
ObjectKey
BucketName
key :: ObjectKey
bucket :: BucketName
versionId :: Maybe ObjectVersionId
restoreRequest :: Maybe RestoreRequest
requestPayer :: Maybe RequestPayer
expectedBucketOwner :: Maybe Text
checksumAlgorithm :: Maybe ChecksumAlgorithm
$sel:key:RestoreObject' :: RestoreObject -> ObjectKey
$sel:bucket:RestoreObject' :: RestoreObject -> BucketName
$sel:versionId:RestoreObject' :: RestoreObject -> Maybe ObjectVersionId
$sel:restoreRequest:RestoreObject' :: RestoreObject -> Maybe RestoreRequest
$sel:requestPayer:RestoreObject' :: RestoreObject -> Maybe RequestPayer
$sel:expectedBucketOwner:RestoreObject' :: RestoreObject -> Maybe Text
$sel:checksumAlgorithm:RestoreObject' :: RestoreObject -> Maybe ChecksumAlgorithm
..} =
    forall a. Monoid a => [a] -> a
Prelude.mconcat
      [ByteString
"/", forall a. ToByteString a => a -> ByteString
Data.toBS BucketName
bucket, ByteString
"/", forall a. ToByteString a => a -> ByteString
Data.toBS ObjectKey
key]

instance Data.ToQuery RestoreObject where
  toQuery :: RestoreObject -> QueryString
toQuery RestoreObject' {Maybe Text
Maybe ObjectVersionId
Maybe ChecksumAlgorithm
Maybe RequestPayer
Maybe RestoreRequest
ObjectKey
BucketName
key :: ObjectKey
bucket :: BucketName
versionId :: Maybe ObjectVersionId
restoreRequest :: Maybe RestoreRequest
requestPayer :: Maybe RequestPayer
expectedBucketOwner :: Maybe Text
checksumAlgorithm :: Maybe ChecksumAlgorithm
$sel:key:RestoreObject' :: RestoreObject -> ObjectKey
$sel:bucket:RestoreObject' :: RestoreObject -> BucketName
$sel:versionId:RestoreObject' :: RestoreObject -> Maybe ObjectVersionId
$sel:restoreRequest:RestoreObject' :: RestoreObject -> Maybe RestoreRequest
$sel:requestPayer:RestoreObject' :: RestoreObject -> Maybe RequestPayer
$sel:expectedBucketOwner:RestoreObject' :: RestoreObject -> Maybe Text
$sel:checksumAlgorithm:RestoreObject' :: RestoreObject -> Maybe ChecksumAlgorithm
..} =
    forall a. Monoid a => [a] -> a
Prelude.mconcat
      [ByteString
"versionId" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe ObjectVersionId
versionId, QueryString
"restore"]

-- | /See:/ 'newRestoreObjectResponse' smart constructor.
data RestoreObjectResponse = RestoreObjectResponse'
  { RestoreObjectResponse -> Maybe RequestCharged
requestCharged :: Prelude.Maybe RequestCharged,
    -- | Indicates the path in the provided S3 output location where Select
    -- results will be restored to.
    RestoreObjectResponse -> Maybe Text
restoreOutputPath :: Prelude.Maybe Prelude.Text,
    -- | The response's http status code.
    RestoreObjectResponse -> Int
httpStatus :: Prelude.Int
  }
  deriving (RestoreObjectResponse -> RestoreObjectResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: RestoreObjectResponse -> RestoreObjectResponse -> Bool
$c/= :: RestoreObjectResponse -> RestoreObjectResponse -> Bool
== :: RestoreObjectResponse -> RestoreObjectResponse -> Bool
$c== :: RestoreObjectResponse -> RestoreObjectResponse -> Bool
Prelude.Eq, ReadPrec [RestoreObjectResponse]
ReadPrec RestoreObjectResponse
Int -> ReadS RestoreObjectResponse
ReadS [RestoreObjectResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [RestoreObjectResponse]
$creadListPrec :: ReadPrec [RestoreObjectResponse]
readPrec :: ReadPrec RestoreObjectResponse
$creadPrec :: ReadPrec RestoreObjectResponse
readList :: ReadS [RestoreObjectResponse]
$creadList :: ReadS [RestoreObjectResponse]
readsPrec :: Int -> ReadS RestoreObjectResponse
$creadsPrec :: Int -> ReadS RestoreObjectResponse
Prelude.Read, Int -> RestoreObjectResponse -> ShowS
[RestoreObjectResponse] -> ShowS
RestoreObjectResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [RestoreObjectResponse] -> ShowS
$cshowList :: [RestoreObjectResponse] -> ShowS
show :: RestoreObjectResponse -> String
$cshow :: RestoreObjectResponse -> String
showsPrec :: Int -> RestoreObjectResponse -> ShowS
$cshowsPrec :: Int -> RestoreObjectResponse -> ShowS
Prelude.Show, forall x. Rep RestoreObjectResponse x -> RestoreObjectResponse
forall x. RestoreObjectResponse -> Rep RestoreObjectResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep RestoreObjectResponse x -> RestoreObjectResponse
$cfrom :: forall x. RestoreObjectResponse -> Rep RestoreObjectResponse x
Prelude.Generic)

-- |
-- Create a value of 'RestoreObjectResponse' 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:
--
-- 'requestCharged', 'restoreObjectResponse_requestCharged' - Undocumented member.
--
-- 'restoreOutputPath', 'restoreObjectResponse_restoreOutputPath' - Indicates the path in the provided S3 output location where Select
-- results will be restored to.
--
-- 'httpStatus', 'restoreObjectResponse_httpStatus' - The response's http status code.
newRestoreObjectResponse ::
  -- | 'httpStatus'
  Prelude.Int ->
  RestoreObjectResponse
newRestoreObjectResponse :: Int -> RestoreObjectResponse
newRestoreObjectResponse Int
pHttpStatus_ =
  RestoreObjectResponse'
    { $sel:requestCharged:RestoreObjectResponse' :: Maybe RequestCharged
requestCharged =
        forall a. Maybe a
Prelude.Nothing,
      $sel:restoreOutputPath:RestoreObjectResponse' :: Maybe Text
restoreOutputPath = forall a. Maybe a
Prelude.Nothing,
      $sel:httpStatus:RestoreObjectResponse' :: Int
httpStatus = Int
pHttpStatus_
    }

-- | Undocumented member.
restoreObjectResponse_requestCharged :: Lens.Lens' RestoreObjectResponse (Prelude.Maybe RequestCharged)
restoreObjectResponse_requestCharged :: Lens' RestoreObjectResponse (Maybe RequestCharged)
restoreObjectResponse_requestCharged = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RestoreObjectResponse' {Maybe RequestCharged
requestCharged :: Maybe RequestCharged
$sel:requestCharged:RestoreObjectResponse' :: RestoreObjectResponse -> Maybe RequestCharged
requestCharged} -> Maybe RequestCharged
requestCharged) (\s :: RestoreObjectResponse
s@RestoreObjectResponse' {} Maybe RequestCharged
a -> RestoreObjectResponse
s {$sel:requestCharged:RestoreObjectResponse' :: Maybe RequestCharged
requestCharged = Maybe RequestCharged
a} :: RestoreObjectResponse)

-- | Indicates the path in the provided S3 output location where Select
-- results will be restored to.
restoreObjectResponse_restoreOutputPath :: Lens.Lens' RestoreObjectResponse (Prelude.Maybe Prelude.Text)
restoreObjectResponse_restoreOutputPath :: Lens' RestoreObjectResponse (Maybe Text)
restoreObjectResponse_restoreOutputPath = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RestoreObjectResponse' {Maybe Text
restoreOutputPath :: Maybe Text
$sel:restoreOutputPath:RestoreObjectResponse' :: RestoreObjectResponse -> Maybe Text
restoreOutputPath} -> Maybe Text
restoreOutputPath) (\s :: RestoreObjectResponse
s@RestoreObjectResponse' {} Maybe Text
a -> RestoreObjectResponse
s {$sel:restoreOutputPath:RestoreObjectResponse' :: Maybe Text
restoreOutputPath = Maybe Text
a} :: RestoreObjectResponse)

-- | The response's http status code.
restoreObjectResponse_httpStatus :: Lens.Lens' RestoreObjectResponse Prelude.Int
restoreObjectResponse_httpStatus :: Lens' RestoreObjectResponse Int
restoreObjectResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RestoreObjectResponse' {Int
httpStatus :: Int
$sel:httpStatus:RestoreObjectResponse' :: RestoreObjectResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: RestoreObjectResponse
s@RestoreObjectResponse' {} Int
a -> RestoreObjectResponse
s {$sel:httpStatus:RestoreObjectResponse' :: Int
httpStatus = Int
a} :: RestoreObjectResponse)

instance Prelude.NFData RestoreObjectResponse where
  rnf :: RestoreObjectResponse -> ()
rnf RestoreObjectResponse' {Int
Maybe Text
Maybe RequestCharged
httpStatus :: Int
restoreOutputPath :: Maybe Text
requestCharged :: Maybe RequestCharged
$sel:httpStatus:RestoreObjectResponse' :: RestoreObjectResponse -> Int
$sel:restoreOutputPath:RestoreObjectResponse' :: RestoreObjectResponse -> Maybe Text
$sel:requestCharged:RestoreObjectResponse' :: RestoreObjectResponse -> Maybe RequestCharged
..} =
    forall a. NFData a => a -> ()
Prelude.rnf Maybe RequestCharged
requestCharged
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
restoreOutputPath
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus