P2p: do not request new peers from known private peers

2018-05-31 18:50:24 +02:00 · 2018-05-31 18:50:24 +02:00 · 6b287ba98e
commit 6b287ba98e
parent bcb56331b5
1 changed files with 4 additions and 1 deletions
--- a/src/lib_p2p/p2p_pool.ml
+++ b/src/lib_p2p/p2p_pool.ml
@ -415,6 +415,9 @@ let broadcast_bootstrap_msg pool =
      (fun _peer_id peer_info ->
         match P2p_peer_state.get peer_info with
         | Running { data = { conn } } ->
+             (* should not ask private nodes for the list of their
+                known peers*)
+             if not (P2p_socket.private_node conn) then
               ignore (P2p_socket.write_now conn Bootstrap : bool tzresult )
         | _ -> ())
      pool.connected_peer_ids