Distributed_db_requester.Raw_block_header
include Mavryk_requester.Requester.FULL_REQUESTER
with type key = Mavryk_base.TzPervasives.Block_hash.t
with type param = unit
with type request_param = unit request_param
with type store = Mavryk_store.Store.chain_store
with type value = Mavryk_base.Block_header.t
with type notified_value = Mavryk_base.Block_header.t
include Mavryk_requester.Requester.REQUESTER
with type key = Mavryk_base.TzPervasives.Block_hash.t
with type param = unit
with type value = Mavryk_base.Block_header.t
type key = Mavryk_base.TzPervasives.Block_hash.t
The index key
type value = Mavryk_base.Block_header.t
The indexed data
know t k
returns true iff the key is present in the memory table or the disk.
val read : t -> key -> value Mavryk_base.TzPervasives.tzresult Lwt.t
Return value if it is found in-memory, or else on disk. Otherwise fail with error Missing_data
.
inject t k v
returns false
if k
is already present in the memory table or in the disk, or has already been requested. Otherwise it updates the memory table and return true
val fetch :
t ->
?peer:Mavryk_base.TzPervasives.P2p_peer.Id.t ->
?timeout:Mavryk_base.TzPervasives.Time.System.Span.t ->
key ->
param ->
value Mavryk_base.TzPervasives.tzresult Lwt.t
fetch t ?peer ?timeout k param
returns the value when it is known. It can fail with Timeout k
if timeout
is provided and the value isn't know before the timeout expires. It can fail with Cancel
if the request is canceled.
The key is first looked up in memory, then on disk. If not present and not already requested, it schedules a request, and blocks until the requester is notified with notify
. param
is used to validate the notified value once it is received. (see also PROBE
and notify
).
Requests are re-sent via a 1.5 exponential back-off, with initial delay set to Request.initial_delay
. If the function is called multiple time with the same key but with distinct peers, the internal scheduler randomly chooses the requested peer (at each retry).
type store = Mavryk_store.Store.chain_store
The "disk" storage
type request_param = unit request_param
Configuration parameter to the Request
service
type notified_value = Mavryk_base.Block_header.t
type of values notified to the requester
Monitor all the fetched data. A given data will appear only once.
val notify :
t ->
Mavryk_base.TzPervasives.P2p_peer.Id.t ->
key ->
notified_value ->
unit Lwt.t
notify t peer k nv
notifies the requester that a value has been received for key k
, from peer peer
. nv
is a *notified value*. The notified value is validated using Probe.probe
, and the param
provided at fetching time (see PROBE
). If valid, the memory table is updated and all promises waiting on this key are resolved.
If the key is not pending the notification is ignored.
val memory_table_length : t -> int
memory_table_length t
returns the number of keys either known or pending in the memory table of t
val pending_requests : t -> int
Returns the number of requests currently pending
val create :
?random_table:bool ->
?global_input:(key * value) Lwt_watcher.input ->
request_param ->
store ->
t
create ?random_table ?global_input r s
creates a requester. r
is the configuration parameter passed to Request
functions.
The value for random_table
determines whether the underlying hashtable randomises its hash (see Stdlib
.Hashtbl.create and specifically the documentation of the random
parameter). The default depends on environment variables and Stdlib
.Hashtbl.randomize has been called.
val shutdown : t -> unit Lwt.t