[ruby-dev:7302] Re: mod_ruby/0.1.2 with Apache/1.3.6 on Solaris/2.5.1

小松です。

In [ruby-list:15372] Re: mod_ruby/0.1.2 with Apache/1.3.6 on Solaris/2.5.1 
    on 1999/7/13 09:58:13 [e-mail] (Yukihiro Matsumoto) wrote:
|いろいろ調べたところ直接的な原因はmain_threadに対して
|rb_thread_save_context() が呼ばれていないことでした。
|が、rb_thread_create()が呼ばれている限り、かならず呼ばれるは
|ずのこの関数がなぜ呼ばれていないのかは謎です。
|
|rb_thread_create_0()が2度呼ばれているはずですが、そのそれぞ
|れについて
|
|    FL_SET(ruby_scope, SCOPE_SHARED);
|    rb_thread_save_context(curr_thread);
|# --> ここ
|    if (setjmp(curr_thread->context)) {
|	return thread;
|    }
|
|でのcurr_threadの値が知りたいんですが、可能ですか？

HP-UXだと、shared libraryにbreakpointがしかけられないです。

(gdb) break 6857
Breakpoint 1 at 0xc2b98840: file ../eval.c, line 6857.
(gdb) cont
Continuing.
Cannot insert breakpoint 1:
Temporarily disabling shared library breakpoints:
1

しょうがないので、以下のようなdebug print文入れてみました。
なんだか1回しか通ってないみたいですが。

curr_thread = 0x40069dd8
{next = 0x400ea4b0, prev = 0x400d0c30, context = {},
  result = 0, stk_len = 300, stk_max = 300, stk_ptr = 0x400ea608, stk_pos = 0x7b03aa68,
  frame = 0x7afff6d8, scope = 0x400bbf88, dyna_vars = 0x0, block = 0x0, iter = 0x7aff3128,
  tag = 0x0, klass = 1074511728, wrapper = 0, trace = 0, misc = 0, file = 0x7aff11f8,
  line = 0, errinfo = 4, last_status = 4, last_line = 4, last_match = 4,
  safe = 1, status = 0, wait_for = 0, fd = 0, delay = -1061015029,
  join = 0x0, abort = 0, locals = 0x0, thread = 0}

*** eval.c.dist	Fri Jun 25 18:02:34 1999
--- eval.c	Tue Jul 13 10:34:29 1999
***************
*** 6854,6859 ****
--- 6854,6907 ----
  
      FL_SET(ruby_scope, SCOPE_SHARED);
      rb_thread_save_context(curr_thread);
+     {
+ 	FILE *fp;
+ 	fp = fopen("/tmp/ruby.log", "a");
+ 	if (fp) {
+ 	    fprintf(fp, "curr_thread = 0x%08x\n", curr_thread);
+ 	    fprintf(fp,
+ "{next = 0x%x, prev = 0x%x, context = {},\n"
+ "  result = %d, stk_len = %d, stk_max = %d, stk_ptr = 0x%x, stk_pos = 0x%x,\n"
+ "  frame = 0x%x, scope = 0x%x, dyna_vars = 0x%x, block = 0x%x, iter = 0x%x,\n"
+ "  tag = 0x%x, klass = %d, wrapper = %d, trace = %d, misc = %d, file = 0x%x,\n"
+ "  line = %d, errinfo = %d, last_status = %d, last_line = %d, last_match = %d,\n"
+ "  safe = %d, status = %d, wait_for = %d, fd = %d, delay = %d,\n"
+ "  join = 0x%x, abort = %d, locals = 0x%x, thread = %d}\n",
+ 	    curr_thread->next,
+ 	    curr_thread->prev,
+ 	    curr_thread->result,
+ 	    curr_thread->stk_len,
+ 	    curr_thread->stk_max,
+ 	    curr_thread->stk_ptr,
+ 	    curr_thread->stk_pos,
+ 	    curr_thread->frame,
+ 	    curr_thread->scope,
+ 	    curr_thread->dyna_vars,
+ 	    curr_thread->block,
+ 	    curr_thread->iter,
+ 	    curr_thread->tag,
+ 	    curr_thread->klass,
+ 	    curr_thread->wrapper,
+ 	    curr_thread->trace,
+ 	    curr_thread->misc,
+ 	    curr_thread->file,
+ 	    curr_thread->line,
+ 	    curr_thread->errinfo,
+ 	    curr_thread->last_status,
+ 	    curr_thread->last_line,
+ 	    curr_thread->last_match,
+ 	    curr_thread->safe,
+ 	    curr_thread->status,
+ 	    curr_thread->wait_for,
+ 	    curr_thread->fd,
+ 	    curr_thread->delay,
+ 	    curr_thread->join,
+ 	    curr_thread->abort,
+ 	    curr_thread->locals,
+ 	    curr_thread->thread);
+ 	    fclose(fp);
+ 	}
+     }
      if (setjmp(curr_thread->context)) {
  	return thread;
      }

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