462 lines
10 KiB
C
462 lines
10 KiB
C
/* $NetBSD: thread-stub.c,v 1.32 2022/04/19 20:32:16 rillig Exp $ */
|
|
|
|
/*-
|
|
* Copyright (c) 2003, 2009 The NetBSD Foundation, Inc.
|
|
* All rights reserved.
|
|
*
|
|
* This code is derived from software contributed to The NetBSD Foundation
|
|
* by Jason R. Thorpe.
|
|
*
|
|
* Redistribution and use in source and binary forms, with or without
|
|
* modification, are permitted provided that the following conditions
|
|
* are met:
|
|
* 1. Redistributions of source code must retain the above copyright
|
|
* notice, this list of conditions and the following disclaimer.
|
|
* 2. Redistributions in binary form must reproduce the above copyright
|
|
* notice, this list of conditions and the following disclaimer in the
|
|
* documentation and/or other materials provided with the distribution.
|
|
*
|
|
* THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
|
|
* ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
|
|
* TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
|
|
* PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
|
|
* BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
|
|
* CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
|
|
* SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
|
|
* INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
|
|
* CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
|
|
* ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
|
|
* POSSIBILITY OF SUCH DAMAGE.
|
|
*/
|
|
|
|
#include <sys/cdefs.h>
|
|
#if defined(LIBC_SCCS) && !defined(lint)
|
|
__RCSID("$NetBSD: thread-stub.c,v 1.32 2022/04/19 20:32:16 rillig Exp $");
|
|
#endif /* LIBC_SCCS and not lint */
|
|
|
|
/*
|
|
* Stubs for thread operations, for use when threads are not used by
|
|
* the application. See "reentrant.h" for details.
|
|
*/
|
|
|
|
#ifdef _REENTRANT
|
|
|
|
#define __LIBC_THREAD_STUBS
|
|
|
|
#define pthread_join __libc_pthread_join
|
|
#define pthread_detach __libc_pthread_detach
|
|
#include "namespace.h"
|
|
#include "reentrant.h"
|
|
#include "tsd.h"
|
|
|
|
#include <errno.h>
|
|
#include <signal.h>
|
|
#include <stdlib.h>
|
|
#include <unistd.h>
|
|
|
|
extern int __isthreaded;
|
|
|
|
#define DIE() (void)raise(SIGABRT)
|
|
|
|
#define CHECK_NOT_THREADED_ALWAYS() \
|
|
do { \
|
|
if (__isthreaded) \
|
|
DIE(); \
|
|
} while (0)
|
|
|
|
#if 1
|
|
#define CHECK_NOT_THREADED() CHECK_NOT_THREADED_ALWAYS()
|
|
#else
|
|
#define CHECK_NOT_THREADED() /* nothing */
|
|
#endif
|
|
|
|
__weak_alias(pthread_join, __libc_pthread_join)
|
|
__weak_alias(pthread_detach, __libc_pthread_detach)
|
|
|
|
int
|
|
pthread_join(pthread_t thread, void **valptr)
|
|
{
|
|
|
|
if (thread == pthread_self())
|
|
return EDEADLK;
|
|
return ESRCH;
|
|
}
|
|
|
|
int
|
|
pthread_detach(pthread_t thread)
|
|
{
|
|
|
|
if (thread == pthread_self())
|
|
return 0;
|
|
return ESRCH;
|
|
}
|
|
|
|
/* mutexes */
|
|
|
|
int __libc_mutex_catchall_stub(mutex_t *);
|
|
|
|
__weak_alias(__libc_mutex_init,__libc_mutex_init_stub)
|
|
__weak_alias(__libc_mutex_lock,__libc_mutex_catchall_stub)
|
|
__weak_alias(__libc_mutex_trylock,__libc_mutex_catchall_stub)
|
|
__weak_alias(__libc_mutex_unlock,__libc_mutex_catchall_stub)
|
|
__weak_alias(__libc_mutex_destroy,__libc_mutex_catchall_stub)
|
|
|
|
__strong_alias(__libc_mutex_lock_stub,__libc_mutex_catchall_stub)
|
|
__strong_alias(__libc_mutex_trylock_stub,__libc_mutex_catchall_stub)
|
|
__strong_alias(__libc_mutex_unlock_stub,__libc_mutex_catchall_stub)
|
|
__strong_alias(__libc_mutex_destroy_stub,__libc_mutex_catchall_stub)
|
|
|
|
int __libc_mutexattr_catchall_stub(mutexattr_t *);
|
|
|
|
__weak_alias(__libc_mutexattr_init,__libc_mutexattr_catchall_stub)
|
|
__weak_alias(__libc_mutexattr_destroy,__libc_mutexattr_catchall_stub)
|
|
__weak_alias(__libc_mutexattr_settype,__libc_mutexattr_settype_stub)
|
|
|
|
__strong_alias(__libc_mutexattr_init_stub,__libc_mutexattr_catchall_stub)
|
|
__strong_alias(__libc_mutexattr_destroy_stub,__libc_mutexattr_catchall_stub)
|
|
|
|
int
|
|
__libc_mutex_init_stub(mutex_t *m, const mutexattr_t *a)
|
|
{
|
|
/* LINTED deliberate lack of effect */
|
|
(void)m;
|
|
/* LINTED deliberate lack of effect */
|
|
(void)a;
|
|
|
|
CHECK_NOT_THREADED();
|
|
|
|
return (0);
|
|
}
|
|
|
|
int
|
|
__libc_mutex_catchall_stub(mutex_t *m)
|
|
{
|
|
/* LINTED deliberate lack of effect */
|
|
(void)m;
|
|
|
|
CHECK_NOT_THREADED();
|
|
|
|
return (0);
|
|
}
|
|
|
|
int
|
|
__libc_mutexattr_settype_stub(mutexattr_t *ma, int type)
|
|
{
|
|
/* LINTED deliberate lack of effect */
|
|
(void)ma;
|
|
/* LINTED deliberate lack of effect */
|
|
(void)type;
|
|
|
|
CHECK_NOT_THREADED();
|
|
|
|
return (0);
|
|
}
|
|
|
|
int
|
|
__libc_mutexattr_catchall_stub(mutexattr_t *ma)
|
|
{
|
|
/* LINTED deliberate lack of effect */
|
|
(void)ma;
|
|
|
|
CHECK_NOT_THREADED();
|
|
|
|
return (0);
|
|
}
|
|
|
|
/* condition variables */
|
|
|
|
int __libc_cond_catchall_stub(cond_t *);
|
|
|
|
__weak_alias(__libc_cond_init,__libc_cond_init_stub)
|
|
__weak_alias(__libc_cond_signal,__libc_cond_catchall_stub)
|
|
__weak_alias(__libc_cond_broadcast,__libc_cond_catchall_stub)
|
|
__weak_alias(__libc_cond_wait,__libc_cond_catchall_stub)
|
|
__weak_alias(__libc_cond_timedwait,__libc_cond_timedwait_stub)
|
|
__weak_alias(__libc_cond_destroy,__libc_cond_catchall_stub)
|
|
|
|
__strong_alias(__libc_cond_signal_stub,__libc_cond_catchall_stub)
|
|
__strong_alias(__libc_cond_broadcast_stub,__libc_cond_catchall_stub)
|
|
__strong_alias(__libc_cond_destroy_stub,__libc_cond_catchall_stub)
|
|
|
|
int
|
|
__libc_cond_init_stub(cond_t *c, const condattr_t *a)
|
|
{
|
|
/* LINTED deliberate lack of effect */
|
|
(void)c;
|
|
/* LINTED deliberate lack of effect */
|
|
(void)a;
|
|
|
|
CHECK_NOT_THREADED();
|
|
|
|
return (0);
|
|
}
|
|
|
|
int
|
|
__libc_cond_wait_stub(cond_t *c, mutex_t *m)
|
|
{
|
|
/* LINTED deliberate lack of effect */
|
|
(void)c;
|
|
/* LINTED deliberate lack of effect */
|
|
(void)m;
|
|
|
|
CHECK_NOT_THREADED();
|
|
|
|
return (0);
|
|
}
|
|
|
|
int
|
|
__libc_cond_timedwait_stub(cond_t *c, mutex_t *m, const struct timespec *t)
|
|
{
|
|
/* LINTED deliberate lack of effect */
|
|
(void)c;
|
|
/* LINTED deliberate lack of effect */
|
|
(void)m;
|
|
/* LINTED deliberate lack of effect */
|
|
(void)t;
|
|
|
|
CHECK_NOT_THREADED();
|
|
|
|
return (0);
|
|
}
|
|
|
|
int
|
|
__libc_cond_catchall_stub(cond_t *c)
|
|
{
|
|
/* LINTED deliberate lack of effect */
|
|
(void)c;
|
|
|
|
CHECK_NOT_THREADED();
|
|
|
|
return (0);
|
|
}
|
|
|
|
|
|
/* read-write locks */
|
|
|
|
int __libc_rwlock_catchall_stub(rwlock_t *);
|
|
|
|
__weak_alias(__libc_rwlock_init,__libc_rwlock_init_stub)
|
|
__weak_alias(__libc_rwlock_rdlock,__libc_rwlock_catchall_stub)
|
|
__weak_alias(__libc_rwlock_wrlock,__libc_rwlock_catchall_stub)
|
|
__weak_alias(__libc_rwlock_tryrdlock,__libc_rwlock_catchall_stub)
|
|
__weak_alias(__libc_rwlock_trywrlock,__libc_rwlock_catchall_stub)
|
|
__weak_alias(__libc_rwlock_unlock,__libc_rwlock_catchall_stub)
|
|
__weak_alias(__libc_rwlock_destroy,__libc_rwlock_catchall_stub)
|
|
|
|
__strong_alias(__libc_rwlock_rdlock_stub,__libc_rwlock_catchall_stub)
|
|
__strong_alias(__libc_rwlock_wrlock_stub,__libc_rwlock_catchall_stub)
|
|
__strong_alias(__libc_rwlock_tryrdlock_stub,__libc_rwlock_catchall_stub)
|
|
__strong_alias(__libc_rwlock_trywrlock_stub,__libc_rwlock_catchall_stub)
|
|
__strong_alias(__libc_rwlock_unlock_stub,__libc_rwlock_catchall_stub)
|
|
__strong_alias(__libc_rwlock_destroy_stub,__libc_rwlock_catchall_stub)
|
|
|
|
|
|
int
|
|
__libc_rwlock_init_stub(rwlock_t *l, const rwlockattr_t *a)
|
|
{
|
|
/* LINTED deliberate lack of effect */
|
|
(void)l;
|
|
/* LINTED deliberate lack of effect */
|
|
(void)a;
|
|
|
|
CHECK_NOT_THREADED();
|
|
|
|
return (0);
|
|
}
|
|
|
|
int
|
|
__libc_rwlock_catchall_stub(rwlock_t *l)
|
|
{
|
|
/* LINTED deliberate lack of effect */
|
|
(void)l;
|
|
|
|
CHECK_NOT_THREADED();
|
|
|
|
return (0);
|
|
}
|
|
|
|
|
|
/*
|
|
* thread-specific data; we need to actually provide a simple TSD
|
|
* implementation, since some thread-safe libraries want to use it.
|
|
*/
|
|
|
|
struct __libc_tsd __libc_tsd[TSD_KEYS_MAX];
|
|
static int __libc_tsd_nextkey;
|
|
|
|
__weak_alias(__libc_thr_keycreate,__libc_thr_keycreate_stub)
|
|
__weak_alias(__libc_thr_setspecific,__libc_thr_setspecific_stub)
|
|
__weak_alias(__libc_thr_getspecific,__libc_thr_getspecific_stub)
|
|
__weak_alias(__libc_thr_keydelete,__libc_thr_keydelete_stub)
|
|
|
|
int
|
|
__libc_thr_keycreate_stub(thread_key_t *k, void (*d)(void *))
|
|
{
|
|
int i;
|
|
|
|
for (i = __libc_tsd_nextkey; i < TSD_KEYS_MAX; i++) {
|
|
if (__libc_tsd[i].tsd_inuse == 0)
|
|
goto out;
|
|
}
|
|
|
|
for (i = 0; i < __libc_tsd_nextkey; i++) {
|
|
if (__libc_tsd[i].tsd_inuse == 0)
|
|
goto out;
|
|
}
|
|
|
|
return (EAGAIN);
|
|
|
|
out:
|
|
/*
|
|
* XXX We don't actually do anything with the destructor. We
|
|
* XXX probably should.
|
|
*/
|
|
__libc_tsd[i].tsd_inuse = 1;
|
|
__libc_tsd_nextkey = (i + i) % TSD_KEYS_MAX;
|
|
__libc_tsd[i].tsd_dtor = d;
|
|
*k = i;
|
|
|
|
return (0);
|
|
}
|
|
|
|
int
|
|
__libc_thr_setspecific_stub(thread_key_t k, const void *v)
|
|
{
|
|
|
|
__libc_tsd[k].tsd_val = __UNCONST(v);
|
|
|
|
return (0);
|
|
}
|
|
|
|
void *
|
|
__libc_thr_getspecific_stub(thread_key_t k)
|
|
{
|
|
|
|
return (__libc_tsd[k].tsd_val);
|
|
}
|
|
|
|
int
|
|
__libc_thr_keydelete_stub(thread_key_t k)
|
|
{
|
|
|
|
/*
|
|
* XXX Do not recycle key; see big comment in libpthread.
|
|
*/
|
|
|
|
__libc_tsd[k].tsd_dtor = NULL;
|
|
|
|
return (0);
|
|
}
|
|
|
|
|
|
/* misc. */
|
|
|
|
__weak_alias(__libc_thr_once,__libc_thr_once_stub)
|
|
__weak_alias(__libc_thr_sigsetmask,__libc_thr_sigsetmask_stub)
|
|
__weak_alias(__libc_thr_self,__libc_thr_self_stub)
|
|
__weak_alias(__libc_thr_yield,__libc_thr_yield_stub)
|
|
__weak_alias(__libc_thr_create,__libc_thr_create_stub)
|
|
__weak_alias(__libc_thr_exit,__libc_thr_exit_stub)
|
|
__weak_alias(__libc_thr_setcancelstate,__libc_thr_setcancelstate_stub)
|
|
__weak_alias(__libc_thr_equal,__libc_thr_equal_stub)
|
|
__weak_alias(__libc_thr_curcpu,__libc_thr_curcpu_stub)
|
|
|
|
|
|
int
|
|
__libc_thr_once_stub(once_t *o, void (*r)(void))
|
|
{
|
|
|
|
/* XXX Knowledge of libpthread types. */
|
|
|
|
if (o->pto_done == 0) {
|
|
(*r)();
|
|
o->pto_done = 1;
|
|
}
|
|
|
|
return (0);
|
|
}
|
|
|
|
int
|
|
__libc_thr_sigsetmask_stub(int h, const sigset_t *s, sigset_t *o)
|
|
{
|
|
|
|
CHECK_NOT_THREADED();
|
|
|
|
if (sigprocmask(h, s, o))
|
|
return errno;
|
|
return 0;
|
|
}
|
|
|
|
thr_t
|
|
__libc_thr_self_stub(void)
|
|
{
|
|
|
|
return ((thr_t) -1);
|
|
}
|
|
|
|
/* This is the strong symbol generated for sched_yield(2) via WSYSCALL() */
|
|
int _sys_sched_yield(void);
|
|
|
|
int
|
|
__libc_thr_yield_stub(void)
|
|
{
|
|
return _sys_sched_yield();
|
|
}
|
|
|
|
int
|
|
__libc_thr_create_stub(thr_t *tp, const thrattr_t *ta,
|
|
void *(*f)(void *), void *a)
|
|
{
|
|
/* LINTED deliberate lack of effect */
|
|
(void)tp;
|
|
/* LINTED deliberate lack of effect */
|
|
(void)ta;
|
|
/* LINTED deliberate lack of effect */
|
|
(void)f;
|
|
/* LINTED deliberate lack of effect */
|
|
(void)a;
|
|
|
|
DIE();
|
|
|
|
return (EOPNOTSUPP);
|
|
}
|
|
|
|
__dead void
|
|
__libc_thr_exit_stub(void *v)
|
|
{
|
|
/* LINTED deliberate lack of effect */
|
|
(void)v;
|
|
exit(0);
|
|
}
|
|
|
|
int
|
|
__libc_thr_setcancelstate_stub(int new, int *old)
|
|
{
|
|
/* LINTED deliberate lack of effect */
|
|
(void)new;
|
|
|
|
/* LINTED deliberate lack of effect */
|
|
(void)old;
|
|
|
|
CHECK_NOT_THREADED();
|
|
|
|
return (0);
|
|
}
|
|
|
|
int
|
|
__libc_thr_equal_stub(pthread_t t1, pthread_t t2)
|
|
{
|
|
|
|
/* assert that t1=t2=pthread_self() */
|
|
return (t1 == t2);
|
|
}
|
|
|
|
unsigned int
|
|
__libc_thr_curcpu_stub(void)
|
|
{
|
|
|
|
return (0);
|
|
}
|
|
|
|
#endif /* _REENTRANT */
|