From 806ddf671313be82a977d4afba9ff668d95bbb14 Mon Sep 17 00:00:00 2001 From: nobu Date: Wed, 28 Aug 2013 08:20:13 +0000 Subject: thread_pthread.c: get_stack on HP-UX * thread_pthread.c (hpux_attr_getstackaddr): basic support for the get_stack() under HP-UX. based on the patch by michal@rokos.cz (Michal Rokos) at [ruby-core:56645]. [Feature #8793] git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@42716 b2dd03c8-39d4-4d8f-98ff-823fe69b080e --- ChangeLog | 6 ++++++ thread_pthread.c | 42 ++++++++++++++++++++++++++++++++++++++++++ 2 files changed, 48 insertions(+) diff --git a/ChangeLog b/ChangeLog index 378d240bad..4892831312 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,9 @@ +Wed Aug 28 17:20:07 2013 Nobuyoshi Nakada + + * thread_pthread.c (hpux_attr_getstackaddr): basic support for the + get_stack() under HP-UX. based on the patch by michal@rokos.cz + (Michal Rokos) at [ruby-core:56645]. [Feature #8793] + Wed Aug 28 11:24:20 2013 Michal Rokos * configure.in (sys/pstat.h): fix missing header check for diff --git a/thread_pthread.c b/thread_pthread.c index d915c10943..0cb5489f49 100644 --- a/thread_pthread.c +++ b/thread_pthread.c @@ -492,6 +492,48 @@ size_t pthread_get_stacksize_np(pthread_t); #define STACKADDR_AVAILABLE 1 #elif defined HAVE_PTHREAD_GETTHRDS_NP #define STACKADDR_AVAILABLE 1 +#elif defined __ia64 && defined _HPUX_SOURCE +#define STACKADDR_AVAILABLE 1 + +/* + * Do not lower the thread's stack to PTHREAD_STACK_MIN, + * otherwise one would receive a 'sendsig: useracc failed.' + * and a coredump. + */ +#undef PTHREAD_STACK_MIN + +#define HAVE_PTHREAD_ATTR_GET_NP 1 +#undef HAVE_PTHREAD_ATTR_GETSTACK + +/* + * As the PTHREAD_STACK_MIN is undefined and + * noone touches the default stacksize, + * it is just fine to use the default. + */ +#define pthread_attr_get_np(thid, attr) 0 + +/* + * Using value of sp is very rough... To make it more real, + * addr would need to be aligned to vps_pagesize. + * The vps_pagesize is 'Default user page size (kBytes)' + * and could be retrieved by gettune(). + */ + +static int hpux_attr_getstackaddr(const pthread_attr_t *attr, void *addr) +{ + static uint64_t pagesize; + size_t size; + + if (!pagesize) { + if (gettune("vps_pagesize", &pagesize)) { + pagesize = 1024; + } + } + pthread_attr_getstacksize(attr, &size); + *addr = (void *)((size_t)((char *)_Asm_get_sp() - size) & ~(pagesize - 1)); + return 0; +} +#define pthread_attr_getstackaddr(attr, addr) hpux_attr_getstackaddr(attr, addr) #endif #ifndef MAINSTACKADDR_AVAILABLE -- cgit v1.2.3