R/kms_interfaces.R

Defines functions verify_mac_output verify_mac_input verify_output verify_input update_primary_region_output update_primary_region_input update_key_description_output update_key_description_input update_custom_key_store_output update_custom_key_store_input update_alias_output update_alias_input untag_resource_output untag_resource_input tag_resource_output tag_resource_input sign_output sign_input schedule_key_deletion_output schedule_key_deletion_input revoke_grant_output revoke_grant_input retire_grant_output retire_grant_input replicate_key_output replicate_key_input re_encrypt_output re_encrypt_input put_key_policy_output put_key_policy_input list_retirable_grants_output list_retirable_grants_input list_resource_tags_output list_resource_tags_input list_keys_output list_keys_input list_key_policies_output list_key_policies_input list_grants_output list_grants_input list_aliases_output list_aliases_input import_key_material_output import_key_material_input get_public_key_output get_public_key_input get_parameters_for_import_output get_parameters_for_import_input get_key_rotation_status_output get_key_rotation_status_input get_key_policy_output get_key_policy_input generate_random_output generate_random_input generate_mac_output generate_mac_input generate_data_key_without_plaintext_output generate_data_key_without_plaintext_input generate_data_key_pair_without_plaintext_output generate_data_key_pair_without_plaintext_input generate_data_key_pair_output generate_data_key_pair_input generate_data_key_output generate_data_key_input encrypt_output encrypt_input enable_key_rotation_output enable_key_rotation_input enable_key_output enable_key_input disconnect_custom_key_store_output disconnect_custom_key_store_input disable_key_rotation_output disable_key_rotation_input disable_key_output disable_key_input describe_key_output describe_key_input describe_custom_key_stores_output describe_custom_key_stores_input delete_imported_key_material_output delete_imported_key_material_input delete_custom_key_store_output delete_custom_key_store_input delete_alias_output delete_alias_input decrypt_output decrypt_input create_key_output create_key_input create_grant_output create_grant_input create_custom_key_store_output create_custom_key_store_input create_alias_output create_alias_input connect_custom_key_store_output connect_custom_key_store_input cancel_key_deletion_output cancel_key_deletion_input

# This file is generated by make.paws. Please do not edit here.
#' @importFrom paws.common populate
#' @include kms_service.R
NULL

