2.9
[glibc/nacl-glibc.git] / sysdeps / s390 / s390-64 / elf / setjmp.S
blob28b6a5a35b73dd4ae6c962fcc4e23e7bd10af376
1 /* setjmp for 64 bit S/390, ELF version.
2    Copyright (C) 2001, 2002, 2005 Free Software Foundation, Inc.
3    Contributed by Martin Schwidefsky (schwidefsky@de.ibm.com).
4    This file is part of the GNU C Library.
6    The GNU C Library is free software; you can redistribute it and/or
7    modify it under the terms of the GNU Lesser General Public
8    License as published by the Free Software Foundation; either
9    version 2.1 of the License, or (at your option) any later version.
11    The GNU C Library is distributed in the hope that it will be useful,
12    but WITHOUT ANY WARRANTY; without even the implied warranty of
13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14    Lesser General Public License for more details.
16    You should have received a copy of the GNU Lesser General Public
17    License along with the GNU C Library; if not, write to the Free
18    Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
19    02111-1307 USA.  */
21 #include <sysdep.h>
22 #define _ASM
23 #define _SETJMP_H
24 #include <bits/setjmp.h>
26         /* We include the BSD entry points here as well but we make
27            them weak.  */
28 ENTRY (setjmp)
29         .weak C_SYMBOL_NAME (setjmp)
30         lghi   %r3,1                /* Second argument of one.  */
31         j      .Linternal_sigsetjmp /* Branch relativ to __sigsetjmp.  */
32 END (setjmp)
34         /* Binary compatibility entry point.  */
35 ENTRY(_setjmp)
36         .weak  C_SYMBOL_NAME (_setjmp)
37         slgr   %r3,%r3              /* Second argument of zero.  */
38         j      .Linternal_sigsetjmp /* Branch relativ to __sigsetjmp.  */
39 END (setjmp)
40 libc_hidden_def (_setjmp)
42 ENTRY(__setjmp)
43         slgr   %r3,%r3              /* Second argument of zero.  */
44         j      .Linternal_sigsetjmp /* Branch relativ to __sigsetjmp.  */
45 END (setjmp)
47 ENTRY(__sigsetjmp)
48 .Linternal_sigsetjmp:
49 #ifdef PTR_MANGLE
50         stmg   %r6,%r13,0(%r2)      /* Store registers in jmp_buf.  */
51         lgr    %r4,%r14
52         lgr    %r5,%r15
53         PTR_MANGLE (%r4, %r1)
54         PTR_MANGLE2 (%r5, %r1)
55         stmg   %r4,%r5,64(%r2)
56 #else
57         stmg   %r6,%r15,0(%r2)      /* Store registers in jmp_buf.  */
58 #endif
59         std    %f1,80(%r2)
60         std    %f3,88(%r2)
61         std    %f5,96(%r2)
62         std    %f7,104(%r2)
63 #if defined NOT_IN_libc && defined IS_IN_rtld
64         /* In ld.so we never save the signal mask.  */
65         lghi   %r2,0
66         br     %r14
67 #elif defined PIC
68         jg     __sigjmp_save@PLT    /* Branch to PLT of __sigsetjmp.  */
69 #else
70         jg     __sigjmp_save
71 #endif
72 END (__sigsetjmp)