Skip to content
This repository has been archived by the owner on Feb 11, 2021. It is now read-only.

Latest commit

 

History

History
160 lines (140 loc) · 3.98 KB

SDL_sysmutex.c

File metadata and controls

160 lines (140 loc) · 3.98 KB
 
Apr 26, 2001
Apr 26, 2001
1
2
/*
SDL - Simple DirectMedia Layer
Feb 1, 2006
Feb 1, 2006
3
Copyright (C) 1997-2006 Sam Lantinga
Apr 26, 2001
Apr 26, 2001
4
5
This library is free software; you can redistribute it and/or
Feb 1, 2006
Feb 1, 2006
6
modify it under the terms of the GNU Lesser General Public
Apr 26, 2001
Apr 26, 2001
7
License as published by the Free Software Foundation; either
Feb 1, 2006
Feb 1, 2006
8
version 2.1 of the License, or (at your option) any later version.
Apr 26, 2001
Apr 26, 2001
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
Feb 1, 2006
Feb 1, 2006
13
Lesser General Public License for more details.
Apr 26, 2001
Apr 26, 2001
14
Feb 1, 2006
Feb 1, 2006
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
Apr 26, 2001
Apr 26, 2001
18
19
Sam Lantinga
Dec 14, 2001
Dec 14, 2001
20
slouken@libsdl.org
Apr 26, 2001
Apr 26, 2001
21
*/
Feb 21, 2006
Feb 21, 2006
22
#include "SDL_config.h"
Apr 26, 2001
Apr 26, 2001
23
24
25
26
27
#include <pthread.h>
#include "SDL_thread.h"
Feb 16, 2006
Feb 16, 2006
28
29
30
31
#if !SDL_THREAD_PTHREAD_RECURSIVE_MUTEX && \
!SDL_THREAD_PTHREAD_RECURSIVE_MUTEX_NP
#define FAKE_RECURSIVE_MUTEX
#endif
Apr 26, 2001
Apr 26, 2001
32
Jul 10, 2006
Jul 10, 2006
33
34
35
struct SDL_mutex
{
pthread_mutex_t id;
Feb 16, 2006
Feb 16, 2006
36
#if FAKE_RECURSIVE_MUTEX
Jul 10, 2006
Jul 10, 2006
37
38
int recursive;
pthread_t owner;
Apr 26, 2001
Apr 26, 2001
39
40
41
#endif
};
Jul 10, 2006
Jul 10, 2006
42
43
SDL_mutex *
SDL_CreateMutex(void)
Apr 26, 2001
Apr 26, 2001
44
{
Jul 10, 2006
Jul 10, 2006
45
46
SDL_mutex *mutex;
pthread_mutexattr_t attr;
Apr 26, 2001
Apr 26, 2001
47
Jul 10, 2006
Jul 10, 2006
48
49
50
51
/* Allocate the structure */
mutex = (SDL_mutex *) SDL_calloc(1, sizeof(*mutex));
if (mutex) {
pthread_mutexattr_init(&attr);
Feb 16, 2006
Feb 16, 2006
52
#if SDL_THREAD_PTHREAD_RECURSIVE_MUTEX
Jul 10, 2006
Jul 10, 2006
53
pthread_mutexattr_settype(&attr, PTHREAD_MUTEX_RECURSIVE);
Feb 16, 2006
Feb 16, 2006
54
#elif SDL_THREAD_PTHREAD_RECURSIVE_MUTEX_NP
Jul 10, 2006
Jul 10, 2006
55
pthread_mutexattr_setkind_np(&attr, PTHREAD_MUTEX_RECURSIVE_NP);
Apr 26, 2001
Apr 26, 2001
56
#else
Jul 10, 2006
Jul 10, 2006
57
/* No extra attributes necessary */
Feb 16, 2006
Feb 16, 2006
58
#endif
Jul 10, 2006
Jul 10, 2006
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);
Apr 26, 2001
Apr 26, 2001
68
69
}
Jul 10, 2006
Jul 10, 2006
70
71
void
SDL_DestroyMutex(SDL_mutex * mutex)
Apr 26, 2001
Apr 26, 2001
72
{
Jul 10, 2006
Jul 10, 2006
73
74
75
76
if (mutex) {
pthread_mutex_destroy(&mutex->id);
SDL_free(mutex);
}
Apr 26, 2001
Apr 26, 2001
77
78
79
}
/* Lock the mutex */
Jul 10, 2006
Jul 10, 2006
80
81
int
SDL_mutexP(SDL_mutex * mutex)
Apr 26, 2001
Apr 26, 2001
82
{
Jul 10, 2006
Jul 10, 2006
83
int retval;
Feb 16, 2006
Feb 16, 2006
84
#if FAKE_RECURSIVE_MUTEX
Jul 10, 2006
Jul 10, 2006
85
pthread_t this_thread;
Apr 26, 2001
Apr 26, 2001
86
87
#endif
Jul 10, 2006
Jul 10, 2006
88
89
90
91
if (mutex == NULL) {
SDL_SetError("Passed a NULL mutex");
return -1;
}
Apr 26, 2001
Apr 26, 2001
92
Jul 10, 2006
Jul 10, 2006
93
retval = 0;
Feb 16, 2006
Feb 16, 2006
94
#if FAKE_RECURSIVE_MUTEX
Jul 10, 2006
Jul 10, 2006
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;
}
}
Apr 26, 2001
Apr 26, 2001
111
#else
Jul 10, 2006
Jul 10, 2006
112
113
114
115
if (pthread_mutex_lock(&mutex->id) < 0) {
SDL_SetError("pthread_mutex_lock() failed");
retval = -1;
}
Apr 26, 2001
Apr 26, 2001
116
#endif
Jul 10, 2006
Jul 10, 2006
117
return retval;
Apr 26, 2001
Apr 26, 2001
118
119
}
Jul 10, 2006
Jul 10, 2006
120
121
int
SDL_mutexV(SDL_mutex * mutex)
Apr 26, 2001
Apr 26, 2001
122
{
Jul 10, 2006
Jul 10, 2006
123
int retval;
Apr 26, 2001
Apr 26, 2001
124
Jul 10, 2006
Jul 10, 2006
125
126
127
128
if (mutex == NULL) {
SDL_SetError("Passed a NULL mutex");
return -1;
}
Apr 26, 2001
Apr 26, 2001
129
Jul 10, 2006
Jul 10, 2006
130
retval = 0;
Feb 16, 2006
Feb 16, 2006
131
#if FAKE_RECURSIVE_MUTEX
Jul 10, 2006
Jul 10, 2006
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;
}
Apr 26, 2001
Apr 26, 2001
149
150
#else
Jul 10, 2006
Jul 10, 2006
151
152
153
154
if (pthread_mutex_unlock(&mutex->id) < 0) {
SDL_SetError("pthread_mutex_unlock() failed");
retval = -1;
}
Feb 16, 2006
Feb 16, 2006
155
#endif /* FAKE_RECURSIVE_MUTEX */
Apr 26, 2001
Apr 26, 2001
156
Jul 10, 2006
Jul 10, 2006
157
return retval;
Apr 26, 2001
Apr 26, 2001
158
}
Jul 10, 2006
Jul 10, 2006
159
160
/* vi: set ts=4 sw=4 expandtab: */