From 09398e9bd42e66e6e6693460f5cd995c1d794da8 Mon Sep 17 00:00:00 2001
From: Pawel Jakub Dawidek <pjd@FreeBSD.org>
Date: Fri, 16 Apr 2010 06:47:29 +0000
Subject: [PATCH] Fix control socket leak when worker process exits.

Submitted by:	Mikolaj Golub <to.my.trociny@gmail.com>
MFC after:	3 days
---
 sbin/hastd/hastd.c | 1 +
 1 file changed, 1 insertion(+)

diff --git a/sbin/hastd/hastd.c b/sbin/hastd/hastd.c
index 19f08936c2d..957885d7ac1 100644
--- a/sbin/hastd/hastd.c
+++ b/sbin/hastd/hastd.c
@@ -137,6 +137,7 @@ child_exit(void)
 			pjdlog_error("Worker process failed (pid=%u, status=%d).",
 			    (unsigned int)pid, WEXITSTATUS(status));
 		}
+		proto_close(res->hr_ctrl);
 		res->hr_workerpid = 0;
 		if (res->hr_role == HAST_ROLE_PRIMARY) {
 			sleep(1);