PR#3342 fix resource leak coverity issue 966577
[openssl.git] / apps / s_socket.c
index e0dbc5a90a950c6f365f43f7e48e778300c3bcd1..1841607ef5bbc54947fe7d0a4dd478922ec06ee3 100644 (file)
@@ -270,7 +270,7 @@ static int init_client_ip(int *sock, const unsigned char ip[4], int port,
                {
                i=0;
                i=setsockopt(s,SOL_SOCKET,SO_KEEPALIVE,(char *)&i,sizeof(i));
                {
                i=0;
                i=setsockopt(s,SOL_SOCKET,SO_KEEPALIVE,(char *)&i,sizeof(i));
-               if (i < 0) { perror("keepalive"); return(0); }
+               if (i < 0) { closesocket(s); perror("keepalive"); return(0); }
                }
 #endif
 
                }
 #endif