Skip to contents

Unwrap a DEK, optionally logging the call

Usage

unwrap_dek(wrapped, kek, audit_log = NULL)

Arguments

wrapped

See Usage.

kek

See Usage.

audit_log

See Usage.

Examples

dek <- as.raw(1:32); kek <- as.raw(32:1)
w <- wrap_dek(dek, kek, as.raw(1:12))
log_env <- new.env(); log_env$entries <- list()
identical(unwrap_dek(w, kek)$dek, dek)
#> [1] TRUE