ruby-changes:2744
From: ko1@a...
Date: 15 Dec 2007 13:32:44 +0900
Subject: [ruby-changes:2744] akr - Ruby:r14235 (trunk): * vm_core.h (rb_thread_t): new member machine_stack_maxsize and
akr 2007-12-15 13:09:24 +0900 (Sat, 15 Dec 2007) New Revision: 14235 Modified files: trunk/ChangeLog trunk/gc.c trunk/thread_pthread.ci trunk/thread_win32.ci trunk/vm.c trunk/vm_core.h Log: * vm_core.h (rb_thread_t): new member machine_stack_maxsize and machine_register_stack_maxsize. * gc.c (rb_gc_stack_maxsize): new global variable for the thread size of the main thread. (STACK_LEVEL_MAX): use machine_stack_maxsize of current thread. (ruby_stack_check): check IA64 register stack. (ruby_set_stack_size): set rb_gc_stack_maxsize. (Init_stack): set rb_gc_stack_maxsize. * thread_pthread.ci (native_thread_create): initialize th->machine_stack_maxsize and th->machine_register_stack_maxsize. * vm.c (Init_BareVM): initialize th->machine_stack_maxsize and th->machine_register_stack_maxsize. * thread_win32.ci (native_thread_create): initialize th->machine_stack_maxsize. not tested. just a guess at all. [ruby-dev:32604] http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/trunk/thread_win32.ci?r1=14235&r2=14234 http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/trunk/thread_pthread.ci?r1=14235&r2=14234 http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/trunk/ChangeLog?r1=14235&r2=14234 http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/trunk/gc.c?r1=14235&r2=14234 http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/trunk/vm_core.h?r1=14235&r2=14234 http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/trunk/vm.c?r1=14235&r2=14234 Index: ChangeLog =================================================================== --- ChangeLog (revision 14234) +++ ChangeLog (revision 14235) @@ -1,3 +1,26 @@ +Sat Dec 15 13:04:30 2007 Tanaka Akira <akr@f...> + + * vm_core.h (rb_thread_t): new member machine_stack_maxsize and + machine_register_stack_maxsize. + + * gc.c (rb_gc_stack_maxsize): new global variable for the thread size + of the main thread. + (STACK_LEVEL_MAX): use machine_stack_maxsize of current thread. + (ruby_stack_check): check IA64 register stack. + (ruby_set_stack_size): set rb_gc_stack_maxsize. + (Init_stack): set rb_gc_stack_maxsize. + + * thread_pthread.ci (native_thread_create): initialize + th->machine_stack_maxsize and th->machine_register_stack_maxsize. + + * vm.c (Init_BareVM): initialize th->machine_stack_maxsize and + th->machine_register_stack_maxsize. + + * thread_win32.ci (native_thread_create): initialize + th->machine_stack_maxsize. not tested. just a guess at all. + + [ruby-dev:32604] + Sat Dec 15 12:58:00 2007 Nobuyoshi Nakada <nobu@r...> * encoding.c (rb_enc_register, rb_enc_replicate, rb_enc_alias): check Index: vm_core.h =================================================================== --- vm_core.h (revision 14234) +++ vm_core.h (revision 14235) @@ -431,9 +431,11 @@ /* for GC */ VALUE *machine_stack_start; VALUE *machine_stack_end; + size_t machine_stack_maxsize; #ifdef __ia64 VALUE *machine_register_stack_start; VALUE *machine_register_stack_end; + size_t machine_register_stack_maxsize; #endif jmp_buf machine_regs; int mark_stack_len; Index: gc.c =================================================================== --- gc.c (revision 14234) +++ gc.c (revision 14235) @@ -171,15 +171,9 @@ #endif #if defined(DJGPP) || defined(_WIN32_WCE) -static unsigned int STACK_LEVEL_MAX = 65535; -#elif defined(__human68k__) -unsigned int _stacksize = 262144; -# define STACK_LEVEL_MAX (_stacksize - 4096) -# undef HAVE_GETRLIMIT -#elif defined(HAVE_GETRLIMIT) || defined(_WIN32) -static unsigned int STACK_LEVEL_MAX = 655300; +size_t rb_gc_stack_maxsize = 65535*sizeof(VALUE); #else -# define STACK_LEVEL_MAX 655300 +size_t rb_gc_stack_maxsize = 655300*sizeof(VALUE); #endif @@ -579,6 +573,7 @@ #define STACK_START (th->machine_stack_start) #define STACK_END (th->machine_stack_end) +#define STACK_LEVEL_MAX (th->machine_stack_maxsize/sizeof(VALUE)) #if defined(sparc) || defined(__sparc__) # define STACK_LENGTH (STACK_START - STACK_END + 0x80) @@ -611,11 +606,6 @@ #define GC_WATER_MARK 512 -#define CHECK_STACK(ret) do {\ - SET_STACK_END;\ - (ret) = (STACK_LENGTH > STACK_LEVEL_MAX + GC_WATER_MARK);\ -} while (0) - int ruby_stack_length(VALUE **p) { @@ -628,10 +618,17 @@ int ruby_stack_check(void) { - int ret; - rb_thread_t *th = GET_THREAD(); - CHECK_STACK(ret); - return ret; + int ret; + rb_thread_t *th = GET_THREAD(); + SET_STACK_END; + ret = STACK_LENGTH > STACK_LEVEL_MAX + GC_WATER_MARK; +#ifdef __ia64 + if (!ret) { + ret = (VALUE*)rb_ia64_bsp() - th->machine_register_stack_start > + th->machine_register_stack_maxsize/sizeof(VALUE) + GC_WATER_MARK; + } +#endif + return ret; } static void @@ -1576,9 +1573,7 @@ void ruby_set_stack_size(size_t size) { -#ifndef STACK_LEVEL_MAX - STACK_LEVEL_MAX = size/sizeof(VALUE); -#endif + rb_gc_stack_maxsize = size; } void @@ -1638,7 +1633,7 @@ unsigned int space = rlim.rlim_cur/5; if (space > 1024*1024) space = 1024*1024; - STACK_LEVEL_MAX = (rlim.rlim_cur - space) / sizeof(VALUE); + rb_gc_stack_maxsize = rlim.rlim_cur - space; } } #endif @@ -1670,7 +1665,7 @@ unsigned int space = rlim.rlim_cur/5; if (space > 1024*1024) space = 1024*1024; - STACK_LEVEL_MAX = (rlim.rlim_cur - space) / sizeof(VALUE); + rb_gc_stack_maxsize = rlim.rlim_cur - space; } } #elif defined _WIN32 @@ -1683,7 +1678,7 @@ size = (char *)mi.BaseAddress - (char *)mi.AllocationBase; space = size / 5; if (space > 1024*1024) space = 1024*1024; - STACK_LEVEL_MAX = (size - space) / sizeof(VALUE); + rb_gc_stack_maxsize = size - space; } } #endif Index: thread_pthread.ci =================================================================== --- thread_pthread.ci (revision 14234) +++ thread_pthread.ci (revision 14235) @@ -280,13 +280,21 @@ } else { pthread_attr_t attr; - size_t stack_size = 1024 * 1024; /* 1024KB */ + size_t stack_size = 512 * 1024; /* 512KB */ + size_t space; #ifdef PTHREAD_STACK_MIN if (stack_size < PTHREAD_STACK_MIN) { stack_size = PTHREAD_STACK_MIN * 2; } #endif + space = stack_size/5; + if (space > 1024*1024) space = 1024*1024; + th->machine_stack_maxsize = stack_size - space; +#ifdef __ia64 + th->machine_stack_maxsize /= 2; + th->machine_register_stack_maxsize = th->machine_stack_maxsize; +#endif CHECK_ERR(pthread_attr_init(&attr)); Index: vm.c =================================================================== --- vm.c (revision 14234) +++ vm.c (revision 14235) @@ -1738,6 +1738,7 @@ VALUE insns_name_array(void); extern VALUE *rb_gc_stack_start; +extern size_t rb_gc_stack_maxsize; #ifdef __ia64 extern VALUE *rb_gc_register_stack_start; #endif @@ -1872,8 +1873,11 @@ th_init2(th); th->vm = vm; th->machine_stack_start = rb_gc_stack_start; + th->machine_stack_maxsize = rb_gc_stack_maxsize; #ifdef __ia64 th->machine_register_stack_start = rb_gc_register_stack_start; + th->machine_stack_maxsize /= 2; + th->machine_register_stack_maxsize = th->machine_stack_maxsize; #endif rb_thread_set_current_raw(th); } Index: thread_win32.ci =================================================================== --- thread_win32.ci (revision 14234) +++ thread_win32.ci (revision 14235) @@ -429,6 +429,8 @@ size_t stack_size = 4 * 1024; /* 4KB */ th->thread_id = w32_create_thread(stack_size, thread_start_func_1, th); + th->machine_stack_maxsize = 64 * 1024; /* not tested. just a guess at all. */ + if ((th->thread_id) == 0) { st_delete_wrap(th->vm->living_threads, th->self); rb_raise(rb_eThreadError, "can't create Thread (%d)", errno); -- ML: ruby-changes@q... Info: http://www.atdot.net/~ko1/quickml