new function SSL_is_server to which returns 1 is the corresponding SSL context is...

(backport from HEAD)

diff --git a/ssl/ssl.h b/ssl/ssl.h
index 1f22cbccc5b76f7c97a1c958ac18dcb9d350876e..e57e160bbd10a1127efa164be837a5e2ecee66b6 100644 (file)
--- a/ssl/ssl.h
+++ b/ssl/ssl.h
@@ -2162,6 +2162,7 @@ int SSL_set_session_secret_cb(SSL *s, tls_session_secret_cb_fn tls_session_secre
 
 void SSL_set_debug(SSL *s, int debug);
 int SSL_cache_hit(SSL *s);
+int SSL_is_server(SSL *s);
 
 /* BEGIN ERROR CODES */
 /* The following lines are auto generated by the script mkerr.pl. Any changes

diff --git a/ssl/ssl_lib.c b/ssl/ssl_lib.c
index ea5dd0bd694cb2aaf68f2f3bc301afd5ea7ae928..51c020dc03d50f2eb4a07dd23d6b8f3f0d302857 100644 (file)
--- a/ssl/ssl_lib.c
+++ b/ssl/ssl_lib.c
@@ -3327,6 +3327,11 @@ int SSL_cache_hit(SSL *s)
        return s->hit;
        }
 
+int SSL_is_server(SSL *s)
+       {
+       return s->server;
+       }
+
 #if defined(_WINDLL) && defined(OPENSSL_SYS_WIN16)
 #include "../crypto/bio/bss_file.c"
 #endif