diff options
author | Richard Levitte <levitte@openssl.org> | 2003-09-27 17:55:13 +0000 |
---|---|---|
committer | Richard Levitte <levitte@openssl.org> | 2003-09-27 17:55:13 +0000 |
commit | 253e893c2b0e0d1bc2d4b64073a30cfc493e5bc6 (patch) | |
tree | dfb7e39632c80a3e1d2d294faaf0f94fc8b344cc /apps/s_server.c | |
parent | 0ad2c4f85ba4f10c9d2387f316d89a7e9a42fe82 (diff) |
Include the instance in the Kerberos ticket information.
In s_server, print the received Kerberos information.
PR: 693
Diffstat (limited to 'apps/s_server.c')
-rw-r--r-- | apps/s_server.c | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/apps/s_server.c b/apps/s_server.c index 7ce65a3e8e..64d4c82861 100644 --- a/apps/s_server.c +++ b/apps/s_server.c @@ -1347,7 +1347,13 @@ static int init_ssl_connection(SSL *con) if (SSL_ctrl(con,SSL_CTRL_GET_FLAGS,0,NULL) & TLS1_FLAGS_TLS_PADDING_BUG) BIO_printf(bio_s_out,"Peer has incorrect TLSv1 block padding\n"); - +#ifndef OPENSSL_NO_KRB5 + if (con->kssl_ctx->client_princ != NULL) + { + BIO_printf(bio_s_out,"Kerberos peer principal is %s\n", + con->kssl_ctx->client_princ); + } +#endif /* OPENSSL_NO_KRB5 */ return(1); } |