From 479c0f2aed2401c3c2377e38a9d1308883fdde31 Mon Sep 17 00:00:00 2001
From: logan <>
Date: Sun, 25 May 2014 20:51:21 +0000
Subject: Fix resource descriptor leaks.

CID: 966576 & 966577

OK from guenther@ and "Yup. looks good." from tedu@
---
 src/lib/libssl/src/apps/s_socket.c | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/src/lib/libssl/src/apps/s_socket.c b/src/lib/libssl/src/apps/s_socket.c
index ca685684cf..d825fd73a5 100644
--- a/src/lib/libssl/src/apps/s_socket.c
+++ b/src/lib/libssl/src/apps/s_socket.c
@@ -122,6 +122,7 @@ init_client(int *sock, char *host, char *port, int type, int af)
 			    (char *) &i, sizeof(i));
 			if (i < 0) {
 				perror("keepalive");
+				close(s);
 				return (0);
 			}
 		}
@@ -281,16 +282,19 @@ redoit:
 	} else {
 		if ((*host = strdup(h1->h_name)) == NULL) {
 			perror("strdup");
+			close(ret);
 			return (0);
 		}
 
 		h2 = gethostbyname(*host);
 		if (h2 == NULL) {
 			BIO_printf(bio_err, "gethostbyname failure\n");
+			close(ret);
 			return (0);
 		}
 		if (h2->h_addrtype != AF_INET) {
 			BIO_printf(bio_err, "gethostbyname addr is not AF_INET\n");
+			close(ret);
 			return (0);
 		}
 	}
-- 
cgit v1.2.3-55-g6feb