Loading...
1/* SPDX-License-Identifier: GPL-2.0 */
2/*
3 * syscall_wrapper.h - s390 specific wrappers to syscall definitions
4 *
5 */
6
7#ifndef _ASM_S390_SYSCALL_WRAPPER_H
8#define _ASM_S390_SYSCALL_WRAPPER_H
9
10#define __SC_TYPE(t, a) t
11
12#define SYSCALL_PT_ARG6(regs, m, t1, t2, t3, t4, t5, t6)\
13 SYSCALL_PT_ARG5(regs, m, t1, t2, t3, t4, t5), \
14 m(t6, (regs->gprs[7]))
15
16#define SYSCALL_PT_ARG5(regs, m, t1, t2, t3, t4, t5) \
17 SYSCALL_PT_ARG4(regs, m, t1, t2, t3, t4), \
18 m(t5, (regs->gprs[6]))
19
20#define SYSCALL_PT_ARG4(regs, m, t1, t2, t3, t4) \
21 SYSCALL_PT_ARG3(regs, m, t1, t2, t3), \
22 m(t4, (regs->gprs[5]))
23
24#define SYSCALL_PT_ARG3(regs, m, t1, t2, t3) \
25 SYSCALL_PT_ARG2(regs, m, t1, t2), \
26 m(t3, (regs->gprs[4]))
27
28#define SYSCALL_PT_ARG2(regs, m, t1, t2) \
29 SYSCALL_PT_ARG1(regs, m, t1), \
30 m(t2, (regs->gprs[3]))
31
32#define SYSCALL_PT_ARG1(regs, m, t1) \
33 m(t1, (regs->orig_gpr2))
34
35#define SYSCALL_PT_ARGS(x, ...) SYSCALL_PT_ARG##x(__VA_ARGS__)
36
37#ifdef CONFIG_COMPAT
38#define __SC_COMPAT_TYPE(t, a) \
39 __typeof(__builtin_choose_expr(sizeof(t) > 4, 0L, (t)0)) a
40
41#define __SC_COMPAT_CAST(t, a) \
42({ \
43 long __ReS = a; \
44 \
45 BUILD_BUG_ON((sizeof(t) > 4) && !__TYPE_IS_L(t) && \
46 !__TYPE_IS_UL(t) && !__TYPE_IS_PTR(t) && \
47 !__TYPE_IS_LL(t)); \
48 if (__TYPE_IS_L(t)) \
49 __ReS = (s32)a; \
50 if (__TYPE_IS_UL(t)) \
51 __ReS = (u32)a; \
52 if (__TYPE_IS_PTR(t)) \
53 __ReS = a & 0x7fffffff; \
54 if (__TYPE_IS_LL(t)) \
55 return -ENOSYS; \
56 (t)__ReS; \
57})
58
59#define __S390_SYS_STUBx(x, name, ...) \
60 long __s390_sys##name(struct pt_regs *regs); \
61 ALLOW_ERROR_INJECTION(__s390_sys##name, ERRNO); \
62 long __s390_sys##name(struct pt_regs *regs) \
63 { \
64 long ret = __do_sys##name(SYSCALL_PT_ARGS(x, regs, \
65 __SC_COMPAT_CAST, __MAP(x, __SC_TYPE, __VA_ARGS__))); \
66 __MAP(x,__SC_TEST,__VA_ARGS__); \
67 return ret; \
68 }
69
70/*
71 * To keep the naming coherent, re-define SYSCALL_DEFINE0 to create an alias
72 * named __s390x_sys_*()
73 */
74#define COMPAT_SYSCALL_DEFINE0(sname) \
75 SYSCALL_METADATA(_##sname, 0); \
76 long __s390_compat_sys_##sname(void); \
77 ALLOW_ERROR_INJECTION(__s390_compat_sys_##sname, ERRNO); \
78 long __s390_compat_sys_##sname(void)
79
80#define SYSCALL_DEFINE0(sname) \
81 SYSCALL_METADATA(_##sname, 0); \
82 long __s390x_sys_##sname(void); \
83 ALLOW_ERROR_INJECTION(__s390x_sys_##sname, ERRNO); \
84 long __s390_sys_##sname(void) \
85 __attribute__((alias(__stringify(__s390x_sys_##sname)))); \
86 long __s390x_sys_##sname(void)
87
88#define COND_SYSCALL(name) \
89 cond_syscall(__s390x_sys_##name); \
90 cond_syscall(__s390_sys_##name)
91
92#define SYS_NI(name) \
93 SYSCALL_ALIAS(__s390x_sys_##name, sys_ni_posix_timers); \
94 SYSCALL_ALIAS(__s390_sys_##name, sys_ni_posix_timers)
95
96#define COMPAT_SYSCALL_DEFINEx(x, name, ...) \
97 __diag_push(); \
98 __diag_ignore(GCC, 8, "-Wattribute-alias", \
99 "Type aliasing is used to sanitize syscall arguments"); \
100 long __s390_compat_sys##name(struct pt_regs *regs); \
101 long __s390_compat_sys##name(struct pt_regs *regs) \
102 __attribute__((alias(__stringify(__se_compat_sys##name)))); \
103 ALLOW_ERROR_INJECTION(__s390_compat_sys##name, ERRNO); \
104 static inline long __do_compat_sys##name(__MAP(x,__SC_DECL,__VA_ARGS__)); \
105 long __se_compat_sys##name(struct pt_regs *regs); \
106 long __se_compat_sys##name(struct pt_regs *regs) \
107 { \
108 long ret = __do_compat_sys##name(SYSCALL_PT_ARGS(x, regs, __SC_DELOUSE, \
109 __MAP(x, __SC_TYPE, __VA_ARGS__))); \
110 __MAP(x,__SC_TEST,__VA_ARGS__); \
111 return ret; \
112 } \
113 __diag_pop(); \
114 static inline long __do_compat_sys##name(__MAP(x,__SC_DECL,__VA_ARGS__))
115
116/*
117 * As some compat syscalls may not be implemented, we need to expand
118 * COND_SYSCALL_COMPAT in kernel/sys_ni.c and COMPAT_SYS_NI in
119 * kernel/time/posix-stubs.c to cover this case as well.
120 */
121#define COND_SYSCALL_COMPAT(name) \
122 cond_syscall(__s390_compat_sys_##name)
123
124#define COMPAT_SYS_NI(name) \
125 SYSCALL_ALIAS(__s390_compat_sys_##name, sys_ni_posix_timers)
126
127#else /* CONFIG_COMPAT */
128
129#define __S390_SYS_STUBx(x, fullname, name, ...)
130
131#define SYSCALL_DEFINE0(sname) \
132 SYSCALL_METADATA(_##sname, 0); \
133 long __s390x_sys_##sname(void); \
134 ALLOW_ERROR_INJECTION(__s390x_sys_##sname, ERRNO); \
135 long __s390x_sys_##sname(void)
136
137#define COND_SYSCALL(name) \
138 cond_syscall(__s390x_sys_##name)
139
140#define SYS_NI(name) \
141 SYSCALL_ALIAS(__s390x_sys_##name, sys_ni_posix_timers);
142
143#endif /* CONFIG_COMPAT */
144
145#define __SYSCALL_DEFINEx(x, name, ...) \
146 __diag_push(); \
147 __diag_ignore(GCC, 8, "-Wattribute-alias", \
148 "Type aliasing is used to sanitize syscall arguments"); \
149 long __s390x_sys##name(struct pt_regs *regs) \
150 __attribute__((alias(__stringify(__se_sys##name)))); \
151 ALLOW_ERROR_INJECTION(__s390x_sys##name, ERRNO); \
152 static inline long __do_sys##name(__MAP(x,__SC_DECL,__VA_ARGS__)); \
153 long __se_sys##name(struct pt_regs *regs); \
154 __S390_SYS_STUBx(x, name, __VA_ARGS__) \
155 long __se_sys##name(struct pt_regs *regs) \
156 { \
157 long ret = __do_sys##name(SYSCALL_PT_ARGS(x, regs, \
158 __SC_CAST, __MAP(x, __SC_TYPE, __VA_ARGS__))); \
159 __MAP(x,__SC_TEST,__VA_ARGS__); \
160 return ret; \
161 } \
162 __diag_pop(); \
163 static inline long __do_sys##name(__MAP(x,__SC_DECL,__VA_ARGS__))
164
165#endif /* _ASM_S390_SYSCALL_WRAPPER_H */
1/* SPDX-License-Identifier: GPL-2.0 */
2/*
3 * syscall_wrapper.h - s390 specific wrappers to syscall definitions
4 *
5 */
6
7#ifndef _ASM_S390_SYSCALL_WRAPPER_H
8#define _ASM_S390_SYSCALL_WRAPPER_H
9
10/* Mapping of registers to parameters for syscalls */
11#define SC_S390_REGS_TO_ARGS(x, ...) \
12 __MAP(x, __SC_ARGS \
13 ,, regs->orig_gpr2,, regs->gprs[3],, regs->gprs[4] \
14 ,, regs->gprs[5],, regs->gprs[6],, regs->gprs[7])
15
16#ifdef CONFIG_COMPAT
17
18#define __SC_COMPAT_CAST(t, a) \
19({ \
20 long __ReS = a; \
21 \
22 BUILD_BUG_ON((sizeof(t) > 4) && !__TYPE_IS_L(t) && \
23 !__TYPE_IS_UL(t) && !__TYPE_IS_PTR(t) && \
24 !__TYPE_IS_LL(t)); \
25 if (__TYPE_IS_L(t)) \
26 __ReS = (s32)a; \
27 if (__TYPE_IS_UL(t)) \
28 __ReS = (u32)a; \
29 if (__TYPE_IS_PTR(t)) \
30 __ReS = a & 0x7fffffff; \
31 if (__TYPE_IS_LL(t)) \
32 return -ENOSYS; \
33 (t)__ReS; \
34})
35
36/*
37 * To keep the naming coherent, re-define SYSCALL_DEFINE0 to create an alias
38 * named __s390x_sys_*()
39 */
40#define COMPAT_SYSCALL_DEFINE0(sname) \
41 long __s390_compat_sys_##sname(void); \
42 ALLOW_ERROR_INJECTION(__s390_compat_sys_##sname, ERRNO); \
43 long __s390_compat_sys_##sname(void)
44
45#define SYSCALL_DEFINE0(sname) \
46 SYSCALL_METADATA(_##sname, 0); \
47 long __s390_sys_##sname(void); \
48 ALLOW_ERROR_INJECTION(__s390_sys_##sname, ERRNO); \
49 long __s390x_sys_##sname(void); \
50 ALLOW_ERROR_INJECTION(__s390x_sys_##sname, ERRNO); \
51 static inline long __do_sys_##sname(void); \
52 long __s390_sys_##sname(void) \
53 { \
54 return __do_sys_##sname(); \
55 } \
56 long __s390x_sys_##sname(void) \
57 { \
58 return __do_sys_##sname(); \
59 } \
60 static inline long __do_sys_##sname(void)
61
62#define COND_SYSCALL(name) \
63 cond_syscall(__s390x_sys_##name); \
64 cond_syscall(__s390_sys_##name)
65
66#define COMPAT_SYSCALL_DEFINEx(x, name, ...) \
67 long __s390_compat_sys##name(struct pt_regs *regs); \
68 ALLOW_ERROR_INJECTION(__s390_compat_sys##name, ERRNO); \
69 static inline long __se_compat_sys##name(__MAP(x, __SC_LONG, __VA_ARGS__)); \
70 static inline long __do_compat_sys##name(__MAP(x, __SC_DECL, __VA_ARGS__)); \
71 long __s390_compat_sys##name(struct pt_regs *regs) \
72 { \
73 return __se_compat_sys##name(SC_S390_REGS_TO_ARGS(x, __VA_ARGS__)); \
74 } \
75 static inline long __se_compat_sys##name(__MAP(x, __SC_LONG, __VA_ARGS__)) \
76 { \
77 __MAP(x, __SC_TEST, __VA_ARGS__); \
78 return __do_compat_sys##name(__MAP(x, __SC_DELOUSE, __VA_ARGS__)); \
79 } \
80 static inline long __do_compat_sys##name(__MAP(x, __SC_DECL, __VA_ARGS__))
81
82/*
83 * As some compat syscalls may not be implemented, we need to expand
84 * COND_SYSCALL_COMPAT in kernel/sys_ni.c to cover this case as well.
85 */
86#define COND_SYSCALL_COMPAT(name) \
87 cond_syscall(__s390_compat_sys_##name)
88
89#define __S390_SYS_STUBx(x, name, ...) \
90 long __s390_sys##name(struct pt_regs *regs); \
91 ALLOW_ERROR_INJECTION(__s390_sys##name, ERRNO); \
92 static inline long ___se_sys##name(__MAP(x, __SC_LONG, __VA_ARGS__)); \
93 long __s390_sys##name(struct pt_regs *regs) \
94 { \
95 return ___se_sys##name(SC_S390_REGS_TO_ARGS(x, __VA_ARGS__)); \
96 } \
97 static inline long ___se_sys##name(__MAP(x, __SC_LONG, __VA_ARGS__)) \
98 { \
99 __MAP(x, __SC_TEST, __VA_ARGS__); \
100 return __do_sys##name(__MAP(x, __SC_COMPAT_CAST, __VA_ARGS__)); \
101 }
102
103#else /* CONFIG_COMPAT */
104
105#define SYSCALL_DEFINE0(sname) \
106 SYSCALL_METADATA(_##sname, 0); \
107 long __s390x_sys_##sname(void); \
108 ALLOW_ERROR_INJECTION(__s390x_sys_##sname, ERRNO); \
109 static inline long __do_sys_##sname(void); \
110 long __s390x_sys_##sname(void) \
111 { \
112 return __do_sys_##sname(); \
113 } \
114 static inline long __do_sys_##sname(void)
115
116#define COND_SYSCALL(name) \
117 cond_syscall(__s390x_sys_##name)
118
119#define __S390_SYS_STUBx(x, fullname, name, ...)
120
121#endif /* CONFIG_COMPAT */
122
123#define __SYSCALL_DEFINEx(x, name, ...) \
124 long __s390x_sys##name(struct pt_regs *regs); \
125 ALLOW_ERROR_INJECTION(__s390x_sys##name, ERRNO); \
126 static inline long __se_sys##name(__MAP(x, __SC_LONG, __VA_ARGS__)); \
127 static inline long __do_sys##name(__MAP(x, __SC_DECL, __VA_ARGS__)); \
128 __S390_SYS_STUBx(x, name, __VA_ARGS__); \
129 long __s390x_sys##name(struct pt_regs *regs) \
130 { \
131 return __se_sys##name(SC_S390_REGS_TO_ARGS(x, __VA_ARGS__)); \
132 } \
133 static inline long __se_sys##name(__MAP(x, __SC_LONG, __VA_ARGS__)) \
134 { \
135 __MAP(x, __SC_TEST, __VA_ARGS__); \
136 return __do_sys##name(__MAP(x, __SC_CAST, __VA_ARGS__)); \
137 } \
138 static inline long __do_sys##name(__MAP(x, __SC_DECL, __VA_ARGS__))
139
140#endif /* _ASM_S390_SYSCALL_WRAPPER_H */