1: /* Copyright (C) 2002, 2003, 2005 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: #include <jmpbuf-unwind.h>
   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:   /* Adjust all pointers used in comparisons, so that top of thread's
   32:      stack is at the top of address space.  Without that, things break
   33:      if stack is allocated above the main stack.  */
   34:   uintptr_t adj = (uintptr_t) self->stackblock + self->stackblock_size;
   35:   uintptr_t targetframe_adj = (uintptr_t) targetframe - adj;
   36: 
   37:   for (cbuf = THREAD_GETMEM (self, cleanup);
   38:        cbuf != NULL && _JMPBUF_UNWINDS_ADJ (target, cbuf, adj);
   39:        cbuf = cbuf->__prev)
   40:     {
   41: #if _STACK_GROWS_DOWN
   42:       if ((uintptr_t) cbuf - adj <= targetframe_adj)
   43:         {
   44:           cbuf = NULL;
   45:           break;
   46:         }
   47: #elif _STACK_GROWS_UP
   48:       if ((uintptr_t) cbuf - adj >= targetframe_adj)
   49:         {
   50:           cbuf = NULL;
   51:           break;
   52:         }
   53: #else
   54: # error "Define either _STACK_GROWS_DOWN or _STACK_GROWS_UP"
   55: #endif
   56: 
   57:       /* Call the cleanup code.  */
   58:       cbuf->__routine (cbuf->__arg);
   59:     }
   60: 
   61:   THREAD_SETMEM (self, cleanup, cbuf);
   62: }
   63: hidden_def (__pthread_cleanup_upto)