Network.AWS.Glacier.SetVaultAccessPolicy

This operation configures an access policy for a vault and will overwrite an existing policy. To configure a vault access policy, send a PUT request to the access-policy subresource of the vault. An access policy is specific to a vault and is also called a vault subresource. You can set one access policy per vault and the policy can be up to 20 KB in size. For more information about vault access policies, see Amazon Glacier Access Control with Vault Access Policies .

Creating a Request

setVaultAccessPolicy

Arguments

:: Text

svapAccountId

-> Text

svapVaultName

-> SetVaultAccessPolicy

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

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

• svapPolicy - The vault access policy as a JSON string.
• svapAccountId - 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 '- ' (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 (-) in the ID.
• svapVaultName - The name of the vault.

data SetVaultAccessPolicy

SetVaultAccessPolicy input.

See: setVaultAccessPolicy smart constructor.

Instances

Eq SetVaultAccessPolicy

Methods

(==) :: SetVaultAccessPolicy -> SetVaultAccessPolicy -> Bool

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

Data SetVaultAccessPolicy

Methods

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

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

toConstr :: SetVaultAccessPolicy -> Constr

dataTypeOf :: SetVaultAccessPolicy -> DataType

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

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

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

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

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

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

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

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

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

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

Read SetVaultAccessPolicy

Methods

readsPrec :: Int -> ReadS SetVaultAccessPolicy

readList :: ReadS [SetVaultAccessPolicy]

readPrec :: ReadPrec SetVaultAccessPolicy

readListPrec :: ReadPrec [SetVaultAccessPolicy]

Show SetVaultAccessPolicy

Methods

showsPrec :: Int -> SetVaultAccessPolicy -> ShowS

show :: SetVaultAccessPolicy -> String

showList :: [SetVaultAccessPolicy] -> ShowS

Generic SetVaultAccessPolicy

Associated Types

type Rep SetVaultAccessPolicy :: * -> *

Methods

from :: SetVaultAccessPolicy -> Rep SetVaultAccessPolicy x

to :: Rep SetVaultAccessPolicy x -> SetVaultAccessPolicy

Hashable SetVaultAccessPolicy

Methods

hashWithSalt :: Int -> SetVaultAccessPolicy -> Int

hash :: SetVaultAccessPolicy -> Int

ToJSON SetVaultAccessPolicy

Methods

toJSON :: SetVaultAccessPolicy -> Value

toEncoding :: SetVaultAccessPolicy -> Encoding

toJSONList :: [SetVaultAccessPolicy] -> Value

toEncodingList :: [SetVaultAccessPolicy] -> Encoding

NFData SetVaultAccessPolicy

Methods

rnf :: SetVaultAccessPolicy -> ()

AWSRequest SetVaultAccessPolicy

Associated Types

type Rs SetVaultAccessPolicy :: *

Methods

request :: SetVaultAccessPolicy -> Request SetVaultAccessPolicy

response :: (MonadResource m, MonadThrow m) => Logger -> Service -> Proxy * SetVaultAccessPolicy -> ClientResponse -> m (Response SetVaultAccessPolicy)

ToHeaders SetVaultAccessPolicy

Methods

toHeaders :: SetVaultAccessPolicy -> [Header]

ToPath SetVaultAccessPolicy

Methods

toPath :: SetVaultAccessPolicy -> ByteString

ToQuery SetVaultAccessPolicy

Methods

toQuery :: SetVaultAccessPolicy -> QueryString

type Rep SetVaultAccessPolicy

type Rep SetVaultAccessPolicy = D1 * (MetaData "SetVaultAccessPolicy" "Network.AWS.Glacier.SetVaultAccessPolicy" "amazonka-glacier-1.6.0-KFcSJp5ylrGJYtfh8aD2JF" False) (C1 * (MetaCons "SetVaultAccessPolicy'" PrefixI True) ((:*:) * (S1 * (MetaSel (Just Symbol "_svapPolicy") NoSourceUnpackedness SourceStrict DecidedStrict) (Rec0 * (Maybe VaultAccessPolicy))) ((:*:) * (S1 * (MetaSel (Just Symbol "_svapAccountId") NoSourceUnpackedness SourceStrict DecidedStrict) (Rec0 * Text)) (S1 * (MetaSel (Just Symbol "_svapVaultName") NoSourceUnpackedness SourceStrict DecidedStrict) (Rec0 * Text)))))

type Rs SetVaultAccessPolicy

type Rs SetVaultAccessPolicy = SetVaultAccessPolicyResponse

Request Lenses

svapPolicy :: Lens' SetVaultAccessPolicy (Maybe VaultAccessPolicy)

The vault access policy as a JSON string.

svapAccountId :: Lens' SetVaultAccessPolicy 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 '- ' (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 (-) in the ID.

svapVaultName :: Lens' SetVaultAccessPolicy Text

The name of the vault.

Destructuring the Response

setVaultAccessPolicyResponse :: SetVaultAccessPolicyResponse

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

data SetVaultAccessPolicyResponse

See: setVaultAccessPolicyResponse smart constructor.

Instances

Eq SetVaultAccessPolicyResponse

Methods

(==) :: SetVaultAccessPolicyResponse -> SetVaultAccessPolicyResponse -> Bool

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

Data SetVaultAccessPolicyResponse

Methods

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

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

toConstr :: SetVaultAccessPolicyResponse -> Constr

dataTypeOf :: SetVaultAccessPolicyResponse -> DataType

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

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

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

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

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

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

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

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

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

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

Read SetVaultAccessPolicyResponse

Methods

readsPrec :: Int -> ReadS SetVaultAccessPolicyResponse

readList :: ReadS [SetVaultAccessPolicyResponse]

readPrec :: ReadPrec SetVaultAccessPolicyResponse

readListPrec :: ReadPrec [SetVaultAccessPolicyResponse]

Show SetVaultAccessPolicyResponse

Methods

showsPrec :: Int -> SetVaultAccessPolicyResponse -> ShowS

show :: SetVaultAccessPolicyResponse -> String

showList :: [SetVaultAccessPolicyResponse] -> ShowS

Generic SetVaultAccessPolicyResponse

Associated Types

type Rep SetVaultAccessPolicyResponse :: * -> *

Methods

from :: SetVaultAccessPolicyResponse -> Rep SetVaultAccessPolicyResponse x

to :: Rep SetVaultAccessPolicyResponse x -> SetVaultAccessPolicyResponse

NFData SetVaultAccessPolicyResponse

Methods

rnf :: SetVaultAccessPolicyResponse -> ()

type Rep SetVaultAccessPolicyResponse

type Rep SetVaultAccessPolicyResponse = D1 * (MetaData "SetVaultAccessPolicyResponse" "Network.AWS.Glacier.SetVaultAccessPolicy" "amazonka-glacier-1.6.0-KFcSJp5ylrGJYtfh8aD2JF" False) (C1 * (MetaCons "SetVaultAccessPolicyResponse'" PrefixI False) (U1 *))