/**
|
* \file
|
* Low-level threading, posix version
|
*
|
* Author:
|
* Rodrigo Kumpera (kumpera@gmail.com)
|
*
|
* (C) 2011 Novell, Inc
|
*/
|
|
#include <config.h>
|
|
/* For pthread_main_np, pthread_get_stackaddr_np and pthread_get_stacksize_np */
|
#if defined (__MACH__)
|
#define _DARWIN_C_SOURCE 1
|
#endif
|
|
#include <mono/utils/mono-threads.h>
|
#include <mono/utils/mono-coop-semaphore.h>
|
#include <mono/metadata/gc-internals.h>
|
#include <mono/utils/mono-threads-debug.h>
|
|
#include <errno.h>
|
|
/*
|
#if defined(HOST_ANDROID) && !defined(TARGET_ARM64) && !defined(TARGET_AMD64)
|
#define USE_TKILL_ON_ANDROID 1
|
#endif
|
*/
|
|
#ifdef USE_TKILL_ON_ANDROID
|
extern int tkill (pid_t tid, int signal);
|
#endif
|
|
#if (defined(_POSIX_VERSION) && !defined (TARGET_WASM)) || (defined(TARGET_WASM) && defined(__EMSCRIPTEN_PTHREADS__))
|
|
#include <pthread.h>
|
|
#include <sys/resource.h>
|
|
gboolean
|
mono_thread_platform_create_thread (MonoThreadStart thread_fn, gpointer thread_data, gsize* const stack_size, MonoNativeThreadId *tid)
|
{
|
pthread_attr_t attr;
|
pthread_t thread;
|
gint res;
|
gsize set_stack_size;
|
|
res = pthread_attr_init (&attr);
|
if (res != 0)
|
g_error ("%s: pthread_attr_init failed, error: \"%s\" (%d)", __func__, g_strerror (res), res);
|
|
if (stack_size)
|
set_stack_size = *stack_size;
|
else
|
set_stack_size = 0;
|
|
#ifdef HAVE_PTHREAD_ATTR_SETSTACKSIZE
|
if (set_stack_size == 0) {
|
#if HAVE_VALGRIND_MEMCHECK_H
|
if (RUNNING_ON_VALGRIND)
|
set_stack_size = 1 << 20;
|
else
|
set_stack_size = (SIZEOF_VOID_P / 4) * 1024 * 1024;
|
#else
|
set_stack_size = (SIZEOF_VOID_P / 4) * 1024 * 1024;
|
#endif
|
}
|
|
#ifdef PTHREAD_STACK_MIN
|
if (set_stack_size < PTHREAD_STACK_MIN)
|
set_stack_size = PTHREAD_STACK_MIN;
|
#endif
|
|
res = pthread_attr_setstacksize (&attr, set_stack_size);
|
if (res != 0)
|
g_error ("%s: pthread_attr_setstacksize failed, error: \"%s\" (%d)", __func__, g_strerror (res), res);
|
#endif /* HAVE_PTHREAD_ATTR_SETSTACKSIZE */
|
|
/* Actually start the thread */
|
#ifdef RUNTIME_IL2CPP
|
res = pthread_create (&thread, &attr, (gpointer (*)(gpointer)) thread_fn, thread_data);
|
#else
|
res = mono_gc_pthread_create (&thread, &attr, (gpointer (*)(gpointer)) thread_fn, thread_data);
|
#endif
|
if (res) {
|
res = pthread_attr_destroy (&attr);
|
if (res != 0)
|
g_error ("%s: pthread_attr_destroy failed, error: \"%s\" (%d)", __func__, g_strerror (res), res);
|
|
return FALSE;
|
}
|
|
if (tid)
|
*tid = thread;
|
|
if (stack_size) {
|
res = pthread_attr_getstacksize (&attr, stack_size);
|
if (res != 0)
|
g_error ("%s: pthread_attr_getstacksize failed, error: \"%s\" (%d)", __func__, g_strerror (res), res);
|
}
|
|
res = pthread_attr_destroy (&attr);
|
if (res != 0)
|
g_error ("%s: pthread_attr_destroy failed, error: \"%s\" (%d)", __func__, g_strerror (res), res);
|
|
return TRUE;
|
}
|
|
void
|
mono_threads_platform_init (void)
|
{
|
}
|
|
gboolean
|
mono_threads_platform_in_critical_region (MonoNativeThreadId tid)
|
{
|
return FALSE;
|
}
|
|
gboolean
|
mono_threads_platform_yield (void)
|
{
|
return sched_yield () == 0;
|
}
|
|
void
|
mono_threads_platform_exit (gsize exit_code)
|
{
|
pthread_exit ((gpointer) exit_code);
|
}
|
|
int
|
mono_threads_get_max_stack_size (void)
|
{
|
struct rlimit lim;
|
|
/* If getrlimit fails, we don't enforce any limits. */
|
if (getrlimit (RLIMIT_STACK, &lim))
|
return INT_MAX;
|
/* rlim_t is an unsigned long long on 64bits OSX but we want an int response. */
|
if (lim.rlim_max > (rlim_t)INT_MAX)
|
return INT_MAX;
|
return (int)lim.rlim_max;
|
}
|
|
int
|
mono_threads_pthread_kill (MonoThreadInfo *info, int signum)
|
{
|
THREADS_SUSPEND_DEBUG ("sending signal %d to %p[%p]\n", signum, info, mono_thread_info_get_tid (info));
|
|
int result;
|
|
#ifdef USE_TKILL_ON_ANDROID
|
int old_errno = errno;
|
|
result = tkill (info->native_handle, signum);
|
|
if (result < 0) {
|
result = errno;
|
errno = old_errno;
|
}
|
#elif defined (HAVE_PTHREAD_KILL)
|
result = pthread_kill (mono_thread_info_get_tid (info), signum);
|
#else
|
result = -1;
|
g_error ("pthread_kill () is not supported by this platform");
|
#endif
|
|
if (result && result != ESRCH)
|
g_error ("%s: pthread_kill failed with error %d - potential kernel OOM or signal queue overflow", __func__, result);
|
|
return result;
|
}
|
|
MonoNativeThreadId
|
mono_native_thread_id_get (void)
|
{
|
return pthread_self ();
|
}
|
|
gboolean
|
mono_native_thread_id_equals (MonoNativeThreadId id1, MonoNativeThreadId id2)
|
{
|
return pthread_equal (id1, id2);
|
}
|
|
/*
|
* mono_native_thread_create:
|
*
|
* Low level thread creation function without any GC wrappers.
|
*/
|
gboolean
|
mono_native_thread_create (MonoNativeThreadId *tid, gpointer func, gpointer arg)
|
{
|
return pthread_create (tid, NULL, (void *(*)(void *)) func, arg) == 0;
|
}
|
|
void
|
mono_native_thread_set_name (MonoNativeThreadId tid, const char *name)
|
{
|
#ifdef __MACH__
|
/*
|
* We can't set the thread name for other threads, but we can at least make
|
* it work for threads that try to change their own name.
|
*/
|
if (tid != mono_native_thread_id_get ())
|
return;
|
|
if (!name) {
|
pthread_setname_np ("");
|
} else {
|
char n [63];
|
|
strncpy (n, name, sizeof (n) - 1);
|
n [sizeof (n) - 1] = '\0';
|
pthread_setname_np (n);
|
}
|
#elif defined (__NetBSD__)
|
if (!name) {
|
pthread_setname_np (tid, "%s", (void*)"");
|
} else {
|
char n [PTHREAD_MAX_NAMELEN_NP];
|
|
strncpy (n, name, sizeof (n) - 1);
|
n [sizeof (n) - 1] = '\0';
|
pthread_setname_np (tid, "%s", (void*)n);
|
}
|
#elif defined (HAVE_PTHREAD_SETNAME_NP)
|
if (!name) {
|
pthread_setname_np (tid, "");
|
} else {
|
char n [16];
|
|
strncpy (n, name, sizeof (n) - 1);
|
n [sizeof (n) - 1] = '\0';
|
pthread_setname_np (tid, n);
|
}
|
#endif
|
}
|
|
gboolean
|
mono_native_thread_join (MonoNativeThreadId tid)
|
{
|
void *res;
|
|
return !pthread_join (tid, &res);
|
}
|
|
#endif /* defined(_POSIX_VERSION) */
|
|
#if defined(USE_POSIX_BACKEND)
|
|
gboolean
|
mono_threads_suspend_begin_async_suspend (MonoThreadInfo *info, gboolean interrupt_kernel)
|
{
|
int sig = interrupt_kernel ? mono_threads_suspend_get_abort_signal () : mono_threads_suspend_get_suspend_signal ();
|
|
if (!mono_threads_pthread_kill (info, sig)) {
|
mono_threads_add_to_pending_operation_set (info);
|
return TRUE;
|
}
|
return FALSE;
|
}
|
|
gboolean
|
mono_threads_suspend_check_suspend_result (MonoThreadInfo *info)
|
{
|
return info->suspend_can_continue;
|
}
|
|
/*
|
This begins async resume. This function must do the following:
|
|
- Install an async target if one was requested.
|
- Notify the target to resume.
|
*/
|
gboolean
|
mono_threads_suspend_begin_async_resume (MonoThreadInfo *info)
|
{
|
int sig = mono_threads_suspend_get_restart_signal ();
|
|
if (!mono_threads_pthread_kill (info, sig)) {
|
mono_threads_add_to_pending_operation_set (info);
|
return TRUE;
|
}
|
return FALSE;
|
}
|
|
void
|
mono_threads_suspend_abort_syscall (MonoThreadInfo *info)
|
{
|
/* We signal a thread to break it from the current syscall.
|
* This signal should not be interpreted as a suspend request. */
|
info->syscall_break_signal = TRUE;
|
if (mono_threads_pthread_kill (info, mono_threads_suspend_get_abort_signal ()) == 0) {
|
mono_threads_add_to_pending_operation_set (info);
|
}
|
}
|
|
void
|
mono_threads_suspend_register (MonoThreadInfo *info)
|
{
|
#if defined (HOST_ANDROID)
|
info->native_handle = gettid ();
|
#endif
|
}
|
|
void
|
mono_threads_suspend_free (MonoThreadInfo *info)
|
{
|
}
|
|
void
|
mono_threads_suspend_init (void)
|
{
|
}
|
|
#endif /* defined(USE_POSIX_BACKEND) */
|