From: Nikos Mavrogiannopoulos <nmav@gnutls.org>
Date: Tue, 5 Apr 2011 21:59:06 +0000 (+0200)
Subject: avoid using a freed pointer.
X-Git-Tag: gnutls_2_99_0~51
X-Git-Url: http://git.ipfire.org/gitweb.cgi?a=commitdiff_plain;h=065fd9d64cb790c1c129c776dcdb83f62db374c9;p=thirdparty%2Fgnutls.git

avoid using a freed pointer.
---

diff --git a/guile/src/core.c b/guile/src/core.c
index afdbd93047..4e0f340727 100644
--- a/guile/src/core.c
+++ b/guile/src/core.c
@@ -550,11 +550,15 @@ SCM_DEFINE (scm_gnutls_set_session_priorities_x,
   char *c_priorities;
   const char *err_pos;
   gnutls_session_t c_session;
+  size_t pos;
 
   c_session = scm_to_gnutls_session (session, 1, FUNC_NAME);
   c_priorities = scm_to_locale_string (priorities); /* XXX: to_latin1_string */
 
   err = gnutls_priority_set_direct (c_session, c_priorities, &err_pos);
+  if (err == GNUTLS_E_INVALID_REQUEST)
+    pos = err_pos - c_priorities;
+
   free (c_priorities);
 
   switch (err)
@@ -563,8 +567,6 @@ SCM_DEFINE (scm_gnutls_set_session_priorities_x,
       break;
     case GNUTLS_E_INVALID_REQUEST:
       {
-	size_t pos;
-	pos = err_pos - c_priorities;
 	scm_gnutls_error_with_args (err, FUNC_NAME,
 				    scm_list_1 (scm_from_size_t (pos)));
 	break;