Output prog name within error message Reviewed-by: Andy Polyakov <appro@openssl.org> Reviewed-by: Rich Salz <rsalz@openssl.org> Reviewed-by: Richard Levitte <levitte@openssl.org> (Merged from https://github.com/openssl/openssl/pull/3141)

diff --git a/apps/s_client.c b/apps/s_client.c
index d7a3a80..c86d36c 100644
--- a/apps/s_client.c
+++ b/apps/s_client.c

@@ -1487,17 +1487,17 @@
     }
 #endif
     if (max_send_fragment > SSL3_RT_MAX_PLAIN_LENGTH) {
-        BIO_printf(bio_err, "Bad max send fragment size\n");
+        BIO_printf(bio_err, "%s: Bad max send fragment size\n", prog);
         goto end;
     }
 
     if (split_send_fragment > SSL3_RT_MAX_PLAIN_LENGTH) {
-        BIO_printf(bio_err, "Bad split send fragment size\n");
+        BIO_printf(bio_err, "%s: Bad split send fragment size\n", prog);
         goto end;
     }
 
     if (max_pipelines > SSL_MAX_PIPELINES) {
-        BIO_printf(bio_err, "Bad max pipelines value\n");
+        BIO_printf(bio_err, "%s: Bad max pipelines value\n", prog);
         goto end;
     }
 

diff --git a/apps/s_server.c b/apps/s_server.c
index 5faeb21..22131bf 100644
--- a/apps/s_server.c
+++ b/apps/s_server.c

@@ -1575,17 +1575,17 @@
     }
 #endif
     if (max_send_fragment > SSL3_RT_MAX_PLAIN_LENGTH) {
-        BIO_printf(bio_err, "Bad max send fragment size\n");
+        BIO_printf(bio_err, "%s: Bad max send fragment size\n", prog);
         goto end;
     }
 
     if (split_send_fragment > SSL3_RT_MAX_PLAIN_LENGTH) {
-        BIO_printf(bio_err, "Bad split send fragment size\n");
+        BIO_printf(bio_err, "%s:Bad split send fragment size\n", prog);
         goto end;
     }
 
     if (max_pipelines > SSL_MAX_PIPELINES) {
-        BIO_printf(bio_err, "Bad max pipelines value\n");
+        BIO_printf(bio_err, "%s:too large max-pipelines value\n", prog);
         goto end;
     }