@@ -178,7 +178,7 @@ static int stirshaken_handle_cache_to_disk(X509 *x, STACK_OF(X509) *xchain, cons

     w = PEM_write_X509(fp, x);

 	if (w == 0) {

 		LM_ERR("Failed to write cert to %s", cert_full_path);

-		return -1;

+		goto fail;

 	}

     for (i = 0; i < sk_X509_num(xchain); i++) {

@@ -187,7 +187,7 @@ static int stirshaken_handle_cache_to_disk(X509 *x, STACK_OF(X509) *xchain, cons

 		w = PEM_write_X509(fp, xc);

 		if (w == 0) {

 			LM_ERR("Failed to write chain to %s", cert_full_path);

-			return -1;

+			goto fail;

 		}

 	}

@@ -195,6 +195,10 @@ static int stirshaken_handle_cache_to_disk(X509 *x, STACK_OF(X509) *xchain, cons

     fp = NULL;

     return 0;

+

+fail:

+	if (fp) fclose(fp);

+	return -1;

 }

 static int stirshaken_handle_cache_from_disk(stir_shaken_context_t *ss, stir_shaken_cert_t *cert, const char *name)