sasl_gssapi: Added body to Curl_sasl_gssapi_cleanup()

diff --git a/lib/curl_sasl_gssapi.c b/lib/curl_sasl_gssapi.c
index 096729fef97f92a935b10b7cfddbc70a1658fe51..4658621448f932d7cc9f63055d9f016caecb6181 100644 (file)
--- a/lib/curl_sasl_gssapi.c
+++ b/lib/curl_sasl_gssapi.c
@@ -134,7 +134,19 @@ CURLcode Curl_sasl_create_gssapi_security_message(struct SessionHandle *data,
 
 void Curl_sasl_gssapi_cleanup(struct kerberos5data *krb5)
 {
-  (void) krb5;
+  OM_uint32 minor_status;
+
+  /* Free our security context */
+  if(krb5->context != GSS_C_NO_CONTEXT) {
+    gss_delete_sec_context(&minor_status, &krb5->context, GSS_C_NO_BUFFER);
+    krb5->context = GSS_C_NO_CONTEXT;
+  }
+
+  /* Free the SPN */
+  if(krb5->spn != GSS_C_NO_NAME) {
+    gss_release_name(&minor_status, &krb5->spn);
+    krb5->spn = GSS_C_NO_NAME;
+  }
 }
 
 #endif /* HAVE_GSSAPI && USE_KERBEROS5 */