Cancellation support for Linux/S390-64.
authordrepper <drepper>
Wed, 5 Feb 2003 09:31:51 +0000 (09:31 +0000)
committerdrepper <drepper>
Wed, 5 Feb 2003 09:31:51 +0000 (09:31 +0000)
nptl/sysdeps/unix/sysv/linux/s390/s390-64/sysdep-cancel.h [new file with mode: 0644]

diff --git a/nptl/sysdeps/unix/sysv/linux/s390/s390-64/sysdep-cancel.h b/nptl/sysdeps/unix/sysv/linux/s390/s390-64/sysdep-cancel.h
new file mode 100644 (file)
index 0000000..5b99967
--- /dev/null
@@ -0,0 +1,98 @@
+/* Copyright (C) 2003 Free Software Foundation, Inc.
+   This file is part of the GNU C Library.
+   Contributed by Jakub Jelinek <jakub@redhat.com>, 2003.
+
+   The GNU C Library is free software; you can redistribute it and/or
+   modify it under the terms of the GNU Lesser General Public
+   License as published by the Free Software Foundation; either
+   version 2.1 of the License, or (at your option) any later version.
+
+   The GNU C Library is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+   Lesser General Public License for more details.
+
+   You should have received a copy of the GNU Lesser General Public
+   License along with the GNU C Library; if not, write to the Free
+   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
+   02111-1307 USA.  */
+
+#include <sysdep.h>
+#include <tls.h>
+#ifndef __ASSEMBLER__
+# include <nptl/pthreadP.h>
+#endif
+
+#if !defined NOT_IN_libc || defined IS_IN_libpthread
+
+# undef PSEUDO
+# define PSEUDO(name, syscall_name, args)                                    \
+       .text;                                                                \
+L(pseudo_cancel):                                                            \
+       STM_##args                                                            \
+       stmg    %r13,%r15,104(%r15);                                          \
+       lgr     %r14,%r15;                                                    \
+       aghi    %r15,-160;                                                    \
+       stg     %r14,0(%r15);                                                 \
+       brasl   %r14,CENABLE;                                                 \
+       lgr     %r0,%r2;                                                      \
+       LM_##args                                                             \
+       DO_CALL(syscall_name, args);                                          \
+       lgr     %r13,%r2;                                                     \
+       lgr     %r2,%r0;                                                      \
+       brasl   %r14,CDISABLE;                                                \
+       lgr     %r2,%r13;                                                     \
+       lmg     %r13,%r15,104+160(%r15);                                      \
+       j       L(pseudo_check);                                              \
+ENTRY(name)                                                                  \
+       SINGLE_THREAD_P                                                       \
+       jne     L(pseudo_cancel);                                             \
+       DO_CALL(syscall_name, args);                                          \
+L(pseudo_check):                                                             \
+       lghi    %r4,-4095;                                                    \
+       clgr    %r2,%r4;                                                      \
+       jgnl    SYSCALL_ERROR_LABEL;                                          \
+L(pseudo_end):
+
+# ifdef IS_IN_libpthread
+#  define CENABLE      __pthread_enable_asynccancel
+#  define CDISABLE     __pthread_disable_asynccancel
+#  define __local_multiple_threads     __pthread_multiple_threads
+# else
+#  define CENABLE      __libc_enable_asynccancel
+#  define CDISABLE     __libc_disable_asynccancel
+#  define __local_multiple_threads     __libc_multiple_threads
+# endif
+
+#define STM_0          /* Nothing */
+#define STM_1          stg %r2,16(%r15);
+#define STM_2          stmg %r2,%r3,16(%r15);
+#define STM_3          stmg %r2,%r4,16(%r15);
+#define STM_4          stmg %r2,%r5,16(%r15);
+#define STM_5          stmg %r2,%r5,16(%r15);
+
+#define LM_0           /* Nothing */
+#define LM_1           lg %r2,16+160(%r15);
+#define LM_2           lmg %r2,%r3,16+160(%r15);
+#define LM_3           lmg %r2,%r4,16+160(%r15);
+#define LM_4           lmg %r2,%r5,16+160(%r15);
+#define LM_5           lmg %r2,%r5,16+160(%r15);
+
+# ifndef __ASSEMBLER__
+#  define SINGLE_THREAD_P \
+  __builtin_expect (THREAD_GETMEM (THREAD_SELF,                                      \
+                                  header.data.multiple_threads) == 0, 1)
+# else
+#  define SINGLE_THREAD_P \
+       ear     %r1,%a0;                                                      \
+       sllg    %r1,%r1,32;                                                   \
+       ear     %r1,%a1;                                                      \
+       icm     %r1,15,MULTIPLE_THREADS_OFFSET(%r1);
+# endif
+
+#elif !defined __ASSEMBLER__
+
+/* This code should never be used but we define it anyhow.  */
+# define SINGLE_THREAD_P (1)
+
+#endif