P2p_peer_state.Infotype ('conn, 'peer_meta, 'conn_meta) peer_info =
('conn, 'peer_meta, 'conn_meta) tval create :
created:Mavryk_base.TzPervasives.Time.System.t ->
?trusted:bool ->
peer_metadata:'peer_meta ->
Mavryk_base.TzPervasives.P2p_peer.Id.t ->
('conn, 'peer_meta, 'conn_meta) peer_infocreate ~trusted ~meta peer_id is a freshly minted peer_id info for peer_id.
val peer_id :
('conn, 'peer_meta, 'conn_meta) peer_info ->
Mavryk_base.TzPervasives.P2p_peer.Id.tval created :
('conn, 'peer_meta, 'conn_meta) peer_info ->
Mavryk_base.TzPervasives.Time.System.tval peer_metadata : ('conn, 'peer_meta, 'conn_meta) peer_info -> 'peer_metaval set_peer_metadata :
('conn, 'peer_meta, 'conn_meta) peer_info ->
'peer_meta ->
unitval trusted : ('conn, 'peer_meta, 'conn_meta) peer_info -> boolval set_trusted : ('conn, 'peer_meta, 'conn_meta) peer_info -> unitval unset_trusted : ('conn, 'peer_meta, 'conn_meta) peer_info -> unitval last_failed_connection :
('conn, 'peer_meta, 'conn_meta) peer_info ->
(Mavryk_base.TzPervasives.P2p_connection.Id.t
* Mavryk_base.TzPervasives.Time.System.t)
optionval last_rejected_connection :
('conn, 'peer_meta, 'conn_meta) peer_info ->
(Mavryk_base.TzPervasives.P2p_connection.Id.t
* Mavryk_base.TzPervasives.Time.System.t)
optionval last_established_connection :
('conn, 'peer_meta, 'conn_meta) peer_info ->
(Mavryk_base.TzPervasives.P2p_connection.Id.t
* Mavryk_base.TzPervasives.Time.System.t)
optionval last_disconnection :
('conn, 'peer_meta, 'conn_meta) peer_info ->
(Mavryk_base.TzPervasives.P2p_connection.Id.t
* Mavryk_base.TzPervasives.Time.System.t)
optionval last_seen :
('conn, 'peer_meta, 'conn_meta) peer_info ->
(Mavryk_base.TzPervasives.P2p_connection.Id.t
* Mavryk_base.TzPervasives.Time.System.t)
optionlast_seen gi is the most recent of:
* last established connection * last rejected connection * last disconnection
val last_miss :
('conn, 'peer_meta, 'conn_meta) peer_info ->
(Mavryk_base.TzPervasives.P2p_connection.Id.t
* Mavryk_base.TzPervasives.Time.System.t)
optionlast_miss gi is the most recent of:
* last failed connection * last rejected connection * last disconnection
val log_incoming_rejection :
timestamp:Mavryk_base.TzPervasives.Time.System.t ->
('conn, 'peer_meta, 'conn_meta) peer_info ->
Mavryk_base.TzPervasives.P2p_connection.Id.t ->
unitmodule File : sig ... endval events :
('conn, 'peer_meta, 'conn_meta) t ->
Mavryk_base.TzPervasives.P2p_peer.Pool_event.t listval watch :
('conn, 'peer_meta, 'conn_meta) t ->
Mavryk_base.TzPervasives.P2p_peer.Pool_event.t Lwt_stream.t
* Lwt_watcher.stopper