# HG changeset patch
# User Sergey Kandaurov <pluknet@nginx.com>
# Date 1432658136 -10800
# Node ID 0b059d5e68879d07020f4d1cdb7a259325525b7a
# Parent  dc2f8aac055372f1bfdf631cd6ff270265614573
Tests: retry on SSL_WANT_READ in ssl_proxy_upgrade.t.

diff --git a/ssl_proxy_upgrade.t b/ssl_proxy_upgrade.t
--- a/ssl_proxy_upgrade.t
+++ b/ssl_proxy_upgrade.t
@@ -232,7 +232,10 @@ sub upgrade_getline {
 	$s->blocking(0);
 	while (IO::Select->new($s)->can_read(1.5)) {
 		my $n = $s->sysread($buf, 1024);
-		last unless $n;
+		unless ($n) {
+			next if $s->errstr() == IO::Socket::SSL->SSL_WANT_READ;
+			last;
+		}
 
 		$h->{b} .= $buf;
 		$h->{r} += $n;