blob: 1ab011c3962456d7123d2a54712c4dc65dc8d406 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
|
/*
* Public domain
* pthread.h compatibility shim
*/
#ifndef LIBCRYPTOCOMPAT_PTHREAD_H
#define LIBCRYPTOCOMPAT_PTHREAD_H
#ifdef _WIN32
#include <malloc.h>
#include <stdlib.h>
#include <windows.h>
/*
* Static once initialization values.
*/
#define PTHREAD_ONCE_INIT { INIT_ONCE_STATIC_INIT }
/*
* Static mutex initialization values.
*/
#define PTHREAD_MUTEX_INITIALIZER { .lock = NULL }
/*
* Once definitions.
*/
struct pthread_once {
INIT_ONCE once;
};
typedef struct pthread_once pthread_once_t;
static inline BOOL CALLBACK
_pthread_once_win32_cb(PINIT_ONCE once, PVOID param, PVOID *context)
{
void (*cb) (void) = param;
cb();
return TRUE;
}
static inline int
pthread_once(pthread_once_t *once, void (*cb) (void))
{
BOOL rc = InitOnceExecuteOnce(&once->once, _pthread_once_win32_cb, cb, NULL);
if (rc == 0)
return -1;
else
return 0;
}
typedef DWORD pthread_t;
static inline pthread_t
pthread_self(void)
{
return GetCurrentThreadId();
}
static inline int
pthread_equal(pthread_t t1, pthread_t t2)
{
return t1 == t2;
}
struct pthread_mutex {
volatile LPCRITICAL_SECTION lock;
};
typedef struct pthread_mutex pthread_mutex_t;
typedef void pthread_mutexattr_t;
static inline int
pthread_mutex_init(pthread_mutex_t *mutex, const pthread_mutexattr_t *attr)
{
if ((mutex->lock = malloc(sizeof(CRITICAL_SECTION))) == NULL)
exit(ENOMEM);
InitializeCriticalSection(mutex->lock);
return 0;
}
static inline int
pthread_mutex_lock(pthread_mutex_t *mutex)
{
if (mutex->lock == NULL) {
LPCRITICAL_SECTION lcs;
if ((lcs = malloc(sizeof(CRITICAL_SECTION))) == NULL)
exit(ENOMEM);
InitializeCriticalSection(lcs);
if (InterlockedCompareExchangePointer((PVOID*)&mutex->lock, (PVOID)lcs, NULL) != NULL) {
DeleteCriticalSection(lcs);
free(lcs);
}
}
EnterCriticalSection(mutex->lock);
return 0;
}
static inline int
pthread_mutex_unlock(pthread_mutex_t *mutex)
{
LeaveCriticalSection(mutex->lock);
return 0;
}
static inline int
pthread_mutex_destroy(pthread_mutex_t *mutex)
{
DeleteCriticalSection(mutex->lock);
free(mutex->lock);
return 0;
}
#else
#include_next <pthread.h>
#endif
#endif
|