Introduce some hooks for the shared part of qemu thread between POSIX and Windows implementations. Note that in qemu_mutex_unlock_impl() we moved the call before unlock operation which should make more sense. And we don't need qemu_mutex_post_unlock() hook. Put all these shared hooks into the header files. It should be internal to qemu-thread but not for qemu-thread users, hence put into util/ directory. Reviewed-by: Emilio G. Cota <cota@braap.org> Signed-off-by: Peter Xu <peterx@redhat.com> Message-Id: <20180425025459.5258-3-peterx@redhat.com> Signed-off-by: Paolo Bonzini <pbonzini@redhat.com>
449 lines
11 KiB
C
449 lines
11 KiB
C
/*
|
|
* Win32 implementation for mutex/cond/thread functions
|
|
*
|
|
* Copyright Red Hat, Inc. 2010
|
|
*
|
|
* Author:
|
|
* Paolo Bonzini <pbonzini@redhat.com>
|
|
*
|
|
* This work is licensed under the terms of the GNU GPL, version 2 or later.
|
|
* See the COPYING file in the top-level directory.
|
|
*
|
|
*/
|
|
|
|
#ifndef _WIN32_WINNT
|
|
#define _WIN32_WINNT 0x0600
|
|
#endif
|
|
|
|
#include "qemu/osdep.h"
|
|
#include "qemu-common.h"
|
|
#include "qemu/thread.h"
|
|
#include "qemu/notify.h"
|
|
#include "qemu-thread-common.h"
|
|
#include <process.h>
|
|
|
|
static bool name_threads;
|
|
|
|
void qemu_thread_naming(bool enable)
|
|
{
|
|
/* But note we don't actually name them on Windows yet */
|
|
name_threads = enable;
|
|
|
|
fprintf(stderr, "qemu: thread naming not supported on this host\n");
|
|
}
|
|
|
|
static void error_exit(int err, const char *msg)
|
|
{
|
|
char *pstr;
|
|
|
|
FormatMessage(FORMAT_MESSAGE_FROM_SYSTEM | FORMAT_MESSAGE_ALLOCATE_BUFFER,
|
|
NULL, err, 0, (LPTSTR)&pstr, 2, NULL);
|
|
fprintf(stderr, "qemu: %s: %s\n", msg, pstr);
|
|
LocalFree(pstr);
|
|
abort();
|
|
}
|
|
|
|
void qemu_mutex_init(QemuMutex *mutex)
|
|
{
|
|
InitializeSRWLock(&mutex->lock);
|
|
qemu_mutex_post_init(mutex);
|
|
}
|
|
|
|
void qemu_mutex_destroy(QemuMutex *mutex)
|
|
{
|
|
assert(mutex->initialized);
|
|
mutex->initialized = false;
|
|
InitializeSRWLock(&mutex->lock);
|
|
}
|
|
|
|
void qemu_mutex_lock_impl(QemuMutex *mutex, const char *file, const int line)
|
|
{
|
|
assert(mutex->initialized);
|
|
qemu_mutex_pre_lock(mutex, file, line);
|
|
AcquireSRWLockExclusive(&mutex->lock);
|
|
qemu_mutex_post_lock(mutex, file, line);
|
|
}
|
|
|
|
int qemu_mutex_trylock_impl(QemuMutex *mutex, const char *file, const int line)
|
|
{
|
|
int owned;
|
|
|
|
assert(mutex->initialized);
|
|
owned = TryAcquireSRWLockExclusive(&mutex->lock);
|
|
if (owned) {
|
|
qemu_mutex_post_lock(mutex, file, line);
|
|
return 0;
|
|
}
|
|
return -EBUSY;
|
|
}
|
|
|
|
void qemu_mutex_unlock_impl(QemuMutex *mutex, const char *file, const int line)
|
|
{
|
|
assert(mutex->initialized);
|
|
qemu_mutex_pre_unlock(mutex, file, line);
|
|
ReleaseSRWLockExclusive(&mutex->lock);
|
|
}
|
|
|
|
void qemu_rec_mutex_init(QemuRecMutex *mutex)
|
|
{
|
|
InitializeCriticalSection(&mutex->lock);
|
|
mutex->initialized = true;
|
|
}
|
|
|
|
void qemu_rec_mutex_destroy(QemuRecMutex *mutex)
|
|
{
|
|
assert(mutex->initialized);
|
|
mutex->initialized = false;
|
|
DeleteCriticalSection(&mutex->lock);
|
|
}
|
|
|
|
void qemu_rec_mutex_lock(QemuRecMutex *mutex)
|
|
{
|
|
assert(mutex->initialized);
|
|
EnterCriticalSection(&mutex->lock);
|
|
}
|
|
|
|
int qemu_rec_mutex_trylock(QemuRecMutex *mutex)
|
|
{
|
|
assert(mutex->initialized);
|
|
return !TryEnterCriticalSection(&mutex->lock);
|
|
}
|
|
|
|
void qemu_rec_mutex_unlock(QemuRecMutex *mutex)
|
|
{
|
|
assert(mutex->initialized);
|
|
LeaveCriticalSection(&mutex->lock);
|
|
}
|
|
|
|
void qemu_cond_init(QemuCond *cond)
|
|
{
|
|
memset(cond, 0, sizeof(*cond));
|
|
InitializeConditionVariable(&cond->var);
|
|
cond->initialized = true;
|
|
}
|
|
|
|
void qemu_cond_destroy(QemuCond *cond)
|
|
{
|
|
assert(cond->initialized);
|
|
cond->initialized = false;
|
|
InitializeConditionVariable(&cond->var);
|
|
}
|
|
|
|
void qemu_cond_signal(QemuCond *cond)
|
|
{
|
|
assert(cond->initialized);
|
|
WakeConditionVariable(&cond->var);
|
|
}
|
|
|
|
void qemu_cond_broadcast(QemuCond *cond)
|
|
{
|
|
assert(cond->initialized);
|
|
WakeAllConditionVariable(&cond->var);
|
|
}
|
|
|
|
void qemu_cond_wait_impl(QemuCond *cond, QemuMutex *mutex, const char *file, const int line)
|
|
{
|
|
assert(cond->initialized);
|
|
qemu_mutex_pre_unlock(mutex, file, line);
|
|
SleepConditionVariableSRW(&cond->var, &mutex->lock, INFINITE, 0);
|
|
qemu_mutex_post_lock(mutex, file, line);
|
|
}
|
|
|
|
void qemu_sem_init(QemuSemaphore *sem, int init)
|
|
{
|
|
/* Manual reset. */
|
|
sem->sema = CreateSemaphore(NULL, init, LONG_MAX, NULL);
|
|
sem->initialized = true;
|
|
}
|
|
|
|
void qemu_sem_destroy(QemuSemaphore *sem)
|
|
{
|
|
assert(sem->initialized);
|
|
sem->initialized = false;
|
|
CloseHandle(sem->sema);
|
|
}
|
|
|
|
void qemu_sem_post(QemuSemaphore *sem)
|
|
{
|
|
assert(sem->initialized);
|
|
ReleaseSemaphore(sem->sema, 1, NULL);
|
|
}
|
|
|
|
int qemu_sem_timedwait(QemuSemaphore *sem, int ms)
|
|
{
|
|
int rc;
|
|
|
|
assert(sem->initialized);
|
|
rc = WaitForSingleObject(sem->sema, ms);
|
|
if (rc == WAIT_OBJECT_0) {
|
|
return 0;
|
|
}
|
|
if (rc != WAIT_TIMEOUT) {
|
|
error_exit(GetLastError(), __func__);
|
|
}
|
|
return -1;
|
|
}
|
|
|
|
void qemu_sem_wait(QemuSemaphore *sem)
|
|
{
|
|
assert(sem->initialized);
|
|
if (WaitForSingleObject(sem->sema, INFINITE) != WAIT_OBJECT_0) {
|
|
error_exit(GetLastError(), __func__);
|
|
}
|
|
}
|
|
|
|
/* Wrap a Win32 manual-reset event with a fast userspace path. The idea
|
|
* is to reset the Win32 event lazily, as part of a test-reset-test-wait
|
|
* sequence. Such a sequence is, indeed, how QemuEvents are used by
|
|
* RCU and other subsystems!
|
|
*
|
|
* Valid transitions:
|
|
* - free->set, when setting the event
|
|
* - busy->set, when setting the event, followed by SetEvent
|
|
* - set->free, when resetting the event
|
|
* - free->busy, when waiting
|
|
*
|
|
* set->busy does not happen (it can be observed from the outside but
|
|
* it really is set->free->busy).
|
|
*
|
|
* busy->free provably cannot happen; to enforce it, the set->free transition
|
|
* is done with an OR, which becomes a no-op if the event has concurrently
|
|
* transitioned to free or busy (and is faster than cmpxchg).
|
|
*/
|
|
|
|
#define EV_SET 0
|
|
#define EV_FREE 1
|
|
#define EV_BUSY -1
|
|
|
|
void qemu_event_init(QemuEvent *ev, bool init)
|
|
{
|
|
/* Manual reset. */
|
|
ev->event = CreateEvent(NULL, TRUE, TRUE, NULL);
|
|
ev->value = (init ? EV_SET : EV_FREE);
|
|
ev->initialized = true;
|
|
}
|
|
|
|
void qemu_event_destroy(QemuEvent *ev)
|
|
{
|
|
assert(ev->initialized);
|
|
ev->initialized = false;
|
|
CloseHandle(ev->event);
|
|
}
|
|
|
|
void qemu_event_set(QemuEvent *ev)
|
|
{
|
|
assert(ev->initialized);
|
|
/* qemu_event_set has release semantics, but because it *loads*
|
|
* ev->value we need a full memory barrier here.
|
|
*/
|
|
smp_mb();
|
|
if (atomic_read(&ev->value) != EV_SET) {
|
|
if (atomic_xchg(&ev->value, EV_SET) == EV_BUSY) {
|
|
/* There were waiters, wake them up. */
|
|
SetEvent(ev->event);
|
|
}
|
|
}
|
|
}
|
|
|
|
void qemu_event_reset(QemuEvent *ev)
|
|
{
|
|
unsigned value;
|
|
|
|
assert(ev->initialized);
|
|
value = atomic_read(&ev->value);
|
|
smp_mb_acquire();
|
|
if (value == EV_SET) {
|
|
/* If there was a concurrent reset (or even reset+wait),
|
|
* do nothing. Otherwise change EV_SET->EV_FREE.
|
|
*/
|
|
atomic_or(&ev->value, EV_FREE);
|
|
}
|
|
}
|
|
|
|
void qemu_event_wait(QemuEvent *ev)
|
|
{
|
|
unsigned value;
|
|
|
|
assert(ev->initialized);
|
|
value = atomic_read(&ev->value);
|
|
smp_mb_acquire();
|
|
if (value != EV_SET) {
|
|
if (value == EV_FREE) {
|
|
/* qemu_event_set is not yet going to call SetEvent, but we are
|
|
* going to do another check for EV_SET below when setting EV_BUSY.
|
|
* At that point it is safe to call WaitForSingleObject.
|
|
*/
|
|
ResetEvent(ev->event);
|
|
|
|
/* Tell qemu_event_set that there are waiters. No need to retry
|
|
* because there cannot be a concurent busy->free transition.
|
|
* After the CAS, the event will be either set or busy.
|
|
*/
|
|
if (atomic_cmpxchg(&ev->value, EV_FREE, EV_BUSY) == EV_SET) {
|
|
value = EV_SET;
|
|
} else {
|
|
value = EV_BUSY;
|
|
}
|
|
}
|
|
if (value == EV_BUSY) {
|
|
WaitForSingleObject(ev->event, INFINITE);
|
|
}
|
|
}
|
|
}
|
|
|
|
struct QemuThreadData {
|
|
/* Passed to win32_start_routine. */
|
|
void *(*start_routine)(void *);
|
|
void *arg;
|
|
short mode;
|
|
NotifierList exit;
|
|
|
|
/* Only used for joinable threads. */
|
|
bool exited;
|
|
void *ret;
|
|
CRITICAL_SECTION cs;
|
|
};
|
|
|
|
static bool atexit_registered;
|
|
static NotifierList main_thread_exit;
|
|
|
|
static __thread QemuThreadData *qemu_thread_data;
|
|
|
|
static void run_main_thread_exit(void)
|
|
{
|
|
notifier_list_notify(&main_thread_exit, NULL);
|
|
}
|
|
|
|
void qemu_thread_atexit_add(Notifier *notifier)
|
|
{
|
|
if (!qemu_thread_data) {
|
|
if (!atexit_registered) {
|
|
atexit_registered = true;
|
|
atexit(run_main_thread_exit);
|
|
}
|
|
notifier_list_add(&main_thread_exit, notifier);
|
|
} else {
|
|
notifier_list_add(&qemu_thread_data->exit, notifier);
|
|
}
|
|
}
|
|
|
|
void qemu_thread_atexit_remove(Notifier *notifier)
|
|
{
|
|
notifier_remove(notifier);
|
|
}
|
|
|
|
static unsigned __stdcall win32_start_routine(void *arg)
|
|
{
|
|
QemuThreadData *data = (QemuThreadData *) arg;
|
|
void *(*start_routine)(void *) = data->start_routine;
|
|
void *thread_arg = data->arg;
|
|
|
|
qemu_thread_data = data;
|
|
qemu_thread_exit(start_routine(thread_arg));
|
|
abort();
|
|
}
|
|
|
|
void qemu_thread_exit(void *arg)
|
|
{
|
|
QemuThreadData *data = qemu_thread_data;
|
|
|
|
notifier_list_notify(&data->exit, NULL);
|
|
if (data->mode == QEMU_THREAD_JOINABLE) {
|
|
data->ret = arg;
|
|
EnterCriticalSection(&data->cs);
|
|
data->exited = true;
|
|
LeaveCriticalSection(&data->cs);
|
|
} else {
|
|
g_free(data);
|
|
}
|
|
_endthreadex(0);
|
|
}
|
|
|
|
void *qemu_thread_join(QemuThread *thread)
|
|
{
|
|
QemuThreadData *data;
|
|
void *ret;
|
|
HANDLE handle;
|
|
|
|
data = thread->data;
|
|
if (data->mode == QEMU_THREAD_DETACHED) {
|
|
return NULL;
|
|
}
|
|
|
|
/*
|
|
* Because multiple copies of the QemuThread can exist via
|
|
* qemu_thread_get_self, we need to store a value that cannot
|
|
* leak there. The simplest, non racy way is to store the TID,
|
|
* discard the handle that _beginthreadex gives back, and
|
|
* get another copy of the handle here.
|
|
*/
|
|
handle = qemu_thread_get_handle(thread);
|
|
if (handle) {
|
|
WaitForSingleObject(handle, INFINITE);
|
|
CloseHandle(handle);
|
|
}
|
|
ret = data->ret;
|
|
DeleteCriticalSection(&data->cs);
|
|
g_free(data);
|
|
return ret;
|
|
}
|
|
|
|
void qemu_thread_create(QemuThread *thread, const char *name,
|
|
void *(*start_routine)(void *),
|
|
void *arg, int mode)
|
|
{
|
|
HANDLE hThread;
|
|
struct QemuThreadData *data;
|
|
|
|
data = g_malloc(sizeof *data);
|
|
data->start_routine = start_routine;
|
|
data->arg = arg;
|
|
data->mode = mode;
|
|
data->exited = false;
|
|
notifier_list_init(&data->exit);
|
|
|
|
if (data->mode != QEMU_THREAD_DETACHED) {
|
|
InitializeCriticalSection(&data->cs);
|
|
}
|
|
|
|
hThread = (HANDLE) _beginthreadex(NULL, 0, win32_start_routine,
|
|
data, 0, &thread->tid);
|
|
if (!hThread) {
|
|
error_exit(GetLastError(), __func__);
|
|
}
|
|
CloseHandle(hThread);
|
|
thread->data = data;
|
|
}
|
|
|
|
void qemu_thread_get_self(QemuThread *thread)
|
|
{
|
|
thread->data = qemu_thread_data;
|
|
thread->tid = GetCurrentThreadId();
|
|
}
|
|
|
|
HANDLE qemu_thread_get_handle(QemuThread *thread)
|
|
{
|
|
QemuThreadData *data;
|
|
HANDLE handle;
|
|
|
|
data = thread->data;
|
|
if (data->mode == QEMU_THREAD_DETACHED) {
|
|
return NULL;
|
|
}
|
|
|
|
EnterCriticalSection(&data->cs);
|
|
if (!data->exited) {
|
|
handle = OpenThread(SYNCHRONIZE | THREAD_SUSPEND_RESUME |
|
|
THREAD_SET_CONTEXT, FALSE, thread->tid);
|
|
} else {
|
|
handle = NULL;
|
|
}
|
|
LeaveCriticalSection(&data->cs);
|
|
return handle;
|
|
}
|
|
|
|
bool qemu_thread_is_self(QemuThread *thread)
|
|
{
|
|
return GetCurrentThreadId() == thread->tid;
|
|
}
|