Network.AWS.Glacier.GetVaultLock

This operation retrieves the following attributes from the 'lock-policy' subresource set on the specified vault:

• The vault lock policy set on the vault.
• The state of the vault lock, which is either InProgess or Locked.
• When the lock ID expires. The lock ID is used to complete the vault locking process.
• When the vault lock was initiated and put into the InProgress state.

A vault lock is put into the InProgress state by calling InitiateVaultLock. A vault lock is put into the Locked state by calling CompleteVaultLock. You can abort the vault locking process by calling AbortVaultLock. For more information about the vault locking process, Amazon Glacier Vault Lock.

If there is no vault lock policy set on the vault, the operation returns a '404 Not found' error. For more information about vault lock policies, Amazon Glacier Access Control with Vault Lock Policies.

See: AWS API Reference for GetVaultLock.

Creating a Request

getVaultLock

Arguments

:: Text

gvlAccountId

-> Text

gvlVaultName

-> GetVaultLock

Creates a value of GetVaultLock with the minimum fields required to make a request.

Use one of the following lenses to modify other fields as desired:

• gvlAccountId
• gvlVaultName

data GetVaultLock

The input values for GetVaultLock.

See: getVaultLock smart constructor.

Instances

Eq GetVaultLock

Methods

(==) :: GetVaultLock -> GetVaultLock -> Bool

(/=) :: GetVaultLock -> GetVaultLock -> Bool

Data GetVaultLock

Methods

gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> GetVaultLock -> c GetVaultLock

gunfold :: (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c GetVaultLock

toConstr :: GetVaultLock -> Constr

dataTypeOf :: GetVaultLock -> DataType

dataCast1 :: Typeable (* -> *) t => (forall d. Data d => c (t d)) -> Maybe (c GetVaultLock)

dataCast2 :: Typeable (* -> * -> *) t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c GetVaultLock)

gmapT :: (forall b. Data b => b -> b) -> GetVaultLock -> GetVaultLock

