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

Defined in Network.AWS.Glacier.SetVaultAccessPolicy

Methods

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

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

Data SetVaultAccessPolicy

Defined in Network.AWS.Glacier.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

Defined in Network.AWS.Glacier.SetVaultAccessPolicy

Methods

readsPrec :: Int -> ReadS SetVaultAccessPolicy

readList :: ReadS [SetVaultAccessPolicy]

readPrec :: ReadPrec SetVaultAccessPolicy

readListPrec :: ReadPrec [SetVaultAccessPolicy]

Show SetVaultAccessPolicy

Defined in Network.AWS.Glacier.SetVaultAccessPolicy

Methods

showsPrec :: Int -> SetVaultAccessPolicy -> ShowS

show :: SetVaultAccessPolicy -> String

showList :: [SetVaultAccessPolicy] -> ShowS

Generic SetVaultAccessPolicy

Defined in Network.AWS.Glacier.SetVaultAccessPolicy

Associated Types

type Rep SetVaultAccessPolicy :: Type -> Type

Methods

from :: SetVaultAccessPolicy -> Rep SetVaultAccessPolicy x

to :: Rep SetVaultAccessPolicy x -> SetVaultAccessPolicy

Hashable SetVaultAccessPolicy

Defined in Network.AWS.Glacier.SetVaultAccessPolicy

Methods

hashWithSalt :: Int -> SetVaultAccessPolicy -> Int

hash :: SetVaultAccessPolicy -> Int

ToJSON SetVaultAccessPolicy

Defined in Network.AWS.Glacier.SetVaultAccessPolicy

Methods

toJSON :: SetVaultAccessPolicy -> Value

toEncoding :: SetVaultAccessPolicy -> Encoding

toJSONList :: [SetVaultAccessPolicy] -> Value

toEncodingList :: [SetVaultAccessPolicy] -> Encoding

AWSRequest SetVaultAccessPolicy

Defined in Network.AWS.Glacier.SetVaultAccessPolicy

Associated Types

type Rs SetVaultAccessPolicy :: Type

Methods

request :: SetVaultAccessPolicy -> Request SetVaultAccessPolicy

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

ToHeaders SetVaultAccessPolicy

Defined in Network.AWS.Glacier.SetVaultAccessPolicy

Methods

toHeaders :: SetVaultAccessPolicy -> [Header]

ToPath SetVaultAccessPolicy

Defined in Network.AWS.Glacier.SetVaultAccessPolicy

Methods

toPath :: SetVaultAccessPolicy -> ByteString

ToQuery SetVaultAccessPolicy

Defined in Network.AWS.Glacier.SetVaultAccessPolicy

Methods

toQuery :: SetVaultAccessPolicy -> QueryString

NFData SetVaultAccessPolicy

Defined in Network.AWS.Glacier.SetVaultAccessPolicy

Methods

rnf :: SetVaultAccessPolicy -> ()

type Rep SetVaultAccessPolicy

Defined in Network.AWS.Glacier.SetVaultAccessPolicy

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

type Rs SetVaultAccessPolicy

Defined in Network.AWS.Glacier.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

Defined in Network.AWS.Glacier.SetVaultAccessPolicy

Methods

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

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

Data SetVaultAccessPolicyResponse

Defined in Network.AWS.Glacier.SetVaultAccessPolicy

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

Defined in Network.AWS.Glacier.SetVaultAccessPolicy

Methods

readsPrec :: Int -> ReadS SetVaultAccessPolicyResponse

readList :: ReadS [SetVaultAccessPolicyResponse]

readPrec :: ReadPrec SetVaultAccessPolicyResponse

readListPrec :: ReadPrec [SetVaultAccessPolicyResponse]

Show SetVaultAccessPolicyResponse

Defined in Network.AWS.Glacier.SetVaultAccessPolicy

Methods

showsPrec :: Int -> SetVaultAccessPolicyResponse -> ShowS

show :: SetVaultAccessPolicyResponse -> String

showList :: [SetVaultAccessPolicyResponse] -> ShowS

Generic SetVaultAccessPolicyResponse

Defined in Network.AWS.Glacier.SetVaultAccessPolicy

Associated Types

type Rep SetVaultAccessPolicyResponse :: Type -> Type

Methods

from :: SetVaultAccessPolicyResponse -> Rep SetVaultAccessPolicyResponse x

to :: Rep SetVaultAccessPolicyResponse x -> SetVaultAccessPolicyResponse

NFData SetVaultAccessPolicyResponse

Defined in Network.AWS.Glacier.SetVaultAccessPolicy

Methods

rnf :: SetVaultAccessPolicyResponse -> ()

type Rep SetVaultAccessPolicyResponse

Defined in Network.AWS.Glacier.SetVaultAccessPolicy

type Rep SetVaultAccessPolicyResponse = D1 (MetaData "SetVaultAccessPolicyResponse" "Network.AWS.Glacier.SetVaultAccessPolicy" "amazonka-glacier-1.6.1-1jk94OYE8nZKrGhzWrcb8m" False) (C1 (MetaCons "SetVaultAccessPolicyResponse'" PrefixI False) (U1 :: Type -> Type))