/usr/lib/ocaml/equeue-ssl/ssl_exts.mli is in libocamlnet-ssl-ocaml-dev 3.7.3-3build2.
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 44 45 46 47 | (* $Id: ssl_exts.mli 1745 2012-03-01 17:31:29Z gerd $ *)
(** A few extensions to the ocaml-ssl library [Ssl] *)
exception Shutdown_error of Ssl.ssl_error
val get_shutdown : Ssl.socket -> bool * bool
(** Returns a pair [ (shutdown_received, shutdown_sent) ]. The first bool
* is true if a "close notify" alert from the remote peer has been
* received by th. The second bool is true if a "close notify" alert has
* been sent.
*)
val get_rbio_eof : Ssl.socket -> bool
(** Returns whether EOF has been read by the rbio *)
val single_shutdown : Ssl.socket -> unit
(** Corresponds to SSL_shutdown: Closes one half of the SSL connection.
* If called for the first time, a "close notify" alert is sent to the
* peer. If called for the second time, it is waited until the
* peer's "close notify" alert arrives.
*
* Use [get_shutdown] to check what [single_shutdown] will do.
*)
val single_read : Ssl.socket -> string -> int -> int -> int
(** Deprecated. Is now identical to Ssl.read, *)
val single_write : Ssl.socket -> string -> int -> int -> int
(** Deprecated. Is now identical to Ssl.write *)
type ssl_mode =
{ enable_partial_write : bool;
accept_moving_write_buffer : bool;
auto_retry : bool;
}
val get_mode : Ssl.socket -> ssl_mode
(** Returns the current mode *)
val set_mode : Ssl.socket -> ssl_mode -> unit
(** Sets additional mode bits. It is not possible to clear bits. *)
val certificate_fingerprint : Ssl.certificate -> string
(** Returns the fingerprint in the cert in ':'-separated hex notation *)
|