1//===-- sanitizer_syscall_linux_arm.inc -------------------------*- C++ -*-===//
2//
3//                     The LLVM Compiler Infrastructure
4//
5// This file is distributed under the University of Illinois Open Source
6// License. See LICENSE.TXT for details.
7//
8//===----------------------------------------------------------------------===//
9//
10// Implementations of internal_syscall and internal_iserror for Linux/arm.
11//
12//===----------------------------------------------------------------------===//
13
14#define SYSCALL(name) __NR_ ## name
15
16static uptr __internal_syscall(u32 nr) {
17  register u32 r8 asm("r7") = nr;
18  register u32 r0 asm("r0");
19  asm volatile("swi #0"
20               : "=r"(r0)
21               : "r"(r8)
22               : "memory", "cc");
23  return r0;
24}
25#define __internal_syscall0(n) \
26  (__internal_syscall)(n)
27
28static uptr __internal_syscall(u32 nr, u32 arg1) {
29  register u32 r8 asm("r7") = nr;
30  register u32 r0 asm("r0") = arg1;
31  asm volatile("swi #0"
32               : "=r"(r0)
33               : "r"(r8), "0"(r0)
34               : "memory", "cc");
35  return r0;
36}
37#define __internal_syscall1(n, a1) \
38  (__internal_syscall)(n, (u32)(a1))
39
40static uptr __internal_syscall(u32 nr, u32 arg1, long arg2) {
41  register u32 r8 asm("r7") = nr;
42  register u32 r0 asm("r0") = arg1;
43  register u32 r1 asm("r1") = arg2;
44  asm volatile("swi #0"
45               : "=r"(r0)
46               : "r"(r8), "0"(r0), "r"(r1)
47               : "memory", "cc");
48  return r0;
49}
50#define __internal_syscall2(n, a1, a2) \
51  (__internal_syscall)(n, (u32)(a1), (long)(a2))
52
53static uptr __internal_syscall(u32 nr, u32 arg1, long arg2, long arg3) {
54  register u32 r8 asm("r7") = nr;
55  register u32 r0 asm("r0") = arg1;
56  register u32 r1 asm("r1") = arg2;
57  register u32 r2 asm("r2") = arg3;
58  asm volatile("swi #0"
59               : "=r"(r0)
60               : "r"(r8), "0"(r0), "r"(r1), "r"(r2)
61               : "memory", "cc");
62  return r0;
63}
64#define __internal_syscall3(n, a1, a2, a3) \
65  (__internal_syscall)(n, (u32)(a1), (long)(a2), (long)(a3))
66
67static uptr __internal_syscall(u32 nr, u32 arg1, long arg2, long arg3,
68                               u32 arg4) {
69  register u32 r8 asm("r7") = nr;
70  register u32 r0 asm("r0") = arg1;
71  register u32 r1 asm("r1") = arg2;
72  register u32 r2 asm("r2") = arg3;
73  register u32 r3 asm("r3") = arg4;
74  asm volatile("swi #0"
75               : "=r"(r0)
76               : "r"(r8), "0"(r0), "r"(r1), "r"(r2), "r"(r3)
77               : "memory", "cc");
78  return r0;
79}
80#define __internal_syscall4(n, a1, a2, a3, a4) \
81  (__internal_syscall)(n, (u32)(a1), (long)(a2), (long)(a3), (long)(a4))
82
83static uptr __internal_syscall(u32 nr, u32 arg1, long arg2, long arg3,
84                               u32 arg4, long arg5) {
85  register u32 r8 asm("r7") = nr;
86  register u32 r0 asm("r0") = arg1;
87  register u32 r1 asm("r1") = arg2;
88  register u32 r2 asm("r2") = arg3;
89  register u32 r3 asm("r3") = arg4;
90  register u32 r4 asm("r4") = arg5;
91  asm volatile("swi #0"
92               : "=r"(r0)
93               : "r"(r8), "0"(r0), "r"(r1), "r"(r2), "r"(r3), "r"(r4)
94               : "memory", "cc");
95  return r0;
96}
97#define __internal_syscall5(n, a1, a2, a3, a4, a5) \
98  (__internal_syscall)(n, (u32)(a1), (long)(a2), (long)(a3), (long)(a4), \
99                       (u32)(a5))
100
101static uptr __internal_syscall(u32 nr, u32 arg1, long arg2, long arg3,
102                               u32 arg4, long arg5, long arg6) {
103  register u32 r8 asm("r7") = nr;
104  register u32 r0 asm("r0") = arg1;
105  register u32 r1 asm("r1") = arg2;
106  register u32 r2 asm("r2") = arg3;
107  register u32 r3 asm("r3") = arg4;
108  register u32 r4 asm("r4") = arg5;
109  register u32 r5 asm("r5") = arg6;
110  asm volatile("swi #0"
111               : "=r"(r0)
112               : "r"(r8), "0"(r0), "r"(r1), "r"(r2), "r"(r3), "r"(r4), "r"(r5)
113               : "memory", "cc");
114  return r0;
115}
116#define __internal_syscall6(n, a1, a2, a3, a4, a5, a6) \
117  (__internal_syscall)(n, (u32)(a1), (long)(a2), (long)(a3), (long)(a4), \
118                       (u32)(a5), (long)(a6))
119
120#define __SYSCALL_NARGS_X(a1, a2, a3, a4, a5, a6, a7, a8, n, ...) n
121#define __SYSCALL_NARGS(...) \
122  __SYSCALL_NARGS_X(__VA_ARGS__, 7, 6, 5, 4, 3, 2, 1, 0, )
123#define __SYSCALL_CONCAT_X(a, b) a##b
124#define __SYSCALL_CONCAT(a, b) __SYSCALL_CONCAT_X(a, b)
125#define __SYSCALL_DISP(b, ...) \
126  __SYSCALL_CONCAT(b, __SYSCALL_NARGS(__VA_ARGS__))(__VA_ARGS__)
127
128#define internal_syscall(...) __SYSCALL_DISP(__internal_syscall, __VA_ARGS__)
129
130// Helper function used to avoid cobbler errno.
131bool internal_iserror(uptr retval, int *rverrno) {
132  if (retval >= (uptr)-4095) {
133    if (rverrno)
134      *rverrno = -retval;
135    return true;
136  }
137  return false;
138}
139