[444] | 1 | /* |
---|
| 2 | * Copyright (c) 2011 Aeroflex Gaisler |
---|
| 3 | * |
---|
| 4 | * BSD license: |
---|
| 5 | * |
---|
| 6 | * Permission is hereby granted, free of charge, to any person obtaining a copy |
---|
| 7 | * of this software and associated documentation files (the "Software"), to deal |
---|
| 8 | * in the Software without restriction, including without limitation the rights |
---|
| 9 | * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell |
---|
| 10 | * copies of the Software, and to permit persons to whom the Software is |
---|
| 11 | * furnished to do so, subject to the following conditions: |
---|
| 12 | * |
---|
| 13 | * The above copyright notice and this permission notice shall be included in |
---|
| 14 | * all copies or substantial portions of the Software. |
---|
| 15 | * |
---|
| 16 | * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR |
---|
| 17 | * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, |
---|
| 18 | * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL |
---|
| 19 | * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER |
---|
| 20 | * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, |
---|
| 21 | * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN |
---|
| 22 | * THE SOFTWARE. |
---|
| 23 | */ |
---|
| 24 | |
---|
| 25 | |
---|
| 26 | #include <sys/types.h> |
---|
| 27 | #include <sys/lock.h> |
---|
| 28 | #include <asm-leon/queue.h> |
---|
| 29 | /*#include <sys/fsu_pthread_mutex.h>*/ |
---|
| 30 | |
---|
| 31 | typedef int pthread_protocol_t; |
---|
| 32 | typedef |
---|
| 33 | TAILQ_HEAD (pthread_queue, pthread) * |
---|
| 34 | pthread_queue_t; |
---|
| 35 | |
---|
| 36 | #define pthread_mutex_t_defined |
---|
| 37 | typedef struct pthread_mutex |
---|
| 38 | { |
---|
| 39 | struct pthread_queue queue; |
---|
| 40 | char lock; |
---|
| 41 | struct pthread *owner; |
---|
| 42 | int flags; |
---|
| 43 | int count; |
---|
| 44 | int prioceiling; |
---|
| 45 | pthread_protocol_t protocol; |
---|
| 46 | int prev_max_ceiling_prio; |
---|
| 47 | TAILQ_ENTRY (pthread_mutex) dbglist; |
---|
| 48 | char *dbgname; |
---|
| 49 | int _fitothers[16]; |
---|
| 50 | } pthread_mutex_t; |
---|
| 51 | |
---|
| 52 | typedef struct |
---|
| 53 | { |
---|
| 54 | int flags; |
---|
| 55 | int prioceiling; |
---|
| 56 | pthread_protocol_t protocol; |
---|
| 57 | } pthread_mutexattr_t; |
---|
| 58 | |
---|
| 59 | |
---|
| 60 | int (*__lbst_pthread_mutex_init) (pthread_mutex_t * __mutex, |
---|
| 61 | pthread_mutexattr_t * __mutex_attr) = |
---|
| 62 | 0; |
---|
| 63 | int (*__lbst_pthread_mutex_destroy) (pthread_mutex_t * __mutex) = 0; |
---|
| 64 | int (*__lbst_pthread_mutex_trylock) (pthread_mutex_t * __mutex) = 0; |
---|
| 65 | int (*__lbst_pthread_mutex_lock) (pthread_mutex_t * __mutex) = 0; |
---|
| 66 | int (*__lbst_pthread_mutex_unlock) (pthread_mutex_t * __mutex) = 0; |
---|
| 67 | int (*__lbst_pthread_mutexattr_init) (pthread_mutexattr_t * __attr) = 0; |
---|
| 68 | int (*__lbst_pthread_mutexattr_destroy) (pthread_mutexattr_t * __attr) = |
---|
| 69 | 0; |
---|
| 70 | int (*__lbst_pthread_mutexattr_settype) (pthread_mutexattr_t * __attr, |
---|
| 71 | int __kind) = 0; |
---|
| 72 | |
---|
| 73 | int ___st_pthread_mutex_init (mutex, attr) |
---|
| 74 | pthread_mutex_t *mutex; |
---|
| 75 | pthread_mutexattr_t *attr; |
---|
| 76 | { |
---|
| 77 | if (__lbst_pthread_mutex_init) |
---|
| 78 | { |
---|
| 79 | return __lbst_pthread_mutex_init (mutex, attr); |
---|
| 80 | } |
---|
| 81 | return 0; |
---|
| 82 | } |
---|
| 83 | |
---|
| 84 | int |
---|
| 85 | ___st_pthread_mutex_destroy (mutex) |
---|
| 86 | pthread_mutex_t *mutex; |
---|
| 87 | { |
---|
| 88 | if (__lbst_pthread_mutex_destroy) |
---|
| 89 | { |
---|
| 90 | return __lbst_pthread_mutex_destroy (mutex); |
---|
| 91 | } |
---|
| 92 | return 0; |
---|
| 93 | } |
---|
| 94 | |
---|
| 95 | int |
---|
| 96 | ___st_pthread_mutex_lock (mutex) |
---|
| 97 | pthread_mutex_t *mutex; |
---|
| 98 | { |
---|
| 99 | if (__lbst_pthread_mutex_lock) |
---|
| 100 | { |
---|
| 101 | return __lbst_pthread_mutex_lock (mutex); |
---|
| 102 | } |
---|
| 103 | return 0; |
---|
| 104 | } |
---|
| 105 | |
---|
| 106 | int |
---|
| 107 | ___st_pthread_mutex_trylock (mutex) |
---|
| 108 | pthread_mutex_t *mutex; |
---|
| 109 | { |
---|
| 110 | if (__lbst_pthread_mutex_trylock) |
---|
| 111 | { |
---|
| 112 | return __lbst_pthread_mutex_trylock (mutex); |
---|
| 113 | } |
---|
| 114 | return 0; |
---|
| 115 | } |
---|
| 116 | |
---|
| 117 | int |
---|
| 118 | ___st_pthread_mutex_unlock (mutex) |
---|
| 119 | pthread_mutex_t *mutex; |
---|
| 120 | { |
---|
| 121 | if (__lbst_pthread_mutex_unlock) |
---|
| 122 | { |
---|
| 123 | return __lbst_pthread_mutex_unlock (mutex); |
---|
| 124 | } |
---|
| 125 | return 0; |
---|
| 126 | } |
---|
| 127 | |
---|
| 128 | int |
---|
| 129 | ___st_pthread_mutexattr_init (attr) |
---|
| 130 | pthread_mutexattr_t *attr; |
---|
| 131 | { |
---|
| 132 | if (__lbst_pthread_mutexattr_init) |
---|
| 133 | { |
---|
| 134 | return __lbst_pthread_mutexattr_init (attr); |
---|
| 135 | } |
---|
| 136 | return (0); |
---|
| 137 | } |
---|
| 138 | |
---|
| 139 | int |
---|
| 140 | ___st_pthread_mutexattr_destroy (attr) |
---|
| 141 | pthread_mutexattr_t *attr; |
---|
| 142 | { |
---|
| 143 | if (__lbst_pthread_mutexattr_destroy) |
---|
| 144 | { |
---|
| 145 | return __lbst_pthread_mutexattr_destroy (attr); |
---|
| 146 | } |
---|
| 147 | return 0; |
---|
| 148 | } |
---|
| 149 | |
---|
| 150 | int |
---|
| 151 | ___st_pthread_mutexattr_settype (attr, kind) |
---|
| 152 | pthread_mutexattr_t *attr; |
---|
| 153 | int kind; |
---|
| 154 | { |
---|
| 155 | if (__lbst_pthread_mutexattr_settype) |
---|
| 156 | { |
---|
| 157 | return __lbst_pthread_mutexattr_settype (attr, kind); |
---|
| 158 | } |
---|
| 159 | return 0; |
---|
| 160 | } |
---|
| 161 | |
---|
| 162 | #include <asm-leon/elfmacro.h> |
---|
| 163 | |
---|
| 164 | weak_alias (___st_pthread_mutex_init, __st_pthread_mutex_init) |
---|
| 165 | weak_alias (___st_pthread_mutex_destroy, __st_pthread_mutex_destroy) |
---|
| 166 | weak_alias (___st_pthread_mutex_trylock, __st_pthread_mutex_trylock) |
---|
| 167 | weak_alias (___st_pthread_mutex_lock, __st_pthread_mutex_lock) |
---|
| 168 | weak_alias (___st_pthread_mutex_unlock, __st_pthread_mutex_unlock) |
---|
| 169 | weak_alias (___st_pthread_mutexattr_init, __st_pthread_mutexattr_init) |
---|
| 170 | weak_alias (___st_pthread_mutexattr_destroy, __st_pthread_mutexattr_destroy) |
---|
| 171 | weak_alias (___st_pthread_mutexattr_settype, __st_pthread_mutexattr_settype) |
---|
| 172 | /* /\* #ifndef weak_extern *\/ */ |
---|
| 173 | /* /\* #define weak_extern(symbol) _weak_extern (symbol) *\/ */ |
---|
| 174 | /* /\* #define _weak_extern(symbol) asm (".weak " #symbol); *\/ */ |
---|
| 175 | /* /\* #endif *\/ */ |
---|
| 176 | /* /\* weak_extern (__pthread_mutex_init) *\/ */ |
---|
| 177 | /* /\* weak_extern (__pthread_mutex_destroy) *\/ */ |
---|
| 178 | /* /\* weak_extern (__pthread_mutex_lock) *\/ */ |
---|
| 179 | /* /\* weak_extern (__pthread_mutex_trylock) *\/ */ |
---|
| 180 | /* /\* weak_extern (__pthread_mutex_unlock) *\/ */ |
---|
| 181 | /* /\* weak_extern (__pthread_mutexattr_init) *\/ */ |
---|
| 182 | /* /\* weak_extern (__pthread_mutexattr_destroy) *\/ */ |
---|
| 183 | /* /\* weak_extern (__pthread_mutexattr_settype) *\/ */ |
---|
| 184 | /* /\* weak_extern (__pthread_once) *\/ */ |
---|
| 185 | /* /\* weak_extern (__pthread_initialize) *\/ */ |
---|
| 186 | /* /\* Initialize the named lock variable, leaving it in a consistent, unlocked */ |
---|
| 187 | /* state. *\/ */ |
---|
| 188 | /* #define __libc_lock_init(NAME) \ */ |
---|
| 189 | /* (__pthread_mutex_init != NULL ? __pthread_mutex_init (&(NAME), NULL) : 0); */ |
---|
| 190 | /* /\* Same as last but this time we initialize a recursive mutex. *\/ */ |
---|
| 191 | /* #define __libc_lock_init_recursive(NAME) \ */ |
---|
| 192 | /* do { \ */ |
---|
| 193 | /* if (__pthread_mutex_init != NULL) \ */ |
---|
| 194 | /* { \ */ |
---|
| 195 | /* pthread_mutexattr_t __attr; \ */ |
---|
| 196 | /* __pthread_mutexattr_init (&__attr); \ */ |
---|
| 197 | /* __pthread_mutexattr_settype (&__attr, PTHREAD_MUTEX_RECURSIVE_NP); \ */ |
---|
| 198 | /* __pthread_mutex_init (&(NAME), &__attr); \ */ |
---|
| 199 | /* __pthread_mutexattr_destroy (&__attr); \ */ |
---|
| 200 | /* } \ */ |
---|
| 201 | /* } while (0); */ |
---|
| 202 | /* /\* Finalize the named lock variable, which must be locked. It cannot be */ |
---|
| 203 | /* used again until __libc_lock_init is called again on it. This must be */ |
---|
| 204 | /* called on a lock variable before the containing storage is reused. *\/ */ |
---|
| 205 | /* //#define __libc_lock_fini(NAME) (__pthread_mutex_destroy != NULL ? __pthread_mutex_destroy (&(NAME)) : 0) */ |
---|
| 206 | /* #define __libc_lock_fini(NAME) (__st_pthread_mutex_destroy (&(NAME))) */ |
---|
| 207 | /* /\* Finalize recursive named lock. *\/ */ |
---|
| 208 | /* #define __libc_lock_fini_recursive(NAME) __libc_lock_fini (NAME) */ |
---|
| 209 | /* /\* Lock the named lock variable. *\/ */ |
---|
| 210 | /* //#define __libc_lock_lock(NAME) (__pthread_mutex_lock != NULL ? __pthread_mutex_lock (&(NAME)) : 0) */ |
---|
| 211 | /* #define __libc_lock_lock(NAME) (__st_pthread_mutex_lock (&(NAME))) */ |
---|
| 212 | /* /\* Lock the recursive named lock variable. *\/ */ |
---|
| 213 | /* #define __libc_lock_lock_recursive(NAME) __libc_lock_lock (NAME) */ |
---|
| 214 | /* /\* Try to lock the named lock variable. *\/ */ |
---|
| 215 | /* //#define __libc_lock_trylock(NAME) (__pthread_mutex_trylock != NULL ? __pthread_mutex_trylock (&(NAME)) : 0) */ |
---|
| 216 | /* #define __libc_lock_trylock(NAME) (__st_pthread_mutex_trylock (&(NAME))) */ |
---|
| 217 | /* /\* Try to lock the recursive named lock variable. *\/ */ |
---|
| 218 | /* #define __libc_lock_trylock_recursive(NAME) __libc_lock_trylock (NAME) */ |
---|
| 219 | /* /\* Unlock the named lock variable. *\/ */ |
---|
| 220 | /* //#define __libc_lock_unlock(NAME) (__pthread_mutex_unlock != NULL ? __pthread_mutex_unlock (&(NAME)) : 0) */ |
---|
| 221 | /* #define __libc_lock_unlock(NAME) (__st_pthread_mutex_unlock (&(NAME))) */ |
---|
| 222 | /* /\* Unlock the recursive named lock variable. *\/ */ |
---|
| 223 | /* #define __libc_lock_unlock_recursive(NAME) __libc_lock_unlock (NAME) */ |
---|
| 224 | /* extern int __st_pthread_mutex_init (pthread_mutex_t *__mutex, pthread_mutexattr_t *__mutex_attr); */ |
---|
| 225 | /* extern int __st_pthread_mutex_destroy (pthread_mutex_t *__mutex); */ |
---|
| 226 | /* extern int __st_pthread_mutex_trylock (pthread_mutex_t *__mutex); */ |
---|
| 227 | /* extern int __st_pthread_mutex_lock (pthread_mutex_t *__mutex); */ |
---|
| 228 | /* extern int __st_pthread_mutex_unlock (pthread_mutex_t *__mutex); */ |
---|
| 229 | /* extern int __st_pthread_mutexattr_init (pthread_mutexattr_t *__attr); */ |
---|
| 230 | /* extern int __st_pthread_mutexattr_destroy (pthread_mutexattr_t *__attr); */ |
---|
| 231 | /* extern int __st_pthread_mutexattr_settype (pthread_mutexattr_t *__attr, int __kind); */ |
---|
| 232 | /* /\* /\\* Functions that are used by this file and are internal to the GNU C library. *\\/ *\/ */ |
---|
| 233 | /* /\* extern int __pthread_mutex_init (pthread_mutex_t *__mutex, pthread_mutexattr_t *__mutex_attr); *\/ */ |
---|
| 234 | /* /\* extern int __pthread_mutex_destroy (pthread_mutex_t *__mutex); *\/ */ |
---|
| 235 | /* /\* extern int __pthread_mutex_trylock (pthread_mutex_t *__mutex); *\/ */ |
---|
| 236 | /* /\* extern int __pthread_mutex_lock (pthread_mutex_t *__mutex); *\/ */ |
---|
| 237 | /* /\* extern int __pthread_mutex_unlock (pthread_mutex_t *__mutex); *\/ */ |
---|
| 238 | /* /\* extern int __pthread_mutexattr_init (pthread_mutexattr_t *__attr); *\/ */ |
---|
| 239 | /* /\* extern int __pthread_mutexattr_destroy (pthread_mutexattr_t *__attr); *\/ */ |
---|
| 240 | /* /\* extern int __pthread_mutexattr_settype (pthread_mutexattr_t *__attr, int __kind); *\/ */ |
---|
| 241 | /* /\* /\\* Make the pthread functions weak so that we can elide them from *\/ */ |
---|
| 242 | /* /\* single-threaded processes. *\\/ *\/ */ |
---|
| 243 | /* /\* #ifndef weak_extern *\/ */ |
---|
| 244 | /* /\* #define weak_extern(symbol) _weak_extern (symbol) *\/ */ |
---|
| 245 | /* /\* #define _weak_extern(symbol) asm (".weak " #symbol); *\/ */ |
---|
| 246 | /* /\* #endif *\/ */ |
---|
| 247 | /* /\* weak_extern (__pthread_mutex_init) *\/ */ |
---|
| 248 | /* /\* weak_extern (__pthread_mutex_destroy) *\/ */ |
---|
| 249 | /* /\* weak_extern (__pthread_mutex_lock) *\/ */ |
---|
| 250 | /* /\* weak_extern (__pthread_mutex_trylock) *\/ */ |
---|
| 251 | /* /\* weak_extern (__pthread_mutex_unlock) *\/ */ |
---|
| 252 | /* /\* weak_extern (__pthread_mutexattr_init) *\/ */ |
---|
| 253 | /* /\* weak_extern (__pthread_mutexattr_destroy) *\/ */ |
---|
| 254 | /* /\* weak_extern (__pthread_mutexattr_settype) *\/ */ |
---|
| 255 | /* /\* weak_extern (__pthread_once) *\/ */ |
---|
| 256 | /* /\* weak_extern (__pthread_initialize) *\/ */ |
---|