.kms$cancel_key_deletion_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(KeyId = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$cancel_key_deletion_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(KeyId = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$connect_custom_key_store_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(CustomKeyStoreId = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$connect_custom_key_store_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$create_alias_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(AliasName = structure(logical(0), tags = list(type = "string")), TargetKeyId = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$create_alias_output <- function(...) {
  list()
}

.kms$create_custom_key_store_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(CustomKeyStoreName = structure(logical(0), tags = list(type = "string")), CloudHsmClusterId = structure(logical(0), tags = list(type = "string")), TrustAnchorCertificate = structure(logical(0), tags = list(type = "string")), KeyStorePassword = structure(logical(0), tags = list(type = "string", sensitive = TRUE)), CustomKeyStoreType = structure(logical(0), tags = list(type = "string")), XksProxyUriEndpoint = structure(logical(0), tags = list(type = "string")), XksProxyUriPath = structure(logical(0), tags = list(type = "string")), XksProxyVpcEndpointServiceName = structure(logical(0), tags = list(type = "string")), XksProxyAuthenticationCredential = structure(list(AccessKeyId = structure(logical(0), tags = list(type = "string", sensitive = TRUE)), RawSecretAccessKey = structure(logical(0), tags = list(type = "string", sensitive = TRUE))), tags = list(type = "structure")), XksProxyConnectivity = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$create_custom_key_store_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(CustomKeyStoreId = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$create_grant_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(KeyId = structure(logical(0), tags = list(type = "string")), GranteePrincipal = structure(logical(0), tags = list(type = "string")), RetiringPrincipal = structure(logical(0), tags = list(type = "string")), Operations = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list")), Constraints = structure(list(EncryptionContextSubset = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "map")), EncryptionContextEquals = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "map"))), tags = list(type = "structure")), GrantTokens = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list")), Name = structure(logical(0), tags = list(type = "string")), DryRun = structure(logical(0), tags = list(type = "boolean"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$create_grant_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(GrantToken = structure(logical(0), tags = list(type = "string")), GrantId = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$create_key_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Policy = structure(logical(0), tags = list(type = "string")), Description = structure(logical(0), tags = list(type = "string")), KeyUsage = structure(logical(0), tags = list(type = "string")), CustomerMasterKeySpec = structure(logical(0), tags = list(type = "string", deprecated = TRUE, deprecatedMessage = "This enum has been deprecated. Instead, use the KeySpec enum.")), KeySpec = structure(logical(0), tags = list(type = "string")), Origin = structure(logical(0), tags = list(type = "string")), CustomKeyStoreId = structure(logical(0), tags = list(type = "string")), BypassPolicyLockoutSafetyCheck = structure(logical(0), tags = list(type = "boolean")), Tags = structure(list(structure(list(TagKey = structure(logical(0), tags = list(type = "string")), TagValue = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(type = "list")), MultiRegion = structure(logical(0), tags = list(type = "boolean")), XksKeyId = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$create_key_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(KeyMetadata = structure(list(AWSAccountId = structure(logical(0), tags = list(type = "string")), KeyId = structure(logical(0), tags = list(type = "string")), Arn = structure(logical(0), tags = list(type = "string")), CreationDate = structure(logical(0), tags = list(type = "timestamp")), Enabled = structure(logical(0), tags = list(type = "boolean")), Description = structure(logical(0), tags = list(type = "string")), KeyUsage = structure(logical(0), tags = list(type = "string")), KeyState = structure(logical(0), tags = list(type = "string")), DeletionDate = structure(logical(0), tags = list(type = "timestamp")), ValidTo = structure(logical(0), tags = list(type = "timestamp")), Origin = structure(logical(0), tags = list(type = "string")), CustomKeyStoreId = structure(logical(0), tags = list(type = "string")), CloudHsmClusterId = structure(logical(0), tags = list(type = "string")), ExpirationModel = structure(logical(0), tags = list(type = "string")), KeyManager = structure(logical(0), tags = list(type = "string")), CustomerMasterKeySpec = structure(logical(0), tags = list(type = "string", deprecated = TRUE, deprecatedMessage = "This enum has been deprecated. Instead, use the KeySpec enum.")), KeySpec = structure(logical(0), tags = list(type = "string")), EncryptionAlgorithms = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list")), SigningAlgorithms = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list")), MultiRegion = structure(logical(0), tags = list(type = "boolean")), MultiRegionConfiguration = structure(list(MultiRegionKeyType = structure(logical(0), tags = list(type = "string")), PrimaryKey = structure(list(Arn = structure(logical(0), tags = list(type = "string")), Region = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure")), ReplicaKeys = structure(list(structure(list(Arn = structure(logical(0), tags = list(type = "string")), Region = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(type = "list"))), tags = list(type = "structure")), PendingDeletionWindowInDays = structure(logical(0), tags = list(type = "integer")), MacAlgorithms = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list")), XksKeyConfiguration = structure(list(Id = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(type = "structure"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$decrypt_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(CiphertextBlob = structure(logical(0), tags = list(type = "blob")), EncryptionContext = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "map")), GrantTokens = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list")), KeyId = structure(logical(0), tags = list(type = "string")), EncryptionAlgorithm = structure(logical(0), tags = list(type = "string")), Recipient = structure(list(KeyEncryptionAlgorithm = structure(logical(0), tags = list(type = "string")), AttestationDocument = structure(logical(0), tags = list(type = "blob"))), tags = list(type = "structure")), DryRun = structure(logical(0), tags = list(type = "boolean"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$decrypt_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(KeyId = structure(logical(0), tags = list(type = "string")), Plaintext = structure(logical(0), tags = list(type = "blob", sensitive = TRUE)), EncryptionAlgorithm = structure(logical(0), tags = list(type = "string")), CiphertextForRecipient = structure(logical(0), tags = list(type = "blob"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$delete_alias_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(AliasName = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$delete_alias_output <- function(...) {
  list()
}

.kms$delete_custom_key_store_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(CustomKeyStoreId = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$delete_custom_key_store_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$delete_imported_key_material_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(KeyId = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$delete_imported_key_material_output <- function(...) {
  list()
}

.kms$describe_custom_key_stores_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(CustomKeyStoreId = structure(logical(0), tags = list(type = "string")), CustomKeyStoreName = structure(logical(0), tags = list(type = "string")), Limit = structure(logical(0), tags = list(type = "integer")), Marker = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$describe_custom_key_stores_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(CustomKeyStores = structure(list(structure(list(CustomKeyStoreId = structure(logical(0), tags = list(type = "string")), CustomKeyStoreName = structure(logical(0), tags = list(type = "string")), CloudHsmClusterId = structure(logical(0), tags = list(type = "string")), TrustAnchorCertificate = structure(logical(0), tags = list(type = "string")), ConnectionState = structure(logical(0), tags = list(type = "string")), ConnectionErrorCode = structure(logical(0), tags = list(type = "string")), CreationDate = structure(logical(0), tags = list(type = "timestamp")), CustomKeyStoreType = structure(logical(0), tags = list(type = "string")), XksProxyConfiguration = structure(list(Connectivity = structure(logical(0), tags = list(type = "string")), AccessKeyId = structure(logical(0), tags = list(type = "string", sensitive = TRUE)), UriEndpoint = structure(logical(0), tags = list(type = "string")), UriPath = structure(logical(0), tags = list(type = "string")), VpcEndpointServiceName = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(type = "structure"))), tags = list(type = "list")), NextMarker = structure(logical(0), tags = list(type = "string")), Truncated = structure(logical(0), tags = list(type = "boolean"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$describe_key_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(KeyId = structure(logical(0), tags = list(type = "string")), GrantTokens = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$describe_key_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(KeyMetadata = structure(list(AWSAccountId = structure(logical(0), tags = list(type = "string")), KeyId = structure(logical(0), tags = list(type = "string")), Arn = structure(logical(0), tags = list(type = "string")), CreationDate = structure(logical(0), tags = list(type = "timestamp")), Enabled = structure(logical(0), tags = list(type = "boolean")), Description = structure(logical(0), tags = list(type = "string")), KeyUsage = structure(logical(0), tags = list(type = "string")), KeyState = structure(logical(0), tags = list(type = "string")), DeletionDate = structure(logical(0), tags = list(type = "timestamp")), ValidTo = structure(logical(0), tags = list(type = "timestamp")), Origin = structure(logical(0), tags = list(type = "string")), CustomKeyStoreId = structure(logical(0), tags = list(type = "string")), CloudHsmClusterId = structure(logical(0), tags = list(type = "string")), ExpirationModel = structure(logical(0), tags = list(type = "string")), KeyManager = structure(logical(0), tags = list(type = "string")), CustomerMasterKeySpec = structure(logical(0), tags = list(type = "string", deprecated = TRUE, deprecatedMessage = "This enum has been deprecated. Instead, use the KeySpec enum.")), KeySpec = structure(logical(0), tags = list(type = "string")), EncryptionAlgorithms = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list")), SigningAlgorithms = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list")), MultiRegion = structure(logical(0), tags = list(type = "boolean")), MultiRegionConfiguration = structure(list(MultiRegionKeyType = structure(logical(0), tags = list(type = "string")), PrimaryKey = structure(list(Arn = structure(logical(0), tags = list(type = "string")), Region = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure")), ReplicaKeys = structure(list(structure(list(Arn = structure(logical(0), tags = list(type = "string")), Region = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(type = "list"))), tags = list(type = "structure")), PendingDeletionWindowInDays = structure(logical(0), tags = list(type = "integer")), MacAlgorithms = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list")), XksKeyConfiguration = structure(list(Id = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(type = "structure"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$disable_key_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(KeyId = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$disable_key_output <- function(...) {
  list()
}

.kms$disable_key_rotation_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(KeyId = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$disable_key_rotation_output <- function(...) {
  list()
}

.kms$disconnect_custom_key_store_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(CustomKeyStoreId = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$disconnect_custom_key_store_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$enable_key_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(KeyId = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$enable_key_output <- function(...) {
  list()
}

.kms$enable_key_rotation_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(KeyId = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$enable_key_rotation_output <- function(...) {
  list()
}

.kms$encrypt_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(KeyId = structure(logical(0), tags = list(type = "string")), Plaintext = structure(logical(0), tags = list(type = "blob", sensitive = TRUE)), EncryptionContext = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "map")), GrantTokens = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list")), EncryptionAlgorithm = structure(logical(0), tags = list(type = "string")), DryRun = structure(logical(0), tags = list(type = "boolean"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$encrypt_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(CiphertextBlob = structure(logical(0), tags = list(type = "blob")), KeyId = structure(logical(0), tags = list(type = "string")), EncryptionAlgorithm = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$generate_data_key_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(KeyId = structure(logical(0), tags = list(type = "string")), EncryptionContext = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "map")), NumberOfBytes = structure(logical(0), tags = list(type = "integer")), KeySpec = structure(logical(0), tags = list(type = "string")), GrantTokens = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list")), Recipient = structure(list(KeyEncryptionAlgorithm = structure(logical(0), tags = list(type = "string")), AttestationDocument = structure(logical(0), tags = list(type = "blob"))), tags = list(type = "structure")), DryRun = structure(logical(0), tags = list(type = "boolean"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$generate_data_key_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(CiphertextBlob = structure(logical(0), tags = list(type = "blob")), Plaintext = structure(logical(0), tags = list(type = "blob", sensitive = TRUE)), KeyId = structure(logical(0), tags = list(type = "string")), CiphertextForRecipient = structure(logical(0), tags = list(type = "blob"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$generate_data_key_pair_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(EncryptionContext = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "map")), KeyId = structure(logical(0), tags = list(type = "string")), KeyPairSpec = structure(logical(0), tags = list(type = "string")), GrantTokens = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list")), Recipient = structure(list(KeyEncryptionAlgorithm = structure(logical(0), tags = list(type = "string")), AttestationDocument = structure(logical(0), tags = list(type = "blob"))), tags = list(type = "structure")), DryRun = structure(logical(0), tags = list(type = "boolean"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$generate_data_key_pair_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(PrivateKeyCiphertextBlob = structure(logical(0), tags = list(type = "blob")), PrivateKeyPlaintext = structure(logical(0), tags = list(type = "blob", sensitive = TRUE)), PublicKey = structure(logical(0), tags = list(type = "blob")), KeyId = structure(logical(0), tags = list(type = "string")), KeyPairSpec = structure(logical(0), tags = list(type = "string")), CiphertextForRecipient = structure(logical(0), tags = list(type = "blob"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$generate_data_key_pair_without_plaintext_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(EncryptionContext = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "map")), KeyId = structure(logical(0), tags = list(type = "string")), KeyPairSpec = structure(logical(0), tags = list(type = "string")), GrantTokens = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list")), DryRun = structure(logical(0), tags = list(type = "boolean"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$generate_data_key_pair_without_plaintext_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(PrivateKeyCiphertextBlob = structure(logical(0), tags = list(type = "blob")), PublicKey = structure(logical(0), tags = list(type = "blob")), KeyId = structure(logical(0), tags = list(type = "string")), KeyPairSpec = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$generate_data_key_without_plaintext_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(KeyId = structure(logical(0), tags = list(type = "string")), EncryptionContext = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "map")), KeySpec = structure(logical(0), tags = list(type = "string")), NumberOfBytes = structure(logical(0), tags = list(type = "integer")), GrantTokens = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list")), DryRun = structure(logical(0), tags = list(type = "boolean"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$generate_data_key_without_plaintext_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(CiphertextBlob = structure(logical(0), tags = list(type = "blob")), KeyId = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$generate_mac_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Message = structure(logical(0), tags = list(type = "blob", sensitive = TRUE)), KeyId = structure(logical(0), tags = list(type = "string")), MacAlgorithm = structure(logical(0), tags = list(type = "string")), GrantTokens = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list")), DryRun = structure(logical(0), tags = list(type = "boolean"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$generate_mac_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Mac = structure(logical(0), tags = list(type = "blob")), MacAlgorithm = structure(logical(0), tags = list(type = "string")), KeyId = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$generate_random_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(NumberOfBytes = structure(logical(0), tags = list(type = "integer")), CustomKeyStoreId = structure(logical(0), tags = list(type = "string")), Recipient = structure(list(KeyEncryptionAlgorithm = structure(logical(0), tags = list(type = "string")), AttestationDocument = structure(logical(0), tags = list(type = "blob"))), tags = list(type = "structure"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$generate_random_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Plaintext = structure(logical(0), tags = list(type = "blob", sensitive = TRUE)), CiphertextForRecipient = structure(logical(0), tags = list(type = "blob"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$get_key_policy_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(KeyId = structure(logical(0), tags = list(type = "string")), PolicyName = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$get_key_policy_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Policy = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$get_key_rotation_status_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(KeyId = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$get_key_rotation_status_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(KeyRotationEnabled = structure(logical(0), tags = list(type = "boolean"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$get_parameters_for_import_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(KeyId = structure(logical(0), tags = list(type = "string")), WrappingAlgorithm = structure(logical(0), tags = list(type = "string")), WrappingKeySpec = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$get_parameters_for_import_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(KeyId = structure(logical(0), tags = list(type = "string")), ImportToken = structure(logical(0), tags = list(type = "blob")), PublicKey = structure(logical(0), tags = list(type = "blob", sensitive = TRUE)), ParametersValidTo = structure(logical(0), tags = list(type = "timestamp"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$get_public_key_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(KeyId = structure(logical(0), tags = list(type = "string")), GrantTokens = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$get_public_key_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(KeyId = structure(logical(0), tags = list(type = "string")), PublicKey = structure(logical(0), tags = list(type = "blob")), CustomerMasterKeySpec = structure(logical(0), tags = list(type = "string", deprecated = TRUE, deprecatedMessage = "This enum has been deprecated. Instead, use the KeySpec enum.")), KeySpec = structure(logical(0), tags = list(type = "string")), KeyUsage = structure(logical(0), tags = list(type = "string")), EncryptionAlgorithms = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list")), SigningAlgorithms = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$import_key_material_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(KeyId = structure(logical(0), tags = list(type = "string")), ImportToken = structure(logical(0), tags = list(type = "blob")), EncryptedKeyMaterial = structure(logical(0), tags = list(type = "blob")), ValidTo = structure(logical(0), tags = list(type = "timestamp")), ExpirationModel = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$import_key_material_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$list_aliases_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(KeyId = structure(logical(0), tags = list(type = "string")), Limit = structure(logical(0), tags = list(type = "integer")), Marker = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$list_aliases_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Aliases = structure(list(structure(list(AliasName = structure(logical(0), tags = list(type = "string")), AliasArn = structure(logical(0), tags = list(type = "string")), TargetKeyId = structure(logical(0), tags = list(type = "string")), CreationDate = structure(logical(0), tags = list(type = "timestamp")), LastUpdatedDate = structure(logical(0), tags = list(type = "timestamp"))), tags = list(type = "structure"))), tags = list(type = "list")), NextMarker = structure(logical(0), tags = list(type = "string")), Truncated = structure(logical(0), tags = list(type = "boolean"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$list_grants_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Limit = structure(logical(0), tags = list(type = "integer")), Marker = structure(logical(0), tags = list(type = "string")), KeyId = structure(logical(0), tags = list(type = "string")), GrantId = structure(logical(0), tags = list(type = "string")), GranteePrincipal = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$list_grants_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Grants = structure(list(structure(list(KeyId = structure(logical(0), tags = list(type = "string")), GrantId = structure(logical(0), tags = list(type = "string")), Name = structure(logical(0), tags = list(type = "string")), CreationDate = structure(logical(0), tags = list(type = "timestamp")), GranteePrincipal = structure(logical(0), tags = list(type = "string")), RetiringPrincipal = structure(logical(0), tags = list(type = "string")), IssuingAccount = structure(logical(0), tags = list(type = "string")), Operations = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list")), Constraints = structure(list(EncryptionContextSubset = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "map")), EncryptionContextEquals = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "map"))), tags = list(type = "structure"))), tags = list(type = "structure"))), tags = list(type = "list")), NextMarker = structure(logical(0), tags = list(type = "string")), Truncated = structure(logical(0), tags = list(type = "boolean"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$list_key_policies_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(KeyId = structure(logical(0), tags = list(type = "string")), Limit = structure(logical(0), tags = list(type = "integer")), Marker = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$list_key_policies_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(PolicyNames = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list")), NextMarker = structure(logical(0), tags = list(type = "string")), Truncated = structure(logical(0), tags = list(type = "boolean"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$list_keys_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Limit = structure(logical(0), tags = list(type = "integer")), Marker = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$list_keys_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Keys = structure(list(structure(list(KeyId = structure(logical(0), tags = list(type = "string")), KeyArn = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(type = "list")), NextMarker = structure(logical(0), tags = list(type = "string")), Truncated = structure(logical(0), tags = list(type = "boolean"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$list_resource_tags_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(KeyId = structure(logical(0), tags = list(type = "string")), Limit = structure(logical(0), tags = list(type = "integer")), Marker = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$list_resource_tags_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Tags = structure(list(structure(list(TagKey = structure(logical(0), tags = list(type = "string")), TagValue = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(type = "list")), NextMarker = structure(logical(0), tags = list(type = "string")), Truncated = structure(logical(0), tags = list(type = "boolean"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$list_retirable_grants_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Limit = structure(logical(0), tags = list(type = "integer")), Marker = structure(logical(0), tags = list(type = "string")), RetiringPrincipal = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$list_retirable_grants_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Grants = structure(list(structure(list(KeyId = structure(logical(0), tags = list(type = "string")), GrantId = structure(logical(0), tags = list(type = "string")), Name = structure(logical(0), tags = list(type = "string")), CreationDate = structure(logical(0), tags = list(type = "timestamp")), GranteePrincipal = structure(logical(0), tags = list(type = "string")), RetiringPrincipal = structure(logical(0), tags = list(type = "string")), IssuingAccount = structure(logical(0), tags = list(type = "string")), Operations = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list")), Constraints = structure(list(EncryptionContextSubset = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "map")), EncryptionContextEquals = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "map"))), tags = list(type = "structure"))), tags = list(type = "structure"))), tags = list(type = "list")), NextMarker = structure(logical(0), tags = list(type = "string")), Truncated = structure(logical(0), tags = list(type = "boolean"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$put_key_policy_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(KeyId = structure(logical(0), tags = list(type = "string")), PolicyName = structure(logical(0), tags = list(type = "string")), Policy = structure(logical(0), tags = list(type = "string")), BypassPolicyLockoutSafetyCheck = structure(logical(0), tags = list(type = "boolean"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$put_key_policy_output <- function(...) {
  list()
}

.kms$re_encrypt_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(CiphertextBlob = structure(logical(0), tags = list(type = "blob")), SourceEncryptionContext = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "map")), SourceKeyId = structure(logical(0), tags = list(type = "string")), DestinationKeyId = structure(logical(0), tags = list(type = "string")), DestinationEncryptionContext = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "map")), SourceEncryptionAlgorithm = structure(logical(0), tags = list(type = "string")), DestinationEncryptionAlgorithm = structure(logical(0), tags = list(type = "string")), GrantTokens = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list")), DryRun = structure(logical(0), tags = list(type = "boolean"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$re_encrypt_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(CiphertextBlob = structure(logical(0), tags = list(type = "blob")), SourceKeyId = structure(logical(0), tags = list(type = "string")), KeyId = structure(logical(0), tags = list(type = "string")), SourceEncryptionAlgorithm = structure(logical(0), tags = list(type = "string")), DestinationEncryptionAlgorithm = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$replicate_key_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(KeyId = structure(logical(0), tags = list(type = "string")), ReplicaRegion = structure(logical(0), tags = list(type = "string")), Policy = structure(logical(0), tags = list(type = "string")), BypassPolicyLockoutSafetyCheck = structure(logical(0), tags = list(type = "boolean")), Description = structure(logical(0), tags = list(type = "string")), Tags = structure(list(structure(list(TagKey = structure(logical(0), tags = list(type = "string")), TagValue = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(type = "list"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$replicate_key_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(ReplicaKeyMetadata = structure(list(AWSAccountId = structure(logical(0), tags = list(type = "string")), KeyId = structure(logical(0), tags = list(type = "string")), Arn = structure(logical(0), tags = list(type = "string")), CreationDate = structure(logical(0), tags = list(type = "timestamp")), Enabled = structure(logical(0), tags = list(type = "boolean")), Description = structure(logical(0), tags = list(type = "string")), KeyUsage = structure(logical(0), tags = list(type = "string")), KeyState = structure(logical(0), tags = list(type = "string")), DeletionDate = structure(logical(0), tags = list(type = "timestamp")), ValidTo = structure(logical(0), tags = list(type = "timestamp")), Origin = structure(logical(0), tags = list(type = "string")), CustomKeyStoreId = structure(logical(0), tags = list(type = "string")), CloudHsmClusterId = structure(logical(0), tags = list(type = "string")), ExpirationModel = structure(logical(0), tags = list(type = "string")), KeyManager = structure(logical(0), tags = list(type = "string")), CustomerMasterKeySpec = structure(logical(0), tags = list(type = "string", deprecated = TRUE, deprecatedMessage = "This enum has been deprecated. Instead, use the KeySpec enum.")), KeySpec = structure(logical(0), tags = list(type = "string")), EncryptionAlgorithms = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list")), SigningAlgorithms = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list")), MultiRegion = structure(logical(0), tags = list(type = "boolean")), MultiRegionConfiguration = structure(list(MultiRegionKeyType = structure(logical(0), tags = list(type = "string")), PrimaryKey = structure(list(Arn = structure(logical(0), tags = list(type = "string")), Region = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure")), ReplicaKeys = structure(list(structure(list(Arn = structure(logical(0), tags = list(type = "string")), Region = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(type = "list"))), tags = list(type = "structure")), PendingDeletionWindowInDays = structure(logical(0), tags = list(type = "integer")), MacAlgorithms = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list")), XksKeyConfiguration = structure(list(Id = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(type = "structure")), ReplicaPolicy = structure(logical(0), tags = list(type = "string")), ReplicaTags = structure(list(structure(list(TagKey = structure(logical(0), tags = list(type = "string")), TagValue = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(type = "list"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$retire_grant_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(GrantToken = structure(logical(0), tags = list(type = "string")), KeyId = structure(logical(0), tags = list(type = "string")), GrantId = structure(logical(0), tags = list(type = "string")), DryRun = structure(logical(0), tags = list(type = "boolean"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$retire_grant_output <- function(...) {
  list()
}

.kms$revoke_grant_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(KeyId = structure(logical(0), tags = list(type = "string")), GrantId = structure(logical(0), tags = list(type = "string")), DryRun = structure(logical(0), tags = list(type = "boolean"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$revoke_grant_output <- function(...) {
  list()
}

.kms$schedule_key_deletion_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(KeyId = structure(logical(0), tags = list(type = "string")), PendingWindowInDays = structure(logical(0), tags = list(type = "integer"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$schedule_key_deletion_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(KeyId = structure(logical(0), tags = list(type = "string")), DeletionDate = structure(logical(0), tags = list(type = "timestamp")), KeyState = structure(logical(0), tags = list(type = "string")), PendingWindowInDays = structure(logical(0), tags = list(type = "integer"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$sign_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(KeyId = structure(logical(0), tags = list(type = "string")), Message = structure(logical(0), tags = list(type = "blob", sensitive = TRUE)), MessageType = structure(logical(0), tags = list(type = "string")), GrantTokens = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list")), SigningAlgorithm = structure(logical(0), tags = list(type = "string")), DryRun = structure(logical(0), tags = list(type = "boolean"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$sign_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(KeyId = structure(logical(0), tags = list(type = "string")), Signature = structure(logical(0), tags = list(type = "blob")), SigningAlgorithm = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$tag_resource_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(KeyId = structure(logical(0), tags = list(type = "string")), Tags = structure(list(structure(list(TagKey = structure(logical(0), tags = list(type = "string")), TagValue = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(type = "list"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$tag_resource_output <- function(...) {
  list()
}

.kms$untag_resource_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(KeyId = structure(logical(0), tags = list(type = "string")), TagKeys = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$untag_resource_output <- function(...) {
  list()
}

.kms$update_alias_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(AliasName = structure(logical(0), tags = list(type = "string")), TargetKeyId = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$update_alias_output <- function(...) {
  list()
}

.kms$update_custom_key_store_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(CustomKeyStoreId = structure(logical(0), tags = list(type = "string")), NewCustomKeyStoreName = structure(logical(0), tags = list(type = "string")), KeyStorePassword = structure(logical(0), tags = list(type = "string", sensitive = TRUE)), CloudHsmClusterId = structure(logical(0), tags = list(type = "string")), XksProxyUriEndpoint = structure(logical(0), tags = list(type = "string")), XksProxyUriPath = structure(logical(0), tags = list(type = "string")), XksProxyVpcEndpointServiceName = structure(logical(0), tags = list(type = "string")), XksProxyAuthenticationCredential = structure(list(AccessKeyId = structure(logical(0), tags = list(type = "string", sensitive = TRUE)), RawSecretAccessKey = structure(logical(0), tags = list(type = "string", sensitive = TRUE))), tags = list(type = "structure")), XksProxyConnectivity = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$update_custom_key_store_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$update_key_description_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(KeyId = structure(logical(0), tags = list(type = "string")), Description = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$update_key_description_output <- function(...) {
  list()
}

.kms$update_primary_region_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(KeyId = structure(logical(0), tags = list(type = "string")), PrimaryRegion = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$update_primary_region_output <- function(...) {
  list()
}

.kms$verify_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(KeyId = structure(logical(0), tags = list(type = "string")), Message = structure(logical(0), tags = list(type = "blob", sensitive = TRUE)), MessageType = structure(logical(0), tags = list(type = "string")), Signature = structure(logical(0), tags = list(type = "blob")), SigningAlgorithm = structure(logical(0), tags = list(type = "string")), GrantTokens = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list")), DryRun = structure(logical(0), tags = list(type = "boolean"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$verify_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(KeyId = structure(logical(0), tags = list(type = "string")), SignatureValid = structure(logical(0), tags = list(type = "boolean")), SigningAlgorithm = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$verify_mac_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Message = structure(logical(0), tags = list(type = "blob", sensitive = TRUE)), KeyId = structure(logical(0), tags = list(type = "string")), MacAlgorithm = structure(logical(0), tags = list(type = "string")), Mac = structure(logical(0), tags = list(type = "blob")), GrantTokens = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list")), DryRun = structure(logical(0), tags = list(type = "boolean"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.kms$verify_mac_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(KeyId = structure(logical(0), tags = list(type = "string")), MacValid = structure(logical(0), tags = list(type = "boolean")), MacAlgorithm = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

Try the paws.security.identity package in your browser

Any scripts or data that you put into this service are public.

paws.security.identity documentation built on Sept. 12, 2023, 1:10 a.m.