This file is indexed.

/usr/lib/ocaml/netsys/netsys_crypto.mli is in libocamlnet-ocaml-dev 4.0.4-1build3.

This file is owned by root:root, with mode 0o644.

The actual contents of the file can be viewed below.

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
(* $Id: netsys_crypto.mli 2195 2015-01-01 12:23:39Z gerd $ *)

(** Cryptographic providers *)

(** Users should not call functions of the providers directly. Instead, use:
     - {!Netsys_tls} for using TLS
     - {!Netsys_ciphers} for using (symmetric) ciphers
     - {!Netsys_digests} for using digests
 *)

val current_tls : unit -> (module Netsys_crypto_types.TLS_PROVIDER)
  (** Return the current TLS provider. Only available if such a provider
      is linked into the executable. Do this by calling the [init] function
      of the provider, e.g. {!Nettls_gnutls.init}.
   *)

val current_tls_opt : unit -> (module Netsys_crypto_types.TLS_PROVIDER) option
  (** Same as [current_tls] but it returns [None] if TLS is unavailable *)

val current_symmetric_crypto : unit ->
                               (module Netsys_crypto_types.SYMMETRIC_CRYPTO)
  (** Returns the current provider for symmetric cryptography. This provider
      is always available, but may be empty (not implementing any ciphers).
   *)

val current_digests : unit ->
                      (module Netsys_crypto_types.DIGESTS)
  (** Returns the current provider for cryptographic digests. This provider
      is always available, but may be empty (not implementing any digest).
   *)


(**/**)

(* Hidden API for providers: *)

val set_current_tls : (module Netsys_crypto_types.TLS_PROVIDER) -> unit
  (* Sets [current_tls] *)

val set_current_symmetric_crypto : (module Netsys_crypto_types.SYMMETRIC_CRYPTO)
                                     -> unit

val set_current_digests : (module Netsys_crypto_types.DIGESTS) -> unit