From: Ludovic Courtès <ludo@gnu.org>
Date: Tue, 14 Oct 2014 20:33:10 +0000 (+0200)
Subject: guile: Remove trailing zero in 'gnutls_server_name_set' call.
X-Git-Tag: gnutls_3_4_0~785
X-Git-Url: http://git.ipfire.org/gitweb.cgi?a=commitdiff_plain;h=e4e513f43a8bdd9fe50bdd95a7fd213bca2f81b0;p=thirdparty%2Fgnutls.git

guile: Remove trailing zero in 'gnutls_server_name_set' call.

In GnuTLS 3.2.19 (and possibly 3.3.9 and 3.1.17),
'set-session-server-name!' would pass a trailing nul character on the
wire after the server name, which would thus be rejected by servers.
---

diff --git a/guile/src/core.c b/guile/src/core.c
index 82fd573432..2778205fe6 100644
--- a/guile/src/core.c
+++ b/guile/src/core.c
@@ -719,7 +719,7 @@ SCM_DEFINE (scm_gnutls_set_session_server_name_x, "set-session-server-name!",
   c_name = scm_to_locale_string (name);
 
   err = gnutls_server_name_set (c_session, c_type, c_name,
-				strlen (c_name) + 1);
+				strlen (c_name));
   free (c_name);
 
   if (EXPECT_FALSE (err != GNUTLS_E_SUCCESS))