This library offers a lightweight way for applications protocols to version
themselves. The more protocols that add themselves to Known_protocol
, the nicer
error messages we will get when connecting to a service while using the wrong
protocol.
include sig ... end
val bin_t : t Bin_prot.Type_class.t
val bin_read_t : t Bin_prot.Read.reader
val __bin_read_t__ : (int ‑> t) Bin_prot.Read.reader
val bin_reader_t : t Bin_prot.Type_class.reader
val bin_size_t : t Bin_prot.Size.sizer
val bin_write_t : t Bin_prot.Write.writer
val bin_writer_t : t Bin_prot.Type_class.writer
val bin_shape_t : Bin_prot.Shape.t
val t_of_sexp : Sexplib.Sexp.t ‑> t
val sexp_of_t : t ‑> Sexplib.Sexp.t
val create : protocol:Protocol_version_header__.Known_protocol.t ‑> supported_versions:int list ‑> t
val negotiate : allow_legacy_peer:bool ‑> us:t ‑> peer:t ‑> int Core_kernel.Or_error.t
negotiate ~allow_legacy_peer ~us ~peer
inspects the magic numbers of us
and
peer
. If the magic numbers match, the highest shared version number is returned.
If allow_legacy_peer
then the magic number of peer
is assumed to be us
if no
magic number exists.
val contains_magic_prefix : protocol:Protocol_version_header__.Known_protocol.t ‑> bool Bin_prot.Type_class.reader
contains_magic_prefix
reads a bin_protted value of type t
and returns a boolean
saying whether this magic number was observed.
val any_magic_prefix : Protocol_version_header__.Known_protocol.t option Bin_prot.Type_class.reader
any_magic_prefix
reads the magic number for one of the known protocols.