]> git.ipfire.org Git - thirdparty/glibc.git/blame - sysdeps/unix/sysv/linux/s390/s390-64/sysdep.S
Remove "Contributed by" lines
[thirdparty/glibc.git] / sysdeps / unix / sysv / linux / s390 / s390-64 / sysdep.S
CommitLineData
2b778ceb 1/* Copyright (C) 2001-2021 Free Software Foundation, Inc.
847b055c
AJ
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
41bdb6e2
AJ
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.
847b055c
AJ
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
41bdb6e2 12 Lesser General Public License for more details.
847b055c 13
41bdb6e2 14 You should have received a copy of the GNU Lesser General Public
59ba27a6 15 License along with the GNU C Library; if not, see
5a82c748 16 <https://www.gnu.org/licenses/>. */
847b055c
AJ
17
18#include <sysdep.h>
f8ea3acb 19#include <tls.h>
847b055c 20
847b055c
AJ
21
22/* The following code is only used in the shared library when we
23 compile the reentrant version. Otherwise each system call defines
24 each own version. */
25
26/* The syscall stubs jump here when they detect an error. */
27
28#undef CALL_MCOUNT
29#define CALL_MCOUNT
30
e6ebd2e4 31.text
847b055c
AJ
32ENTRY(__syscall_error)
33#ifndef PIC
4f41c682 34# if IS_IN (libc)
d063d164
UD
35# define SYSCALL_ERROR_ERRNO __libc_errno
36# else
37# define SYSCALL_ERROR_ERRNO errno
38# endif
e6ebd2e4
UD
39 basr %r1,0
400: lg %r1,1f-0b(%r1)
41 ear %r3,%a0
42 sllg %r3,%r3,32
43 ear %r3,%a1
44 lcr %r2,%r2
45 st %r2,0(%r1,%r3)
46 lghi %r2,-1
47 br %r14
481: .quad SYSCALL_ERROR_ERRNO@ntpoff
847b055c 49#else
e6ebd2e4 50# if RTLD_PRIVATE_ERRNO
96c82b3f 51 larl %r1,rtld_errno
e6ebd2e4
UD
52 lcr %r2,%r2
53 st %r2,0(%r1)
54 lghi %r2,-1
55 br %r14
d063d164 56# else
4f41c682 57# if IS_IN (libc)
e6ebd2e4
UD
58# define SYSCALL_ERROR_ERRNO __libc_errno
59# else
60# define SYSCALL_ERROR_ERRNO errno
61# endif
62 larl %r1,_GLOBAL_OFFSET_TABLE_
63 lg %r1,SYSCALL_ERROR_ERRNO@gotntpoff(%r1)
64 ear %r3,%a0
65 sllg %r3,%r3,32
66 ear %r3,%a1
67 lcr %r2,%r2
68 st %r2,0(%r1,%r3)
69 lghi %r2,-1
70 br %r14
e6ebd2e4 71# endif
847b055c
AJ
72#endif
73
74END (__syscall_error)