gmapQl :: (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> GetVaultLock -> r

gmapQr :: (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> GetVaultLock -> r

gmapQ :: (forall d. Data d => d -> u) -> GetVaultLock -> [u]

gmapQi :: Int -> (forall d. Data d => d -> u) -> GetVaultLock -> u

gmapM :: Monad m => (forall d. Data d => d -> m d) -> GetVaultLock -> m GetVaultLock

gmapMp :: MonadPlus m => (forall d. Data d => d -> m d) -> GetVaultLock -> m GetVaultLock

gmapMo :: MonadPlus m => (forall d. Data d => d -> m d) -> GetVaultLock -> m GetVaultLock

Read GetVaultLock

Methods

readsPrec :: Int -> ReadS GetVaultLock

readList :: ReadS [GetVaultLock]

readPrec :: ReadPrec GetVaultLock

readListPrec :: ReadPrec [GetVaultLock]

Show GetVaultLock

Methods

showsPrec :: Int -> GetVaultLock -> ShowS

show :: GetVaultLock -> String

showList :: [GetVaultLock] -> ShowS

Generic GetVaultLock

Associated Types

type Rep GetVaultLock :: * -> *

Methods

from :: GetVaultLock -> Rep GetVaultLock x

to :: Rep GetVaultLock x -> GetVaultLock

AWSRequest GetVaultLock

Associated Types

type Rs GetVaultLock :: *

Methods

request :: GetVaultLock -> Request GetVaultLock

response :: MonadResource m => Logger -> Service -> Proxy * GetVaultLock -> ClientResponse -> m (Response GetVaultLock)

ToQuery GetVaultLock

Methods

toQuery :: GetVaultLock -> QueryString

ToPath GetVaultLock

Methods

toPath :: GetVaultLock -> ByteString

ToHeaders GetVaultLock

Methods

toHeaders :: GetVaultLock -> [Header]

type Rep GetVaultLock

type Rep GetVaultLock = D1 (MetaData "GetVaultLock" "Network.AWS.Glacier.GetVaultLock" "amazonka-glacier-1.3.7-Dh9gbv8nf1fFDUYZRjXX0m" False) (C1 (MetaCons "GetVaultLock'" PrefixI True) ((:*:) (S1 (MetaSel (Just Symbol "_gvlAccountId") NoSourceUnpackedness SourceStrict DecidedStrict) (Rec0 Text)) (S1 (MetaSel (Just Symbol "_gvlVaultName") NoSourceUnpackedness SourceStrict DecidedStrict) (Rec0 Text))))

type Rs GetVaultLock

type Rs GetVaultLock = GetVaultLockResponse

Request Lenses

gvlAccountId :: Lens' GetVaultLock Text

The AccountId value is the AWS account ID of the account that owns the vault. You can either specify an AWS account ID or optionally a single apos-apos (hyphen), in which case Amazon Glacier uses the AWS account ID associated with the credentials used to sign the request. If you use an account ID, do not include any hyphens (apos-apos) in the ID.

gvlVaultName :: Lens' GetVaultLock Text

The name of the vault.

Destructuring the Response

getVaultLockResponse

Arguments

:: Int

gvlrsResponseStatus

-> GetVaultLockResponse

Creates a value of GetVaultLockResponse with the minimum fields required to make a request.

Use one of the following lenses to modify other fields as desired:

• gvlrsState
• gvlrsExpirationDate
• gvlrsCreationDate
• gvlrsPolicy
• gvlrsResponseStatus

data GetVaultLockResponse

Contains the Amazon Glacier response to your request.

See: getVaultLockResponse smart constructor.

Instances

Eq GetVaultLockResponse

Methods

(==) :: GetVaultLockResponse -> GetVaultLockResponse -> Bool

(/=) :: GetVaultLockResponse -> GetVaultLockResponse -> Bool

Data GetVaultLockResponse

Methods

gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> GetVaultLockResponse -> c GetVaultLockResponse

gunfold :: (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c GetVaultLockResponse

toConstr :: GetVaultLockResponse -> Constr

dataTypeOf :: GetVaultLockResponse -> DataType

dataCast1 :: Typeable (* -> *) t => (forall d. Data d => c (t d)) -> Maybe (c GetVaultLockResponse)

dataCast2 :: Typeable (* -> * -> *) t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c GetVaultLockResponse)

gmapT :: (forall b. Data b => b -> b) -> GetVaultLockResponse -> GetVaultLockResponse

gmapQl :: (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> GetVaultLockResponse -> r

gmapQr :: (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> GetVaultLockResponse -> r

gmapQ :: (forall d. Data d => d -> u) -> GetVaultLockResponse -> [u]

gmapQi :: Int -> (forall d. Data d => d -> u) -> GetVaultLockResponse -> u

gmapM :: Monad m => (forall d. Data d => d -> m d) -> GetVaultLockResponse -> m GetVaultLockResponse

gmapMp :: MonadPlus m => (forall d. Data d => d -> m d) -> GetVaultLockResponse -> m GetVaultLockResponse

gmapMo :: MonadPlus m => (forall d. Data d => d -> m d) -> GetVaultLockResponse -> m GetVaultLockResponse

Read GetVaultLockResponse

Methods

readsPrec :: Int -> ReadS GetVaultLockResponse

readList :: ReadS [GetVaultLockResponse]

readPrec :: ReadPrec GetVaultLockResponse

readListPrec :: ReadPrec [GetVaultLockResponse]

Show GetVaultLockResponse

Methods

showsPrec :: Int -> GetVaultLockResponse -> ShowS

show :: GetVaultLockResponse -> String

showList :: [GetVaultLockResponse] -> ShowS

Generic GetVaultLockResponse

Associated Types

type Rep GetVaultLockResponse :: * -> *

Methods

from :: GetVaultLockResponse -> Rep GetVaultLockResponse x

to :: Rep GetVaultLockResponse x -> GetVaultLockResponse

type Rep GetVaultLockResponse

type Rep GetVaultLockResponse = D1 (MetaData "GetVaultLockResponse" "Network.AWS.Glacier.GetVaultLock" "amazonka-glacier-1.3.7-Dh9gbv8nf1fFDUYZRjXX0m" False) (C1 (MetaCons "GetVaultLockResponse'" PrefixI True) ((:*:) ((:*:) (S1 (MetaSel (Just Symbol "_gvlrsState") NoSourceUnpackedness SourceStrict DecidedStrict) (Rec0 (Maybe Text))) (S1 (MetaSel (Just Symbol "_gvlrsExpirationDate") NoSourceUnpackedness SourceStrict DecidedStrict) (Rec0 (Maybe Text)))) ((:*:) (S1 (MetaSel (Just Symbol "_gvlrsCreationDate") NoSourceUnpackedness SourceStrict DecidedStrict) (Rec0 (Maybe Text))) ((:*:) (S1 (MetaSel (Just Symbol "_gvlrsPolicy") NoSourceUnpackedness SourceStrict DecidedStrict) (Rec0 (Maybe Text))) (S1 (MetaSel (Just Symbol "_gvlrsResponseStatus") NoSourceUnpackedness SourceStrict DecidedStrict) (Rec0 Int))))))

Response Lenses

gvlrsState :: Lens' GetVaultLockResponse (Maybe Text)

The state of the vault lock. InProgress or Locked.

gvlrsExpirationDate :: Lens' GetVaultLockResponse (Maybe Text)

The UTC date and time at which the lock ID expires. This value can be null if the vault lock is in a Locked state.

gvlrsCreationDate :: Lens' GetVaultLockResponse (Maybe Text)

The UTC date and time at which the vault lock was put into the InProgress state.

gvlrsPolicy :: Lens' GetVaultLockResponse (Maybe Text)

The vault lock policy as a JSON string, which uses "\" as an escape character.

gvlrsResponseStatus :: Lens' GetVaultLockResponse Int

The response status code.