Initial revision
[kopensolaris-gnu/glibc.git] / nptl / pt-longjmp.c
1 /* Copyright (C) 2002 Free Software Foundation, Inc.
2    This file is part of the GNU C Library.
3    Contributed by Ulrich Drepper <drepper@redhat.com>, 2002.
4
5    The GNU C Library is free software; you can redistribute it and/or
6    modify it under the terms of the GNU Lesser General Public
7    License as published by the Free Software Foundation; either
8    version 2.1 of the License, or (at your option) any later version.
9
10    The GNU C Library is distributed in the hope that it will be useful,
11    but WITHOUT ANY WARRANTY; without even the implied warranty of
12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13    Lesser General Public License for more details.
14
15    You should have received a copy of the GNU Lesser General Public
16    License along with the GNU C Library; if not, write to the Free
17    Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
18    02111-1307 USA.  */
19
20 #include <setjmp.h>
21 #include <stdlib.h>
22 #include "pthreadP.h"
23
24
25 void
26 __pthread_cleanup_upto (__jmp_buf target, char *targetframe)
27 {
28   struct pthread *self = THREAD_SELF;
29   struct _pthread_cleanup_buffer *cbuf;
30
31   for (cbuf = THREAD_GETMEM (self, cleanup);
32        cbuf != NULL && _JMPBUF_UNWINDS (target, cbuf);
33        cbuf = cbuf->__prev)
34     {
35 #if _STACK_GROWS_DOWN
36       if ((char *) cbuf <= targetframe)
37         {
38           cbuf = NULL;
39           break;
40         }
41 #elif _STACK_GROWS_UP
42       if ((char *) cbuf >= targetframe)
43         {
44           cbuf = NULL;
45           break;
46         }
47 #else
48 # error "Define either _STACK_GROWS_DOWN or _STACK_GROWS_UP"
49 #endif
50
51       /* Call the cleanup code.  */
52       cbuf->__routine (cbuf->__arg);
53     }
54
55   THREAD_SETMEM (self, cleanup, cbuf);
56 }
57
58
59
60 void
61 longjmp (jmp_buf env, int val)
62 {
63   __libc_longjmp (env, val);
64 }
65 weak_alias (longjmp, siglongjmp)