Print SSL error codes as well as the string.
CYASSL doesn't compile with the error strings in some configurations, so
it is nice to have the error code on SSL errors as well.
diff --git a/lib/libwebsockets.c b/lib/libwebsockets.c
index 80a4ce0..68db541 100644
--- a/lib/libwebsockets.c
+++ b/lib/libwebsockets.c
@@ -1860,14 +1860,16 @@
method = (SSL_METHOD *)SSLv23_server_method();
if (!method) {
- lwsl_err("problem creating ssl method: %s\n",
+ lwsl_err("problem creating ssl method %lu: %s\n",
+ ERR_get_error(),
ERR_error_string(ERR_get_error(),
(char *)context->service_buffer));
goto bail;
}
context->ssl_ctx = SSL_CTX_new(method); /* create context */
if (!context->ssl_ctx) {
- lwsl_err("problem creating ssl context: %s\n",
+ lwsl_err("problem creating ssl context %lu: %s\n",
+ ERR_get_error(),
ERR_error_string(ERR_get_error(),
(char *)context->service_buffer));
goto bail;
@@ -1886,7 +1888,8 @@
if (info->port == CONTEXT_PORT_NO_LISTEN) {
method = (SSL_METHOD *)SSLv23_client_method();
if (!method) {
- lwsl_err("problem creating ssl method: %s\n",
+ lwsl_err("problem creating ssl method %lu: %s\n",
+ ERR_get_error(),
ERR_error_string(ERR_get_error(),
(char *)context->service_buffer));
goto bail;
@@ -1894,7 +1897,8 @@
/* create context */
context->ssl_client_ctx = SSL_CTX_new(method);
if (!context->ssl_client_ctx) {
- lwsl_err("problem creating ssl context: %s\n",
+ lwsl_err("problem creating ssl context %lu: %s\n",
+ ERR_get_error(),
ERR_error_string(ERR_get_error(),
(char *)context->service_buffer));
goto bail;
@@ -1968,8 +1972,9 @@
n = SSL_CTX_use_certificate_chain_file(context->ssl_ctx,
info->ssl_cert_filepath);
if (n != 1) {
- lwsl_err("problem getting cert '%s': %s\n",
+ lwsl_err("problem getting cert '%s' %lu: %s\n",
info->ssl_cert_filepath,
+ ERR_get_error(),
ERR_error_string(ERR_get_error(),
(char *)context->service_buffer));
goto bail;
@@ -1978,8 +1983,9 @@
if (SSL_CTX_use_PrivateKey_file(context->ssl_ctx,
info->ssl_private_key_filepath,
SSL_FILETYPE_PEM) != 1) {
- lwsl_err("ssl problem getting key '%s': %s\n",
+ lwsl_err("ssl problem getting key '%s' %lu: %s\n",
info->ssl_private_key_filepath,
+ ERR_get_error(),
ERR_error_string(ERR_get_error(),
(char *)context->service_buffer));
goto bail;