From a6167603adfa846b32a43c9277ba39c7c039b3f1 Mon Sep 17 00:00:00 2001
From: Thomas Schoebel-Theuer <mars@box>
Date: Fri, 31 Jul 2020 19:48:45 +0200
Subject: [PATCH] marsadm: adjust report to masses of peers

---
 userspace/marsadm | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/userspace/marsadm b/userspace/marsadm
index c90cee0c..04d1c012 100755
--- a/userspace/marsadm
+++ b/userspace/marsadm
@@ -1810,7 +1810,12 @@ sub wait_cluster {
   foreach my $peer (keys(%old_status)) {
     $progress{$peer} = $non_participating ? 1 : 0;
   }
-  lprint "Wait for answers from " . join(",", sort alphanum_cmp keys(%old_status)) . "\n" if %old_status;
+  my $count = scalar(keys(%old_status));
+  if ($count && $count < 10) {
+    lprint "Wait for answers from " . join(",", sort alphanum_cmp keys(%old_status)) . "\n";
+  } else {
+    lprint "Wait for answers from $count peers\n";
+  }
   my $delta = $window > 0 ? $window / 2 : 30;
   while (1) {
     my $dead_count = 0;