static MonoSemType *suspend_ack_semaphore_ptr;
static sigset_t suspend_signal_mask;
+static sigset_t suspend_ack_signal_mask;
static void
suspend_thread (SgenThreadInfo *info, void *context)
mono_gc_get_gc_callbacks ()->thread_suspend_func (info->runtime_data, context);
DEBUG (4, fprintf (gc_debug_file, "Posting suspend_ack_semaphore for suspend from %p %p\n", info, (gpointer)mono_native_thread_id_get ()));
+
+ /*
+ Block the restart signal.
+ We need to block the restart signal while posting to the suspend_ack semaphore or we race to sigsuspend,
+ which might miss the signal and get stuck.
+ */
+ pthread_sigmask (SIG_BLOCK, &suspend_ack_signal_mask, NULL);
+
/* notify the waiting thread */
MONO_SEM_POST (suspend_ack_semaphore_ptr);
info->stop_count = stop_count;
sigsuspend (&suspend_signal_mask);
} while (info->signal != restart_signal_num && info->doing_handshake);
+ /* Unblock the restart signal. */
+ pthread_sigmask (SIG_UNBLOCK, &suspend_ack_signal_mask, NULL);
+
DEBUG (4, fprintf (gc_debug_file, "Posting suspend_ack_semaphore for resume from %p %p\n", info, (gpointer)mono_native_thread_id_get ()));
/* notify the waiting thread */
MONO_SEM_POST (suspend_ack_semaphore_ptr);
suspend_thread (info, context);
} else {
/* This can happen while a thread is dying */
- g_print ("no thread info in suspend\n");
+ //g_print ("no thread info in suspend\n");
}
errno = old_errno;
int old_errno = errno;
info = mono_thread_info_current ();
+ /*
+ If the thread info is null is means we're currently in the process of cleaning up,
+ the pthread destructor has already kicked in and it has explicitly invoked the suspend handler.
+
+ This means this thread has been suspended, TLS is dead, so the only option we have is to
+ rely on pthread_self () and seatch over the thread list.
+ */
+ if (!info)
+ info = mono_thread_info_lookup (pthread_self ());
/*
* If a thread is dying there might be no thread info. In
info->signal = restart_signal_num;
DEBUG (4, fprintf (gc_debug_file, "Restart handler in %p %p\n", info, (gpointer)mono_native_thread_id_get ()));
}
-
errno = old_errno;
}
gboolean
mono_sgen_resume_thread (SgenThreadInfo *info)
{
- return pthread_kill (mono_thread_info_get_tid (info), restart_signal_num) == 0;
+ return mono_threads_pthread_kill (info, restart_signal_num) == 0;
}
gboolean
mono_sgen_suspend_thread (SgenThreadInfo *info)
{
- return pthread_kill (mono_thread_info_get_tid (info), suspend_signal_num) == 0;
+ return mono_threads_pthread_kill (info, suspend_signal_num) == 0;
}
void
if (mono_native_thread_id_equals (mono_thread_info_get_tid (info), me)) {
continue;
}
+ if (info->gc_disabled)
+ continue;
/*if (signum == suspend_signal_num && info->stop_count == global_stop_count)
continue;*/
if (suspend) {
sigfillset (&suspend_signal_mask);
sigdelset (&suspend_signal_mask, restart_signal_num);
+
+ sigemptyset (&suspend_ack_signal_mask);
+ sigaddset (&suspend_ack_signal_mask, restart_signal_num);
+
}
int