mirror of
https://github.com/autc04/Retro68.git
synced 2024-12-11 19:49:32 +00:00
74 lines
2.4 KiB
C
74 lines
2.4 KiB
C
|
/* Linuxthreads - a simple clone()-based implementation of Posix */
|
||
|
|
/* threads for Linux. */
|
||
|
|
/* Copyright (C) 1998 Xavier Leroy (Xavier.Leroy@inria.fr) */
|
||
|
|
/* */
|
||
|
|
/* This program is free software; you can redistribute it and/or */
|
||
|
|
/* modify it under the terms of the GNU Library General Public License */
|
||
|
|
/* as published by the Free Software Foundation; either version 2 */
|
||
|
|
/* of the License, or (at your option) any later version. */
|
||
|
|
/* */
|
||
|
|
/* This program 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 Library General Public License for more details. */
|
||
|
|
|
||
|
|
/* Redefine siglongjmp and longjmp so that they interact correctly
|
||
|
|
with cleanup handlers */
|
||
|
|
|
||
|
|
#include <setjmp.h>
|
||
|
|
#include "pthread.h"
|
||
|
|
#include "internals.h"
|
||
|
|
|
||
|
|
/* These functions are not declared anywhere since they shouldn't be
|
||
|
|
used at another place but here. */
|
||
|
|
extern void __libc_siglongjmp (sigjmp_buf env, int val)
|
||
|
|
__attribute__ ((noreturn));
|
||
|
|
extern void __libc_longjmp (jmp_buf env, int val)
|
||
|
|
__attribute__ ((noreturn));
|
||
|
|
|
||
|
|
|
||
|
|
static void pthread_cleanup_upto(jmp_buf target)
|
||
|
|
{
|
||
|
|
pthread_descr self = thread_self();
|
||
|
|
struct _pthread_cleanup_buffer * c;
|
||
|
|
char *currentframe = CURRENT_STACK_FRAME;
|
||
|
|
|
||
|
|
for (c = THREAD_GETMEM(self, p_cleanup);
|
||
|
|
c != NULL && _JMPBUF_UNWINDS(target, c);
|
||
|
|
c = c->__prev)
|
||
|
|
{
|
||
|
|
#if _STACK_GROWS_DOWN
|
||
|
|
if ((char *) c <= currentframe)
|
||
|
|
{
|
||
|
|
c = NULL;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
#elif _STACK_GROWS_UP
|
||
|
|
if ((char *) c >= currentframe)
|
||
|
|
{
|
||
|
|
c = NULL;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
#else
|
||
|
|
# error "Define either _STACK_GROWS_DOWN or _STACK_GROWS_UP"
|
||
|
|
#endif
|
||
|
|
c->__routine(c->__arg);
|
||
|
|
}
|
||
|
|
THREAD_SETMEM(self, p_cleanup, c);
|
||
|
|
if (THREAD_GETMEM(self, p_in_sighandler)
|
||
|
|
&& _JMPBUF_UNWINDS(target, THREAD_GETMEM(self, p_in_sighandler)))
|
||
|
|
THREAD_SETMEM(self, p_in_sighandler, NULL);
|
||
|
|
}
|
||
|
|
|
||
|
|
void siglongjmp(sigjmp_buf env, int val)
|
||
|
|
{
|
||
|
|
pthread_cleanup_upto(env.__buf);
|
||
|
|
__libc_siglongjmp(env, val);
|
||
|
|
}
|
||
|
|
|
||
|
|
void longjmp(jmp_buf env, int val)
|
||
|
|
{
|
||
|
|
pthread_cleanup_upto(env);
|
||
|
|
__libc_longjmp(env, val);
|
||
|
|
}
|