package pkcs11-driver

  1. Overview
  2. Docs
Bindings to the PKCS#11 cryptographic API

Install

dune-project
 Dependency

Authors

Maintainers

Sources

pkcs11-v1.0.1.tbz
sha256=db6bed28e4a75cb3787d0b6feca954a91c9e52e678b8cc73c1058975b1846946
sha512=f764b356cac3dd7718003a158f2a4dad7b8caae981930ab9cfa674a08ebcf3583c531bfcca9ddbb593d0c8e5a64b52381f8c9c702c3a0d0d44000727b095c47a

doc/src/pkcs11-driver/pkcs11_CK_PKCS5_PBKD2_PSEUDO_RANDOM_FUNCTION_TYPE.ml.html

Source file pkcs11_CK_PKCS5_PBKD2_PSEUDO_RANDOM_FUNCTION_TYPE.ml

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
type t = P11_ulong.t [@@deriving eq]

let ( ! ) x = Unsigned.ULong.of_string (Int64.to_string x)

let _CKP_PKCS5_PBKD2_HMAC_SHA1 : t = !0x00000001L

let view ul =
  if equal ul _CKP_PKCS5_PBKD2_HMAC_SHA1 then
    P11_pkcs5_pbkd2_pseudo_random_function_type.CKP_PKCS5_PBKD2_HMAC_SHA1
  else
    invalid_arg ("Unknown CKP code: " ^ Unsigned.ULong.to_string ul)

let make =
  let open P11_pkcs5_pbkd2_pseudo_random_function_type in
  function
  | CKP_PKCS5_PBKD2_HMAC_SHA1 -> _CKP_PKCS5_PBKD2_HMAC_SHA1

let typ = Ctypes.ulong