]> git.ipfire.org Git - thirdparty/glibc.git/blame - sysdeps/unix/sysv/linux/ia64/sysdep.h
Update copyright dates with scripts/update-copyrights
[thirdparty/glibc.git] / sysdeps / unix / sysv / linux / ia64 / sysdep.h
CommitLineData
581c785b 1/* Copyright (C) 1999-2022 Free Software Foundation, Inc.
d5efd131 2 This file is part of the GNU C Library.
d5efd131
MF
3
4 The GNU C Library is free software; you can redistribute it and/or
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.
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
12 Lesser General Public License for more details.
13
14 You should have received a copy of the GNU Lesser General Public
75efb018 15 License along with the GNU C Library; if not, see
5a82c748 16 <https://www.gnu.org/licenses/>. */
d5efd131
MF
17
18#ifndef _LINUX_IA64_SYSDEP_H
19#define _LINUX_IA64_SYSDEP_H 1
20
21#include <sysdeps/unix/sysdep.h>
fb1cf108 22#include <sysdeps/unix/sysv/linux/sysdep.h>
d5efd131
MF
23#include <sysdeps/ia64/sysdep.h>
24#include <dl-sysdep.h>
25#include <tls.h>
a1bd5f86 26#include <asm/break.h>
d5efd131 27
f5cf58f7
MF
28/* In order to get __set_errno() definition in INLINE_SYSCALL. */
29#ifndef __ASSEMBLER__
30#include <errno.h>
31#endif
32
d5efd131
MF
33/* As of GAS v2.4.90.0.7, including a ".align" directive inside a
34 function will cause bad unwind info to be emitted (GAS doesn't know
35 how to account for the padding introduced by the .align directive).
36 Turning on this macro will work around this bug by introducing the
37 necessary padding explicitly. */
38#define GAS_ALIGN_BREAKS_UNWIND_INFO
39
40/* For Linux we can use the system call table in the header file
41 /usr/include/asm/unistd.h
42 of the kernel. But these symbols do not follow the SYS_* syntax
43 so we have to redefine the `SYS_ify' macro here. */
44#undef SYS_ify
16aca1f7 45#define SYS_ify(syscall_name) __NR_##syscall_name
d5efd131 46
d5efd131 47#if defined USE_DL_SYSINFO \
4f41c682 48 && (IS_IN (libc) \
ce9f10f7 49 || IS_IN (libpthread) || IS_IN (librt))
d5efd131
MF
50# define IA64_USE_NEW_STUB
51#else
52# undef IA64_USE_NEW_STUB
53#endif
54
55#ifdef __ASSEMBLER__
56
57#undef CALL_MCOUNT
58#ifdef PROF
59# define CALL_MCOUNT \
60 .data; \
611: data8 0; /* XXX fixme: use .xdata8 once labels work */ \
62 .previous; \
63 .prologue; \
64 .save ar.pfs, r40; \
65 alloc out0 = ar.pfs, 8, 0, 4, 0; \
66 mov out1 = gp; \
67 .save rp, out2; \
68 mov out2 = rp; \
69 .body; \
70 ;; \
71 addl out3 = @ltoff(1b), gp; \
72 br.call.sptk.many rp = _mcount \
73 ;;
74#else
75# define CALL_MCOUNT /* Do nothing. */
76#endif
77
78/* Linux uses a negative return value to indicate syscall errors, unlike
79 most Unices, which use the condition codes' carry flag.
80
81 Since version 2.1 the return value of a system call might be negative
82 even if the call succeeded. E.g., the `lseek' system call might return
83 a large offset. Therefore we must not anymore test for < 0, but test
84 for a real error by making sure the value in %d0 is a real error
85 number. Linus said he will make sure the no syscall returns a value
86 in -1 .. -4095 as a valid result so we can savely test with -4095. */
87
88/* We don't want the label for the error handler to be visible in the symbol
89 table when we define it here. */
fcb78a55 90#undef SYSCALL_ERROR_LABEL
d5efd131
MF
91#define SYSCALL_ERROR_LABEL __syscall_error
92
93#undef PSEUDO
94#define PSEUDO(name, syscall_name, args) \
95 ENTRY(name) \
96 DO_CALL (SYS_ify(syscall_name)); \
97 cmp.eq p6,p0=-1,r10; \
98(p6) br.cond.spnt.few __syscall_error;
99
100#define DO_CALL_VIA_BREAK(num) \
101 mov r15=num; \
a1bd5f86 102 break __IA64_BREAK_SYSCALL
d5efd131
MF
103
104#ifdef IA64_USE_NEW_STUB
105# ifdef SHARED
106# define DO_CALL(num) \
107 .prologue; \
108 adds r2 = SYSINFO_OFFSET, r13;; \
109 ld8 r2 = [r2]; \
110 .save ar.pfs, r11; \
111 mov r11 = ar.pfs;; \
112 .body; \
113 mov r15 = num; \
114 mov b7 = r2; \
115 br.call.sptk.many b6 = b7;; \
116 .restore sp; \
117 mov ar.pfs = r11; \
118 .prologue; \
119 .body
120# else /* !SHARED */
121# define DO_CALL(num) \
122 .prologue; \
123 mov r15 = num; \
124 movl r2 = _dl_sysinfo;; \
125 ld8 r2 = [r2]; \
126 .save ar.pfs, r11; \
127 mov r11 = ar.pfs;; \
128 .body; \
129 mov b7 = r2; \
130 br.call.sptk.many b6 = b7;; \
131 .restore sp; \
132 mov ar.pfs = r11; \
133 .prologue; \
134 .body
135# endif
136#else
137# define DO_CALL(num) DO_CALL_VIA_BREAK(num)
138#endif
139
140#undef PSEUDO_END
141#define PSEUDO_END(name) .endp C_SYMBOL_NAME(name);
142
143#undef PSEUDO_NOERRNO
144#define PSEUDO_NOERRNO(name, syscall_name, args) \
145 ENTRY(name) \
146 DO_CALL (SYS_ify(syscall_name));
147
148#undef PSEUDO_END_NOERRNO
149#define PSEUDO_END_NOERRNO(name) .endp C_SYMBOL_NAME(name);
150
151#undef PSEUDO_ERRVAL
152#define PSEUDO_ERRVAL(name, syscall_name, args) \
153 ENTRY(name) \
154 DO_CALL (SYS_ify(syscall_name)); \
155 cmp.eq p6,p0=-1,r10; \
156(p6) mov r10=r8;
157
158
159#undef PSEUDO_END_ERRVAL
160#define PSEUDO_END_ERRVAL(name) .endp C_SYMBOL_NAME(name);
161
162#undef END
163#define END(name) \
164 .size C_SYMBOL_NAME(name), . - C_SYMBOL_NAME(name) ; \
165 .endp C_SYMBOL_NAME(name)
166
167#define ret br.ret.sptk.few b0
168#define ret_NOERRNO ret
169#define ret_ERRVAL ret
170
171#else /* not __ASSEMBLER__ */
172
72048093
AZ
173#undef HAVE_INTERNAL_BRK_ADDR_SYMBOL
174#define HAVE_INTERNAL_BRK_ADDR_SYMBOL 1
175
d5efd131
MF
176#define BREAK_INSN_1(num) "break " #num ";;\n\t"
177#define BREAK_INSN(num) BREAK_INSN_1(num)
178
179/* On IA-64 we have stacked registers for passing arguments. The
180 "out" registers end up being the called function's "in"
181 registers.
182
183 Also, since we have plenty of registers we have two return values
184 from a syscall. r10 is set to -1 on error, whilst r8 contains the
185 (non-negative) errno on error or the return value on success.
186 */
187
188#ifdef IA64_USE_NEW_STUB
189
bc2eb932 190# define INTERNAL_SYSCALL_NCS(name, nr, args...) \
157252e9 191({ \
d5efd131
MF
192 LOAD_ARGS_##nr (args) \
193 register long _r8 __asm ("r8"); \
194 register long _r10 __asm ("r10"); \
195 register long _r15 __asm ("r15") = name; \
196 register void *_b7 __asm ("b7") = ((tcbhead_t *)__thread_self)->__private;\
d5efd131
MF
197 LOAD_REGS_##nr \
198 /* \
199 * Don't specify any unwind info here. We mark ar.pfs as \
200 * clobbered. This will force the compiler to save ar.pfs \
201 * somewhere and emit appropriate unwind info for that save. \
202 */ \
203 __asm __volatile ("br.call.sptk.many b6=%0;;\n" \
204 : "=b"(_b7), "=r" (_r8), "=r" (_r10), "=r" (_r15) \
205 ASM_OUTARGS_##nr \
206 : "0" (_b7), "3" (_r15) ASM_ARGS_##nr \
207 : "memory", "ar.pfs" ASM_CLOBBERS_##nr); \
157252e9
AZ
208 _r10 == -1 ? -_r8 : _r8; \
209})
d5efd131
MF
210
211#else /* !IA64_USE_NEW_STUB */
212
bc2eb932 213# define INTERNAL_SYSCALL_NCS(name, nr, args...) \
157252e9 214({ \
d5efd131
MF
215 LOAD_ARGS_##nr (args) \
216 register long _r8 asm ("r8"); \
217 register long _r10 asm ("r10"); \
218 register long _r15 asm ("r15") = name; \
d5efd131 219 LOAD_REGS_##nr \
a1bd5f86 220 __asm __volatile (BREAK_INSN (__IA64_BREAK_SYSCALL) \
d5efd131
MF
221 : "=r" (_r8), "=r" (_r10), "=r" (_r15) \
222 ASM_OUTARGS_##nr \
223 : "2" (_r15) ASM_ARGS_##nr \
224 : "memory" ASM_CLOBBERS_##nr); \
157252e9
AZ
225 _r10 == -1 ? -_r8 : _r8; \
226})
d5efd131
MF
227
228#endif /* !IA64_USE_NEW_STUB */
229
bc2eb932
AZ
230#define INTERNAL_SYSCALL(name, nr, args...) \
231 INTERNAL_SYSCALL_NCS (__NR_##name, nr, ##args)
d5efd131 232
d5efd131
MF
233#define LOAD_ARGS_0()
234#define LOAD_REGS_0
235#define LOAD_ARGS_1(a1) \
236 long _arg1 = (long) (a1); \
237 LOAD_ARGS_0 ()
238#define LOAD_REGS_1 \
239 register long _out0 asm ("out0") = _arg1; \
240 LOAD_REGS_0
241#define LOAD_ARGS_2(a1, a2) \
242 long _arg2 = (long) (a2); \
243 LOAD_ARGS_1 (a1)
244#define LOAD_REGS_2 \
245 register long _out1 asm ("out1") = _arg2; \
246 LOAD_REGS_1
247#define LOAD_ARGS_3(a1, a2, a3) \
248 long _arg3 = (long) (a3); \
249 LOAD_ARGS_2 (a1, a2)
250#define LOAD_REGS_3 \
251 register long _out2 asm ("out2") = _arg3; \
252 LOAD_REGS_2
253#define LOAD_ARGS_4(a1, a2, a3, a4) \
254 long _arg4 = (long) (a4); \
255 LOAD_ARGS_3 (a1, a2, a3)
256#define LOAD_REGS_4 \
257 register long _out3 asm ("out3") = _arg4; \
258 LOAD_REGS_3
259#define LOAD_ARGS_5(a1, a2, a3, a4, a5) \
260 long _arg5 = (long) (a5); \
261 LOAD_ARGS_4 (a1, a2, a3, a4)
262#define LOAD_REGS_5 \
263 register long _out4 asm ("out4") = _arg5; \
264 LOAD_REGS_4
265#define LOAD_ARGS_6(a1, a2, a3, a4, a5, a6) \
266 long _arg6 = (long) (a6); \
267 LOAD_ARGS_5 (a1, a2, a3, a4, a5)
268#define LOAD_REGS_6 \
269 register long _out5 asm ("out5") = _arg6; \
270 LOAD_REGS_5
271
272#define ASM_OUTARGS_0
273#define ASM_OUTARGS_1 ASM_OUTARGS_0, "=r" (_out0)
274#define ASM_OUTARGS_2 ASM_OUTARGS_1, "=r" (_out1)
275#define ASM_OUTARGS_3 ASM_OUTARGS_2, "=r" (_out2)
276#define ASM_OUTARGS_4 ASM_OUTARGS_3, "=r" (_out3)
277#define ASM_OUTARGS_5 ASM_OUTARGS_4, "=r" (_out4)
278#define ASM_OUTARGS_6 ASM_OUTARGS_5, "=r" (_out5)
279
280#ifdef IA64_USE_NEW_STUB
281#define ASM_ARGS_0
282#define ASM_ARGS_1 ASM_ARGS_0, "4" (_out0)
283#define ASM_ARGS_2 ASM_ARGS_1, "5" (_out1)
284#define ASM_ARGS_3 ASM_ARGS_2, "6" (_out2)
285#define ASM_ARGS_4 ASM_ARGS_3, "7" (_out3)
286#define ASM_ARGS_5 ASM_ARGS_4, "8" (_out4)
287#define ASM_ARGS_6 ASM_ARGS_5, "9" (_out5)
288#else
289#define ASM_ARGS_0
290#define ASM_ARGS_1 ASM_ARGS_0, "3" (_out0)
291#define ASM_ARGS_2 ASM_ARGS_1, "4" (_out1)
292#define ASM_ARGS_3 ASM_ARGS_2, "5" (_out2)
293#define ASM_ARGS_4 ASM_ARGS_3, "6" (_out3)
294#define ASM_ARGS_5 ASM_ARGS_4, "7" (_out4)
295#define ASM_ARGS_6 ASM_ARGS_5, "8" (_out5)
296#endif
297
298#define ASM_CLOBBERS_0 ASM_CLOBBERS_1, "out0"
299#define ASM_CLOBBERS_1 ASM_CLOBBERS_2, "out1"
300#define ASM_CLOBBERS_2 ASM_CLOBBERS_3, "out2"
301#define ASM_CLOBBERS_3 ASM_CLOBBERS_4, "out3"
302#define ASM_CLOBBERS_4 ASM_CLOBBERS_5, "out4"
303#define ASM_CLOBBERS_5 ASM_CLOBBERS_6, "out5"
304#define ASM_CLOBBERS_6_COMMON , "out6", "out7", \
305 /* Non-stacked integer registers, minus r8, r10, r15. */ \
551e81d9 306 "r2", "r3", "r9", "r11", "r13", "r14", "r16", "r17", "r18", \
d5efd131
MF
307 "r19", "r20", "r21", "r22", "r23", "r24", "r25", "r26", "r27", \
308 "r28", "r29", "r30", "r31", \
309 /* Predicate registers. */ \
310 "p6", "p7", "p8", "p9", "p10", "p11", "p12", "p13", "p14", "p15", \
311 /* Non-rotating fp registers. */ \
312 "f6", "f7", "f8", "f9", "f10", "f11", "f12", "f13", "f14", "f15", \
313 /* Branch registers. */ \
314 "b6"
315
316#ifdef IA64_USE_NEW_STUB
317# define ASM_CLOBBERS_6 ASM_CLOBBERS_6_COMMON
318#else
319# define ASM_CLOBBERS_6 ASM_CLOBBERS_6_COMMON , "b7"
320#endif
321
322#endif /* not __ASSEMBLER__ */
323
324/* Pointer mangling support. */
a3848485 325#if IS_IN (rtld)
d5efd131
MF
326/* We cannot use the thread descriptor because in ld.so we use setjmp
327 earlier than the descriptor is initialized. */
328#else
329# ifdef __ASSEMBLER__
330# define PTR_MANGLE(reg, tmpreg) \
331 add tmpreg=-16,r13 \
332 ;; \
333 ld8 tmpreg=[tmpreg] \
334 ;; \
335 xor reg=reg, tmpreg
336# define PTR_DEMANGLE(reg, tmpreg) PTR_MANGLE (reg, tmpreg)
337# else
338# define PTR_MANGLE(var) \
339 (var) = (void *) ((uintptr_t) (var) ^ THREAD_GET_POINTER_GUARD ())
340# define PTR_DEMANGLE(var) PTR_MANGLE (var)
341# endif
342#endif
343
344#endif /* linux/ia64/sysdep.h */