balsoft/ligo
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Node: --connections now implies --peer-table-size

Browse Source
This commit is contained in:
Grégoire Henry 2018-07-17 15:22:14 +02:00 committed by Benjamin Canou
parent 41fe7d17ea
commit 378c4e2780
1 changed files with 9 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
src/bin_node/node_shared_arg.ml
View File

@ -74,13 +74,18 @@ let wrap
(* when `--expected-connections` is used, (* when `--expected-connections` is used,
override all the bounds defined in the configuration file. *) override all the bounds defined in the configuration file. *)
let bootstrap_threshold, let bootstrap_threshold,
min_connections, expected_connections, max_connections = min_connections, expected_connections, max_connections,
peer_table_size =
match connections with match connections with
| None -> bootstrap_threshold, None, None, None | None -> bootstrap_threshold, None, None, None, peer_table_size
| Some x -> | Some x ->
let peer_table_size =
match peer_table_size with
| None -> Some (8*x)
| Some _ -> peer_table_size in
begin match bootstrap_threshold with begin match bootstrap_threshold with
| None -> Some (min (x/4) 2), Some (x/2), Some x, Some (3*x/2) | None -> Some (min (x/4) 2), Some (x/2), Some x, Some (3*x/2), peer_table_size
| Some bs -> Some bs, Some (x/2), Some x, Some (3*x/2) | Some bs -> Some bs, Some (x/2), Some x, Some (3*x/2), peer_table_size
end end
in in
{ data_dir ; { data_dir ;