hacl-star-raw 0.7.0 · OCaml Package

Parameters

module F : Cstubs.FOREIGN

Signature

module Hacl_Spec_applied : sig ... end

module EverCrypt_Error_applied : sig ... end

type state_s_tags = Unsigned.UInt8.t

val state_s_tags : Unsigned.uint8 Ctypes.typ

val state_s_tags_MD5_s : Unsigned.UInt8.t

val state_s_tags_SHA1_s : Unsigned.UInt8.t

val state_s_tags_SHA2_224_s : Unsigned.UInt8.t

val state_s_tags_SHA2_256_s : Unsigned.UInt8.t

val state_s_tags_SHA2_384_s : Unsigned.UInt8.t

val state_s_tags_SHA2_512_s : Unsigned.UInt8.t

val state_s_tags_SHA3_256_s : Unsigned.UInt8.t

val state_s_tags_Blake2S_s : Unsigned.UInt8.t

val state_s_tags_Blake2S_128_s : Unsigned.UInt8.t

val state_s_tags_Blake2B_s : Unsigned.UInt8.t

val state_s_tags_Blake2B_256_s : Unsigned.UInt8.t

type everCrypt_Hash_state_s = [ `everCrypt_Hash_state_s ] Ctypes.structure

val everCrypt_Hash_state_s : 
  [ `everCrypt_Hash_state_s ] Ctypes.structure Ctypes.typ

val everCrypt_Hash_update_multi_256 : 
  (Unsigned.uint32 Ctypes_static.ptr ->
    bytes Ctypes_static.ocaml ->
    Unsigned.uint32 ->
    unit F.return)
    F.result

val everCrypt_Hash_update_last_256 : 
  (Unsigned.uint32 Ctypes_static.ptr ->
    Unsigned.uint64 ->
    bytes Ctypes_static.ocaml ->
    Unsigned.uint32 ->
    unit F.return)
    F.result

val everCrypt_Hash_Incremental_hash_len : 
  (Unsigned.uint8 -> Unsigned.uint32 F.return) F.result

type everCrypt_Hash_Incremental_hash_state =
  [ `everCrypt_Hash_Incremental_hash_state ] Ctypes.structure

val everCrypt_Hash_Incremental_hash_state : 
  [ `everCrypt_Hash_Incremental_hash_state ] Ctypes.structure Ctypes.typ

val everCrypt_Hash_Incremental_hash_state_block_state : 
  ([ `everCrypt_Hash_state_s ] Ctypes.structure Ctypes_static.ptr,
    [ `everCrypt_Hash_Incremental_hash_state ] Ctypes.structure)
    Ctypes.field

val everCrypt_Hash_Incremental_hash_state_buf : 
  (Unsigned.uint8 Ctypes_static.ptr,
    [ `everCrypt_Hash_Incremental_hash_state ] Ctypes.structure)
    Ctypes.field

val everCrypt_Hash_Incremental_hash_state_total_len : 
  (Unsigned.uint64,
    [ `everCrypt_Hash_Incremental_hash_state ] Ctypes.structure)
    Ctypes.field

val everCrypt_Hash_Incremental_create_in : 
  (Unsigned.uint8 ->
    [ `everCrypt_Hash_Incremental_hash_state ] Ctypes.structure
      Ctypes_static.ptr
      F.return)
    F.result

val everCrypt_Hash_Incremental_init : 
  ([ `everCrypt_Hash_Incremental_hash_state ] Ctypes.structure
     Ctypes_static.ptr ->
    unit F.return)
    F.result

val everCrypt_Hash_Incremental_update : 
  ([ `everCrypt_Hash_Incremental_hash_state ] Ctypes.structure
     Ctypes_static.ptr ->
    bytes Ctypes_static.ocaml ->
    Unsigned.uint32 ->
    Unsigned.uint8 F.return)
    F.result

val everCrypt_Hash_Incremental_alg_of_state : 
  ([ `everCrypt_Hash_Incremental_hash_state ] Ctypes.structure
     Ctypes_static.ptr ->
    Unsigned.uint8 F.return)
    F.result

val everCrypt_Hash_Incremental_finish : 
  ([ `everCrypt_Hash_Incremental_hash_state ] Ctypes.structure
     Ctypes_static.ptr ->
    bytes Ctypes_static.ocaml ->
    unit F.return)
    F.result

val everCrypt_Hash_Incremental_free : 
  ([ `everCrypt_Hash_Incremental_hash_state ] Ctypes.structure
     Ctypes_static.ptr ->
    unit F.return)
    F.result

val everCrypt_Hash_Incremental_hash_256 : 
  (bytes Ctypes_static.ocaml ->
    Unsigned.uint32 ->
    bytes Ctypes_static.ocaml ->
    unit F.return)
    F.result

val everCrypt_Hash_Incremental_hash : 
  (Unsigned.uint8 ->
    bytes Ctypes_static.ocaml ->
    bytes Ctypes_static.ocaml ->
    Unsigned.uint32 ->
    unit F.return)
    F.result

package hacl-star-raw

Parameters

Signature