[ruby-dev:27704] Re: trap & sleep doens't work on windows HEAD.

山本です。

Tanaka Akira <[e-mail]> wrote:
(2005/11/14 12:57)

>In article <[e-mail]>,
>  Tanaka Akira <[e-mail]> writes:
>
>>> Windows の HEAD で、下のようなコードが動かなくなっている
>>> ことに気づきました。
>>>
>>> trap(:INT) { puts "interrupted!"; exit }
>>> sleep
>>
>> ふむ。sleep なら (I/O とは違って) どうにかできる可能性はある
>> かも知れませんね。
>
>もう少し考えて思ったのですが、Windows の (Ruby が提供してい
>る) select は signal が来た時に EINTR で終了しないんでしょう
>か?

調べてみたところ、Windows で Ruby の提供している sleep は
イベントオブジェクトが ON にされるのを待っているのですが、
signal.c 1.55 の変更によって、trap を使う場合にシグナルハンドラで
イベントオブジェクトが ON にされなくなり、永久に待ちつづける状態
になっていました。

adhok なパッチですが、下のコードで動くようになります。

Index: signal.c
===================================================================
RCS file: /src/ruby/signal.c,v
retrieving revision 1.70
diff -u -r1.70 signal.c
--- signal.c    8 Nov 2005 08:49:45 -0000       1.70
+++ signal.c    14 Nov 2005 05:36:12 -0000
@@ -469,6 +469,9 @@
        ATOMIC_SET(rb_trap_immediate, 1);
     }
     else {
+#ifdef _WIN32
+       rb_w32_test(); /* SetEvent(interrupt_event) */
+#endif
        ATOMIC_INC(rb_trap_pending);
        ATOMIC_INC(trap_pending_list[sig]);
     }
Index: win32/win32.c
===================================================================
RCS file: /src/ruby/win32/win32.c,v
retrieving revision 1.178
diff -u -r1.178 win32.c
--- win32/win32.c       5 Nov 2005 04:43:46 -0000       1.178
+++ win32/win32.c       14 Nov 2005 05:37:20 -0000
@@ -3380,6 +3380,12 @@
 #endif
 }

+void
+rb_w32_test(void)
+{
+    SetSignal(interrupted_event);
+}
+
 int
 rb_w32_main_context(int arg, void (*handler)(int))
 {