From 6dca252c60d88e43e0430170e8ae0f3c4cf5d8b7 Mon Sep 17 00:00:00 2001
From: Giuseppe Scrivano <gscrivano@gnu.org>
Date: Mon, 4 Apr 2011 16:56:51 +0200
Subject: [PATCH] openssl: Retry to read if a non-blocking socket returns
 immediately.

---
 src/ChangeLog | 1 +
 src/openssl.c | 6 ++++--
 2 files changed, 5 insertions(+), 2 deletions(-)

diff --git a/src/ChangeLog b/src/ChangeLog
index 4c6ab208..001b62e2 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,6 +1,7 @@
 2011-04-04  Giuseppe Scrivano  <gscrivano@gnu.org>
 
 	* openssl.c [WINDOWS]: Include <w32sock.h>.
+	(openssl_read): Retry the read on SSL_ERROR_WANT_READ.
 
 	* host.c [WINDOWS]: Include <winsock2.h> and <ws2tcpip.h>.
 	Suggested by: Ray Satiro <raysatiro@yahoo.com>.
diff --git a/src/openssl.c b/src/openssl.c
index 60e794f6..201d2459 100644
--- a/src/openssl.c
+++ b/src/openssl.c
@@ -261,8 +261,10 @@ openssl_read (int fd, char *buf, int bufsize, void *arg)
   do
     ret = SSL_read (conn, buf, bufsize);
   while (ret == -1
-         && SSL_get_error (conn, ret) == SSL_ERROR_SYSCALL
-         && errno == EINTR);
+         && (SSL_get_error (conn, ret) == SSL_ERROR_WANT_READ
+             || (SSL_get_error (conn, ret) == SSL_ERROR_SYSCALL
+                 && errno == EINTR)));
+
   return ret;
 }
 
-- 
2.39.2