hppa: Fix typo in PA 2.0 trampoline template
[official-gcc.git] / libsanitizer / sanitizer_common / sanitizer_syscall_linux_riscv64.inc
blob89c12602057c7336d3c18503b566229d8169ed43
1 //===-- sanitizer_syscall_linux_riscv64.inc ---------------------*- C++ -*-===//
2 //
3 // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
4 // See https://llvm.org/LICENSE.txt for license information.
5 // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
6 //
7 //===----------------------------------------------------------------------===//
8 //
9 // Implementations of internal_syscall and internal_iserror for Linux/riscv64.
11 //===----------------------------------------------------------------------===//
13 // About local register variables:
14 // https://gcc.gnu.org/onlinedocs/gcc/Local-Register-Variables.html#Local-Register-Variables
16 // Kernel ABI...
17 // To my surprise I haven't found much information regarding it.
18 // Kernel source and internet browsing shows that:
19 //  syscall number is passed in a7
20 //  (http://man7.org/linux/man-pages/man2/syscall.2.html) results are return in
21 //  a0 and a1 (http://man7.org/linux/man-pages/man2/syscall.2.html) arguments
22 //  are passed in: a0-a7 (see below)
24 //  Regarding the arguments. The only "documentation" I could find is
25 //  this comment (!!!) by Bruce Hold on google forums (!!!):
26 //    https://groups.google.com/a/groups.riscv.org/forum/#!topic/sw-dev/exbrzM3GZDQ
27 //    Confirmed by inspecting glibc sources.
28 //  Great way to document things.
29 #define SYSCALL(name) __NR_##name
31 #define INTERNAL_SYSCALL_CLOBBERS "memory"
33 static uptr __internal_syscall(u64 nr) {
34   register u64 a7 asm("a7") = nr;
35   register u64 a0 asm("a0");
36   __asm__ volatile("ecall\n\t"
37                    : "=r"(a0)
38                    : "r"(a7)
39                    : INTERNAL_SYSCALL_CLOBBERS);
40   return a0;
42 #define __internal_syscall0(n) (__internal_syscall)(n)
44 static uptr __internal_syscall(u64 nr, u64 arg1) {
45   register u64 a7 asm("a7") = nr;
46   register u64 a0 asm("a0") = arg1;
47   __asm__ volatile("ecall\n\t"
48                    : "+r"(a0)
49                    : "r"(a7)
50                    : INTERNAL_SYSCALL_CLOBBERS);
51   return a0;
53 #define __internal_syscall1(n, a1) (__internal_syscall)(n, (u64)(a1))
55 static uptr __internal_syscall(u64 nr, u64 arg1, long arg2) {
56   register u64 a7 asm("a7") = nr;
57   register u64 a0 asm("a0") = arg1;
58   register u64 a1 asm("a1") = arg2;
59   __asm__ volatile("ecall\n\t"
60                    : "+r"(a0)
61                    : "r"(a7), "r"(a1)
62                    : INTERNAL_SYSCALL_CLOBBERS);
63   return a0;
65 #define __internal_syscall2(n, a1, a2) \
66   (__internal_syscall)(n, (u64)(a1), (long)(a2))
68 static uptr __internal_syscall(u64 nr, u64 arg1, long arg2, long arg3) {
69   register u64 a7 asm("a7") = nr;
70   register u64 a0 asm("a0") = arg1;
71   register u64 a1 asm("a1") = arg2;
72   register u64 a2 asm("a2") = arg3;
73   __asm__ volatile("ecall\n\t"
74                    : "+r"(a0)
75                    : "r"(a7), "r"(a1), "r"(a2)
76                    : INTERNAL_SYSCALL_CLOBBERS);
77   return a0;
79 #define __internal_syscall3(n, a1, a2, a3) \
80   (__internal_syscall)(n, (u64)(a1), (long)(a2), (long)(a3))
82 static uptr __internal_syscall(u64 nr, u64 arg1, long arg2, long arg3,
83                                u64 arg4) {
84   register u64 a7 asm("a7") = nr;
85   register u64 a0 asm("a0") = arg1;
86   register u64 a1 asm("a1") = arg2;
87   register u64 a2 asm("a2") = arg3;
88   register u64 a3 asm("a3") = arg4;
89   __asm__ volatile("ecall\n\t"
90                    : "+r"(a0)
91                    : "r"(a7), "r"(a1), "r"(a2), "r"(a3)
92                    : INTERNAL_SYSCALL_CLOBBERS);
93   return a0;
95 #define __internal_syscall4(n, a1, a2, a3, a4) \
96   (__internal_syscall)(n, (u64)(a1), (long)(a2), (long)(a3), (long)(a4))
98 static uptr __internal_syscall(u64 nr, u64 arg1, long arg2, long arg3, u64 arg4,
99                                long arg5) {
100   register u64 a7 asm("a7") = nr;
101   register u64 a0 asm("a0") = arg1;
102   register u64 a1 asm("a1") = arg2;
103   register u64 a2 asm("a2") = arg3;
104   register u64 a3 asm("a3") = arg4;
105   register u64 a4 asm("a4") = arg5;
106   __asm__ volatile("ecall\n\t"
107                    : "+r"(a0)
108                    : "r"(a7), "r"(a1), "r"(a2), "r"(a3), "r"(a4)
109                    : INTERNAL_SYSCALL_CLOBBERS);
110   return a0;
112 #define __internal_syscall5(n, a1, a2, a3, a4, a5)                       \
113   (__internal_syscall)(n, (u64)(a1), (long)(a2), (long)(a3), (long)(a4), \
114                        (u64)(a5))
116 static uptr __internal_syscall(u64 nr, u64 arg1, long arg2, long arg3, u64 arg4,
117                                long arg5, long arg6) {
118   register u64 a7 asm("a7") = nr;
119   register u64 a0 asm("a0") = arg1;
120   register u64 a1 asm("a1") = arg2;
121   register u64 a2 asm("a2") = arg3;
122   register u64 a3 asm("a3") = arg4;
123   register u64 a4 asm("a4") = arg5;
124   register u64 a5 asm("a5") = arg6;
125   __asm__ volatile("ecall\n\t"
126                    : "+r"(a0)
127                    : "r"(a7), "r"(a1), "r"(a2), "r"(a3), "r"(a4), "r"(a5)
128                    : INTERNAL_SYSCALL_CLOBBERS);
129   return a0;
131 #define __internal_syscall6(n, a1, a2, a3, a4, a5, a6)                   \
132   (__internal_syscall)(n, (u64)(a1), (long)(a2), (long)(a3), (long)(a4), \
133                        (u64)(a5), (long)(a6))
135 static uptr __internal_syscall(u64 nr, u64 arg1, long arg2, long arg3, u64 arg4,
136                                long arg5, long arg6, long arg7) {
137   register u64 a7 asm("a7") = nr;
138   register u64 a0 asm("a0") = arg1;
139   register u64 a1 asm("a1") = arg2;
140   register u64 a2 asm("a2") = arg3;
141   register u64 a3 asm("a3") = arg4;
142   register u64 a4 asm("a4") = arg5;
143   register u64 a5 asm("a5") = arg6;
144   register u64 a6 asm("a6") = arg7;
145   __asm__ volatile("ecall\n\t"
146                    : "+r"(a0)
147                    : "r"(a7), "r"(a1), "r"(a2), "r"(a3), "r"(a4), "r"(a5),
148                      "r"(a6)
149                    : INTERNAL_SYSCALL_CLOBBERS);
150   return a0;
152 #define __internal_syscall7(n, a1, a2, a3, a4, a5, a6, a7)               \
153   (__internal_syscall)(n, (u64)(a1), (long)(a2), (long)(a3), (long)(a4), \
154                        (u64)(a5), (long)(a6), (long)(a7))
156 #define __SYSCALL_NARGS_X(a1, a2, a3, a4, a5, a6, a7, a8, n, ...) n
157 #define __SYSCALL_NARGS(...) \
158   __SYSCALL_NARGS_X(__VA_ARGS__, 7, 6, 5, 4, 3, 2, 1, 0, )
159 #define __SYSCALL_CONCAT_X(a, b) a##b
160 #define __SYSCALL_CONCAT(a, b) __SYSCALL_CONCAT_X(a, b)
161 #define __SYSCALL_DISP(b, ...) \
162   __SYSCALL_CONCAT(b, __SYSCALL_NARGS(__VA_ARGS__))(__VA_ARGS__)
164 #define internal_syscall(...) __SYSCALL_DISP(__internal_syscall, __VA_ARGS__)
166 // Helper function used to avoid clobbering of errno.
167 bool internal_iserror(uptr retval, int *rverrno) {
168   if (retval >= (uptr)-4095) {
169     if (rverrno)
170       *rverrno = -retval;
171     return true;
172   }
173   return false;