[ruby-dev:15113] SIGCHLD problem with HP-UX.

ふと、HP-UX で、Rubicon を動かしたら止まらなかったので、ちょっと調べて
みました。つぎのようなコードがうまく(Linux などと同じには)動かないよう
です。

% ./ruby -e 'trap("CHLD") {p :trap}; p fork {p :child}; p Process.wait'
:child
^C^C^C^Z

というように fork の親側が帰ってこなかったり、

% ./ruby -e 'trap("CHLD") {p :trap}; p fork {sleep 1; p :child}; p Process.wait'
3648
:child
:trap
:trap
:trap
:trap
:trap
:trap
:trap
...

というように trap が起動され続ける、というような挙動が観察されます。

% uname -a
HP-UX hpux B.10.20 A 9000/785 2002836476 two-user license
% ./ruby -v
ruby 1.7.2 (2001-11-08) [hppa2.0-hpux10.20]

また、IRC で他の人に頼んで再現実験をしてもらったら ruby 1.6.1 でも同様
みたいですので、この挙動はポータブルに再現する模様です。

いちおう trace くらいは挑戦しようと思って gdb から動かしてみました。が
sighandle から出るところで gdb が終わってしまったのであきらめてしまい
ました。c で続行させるとまた sighandle で止まるので、signal handler が
繰り返し動いているというのは確かなようです。

% gdb ruby  
GNU gdb 5.0
Copyright 2000 Free Software Foundation, Inc.
GDB is free software, covered by the GNU General Public License, and you are
welcome to change it and/or distribute copies of it under certain conditions.
Type "show copying" to see the conditions.
There is absolutely no warranty for GDB.  Type "show warranty" for details.
This GDB was configured as "hppa2.0-hp-hpux10.20"...
(gdb) break sighandle
Breakpoint 1 at 0x8783c: file ../../../src/ruby/signal.c, line 347.
(gdb) run -e 'trap("CHLD") {p :trap}; p fork {p :child}; p Process.wait'
Starting program: /home/akr/src/ruby/tst/build/hpux/src/ruby -e 'trap("CHLD") {p
:trap}; p fork {p :child}; p Process.wait'
warning: Unable to find __d_pid symbol in object file.
warning: Suggest linking with /opt/langtools/lib/end.o.
warning: GDB will be unable to track shl_load/shl_unload calls
[New process 8888]
Detaching after fork from process 8888
:child

Breakpoint 1, sighandle (sig=2) at ../../../src/ruby/signal.c:347
347     {
(gdb) s
354         if (sig >= NSIG) {
(gdb) 
359         ruby_signal(sig, sighandle);
(gdb) 
362         if (ATOMIC_TEST(rb_trap_immediate)) {
(gdb) 
359         ruby_signal(sig, sighandle);
(gdb) 
362         if (ATOMIC_TEST(rb_trap_immediate)) {
(gdb) 
359         ruby_signal(sig, sighandle);
(gdb)
ruby_posix_signal (signum=18, handler=0x400176c8 <b64_xtable___31+40>) at
../../../src/ruby/signal.c:293
293         sigemptyset(&sigact.sa_mask);
(gdb)
289     {
(gdb)
293         sigemptyset(&sigact.sa_mask);
(gdb)
296         sigact.sa_flags |= SA_RESTART; /* SVR4, 4.3+BSD */
(gdb)
299         if (signum == SIGCHLD && handler == SIG_IGN)
(gdb)
0x876ec 302         sigaction(signum, &sigact, 0);
(gdb)
sighandle (sig=18) at ../../../src/ruby/signal.c:362
362         if (ATOMIC_TEST(rb_trap_immediate)) {
(gdb)
368             ATOMIC_INC(trap_pending_list[sig]);
(gdb)
367             ATOMIC_INC(rb_trap_pending);
(gdb)
368             ATOMIC_INC(trap_pending_list[sig]);
(gdb)
367             ATOMIC_INC(rb_trap_pending);
(gdb)
368             ATOMIC_INC(trap_pending_list[sig]);
(gdb)
367             ATOMIC_INC(rb_trap_pending);
(gdb)
368             ATOMIC_INC(trap_pending_list[sig]);
(gdb)
367             ATOMIC_INC(rb_trap_pending);
(gdb)
368             ATOMIC_INC(trap_pending_list[sig]);
(gdb)
369         }
(gdb)
zsh: segmentation fault (core dumped)  gdb ruby

どなたか、原因に見当がつく人はいらっしゃるでしょうか?
-- 
[田中 哲][たなか あきら][Tanaka Akira]
「ふえろ! わかめちゃん作戦です$(C⊇」(Little Worker, 桂遊生丸)