R/asn1.R

In NCEAS/PKIplus: Public Key Infrastructure for R Based on the X.509 Standard, Plus Access Functions

ASN1.decode <- function(what) .Call(decode_ASN1, what)
ASN1.encode <- function(what) .Call(encode_ASN1, what)
ASN1.item <- function(what, type) {
  what <- as.raw(what)
  attr(what, "type") <- type
  what
}
ASN1.type <- function(what) attr(what, "type")

as.BIGNUMint <- function(what, scalar=TRUE) .Call(PKI_asBIGNUMint, what, scalar)