linux32_misc.c revision 1.23.4.2 1 /* $NetBSD: linux32_misc.c,v 1.23.4.2 2020/01/21 19:19:17 martin Exp $ */
2
3 /*-
4 * Copyright (c) 1995, 1998, 1999 The NetBSD Foundation, Inc.
5 * All rights reserved.
6 *
7 * This code is derived from software contributed to The NetBSD Foundation
8 * by Frank van der Linden and Eric Haszlakiewicz; by Jason R. Thorpe
9 * of the Numerical Aerospace Simulation Facility, NASA Ames Research Center;
10 * by Edgar Fu\ss, Mathematisches Institut der Uni Bonn.
11 *
12 * Redistribution and use in source and binary forms, with or without
13 * modification, are permitted provided that the following conditions
14 * are met:
15 * 1. Redistributions of source code must retain the above copyright
16 * notice, this list of conditions and the following disclaimer.
17 * 2. Redistributions in binary form must reproduce the above copyright
18 * notice, this list of conditions and the following disclaimer in the
19 * documentation and/or other materials provided with the distribution.
20 *
21 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
22 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
23 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
24 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
25 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
26 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
27 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
28 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
29 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
30 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
31 * POSSIBILITY OF SUCH DAMAGE.
32 */
33
34 #include <sys/cdefs.h>
35 __KERNEL_RCSID(0, "$NetBSD: linux32_misc.c,v 1.23.4.2 2020/01/21 19:19:17 martin Exp $");
36
37 #include <sys/param.h>
38 #include <sys/proc.h>
39 #include <sys/time.h>
40 #include <sys/types.h>
41 #include <sys/fstypes.h>
42 #include <sys/vfs_syscalls.h>
43 #include <sys/ptrace.h>
44 #include <sys/syscall.h>
45
46 #include <compat/netbsd32/netbsd32.h>
47 #include <compat/netbsd32/netbsd32_syscallargs.h>
48
49 #include <compat/linux/common/linux_types.h>
50
51 #include <compat/linux32/common/linux32_types.h>
52 #include <compat/linux32/common/linux32_signal.h>
53 #include <compat/linux32/common/linux32_sched.h>
54 #include <compat/linux32/linux32_syscallargs.h>
55
56 #include <compat/linux/common/linux_ptrace.h>
57 #include <compat/linux/common/linux_emuldata.h>
58 #include <compat/linux/common/linux_signal.h>
59 #include <compat/linux/common/linux_misc.h>
60 #include <compat/linux/common/linux_statfs.h>
61 #include <compat/linux/common/linux_ipc.h>
62 #include <compat/linux/common/linux_sem.h>
63 #include <compat/linux/common/linux_futex.h>
64 #include <compat/linux/linux_syscallargs.h>
65
66 extern const struct linux_mnttypes linux_fstypes[];
67 extern const int linux_fstypes_cnt;
68
69 void linux32_to_native_timespec(struct timespec *, struct linux32_timespec *);
70
71 /*
72 * Implement the fs stat functions. Straightforward.
73 */
74 int
75 linux32_sys_statfs(struct lwp *l, const struct linux32_sys_statfs_args *uap, register_t *retval)
76 {
77 /* {
78 syscallarg(const netbsd32_charp char) path;
79 syscallarg(linux32_statfsp) sp;
80 } */
81 struct statvfs *sb;
82 struct linux_statfs ltmp;
83 int error;
84
85 sb = STATVFSBUF_GET();
86 error = do_sys_pstatvfs(l, SCARG_P32(uap, path), ST_WAIT, sb);
87 if (error == 0) {
88 bsd_to_linux_statfs(sb, <mp);
89 error = copyout(<mp, SCARG_P32(uap, sp), sizeof ltmp);
90 }
91
92 STATVFSBUF_PUT(sb);
93 return error;
94 }
95
96 int
97 linux32_sys_fstatfs(struct lwp *l, const struct linux32_sys_fstatfs_args *uap, register_t *retval)
98 {
99 /* {
100 syscallarg(int) fd;
101 syscallarg(linux32_statfsp) sp;
102 } */
103 struct statvfs *sb;
104 struct linux_statfs ltmp;
105 int error;
106
107 sb = STATVFSBUF_GET();
108 error = do_sys_fstatvfs(l, SCARG(uap, fd), ST_WAIT, sb);
109 if (error == 0) {
110 bsd_to_linux_statfs(sb, <mp);
111 error = copyout(<mp, SCARG_P32(uap, sp), sizeof ltmp);
112 }
113 STATVFSBUF_PUT(sb);
114
115 return error;
116 }
117
118 int
119 linux32_sys_statfs64(struct lwp *l, const struct linux32_sys_statfs64_args *uap, register_t *retval)
120 {
121 /* {
122 syscallarg(const netbsd32_charp char) path;
123 syscallarg(linux32_statfs64p) sp;
124 } */
125 struct statvfs *sb;
126 struct linux_statfs64 ltmp;
127 int error;
128
129 sb = STATVFSBUF_GET();
130 error = do_sys_pstatvfs(l, SCARG_P32(uap, path), ST_WAIT, sb);
131 if (error == 0) {
132 bsd_to_linux_statfs64(sb, <mp);
133 error = copyout(<mp, SCARG_P32(uap, sp), sizeof ltmp);
134 }
135
136 STATVFSBUF_PUT(sb);
137 return error;
138 }
139
140 int
141 linux32_sys_fstatfs64(struct lwp *l, const struct linux32_sys_fstatfs64_args *uap, register_t *retval)
142 {
143 /* {
144 syscallarg(int) fd;
145 syscallarg(linux32_statfs64p) sp;
146 } */
147 struct statvfs *sb;
148 struct linux_statfs64 ltmp;
149 int error;
150
151 sb = STATVFSBUF_GET();
152 error = do_sys_fstatvfs(l, SCARG(uap, fd), ST_WAIT, sb);
153 if (error == 0) {
154 bsd_to_linux_statfs64(sb, <mp);
155 error = copyout(<mp, SCARG_P32(uap, sp), sizeof ltmp);
156 }
157 STATVFSBUF_PUT(sb);
158
159 return error;
160 }
161
162 extern const int linux_ptrace_request_map[];
163
164 int
165 linux32_sys_ptrace(struct lwp *l, const struct linux32_sys_ptrace_args *uap, register_t *retval)
166 {
167 /* {
168 i386, m68k, powerpc: T=int
169 alpha, amd64: T=long
170 syscallarg(T) request;
171 syscallarg(T) pid;
172 syscallarg(T) addr;
173 syscallarg(T) data;
174 } */
175 const int *ptr;
176 int request;
177 int error;
178
179 ptr = linux_ptrace_request_map;
180 request = SCARG(uap, request);
181 while (*ptr != -1)
182 if (*ptr++ == request) {
183 struct sys_ptrace_args pta;
184
185 SCARG(&pta, req) = *ptr;
186 SCARG(&pta, pid) = SCARG(uap, pid);
187 SCARG(&pta, addr) = NETBSD32IPTR64(SCARG(uap, addr));
188 SCARG(&pta, data) = SCARG(uap, data);
189
190 /*
191 * Linux ptrace(PTRACE_CONT, pid, 0, 0) means actually
192 * to continue where the process left off previously.
193 * The same thing is achieved by addr == (void *) 1
194 * on NetBSD, so rewrite 'addr' appropriately.
195 */
196 if (request == LINUX_PTRACE_CONT && SCARG(uap, addr)==0)
197 SCARG(&pta, addr) = (void *) 1;
198
199 error = sysent[SYS_ptrace].sy_call(l, &pta, retval);
200 if (error)
201 return error;
202 switch (request) {
203 case LINUX_PTRACE_PEEKTEXT:
204 case LINUX_PTRACE_PEEKDATA:
205 error = copyout (retval,
206 NETBSD32IPTR64(SCARG(uap, data)),
207 sizeof *retval);
208 *retval = SCARG(uap, data);
209 break;
210 default:
211 break;
212 }
213 return error;
214 }
215 else
216 ptr++;
217
218 return EIO;
219 }
220
221 int
222 linux32_sys_personality(struct lwp *l, const struct linux32_sys_personality_args *uap, register_t *retval)
223 {
224 /* {
225 syscallarg(netbsd32_u_long) per;
226 } */
227 struct linux_sys_personality_args ua;
228
229 NETBSD32TOX_UAP(per, long);
230 return linux_sys_personality(l, &ua, retval);
231 }
232
233 int
234 linux32_sys_futex(struct lwp *l,
235 const struct linux32_sys_futex_args *uap, register_t *retval)
236 {
237 /* {
238 syscallarg(linux32_intp_t) uaddr;
239 syscallarg(int) op;
240 syscallarg(int) val;
241 syscallarg(linux32_timespecp_t) timeout;
242 syscallarg(linux32_intp_t) uaddr2;
243 syscallarg(int) val3;
244 } */
245 struct linux_sys_futex_args ua;
246 struct linux32_timespec lts;
247 struct timespec ts = { 0, 0 };
248 int error;
249
250 NETBSD32TOP_UAP(uaddr, int);
251 NETBSD32TO64_UAP(op);
252 NETBSD32TO64_UAP(val);
253 NETBSD32TOP_UAP(timeout, struct linux_timespec);
254 NETBSD32TOP_UAP(uaddr2, int);
255 NETBSD32TO64_UAP(val3);
256 if ((SCARG(uap, op) & ~LINUX_FUTEX_PRIVATE_FLAG) == LINUX_FUTEX_WAIT &&
257 SCARG_P32(uap, timeout) != NULL) {
258 if ((error = copyin((void *)SCARG_P32(uap, timeout),
259 <s, sizeof(lts))) != 0) {
260 return error;
261 }
262 linux32_to_native_timespec(&ts, <s);
263 }
264 return linux_do_futex(l, &ua, retval, &ts);
265 }
266
267 int
268 linux32_sys_set_robust_list(struct lwp *l,
269 const struct linux32_sys_set_robust_list_args *uap, register_t *retval)
270 {
271 /* {
272 syscallarg(linux32_robust_list_headp_t) head;
273 syscallarg(linux32_size_t) len;
274 } */
275 struct linux_sys_set_robust_list_args ua;
276 struct linux_emuldata *led;
277
278 if (SCARG(uap, len) != 12)
279 return EINVAL;
280
281 NETBSD32TOP_UAP(head, struct robust_list_head);
282 NETBSD32TOX64_UAP(len, size_t);
283
284 led = l->l_emuldata;
285 led->led_robust_head = SCARG(&ua, head);
286 *retval = 0;
287 return 0;
288 }
289
290 int
291 linux32_sys_get_robust_list(struct lwp *l,
292 const struct linux32_sys_get_robust_list_args *uap, register_t *retval)
293 {
294 /* {
295 syscallarg(linux32_pid_t) pid;
296 syscallarg(linux32_robust_list_headpp_t) head;
297 syscallarg(linux32_sizep_t) len;
298 } */
299 struct linux_sys_get_robust_list_args ua;
300
301 NETBSD32TOX_UAP(pid, int);
302 NETBSD32TOP_UAP(head, struct robust_list_head *);
303 NETBSD32TOP_UAP(len, size_t *);
304 return linux_sys_get_robust_list(l, &ua, retval);
305 }
306
307 int
308 linux32_sys_truncate64(struct lwp *l, const struct linux32_sys_truncate64_args *uap, register_t *retval)
309 {
310 /* {
311 syscallarg(netbsd32_charp) path;
312 syscallarg(off_t) length;
313 } */
314 struct sys_truncate_args ua;
315
316 /* Linux doesn't have the 'pad' pseudo-parameter */
317 NETBSD32TOP_UAP(path, const char *);
318 SCARG(&ua, PAD) = 0;
319 SCARG(&ua, length) = ((off_t)SCARG(uap, lenhi) << 32) + SCARG(uap, lenlo);
320 return sys_truncate(l, &ua, retval);
321 }
322
323 int
324 linux32_sys_ftruncate64(struct lwp *l, const struct linux32_sys_ftruncate64_args *uap, register_t *retval)
325 {
326 /* {
327 syscallarg(unsigned int) fd;
328 syscallarg(off_t) length;
329 } */
330 struct sys_ftruncate_args ua;
331
332 /* Linux doesn't have the 'pad' pseudo-parameter */
333 NETBSD32TO64_UAP(fd);
334 SCARG(&ua, PAD) = 0;
335 SCARG(&ua, length) = ((off_t)SCARG(uap, lenhi) << 32) + SCARG(uap, lenlo);
336 return sys_ftruncate(l, &ua, retval);
337 }
338
339 int
340 linux32_sys_setdomainname(struct lwp *l, const struct linux32_sys_setdomainname_args *uap, register_t *retval)
341 {
342 /* {
343 syscallarg(netbsd32_charp) domainname;
344 syscallarg(int) len;
345 } */
346 struct linux_sys_setdomainname_args ua;
347
348 NETBSD32TOP_UAP(domainname, char);
349 NETBSD32TO64_UAP(len);
350 return linux_sys_setdomainname(l, &ua, retval);
351 }
352