[ruby-dev:11523] Re: A problem of Socket methods on Windows

なかだです。

At Wed, 15 Nov 2000 09:18:19 +0900
OKA Toshiyuki <[e-mail]> wrote:
> ということで、渡ってきた SOCKET引数が、本当にソケットハンドルかど
> うかを確認してやればよかろう、と考え、添付のようなパッチを当てま
> した。当方のビルド環境 (VC6 + SP4) では、うまく動いているようです。

  というより、なぜか TO_SOCKET()/my_open_osfhandle() が抜けてるのでは。

  ていうか、myfdopen() がさっぱり分からない。この fd はファイルディスク
リプタ? ファイルハンドル? コメントにも `brain damaged' って書いてあるけ
ど、たしかに。


diff -pruPX ./.excludes current/win32/win32.c devel/win32/win32.c
--- current/win32/win32.c	Tue Nov 14 16:10:31 2000
+++ devel/win32/win32.c	Wed Nov 15 12:43:11 2000
@@ -1756,7 +1756,7 @@ myfdopen (int fd, const char *mode)
     if (is_socket((SOCKET)fd)) {
 	int fh;
 
-	fh = my_open_osfhandle((SOCKET)fd, O_RDWR|O_BINARY);
+	fh = my_open_osfhandle(TO_SOCKET(fd), O_RDWR|O_BINARY);
 	return _fdopen(fh, mode);		// return file pointer
     }
     else {
@@ -2056,7 +2056,6 @@ SOCKET
 myaccept (SOCKET s, struct sockaddr *addr, int *addrlen)
 {
     SOCKET r;
-    int trap_immediate = rb_trap_immediate;
 
     if (!NtSocketsInitialized++) {
 	StartSockets();
@@ -2076,7 +2075,7 @@ mybind (SOCKET s, struct sockaddr *addr,
     if (!NtSocketsInitialized++) {
 	StartSockets();
     }
-    if ((r = bind (s, addr, addrlen)) == SOCKET_ERROR)
+    if ((r = bind (TO_SOCKET(s), addr, addrlen)) == SOCKET_ERROR)
 	errno = WSAGetLastError();
     return r;
 }
@@ -2090,7 +2089,7 @@ myconnect (SOCKET s, struct sockaddr *ad
     if (!NtSocketsInitialized++) {
 	StartSockets();
     }
-    if ((r = connect (s, addr, addrlen)) == SOCKET_ERROR)
+    if ((r = connect (TO_SOCKET(s), addr, addrlen)) == SOCKET_ERROR)
 	errno = WSAGetLastError();
     return r;
 }
@@ -2133,7 +2132,7 @@ mygetsockopt (SOCKET s, int level, int o
     if (!NtSocketsInitialized++) {
 	StartSockets();
     }
-    if ((r = getsockopt (s, level, optname, optval, optlen)) == SOCKET_ERROR)
+    if ((r = getsockopt (TO_SOCKET(s), level, optname, optval, optlen)) == SOCKET_ERROR)
 	errno = WSAGetLastError();
     return r;
 }
@@ -2161,7 +2160,7 @@ mylisten (SOCKET s, int backlog)
     if (!NtSocketsInitialized++) {
 	StartSockets();
     }
-    if ((r = listen (s, backlog)) == SOCKET_ERROR)
+    if ((r = listen (TO_SOCKET(s), backlog)) == SOCKET_ERROR)
 	errno = WSAGetLastError();
     return r;
 }
@@ -2233,7 +2232,7 @@ mysetsockopt (SOCKET s, int level, int o
     if (!NtSocketsInitialized++) {
 	StartSockets();
     }
-    if ((r = setsockopt (s, level, optname, optval, optlen))
+    if ((r = setsockopt (TO_SOCKET(s), level, optname, optval, optlen))
     		 == SOCKET_ERROR)
 	errno = WSAGetLastError();
     return r;
@@ -2266,7 +2265,7 @@ mysocket (int af, int type, int protocol
 	errno = WSAGetLastError();
 	//fprintf(stderr, "socket fail (%d)", WSAGetLastError());
     }
-    return s;
+    return my_open_osfhandle(s, O_RDWR|O_BINARY);
 }
 
 #undef gethostbyaddr


-- 
--- 僕の前にBugはない。
--- 僕の後ろにBugはできる。
    中田 伸悦