9 lines
524 B
OCaml
9 lines
524 B
OCaml
open State
|
|
|
|
val derive_master_secret : Core.tls_before_13 -> session_data -> string -> string list -> Core.master_secret
|
|
val initialise_crypto_ctx : Core.tls_before_13 -> session_data -> (crypto_context * crypto_context)
|
|
val finished : Core.tls_before_13 -> Ciphersuite.ciphersuite -> string -> string -> string list -> string
|
|
|
|
(** [pseudo_random_function version cipher length secret label seed] *)
|
|
val pseudo_random_function : Core.tls_before_13 -> Ciphersuite.ciphersuite ->
|
|
int -> string -> string -> string -> string
|