tests: make sshserver less verbose

Only display top of key files in verbose mode.

Follow-up to 89f306ae40b678bd91595ba41fe5f9d5ed374897 #16781

Closes #17647

diff --git a/tests/sshserver.pl b/tests/sshserver.pl
index 8763bfd6c1600129721d8633608b7ef81ff8d484..4e0ca466c5f7b56508cb19a5fd686bf04a5f8ff4 100755 (executable)
--- a/tests/sshserver.pl
+++ b/tests/sshserver.pl
@@ -428,13 +428,13 @@ if((! -e pp($hstprvkeyf)) || (! -s pp($hstprvkeyf)) ||
         logmsg "Could not generate host key\n";
         exit 1;
     }
-    display_file_top(pp($hstprvkeyf));
+    display_file_top(pp($hstprvkeyf)) if($verbose);
     logmsg "generating client keys...\n" if($verbose);
     if(system "\"$sshkeygen\" -q -t rsa -f " . pp($cliprvkeyf) . " -C 'curl test client' -N ''" . $sshkeygenopt) {
         logmsg "Could not generate client key\n";
         exit 1;
     }
-    display_file_top(pp($cliprvkeyf));
+    display_file_top(pp($cliprvkeyf)) if($verbose);
     # Make sure that permissions are restricted so openssh doesn't complain
     chmod 0600, pp($hstprvkeyf);
     chmod 0600, pp($cliprvkeyf);