Improved ALPN support in gnutls-cli

1 files changed, 5 insertions, 0 deletions

diff --git a/src/common.c b/src/common.c
index 2297d48da3..429c93e68f 100644
--- a/src/common.c
+++ b/src/common.c
@@ -457,6 +457,7 @@ print_info (gnutls_session_t session, int verbose, int print_cert)
     unsigned char session_id[33];
     size_t session_id_size = sizeof (session_id);
     gnutls_srtp_profile_t srtp_profile;
+    gnutls_datum_t p;
     char *desc;
     int rc;
 
@@ -576,6 +577,10 @@ print_info (gnutls_session_t session, int verbose, int print_cert)
       printf ("- SRTP profile: %s\n", gnutls_srtp_get_profile_name (srtp_profile));
 #endif
 
+    rc = gnutls_alpn_get_selected_protocol (session, &p);
+    if (rc == 0)
+      printf ("- Application protocol: %.*s\n", p.size, p.data);
+
     if (verbose)
       {
           gnutls_datum_t cb;