#ifndef PT_THREADS_H
#define PT_THREADS_H
#include "windows.h"
enum {
thrd_success = 1,
thrd_error
};
struct pt_thread {
HANDLE handle;
};
typedef struct pt_thread thrd_t;
typedef int (*thrd_start_t)(void *);
struct thrd_args {
thrd_start_t fun;
void *arg;
};
static DWORD WINAPI thrd_routine(void *arg)
{
struct thrd_args *args;
int result;
args = (struct thrd_args *) arg;
if (!args)
return (DWORD) -1;
result = -1;
if (args->fun)
result = args->fun(args->arg);
free(args);
return (DWORD) result;
}
static inline int thrd_create(thrd_t *thrd, thrd_start_t fun, void *arg)
{
struct thrd_args *args;
HANDLE handle;
if (!thrd || !fun)
return thrd_error;
args = malloc(sizeof(*args));
if (!args)
return thrd_error;
args->fun = fun;
args->arg = arg;
handle = CreateThread(NULL, 0, thrd_routine, args, 0, NULL);
if (!handle) {
free(args);
return thrd_error;
}
thrd->handle = handle;
return thrd_success;
}
static inline int thrd_join(thrd_t thrd, int *res)
{
DWORD status;
BOOL success;
status = WaitForSingleObject(thrd.handle, INFINITE);
if (status)
return thrd_error;
if (res) {
DWORD result;
success = GetExitCodeThread(thrd.handle, &result);
if (!success) {
(void) CloseHandle(thrd.handle);
return thrd_error;
}
*res = (int) result;
}
success = CloseHandle(thrd.handle);
if (!success)
return thrd_error;
return thrd_success;
}
struct pt_mutex {
CRITICAL_SECTION cs;
};
typedef struct pt_mutex mtx_t;
enum {
mtx_plain
};
static inline int mtx_init(mtx_t *mtx, int type)
{
if (!mtx || type != mtx_plain)
return thrd_error;
InitializeCriticalSection(&mtx->cs);
return thrd_success;
}
static inline void mtx_destroy(mtx_t *mtx)
{
if (mtx)
DeleteCriticalSection(&mtx->cs);
}
static inline int mtx_lock(mtx_t *mtx)
{
if (!mtx)
return thrd_error;
EnterCriticalSection(&mtx->cs);
return thrd_success;
}
static inline int mtx_unlock(mtx_t *mtx)
{
if (!mtx)
return thrd_error;
LeaveCriticalSection(&mtx->cs);
return thrd_success;
}
struct pt_cond {
CONDITION_VARIABLE cond;
};
typedef struct pt_cond cnd_t;
static inline int cnd_init(cnd_t *cnd)
{
if (!cnd)
return thrd_error;
InitializeConditionVariable(&cnd->cond);
return thrd_success;
}
static inline int cnd_destroy(cnd_t *cnd)
{
if (!cnd)
return thrd_error;
return thrd_success;
}
static inline int cnd_signal(cnd_t *cnd)
{
if (!cnd)
return thrd_error;
WakeConditionVariable(&cnd->cond);
return thrd_success;
}
static inline int cnd_broadcast(cnd_t *cnd)
{
if (!cnd)
return thrd_error;
WakeAllConditionVariable(&cnd->cond);
return thrd_success;
}
static inline int cnd_wait(cnd_t *cnd, mtx_t *mtx)
{
BOOL success;
if (!cnd || !mtx)
return thrd_error;
success = SleepConditionVariableCS(&cnd->cond, &mtx->cs, INFINITE);
if (!success)
return thrd_error;
return thrd_success;
}
#endif