[ruby-list:23531] Re: Ruby 1.4.5

小松です。

In the message of "[ruby-list:23530] Re: Ruby 1.4.5"
    on 2000/6/27 MICHIMURA Tadao <[e-mail]> wrote:
|えっと、このパッチを適用して作り直してみましたが、症状に変化はありま
|せんでした。
|
|それで、1.4.4の方で同様に試したところ、がんがんループしているようで、
|CPUの使用率が100%になりました。でも、1.4.5では、select待ちのままです。
|ですから、小松さんの解説(WSAENOTSOCKエラーになった場合の処理の変更)
|ですと、今回のパッチでは修正されないような気もします。

いつのまにかeval.cでFD_CLR()を使うようになってますね。
FD_CLR()の置き換えの追加です。

で、Ruby 1.4.5に対して[ruby-list:23522]+このパッチを適用した後に、
以下のような感じで NT 4.0 SP6a で動作確認しましたが普通に動くように
見えます。CPU使用率も特に上がりません。

junk.fileが2行では小さすぎますか？

なお、win32/win32.hを変更するので、nmake cleanでいったん全部
消してください。

C:\lang\ruby>type junk.file
junk line 1
junk line 2

C:\lang\ruby>ruby -v tsvr.rb
ruby 1.5.4 (2000-06-23) [i386-mswin32]
server is on 1953
#<TCPSocket:0x2d23580> is accepted

C:\lang\ruby>ruby -v clnt.rb 1953
ruby 1.5.4 (2000-06-23) [i386-mswin32]
Trying localhost ... done
addr: AF_INET:1954:localhost:127.0.0.1
peer: AF_INET:1953:localhost:127.0.0.1
a
a
b
junk line 1
c
junk line 2
d
b

Tue Jun 27 12:05:10 2000  Katsuyuki Komatsu  <[e-mail]>

	* win32.c (myfdclr): new function.

	* win32.h: add FD_CLR.

diff -ru2p ruby-1.4.5.dist/win32/win32.c ruby-1.4.5/win32/win32.c
--- ruby-1.4.5.dist/win32/win32.c	Fri Feb 18 15:58:58 2000
+++ ruby-1.4.5/win32/win32.c	Tue Jun 27 12:05:10 2000
@@ -1739,4 +1748,23 @@ myfdset(int fd, fd_set *set)
 }
 
+#undef FD_CLR
+
+void
+myfdclr(int fd, fd_set *set)
+{
+    unsigned int i;
+    SOCKET s = TO_SOCKET(fd);
+
+    for (i = 0; i < set->fd_count; i++) {
+        if (set->fd_array[i] == s) {
+            while (i < set->fd_count - 1) {
+                set->fd_array[i] = set->fd_array[i + 1];
+                i++;
+            }
+            set->fd_count--;
+            break;
+        }
+    }
+}
 
 #undef FD_ISSET
diff -ru2p ruby-1.4.5.dist/win32/win32.h ruby-1.4.5/win32/win32.h
--- ruby-1.4.5.dist/win32/win32.h	Fri Feb 18 15:58:58 2000
+++ ruby-1.4.5/win32/win32.h	Tue Jun 27 12:05:10 2000
@@ -282,4 +282,7 @@ extern char *mystrerror(int);
 #define FD_SET myfdset
 
+#undef FD_CLR
+#define FD_CLR myfdclr
+
 #undef FD_ISSET
 #define FD_ISSET myfdisset

--
小松克行 / Katsuyuki Komatsu <[e-mail]>