nptl/sysdeps/unix/sysv/linux/s390/s390-32/sysdep-cancel.h

   1 /* Copyright (C) 2003, 2004, 2006 Free Software Foundation, Inc.
   2    This file is part of the GNU C Library.
   3    Contributed by Jakub Jelinek <jakub@redhat.com>, 2003.
   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 <sysdep.h>
  21 #include <tls.h>
  22 #ifndef __ASSEMBLER__
  23 # include <nptl/pthreadP.h>
  24 #endif
  25
  26 #if !defined NOT_IN_libc || defined IS_IN_libpthread || defined IS_IN_librt
  27
  28 # undef PSEUDO
  29 # define PSEUDO(name, syscall_name, args)                                     \
  30         .text;                                                                \
  31 L(pseudo_cancel):                                                             \
  32         cfi_startproc;                                                        \
  33         STM_##args                                                            \
  34         stm     %r12,%r15,48(%r15);                                           \
  35         cfi_offset (%r15, -36);                                               \
  36         cfi_offset (%r14, -40);                                               \
  37         cfi_offset (%r13, -44);                                               \
  38         cfi_offset (%r12, -48);                                               \
  39         lr      %r14,%r15;                                                    \
  40         ahi     %r15,-96;                                                     \
  41         cfi_adjust_cfa_offset (96);                                           \
  42         st      %r14,0(%r15);                                                 \
  43         basr    %r13,0;                                                       \
  44 0:      l       %r1,1f-0b(%r13);                                              \
  45         bas     %r14,0(%r1,%r13);                                             \
  46         lr      %r0,%r2;                                                      \
  47         LM_##args                                                             \
  48         .if SYS_ify (syscall_name) < 256;                                     \
  49         svc SYS_ify (syscall_name);                                           \
  50         .else;                                                                \
  51         lhi %r1,SYS_ify (syscall_name);                                       \
  52         svc 0;                                                                \
  53         .endif;                                                               \
  54         LR7_##args                                                            \
  55         l       %r1,2f-0b(%r13);                                              \
  56         lr      %r12,%r2;                                                     \
  57         lr      %r2,%r0;                                                      \
  58         bas     %r14,0(%r1,%r13);                                             \
  59         lr      %r2,%r12;                                                     \
  60         lm      %r12,%r15,48+96(%r15);                                        \
  61         cfi_endproc;                                                          \
  62         j       L(pseudo_check);                                              \
  63 1:      .long   CENABLE-0b;                                                   \
  64 2:      .long   CDISABLE-0b;                                                  \
  65 ENTRY(name)                                                                   \
  66         SINGLE_THREAD_P(%r1)                                                  \
  67         jne     L(pseudo_cancel);                                             \
  68 .type   __##syscall_name##_nocancel,@function;                                \
  69 .globl  __##syscall_name##_nocancel;                                          \
  70 __##syscall_name##_nocancel:                                                  \
  71         DO_CALL(syscall_name, args);                                          \
  72 L(pseudo_check):                                                              \
  73         lhi     %r4,-4095;                                                    \
  74         clr     %r2,%r4;                                                      \
  75         jnl     SYSCALL_ERROR_LABEL;                                          \
  76 .size   __##syscall_name##_nocancel,.-__##syscall_name##_nocancel;            \
  77 L(pseudo_end):
  78
  79 # ifdef IS_IN_libpthread
  80 #  define CENABLE       __pthread_enable_asynccancel
  81 #  define CDISABLE      __pthread_disable_asynccancel
  82 # elif !defined NOT_IN_libc
  83 #  define CENABLE       __libc_enable_asynccancel
  84 #  define CDISABLE      __libc_disable_asynccancel
  85 # elif defined IS_IN_librt
  86 #  define CENABLE       __librt_enable_asynccancel
  87 #  define CDISABLE      __librt_disable_asynccancel
  88 # else
  89 #  error Unsupported library
  90 # endif
  91
  92 #define STM_0           /* Nothing */
  93 #define STM_1           st %r2,8(%r15);
  94 #define STM_2           stm %r2,%r3,8(%r15);
  95 #define STM_3           stm %r2,%r4,8(%r15);
  96 #define STM_4           stm %r2,%r5,8(%r15);
  97 #define STM_5           stm %r2,%r5,8(%r15);
  98 #define STM_6           stm %r2,%r7,8(%r15);
  99
 100 #define LM_0            /* Nothing */
 101 #define LM_1            l %r2,8+96(%r15);
 102 #define LM_2            lm %r2,%r3,8+96(%r15);
 103 #define LM_3            lm %r2,%r4,8+96(%r15);
 104 #define LM_4            lm %r2,%r5,8+96(%r15);
 105 #define LM_5            lm %r2,%r5,8+96(%r15);
 106 #define LM_6            lm %r2,%r5,8+96(%r15); \
 107                         cfi_offset (%r7, -68); \
 108                         l %r7,96+96(%r15);
 109
 110 #define LR7_0           /* Nothing */
 111 #define LR7_1           /* Nothing */
 112 #define LR7_2           /* Nothing */
 113 #define LR7_3           /* Nothing */
 114 #define LR7_4           /* Nothing */
 115 #define LR7_5           /* Nothing */
 116 #define LR7_6           l %r7,28+96(%r15); \
 117                         cfi_restore (%r7);
 118
 119 # ifndef __ASSEMBLER__
 120 #  define SINGLE_THREAD_P \
 121   __builtin_expect (THREAD_GETMEM (THREAD_SELF,                               \
 122                                    header.multiple_threads) == 0, 1)
 123 # else
 124 #  define SINGLE_THREAD_P(reg) \
 125         ear     reg,%a0;                                                      \
 126         icm     reg,15,MULTIPLE_THREADS_OFFSET(reg);
 127 # endif
 128
 129 #elif !defined __ASSEMBLER__
 130
 131 # define SINGLE_THREAD_P (1)
 132 # define NO_CANCELLATION 1
 133
 134 #endif
 135
 136 #ifndef __ASSEMBLER__
 137 # define RTLD_SINGLE_THREAD_P \
 138   __builtin_expect (THREAD_GETMEM (THREAD_SELF, \
 139                                    header.multiple_threads) == 0, 1)
 140 #endif