Network.AWS.Glacier.CompleteVaultLock

This operation completes the vault locking process by transitioning the vault lock from the InProgress state to the Locked state, which causes the vault lock policy to become unchangeable. A vault lock is put into the InProgress state by calling InitiateVaultLock. You can obtain the state of the vault lock by calling GetVaultLock. For more information about the vault locking process, Amazon Glacier Vault Lock.

This operation is idempotent. This request is always successful if the vault lock is in the Locked state and the provided lock ID matches the lock ID originally used to lock the vault.

If an invalid lock ID is passed in the request when the vault lock is in the Locked state, the operation returns an AccessDeniedException error. If an invalid lock ID is passed in the request when the vault lock is in the InProgress state, the operation throws an InvalidParameter error.

See: AWS API Reference for CompleteVaultLock.

Creating a Request

completeVaultLock

Arguments

:: Text

cvlAccountId

-> Text

cvlVaultName

-> Text

cvlLockId

-> CompleteVaultLock

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

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

• cvlAccountId
• cvlVaultName
• cvlLockId

data CompleteVaultLock

The input values for CompleteVaultLock.

See: completeVaultLock smart constructor.

Instances

Eq CompleteVaultLock

Methods

(==) :: CompleteVaultLock -> CompleteVaultLock -> Bool

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

Data CompleteVaultLock

Methods

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

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

toConstr :: CompleteVaultLock -> Constr

dataTypeOf :: CompleteVaultLock -> DataType

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

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

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

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

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

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

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

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

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

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

Read CompleteVaultLock

Methods

readsPrec :: Int -> ReadS CompleteVaultLock

readList :: ReadS [CompleteVaultLock]

readPrec :: ReadPrec CompleteVaultLock

readListPrec :: ReadPrec [CompleteVaultLock]

Show CompleteVaultLock

Methods

showsPrec :: Int -> CompleteVaultLock -> ShowS

show :: CompleteVaultLock -> String

showList :: [CompleteVaultLock] -> ShowS

Generic CompleteVaultLock

Associated Types

type Rep CompleteVaultLock :: * -> *

Methods

from :: CompleteVaultLock -> Rep CompleteVaultLock x

to :: Rep CompleteVaultLock x -> CompleteVaultLock

ToJSON CompleteVaultLock

Methods

toJSON :: CompleteVaultLock -> Value

toEncoding :: CompleteVaultLock -> Encoding

toJSONList :: [CompleteVaultLock] -> Value

toEncodingList :: [CompleteVaultLock] -> Encoding

AWSRequest CompleteVaultLock

Associated Types

type Rs CompleteVaultLock :: *

Methods

request :: CompleteVaultLock -> Request CompleteVaultLock

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

ToQuery CompleteVaultLock

Methods

toQuery :: CompleteVaultLock -> QueryString

ToPath CompleteVaultLock

Methods

toPath :: CompleteVaultLock -> ByteString

ToHeaders CompleteVaultLock

Methods

toHeaders :: CompleteVaultLock -> [Header]

type Rep CompleteVaultLock

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

type Rs CompleteVaultLock

type Rs CompleteVaultLock = CompleteVaultLockResponse

Request Lenses

cvlAccountId :: Lens' CompleteVaultLock Text

The AccountId value is the AWS account ID. This value must match the AWS account ID associated with the credentials used to sign the request. 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 specify your account ID, do not include any hyphens (apos-apos) in the ID.

cvlVaultName :: Lens' CompleteVaultLock Text

The name of the vault.

cvlLockId :: Lens' CompleteVaultLock Text

The lockId value is the lock ID obtained from a InitiateVaultLock request.

Destructuring the Response

completeVaultLockResponse :: CompleteVaultLockResponse

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

data CompleteVaultLockResponse

See: completeVaultLockResponse smart constructor.

Instances

Eq CompleteVaultLockResponse

Methods

(==) :: CompleteVaultLockResponse -> CompleteVaultLockResponse -> Bool

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

Data CompleteVaultLockResponse

Methods

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

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

toConstr :: CompleteVaultLockResponse -> Constr

dataTypeOf :: CompleteVaultLockResponse -> DataType

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

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

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

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

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

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

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

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

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

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

Read CompleteVaultLockResponse

Methods

readsPrec :: Int -> ReadS CompleteVaultLockResponse

readList :: ReadS [CompleteVaultLockResponse]

readPrec :: ReadPrec CompleteVaultLockResponse

readListPrec :: ReadPrec [CompleteVaultLockResponse]

Show CompleteVaultLockResponse

Methods

showsPrec :: Int -> CompleteVaultLockResponse -> ShowS

show :: CompleteVaultLockResponse -> String

showList :: [CompleteVaultLockResponse] -> ShowS

Generic CompleteVaultLockResponse

Associated Types

type Rep CompleteVaultLockResponse :: * -> *

Methods

from :: CompleteVaultLockResponse -> Rep CompleteVaultLockResponse x

to :: Rep CompleteVaultLockResponse x -> CompleteVaultLockResponse

type Rep CompleteVaultLockResponse

type Rep CompleteVaultLockResponse = D1 (MetaData "CompleteVaultLockResponse" "Network.AWS.Glacier.CompleteVaultLock" "amazonka-glacier-1.3.7-Dh9gbv8nf1fFDUYZRjXX0m" False) (C1 (MetaCons "CompleteVaultLockResponse'" PrefixI False) U1)