This repository has been archived by the owner on Feb 11, 2021. It is now read-only.
/
SDL_sysmutex.c
160 lines (140 loc) · 3.98 KB
1
2
/*
SDL - Simple DirectMedia Layer
3
Copyright (C) 1997-2006 Sam Lantinga
4
5
This library is free software; you can redistribute it and/or
6
modify it under the terms of the GNU Lesser General Public
7
License as published by the Free Software Foundation; either
8
version 2.1 of the License, or (at your option) any later version.
9
10
11
12
This library is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13
Lesser General Public License for more details.
14
15
16
17
You should have received a copy of the GNU Lesser General Public
License along with this library; if not, write to the Free Software
Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
18
19
Sam Lantinga
20
slouken@libsdl.org
21
*/
22
#include "SDL_config.h"
23
24
25
26
27
#include <pthread.h>
#include "SDL_thread.h"
28
29
30
31
#if !SDL_THREAD_PTHREAD_RECURSIVE_MUTEX && \
!SDL_THREAD_PTHREAD_RECURSIVE_MUTEX_NP
#define FAKE_RECURSIVE_MUTEX
#endif
32
33
34
35
struct SDL_mutex
{
pthread_mutex_t id;
36
#if FAKE_RECURSIVE_MUTEX
37
38
int recursive;
pthread_t owner;
39
40
41
#endif
};
42
43
SDL_mutex *
SDL_CreateMutex(void)
44
{
45
46
SDL_mutex *mutex;
pthread_mutexattr_t attr;
47
48
49
50
51
/* Allocate the structure */
mutex = (SDL_mutex *) SDL_calloc(1, sizeof(*mutex));
if (mutex) {
pthread_mutexattr_init(&attr);
52
#if SDL_THREAD_PTHREAD_RECURSIVE_MUTEX
53
pthread_mutexattr_settype(&attr, PTHREAD_MUTEX_RECURSIVE);
54
#elif SDL_THREAD_PTHREAD_RECURSIVE_MUTEX_NP
55
pthread_mutexattr_setkind_np(&attr, PTHREAD_MUTEX_RECURSIVE_NP);
56
#else
57
/* No extra attributes necessary */
58
#endif
59
60
61
62
63
64
65
66
67
if (pthread_mutex_init(&mutex->id, &attr) != 0) {
SDL_SetError("pthread_mutex_init() failed");
SDL_free(mutex);
mutex = NULL;
}
} else {
SDL_OutOfMemory();
}
return (mutex);
68
69
}
70
71
void
SDL_DestroyMutex(SDL_mutex * mutex)
72
{
73
74
75
76
if (mutex) {
pthread_mutex_destroy(&mutex->id);
SDL_free(mutex);
}
77
78
79
}
/* Lock the mutex */
80
81
int
SDL_mutexP(SDL_mutex * mutex)
82
{
83
int retval;
84
#if FAKE_RECURSIVE_MUTEX
85
pthread_t this_thread;
86
87
#endif
88
89
90
91
if (mutex == NULL) {
SDL_SetError("Passed a NULL mutex");
return -1;
}
92
93
retval = 0;
94
#if FAKE_RECURSIVE_MUTEX
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
this_thread = pthread_self();
if (mutex->owner == this_thread) {
++mutex->recursive;
} else {
/* The order of operations is important.
We set the locking thread id after we obtain the lock
so unlocks from other threads will fail.
*/
if (pthread_mutex_lock(&mutex->id) == 0) {
mutex->owner = this_thread;
mutex->recursive = 0;
} else {
SDL_SetError("pthread_mutex_lock() failed");
retval = -1;
}
}
111
#else
112
113
114
115
if (pthread_mutex_lock(&mutex->id) < 0) {
SDL_SetError("pthread_mutex_lock() failed");
retval = -1;
}
116
#endif
117
return retval;
118
119
}
120
121
int
SDL_mutexV(SDL_mutex * mutex)
122
{
123
int retval;
124
125
126
127
128
if (mutex == NULL) {
SDL_SetError("Passed a NULL mutex");
return -1;
}
129
130
retval = 0;
131
#if FAKE_RECURSIVE_MUTEX
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
/* We can only unlock the mutex if we own it */
if (pthread_self() == mutex->owner) {
if (mutex->recursive) {
--mutex->recursive;
} else {
/* The order of operations is important.
First reset the owner so another thread doesn't lock
the mutex and set the ownership before we reset it,
then release the lock semaphore.
*/
mutex->owner = 0;
pthread_mutex_unlock(&mutex->id);
}
} else {
SDL_SetError("mutex not owned by this thread");
retval = -1;
}
149
150
#else
151
152
153
154
if (pthread_mutex_unlock(&mutex->id) < 0) {
SDL_SetError("pthread_mutex_unlock() failed");
retval = -1;
}
155
#endif /* FAKE_RECURSIVE_MUTEX */
156
157
return retval;
158
}
159
160
/* vi: set ts=4 sw=4 expandtab: */