nptl/sysdeps/unix/sysv/linux/alpha/sysdep-cancel.h

   1 /* Copyright (C) 2003 Free Software Foundation, Inc.
   2    This file is part of the GNU C Library.
   3
   4    The GNU C Library is free software; you can redistribute it and/or
   5    modify it under the terms of the GNU Lesser General Public
   6    License as published by the Free Software Foundation; either
   7    version 2.1 of the License, or (at your option) any later version.
   8
   9    The GNU C Library is distributed in the hope that it will be useful,
  10    but WITHOUT ANY WARRANTY; without even the implied warranty of
  11    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12    Lesser General Public License for more details.
  13
  14    You should have received a copy of the GNU Lesser General Public
  15    License along with the GNU C Library; if not, write to the Free
  16    Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
  17    02111-1307 USA.  */
  18
  19 #include <sysdep.h>
  20 #include <tls.h>
  21 #ifndef __ASSEMBLER__
  22 # include <nptl/pthreadP.h>
  23 #endif
  24
  25 #if !defined NOT_IN_libc || defined IS_IN_libpthread || defined IS_IN_librt
  26
  27 # ifdef PROF
  28 #  define PSEUDO_PROF                           \
  29         .set noat;                              \
  30         lda     AT, _mcount;                    \
  31         jsr     AT, (AT), _mcount;              \
  32         .set at
  33 # else
  34 #  define PSEUDO_PROF
  35 # endif
  36
  37 /* ??? Assumes that nothing comes between PSEUDO and PSEUDO_END
  38    besides "ret".  */
  39
  40 # undef PSEUDO
  41 # define PSEUDO(name, syscall_name, args)                       \
  42         .globl name;                                            \
  43         .align 4;                                               \
  44         .type name, @function;                                  \
  45         .usepv name, std;                                       \
  46         cfi_startproc;                                          \
  47 __LABEL(name)                                                   \
  48         ldgp    gp, 0(pv);                                      \
  49         PSEUDO_PROF;                                            \
  50         PSEUDO_PREPARE_ARGS                                     \
  51         SINGLE_THREAD_P(t0);                                    \
  52         bne     t0, $pseudo_cancel;                             \
  53         lda     v0, SYS_ify(syscall_name);                      \
  54         call_pal PAL_callsys;                                   \
  55         bne     a3, SYSCALL_ERROR_LABEL;                        \
  56 __LABEL($pseudo_ret)                                            \
  57         .subsection 2;                                          \
  58 __LABEL($pseudo_cancel)                                         \
  59         subq    sp, 64, sp;                                     \
  60         cfi_def_cfa_offset(64);                                 \
  61         stq     ra, 0(sp);                                      \
  62         cfi_offset(ra, -64);                                    \
  63         SAVE_ARGS_##args;                                       \
  64         CENABLE;                                                \
  65         LOAD_ARGS_##args;                                       \
  66         /* Save the CENABLE return value in RA.  That register  \
  67            is preserved across syscall and the real return      \
  68            address is saved on the stack.  */                   \
  69         mov     v0, ra;                                         \
  70         lda     v0, SYS_ify(syscall_name);                      \
  71         call_pal PAL_callsys;                                   \
  72         stq     v0, 8(sp);                                      \
  73         mov     ra, a0;                                         \
  74         bne     a3, $multi_error;                               \
  75         CDISABLE;                                               \
  76         ldq     ra, 0(sp);                                      \
  77         ldq     v0, 8(sp);                                      \
  78         addq    sp, 64, sp;                                     \
  79         cfi_remember_state;                                     \
  80         cfi_restore(ra);                                        \
  81         cfi_def_cfa_offset(0);                                  \
  82         ret;                                                    \
  83         cfi_restore_state;                                      \
  84 __LABEL($multi_error)                                           \
  85         CDISABLE;                                               \
  86         ldq     ra, 0(sp);                                      \
  87         ldq     v0, 8(sp);                                      \
  88         addq    sp, 64, sp;                                     \
  89         cfi_restore(ra);                                        \
  90         cfi_def_cfa_offset(0);                                  \
  91 __LABEL($syscall_error)                                         \
  92         SYSCALL_ERROR_HANDLER;                                  \
  93         .previous
  94
  95 # undef PSEUDO_END
  96 # define PSEUDO_END(sym)                                        \
  97         .subsection 2;                                          \
  98         cfi_endproc;                                            \
  99         .size sym, .-sym
 100
 101 # define SAVE_ARGS_0    /* Nothing.  */
 102 # define SAVE_ARGS_1    SAVE_ARGS_0; stq a0, 8(sp)
 103 # define SAVE_ARGS_2    SAVE_ARGS_1; stq a1, 16(sp)
 104 # define SAVE_ARGS_3    SAVE_ARGS_2; stq a2, 24(sp)
 105 # define SAVE_ARGS_4    SAVE_ARGS_3; stq a3, 32(sp)
 106 # define SAVE_ARGS_5    SAVE_ARGS_4; stq a4, 40(sp)
 107 # define SAVE_ARGS_6    SAVE_ARGS_5; stq a5, 48(sp)
 108
 109 # define LOAD_ARGS_0    /* Nothing.  */
 110 # define LOAD_ARGS_1    LOAD_ARGS_0; ldq a0, 8(sp)
 111 # define LOAD_ARGS_2    LOAD_ARGS_1; ldq a1, 16(sp)
 112 # define LOAD_ARGS_3    LOAD_ARGS_2; ldq a2, 24(sp)
 113 # define LOAD_ARGS_4    LOAD_ARGS_3; ldq a3, 32(sp)
 114 # define LOAD_ARGS_5    LOAD_ARGS_4; ldq a4, 40(sp)
 115 # define LOAD_ARGS_6    LOAD_ARGS_5; ldq a5, 48(sp)
 116
 117 # ifdef IS_IN_libpthread
 118 #  define __local_enable_asynccancel    __pthread_enable_asynccancel
 119 #  define __local_disable_asynccancel   __pthread_disable_asynccancel
 120 #  define __local_multiple_threads      __pthread_multiple_threads
 121 # elif !defined NOT_IN_libc
 122 #  define __local_enable_asynccancel    __libc_enable_asynccancel
 123 #  define __local_disable_asynccancel   __libc_disable_asynccancel
 124 #  define __local_multiple_threads      __libc_multiple_threads
 125 # elif defined IS_IN_librt
 126 #  define __local_enable_asynccancel    __librt_enable_asynccancel
 127 #  define __local_disable_asynccancel   __librt_disable_asynccancel
 128 # else
 129 #  error Unsupported library
 130 # endif
 131
 132 # ifdef PIC
 133 #  define CENABLE       bsr ra, __local_enable_asynccancel !samegp
 134 #  define CDISABLE      bsr ra, __local_disable_asynccancel !samegp
 135 # else
 136 #  define CENABLE       jsr ra, __local_enable_asynccancel; ldgp ra, 0(gp)
 137 #  define CDISABLE      jsr ra, __local_disable_asynccancel; ldgp ra, 0(gp)
 138 # endif
 139
 140 # if defined IS_IN_libpthread || !defined NOT_IN_libc
 141 #  ifndef __ASSEMBLER__
 142 extern int __local_multiple_threads attribute_hidden;
 143 #   define SINGLE_THREAD_P \
 144         __builtin_expect (__local_multiple_threads == 0, 1)
 145 #  elif defined(PIC)
 146 #   define SINGLE_THREAD_P(reg)  ldl reg, __local_multiple_threads(gp) !gprel
 147 #  else
 148 #   define SINGLE_THREAD_P(reg)                                 \
 149         ldah    reg, __local_multiple_threads(gp) !gprelhigh;   \
 150         ldl     reg, __local_multiple_threads(reg) !gprellow
 151 #  endif
 152 # else
 153 #  ifndef __ASSEMBLER__
 154 #   define SINGLE_THREAD_P \
 155         __builtin_expect (THREAD_GETMEM (THREAD_SELF, \
 156                                    header.multiple_threads) == 0, 1)
 157 #  else
 158 #   define SINGLE_THREAD_P(reg)                                 \
 159         call_pal PAL_rduniq;                                    \
 160         ldl reg, MULTIPLE_THREADS_OFFSET($0)
 161 #  endif
 162 # endif
 163
 164 #else
 165
 166 # define SINGLE_THREAD_P (1)
 167 # define NO_CANCELLATION 1
 168
 169 #endif