type value = Bytes.t
type socket = Lwt_ssl.socket
val create : int -> value
val show : value -> string
val show_socket : socket -> string
val read : socket -> value -> off -> len -> int Lwt.t
val write : socket -> value -> off -> len -> int Lwt.t
val read_bytes : socket -> Bytes.t -> off -> len -> int Lwt.t
val write_bytes : socket -> Bytes.t -> off -> len -> int Lwt.t
val make_sha1 : value -> off -> len -> Tag.t
val make_crc32 : value -> off -> len -> Tag.t