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

Latest commit

 

History

History
161 lines (141 loc) · 4 KB

SDL_sysmutex.c

File metadata and controls

161 lines (141 loc) · 4 KB
 
Apr 26, 2001
Apr 26, 2001
1
2
/*
SDL - Simple DirectMedia Layer
Feb 12, 2011
Feb 12, 2011
3
Copyright (C) 1997-2011 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
Dec 30, 2009
Dec 30, 2009
24
#define _GNU_SOURCE
Apr 26, 2001
Apr 26, 2001
25
26
27
28
#include <pthread.h>
#include "SDL_thread.h"
Feb 16, 2006
Feb 16, 2006
29
30
31
32
#if !SDL_THREAD_PTHREAD_RECURSIVE_MUTEX && \
!SDL_THREAD_PTHREAD_RECURSIVE_MUTEX_NP
#define FAKE_RECURSIVE_MUTEX
#endif
Apr 26, 2001
Apr 26, 2001
33
Jul 10, 2006
Jul 10, 2006
34
35
36
struct SDL_mutex
{
pthread_mutex_t id;
Feb 16, 2006
Feb 16, 2006
37
#if FAKE_RECURSIVE_MUTEX
Jul 10, 2006
Jul 10, 2006
38
39
int recursive;
pthread_t owner;
Apr 26, 2001
Apr 26, 2001
40
41
42
#endif
};
Jul 10, 2006
Jul 10, 2006
43
44
SDL_mutex *
SDL_CreateMutex(void)
Apr 26, 2001
Apr 26, 2001
45
{
Jul 10, 2006
Jul 10, 2006
46
47
SDL_mutex *mutex;
pthread_mutexattr_t attr;
Apr 26, 2001
Apr 26, 2001
48
Jul 10, 2006
Jul 10, 2006
49
50
51
52
/* Allocate the structure */
mutex = (SDL_mutex *) SDL_calloc(1, sizeof(*mutex));
if (mutex) {
pthread_mutexattr_init(&attr);
Feb 16, 2006
Feb 16, 2006
53
#if SDL_THREAD_PTHREAD_RECURSIVE_MUTEX
Jul 10, 2006
Jul 10, 2006
54
pthread_mutexattr_settype(&attr, PTHREAD_MUTEX_RECURSIVE);
Feb 16, 2006
Feb 16, 2006
55
#elif SDL_THREAD_PTHREAD_RECURSIVE_MUTEX_NP
Jul 10, 2006
Jul 10, 2006
56
pthread_mutexattr_setkind_np(&attr, PTHREAD_MUTEX_RECURSIVE_NP);
Apr 26, 2001
Apr 26, 2001
57
#else
Jul 10, 2006
Jul 10, 2006
58
/* No extra attributes necessary */
Feb 16, 2006
Feb 16, 2006
59
#endif
Jul 10, 2006
Jul 10, 2006
60
61
62
63
64
65
66
67
68
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
69
70
}
Jul 10, 2006
Jul 10, 2006
71
72
void
SDL_DestroyMutex(SDL_mutex * mutex)
Apr 26, 2001
Apr 26, 2001
73
{
Jul 10, 2006
Jul 10, 2006
74
75
76
77
if (mutex) {
pthread_mutex_destroy(&mutex->id);
SDL_free(mutex);
}
Apr 26, 2001
Apr 26, 2001
78
79
80
}
/* Lock the mutex */
Jul 10, 2006
Jul 10, 2006
81
82
int
SDL_mutexP(SDL_mutex * mutex)
Apr 26, 2001
Apr 26, 2001
83
{
Jul 10, 2006
Jul 10, 2006
84
int retval;
Feb 16, 2006
Feb 16, 2006
85
#if FAKE_RECURSIVE_MUTEX
Jul 10, 2006
Jul 10, 2006
86
pthread_t this_thread;
Apr 26, 2001
Apr 26, 2001
87
88
#endif
Jul 10, 2006
Jul 10, 2006
89
90
91
92
if (mutex == NULL) {
SDL_SetError("Passed a NULL mutex");
return -1;
}
Apr 26, 2001
Apr 26, 2001
93
Jul 10, 2006
Jul 10, 2006
94
retval = 0;
Feb 16, 2006
Feb 16, 2006
95
#if FAKE_RECURSIVE_MUTEX
Jul 10, 2006
Jul 10, 2006
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
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
112
#else
Jul 10, 2006
Jul 10, 2006
113
114
115
116
if (pthread_mutex_lock(&mutex->id) < 0) {
SDL_SetError("pthread_mutex_lock() failed");
retval = -1;
}
Apr 26, 2001
Apr 26, 2001
117
#endif
Jul 10, 2006
Jul 10, 2006
118
return retval;
Apr 26, 2001
Apr 26, 2001
119
120
}
Jul 10, 2006
Jul 10, 2006
121
122
int
SDL_mutexV(SDL_mutex * mutex)
Apr 26, 2001
Apr 26, 2001
123
{
Jul 10, 2006
Jul 10, 2006
124
int retval;
Apr 26, 2001
Apr 26, 2001
125
Jul 10, 2006
Jul 10, 2006
126
127
128
129
if (mutex == NULL) {
SDL_SetError("Passed a NULL mutex");
return -1;
}
Apr 26, 2001
Apr 26, 2001
130
Jul 10, 2006
Jul 10, 2006
131
retval = 0;
Feb 16, 2006
Feb 16, 2006
132
#if FAKE_RECURSIVE_MUTEX
Jul 10, 2006
Jul 10, 2006
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
/* 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
150
151
#else
Jul 10, 2006
Jul 10, 2006
152
153
154
155
if (pthread_mutex_unlock(&mutex->id) < 0) {
SDL_SetError("pthread_mutex_unlock() failed");
retval = -1;
}
Feb 16, 2006
Feb 16, 2006
156
#endif /* FAKE_RECURSIVE_MUTEX */
Apr 26, 2001
Apr 26, 2001
157
Jul 10, 2006
Jul 10, 2006
158
return retval;
Apr 26, 2001
Apr 26, 2001
159
}
Jul 10, 2006
Jul 10, 2006
160
161
/* vi: set ts=4 sw=4 expandtab: */