diff options
-rw-r--r-- | ChangeLog | 5 | ||||
-rw-r--r-- | win32/win32.c | 7 |
2 files changed, 12 insertions, 0 deletions
@@ -1,3 +1,8 @@ +Mon Nov 10 20:20:53 2014 NAKAMURA Usaku <usa@ruby-lang.org> + + * win32/win32.c (rb_w32_read): retry with reduced length if cannot to + write any data but no error occurs. + Mon Nov 10 20:04:16 2014 Tanaka Akira <akr@fsij.org> * lib/webrick/server.rb: Setup shutdown pipe in listen method. diff --git a/win32/win32.c b/win32/win32.c index 2661641266..308f4836f9 100644 --- a/win32/win32.c +++ b/win32/win32.c @@ -6497,6 +6497,7 @@ rb_w32_write(int fd, const void *buf, size_t size) /* get rid of console writing bug */ len = (_osfile(fd) & FDEV) ? min(32 * 1024, size) : size; size -= len; + retry2: /* if have cancel_io, use Overlapped I/O */ if (cancel_io) { @@ -6556,6 +6557,12 @@ rb_w32_write(int fd, const void *buf, size_t size) goto retry; } if (ret == 0) { + size_t newlen = len / 2; + if (newlen > 0) { + size += len - newlen; + len = newlen; + goto retry2; + } ret = -1; errno = EWOULDBLOCK; } |