Function acl_sane_socketpair

lib_acl/src/stdlib/sys/acl_sane_socketpair.c:27–54

/* sane_socketpair - sanitize socketpair() error returns */

int acl_sane_socketpair(int domain, int type, int protocol, ACL_SOCKET result[2])
{
	static int socketpair_ok_errors[] = {
		EINTR,
		0,
	};
	int     count;
	int     err;
	int     ret;

	/*
	 * Solaris socketpair() can fail with EINTR.
	 */
	while ((ret = socketpair(domain, type, protocol, result)) < 0) {
		for (count = 0; /* void */ ; count++) {
			if ((err = socketpair_ok_errors[count]) == 0) {
				return (ret);
			}
			if (acl_last_error() == err) {
				acl_msg_warn("socketpair: %s (trying again)",
					acl_last_serror());
				sleep(1);
				break;
			}
		}
	}
	return ret;
}

#elif defined(ACL_WINDOWS)