System call cancellation handling for S390-32.
[kopensolaris-gnu/glibc.git] / linuxthreads / sysdeps / unix / sysv / linux / s390 / s390-32 / sysdep-cancel.h
1 /* Copyright (C) 2003 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 <linuxthreads/internals.h>
24 #endif
25
26 #if !defined NOT_IN_libc || defined IS_IN_libpthread
27
28 # undef PSEUDO
29 # define PSEUDO(name, syscall_name, args)                                     \
30         .text;                                                                \
31 ENTRY(name)                                                                   \
32         SINGLE_THREAD_P(%r1)                                                  \
33         jne     L(pseudo_cancel);                                             \
34         DO_CALL(syscall_name, args);                                          \
35         lhi     %r4,-4095;                                                    \
36         clr     %r2,%r4;                                                      \
37         jnl     SYSCALL_ERROR_LABEL;                                          \
38         br      %r14;                                                         \
39 L(pseudo_cancel):                                                             \
40         STM_##args                                                            \
41         stm     %r13,%r15,52(%r15);                                           \
42         ahi     %r15,-96;                                                     \
43         basr    %r13,0;                                                       \
44 200301: l       %r1,200302f-200301b(%r13);                                    \
45         bas     %r14,0(%r13,%r1);                                             \
46         lr      %r0,%r2;                                                      \
47         LM_##args                                                             \
48         DO_CALL(syscall_name, args);                                          \
49         l       %r3,200303f-200301b(%r13);                                    \
50         lr      %r4,%r13;                                                     \
51         lr      %r13,%r2;                                                     \
52         lr      %r2,%r0;                                                      \
53         bas     %r14,0(%r4,%r3);                                              \
54         lr      %r2,%r13;                                                     \
55         lm      %r13,%r15,52+96(%r15);                                        \
56         lhi     %r4,-4095;                                                    \
57         clr     %r2,%r4;                                                      \
58         jnl     SYSCALL_ERROR_LABEL;                                          \
59 L(pseudo_end):
60
61 #undef PSEUDO_END
62 #define PSEUDO_END(name)                                                      \
63   SYSCALL_ERROR_HANDLER;                                                      \
64 200302: .long   CENABLE-200301b;                                              \
65 200303: .long   CDISABLE-200301b;                                             \
66     END (name)
67
68 # ifdef IS_IN_libpthread
69 #  define CENABLE       __pthread_enable_asynccancel
70 #  define CDISABLE      __pthread_disable_asynccancel
71 # else
72 #  define CENABLE       __libc_enable_asynccancel
73 #  define CDISABLE      __libc_disable_asynccancel
74 # endif
75
76 #define STM_0           /* Nothing */
77 #define STM_1           st %r2,8(%r15);
78 #define STM_2           stm %r2,%r3,8(%r15);
79 #define STM_3           stm %r2,%r4,8(%r15);
80 #define STM_4           stm %r2,%r5,8(%r15);
81 #define STM_5           stm %r2,%r5,8(%r15);
82
83 #define LM_0            /* Nothing */
84 #define LM_1            l %r2,8+96(%r15);
85 #define LM_2            lm %r2,%r3,8+96(%r15);
86 #define LM_3            lm %r2,%r4,8+96(%r15);
87 #define LM_4            lm %r2,%r5,8+96(%r15);
88 #define LM_5            lm %r2,%r5,8+96(%r15);
89
90 # ifndef __ASSEMBLER__
91 #  define SINGLE_THREAD_P \
92   __builtin_expect (THREAD_GETMEM (THREAD_SELF,                               \
93                                    p_header.data.multiple_threads) == 0, 1)
94 # else
95 #  define SINGLE_THREAD_P(reg) \
96         ear     reg,%a0;                                                      \
97         l       reg,MULTIPLE_THREADS_OFFSET(reg);                             \
98         ltr     reg,reg;
99 # endif
100
101 #elif !defined __ASSEMBLER__
102
103 /* This code should never be used but we define it anyhow.  */
104 # define SINGLE_THREAD_P (1)
105
106 #endif