`sig
exception Timeout
val h_name_of_sockaddr : Unix.sockaddr -> string
val string_of_sockaddr : Unix.sockaddr -> string
val h_name_or_string_of_sockaddr : Unix.sockaddr -> string
val inet_addr_of_sockaddr : Unix.sockaddr -> Unix.inet_addr
val port_of_sockaddr : Unix.sockaddr -> int
val port_of_in_channel : Pervasives.in_channel -> int
val tcp_socket : unit -> Unix.file_descr
val connect_tmout :
Unix.file_descr -> Unix.sockaddr -> Core.Std.Unix.select_timeout -> bool
val open_fd_connection_tmout :
con_timeout:Core.Std.Unix.select_timeout ->
rcv_timeout:float ->
snd_timeout:float -> Unix.sockaddr -> Unix.file_descr
val open_connection_tmout :
con_timeout:Core.Std.Unix.select_timeout ->
rcv_timeout:float ->
snd_timeout:float ->
Unix.sockaddr -> Pervasives.in_channel * Pervasives.out_channel
val set_in_channel_timeout : Pervasives.in_channel -> float -> unit
val set_out_channel_timeout : Pervasives.out_channel -> float -> unit
end`