?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
force to test result for qemu_write_full()
[qemu/ar7.git] / linux-user / syscall.c
blobf2dd39eb3b23198576023357c083c36ea1485f93
1 /*
2 * Linux syscalls
3 *
4 * Copyright (c) 2003 Fabrice Bellard
5 *
6 * This program is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation; either version 2 of the License, or
9 * (at your option) any later version.
10 *
11 * This program is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 * GNU General Public License for more details.
15 *
16 * You should have received a copy of the GNU General Public License
17 * along with this program; if not, see <http://www.gnu.org/licenses/>.
18 */
19 #define _ATFILE_SOURCE
20 #include <stdlib.h>
21 #include <stdio.h>
22 #include <stdarg.h>
23 #include <string.h>
24 #include <elf.h>
25 #include <endian.h>
26 #include <errno.h>
27 #include <unistd.h>
28 #include <fcntl.h>
29 #include <time.h>
30 #include <limits.h>
31 #include <sys/types.h>
32 #include <sys/ipc.h>
33 #include <sys/msg.h>
34 #include <sys/wait.h>
35 #include <sys/time.h>
36 #include <sys/stat.h>
37 #include <sys/mount.h>
38 #include <sys/prctl.h>
39 #include <sys/resource.h>
40 #include <sys/mman.h>
41 #include <sys/swap.h>
42 #include <signal.h>
43 #include <sched.h>
44 #include <sys/socket.h>
45 #include <sys/un.h>
46 #include <sys/uio.h>
47 #include <sys/poll.h>
48 #include <sys/times.h>
49 #include <sys/shm.h>
50 #include <sys/sem.h>
51 #include <sys/statfs.h>
52 #include <utime.h>
53 #include <sys/sysinfo.h>
54 #include <sys/utsname.h>
55 //#include <sys/user.h>
56 #include <netinet/ip.h>
57 #include <netinet/tcp.h>
58 #include <qemu-common.h>
59 #ifdef TARGET_GPROF
60 #include <sys/gmon.h>
61 #endif
62 #ifdef CONFIG_EVENTFD
63 #include <sys/eventfd.h>
64 #endif
65
66 #define termios host_termios
67 #define winsize host_winsize
68 #define termio host_termio
69 #define sgttyb host_sgttyb /* same as target */
70 #define tchars host_tchars /* same as target */
71 #define ltchars host_ltchars /* same as target */
72
73 #include <linux/termios.h>
74 #include <linux/unistd.h>
75 #include <linux/utsname.h>
76 #include <linux/cdrom.h>
77 #include <linux/hdreg.h>
78 #include <linux/soundcard.h>
79 #include <linux/kd.h>
80 #include <linux/mtio.h>
81 #include <linux/fs.h>
82 #include <linux/fb.h>
83 #include <linux/vt.h>
84 #include "linux_loop.h"
85
86 #include "qemu.h"
87 #include "qemu-common.h"
88
89 #if defined(CONFIG_USE_NPTL)
90 #define CLONE_NPTL_FLAGS2 (CLONE_SETTLS | \
91 CLONE_PARENT_SETTID | CLONE_CHILD_SETTID | CLONE_CHILD_CLEARTID)
92 #else
93 /* XXX: Hardcode the above values. */
94 #define CLONE_NPTL_FLAGS2 0
95 #endif
96
97 //#define DEBUG
98
99 //#include <linux/msdos_fs.h>
100 #define VFAT_IOCTL_READDIR_BOTH _IOR('r', 1, struct linux_dirent [2])
101 #define VFAT_IOCTL_READDIR_SHORT _IOR('r', 2, struct linux_dirent [2])
102
103
104 #undef _syscall0
105 #undef _syscall1
106 #undef _syscall2
107 #undef _syscall3
108 #undef _syscall4
109 #undef _syscall5
110 #undef _syscall6
111
112 #define _syscall0(type,name) \
113 static type name (void) \
114 { \
115 return syscall(__NR_##name); \
116 }
117
118 #define _syscall1(type,name,type1,arg1) \
119 static type name (type1 arg1) \
120 { \
121 return syscall(__NR_##name, arg1); \
122 }
123
124 #define _syscall2(type,name,type1,arg1,type2,arg2) \
125 static type name (type1 arg1,type2 arg2) \
126 { \
127 return syscall(__NR_##name, arg1, arg2); \
128 }
129
130 #define _syscall3(type,name,type1,arg1,type2,arg2,type3,arg3) \
131 static type name (type1 arg1,type2 arg2,type3 arg3) \
132 { \
133 return syscall(__NR_##name, arg1, arg2, arg3); \
134 }
135
136 #define _syscall4(type,name,type1,arg1,type2,arg2,type3,arg3,type4,arg4) \
137 static type name (type1 arg1,type2 arg2,type3 arg3,type4 arg4) \
138 { \
139 return syscall(__NR_##name, arg1, arg2, arg3, arg4); \
140 }
141
142 #define _syscall5(type,name,type1,arg1,type2,arg2,type3,arg3,type4,arg4, \
143 type5,arg5) \
144 static type name (type1 arg1,type2 arg2,type3 arg3,type4 arg4,type5 arg5) \
145 { \
146 return syscall(__NR_##name, arg1, arg2, arg3, arg4, arg5); \
147 }
148
149
150 #define _syscall6(type,name,type1,arg1,type2,arg2,type3,arg3,type4,arg4, \
151 type5,arg5,type6,arg6) \
152 static type name (type1 arg1,type2 arg2,type3 arg3,type4 arg4,type5 arg5, \
153 type6 arg6) \
154 { \
155 return syscall(__NR_##name, arg1, arg2, arg3, arg4, arg5, arg6); \
156 }
157
158
159 #define __NR_sys_uname __NR_uname
160 #define __NR_sys_faccessat __NR_faccessat
161 #define __NR_sys_fchmodat __NR_fchmodat
162 #define __NR_sys_fchownat __NR_fchownat
163 #define __NR_sys_fstatat64 __NR_fstatat64
164 #define __NR_sys_futimesat __NR_futimesat
165 #define __NR_sys_getcwd1 __NR_getcwd
166 #define __NR_sys_getdents __NR_getdents
167 #define __NR_sys_getdents64 __NR_getdents64
168 #define __NR_sys_getpriority __NR_getpriority
169 #define __NR_sys_linkat __NR_linkat
170 #define __NR_sys_mkdirat __NR_mkdirat
171 #define __NR_sys_mknodat __NR_mknodat
172 #define __NR_sys_newfstatat __NR_newfstatat
173 #define __NR_sys_openat __NR_openat
174 #define __NR_sys_readlinkat __NR_readlinkat
175 #define __NR_sys_renameat __NR_renameat
176 #define __NR_sys_rt_sigqueueinfo __NR_rt_sigqueueinfo
177 #define __NR_sys_symlinkat __NR_symlinkat
178 #define __NR_sys_syslog __NR_syslog
179 #define __NR_sys_tgkill __NR_tgkill
180 #define __NR_sys_tkill __NR_tkill
181 #define __NR_sys_unlinkat __NR_unlinkat
182 #define __NR_sys_utimensat __NR_utimensat
183 #define __NR_sys_futex __NR_futex
184 #define __NR_sys_inotify_init __NR_inotify_init
185 #define __NR_sys_inotify_add_watch __NR_inotify_add_watch
186 #define __NR_sys_inotify_rm_watch __NR_inotify_rm_watch
187
188 #if defined(__alpha__) || defined (__ia64__) || defined(__x86_64__)
189 #define __NR__llseek __NR_lseek
190 #endif
191
192 #ifdef __NR_gettid
193 _syscall0(int, gettid)
194 #else
195 /* This is a replacement for the host gettid() and must return a host
196 errno. */
197 static int gettid(void) {
198 return -ENOSYS;
199 }
200 #endif
201 _syscall3(int, sys_getdents, uint, fd, struct linux_dirent *, dirp, uint, count);
202 #if defined(TARGET_NR_getdents64) && defined(__NR_getdents64)
203 _syscall3(int, sys_getdents64, uint, fd, struct linux_dirent64 *, dirp, uint, count);
204 #endif
205 _syscall2(int, sys_getpriority, int, which, int, who);
206 #if defined(TARGET_NR__llseek) && !defined (__x86_64__)
207 _syscall5(int, _llseek, uint, fd, ulong, hi, ulong, lo,
208 loff_t *, res, uint, wh);
209 #endif
210 _syscall3(int,sys_rt_sigqueueinfo,int,pid,int,sig,siginfo_t *,uinfo)
211 _syscall3(int,sys_syslog,int,type,char*,bufp,int,len)
212 #if defined(TARGET_NR_tgkill) && defined(__NR_tgkill)
213 _syscall3(int,sys_tgkill,int,tgid,int,pid,int,sig)
214 #endif
215 #if defined(TARGET_NR_tkill) && defined(__NR_tkill)
216 _syscall2(int,sys_tkill,int,tid,int,sig)
217 #endif
218 #ifdef __NR_exit_group
219 _syscall1(int,exit_group,int,error_code)
220 #endif
221 #if defined(TARGET_NR_set_tid_address) && defined(__NR_set_tid_address)
222 _syscall1(int,set_tid_address,int *,tidptr)
223 #endif
224 #if defined(CONFIG_USE_NPTL)
225 #if defined(TARGET_NR_futex) && defined(__NR_futex)
226 _syscall6(int,sys_futex,int *,uaddr,int,op,int,val,
227 const struct timespec *,timeout,int *,uaddr2,int,val3)
228 #endif
229 #endif
230
231 static bitmask_transtbl fcntl_flags_tbl[] = {
232 { TARGET_O_ACCMODE, TARGET_O_WRONLY, O_ACCMODE, O_WRONLY, },
233 { TARGET_O_ACCMODE, TARGET_O_RDWR, O_ACCMODE, O_RDWR, },
234 { TARGET_O_CREAT, TARGET_O_CREAT, O_CREAT, O_CREAT, },
235 { TARGET_O_EXCL, TARGET_O_EXCL, O_EXCL, O_EXCL, },
236 { TARGET_O_NOCTTY, TARGET_O_NOCTTY, O_NOCTTY, O_NOCTTY, },
237 { TARGET_O_TRUNC, TARGET_O_TRUNC, O_TRUNC, O_TRUNC, },
238 { TARGET_O_APPEND, TARGET_O_APPEND, O_APPEND, O_APPEND, },
239 { TARGET_O_NONBLOCK, TARGET_O_NONBLOCK, O_NONBLOCK, O_NONBLOCK, },
240 { TARGET_O_SYNC, TARGET_O_SYNC, O_SYNC, O_SYNC, },
241 { TARGET_FASYNC, TARGET_FASYNC, FASYNC, FASYNC, },
242 { TARGET_O_DIRECTORY, TARGET_O_DIRECTORY, O_DIRECTORY, O_DIRECTORY, },
243 { TARGET_O_NOFOLLOW, TARGET_O_NOFOLLOW, O_NOFOLLOW, O_NOFOLLOW, },
244 { TARGET_O_LARGEFILE, TARGET_O_LARGEFILE, O_LARGEFILE, O_LARGEFILE, },
245 #if defined(O_DIRECT)
246 { TARGET_O_DIRECT, TARGET_O_DIRECT, O_DIRECT, O_DIRECT, },
247 #endif
248 { 0, 0, 0, 0 }
249 };
250
251 #define COPY_UTSNAME_FIELD(dest, src) \
252 do { \
253 /* __NEW_UTS_LEN doesn't include terminating null */ \
254 (void) strncpy((dest), (src), __NEW_UTS_LEN); \
255 (dest)[__NEW_UTS_LEN] = '\0'; \
256 } while (0)
257
258 static int sys_uname(struct new_utsname *buf)
259 {
260 struct utsname uts_buf;
261
262 if (uname(&uts_buf) < 0)
263 return (-1);
264
265 /*
266 * Just in case these have some differences, we
267 * translate utsname to new_utsname (which is the
268 * struct linux kernel uses).
269 */
270
271 bzero(buf, sizeof (*buf));
272 COPY_UTSNAME_FIELD(buf->sysname, uts_buf.sysname);
273 COPY_UTSNAME_FIELD(buf->nodename, uts_buf.nodename);
274 COPY_UTSNAME_FIELD(buf->release, uts_buf.release);
275 COPY_UTSNAME_FIELD(buf->version, uts_buf.version);
276 COPY_UTSNAME_FIELD(buf->machine, uts_buf.machine);
277 #ifdef _GNU_SOURCE
278 COPY_UTSNAME_FIELD(buf->domainname, uts_buf.domainname);
279 #endif
280 return (0);
281
282 #undef COPY_UTSNAME_FIELD
283 }
284
285 static int sys_getcwd1(char *buf, size_t size)
286 {
287 if (getcwd(buf, size) == NULL) {
288 /* getcwd() sets errno */
289 return (-1);
290 }
291 return strlen(buf)+1;
292 }
293
294 #ifdef CONFIG_ATFILE
295 /*
296 * Host system seems to have atfile syscall stubs available. We
297 * now enable them one by one as specified by target syscall_nr.h.
298 */
299
300 #ifdef TARGET_NR_faccessat
301 static int sys_faccessat(int dirfd, const char *pathname, int mode)
302 {
303 return (faccessat(dirfd, pathname, mode, 0));
304 }
305 #endif
306 #ifdef TARGET_NR_fchmodat
307 static int sys_fchmodat(int dirfd, const char *pathname, mode_t mode)
308 {
309 return (fchmodat(dirfd, pathname, mode, 0));
310 }
311 #endif
312 #if defined(TARGET_NR_fchownat) && defined(USE_UID16)
313 static int sys_fchownat(int dirfd, const char *pathname, uid_t owner,
314 gid_t group, int flags)
315 {
316 return (fchownat(dirfd, pathname, owner, group, flags));
317 }
318 #endif
319 #ifdef __NR_fstatat64
320 static int sys_fstatat64(int dirfd, const char *pathname, struct stat *buf,
321 int flags)
322 {
323 return (fstatat(dirfd, pathname, buf, flags));
324 }
325 #endif
326 #ifdef __NR_newfstatat
327 static int sys_newfstatat(int dirfd, const char *pathname, struct stat *buf,
328 int flags)
329 {
330 return (fstatat(dirfd, pathname, buf, flags));
331 }
332 #endif
333 #ifdef TARGET_NR_futimesat
334 static int sys_futimesat(int dirfd, const char *pathname,
335 const struct timeval times[2])
336 {
337 return (futimesat(dirfd, pathname, times));
338 }
339 #endif
340 #ifdef TARGET_NR_linkat
341 static int sys_linkat(int olddirfd, const char *oldpath,
342 int newdirfd, const char *newpath, int flags)
343 {
344 return (linkat(olddirfd, oldpath, newdirfd, newpath, flags));
345 }
346 #endif
347 #ifdef TARGET_NR_mkdirat
348 static int sys_mkdirat(int dirfd, const char *pathname, mode_t mode)
349 {
350 return (mkdirat(dirfd, pathname, mode));
351 }
352 #endif
353 #ifdef TARGET_NR_mknodat
354 static int sys_mknodat(int dirfd, const char *pathname, mode_t mode,
355 dev_t dev)
356 {
357 return (mknodat(dirfd, pathname, mode, dev));
358 }
359 #endif
360 #ifdef TARGET_NR_openat
361 static int sys_openat(int dirfd, const char *pathname, int flags, ...)
362 {
363 /*
364 * open(2) has extra parameter 'mode' when called with
365 * flag O_CREAT.
366 */
367 if ((flags & O_CREAT) != 0) {
368 va_list ap;
369 mode_t mode;
370
371 /*
372 * Get the 'mode' parameter and translate it to
373 * host bits.
374 */
375 va_start(ap, flags);
376 mode = va_arg(ap, mode_t);
377 mode = target_to_host_bitmask(mode, fcntl_flags_tbl);
378 va_end(ap);
379
380 return (openat(dirfd, pathname, flags, mode));
381 }
382 return (openat(dirfd, pathname, flags));
383 }
384 #endif
385 #ifdef TARGET_NR_readlinkat
386 static int sys_readlinkat(int dirfd, const char *pathname, char *buf, size_t bufsiz)
387 {
388 return (readlinkat(dirfd, pathname, buf, bufsiz));
389 }
390 #endif
391 #ifdef TARGET_NR_renameat
392 static int sys_renameat(int olddirfd, const char *oldpath,
393 int newdirfd, const char *newpath)
394 {
395 return (renameat(olddirfd, oldpath, newdirfd, newpath));
396 }
397 #endif
398 #ifdef TARGET_NR_symlinkat
399 static int sys_symlinkat(const char *oldpath, int newdirfd, const char *newpath)
400 {
401 return (symlinkat(oldpath, newdirfd, newpath));
402 }
403 #endif
404 #ifdef TARGET_NR_unlinkat
405 static int sys_unlinkat(int dirfd, const char *pathname, int flags)
406 {
407 return (unlinkat(dirfd, pathname, flags));
408 }
409 #endif
410 #else /* !CONFIG_ATFILE */
411
412 /*
413 * Try direct syscalls instead
414 */
415 #if defined(TARGET_NR_faccessat) && defined(__NR_faccessat)
416 _syscall3(int,sys_faccessat,int,dirfd,const char *,pathname,int,mode)
417 #endif
418 #if defined(TARGET_NR_fchmodat) && defined(__NR_fchmodat)
419 _syscall3(int,sys_fchmodat,int,dirfd,const char *,pathname, mode_t,mode)
420 #endif
421 #if defined(TARGET_NR_fchownat) && defined(__NR_fchownat) && defined(USE_UID16)
422 _syscall5(int,sys_fchownat,int,dirfd,const char *,pathname,
423 uid_t,owner,gid_t,group,int,flags)
424 #endif
425 #if (defined(TARGET_NR_fstatat64) || defined(TARGET_NR_newfstatat)) && \
426 defined(__NR_fstatat64)
427 _syscall4(int,sys_fstatat64,int,dirfd,const char *,pathname,
428 struct stat *,buf,int,flags)
429 #endif
430 #if defined(TARGET_NR_futimesat) && defined(__NR_futimesat)
431 _syscall3(int,sys_futimesat,int,dirfd,const char *,pathname,
432 const struct timeval *,times)
433 #endif
434 #if (defined(TARGET_NR_newfstatat) || defined(TARGET_NR_fstatat64) ) && \
435 defined(__NR_newfstatat)
436 _syscall4(int,sys_newfstatat,int,dirfd,const char *,pathname,
437 struct stat *,buf,int,flags)
438 #endif
439 #if defined(TARGET_NR_linkat) && defined(__NR_linkat)
440 _syscall5(int,sys_linkat,int,olddirfd,const char *,oldpath,
441 int,newdirfd,const char *,newpath,int,flags)
442 #endif
443 #if defined(TARGET_NR_mkdirat) && defined(__NR_mkdirat)
444 _syscall3(int,sys_mkdirat,int,dirfd,const char *,pathname,mode_t,mode)
445 #endif
446 #if defined(TARGET_NR_mknodat) && defined(__NR_mknodat)
447 _syscall4(int,sys_mknodat,int,dirfd,const char *,pathname,
448 mode_t,mode,dev_t,dev)
449 #endif
450 #if defined(TARGET_NR_openat) && defined(__NR_openat)
451 _syscall4(int,sys_openat,int,dirfd,const char *,pathname,int,flags,mode_t,mode)
452 #endif
453 #if defined(TARGET_NR_readlinkat) && defined(__NR_readlinkat)
454 _syscall4(int,sys_readlinkat,int,dirfd,const char *,pathname,
455 char *,buf,size_t,bufsize)
456 #endif
457 #if defined(TARGET_NR_renameat) && defined(__NR_renameat)
458 _syscall4(int,sys_renameat,int,olddirfd,const char *,oldpath,
459 int,newdirfd,const char *,newpath)
460 #endif
461 #if defined(TARGET_NR_symlinkat) && defined(__NR_symlinkat)
462 _syscall3(int,sys_symlinkat,const char *,oldpath,
463 int,newdirfd,const char *,newpath)
464 #endif
465 #if defined(TARGET_NR_unlinkat) && defined(__NR_unlinkat)
466 _syscall3(int,sys_unlinkat,int,dirfd,const char *,pathname,int,flags)
467 #endif
468
469 #endif /* CONFIG_ATFILE */
470
471 #ifdef CONFIG_UTIMENSAT
472 static int sys_utimensat(int dirfd, const char *pathname,
473 const struct timespec times[2], int flags)
474 {
475 if (pathname == NULL)
476 return futimens(dirfd, times);
477 else
478 return utimensat(dirfd, pathname, times, flags);
479 }
480 #else
481 #if defined(TARGET_NR_utimensat) && defined(__NR_utimensat)
482 _syscall4(int,sys_utimensat,int,dirfd,const char *,pathname,
483 const struct timespec *,tsp,int,flags)
484 #endif
485 #endif /* CONFIG_UTIMENSAT */
486
487 #ifdef CONFIG_INOTIFY
488 #include <sys/inotify.h>
489
490 #if defined(TARGET_NR_inotify_init) && defined(__NR_inotify_init)
491 static int sys_inotify_init(void)
492 {
493 return (inotify_init());
494 }
495 #endif
496 #if defined(TARGET_NR_inotify_add_watch) && defined(__NR_inotify_add_watch)
497 static int sys_inotify_add_watch(int fd,const char *pathname, int32_t mask)
498 {
499 return (inotify_add_watch(fd, pathname, mask));
500 }
501 #endif
502 #if defined(TARGET_NR_inotify_rm_watch) && defined(__NR_inotify_rm_watch)
503 static int sys_inotify_rm_watch(int fd, int32_t wd)
504 {
505 return (inotify_rm_watch(fd, wd));
506 }
507 #endif
508 #else
509 /* Userspace can usually survive runtime without inotify */
510 #undef TARGET_NR_inotify_init
511 #undef TARGET_NR_inotify_add_watch
512 #undef TARGET_NR_inotify_rm_watch
513 #endif /* CONFIG_INOTIFY */
514
515
516 extern int personality(int);
517 extern int flock(int, int);
518 extern int setfsuid(int);
519 extern int setfsgid(int);
520 extern int setgroups(int, gid_t *);
521
522 #define ERRNO_TABLE_SIZE 1200
523
524 /* target_to_host_errno_table[] is initialized from
525 * host_to_target_errno_table[] in syscall_init(). */
526 static uint16_t target_to_host_errno_table[ERRNO_TABLE_SIZE] = {
527 };
528
529 /*
530 * This list is the union of errno values overridden in asm-<arch>/errno.h
531 * minus the errnos that are not actually generic to all archs.
532 */
533 static uint16_t host_to_target_errno_table[ERRNO_TABLE_SIZE] = {
534 [EIDRM] = TARGET_EIDRM,
535 [ECHRNG] = TARGET_ECHRNG,
536 [EL2NSYNC] = TARGET_EL2NSYNC,
537 [EL3HLT] = TARGET_EL3HLT,
538 [EL3RST] = TARGET_EL3RST,
539 [ELNRNG] = TARGET_ELNRNG,
540 [EUNATCH] = TARGET_EUNATCH,
541 [ENOCSI] = TARGET_ENOCSI,
542 [EL2HLT] = TARGET_EL2HLT,
543 [EDEADLK] = TARGET_EDEADLK,
544 [ENOLCK] = TARGET_ENOLCK,
545 [EBADE] = TARGET_EBADE,
546 [EBADR] = TARGET_EBADR,
547 [EXFULL] = TARGET_EXFULL,
548 [ENOANO] = TARGET_ENOANO,
549 [EBADRQC] = TARGET_EBADRQC,
550 [EBADSLT] = TARGET_EBADSLT,
551 [EBFONT] = TARGET_EBFONT,
552 [ENOSTR] = TARGET_ENOSTR,
553 [ENODATA] = TARGET_ENODATA,
554 [ETIME] = TARGET_ETIME,
555 [ENOSR] = TARGET_ENOSR,
556 [ENONET] = TARGET_ENONET,
557 [ENOPKG] = TARGET_ENOPKG,
558 [EREMOTE] = TARGET_EREMOTE,
559 [ENOLINK] = TARGET_ENOLINK,
560 [EADV] = TARGET_EADV,
561 [ESRMNT] = TARGET_ESRMNT,
562 [ECOMM] = TARGET_ECOMM,
563 [EPROTO] = TARGET_EPROTO,
564 [EDOTDOT] = TARGET_EDOTDOT,
565 [EMULTIHOP] = TARGET_EMULTIHOP,
566 [EBADMSG] = TARGET_EBADMSG,
567 [ENAMETOOLONG] = TARGET_ENAMETOOLONG,
568 [EOVERFLOW] = TARGET_EOVERFLOW,
569 [ENOTUNIQ] = TARGET_ENOTUNIQ,
570 [EBADFD] = TARGET_EBADFD,
571 [EREMCHG] = TARGET_EREMCHG,
572 [ELIBACC] = TARGET_ELIBACC,
573 [ELIBBAD] = TARGET_ELIBBAD,
574 [ELIBSCN] = TARGET_ELIBSCN,
575 [ELIBMAX] = TARGET_ELIBMAX,
576 [ELIBEXEC] = TARGET_ELIBEXEC,
577 [EILSEQ] = TARGET_EILSEQ,
578 [ENOSYS] = TARGET_ENOSYS,
579 [ELOOP] = TARGET_ELOOP,
580 [ERESTART] = TARGET_ERESTART,
581 [ESTRPIPE] = TARGET_ESTRPIPE,
582 [ENOTEMPTY] = TARGET_ENOTEMPTY,
583 [EUSERS] = TARGET_EUSERS,
584 [ENOTSOCK] = TARGET_ENOTSOCK,
585 [EDESTADDRREQ] = TARGET_EDESTADDRREQ,
586 [EMSGSIZE] = TARGET_EMSGSIZE,
587 [EPROTOTYPE] = TARGET_EPROTOTYPE,
588 [ENOPROTOOPT] = TARGET_ENOPROTOOPT,
589 [EPROTONOSUPPORT] = TARGET_EPROTONOSUPPORT,
590 [ESOCKTNOSUPPORT] = TARGET_ESOCKTNOSUPPORT,
591 [EOPNOTSUPP] = TARGET_EOPNOTSUPP,
592 [EPFNOSUPPORT] = TARGET_EPFNOSUPPORT,
593 [EAFNOSUPPORT] = TARGET_EAFNOSUPPORT,
594 [EADDRINUSE] = TARGET_EADDRINUSE,
595 [EADDRNOTAVAIL] = TARGET_EADDRNOTAVAIL,
596 [ENETDOWN] = TARGET_ENETDOWN,
597 [ENETUNREACH] = TARGET_ENETUNREACH,
598 [ENETRESET] = TARGET_ENETRESET,
599 [ECONNABORTED] = TARGET_ECONNABORTED,
600 [ECONNRESET] = TARGET_ECONNRESET,
601 [ENOBUFS] = TARGET_ENOBUFS,
602 [EISCONN] = TARGET_EISCONN,
603 [ENOTCONN] = TARGET_ENOTCONN,
604 [EUCLEAN] = TARGET_EUCLEAN,
605 [ENOTNAM] = TARGET_ENOTNAM,
606 [ENAVAIL] = TARGET_ENAVAIL,
607 [EISNAM] = TARGET_EISNAM,
608 [EREMOTEIO] = TARGET_EREMOTEIO,
609 [ESHUTDOWN] = TARGET_ESHUTDOWN,
610 [ETOOMANYREFS] = TARGET_ETOOMANYREFS,
611 [ETIMEDOUT] = TARGET_ETIMEDOUT,
612 [ECONNREFUSED] = TARGET_ECONNREFUSED,
613 [EHOSTDOWN] = TARGET_EHOSTDOWN,
614 [EHOSTUNREACH] = TARGET_EHOSTUNREACH,
615 [EALREADY] = TARGET_EALREADY,
616 [EINPROGRESS] = TARGET_EINPROGRESS,
617 [ESTALE] = TARGET_ESTALE,
618 [ECANCELED] = TARGET_ECANCELED,
619 [ENOMEDIUM] = TARGET_ENOMEDIUM,
620 [EMEDIUMTYPE] = TARGET_EMEDIUMTYPE,
621 #ifdef ENOKEY
622 [ENOKEY] = TARGET_ENOKEY,
623 #endif
624 #ifdef EKEYEXPIRED
625 [EKEYEXPIRED] = TARGET_EKEYEXPIRED,
626 #endif
627 #ifdef EKEYREVOKED
628 [EKEYREVOKED] = TARGET_EKEYREVOKED,
629 #endif
630 #ifdef EKEYREJECTED
631 [EKEYREJECTED] = TARGET_EKEYREJECTED,
632 #endif
633 #ifdef EOWNERDEAD
634 [EOWNERDEAD] = TARGET_EOWNERDEAD,
635 #endif
636 #ifdef ENOTRECOVERABLE
637 [ENOTRECOVERABLE] = TARGET_ENOTRECOVERABLE,
638 #endif
639 };
640
641 static inline int host_to_target_errno(int err)
642 {
643 if(host_to_target_errno_table[err])
644 return host_to_target_errno_table[err];
645 return err;
646 }
647
648 static inline int target_to_host_errno(int err)
649 {
650 if (target_to_host_errno_table[err])
651 return target_to_host_errno_table[err];
652 return err;
653 }
654
655 static inline abi_long get_errno(abi_long ret)
656 {
657 if (ret == -1)
658 return -host_to_target_errno(errno);
659 else
660 return ret;
661 }
662
663 static inline int is_error(abi_long ret)
664 {
665 return (abi_ulong)ret >= (abi_ulong)(-4096);
666 }
667
668 char *target_strerror(int err)
669 {
670 return strerror(target_to_host_errno(err));
671 }
672
673 static abi_ulong target_brk;
674 static abi_ulong target_original_brk;
675
676 void target_set_brk(abi_ulong new_brk)
677 {
678 target_original_brk = target_brk = HOST_PAGE_ALIGN(new_brk);
679 }
680
681 /* do_brk() must return target values and target errnos. */
682 abi_long do_brk(abi_ulong new_brk)
683 {
684 abi_ulong brk_page;
685 abi_long mapped_addr;
686 int new_alloc_size;
687
688 if (!new_brk)
689 return target_brk;
690 if (new_brk < target_original_brk)
691 return target_brk;
692
693 brk_page = HOST_PAGE_ALIGN(target_brk);
694
695 /* If the new brk is less than this, set it and we're done... */
696 if (new_brk < brk_page) {
697 target_brk = new_brk;
698 return target_brk;
699 }
700
701 /* We need to allocate more memory after the brk... */
702 new_alloc_size = HOST_PAGE_ALIGN(new_brk - brk_page + 1);
703 mapped_addr = get_errno(target_mmap(brk_page, new_alloc_size,
704 PROT_READ|PROT_WRITE,
705 MAP_ANON|MAP_FIXED|MAP_PRIVATE, 0, 0));
706
707 if (!is_error(mapped_addr))
708 target_brk = new_brk;
709
710 return target_brk;
711 }
712
713 static inline abi_long copy_from_user_fdset(fd_set *fds,
714 abi_ulong target_fds_addr,
715 int n)
716 {
717 int i, nw, j, k;
718 abi_ulong b, *target_fds;
719
720 nw = (n + TARGET_ABI_BITS - 1) / TARGET_ABI_BITS;
721 if (!(target_fds = lock_user(VERIFY_READ,
722 target_fds_addr,
723 sizeof(abi_ulong) * nw,
724 1)))
725 return -TARGET_EFAULT;
726
727 FD_ZERO(fds);
728 k = 0;
729 for (i = 0; i < nw; i++) {
730 /* grab the abi_ulong */
731 __get_user(b, &target_fds[i]);
732 for (j = 0; j < TARGET_ABI_BITS; j++) {
733 /* check the bit inside the abi_ulong */
734 if ((b >> j) & 1)
735 FD_SET(k, fds);
736 k++;
737 }
738 }
739
740 unlock_user(target_fds, target_fds_addr, 0);
741
742 return 0;
743 }
744
745 static inline abi_long copy_to_user_fdset(abi_ulong target_fds_addr,
746 const fd_set *fds,
747 int n)
748 {
749 int i, nw, j, k;
750 abi_long v;
751 abi_ulong *target_fds;
752
753 nw = (n + TARGET_ABI_BITS - 1) / TARGET_ABI_BITS;
754 if (!(target_fds = lock_user(VERIFY_WRITE,
755 target_fds_addr,
756 sizeof(abi_ulong) * nw,
757 0)))
758 return -TARGET_EFAULT;
759
760 k = 0;
761 for (i = 0; i < nw; i++) {
762 v = 0;
763 for (j = 0; j < TARGET_ABI_BITS; j++) {
764 v |= ((FD_ISSET(k, fds) != 0) << j);
765 k++;
766 }
767 __put_user(v, &target_fds[i]);
768 }
769
770 unlock_user(target_fds, target_fds_addr, sizeof(abi_ulong) * nw);
771
772 return 0;
773 }
774
775 #if defined(__alpha__)
776 #define HOST_HZ 1024
777 #else
778 #define HOST_HZ 100
779 #endif
780
781 static inline abi_long host_to_target_clock_t(long ticks)
782 {
783 #if HOST_HZ == TARGET_HZ
784 return ticks;
785 #else
786 return ((int64_t)ticks * TARGET_HZ) / HOST_HZ;
787 #endif
788 }
789
790 static inline abi_long host_to_target_rusage(abi_ulong target_addr,
791 const struct rusage *rusage)
792 {
793 struct target_rusage *target_rusage;
794
795 if (!lock_user_struct(VERIFY_WRITE, target_rusage, target_addr, 0))
796 return -TARGET_EFAULT;
797 target_rusage->ru_utime.tv_sec = tswapl(rusage->ru_utime.tv_sec);
798 target_rusage->ru_utime.tv_usec = tswapl(rusage->ru_utime.tv_usec);
799 target_rusage->ru_stime.tv_sec = tswapl(rusage->ru_stime.tv_sec);
800 target_rusage->ru_stime.tv_usec = tswapl(rusage->ru_stime.tv_usec);
801 target_rusage->ru_maxrss = tswapl(rusage->ru_maxrss);
802 target_rusage->ru_ixrss = tswapl(rusage->ru_ixrss);
803 target_rusage->ru_idrss = tswapl(rusage->ru_idrss);
804 target_rusage->ru_isrss = tswapl(rusage->ru_isrss);
805 target_rusage->ru_minflt = tswapl(rusage->ru_minflt);
806 target_rusage->ru_majflt = tswapl(rusage->ru_majflt);
807 target_rusage->ru_nswap = tswapl(rusage->ru_nswap);
808 target_rusage->ru_inblock = tswapl(rusage->ru_inblock);
809 target_rusage->ru_oublock = tswapl(rusage->ru_oublock);
810 target_rusage->ru_msgsnd = tswapl(rusage->ru_msgsnd);
811 target_rusage->ru_msgrcv = tswapl(rusage->ru_msgrcv);
812 target_rusage->ru_nsignals = tswapl(rusage->ru_nsignals);
813 target_rusage->ru_nvcsw = tswapl(rusage->ru_nvcsw);
814 target_rusage->ru_nivcsw = tswapl(rusage->ru_nivcsw);
815 unlock_user_struct(target_rusage, target_addr, 1);
816
817 return 0;
818 }
819
820 static inline abi_long copy_from_user_timeval(struct timeval *tv,
821 abi_ulong target_tv_addr)
822 {
823 struct target_timeval *target_tv;
824
825 if (!lock_user_struct(VERIFY_READ, target_tv, target_tv_addr, 1))
826 return -TARGET_EFAULT;
827
828 __get_user(tv->tv_sec, &target_tv->tv_sec);
829 __get_user(tv->tv_usec, &target_tv->tv_usec);
830
831 unlock_user_struct(target_tv, target_tv_addr, 0);
832
833 return 0;
834 }
835
836 static inline abi_long copy_to_user_timeval(abi_ulong target_tv_addr,
837 const struct timeval *tv)
838 {
839 struct target_timeval *target_tv;
840
841 if (!lock_user_struct(VERIFY_WRITE, target_tv, target_tv_addr, 0))
842 return -TARGET_EFAULT;
843
844 __put_user(tv->tv_sec, &target_tv->tv_sec);
845 __put_user(tv->tv_usec, &target_tv->tv_usec);
846
847 unlock_user_struct(target_tv, target_tv_addr, 1);
848
849 return 0;
850 }
851
852 #if defined(TARGET_NR_mq_open) && defined(__NR_mq_open)
853 #include <mqueue.h>
854
855 static inline abi_long copy_from_user_mq_attr(struct mq_attr *attr,
856 abi_ulong target_mq_attr_addr)
857 {
858 struct target_mq_attr *target_mq_attr;
859
860 if (!lock_user_struct(VERIFY_READ, target_mq_attr,
861 target_mq_attr_addr, 1))
862 return -TARGET_EFAULT;
863
864 __get_user(attr->mq_flags, &target_mq_attr->mq_flags);
865 __get_user(attr->mq_maxmsg, &target_mq_attr->mq_maxmsg);
866 __get_user(attr->mq_msgsize, &target_mq_attr->mq_msgsize);
867 __get_user(attr->mq_curmsgs, &target_mq_attr->mq_curmsgs);
868
869 unlock_user_struct(target_mq_attr, target_mq_attr_addr, 0);
870
871 return 0;
872 }
873
874 static inline abi_long copy_to_user_mq_attr(abi_ulong target_mq_attr_addr,
875 const struct mq_attr *attr)
876 {
877 struct target_mq_attr *target_mq_attr;
878
879 if (!lock_user_struct(VERIFY_WRITE, target_mq_attr,
880 target_mq_attr_addr, 0))
881 return -TARGET_EFAULT;
882
883 __put_user(attr->mq_flags, &target_mq_attr->mq_flags);
884 __put_user(attr->mq_maxmsg, &target_mq_attr->mq_maxmsg);
885 __put_user(attr->mq_msgsize, &target_mq_attr->mq_msgsize);
886 __put_user(attr->mq_curmsgs, &target_mq_attr->mq_curmsgs);
887
888 unlock_user_struct(target_mq_attr, target_mq_attr_addr, 1);
889
890 return 0;
891 }
892 #endif
893
894 /* do_select() must return target values and target errnos. */
895 static abi_long do_select(int n,
896 abi_ulong rfd_addr, abi_ulong wfd_addr,
897 abi_ulong efd_addr, abi_ulong target_tv_addr)
898 {
899 fd_set rfds, wfds, efds;
900 fd_set *rfds_ptr, *wfds_ptr, *efds_ptr;
901 struct timeval tv, *tv_ptr;
902 abi_long ret;
903
904 if (rfd_addr) {
905 if (copy_from_user_fdset(&rfds, rfd_addr, n))
906 return -TARGET_EFAULT;
907 rfds_ptr = &rfds;
908 } else {
909 rfds_ptr = NULL;
910 }
911 if (wfd_addr) {
912 if (copy_from_user_fdset(&wfds, wfd_addr, n))
913 return -TARGET_EFAULT;
914 wfds_ptr = &wfds;
915 } else {
916 wfds_ptr = NULL;
917 }
918 if (efd_addr) {
919 if (copy_from_user_fdset(&efds, efd_addr, n))
920 return -TARGET_EFAULT;
921 efds_ptr = &efds;
922 } else {
923 efds_ptr = NULL;
924 }
925
926 if (target_tv_addr) {
927 if (copy_from_user_timeval(&tv, target_tv_addr))
928 return -TARGET_EFAULT;
929 tv_ptr = &tv;
930 } else {
931 tv_ptr = NULL;
932 }
933
934 ret = get_errno(select(n, rfds_ptr, wfds_ptr, efds_ptr, tv_ptr));
935
936 if (!is_error(ret)) {
937 if (rfd_addr && copy_to_user_fdset(rfd_addr, &rfds, n))
938 return -TARGET_EFAULT;
939 if (wfd_addr && copy_to_user_fdset(wfd_addr, &wfds, n))
940 return -TARGET_EFAULT;
941 if (efd_addr && copy_to_user_fdset(efd_addr, &efds, n))
942 return -TARGET_EFAULT;
943
944 if (target_tv_addr && copy_to_user_timeval(target_tv_addr, &tv))
945 return -TARGET_EFAULT;
946 }
947
948 return ret;
949 }
950
951 static abi_long do_pipe2(int host_pipe[], int flags)
952 {
953 #ifdef CONFIG_PIPE2
954 return pipe2(host_pipe, flags);
955 #else
956 return -ENOSYS;
957 #endif
958 }
959
960 static abi_long do_pipe(void *cpu_env, abi_ulong pipedes, int flags)
961 {
962 int host_pipe[2];
963 abi_long ret;
964 ret = flags ? do_pipe2(host_pipe, flags) : pipe(host_pipe);
965
966 if (is_error(ret))
967 return get_errno(ret);
968 #if defined(TARGET_MIPS)
969 ((CPUMIPSState*)cpu_env)->active_tc.gpr[3] = host_pipe[1];
970 ret = host_pipe[0];
971 #elif defined(TARGET_SH4)
972 ((CPUSH4State*)cpu_env)->gregs[1] = host_pipe[1];
973 ret = host_pipe[0];
974 #else
975 if (put_user_s32(host_pipe[0], pipedes)
976 || put_user_s32(host_pipe[1], pipedes + sizeof(host_pipe[0])))
977 return -TARGET_EFAULT;
978 #endif
979 return get_errno(ret);
980 }
981
982 static inline abi_long target_to_host_ip_mreq(struct ip_mreqn *mreqn,
983 abi_ulong target_addr,
984 socklen_t len)
985 {
986 struct target_ip_mreqn *target_smreqn;
987
988 target_smreqn = lock_user(VERIFY_READ, target_addr, len, 1);
989 if (!target_smreqn)
990 return -TARGET_EFAULT;
991 mreqn->imr_multiaddr.s_addr = target_smreqn->imr_multiaddr.s_addr;
992 mreqn->imr_address.s_addr = target_smreqn->imr_address.s_addr;
993 if (len == sizeof(struct target_ip_mreqn))
994 mreqn->imr_ifindex = tswapl(target_smreqn->imr_ifindex);
995 unlock_user(target_smreqn, target_addr, 0);
996
997 return 0;
998 }
999
1000 static inline abi_long target_to_host_sockaddr(struct sockaddr *addr,
1001 abi_ulong target_addr,
1002 socklen_t len)
1003 {
1004 const socklen_t unix_maxlen = sizeof (struct sockaddr_un);
1005 sa_family_t sa_family;
1006 struct target_sockaddr *target_saddr;
1007
1008 target_saddr = lock_user(VERIFY_READ, target_addr, len, 1);
1009 if (!target_saddr)
1010 return -TARGET_EFAULT;
1011
1012 sa_family = tswap16(target_saddr->sa_family);
1013
1014 /* Oops. The caller might send a incomplete sun_path; sun_path
1015 * must be terminated by \0 (see the manual page), but
1016 * unfortunately it is quite common to specify sockaddr_un
1017 * length as "strlen(x->sun_path)" while it should be
1018 * "strlen(...) + 1". We'll fix that here if needed.
1019 * Linux kernel has a similar feature.
1020 */
1021
1022 if (sa_family == AF_UNIX) {
1023 if (len < unix_maxlen && len > 0) {
1024 char *cp = (char*)target_saddr;
1025
1026 if ( cp[len-1] && !cp[len] )
1027 len++;
1028 }
1029 if (len > unix_maxlen)
1030 len = unix_maxlen;
1031 }
1032
1033 memcpy(addr, target_saddr, len);
1034 addr->sa_family = sa_family;
1035 unlock_user(target_saddr, target_addr, 0);
1036
1037 return 0;
1038 }
1039
1040 static inline abi_long host_to_target_sockaddr(abi_ulong target_addr,
1041 struct sockaddr *addr,
1042 socklen_t len)
1043 {
1044 struct target_sockaddr *target_saddr;
1045
1046 target_saddr = lock_user(VERIFY_WRITE, target_addr, len, 0);
1047 if (!target_saddr)
1048 return -TARGET_EFAULT;
1049 memcpy(target_saddr, addr, len);
1050 target_saddr->sa_family = tswap16(addr->sa_family);
1051 unlock_user(target_saddr, target_addr, len);
1052
1053 return 0;
1054 }
1055
1056 /* ??? Should this also swap msgh->name? */
1057 static inline abi_long target_to_host_cmsg(struct msghdr *msgh,
1058 struct target_msghdr *target_msgh)
1059 {
1060 struct cmsghdr *cmsg = CMSG_FIRSTHDR(msgh);
1061 abi_long msg_controllen;
1062 abi_ulong target_cmsg_addr;
1063 struct target_cmsghdr *target_cmsg;
1064 socklen_t space = 0;
1065
1066 msg_controllen = tswapl(target_msgh->msg_controllen);
1067 if (msg_controllen < sizeof (struct target_cmsghdr))
1068 goto the_end;
1069 target_cmsg_addr = tswapl(target_msgh->msg_control);
1070 target_cmsg = lock_user(VERIFY_READ, target_cmsg_addr, msg_controllen, 1);
1071 if (!target_cmsg)
1072 return -TARGET_EFAULT;
1073
1074 while (cmsg && target_cmsg) {
1075 void *data = CMSG_DATA(cmsg);
1076 void *target_data = TARGET_CMSG_DATA(target_cmsg);
1077
1078 int len = tswapl(target_cmsg->cmsg_len)
1079 - TARGET_CMSG_ALIGN(sizeof (struct target_cmsghdr));
1080
1081 space += CMSG_SPACE(len);
1082 if (space > msgh->msg_controllen) {
1083 space -= CMSG_SPACE(len);
1084 gemu_log("Host cmsg overflow\n");
1085 break;
1086 }
1087
1088 cmsg->cmsg_level = tswap32(target_cmsg->cmsg_level);
1089 cmsg->cmsg_type = tswap32(target_cmsg->cmsg_type);
1090 cmsg->cmsg_len = CMSG_LEN(len);
1091
1092 if (cmsg->cmsg_level != TARGET_SOL_SOCKET || cmsg->cmsg_type != SCM_RIGHTS) {
1093 gemu_log("Unsupported ancillary data: %d/%d\n", cmsg->cmsg_level, cmsg->cmsg_type);
1094 memcpy(data, target_data, len);
1095 } else {
1096 int *fd = (int *)data;
1097 int *target_fd = (int *)target_data;
1098 int i, numfds = len / sizeof(int);
1099
1100 for (i = 0; i < numfds; i++)
1101 fd[i] = tswap32(target_fd[i]);
1102 }
1103
1104 cmsg = CMSG_NXTHDR(msgh, cmsg);
1105 target_cmsg = TARGET_CMSG_NXTHDR(target_msgh, target_cmsg);
1106 }
1107 unlock_user(target_cmsg, target_cmsg_addr, 0);
1108 the_end:
1109 msgh->msg_controllen = space;
1110 return 0;
1111 }
1112
1113 /* ??? Should this also swap msgh->name? */
1114 static inline abi_long host_to_target_cmsg(struct target_msghdr *target_msgh,
1115 struct msghdr *msgh)
1116 {
1117 struct cmsghdr *cmsg = CMSG_FIRSTHDR(msgh);
1118 abi_long msg_controllen;
1119 abi_ulong target_cmsg_addr;
1120 struct target_cmsghdr *target_cmsg;
1121 socklen_t space = 0;
1122
1123 msg_controllen = tswapl(target_msgh->msg_controllen);
1124 if (msg_controllen < sizeof (struct target_cmsghdr))
1125 goto the_end;
1126 target_cmsg_addr = tswapl(target_msgh->msg_control);
1127 target_cmsg = lock_user(VERIFY_WRITE, target_cmsg_addr, msg_controllen, 0);
1128 if (!target_cmsg)
1129 return -TARGET_EFAULT;
1130
1131 while (cmsg && target_cmsg) {
1132 void *data = CMSG_DATA(cmsg);
1133 void *target_data = TARGET_CMSG_DATA(target_cmsg);
1134
1135 int len = cmsg->cmsg_len - CMSG_ALIGN(sizeof (struct cmsghdr));
1136
1137 space += TARGET_CMSG_SPACE(len);
1138 if (space > msg_controllen) {
1139 space -= TARGET_CMSG_SPACE(len);
1140 gemu_log("Target cmsg overflow\n");
1141 break;
1142 }
1143
1144 target_cmsg->cmsg_level = tswap32(cmsg->cmsg_level);
1145 target_cmsg->cmsg_type = tswap32(cmsg->cmsg_type);
1146 target_cmsg->cmsg_len = tswapl(TARGET_CMSG_LEN(len));
1147
1148 if (cmsg->cmsg_level != TARGET_SOL_SOCKET || cmsg->cmsg_type != SCM_RIGHTS) {
1149 gemu_log("Unsupported ancillary data: %d/%d\n", cmsg->cmsg_level, cmsg->cmsg_type);
1150 memcpy(target_data, data, len);
1151 } else {
1152 int *fd = (int *)data;
1153 int *target_fd = (int *)target_data;
1154 int i, numfds = len / sizeof(int);
1155
1156 for (i = 0; i < numfds; i++)
1157 target_fd[i] = tswap32(fd[i]);
1158 }
1159
1160 cmsg = CMSG_NXTHDR(msgh, cmsg);
1161 target_cmsg = TARGET_CMSG_NXTHDR(target_msgh, target_cmsg);
1162 }
1163 unlock_user(target_cmsg, target_cmsg_addr, space);
1164 the_end:
1165 target_msgh->msg_controllen = tswapl(space);
1166 return 0;
1167 }
1168
1169 /* do_setsockopt() Must return target values and target errnos. */
1170 static abi_long do_setsockopt(int sockfd, int level, int optname,
1171 abi_ulong optval_addr, socklen_t optlen)
1172 {
1173 abi_long ret;
1174 int val;
1175 struct ip_mreqn *ip_mreq;
1176 struct ip_mreq_source *ip_mreq_source;
1177
1178 switch(level) {
1179 case SOL_TCP:
1180 /* TCP options all take an 'int' value. */
1181 if (optlen < sizeof(uint32_t))
1182 return -TARGET_EINVAL;
1183
1184 if (get_user_u32(val, optval_addr))
1185 return -TARGET_EFAULT;
1186 ret = get_errno(setsockopt(sockfd, level, optname, &val, sizeof(val)));
1187 break;
1188 case SOL_IP:
1189 switch(optname) {
1190 case IP_TOS:
1191 case IP_TTL:
1192 case IP_HDRINCL:
1193 case IP_ROUTER_ALERT:
1194 case IP_RECVOPTS:
1195 case IP_RETOPTS:
1196 case IP_PKTINFO:
1197 case IP_MTU_DISCOVER:
1198 case IP_RECVERR:
1199 case IP_RECVTOS:
1200 #ifdef IP_FREEBIND
1201 case IP_FREEBIND:
1202 #endif
1203 case IP_MULTICAST_TTL:
1204 case IP_MULTICAST_LOOP:
1205 val = 0;
1206 if (optlen >= sizeof(uint32_t)) {
1207 if (get_user_u32(val, optval_addr))
1208 return -TARGET_EFAULT;
1209 } else if (optlen >= 1) {
1210 if (get_user_u8(val, optval_addr))
1211 return -TARGET_EFAULT;
1212 }
1213 ret = get_errno(setsockopt(sockfd, level, optname, &val, sizeof(val)));
1214 break;
1215 case IP_ADD_MEMBERSHIP:
1216 case IP_DROP_MEMBERSHIP:
1217 if (optlen < sizeof (struct target_ip_mreq) ||
1218 optlen > sizeof (struct target_ip_mreqn))
1219 return -TARGET_EINVAL;
1220
1221 ip_mreq = (struct ip_mreqn *) alloca(optlen);
1222 target_to_host_ip_mreq(ip_mreq, optval_addr, optlen);
1223 ret = get_errno(setsockopt(sockfd, level, optname, ip_mreq, optlen));
1224 break;
1225
1226 case IP_BLOCK_SOURCE:
1227 case IP_UNBLOCK_SOURCE:
1228 case IP_ADD_SOURCE_MEMBERSHIP:
1229 case IP_DROP_SOURCE_MEMBERSHIP:
1230 if (optlen != sizeof (struct target_ip_mreq_source))
1231 return -TARGET_EINVAL;
1232
1233 ip_mreq_source = lock_user(VERIFY_READ, optval_addr, optlen, 1);
1234 ret = get_errno(setsockopt(sockfd, level, optname, ip_mreq_source, optlen));
1235 unlock_user (ip_mreq_source, optval_addr, 0);
1236 break;
1237
1238 default:
1239 goto unimplemented;
1240 }
1241 break;
1242 case TARGET_SOL_SOCKET:
1243 switch (optname) {
1244 /* Options with 'int' argument. */
1245 case TARGET_SO_DEBUG:
1246 optname = SO_DEBUG;
1247 break;
1248 case TARGET_SO_REUSEADDR:
1249 optname = SO_REUSEADDR;
1250 break;
1251 case TARGET_SO_TYPE:
1252 optname = SO_TYPE;
1253 break;
1254 case TARGET_SO_ERROR:
1255 optname = SO_ERROR;
1256 break;
1257 case TARGET_SO_DONTROUTE:
1258 optname = SO_DONTROUTE;
1259 break;
1260 case TARGET_SO_BROADCAST:
1261 optname = SO_BROADCAST;
1262 break;
1263 case TARGET_SO_SNDBUF:
1264 optname = SO_SNDBUF;
1265 break;
1266 case TARGET_SO_RCVBUF:
1267 optname = SO_RCVBUF;
1268 break;
1269 case TARGET_SO_KEEPALIVE:
1270 optname = SO_KEEPALIVE;
1271 break;
1272 case TARGET_SO_OOBINLINE:
1273 optname = SO_OOBINLINE;
1274 break;
1275 case TARGET_SO_NO_CHECK:
1276 optname = SO_NO_CHECK;
1277 break;
1278 case TARGET_SO_PRIORITY:
1279 optname = SO_PRIORITY;
1280 break;
1281 #ifdef SO_BSDCOMPAT
1282 case TARGET_SO_BSDCOMPAT:
1283 optname = SO_BSDCOMPAT;
1284 break;
1285 #endif
1286 case TARGET_SO_PASSCRED:
1287 optname = SO_PASSCRED;
1288 break;
1289 case TARGET_SO_TIMESTAMP:
1290 optname = SO_TIMESTAMP;
1291 break;
1292 case TARGET_SO_RCVLOWAT:
1293 optname = SO_RCVLOWAT;
1294 break;
1295 case TARGET_SO_RCVTIMEO:
1296 optname = SO_RCVTIMEO;
1297 break;
1298 case TARGET_SO_SNDTIMEO:
1299 optname = SO_SNDTIMEO;
1300 break;
1301 break;
1302 default:
1303 goto unimplemented;
1304 }
1305 if (optlen < sizeof(uint32_t))
1306 return -TARGET_EINVAL;
1307
1308 if (get_user_u32(val, optval_addr))
1309 return -TARGET_EFAULT;
1310 ret = get_errno(setsockopt(sockfd, SOL_SOCKET, optname, &val, sizeof(val)));
1311 break;
1312 default:
1313 unimplemented:
1314 gemu_log("Unsupported setsockopt level=%d optname=%d \n", level, optname);
1315 ret = -TARGET_ENOPROTOOPT;
1316 }
1317 return ret;
1318 }
1319
1320 /* do_getsockopt() Must return target values and target errnos. */
1321 static abi_long do_getsockopt(int sockfd, int level, int optname,
1322 abi_ulong optval_addr, abi_ulong optlen)
1323 {
1324 abi_long ret;
1325 int len, val;
1326 socklen_t lv;
1327
1328 switch(level) {
1329 case TARGET_SOL_SOCKET:
1330 level = SOL_SOCKET;
1331 switch (optname) {
1332 case TARGET_SO_LINGER:
1333 case TARGET_SO_RCVTIMEO:
1334 case TARGET_SO_SNDTIMEO:
1335 case TARGET_SO_PEERCRED:
1336 case TARGET_SO_PEERNAME:
1337 /* These don't just return a single integer */
1338 goto unimplemented;
1339 default:
1340 goto int_case;
1341 }
1342 break;
1343 case SOL_TCP:
1344 /* TCP options all take an 'int' value. */
1345 int_case:
1346 if (get_user_u32(len, optlen))
1347 return -TARGET_EFAULT;
1348 if (len < 0)
1349 return -TARGET_EINVAL;
1350 lv = sizeof(int);
1351 ret = get_errno(getsockopt(sockfd, level, optname, &val, &lv));
1352 if (ret < 0)
1353 return ret;
1354 if (len > lv)
1355 len = lv;
1356 if (len == 4) {
1357 if (put_user_u32(val, optval_addr))
1358 return -TARGET_EFAULT;
1359 } else {
1360 if (put_user_u8(val, optval_addr))
1361 return -TARGET_EFAULT;
1362 }
1363 if (put_user_u32(len, optlen))
1364 return -TARGET_EFAULT;
1365 break;
1366 case SOL_IP:
1367 switch(optname) {
1368 case IP_TOS:
1369 case IP_TTL:
1370 case IP_HDRINCL:
1371 case IP_ROUTER_ALERT:
1372 case IP_RECVOPTS:
1373 case IP_RETOPTS:
1374 case IP_PKTINFO:
1375 case IP_MTU_DISCOVER:
1376 case IP_RECVERR:
1377 case IP_RECVTOS:
1378 #ifdef IP_FREEBIND
1379 case IP_FREEBIND:
1380 #endif
1381 case IP_MULTICAST_TTL:
1382 case IP_MULTICAST_LOOP:
1383 if (get_user_u32(len, optlen))
1384 return -TARGET_EFAULT;
1385 if (len < 0)
1386 return -TARGET_EINVAL;
1387 lv = sizeof(int);
1388 ret = get_errno(getsockopt(sockfd, level, optname, &val, &lv));
1389 if (ret < 0)
1390 return ret;
1391 if (len < sizeof(int) && len > 0 && val >= 0 && val < 255) {
1392 len = 1;
1393 if (put_user_u32(len, optlen)
1394 || put_user_u8(val, optval_addr))
1395 return -TARGET_EFAULT;
1396 } else {
1397 if (len > sizeof(int))
1398 len = sizeof(int);
1399 if (put_user_u32(len, optlen)
1400 || put_user_u32(val, optval_addr))
1401 return -TARGET_EFAULT;
1402 }
1403 break;
1404 default:
1405 ret = -TARGET_ENOPROTOOPT;
1406 break;
1407 }
1408 break;
1409 default:
1410 unimplemented:
1411 gemu_log("getsockopt level=%d optname=%d not yet supported\n",
1412 level, optname);
1413 ret = -TARGET_EOPNOTSUPP;
1414 break;
1415 }
1416 return ret;
1417 }
1418
1419 /* FIXME
1420 * lock_iovec()/unlock_iovec() have a return code of 0 for success where
1421 * other lock functions have a return code of 0 for failure.
1422 */
1423 static abi_long lock_iovec(int type, struct iovec *vec, abi_ulong target_addr,
1424 int count, int copy)
1425 {
1426 struct target_iovec *target_vec;
1427 abi_ulong base;
1428 int i;
1429
1430 target_vec = lock_user(VERIFY_READ, target_addr, count * sizeof(struct target_iovec), 1);
1431 if (!target_vec)
1432 return -TARGET_EFAULT;
1433 for(i = 0;i < count; i++) {
1434 base = tswapl(target_vec[i].iov_base);
1435 vec[i].iov_len = tswapl(target_vec[i].iov_len);
1436 if (vec[i].iov_len != 0) {
1437 vec[i].iov_base = lock_user(type, base, vec[i].iov_len, copy);
1438 /* Don't check lock_user return value. We must call writev even
1439 if a element has invalid base address. */
1440 } else {
1441 /* zero length pointer is ignored */
1442 vec[i].iov_base = NULL;
1443 }
1444 }
1445 unlock_user (target_vec, target_addr, 0);
1446 return 0;
1447 }
1448
1449 static abi_long unlock_iovec(struct iovec *vec, abi_ulong target_addr,
1450 int count, int copy)
1451 {
1452 struct target_iovec *target_vec;
1453 abi_ulong base;
1454 int i;
1455
1456 target_vec = lock_user(VERIFY_READ, target_addr, count * sizeof(struct target_iovec), 1);
1457 if (!target_vec)
1458 return -TARGET_EFAULT;
1459 for(i = 0;i < count; i++) {
1460 if (target_vec[i].iov_base) {
1461 base = tswapl(target_vec[i].iov_base);
1462 unlock_user(vec[i].iov_base, base, copy ? vec[i].iov_len : 0);
1463 }
1464 }
1465 unlock_user (target_vec, target_addr, 0);
1466
1467 return 0;
1468 }
1469
1470 /* do_socket() Must return target values and target errnos. */
1471 static abi_long do_socket(int domain, int type, int protocol)
1472 {
1473 #if defined(TARGET_MIPS)
1474 switch(type) {
1475 case TARGET_SOCK_DGRAM:
1476 type = SOCK_DGRAM;
1477 break;
1478 case TARGET_SOCK_STREAM:
1479 type = SOCK_STREAM;
1480 break;
1481 case TARGET_SOCK_RAW:
1482 type = SOCK_RAW;
1483 break;
1484 case TARGET_SOCK_RDM:
1485 type = SOCK_RDM;
1486 break;
1487 case TARGET_SOCK_SEQPACKET:
1488 type = SOCK_SEQPACKET;
1489 break;
1490 case TARGET_SOCK_PACKET:
1491 type = SOCK_PACKET;
1492 break;
1493 }
1494 #endif
1495 if (domain == PF_NETLINK)
1496 return -EAFNOSUPPORT; /* do not NETLINK socket connections possible */
1497 return get_errno(socket(domain, type, protocol));
1498 }
1499
1500 /* do_bind() Must return target values and target errnos. */
1501 static abi_long do_bind(int sockfd, abi_ulong target_addr,
1502 socklen_t addrlen)
1503 {
1504 void *addr;
1505 abi_long ret;
1506
1507 if (addrlen < 0)
1508 return -TARGET_EINVAL;
1509
1510 addr = alloca(addrlen+1);
1511
1512 ret = target_to_host_sockaddr(addr, target_addr, addrlen);
1513 if (ret)
1514 return ret;
1515
1516 return get_errno(bind(sockfd, addr, addrlen));
1517 }
1518
1519 /* do_connect() Must return target values and target errnos. */
1520 static abi_long do_connect(int sockfd, abi_ulong target_addr,
1521 socklen_t addrlen)
1522 {
1523 void *addr;
1524 abi_long ret;
1525
1526 if (addrlen < 0)
1527 return -TARGET_EINVAL;
1528
1529 addr = alloca(addrlen);
1530
1531 ret = target_to_host_sockaddr(addr, target_addr, addrlen);
1532 if (ret)
1533 return ret;
1534
1535 return get_errno(connect(sockfd, addr, addrlen));
1536 }
1537
1538 /* do_sendrecvmsg() Must return target values and target errnos. */
1539 static abi_long do_sendrecvmsg(int fd, abi_ulong target_msg,
1540 int flags, int send)
1541 {
1542 abi_long ret, len;
1543 struct target_msghdr *msgp;
1544 struct msghdr msg;
1545 int count;
1546 struct iovec *vec;
1547 abi_ulong target_vec;
1548
1549 /* FIXME */
1550 if (!lock_user_struct(send ? VERIFY_READ : VERIFY_WRITE,
1551 msgp,
1552 target_msg,
1553 send ? 1 : 0))
1554 return -TARGET_EFAULT;
1555 if (msgp->msg_name) {
1556 msg.msg_namelen = tswap32(msgp->msg_namelen);
1557 msg.msg_name = alloca(msg.msg_namelen);
1558 ret = target_to_host_sockaddr(msg.msg_name, tswapl(msgp->msg_name),
1559 msg.msg_namelen);
1560 if (ret) {
1561 unlock_user_struct(msgp, target_msg, send ? 0 : 1);
1562 return ret;
1563 }
1564 } else {
1565 msg.msg_name = NULL;
1566 msg.msg_namelen = 0;
1567 }
1568 msg.msg_controllen = 2 * tswapl(msgp->msg_controllen);
1569 msg.msg_control = alloca(msg.msg_controllen);
1570 msg.msg_flags = tswap32(msgp->msg_flags);
1571
1572 count = tswapl(msgp->msg_iovlen);
1573 vec = alloca(count * sizeof(struct iovec));
1574 target_vec = tswapl(msgp->msg_iov);
1575 lock_iovec(send ? VERIFY_READ : VERIFY_WRITE, vec, target_vec, count, send);
1576 msg.msg_iovlen = count;
1577 msg.msg_iov = vec;
1578
1579 if (send) {
1580 ret = target_to_host_cmsg(&msg, msgp);
1581 if (ret == 0)
1582 ret = get_errno(sendmsg(fd, &msg, flags));
1583 } else {
1584 ret = get_errno(recvmsg(fd, &msg, flags));
1585 if (!is_error(ret)) {
1586 len = ret;
1587 ret = host_to_target_cmsg(msgp, &msg);
1588 if (!is_error(ret))
1589 ret = len;
1590 }
1591 }
1592 unlock_iovec(vec, target_vec, count, !send);
1593 unlock_user_struct(msgp, target_msg, send ? 0 : 1);
1594 return ret;
1595 }
1596
1597 /* do_accept() Must return target values and target errnos. */
1598 static abi_long do_accept(int fd, abi_ulong target_addr,
1599 abi_ulong target_addrlen_addr)
1600 {
1601 socklen_t addrlen;
1602 void *addr;
1603 abi_long ret;
1604
1605 if (target_addr == 0)
1606 return get_errno(accept(fd, NULL, NULL));
1607
1608 /* linux returns EINVAL if addrlen pointer is invalid */
1609 if (get_user_u32(addrlen, target_addrlen_addr))
1610 return -TARGET_EINVAL;
1611
1612 if (addrlen < 0)
1613 return -TARGET_EINVAL;
1614
1615 if (!access_ok(VERIFY_WRITE, target_addr, addrlen))
1616 return -TARGET_EINVAL;
1617
1618 addr = alloca(addrlen);
1619
1620 ret = get_errno(accept(fd, addr, &addrlen));
1621 if (!is_error(ret)) {
1622 host_to_target_sockaddr(target_addr, addr, addrlen);
1623 if (put_user_u32(addrlen, target_addrlen_addr))
1624 ret = -TARGET_EFAULT;
1625 }
1626 return ret;
1627 }
1628
1629 /* do_getpeername() Must return target values and target errnos. */
1630 static abi_long do_getpeername(int fd, abi_ulong target_addr,
1631 abi_ulong target_addrlen_addr)
1632 {
1633 socklen_t addrlen;
1634 void *addr;
1635 abi_long ret;
1636
1637 if (get_user_u32(addrlen, target_addrlen_addr))
1638 return -TARGET_EFAULT;
1639
1640 if (addrlen < 0)
1641 return -TARGET_EINVAL;
1642
1643 if (!access_ok(VERIFY_WRITE, target_addr, addrlen))
1644 return -TARGET_EFAULT;
1645
1646 addr = alloca(addrlen);
1647
1648 ret = get_errno(getpeername(fd, addr, &addrlen));
1649 if (!is_error(ret)) {
1650 host_to_target_sockaddr(target_addr, addr, addrlen);
1651 if (put_user_u32(addrlen, target_addrlen_addr))
1652 ret = -TARGET_EFAULT;
1653 }
1654 return ret;
1655 }
1656
1657 /* do_getsockname() Must return target values and target errnos. */
1658 static abi_long do_getsockname(int fd, abi_ulong target_addr,
1659 abi_ulong target_addrlen_addr)
1660 {
1661 socklen_t addrlen;
1662 void *addr;
1663 abi_long ret;
1664
1665 if (get_user_u32(addrlen, target_addrlen_addr))
1666 return -TARGET_EFAULT;
1667
1668 if (addrlen < 0)
1669 return -TARGET_EINVAL;
1670
1671 if (!access_ok(VERIFY_WRITE, target_addr, addrlen))
1672 return -TARGET_EFAULT;
1673
1674 addr = alloca(addrlen);
1675
1676 ret = get_errno(getsockname(fd, addr, &addrlen));
1677 if (!is_error(ret)) {
1678 host_to_target_sockaddr(target_addr, addr, addrlen);
1679 if (put_user_u32(addrlen, target_addrlen_addr))
1680 ret = -TARGET_EFAULT;
1681 }
1682 return ret;
1683 }
1684
1685 /* do_socketpair() Must return target values and target errnos. */
1686 static abi_long do_socketpair(int domain, int type, int protocol,
1687 abi_ulong target_tab_addr)
1688 {
1689 int tab[2];
1690 abi_long ret;
1691
1692 ret = get_errno(socketpair(domain, type, protocol, tab));
1693 if (!is_error(ret)) {
1694 if (put_user_s32(tab[0], target_tab_addr)
1695 || put_user_s32(tab[1], target_tab_addr + sizeof(tab[0])))
1696 ret = -TARGET_EFAULT;
1697 }
1698 return ret;
1699 }
1700
1701 /* do_sendto() Must return target values and target errnos. */
1702 static abi_long do_sendto(int fd, abi_ulong msg, size_t len, int flags,
1703 abi_ulong target_addr, socklen_t addrlen)
1704 {
1705 void *addr;
1706 void *host_msg;
1707 abi_long ret;
1708
1709 if (addrlen < 0)
1710 return -TARGET_EINVAL;
1711
1712 host_msg = lock_user(VERIFY_READ, msg, len, 1);
1713 if (!host_msg)
1714 return -TARGET_EFAULT;
1715 if (target_addr) {
1716 addr = alloca(addrlen);
1717 ret = target_to_host_sockaddr(addr, target_addr, addrlen);
1718 if (ret) {
1719 unlock_user(host_msg, msg, 0);
1720 return ret;
1721 }
1722 ret = get_errno(sendto(fd, host_msg, len, flags, addr, addrlen));
1723 } else {
1724 ret = get_errno(send(fd, host_msg, len, flags));
1725 }
1726 unlock_user(host_msg, msg, 0);
1727 return ret;
1728 }
1729
1730 /* do_recvfrom() Must return target values and target errnos. */
1731 static abi_long do_recvfrom(int fd, abi_ulong msg, size_t len, int flags,
1732 abi_ulong target_addr,
1733 abi_ulong target_addrlen)
1734 {
1735 socklen_t addrlen;
1736 void *addr;
1737 void *host_msg;
1738 abi_long ret;
1739
1740 host_msg = lock_user(VERIFY_WRITE, msg, len, 0);
1741 if (!host_msg)
1742 return -TARGET_EFAULT;
1743 if (target_addr) {
1744 if (get_user_u32(addrlen, target_addrlen)) {
1745 ret = -TARGET_EFAULT;
1746 goto fail;
1747 }
1748 if (addrlen < 0) {
1749 ret = -TARGET_EINVAL;
1750 goto fail;
1751 }
1752 addr = alloca(addrlen);
1753 ret = get_errno(recvfrom(fd, host_msg, len, flags, addr, &addrlen));
1754 } else {
1755 addr = NULL; /* To keep compiler quiet. */
1756 ret = get_errno(recv(fd, host_msg, len, flags));
1757 }
1758 if (!is_error(ret)) {
1759 if (target_addr) {
1760 host_to_target_sockaddr(target_addr, addr, addrlen);
1761 if (put_user_u32(addrlen, target_addrlen)) {
1762 ret = -TARGET_EFAULT;
1763 goto fail;
1764 }
1765 }
1766 unlock_user(host_msg, msg, len);
1767 } else {
1768 fail:
1769 unlock_user(host_msg, msg, 0);
1770 }
1771 return ret;
1772 }
1773
1774 #ifdef TARGET_NR_socketcall
1775 /* do_socketcall() Must return target values and target errnos. */
1776 static abi_long do_socketcall(int num, abi_ulong vptr)
1777 {
1778 abi_long ret;
1779 const int n = sizeof(abi_ulong);
1780
1781 switch(num) {
1782 case SOCKOP_socket:
1783 {
1784 abi_ulong domain, type, protocol;
1785
1786 if (get_user_ual(domain, vptr)
1787 || get_user_ual(type, vptr + n)
1788 || get_user_ual(protocol, vptr + 2 * n))
1789 return -TARGET_EFAULT;
1790
1791 ret = do_socket(domain, type, protocol);
1792 }
1793 break;
1794 case SOCKOP_bind:
1795 {
1796 abi_ulong sockfd;
1797 abi_ulong target_addr;
1798 socklen_t addrlen;
1799
1800 if (get_user_ual(sockfd, vptr)
1801 || get_user_ual(target_addr, vptr + n)
1802 || get_user_ual(addrlen, vptr + 2 * n))
1803 return -TARGET_EFAULT;
1804
1805 ret = do_bind(sockfd, target_addr, addrlen);
1806 }
1807 break;
1808 case SOCKOP_connect:
1809 {
1810 abi_ulong sockfd;
1811 abi_ulong target_addr;
1812 socklen_t addrlen;
1813
1814 if (get_user_ual(sockfd, vptr)
1815 || get_user_ual(target_addr, vptr + n)
1816 || get_user_ual(addrlen, vptr + 2 * n))
1817 return -TARGET_EFAULT;
1818
1819 ret = do_connect(sockfd, target_addr, addrlen);
1820 }
1821 break;
1822 case SOCKOP_listen:
1823 {
1824 abi_ulong sockfd, backlog;
1825
1826 if (get_user_ual(sockfd, vptr)
1827 || get_user_ual(backlog, vptr + n))
1828 return -TARGET_EFAULT;
1829
1830 ret = get_errno(listen(sockfd, backlog));
1831 }
1832 break;
1833 case SOCKOP_accept:
1834 {
1835 abi_ulong sockfd;
1836 abi_ulong target_addr, target_addrlen;
1837
1838 if (get_user_ual(sockfd, vptr)
1839 || get_user_ual(target_addr, vptr + n)
1840 || get_user_ual(target_addrlen, vptr + 2 * n))
1841 return -TARGET_EFAULT;
1842
1843 ret = do_accept(sockfd, target_addr, target_addrlen);
1844 }
1845 break;
1846 case SOCKOP_getsockname:
1847 {
1848 abi_ulong sockfd;
1849 abi_ulong target_addr, target_addrlen;
1850
1851 if (get_user_ual(sockfd, vptr)
1852 || get_user_ual(target_addr, vptr + n)
1853 || get_user_ual(target_addrlen, vptr + 2 * n))
1854 return -TARGET_EFAULT;
1855
1856 ret = do_getsockname(sockfd, target_addr, target_addrlen);
1857 }
1858 break;
1859 case SOCKOP_getpeername:
1860 {
1861 abi_ulong sockfd;
1862 abi_ulong target_addr, target_addrlen;
1863
1864 if (get_user_ual(sockfd, vptr)
1865 || get_user_ual(target_addr, vptr + n)
1866 || get_user_ual(target_addrlen, vptr + 2 * n))
1867 return -TARGET_EFAULT;
1868
1869 ret = do_getpeername(sockfd, target_addr, target_addrlen);
1870 }
1871 break;
1872 case SOCKOP_socketpair:
1873 {
1874 abi_ulong domain, type, protocol;
1875 abi_ulong tab;
1876
1877 if (get_user_ual(domain, vptr)
1878 || get_user_ual(type, vptr + n)
1879 || get_user_ual(protocol, vptr + 2 * n)
1880 || get_user_ual(tab, vptr + 3 * n))
1881 return -TARGET_EFAULT;
1882
1883 ret = do_socketpair(domain, type, protocol, tab);
1884 }
1885 break;
1886 case SOCKOP_send:
1887 {
1888 abi_ulong sockfd;
1889 abi_ulong msg;
1890 size_t len;
1891 abi_ulong flags;
1892
1893 if (get_user_ual(sockfd, vptr)
1894 || get_user_ual(msg, vptr + n)
1895 || get_user_ual(len, vptr + 2 * n)
1896 || get_user_ual(flags, vptr + 3 * n))
1897 return -TARGET_EFAULT;
1898
1899 ret = do_sendto(sockfd, msg, len, flags, 0, 0);
1900 }
1901 break;
1902 case SOCKOP_recv:
1903 {
1904 abi_ulong sockfd;
1905 abi_ulong msg;
1906 size_t len;
1907 abi_ulong flags;
1908
1909 if (get_user_ual(sockfd, vptr)
1910 || get_user_ual(msg, vptr + n)
1911 || get_user_ual(len, vptr + 2 * n)
1912 || get_user_ual(flags, vptr + 3 * n))
1913 return -TARGET_EFAULT;
1914
1915 ret = do_recvfrom(sockfd, msg, len, flags, 0, 0);
1916 }
1917 break;
1918 case SOCKOP_sendto:
1919 {
1920 abi_ulong sockfd;
1921 abi_ulong msg;
1922 size_t len;
1923 abi_ulong flags;
1924 abi_ulong addr;
1925 socklen_t addrlen;
1926
1927 if (get_user_ual(sockfd, vptr)
1928 || get_user_ual(msg, vptr + n)
1929 || get_user_ual(len, vptr + 2 * n)
1930 || get_user_ual(flags, vptr + 3 * n)
1931 || get_user_ual(addr, vptr + 4 * n)
1932 || get_user_ual(addrlen, vptr + 5 * n))
1933 return -TARGET_EFAULT;
1934
1935 ret = do_sendto(sockfd, msg, len, flags, addr, addrlen);
1936 }
1937 break;
1938 case SOCKOP_recvfrom:
1939 {
1940 abi_ulong sockfd;
1941 abi_ulong msg;
1942 size_t len;
1943 abi_ulong flags;
1944 abi_ulong addr;
1945 socklen_t addrlen;
1946
1947 if (get_user_ual(sockfd, vptr)
1948 || get_user_ual(msg, vptr + n)
1949 || get_user_ual(len, vptr + 2 * n)
1950 || get_user_ual(flags, vptr + 3 * n)
1951 || get_user_ual(addr, vptr + 4 * n)
1952 || get_user_ual(addrlen, vptr + 5 * n))
1953 return -TARGET_EFAULT;
1954
1955 ret = do_recvfrom(sockfd, msg, len, flags, addr, addrlen);
1956 }
1957 break;
1958 case SOCKOP_shutdown:
1959 {
1960 abi_ulong sockfd, how;
1961
1962 if (get_user_ual(sockfd, vptr)
1963 || get_user_ual(how, vptr + n))
1964 return -TARGET_EFAULT;
1965
1966 ret = get_errno(shutdown(sockfd, how));
1967 }
1968 break;
1969 case SOCKOP_sendmsg:
1970 case SOCKOP_recvmsg:
1971 {
1972 abi_ulong fd;
1973 abi_ulong target_msg;
1974 abi_ulong flags;
1975
1976 if (get_user_ual(fd, vptr)
1977 || get_user_ual(target_msg, vptr + n)
1978 || get_user_ual(flags, vptr + 2 * n))
1979 return -TARGET_EFAULT;
1980
1981 ret = do_sendrecvmsg(fd, target_msg, flags,
1982 (num == SOCKOP_sendmsg));
1983 }
1984 break;
1985 case SOCKOP_setsockopt:
1986 {
1987 abi_ulong sockfd;
1988 abi_ulong level;
1989 abi_ulong optname;
1990 abi_ulong optval;
1991 socklen_t optlen;
1992
1993 if (get_user_ual(sockfd, vptr)
1994 || get_user_ual(level, vptr + n)
1995 || get_user_ual(optname, vptr + 2 * n)
1996 || get_user_ual(optval, vptr + 3 * n)
1997 || get_user_ual(optlen, vptr + 4 * n))
1998 return -TARGET_EFAULT;
1999
2000 ret = do_setsockopt(sockfd, level, optname, optval, optlen);
2001 }
2002 break;
2003 case SOCKOP_getsockopt:
2004 {
2005 abi_ulong sockfd;
2006 abi_ulong level;
2007 abi_ulong optname;
2008 abi_ulong optval;
2009 socklen_t optlen;
2010
2011 if (get_user_ual(sockfd, vptr)
2012 || get_user_ual(level, vptr + n)
2013 || get_user_ual(optname, vptr + 2 * n)
2014 || get_user_ual(optval, vptr + 3 * n)
2015 || get_user_ual(optlen, vptr + 4 * n))
2016 return -TARGET_EFAULT;
2017
2018 ret = do_getsockopt(sockfd, level, optname, optval, optlen);
2019 }
2020 break;
2021 default:
2022 gemu_log("Unsupported socketcall: %d\n", num);
2023 ret = -TARGET_ENOSYS;
2024 break;
2025 }
2026 return ret;
2027 }
2028 #endif
2029
2030 #define N_SHM_REGIONS 32
2031
2032 static struct shm_region {
2033 abi_ulong start;
2034 abi_ulong size;
2035 } shm_regions[N_SHM_REGIONS];
2036
2037 struct target_ipc_perm
2038 {
2039 abi_long __key;
2040 abi_ulong uid;
2041 abi_ulong gid;
2042 abi_ulong cuid;
2043 abi_ulong cgid;
2044 unsigned short int mode;
2045 unsigned short int __pad1;
2046 unsigned short int __seq;
2047 unsigned short int __pad2;
2048 abi_ulong __unused1;
2049 abi_ulong __unused2;
2050 };
2051
2052 struct target_semid_ds
2053 {
2054 struct target_ipc_perm sem_perm;
2055 abi_ulong sem_otime;
2056 abi_ulong __unused1;
2057 abi_ulong sem_ctime;
2058 abi_ulong __unused2;
2059 abi_ulong sem_nsems;
2060 abi_ulong __unused3;
2061 abi_ulong __unused4;
2062 };
2063
2064 static inline abi_long target_to_host_ipc_perm(struct ipc_perm *host_ip,
2065 abi_ulong target_addr)
2066 {
2067 struct target_ipc_perm *target_ip;
2068 struct target_semid_ds *target_sd;
2069
2070 if (!lock_user_struct(VERIFY_READ, target_sd, target_addr, 1))
2071 return -TARGET_EFAULT;
2072 target_ip = &(target_sd->sem_perm);
2073 host_ip->__key = tswapl(target_ip->__key);
2074 host_ip->uid = tswapl(target_ip->uid);
2075 host_ip->gid = tswapl(target_ip->gid);
2076 host_ip->cuid = tswapl(target_ip->cuid);
2077 host_ip->cgid = tswapl(target_ip->cgid);
2078 host_ip->mode = tswapl(target_ip->mode);
2079 unlock_user_struct(target_sd, target_addr, 0);
2080 return 0;
2081 }
2082
2083 static inline abi_long host_to_target_ipc_perm(abi_ulong target_addr,
2084 struct ipc_perm *host_ip)
2085 {
2086 struct target_ipc_perm *target_ip;
2087 struct target_semid_ds *target_sd;
2088
2089 if (!lock_user_struct(VERIFY_WRITE, target_sd, target_addr, 0))
2090 return -TARGET_EFAULT;
2091 target_ip = &(target_sd->sem_perm);
2092 target_ip->__key = tswapl(host_ip->__key);
2093 target_ip->uid = tswapl(host_ip->uid);
2094 target_ip->gid = tswapl(host_ip->gid);
2095 target_ip->cuid = tswapl(host_ip->cuid);
2096 target_ip->cgid = tswapl(host_ip->cgid);
2097 target_ip->mode = tswapl(host_ip->mode);
2098 unlock_user_struct(target_sd, target_addr, 1);
2099 return 0;
2100 }
2101
2102 static inline abi_long target_to_host_semid_ds(struct semid_ds *host_sd,
2103 abi_ulong target_addr)
2104 {
2105 struct target_semid_ds *target_sd;
2106
2107 if (!lock_user_struct(VERIFY_READ, target_sd, target_addr, 1))
2108 return -TARGET_EFAULT;
2109 if (target_to_host_ipc_perm(&(host_sd->sem_perm),target_addr))
2110 return -TARGET_EFAULT;
2111 host_sd->sem_nsems = tswapl(target_sd->sem_nsems);
2112 host_sd->sem_otime = tswapl(target_sd->sem_otime);
2113 host_sd->sem_ctime = tswapl(target_sd->sem_ctime);
2114 unlock_user_struct(target_sd, target_addr, 0);
2115 return 0;
2116 }
2117
2118 static inline abi_long host_to_target_semid_ds(abi_ulong target_addr,
2119 struct semid_ds *host_sd)
2120 {
2121 struct target_semid_ds *target_sd;
2122
2123 if (!lock_user_struct(VERIFY_WRITE, target_sd, target_addr, 0))
2124 return -TARGET_EFAULT;
2125 if (host_to_target_ipc_perm(target_addr,&(host_sd->sem_perm)))
2126 return -TARGET_EFAULT;;
2127 target_sd->sem_nsems = tswapl(host_sd->sem_nsems);
2128 target_sd->sem_otime = tswapl(host_sd->sem_otime);
2129 target_sd->sem_ctime = tswapl(host_sd->sem_ctime);
2130 unlock_user_struct(target_sd, target_addr, 1);
2131 return 0;
2132 }
2133
2134 struct target_seminfo {
2135 int semmap;
2136 int semmni;
2137 int semmns;
2138 int semmnu;
2139 int semmsl;
2140 int semopm;
2141 int semume;
2142 int semusz;
2143 int semvmx;
2144 int semaem;
2145 };
2146
2147 static inline abi_long host_to_target_seminfo(abi_ulong target_addr,
2148 struct seminfo *host_seminfo)
2149 {
2150 struct target_seminfo *target_seminfo;
2151 if (!lock_user_struct(VERIFY_WRITE, target_seminfo, target_addr, 0))
2152 return -TARGET_EFAULT;
2153 __put_user(host_seminfo->semmap, &target_seminfo->semmap);
2154 __put_user(host_seminfo->semmni, &target_seminfo->semmni);
2155 __put_user(host_seminfo->semmns, &target_seminfo->semmns);
2156 __put_user(host_seminfo->semmnu, &target_seminfo->semmnu);
2157 __put_user(host_seminfo->semmsl, &target_seminfo->semmsl);
2158 __put_user(host_seminfo->semopm, &target_seminfo->semopm);
2159 __put_user(host_seminfo->semume, &target_seminfo->semume);
2160 __put_user(host_seminfo->semusz, &target_seminfo->semusz);
2161 __put_user(host_seminfo->semvmx, &target_seminfo->semvmx);
2162 __put_user(host_seminfo->semaem, &target_seminfo->semaem);
2163 unlock_user_struct(target_seminfo, target_addr, 1);
2164 return 0;
2165 }
2166
2167 union semun {
2168 int val;
2169 struct semid_ds *buf;
2170 unsigned short *array;
2171 struct seminfo *__buf;
2172 };
2173
2174 union target_semun {
2175 int val;
2176 abi_ulong buf;
2177 abi_ulong array;
2178 abi_ulong __buf;
2179 };
2180
2181 static inline abi_long target_to_host_semarray(int semid, unsigned short **host_array,
2182 abi_ulong target_addr)
2183 {
2184 int nsems;
2185 unsigned short *array;
2186 union semun semun;
2187 struct semid_ds semid_ds;
2188 int i, ret;
2189
2190 semun.buf = &semid_ds;
2191
2192 ret = semctl(semid, 0, IPC_STAT, semun);
2193 if (ret == -1)
2194 return get_errno(ret);
2195
2196 nsems = semid_ds.sem_nsems;
2197
2198 *host_array = malloc(nsems*sizeof(unsigned short));
2199 array = lock_user(VERIFY_READ, target_addr,
2200 nsems*sizeof(unsigned short), 1);
2201 if (!array)
2202 return -TARGET_EFAULT;
2203
2204 for(i=0; i<nsems; i++) {
2205 __get_user((*host_array)[i], &array[i]);
2206 }
2207 unlock_user(array, target_addr, 0);
2208
2209 return 0;
2210 }
2211
2212 static inline abi_long host_to_target_semarray(int semid, abi_ulong target_addr,
2213 unsigned short **host_array)
2214 {
2215 int nsems;
2216 unsigned short *array;
2217 union semun semun;
2218 struct semid_ds semid_ds;
2219 int i, ret;
2220
2221 semun.buf = &semid_ds;
2222
2223 ret = semctl(semid, 0, IPC_STAT, semun);
2224 if (ret == -1)
2225 return get_errno(ret);
2226
2227 nsems = semid_ds.sem_nsems;
2228
2229 array = lock_user(VERIFY_WRITE, target_addr,
2230 nsems*sizeof(unsigned short), 0);
2231 if (!array)
2232 return -TARGET_EFAULT;
2233
2234 for(i=0; i<nsems; i++) {
2235 __put_user((*host_array)[i], &array[i]);
2236 }
2237 free(*host_array);
2238 unlock_user(array, target_addr, 1);
2239
2240 return 0;
2241 }
2242
2243 static inline abi_long do_semctl(int semid, int semnum, int cmd,
2244 union target_semun target_su)
2245 {
2246 union semun arg;
2247 struct semid_ds dsarg;
2248 unsigned short *array = NULL;
2249 struct seminfo seminfo;
2250 abi_long ret = -TARGET_EINVAL;
2251 abi_long err;
2252 cmd &= 0xff;
2253
2254 switch( cmd ) {
2255 case GETVAL:
2256 case SETVAL:
2257 arg.val = tswapl(target_su.val);
2258 ret = get_errno(semctl(semid, semnum, cmd, arg));
2259 target_su.val = tswapl(arg.val);
2260 break;
2261 case GETALL:
2262 case SETALL:
2263 err = target_to_host_semarray(semid, &array, target_su.array);
2264 if (err)
2265 return err;
2266 arg.array = array;
2267 ret = get_errno(semctl(semid, semnum, cmd, arg));
2268 err = host_to_target_semarray(semid, target_su.array, &array);
2269 if (err)
2270 return err;
2271 break;
2272 case IPC_STAT:
2273 case IPC_SET:
2274 case SEM_STAT:
2275 err = target_to_host_semid_ds(&dsarg, target_su.buf);
2276 if (err)
2277 return err;
2278 arg.buf = &dsarg;
2279 ret = get_errno(semctl(semid, semnum, cmd, arg));
2280 err = host_to_target_semid_ds(target_su.buf, &dsarg);
2281 if (err)
2282 return err;
2283 break;
2284 case IPC_INFO:
2285 case SEM_INFO:
2286 arg.__buf = &seminfo;
2287 ret = get_errno(semctl(semid, semnum, cmd, arg));
2288 err = host_to_target_seminfo(target_su.__buf, &seminfo);
2289 if (err)
2290 return err;
2291 break;
2292 case IPC_RMID:
2293 case GETPID:
2294 case GETNCNT:
2295 case GETZCNT:
2296 ret = get_errno(semctl(semid, semnum, cmd, NULL));
2297 break;
2298 }
2299
2300 return ret;
2301 }
2302
2303 struct target_sembuf {
2304 unsigned short sem_num;
2305 short sem_op;
2306 short sem_flg;
2307 };
2308
2309 static inline abi_long target_to_host_sembuf(struct sembuf *host_sembuf,
2310 abi_ulong target_addr,
2311 unsigned nsops)
2312 {
2313 struct target_sembuf *target_sembuf;
2314 int i;
2315
2316 target_sembuf = lock_user(VERIFY_READ, target_addr,
2317 nsops*sizeof(struct target_sembuf), 1);
2318 if (!target_sembuf)
2319 return -TARGET_EFAULT;
2320
2321 for(i=0; i<nsops; i++) {
2322 __get_user(host_sembuf[i].sem_num, &target_sembuf[i].sem_num);
2323 __get_user(host_sembuf[i].sem_op, &target_sembuf[i].sem_op);
2324 __get_user(host_sembuf[i].sem_flg, &target_sembuf[i].sem_flg);
2325 }
2326
2327 unlock_user(target_sembuf, target_addr, 0);
2328
2329 return 0;
2330 }
2331
2332 static inline abi_long do_semop(int semid, abi_long ptr, unsigned nsops)
2333 {
2334 struct sembuf sops[nsops];
2335
2336 if (target_to_host_sembuf(sops, ptr, nsops))
2337 return -TARGET_EFAULT;
2338
2339 return semop(semid, sops, nsops);
2340 }
2341
2342 struct target_msqid_ds
2343 {
2344 struct target_ipc_perm msg_perm;
2345 abi_ulong msg_stime;
2346 #if TARGET_ABI_BITS == 32
2347 abi_ulong __unused1;
2348 #endif
2349 abi_ulong msg_rtime;
2350 #if TARGET_ABI_BITS == 32
2351 abi_ulong __unused2;
2352 #endif
2353 abi_ulong msg_ctime;
2354 #if TARGET_ABI_BITS == 32
2355 abi_ulong __unused3;
2356 #endif
2357 abi_ulong __msg_cbytes;
2358 abi_ulong msg_qnum;
2359 abi_ulong msg_qbytes;
2360 abi_ulong msg_lspid;
2361 abi_ulong msg_lrpid;
2362 abi_ulong __unused4;
2363 abi_ulong __unused5;
2364 };
2365
2366 static inline abi_long target_to_host_msqid_ds(struct msqid_ds *host_md,
2367 abi_ulong target_addr)
2368 {
2369 struct target_msqid_ds *target_md;
2370
2371 if (!lock_user_struct(VERIFY_READ, target_md, target_addr, 1))
2372 return -TARGET_EFAULT;
2373 if (target_to_host_ipc_perm(&(host_md->msg_perm),target_addr))
2374 return -TARGET_EFAULT;
2375 host_md->msg_stime = tswapl(target_md->msg_stime);
2376 host_md->msg_rtime = tswapl(target_md->msg_rtime);
2377 host_md->msg_ctime = tswapl(target_md->msg_ctime);
2378 host_md->__msg_cbytes = tswapl(target_md->__msg_cbytes);
2379 host_md->msg_qnum = tswapl(target_md->msg_qnum);
2380 host_md->msg_qbytes = tswapl(target_md->msg_qbytes);
2381 host_md->msg_lspid = tswapl(target_md->msg_lspid);
2382 host_md->msg_lrpid = tswapl(target_md->msg_lrpid);
2383 unlock_user_struct(target_md, target_addr, 0);
2384 return 0;
2385 }
2386
2387 static inline abi_long host_to_target_msqid_ds(abi_ulong target_addr,
2388 struct msqid_ds *host_md)
2389 {
2390 struct target_msqid_ds *target_md;
2391
2392 if (!lock_user_struct(VERIFY_WRITE, target_md, target_addr, 0))
2393 return -TARGET_EFAULT;
2394 if (host_to_target_ipc_perm(target_addr,&(host_md->msg_perm)))
2395 return -TARGET_EFAULT;
2396 target_md->msg_stime = tswapl(host_md->msg_stime);
2397 target_md->msg_rtime = tswapl(host_md->msg_rtime);
2398 target_md->msg_ctime = tswapl(host_md->msg_ctime);
2399 target_md->__msg_cbytes = tswapl(host_md->__msg_cbytes);
2400 target_md->msg_qnum = tswapl(host_md->msg_qnum);
2401 target_md->msg_qbytes = tswapl(host_md->msg_qbytes);
2402 target_md->msg_lspid = tswapl(host_md->msg_lspid);
2403 target_md->msg_lrpid = tswapl(host_md->msg_lrpid);
2404 unlock_user_struct(target_md, target_addr, 1);
2405 return 0;
2406 }
2407
2408 struct target_msginfo {
2409 int msgpool;
2410 int msgmap;
2411 int msgmax;
2412 int msgmnb;
2413 int msgmni;
2414 int msgssz;
2415 int msgtql;
2416 unsigned short int msgseg;
2417 };
2418
2419 static inline abi_long host_to_target_msginfo(abi_ulong target_addr,
2420 struct msginfo *host_msginfo)
2421 {
2422 struct target_msginfo *target_msginfo;
2423 if (!lock_user_struct(VERIFY_WRITE, target_msginfo, target_addr, 0))
2424 return -TARGET_EFAULT;
2425 __put_user(host_msginfo->msgpool, &target_msginfo->msgpool);
2426 __put_user(host_msginfo->msgmap, &target_msginfo->msgmap);
2427 __put_user(host_msginfo->msgmax, &target_msginfo->msgmax);
2428 __put_user(host_msginfo->msgmnb, &target_msginfo->msgmnb);
2429 __put_user(host_msginfo->msgmni, &target_msginfo->msgmni);
2430 __put_user(host_msginfo->msgssz, &target_msginfo->msgssz);
2431 __put_user(host_msginfo->msgtql, &target_msginfo->msgtql);
2432 __put_user(host_msginfo->msgseg, &target_msginfo->msgseg);
2433 unlock_user_struct(target_msginfo, target_addr, 1);
2434 return 0;
2435 }
2436
2437 static inline abi_long do_msgctl(int msgid, int cmd, abi_long ptr)
2438 {
2439 struct msqid_ds dsarg;
2440 struct msginfo msginfo;
2441 abi_long ret = -TARGET_EINVAL;
2442
2443 cmd &= 0xff;
2444
2445 switch (cmd) {
2446 case IPC_STAT:
2447 case IPC_SET:
2448 case MSG_STAT:
2449 if (target_to_host_msqid_ds(&dsarg,ptr))
2450 return -TARGET_EFAULT;
2451 ret = get_errno(msgctl(msgid, cmd, &dsarg));
2452 if (host_to_target_msqid_ds(ptr,&dsarg))
2453 return -TARGET_EFAULT;
2454 break;
2455 case IPC_RMID:
2456 ret = get_errno(msgctl(msgid, cmd, NULL));
2457 break;
2458 case IPC_INFO:
2459 case MSG_INFO:
2460 ret = get_errno(msgctl(msgid, cmd, (struct msqid_ds *)&msginfo));
2461 if (host_to_target_msginfo(ptr, &msginfo))
2462 return -TARGET_EFAULT;
2463 break;
2464 }
2465
2466 return ret;
2467 }
2468
2469 struct target_msgbuf {
2470 abi_long mtype;
2471 char mtext[1];
2472 };
2473
2474 static inline abi_long do_msgsnd(int msqid, abi_long msgp,
2475 unsigned int msgsz, int msgflg)
2476 {
2477 struct target_msgbuf *target_mb;
2478 struct msgbuf *host_mb;
2479 abi_long ret = 0;
2480
2481 if (!lock_user_struct(VERIFY_READ, target_mb, msgp, 0))
2482 return -TARGET_EFAULT;
2483 host_mb = malloc(msgsz+sizeof(long));
2484 host_mb->mtype = (abi_long) tswapl(target_mb->mtype);
2485 memcpy(host_mb->mtext, target_mb->mtext, msgsz);
2486 ret = get_errno(msgsnd(msqid, host_mb, msgsz, msgflg));
2487 free(host_mb);
2488 unlock_user_struct(target_mb, msgp, 0);
2489
2490 return ret;
2491 }
2492
2493 static inline abi_long do_msgrcv(int msqid, abi_long msgp,
2494 unsigned int msgsz, abi_long msgtyp,
2495 int msgflg)
2496 {
2497 struct target_msgbuf *target_mb;
2498 char *target_mtext;
2499 struct msgbuf *host_mb;
2500 abi_long ret = 0;
2501
2502 if (!lock_user_struct(VERIFY_WRITE, target_mb, msgp, 0))
2503 return -TARGET_EFAULT;
2504
2505 host_mb = malloc(msgsz+sizeof(long));
2506 ret = get_errno(msgrcv(msqid, host_mb, msgsz, tswapl(msgtyp), msgflg));
2507
2508 if (ret > 0) {
2509 abi_ulong target_mtext_addr = msgp + sizeof(abi_ulong);
2510 target_mtext = lock_user(VERIFY_WRITE, target_mtext_addr, ret, 0);
2511 if (!target_mtext) {
2512 ret = -TARGET_EFAULT;
2513 goto end;
2514 }
2515 memcpy(target_mb->mtext, host_mb->mtext, ret);
2516 unlock_user(target_mtext, target_mtext_addr, ret);
2517 }
2518
2519 target_mb->mtype = tswapl(host_mb->mtype);
2520 free(host_mb);
2521
2522 end:
2523 if (target_mb)
2524 unlock_user_struct(target_mb, msgp, 1);
2525 return ret;
2526 }
2527
2528 struct target_shmid_ds
2529 {
2530 struct target_ipc_perm shm_perm;
2531 abi_ulong shm_segsz;
2532 abi_ulong shm_atime;
2533 #if TARGET_ABI_BITS == 32
2534 abi_ulong __unused1;
2535 #endif
2536 abi_ulong shm_dtime;
2537 #if TARGET_ABI_BITS == 32
2538 abi_ulong __unused2;
2539 #endif
2540 abi_ulong shm_ctime;
2541 #if TARGET_ABI_BITS == 32
2542 abi_ulong __unused3;
2543 #endif
2544 int shm_cpid;
2545 int shm_lpid;
2546 abi_ulong shm_nattch;
2547 unsigned long int __unused4;
2548 unsigned long int __unused5;
2549 };
2550
2551 static inline abi_long target_to_host_shmid_ds(struct shmid_ds *host_sd,
2552 abi_ulong target_addr)
2553 {
2554 struct target_shmid_ds *target_sd;
2555
2556 if (!lock_user_struct(VERIFY_READ, target_sd, target_addr, 1))
2557 return -TARGET_EFAULT;
2558 if (target_to_host_ipc_perm(&(host_sd->shm_perm), target_addr))
2559 return -TARGET_EFAULT;
2560 __get_user(host_sd->shm_segsz, &target_sd->shm_segsz);
2561 __get_user(host_sd->shm_atime, &target_sd->shm_atime);
2562 __get_user(host_sd->shm_dtime, &target_sd->shm_dtime);
2563 __get_user(host_sd->shm_ctime, &target_sd->shm_ctime);
2564 __get_user(host_sd->shm_cpid, &target_sd->shm_cpid);
2565 __get_user(host_sd->shm_lpid, &target_sd->shm_lpid);
2566 __get_user(host_sd->shm_nattch, &target_sd->shm_nattch);
2567 unlock_user_struct(target_sd, target_addr, 0);
2568 return 0;
2569 }
2570
2571 static inline abi_long host_to_target_shmid_ds(abi_ulong target_addr,
2572 struct shmid_ds *host_sd)
2573 {
2574 struct target_shmid_ds *target_sd;
2575
2576 if (!lock_user_struct(VERIFY_WRITE, target_sd, target_addr, 0))
2577 return -TARGET_EFAULT;
2578 if (host_to_target_ipc_perm(target_addr, &(host_sd->shm_perm)))
2579 return -TARGET_EFAULT;
2580 __put_user(host_sd->shm_segsz, &target_sd->shm_segsz);
2581 __put_user(host_sd->shm_atime, &target_sd->shm_atime);
2582 __put_user(host_sd->shm_dtime, &target_sd->shm_dtime);
2583 __put_user(host_sd->shm_ctime, &target_sd->shm_ctime);
2584 __put_user(host_sd->shm_cpid, &target_sd->shm_cpid);
2585 __put_user(host_sd->shm_lpid, &target_sd->shm_lpid);
2586 __put_user(host_sd->shm_nattch, &target_sd->shm_nattch);
2587 unlock_user_struct(target_sd, target_addr, 1);
2588 return 0;
2589 }
2590
2591 struct target_shminfo {
2592 abi_ulong shmmax;
2593 abi_ulong shmmin;
2594 abi_ulong shmmni;
2595 abi_ulong shmseg;
2596 abi_ulong shmall;
2597 };
2598
2599 static inline abi_long host_to_target_shminfo(abi_ulong target_addr,
2600 struct shminfo *host_shminfo)
2601 {
2602 struct target_shminfo *target_shminfo;
2603 if (!lock_user_struct(VERIFY_WRITE, target_shminfo, target_addr, 0))
2604 return -TARGET_EFAULT;
2605 __put_user(host_shminfo->shmmax, &target_shminfo->shmmax);
2606 __put_user(host_shminfo->shmmin, &target_shminfo->shmmin);
2607 __put_user(host_shminfo->shmmni, &target_shminfo->shmmni);
2608 __put_user(host_shminfo->shmseg, &target_shminfo->shmseg);
2609 __put_user(host_shminfo->shmall, &target_shminfo->shmall);
2610 unlock_user_struct(target_shminfo, target_addr, 1);
2611 return 0;
2612 }
2613
2614 struct target_shm_info {
2615 int used_ids;
2616 abi_ulong shm_tot;
2617 abi_ulong shm_rss;
2618 abi_ulong shm_swp;
2619 abi_ulong swap_attempts;
2620 abi_ulong swap_successes;
2621 };
2622
2623 static inline abi_long host_to_target_shm_info(abi_ulong target_addr,
2624 struct shm_info *host_shm_info)
2625 {
2626 struct target_shm_info *target_shm_info;
2627 if (!lock_user_struct(VERIFY_WRITE, target_shm_info, target_addr, 0))
2628 return -TARGET_EFAULT;
2629 __put_user(host_shm_info->used_ids, &target_shm_info->used_ids);
2630 __put_user(host_shm_info->shm_tot, &target_shm_info->shm_tot);
2631 __put_user(host_shm_info->shm_rss, &target_shm_info->shm_rss);
2632 __put_user(host_shm_info->shm_swp, &target_shm_info->shm_swp);
2633 __put_user(host_shm_info->swap_attempts, &target_shm_info->swap_attempts);
2634 __put_user(host_shm_info->swap_successes, &target_shm_info->swap_successes);
2635 unlock_user_struct(target_shm_info, target_addr, 1);
2636 return 0;
2637 }
2638
2639 static inline abi_long do_shmctl(int shmid, int cmd, abi_long buf)
2640 {
2641 struct shmid_ds dsarg;
2642 struct shminfo shminfo;
2643 struct shm_info shm_info;
2644 abi_long ret = -TARGET_EINVAL;
2645
2646 cmd &= 0xff;
2647
2648 switch(cmd) {
2649 case IPC_STAT:
2650 case IPC_SET:
2651 case SHM_STAT:
2652 if (target_to_host_shmid_ds(&dsarg, buf))
2653 return -TARGET_EFAULT;
2654 ret = get_errno(shmctl(shmid, cmd, &dsarg));
2655 if (host_to_target_shmid_ds(buf, &dsarg))
2656 return -TARGET_EFAULT;
2657 break;
2658 case IPC_INFO:
2659 ret = get_errno(shmctl(shmid, cmd, (struct shmid_ds *)&shminfo));
2660 if (host_to_target_shminfo(buf, &shminfo))
2661 return -TARGET_EFAULT;
2662 break;
2663 case SHM_INFO:
2664 ret = get_errno(shmctl(shmid, cmd, (struct shmid_ds *)&shm_info));
2665 if (host_to_target_shm_info(buf, &shm_info))
2666 return -TARGET_EFAULT;
2667 break;
2668 case IPC_RMID:
2669 case SHM_LOCK:
2670 case SHM_UNLOCK:
2671 ret = get_errno(shmctl(shmid, cmd, NULL));
2672 break;
2673 }
2674
2675 return ret;
2676 }
2677
2678 static inline abi_ulong do_shmat(int shmid, abi_ulong shmaddr, int shmflg)
2679 {
2680 abi_long raddr;
2681 void *host_raddr;
2682 struct shmid_ds shm_info;
2683 int i,ret;
2684
2685 /* find out the length of the shared memory segment */
2686 ret = get_errno(shmctl(shmid, IPC_STAT, &shm_info));
2687 if (is_error(ret)) {
2688 /* can't get length, bail out */
2689 return ret;
2690 }
2691
2692 mmap_lock();
2693
2694 if (shmaddr)
2695 host_raddr = shmat(shmid, (void *)g2h(shmaddr), shmflg);
2696 else {
2697 abi_ulong mmap_start;
2698
2699 mmap_start = mmap_find_vma(0, shm_info.shm_segsz);
2700
2701 if (mmap_start == -1) {
2702 errno = ENOMEM;
2703 host_raddr = (void *)-1;
2704 } else
2705 host_raddr = shmat(shmid, g2h(mmap_start), shmflg | SHM_REMAP);
2706 }
2707
2708 if (host_raddr == (void *)-1) {
2709 mmap_unlock();
2710 return get_errno((long)host_raddr);
2711 }
2712 raddr=h2g((unsigned long)host_raddr);
2713
2714 page_set_flags(raddr, raddr + shm_info.shm_segsz,
2715 PAGE_VALID | PAGE_READ |
2716 ((shmflg & SHM_RDONLY)? 0 : PAGE_WRITE));
2717
2718 for (i = 0; i < N_SHM_REGIONS; i++) {
2719 if (shm_regions[i].start == 0) {
2720 shm_regions[i].start = raddr;
2721 shm_regions[i].size = shm_info.shm_segsz;
2722 break;
2723 }
2724 }
2725
2726 mmap_unlock();
2727 return raddr;
2728
2729 }
2730
2731 static inline abi_long do_shmdt(abi_ulong shmaddr)
2732 {
2733 int i;
2734
2735 for (i = 0; i < N_SHM_REGIONS; ++i) {
2736 if (shm_regions[i].start == shmaddr) {
2737 shm_regions[i].start = 0;
2738 page_set_flags(shmaddr, shm_regions[i].size, 0);
2739 break;
2740 }
2741 }
2742
2743 return get_errno(shmdt(g2h(shmaddr)));
2744 }
2745
2746 #ifdef TARGET_NR_ipc
2747 /* ??? This only works with linear mappings. */
2748 /* do_ipc() must return target values and target errnos. */
2749 static abi_long do_ipc(unsigned int call, int first,
2750 int second, int third,
2751 abi_long ptr, abi_long fifth)
2752 {
2753 int version;
2754 abi_long ret = 0;
2755
2756 version = call >> 16;
2757 call &= 0xffff;
2758
2759 switch (call) {
2760 case IPCOP_semop:
2761 ret = do_semop(first, ptr, second);
2762 break;
2763
2764 case IPCOP_semget:
2765 ret = get_errno(semget(first, second, third));
2766 break;
2767
2768 case IPCOP_semctl:
2769 ret = do_semctl(first, second, third, (union target_semun)(abi_ulong) ptr);
2770 break;
2771
2772 case IPCOP_msgget:
2773 ret = get_errno(msgget(first, second));
2774 break;
2775
2776 case IPCOP_msgsnd:
2777 ret = do_msgsnd(first, ptr, second, third);
2778 break;
2779
2780 case IPCOP_msgctl:
2781 ret = do_msgctl(first, second, ptr);
2782 break;
2783
2784 case IPCOP_msgrcv:
2785 switch (version) {
2786 case 0:
2787 {
2788 struct target_ipc_kludge {
2789 abi_long msgp;
2790 abi_long msgtyp;
2791 } *tmp;
2792
2793 if (!lock_user_struct(VERIFY_READ, tmp, ptr, 1)) {
2794 ret = -TARGET_EFAULT;
2795 break;
2796 }
2797
2798 ret = do_msgrcv(first, tmp->msgp, second, tmp->msgtyp, third);
2799
2800 unlock_user_struct(tmp, ptr, 0);
2801 break;
2802 }
2803 default:
2804 ret = do_msgrcv(first, ptr, second, fifth, third);
2805 }
2806 break;
2807
2808 case IPCOP_shmat:
2809 switch (version) {
2810 default:
2811 {
2812 abi_ulong raddr;
2813 raddr = do_shmat(first, ptr, second);
2814 if (is_error(raddr))
2815 return get_errno(raddr);
2816 if (put_user_ual(raddr, third))
2817 return -TARGET_EFAULT;
2818 break;
2819 }
2820 case 1:
2821 ret = -TARGET_EINVAL;
2822 break;
2823 }
2824 break;
2825 case IPCOP_shmdt:
2826 ret = do_shmdt(ptr);
2827 break;
2828
2829 case IPCOP_shmget:
2830 /* IPC_* flag values are the same on all linux platforms */
2831 ret = get_errno(shmget(first, second, third));
2832 break;
2833
2834 /* IPC_* and SHM_* command values are the same on all linux platforms */
2835 case IPCOP_shmctl:
2836 ret = do_shmctl(first, second, third);
2837 break;
2838 default:
2839 gemu_log("Unsupported ipc call: %d (version %d)\n", call, version);
2840 ret = -TARGET_ENOSYS;
2841 break;
2842 }
2843 return ret;
2844 }
2845 #endif
2846
2847 /* kernel structure types definitions */
2848 #define IFNAMSIZ 16
2849
2850 #define STRUCT(name, ...) STRUCT_ ## name,
2851 #define STRUCT_SPECIAL(name) STRUCT_ ## name,
2852 enum {
2853 #include "syscall_types.h"
2854 };
2855 #undef STRUCT
2856 #undef STRUCT_SPECIAL
2857
2858 #define STRUCT(name, ...) static const argtype struct_ ## name ## _def[] = { __VA_ARGS__, TYPE_NULL };
2859 #define STRUCT_SPECIAL(name)
2860 #include "syscall_types.h"
2861 #undef STRUCT
2862 #undef STRUCT_SPECIAL
2863
2864 typedef struct IOCTLEntry {
2865 unsigned int target_cmd;
2866 unsigned int host_cmd;
2867 const char *name;
2868 int access;
2869 const argtype arg_type[5];
2870 } IOCTLEntry;
2871
2872 #define IOC_R 0x0001
2873 #define IOC_W 0x0002
2874 #define IOC_RW (IOC_R | IOC_W)
2875
2876 #define MAX_STRUCT_SIZE 4096
2877
2878 static IOCTLEntry ioctl_entries[] = {
2879 #define IOCTL(cmd, access, ...) \
2880 { TARGET_ ## cmd, cmd, #cmd, access, { __VA_ARGS__ } },
2881 #include "ioctls.h"
2882 { 0, 0, },
2883 };
2884
2885 /* ??? Implement proper locking for ioctls. */
2886 /* do_ioctl() Must return target values and target errnos. */
2887 static abi_long do_ioctl(int fd, abi_long cmd, abi_long arg)
2888 {
2889 const IOCTLEntry *ie;
2890 const argtype *arg_type;
2891 abi_long ret;
2892 uint8_t buf_temp[MAX_STRUCT_SIZE];
2893 int target_size;
2894 void *argptr;
2895
2896 ie = ioctl_entries;
2897 for(;;) {
2898 if (ie->target_cmd == 0) {
2899 gemu_log("Unsupported ioctl: cmd=0x%04lx\n", (long)cmd);
2900 return -TARGET_ENOSYS;
2901 }
2902 if (ie->target_cmd == cmd)
2903 break;
2904 ie++;
2905 }
2906 arg_type = ie->arg_type;
2907 #if defined(DEBUG)
2908 gemu_log("ioctl: cmd=0x%04lx (%s)\n", (long)cmd, ie->name);
2909 #endif
2910 switch(arg_type[0]) {
2911 case TYPE_NULL:
2912 /* no argument */
2913 ret = get_errno(ioctl(fd, ie->host_cmd));
2914 break;
2915 case TYPE_PTRVOID:
2916 case TYPE_INT:
2917 /* int argment */
2918 ret = get_errno(ioctl(fd, ie->host_cmd, arg));
2919 break;
2920 case TYPE_PTR:
2921 arg_type++;
2922 target_size = thunk_type_size(arg_type, 0);
2923 switch(ie->access) {
2924 case IOC_R:
2925 ret = get_errno(ioctl(fd, ie->host_cmd, buf_temp));
2926 if (!is_error(ret)) {
2927 argptr = lock_user(VERIFY_WRITE, arg, target_size, 0);
2928 if (!argptr)
2929 return -TARGET_EFAULT;
2930 thunk_convert(argptr, buf_temp, arg_type, THUNK_TARGET);
2931 unlock_user(argptr, arg, target_size);
2932 }
2933 break;
2934 case IOC_W:
2935 argptr = lock_user(VERIFY_READ, arg, target_size, 1);
2936 if (!argptr)
2937 return -TARGET_EFAULT;
2938 thunk_convert(buf_temp, argptr, arg_type, THUNK_HOST);
2939 unlock_user(argptr, arg, 0);
2940 ret = get_errno(ioctl(fd, ie->host_cmd, buf_temp));
2941 break;
2942 default:
2943 case IOC_RW:
2944 argptr = lock_user(VERIFY_READ, arg, target_size, 1);
2945 if (!argptr)
2946 return -TARGET_EFAULT;
2947 thunk_convert(buf_temp, argptr, arg_type, THUNK_HOST);
2948 unlock_user(argptr, arg, 0);
2949 ret = get_errno(ioctl(fd, ie->host_cmd, buf_temp));
2950 if (!is_error(ret)) {
2951 argptr = lock_user(VERIFY_WRITE, arg, target_size, 0);
2952 if (!argptr)
2953 return -TARGET_EFAULT;
2954 thunk_convert(argptr, buf_temp, arg_type, THUNK_TARGET);
2955 unlock_user(argptr, arg, target_size);
2956 }
2957 break;
2958 }
2959 break;
2960 default:
2961 gemu_log("Unsupported ioctl type: cmd=0x%04lx type=%d\n",
2962 (long)cmd, arg_type[0]);
2963 ret = -TARGET_ENOSYS;
2964 break;
2965 }
2966 return ret;
2967 }
2968
2969 static const bitmask_transtbl iflag_tbl[] = {
2970 { TARGET_IGNBRK, TARGET_IGNBRK, IGNBRK, IGNBRK },
2971 { TARGET_BRKINT, TARGET_BRKINT, BRKINT, BRKINT },
2972 { TARGET_IGNPAR, TARGET_IGNPAR, IGNPAR, IGNPAR },
2973 { TARGET_PARMRK, TARGET_PARMRK, PARMRK, PARMRK },
2974 { TARGET_INPCK, TARGET_INPCK, INPCK, INPCK },
2975 { TARGET_ISTRIP, TARGET_ISTRIP, ISTRIP, ISTRIP },
2976 { TARGET_INLCR, TARGET_INLCR, INLCR, INLCR },
2977 { TARGET_IGNCR, TARGET_IGNCR, IGNCR, IGNCR },
2978 { TARGET_ICRNL, TARGET_ICRNL, ICRNL, ICRNL },
2979 { TARGET_IUCLC, TARGET_IUCLC, IUCLC, IUCLC },
2980 { TARGET_IXON, TARGET_IXON, IXON, IXON },
2981 { TARGET_IXANY, TARGET_IXANY, IXANY, IXANY },
2982 { TARGET_IXOFF, TARGET_IXOFF, IXOFF, IXOFF },
2983 { TARGET_IMAXBEL, TARGET_IMAXBEL, IMAXBEL, IMAXBEL },
2984 { 0, 0, 0, 0 }
2985 };
2986
2987 static const bitmask_transtbl oflag_tbl[] = {
2988 { TARGET_OPOST, TARGET_OPOST, OPOST, OPOST },
2989 { TARGET_OLCUC, TARGET_OLCUC, OLCUC, OLCUC },
2990 { TARGET_ONLCR, TARGET_ONLCR, ONLCR, ONLCR },
2991 { TARGET_OCRNL, TARGET_OCRNL, OCRNL, OCRNL },
2992 { TARGET_ONOCR, TARGET_ONOCR, ONOCR, ONOCR },
2993 { TARGET_ONLRET, TARGET_ONLRET, ONLRET, ONLRET },
2994 { TARGET_OFILL, TARGET_OFILL, OFILL, OFILL },
2995 { TARGET_OFDEL, TARGET_OFDEL, OFDEL, OFDEL },
2996 { TARGET_NLDLY, TARGET_NL0, NLDLY, NL0 },
2997 { TARGET_NLDLY, TARGET_NL1, NLDLY, NL1 },
2998 { TARGET_CRDLY, TARGET_CR0, CRDLY, CR0 },
2999 { TARGET_CRDLY, TARGET_CR1, CRDLY, CR1 },
3000 { TARGET_CRDLY, TARGET_CR2, CRDLY, CR2 },
3001 { TARGET_CRDLY, TARGET_CR3, CRDLY, CR3 },
3002 { TARGET_TABDLY, TARGET_TAB0, TABDLY, TAB0 },
3003 { TARGET_TABDLY, TARGET_TAB1, TABDLY, TAB1 },
3004 { TARGET_TABDLY, TARGET_TAB2, TABDLY, TAB2 },
3005 { TARGET_TABDLY, TARGET_TAB3, TABDLY, TAB3 },
3006 { TARGET_BSDLY, TARGET_BS0, BSDLY, BS0 },
3007 { TARGET_BSDLY, TARGET_BS1, BSDLY, BS1 },
3008 { TARGET_VTDLY, TARGET_VT0, VTDLY, VT0 },
3009 { TARGET_VTDLY, TARGET_VT1, VTDLY, VT1 },
3010 { TARGET_FFDLY, TARGET_FF0, FFDLY, FF0 },
3011 { TARGET_FFDLY, TARGET_FF1, FFDLY, FF1 },
3012 { 0, 0, 0, 0 }
3013 };
3014
3015 static const bitmask_transtbl cflag_tbl[] = {
3016 { TARGET_CBAUD, TARGET_B0, CBAUD, B0 },
3017 { TARGET_CBAUD, TARGET_B50, CBAUD, B50 },
3018 { TARGET_CBAUD, TARGET_B75, CBAUD, B75 },
3019 { TARGET_CBAUD, TARGET_B110, CBAUD, B110 },
3020 { TARGET_CBAUD, TARGET_B134, CBAUD, B134 },
3021 { TARGET_CBAUD, TARGET_B150, CBAUD, B150 },
3022 { TARGET_CBAUD, TARGET_B200, CBAUD, B200 },
3023 { TARGET_CBAUD, TARGET_B300, CBAUD, B300 },
3024 { TARGET_CBAUD, TARGET_B600, CBAUD, B600 },
3025 { TARGET_CBAUD, TARGET_B1200, CBAUD, B1200 },
3026 { TARGET_CBAUD, TARGET_B1800, CBAUD, B1800 },
3027 { TARGET_CBAUD, TARGET_B2400, CBAUD, B2400 },
3028 { TARGET_CBAUD, TARGET_B4800, CBAUD, B4800 },
3029 { TARGET_CBAUD, TARGET_B9600, CBAUD, B9600 },
3030 { TARGET_CBAUD, TARGET_B19200, CBAUD, B19200 },
3031 { TARGET_CBAUD, TARGET_B38400, CBAUD, B38400 },
3032 { TARGET_CBAUD, TARGET_B57600, CBAUD, B57600 },
3033 { TARGET_CBAUD, TARGET_B115200, CBAUD, B115200 },
3034 { TARGET_CBAUD, TARGET_B230400, CBAUD, B230400 },
3035 { TARGET_CBAUD, TARGET_B460800, CBAUD, B460800 },
3036 { TARGET_CSIZE, TARGET_CS5, CSIZE, CS5 },
3037 { TARGET_CSIZE, TARGET_CS6, CSIZE, CS6 },
3038 { TARGET_CSIZE, TARGET_CS7, CSIZE, CS7 },
3039 { TARGET_CSIZE, TARGET_CS8, CSIZE, CS8 },
3040 { TARGET_CSTOPB, TARGET_CSTOPB, CSTOPB, CSTOPB },
3041 { TARGET_CREAD, TARGET_CREAD, CREAD, CREAD },
3042 { TARGET_PARENB, TARGET_PARENB, PARENB, PARENB },
3043 { TARGET_PARODD, TARGET_PARODD, PARODD, PARODD },
3044 { TARGET_HUPCL, TARGET_HUPCL, HUPCL, HUPCL },
3045 { TARGET_CLOCAL, TARGET_CLOCAL, CLOCAL, CLOCAL },
3046 { TARGET_CRTSCTS, TARGET_CRTSCTS, CRTSCTS, CRTSCTS },
3047 { 0, 0, 0, 0 }
3048 };
3049
3050 static const bitmask_transtbl lflag_tbl[] = {
3051 { TARGET_ISIG, TARGET_ISIG, ISIG, ISIG },
3052 { TARGET_ICANON, TARGET_ICANON, ICANON, ICANON },
3053 { TARGET_XCASE, TARGET_XCASE, XCASE, XCASE },
3054 { TARGET_ECHO, TARGET_ECHO, ECHO, ECHO },
3055 { TARGET_ECHOE, TARGET_ECHOE, ECHOE, ECHOE },
3056 { TARGET_ECHOK, TARGET_ECHOK, ECHOK, ECHOK },
3057 { TARGET_ECHONL, TARGET_ECHONL, ECHONL, ECHONL },
3058 { TARGET_NOFLSH, TARGET_NOFLSH, NOFLSH, NOFLSH },
3059 { TARGET_TOSTOP, TARGET_TOSTOP, TOSTOP, TOSTOP },
3060 { TARGET_ECHOCTL, TARGET_ECHOCTL, ECHOCTL, ECHOCTL },
3061 { TARGET_ECHOPRT, TARGET_ECHOPRT, ECHOPRT, ECHOPRT },
3062 { TARGET_ECHOKE, TARGET_ECHOKE, ECHOKE, ECHOKE },
3063 { TARGET_FLUSHO, TARGET_FLUSHO, FLUSHO, FLUSHO },
3064 { TARGET_PENDIN, TARGET_PENDIN, PENDIN, PENDIN },
3065 { TARGET_IEXTEN, TARGET_IEXTEN, IEXTEN, IEXTEN },
3066 { 0, 0, 0, 0 }
3067 };
3068
3069 static void target_to_host_termios (void *dst, const void *src)
3070 {
3071 struct host_termios *host = dst;
3072 const struct target_termios *target = src;
3073
3074 host->c_iflag =
3075 target_to_host_bitmask(tswap32(target->c_iflag), iflag_tbl);
3076 host->c_oflag =
3077 target_to_host_bitmask(tswap32(target->c_oflag), oflag_tbl);
3078 host->c_cflag =
3079 target_to_host_bitmask(tswap32(target->c_cflag), cflag_tbl);
3080 host->c_lflag =
3081 target_to_host_bitmask(tswap32(target->c_lflag), lflag_tbl);
3082 host->c_line = target->c_line;
3083
3084 memset(host->c_cc, 0, sizeof(host->c_cc));
3085 host->c_cc[VINTR] = target->c_cc[TARGET_VINTR];
3086 host->c_cc[VQUIT] = target->c_cc[TARGET_VQUIT];
3087 host->c_cc[VERASE] = target->c_cc[TARGET_VERASE];
3088 host->c_cc[VKILL] = target->c_cc[TARGET_VKILL];
3089 host->c_cc[VEOF] = target->c_cc[TARGET_VEOF];
3090 host->c_cc[VTIME] = target->c_cc[TARGET_VTIME];
3091 host->c_cc[VMIN] = target->c_cc[TARGET_VMIN];
3092 host->c_cc[VSWTC] = target->c_cc[TARGET_VSWTC];
3093 host->c_cc[VSTART] = target->c_cc[TARGET_VSTART];
3094 host->c_cc[VSTOP] = target->c_cc[TARGET_VSTOP];
3095 host->c_cc[VSUSP] = target->c_cc[TARGET_VSUSP];
3096 host->c_cc[VEOL] = target->c_cc[TARGET_VEOL];
3097 host->c_cc[VREPRINT] = target->c_cc[TARGET_VREPRINT];
3098 host->c_cc[VDISCARD] = target->c_cc[TARGET_VDISCARD];
3099 host->c_cc[VWERASE] = target->c_cc[TARGET_VWERASE];
3100 host->c_cc[VLNEXT] = target->c_cc[TARGET_VLNEXT];
3101 host->c_cc[VEOL2] = target->c_cc[TARGET_VEOL2];
3102 }
3103
3104 static void host_to_target_termios (void *dst, const void *src)
3105 {
3106 struct target_termios *target = dst;
3107 const struct host_termios *host = src;
3108
3109 target->c_iflag =
3110 tswap32(host_to_target_bitmask(host->c_iflag, iflag_tbl));
3111 target->c_oflag =
3112 tswap32(host_to_target_bitmask(host->c_oflag, oflag_tbl));
3113 target->c_cflag =
3114 tswap32(host_to_target_bitmask(host->c_cflag, cflag_tbl));
3115 target->c_lflag =
3116 tswap32(host_to_target_bitmask(host->c_lflag, lflag_tbl));
3117 target->c_line = host->c_line;
3118
3119 memset(target->c_cc, 0, sizeof(target->c_cc));
3120 target->c_cc[TARGET_VINTR] = host->c_cc[VINTR];
3121 target->c_cc[TARGET_VQUIT] = host->c_cc[VQUIT];
3122 target->c_cc[TARGET_VERASE] = host->c_cc[VERASE];
3123 target->c_cc[TARGET_VKILL] = host->c_cc[VKILL];
3124 target->c_cc[TARGET_VEOF] = host->c_cc[VEOF];
3125 target->c_cc[TARGET_VTIME] = host->c_cc[VTIME];
3126 target->c_cc[TARGET_VMIN] = host->c_cc[VMIN];
3127 target->c_cc[TARGET_VSWTC] = host->c_cc[VSWTC];
3128 target->c_cc[TARGET_VSTART] = host->c_cc[VSTART];
3129 target->c_cc[TARGET_VSTOP] = host->c_cc[VSTOP];
3130 target->c_cc[TARGET_VSUSP] = host->c_cc[VSUSP];
3131 target->c_cc[TARGET_VEOL] = host->c_cc[VEOL];
3132 target->c_cc[TARGET_VREPRINT] = host->c_cc[VREPRINT];
3133 target->c_cc[TARGET_VDISCARD] = host->c_cc[VDISCARD];
3134 target->c_cc[TARGET_VWERASE] = host->c_cc[VWERASE];
3135 target->c_cc[TARGET_VLNEXT] = host->c_cc[VLNEXT];
3136 target->c_cc[TARGET_VEOL2] = host->c_cc[VEOL2];
3137 }
3138
3139 static const StructEntry struct_termios_def = {
3140 .convert = { host_to_target_termios, target_to_host_termios },
3141 .size = { sizeof(struct target_termios), sizeof(struct host_termios) },
3142 .align = { __alignof__(struct target_termios), __alignof__(struct host_termios) },
3143 };
3144
3145 static bitmask_transtbl mmap_flags_tbl[] = {
3146 { TARGET_MAP_SHARED, TARGET_MAP_SHARED, MAP_SHARED, MAP_SHARED },
3147 { TARGET_MAP_PRIVATE, TARGET_MAP_PRIVATE, MAP_PRIVATE, MAP_PRIVATE },
3148 { TARGET_MAP_FIXED, TARGET_MAP_FIXED, MAP_FIXED, MAP_FIXED },
3149 { TARGET_MAP_ANONYMOUS, TARGET_MAP_ANONYMOUS, MAP_ANONYMOUS, MAP_ANONYMOUS },
3150 { TARGET_MAP_GROWSDOWN, TARGET_MAP_GROWSDOWN, MAP_GROWSDOWN, MAP_GROWSDOWN },
3151 { TARGET_MAP_DENYWRITE, TARGET_MAP_DENYWRITE, MAP_DENYWRITE, MAP_DENYWRITE },
3152 { TARGET_MAP_EXECUTABLE, TARGET_MAP_EXECUTABLE, MAP_EXECUTABLE, MAP_EXECUTABLE },
3153 { TARGET_MAP_LOCKED, TARGET_MAP_LOCKED, MAP_LOCKED, MAP_LOCKED },
3154 { 0, 0, 0, 0 }
3155 };
3156
3157 #if defined(TARGET_I386)
3158
3159 /* NOTE: there is really one LDT for all the threads */
3160 static uint8_t *ldt_table;
3161
3162 static abi_long read_ldt(abi_ulong ptr, unsigned long bytecount)
3163 {
3164 int size;
3165 void *p;
3166
3167 if (!ldt_table)
3168 return 0;
3169 size = TARGET_LDT_ENTRIES * TARGET_LDT_ENTRY_SIZE;
3170 if (size > bytecount)
3171 size = bytecount;
3172 p = lock_user(VERIFY_WRITE, ptr, size, 0);
3173 if (!p)
3174 return -TARGET_EFAULT;
3175 /* ??? Should this by byteswapped? */
3176 memcpy(p, ldt_table, size);
3177 unlock_user(p, ptr, size);
3178 return size;
3179 }
3180
3181 /* XXX: add locking support */
3182 static abi_long write_ldt(CPUX86State *env,
3183 abi_ulong ptr, unsigned long bytecount, int oldmode)
3184 {
3185 struct target_modify_ldt_ldt_s ldt_info;
3186 struct target_modify_ldt_ldt_s *target_ldt_info;
3187 int seg_32bit, contents, read_exec_only, limit_in_pages;
3188 int seg_not_present, useable, lm;
3189 uint32_t *lp, entry_1, entry_2;
3190
3191 if (bytecount != sizeof(ldt_info))
3192 return -TARGET_EINVAL;
3193 if (!lock_user_struct(VERIFY_READ, target_ldt_info, ptr, 1))
3194 return -TARGET_EFAULT;
3195 ldt_info.entry_number = tswap32(target_ldt_info->entry_number);
3196 ldt_info.base_addr = tswapl(target_ldt_info->base_addr);
3197 ldt_info.limit = tswap32(target_ldt_info->limit);
3198 ldt_info.flags = tswap32(target_ldt_info->flags);
3199 unlock_user_struct(target_ldt_info, ptr, 0);
3200
3201 if (ldt_info.entry_number >= TARGET_LDT_ENTRIES)
3202 return -TARGET_EINVAL;
3203 seg_32bit = ldt_info.flags & 1;
3204 contents = (ldt_info.flags >> 1) & 3;
3205 read_exec_only = (ldt_info.flags >> 3) & 1;
3206 limit_in_pages = (ldt_info.flags >> 4) & 1;
3207 seg_not_present = (ldt_info.flags >> 5) & 1;
3208 useable = (ldt_info.flags >> 6) & 1;
3209 #ifdef TARGET_ABI32
3210 lm = 0;
3211 #else
3212 lm = (ldt_info.flags >> 7) & 1;
3213 #endif
3214 if (contents == 3) {
3215 if (oldmode)
3216 return -TARGET_EINVAL;
3217 if (seg_not_present == 0)
3218 return -TARGET_EINVAL;
3219 }
3220 /* allocate the LDT */
3221 if (!ldt_table) {
3222 env->ldt.base = target_mmap(0,
3223 TARGET_LDT_ENTRIES * TARGET_LDT_ENTRY_SIZE,
3224 PROT_READ|PROT_WRITE,
3225 MAP_ANONYMOUS|MAP_PRIVATE, -1, 0);
3226 if (env->ldt.base == -1)
3227 return -TARGET_ENOMEM;
3228 memset(g2h(env->ldt.base), 0,
3229 TARGET_LDT_ENTRIES * TARGET_LDT_ENTRY_SIZE);
3230 env->ldt.limit = 0xffff;
3231 ldt_table = g2h(env->ldt.base);
3232 }
3233
3234 /* NOTE: same code as Linux kernel */
3235 /* Allow LDTs to be cleared by the user. */
3236 if (ldt_info.base_addr == 0 && ldt_info.limit == 0) {
3237 if (oldmode ||
3238 (contents == 0 &&
3239 read_exec_only == 1 &&
3240 seg_32bit == 0 &&
3241 limit_in_pages == 0 &&
3242 seg_not_present == 1 &&
3243 useable == 0 )) {
3244 entry_1 = 0;
3245 entry_2 = 0;
3246 goto install;
3247 }
3248 }
3249
3250 entry_1 = ((ldt_info.base_addr & 0x0000ffff) << 16) |
3251 (ldt_info.limit & 0x0ffff);
3252 entry_2 = (ldt_info.base_addr & 0xff000000) |
3253 ((ldt_info.base_addr & 0x00ff0000) >> 16) |
3254 (ldt_info.limit & 0xf0000) |
3255 ((read_exec_only ^ 1) << 9) |
3256 (contents << 10) |
3257 ((seg_not_present ^ 1) << 15) |
3258 (seg_32bit << 22) |
3259 (limit_in_pages << 23) |
3260 (lm << 21) |
3261 0x7000;
3262 if (!oldmode)
3263 entry_2 |= (useable << 20);
3264
3265 /* Install the new entry ... */
3266 install:
3267 lp = (uint32_t *)(ldt_table + (ldt_info.entry_number << 3));
3268 lp[0] = tswap32(entry_1);
3269 lp[1] = tswap32(entry_2);
3270 return 0;
3271 }
3272
3273 /* specific and weird i386 syscalls */
3274 static abi_long do_modify_ldt(CPUX86State *env, int func, abi_ulong ptr,
3275 unsigned long bytecount)
3276 {
3277 abi_long ret;
3278
3279 switch (func) {
3280 case 0:
3281 ret = read_ldt(ptr, bytecount);
3282 break;
3283 case 1:
3284 ret = write_ldt(env, ptr, bytecount, 1);
3285 break;
3286 case 0x11:
3287 ret = write_ldt(env, ptr, bytecount, 0);
3288 break;
3289 default:
3290 ret = -TARGET_ENOSYS;
3291 break;
3292 }
3293 return ret;
3294 }
3295
3296 #if defined(TARGET_I386) && defined(TARGET_ABI32)
3297 static abi_long do_set_thread_area(CPUX86State *env, abi_ulong ptr)
3298 {
3299 uint64_t *gdt_table = g2h(env->gdt.base);
3300 struct target_modify_ldt_ldt_s ldt_info;
3301 struct target_modify_ldt_ldt_s *target_ldt_info;
3302 int seg_32bit, contents, read_exec_only, limit_in_pages;
3303 int seg_not_present, useable, lm;
3304 uint32_t *lp, entry_1, entry_2;
3305 int i;
3306
3307 lock_user_struct(VERIFY_WRITE, target_ldt_info, ptr, 1);
3308 if (!target_ldt_info)
3309 return -TARGET_EFAULT;
3310 ldt_info.entry_number = tswap32(target_ldt_info->entry_number);
3311 ldt_info.base_addr = tswapl(target_ldt_info->base_addr);
3312 ldt_info.limit = tswap32(target_ldt_info->limit);
3313 ldt_info.flags = tswap32(target_ldt_info->flags);
3314 if (ldt_info.entry_number == -1) {
3315 for (i=TARGET_GDT_ENTRY_TLS_MIN; i<=TARGET_GDT_ENTRY_TLS_MAX; i++) {
3316 if (gdt_table[i] == 0) {
3317 ldt_info.entry_number = i;
3318 target_ldt_info->entry_number = tswap32(i);
3319 break;
3320 }
3321 }
3322 }
3323 unlock_user_struct(target_ldt_info, ptr, 1);
3324
3325 if (ldt_info.entry_number < TARGET_GDT_ENTRY_TLS_MIN ||
3326 ldt_info.entry_number > TARGET_GDT_ENTRY_TLS_MAX)
3327 return -TARGET_EINVAL;
3328 seg_32bit = ldt_info.flags & 1;
3329 contents = (ldt_info.flags >> 1) & 3;
3330 read_exec_only = (ldt_info.flags >> 3) & 1;
3331 limit_in_pages = (ldt_info.flags >> 4) & 1;
3332 seg_not_present = (ldt_info.flags >> 5) & 1;
3333 useable = (ldt_info.flags >> 6) & 1;
3334 #ifdef TARGET_ABI32
3335 lm = 0;
3336 #else
3337 lm = (ldt_info.flags >> 7) & 1;
3338 #endif
3339
3340 if (contents == 3) {
3341 if (seg_not_present == 0)
3342 return -TARGET_EINVAL;
3343 }
3344
3345 /* NOTE: same code as Linux kernel */
3346 /* Allow LDTs to be cleared by the user. */
3347 if (ldt_info.base_addr == 0 && ldt_info.limit == 0) {
3348 if ((contents == 0 &&
3349 read_exec_only == 1 &&
3350 seg_32bit == 0 &&
3351 limit_in_pages == 0 &&
3352 seg_not_present == 1 &&
3353 useable == 0 )) {
3354 entry_1 = 0;
3355 entry_2 = 0;
3356 goto install;
3357 }
3358 }
3359
3360 entry_1 = ((ldt_info.base_addr & 0x0000ffff) << 16) |
3361 (ldt_info.limit & 0x0ffff);
3362 entry_2 = (ldt_info.base_addr & 0xff000000) |
3363 ((ldt_info.base_addr & 0x00ff0000) >> 16) |
3364 (ldt_info.limit & 0xf0000) |
3365 ((read_exec_only ^ 1) << 9) |
3366 (contents << 10) |
3367 ((seg_not_present ^ 1) << 15) |
3368 (seg_32bit << 22) |
3369 (limit_in_pages << 23) |
3370 (useable << 20) |
3371 (lm << 21) |
3372 0x7000;
3373
3374 /* Install the new entry ... */
3375 install:
3376 lp = (uint32_t *)(gdt_table + ldt_info.entry_number);
3377 lp[0] = tswap32(entry_1);
3378 lp[1] = tswap32(entry_2);
3379 return 0;
3380 }
3381
3382 static abi_long do_get_thread_area(CPUX86State *env, abi_ulong ptr)
3383 {
3384 struct target_modify_ldt_ldt_s *target_ldt_info;
3385 uint64_t *gdt_table = g2h(env->gdt.base);
3386 uint32_t base_addr, limit, flags;
3387 int seg_32bit, contents, read_exec_only, limit_in_pages, idx;
3388 int seg_not_present, useable, lm;
3389 uint32_t *lp, entry_1, entry_2;
3390
3391 lock_user_struct(VERIFY_WRITE, target_ldt_info, ptr, 1);
3392 if (!target_ldt_info)
3393 return -TARGET_EFAULT;
3394 idx = tswap32(target_ldt_info->entry_number);
3395 if (idx < TARGET_GDT_ENTRY_TLS_MIN ||
3396 idx > TARGET_GDT_ENTRY_TLS_MAX) {
3397 unlock_user_struct(target_ldt_info, ptr, 1);
3398 return -TARGET_EINVAL;
3399 }
3400 lp = (uint32_t *)(gdt_table + idx);
3401 entry_1 = tswap32(lp[0]);
3402 entry_2 = tswap32(lp[1]);
3403
3404 read_exec_only = ((entry_2 >> 9) & 1) ^ 1;
3405 contents = (entry_2 >> 10) & 3;
3406 seg_not_present = ((entry_2 >> 15) & 1) ^ 1;
3407 seg_32bit = (entry_2 >> 22) & 1;
3408 limit_in_pages = (entry_2 >> 23) & 1;
3409 useable = (entry_2 >> 20) & 1;
3410 #ifdef TARGET_ABI32
3411 lm = 0;
3412 #else
3413 lm = (entry_2 >> 21) & 1;
3414 #endif
3415 flags = (seg_32bit << 0) | (contents << 1) |
3416 (read_exec_only << 3) | (limit_in_pages << 4) |
3417 (seg_not_present << 5) | (useable << 6) | (lm << 7);
3418 limit = (entry_1 & 0xffff) | (entry_2 & 0xf0000);
3419 base_addr = (entry_1 >> 16) |
3420 (entry_2 & 0xff000000) |
3421 ((entry_2 & 0xff) << 16);
3422 target_ldt_info->base_addr = tswapl(base_addr);
3423 target_ldt_info->limit = tswap32(limit);
3424 target_ldt_info->flags = tswap32(flags);
3425 unlock_user_struct(target_ldt_info, ptr, 1);
3426 return 0;
3427 }
3428 #endif /* TARGET_I386 && TARGET_ABI32 */
3429
3430 #ifndef TARGET_ABI32
3431 static abi_long do_arch_prctl(CPUX86State *env, int code, abi_ulong addr)
3432 {
3433 abi_long ret;
3434 abi_ulong val;
3435 int idx;
3436
3437 switch(code) {
3438 case TARGET_ARCH_SET_GS:
3439 case TARGET_ARCH_SET_FS:
3440 if (code == TARGET_ARCH_SET_GS)
3441 idx = R_GS;
3442 else
3443 idx = R_FS;
3444 cpu_x86_load_seg(env, idx, 0);
3445 env->segs[idx].base = addr;
3446 break;
3447 case TARGET_ARCH_GET_GS:
3448 case TARGET_ARCH_GET_FS:
3449 if (code == TARGET_ARCH_GET_GS)
3450 idx = R_GS;
3451 else
3452 idx = R_FS;
3453 val = env->segs[idx].base;
3454 if (put_user(val, addr, abi_ulong))
3455 return -TARGET_EFAULT;
3456 break;
3457 default:
3458 ret = -TARGET_EINVAL;
3459 break;
3460 }
3461 return 0;
3462 }
3463 #endif
3464
3465 #endif /* defined(TARGET_I386) */
3466
3467 #if defined(CONFIG_USE_NPTL)
3468
3469 #define NEW_STACK_SIZE PTHREAD_STACK_MIN
3470
3471 static pthread_mutex_t clone_lock = PTHREAD_MUTEX_INITIALIZER;
3472 typedef struct {
3473 CPUState *env;
3474 pthread_mutex_t mutex;
3475 pthread_cond_t cond;
3476 pthread_t thread;
3477 uint32_t tid;
3478 abi_ulong child_tidptr;
3479 abi_ulong parent_tidptr;
3480 sigset_t sigmask;
3481 } new_thread_info;
3482
3483 static void *clone_func(void *arg)
3484 {
3485 new_thread_info *info = arg;
3486 CPUState *env;
3487 TaskState *ts;
3488
3489 env = info->env;
3490 thread_env = env;
3491 ts = (TaskState *)thread_env->opaque;
3492 info->tid = gettid();
3493 env->host_tid = info->tid;
3494 task_settid(ts);
3495 if (info->child_tidptr)
3496 put_user_u32(info->tid, info->child_tidptr);
3497 if (info->parent_tidptr)
3498 put_user_u32(info->tid, info->parent_tidptr);
3499 /* Enable signals. */
3500 sigprocmask(SIG_SETMASK, &info->sigmask, NULL);
3501 /* Signal to the parent that we're ready. */
3502 pthread_mutex_lock(&info->mutex);
3503 pthread_cond_broadcast(&info->cond);
3504 pthread_mutex_unlock(&info->mutex);
3505 /* Wait until the parent has finshed initializing the tls state. */
3506 pthread_mutex_lock(&clone_lock);
3507 pthread_mutex_unlock(&clone_lock);
3508 cpu_loop(env);
3509 /* never exits */
3510 return NULL;
3511 }
3512 #else
3513 /* this stack is the equivalent of the kernel stack associated with a
3514 thread/process */
3515 #define NEW_STACK_SIZE 8192
3516
3517 static int clone_func(void *arg)
3518 {
3519 CPUState *env = arg;
3520 cpu_loop(env);
3521 /* never exits */
3522 return 0;
3523 }
3524 #endif
3525
3526 /* do_fork() Must return host values and target errnos (unlike most
3527 do_*() functions). */
3528 static int do_fork(CPUState *env, unsigned int flags, abi_ulong newsp,
3529 abi_ulong parent_tidptr, target_ulong newtls,
3530 abi_ulong child_tidptr)
3531 {
3532 int ret;
3533 TaskState *ts;
3534 uint8_t *new_stack;
3535 CPUState *new_env;
3536 #if defined(CONFIG_USE_NPTL)
3537 unsigned int nptl_flags;
3538 sigset_t sigmask;
3539 #endif
3540
3541 /* Emulate vfork() with fork() */
3542 if (flags & CLONE_VFORK)
3543 flags &= ~(CLONE_VFORK | CLONE_VM);
3544
3545 if (flags & CLONE_VM) {
3546 TaskState *parent_ts = (TaskState *)env->opaque;
3547 #if defined(CONFIG_USE_NPTL)
3548 new_thread_info info;
3549 pthread_attr_t attr;
3550 #endif
3551 ts = qemu_mallocz(sizeof(TaskState) + NEW_STACK_SIZE);
3552 init_task_state(ts);
3553 new_stack = ts->stack;
3554 /* we create a new CPU instance. */
3555 new_env = cpu_copy(env);
3556 #if defined(TARGET_I386) || defined(TARGET_SPARC) || defined(TARGET_PPC)
3557 cpu_reset(new_env);
3558 #endif
3559 /* Init regs that differ from the parent. */
3560 cpu_clone_regs(new_env, newsp);
3561 new_env->opaque = ts;
3562 ts->bprm = parent_ts->bprm;
3563 ts->info = parent_ts->info;
3564 #if defined(CONFIG_USE_NPTL)
3565 nptl_flags = flags;
3566 flags &= ~CLONE_NPTL_FLAGS2;
3567
3568 if (nptl_flags & CLONE_CHILD_CLEARTID) {
3569 ts->child_tidptr = child_tidptr;
3570 }
3571
3572 if (nptl_flags & CLONE_SETTLS)
3573 cpu_set_tls (new_env, newtls);
3574
3575 /* Grab a mutex so that thread setup appears atomic. */
3576 pthread_mutex_lock(&clone_lock);
3577
3578 memset(&info, 0, sizeof(info));
3579 pthread_mutex_init(&info.mutex, NULL);
3580 pthread_mutex_lock(&info.mutex);
3581 pthread_cond_init(&info.cond, NULL);
3582 info.env = new_env;
3583 if (nptl_flags & CLONE_CHILD_SETTID)
3584 info.child_tidptr = child_tidptr;
3585 if (nptl_flags & CLONE_PARENT_SETTID)
3586 info.parent_tidptr = parent_tidptr;
3587
3588 ret = pthread_attr_init(&attr);
3589 ret = pthread_attr_setstack(&attr, new_stack, NEW_STACK_SIZE);
3590 /* It is not safe to deliver signals until the child has finished
3591 initializing, so temporarily block all signals. */
3592 sigfillset(&sigmask);
3593 sigprocmask(SIG_BLOCK, &sigmask, &info.sigmask);
3594
3595 ret = pthread_create(&info.thread, &attr, clone_func, &info);
3596 /* TODO: Free new CPU state if thread creation failed. */
3597
3598 sigprocmask(SIG_SETMASK, &info.sigmask, NULL);
3599 pthread_attr_destroy(&attr);
3600 if (ret == 0) {
3601 /* Wait for the child to initialize. */
3602 pthread_cond_wait(&info.cond, &info.mutex);
3603 ret = info.tid;
3604 if (flags & CLONE_PARENT_SETTID)
3605 put_user_u32(ret, parent_tidptr);
3606 } else {
3607 ret = -1;
3608 }
3609 pthread_mutex_unlock(&info.mutex);
3610 pthread_cond_destroy(&info.cond);
3611 pthread_mutex_destroy(&info.mutex);
3612 pthread_mutex_unlock(&clone_lock);
3613 #else
3614 if (flags & CLONE_NPTL_FLAGS2)
3615 return -EINVAL;
3616 /* This is probably going to die very quickly, but do it anyway. */
3617 #ifdef __ia64__
3618 ret = __clone2(clone_func, new_stack + NEW_STACK_SIZE, flags, new_env);
3619 #else
3620 ret = clone(clone_func, new_stack + NEW_STACK_SIZE, flags, new_env);
3621 #endif
3622 #endif
3623 } else {
3624 /* if no CLONE_VM, we consider it is a fork */
3625 if ((flags & ~(CSIGNAL | CLONE_NPTL_FLAGS2)) != 0)
3626 return -EINVAL;
3627 fork_start();
3628 ret = fork();
3629 if (ret == 0) {
3630 /* Child Process. */
3631 cpu_clone_regs(env, newsp);
3632 fork_end(1);
3633 #if defined(CONFIG_USE_NPTL)
3634 /* There is a race condition here. The parent process could
3635 theoretically read the TID in the child process before the child
3636 tid is set. This would require using either ptrace
3637 (not implemented) or having *_tidptr to point at a shared memory
3638 mapping. We can't repeat the spinlock hack used above because
3639 the child process gets its own copy of the lock. */
3640 if (flags & CLONE_CHILD_SETTID)
3641 put_user_u32(gettid(), child_tidptr);
3642 if (flags & CLONE_PARENT_SETTID)
3643 put_user_u32(gettid(), parent_tidptr);
3644 ts = (TaskState *)env->opaque;
3645 if (flags & CLONE_SETTLS)
3646 cpu_set_tls (env, newtls);
3647 if (flags & CLONE_CHILD_CLEARTID)
3648 ts->child_tidptr = child_tidptr;
3649 #endif
3650 } else {
3651 fork_end(0);
3652 }
3653 }
3654 return ret;
3655 }
3656
3657 /* warning : doesn't handle linux specific flags... */
3658 static int target_to_host_fcntl_cmd(int cmd)
3659 {
3660 switch(cmd) {
3661 case TARGET_F_DUPFD:
3662 case TARGET_F_GETFD:
3663 case TARGET_F_SETFD:
3664 case TARGET_F_GETFL:
3665 case TARGET_F_SETFL:
3666 return cmd;
3667 case TARGET_F_GETLK:
3668 return F_GETLK;
3669 case TARGET_F_SETLK:
3670 return F_SETLK;
3671 case TARGET_F_SETLKW:
3672 return F_SETLKW;
3673 case TARGET_F_GETOWN:
3674 return F_GETOWN;
3675 case TARGET_F_SETOWN:
3676 return F_SETOWN;
3677 case TARGET_F_GETSIG:
3678 return F_GETSIG;
3679 case TARGET_F_SETSIG:
3680 return F_SETSIG;
3681 #if TARGET_ABI_BITS == 32
3682 case TARGET_F_GETLK64:
3683 return F_GETLK64;
3684 case TARGET_F_SETLK64:
3685 return F_SETLK64;
3686 case TARGET_F_SETLKW64:
3687 return F_SETLKW64;
3688 #endif
3689 case TARGET_F_SETLEASE:
3690 return F_SETLEASE;
3691 case TARGET_F_GETLEASE:
3692 return F_GETLEASE;
3693 #ifdef F_DUPFD_CLOEXEC
3694 case TARGET_F_DUPFD_CLOEXEC:
3695 return F_DUPFD_CLOEXEC;
3696 #endif
3697 case TARGET_F_NOTIFY:
3698 return F_NOTIFY;
3699 default:
3700 return -TARGET_EINVAL;
3701 }
3702 return -TARGET_EINVAL;
3703 }
3704
3705 static abi_long do_fcntl(int fd, int cmd, abi_ulong arg)
3706 {
3707 struct flock fl;
3708 struct target_flock *target_fl;
3709 struct flock64 fl64;
3710 struct target_flock64 *target_fl64;
3711 abi_long ret;
3712 int host_cmd = target_to_host_fcntl_cmd(cmd);
3713
3714 if (host_cmd == -TARGET_EINVAL)
3715 return host_cmd;
3716
3717 switch(cmd) {
3718 case TARGET_F_GETLK:
3719 if (!lock_user_struct(VERIFY_READ, target_fl, arg, 1))
3720 return -TARGET_EFAULT;
3721 fl.l_type = tswap16(target_fl->l_type);
3722 fl.l_whence = tswap16(target_fl->l_whence);
3723 fl.l_start = tswapl(target_fl->l_start);
3724 fl.l_len = tswapl(target_fl->l_len);
3725 fl.l_pid = tswap32(target_fl->l_pid);
3726 unlock_user_struct(target_fl, arg, 0);
3727 ret = get_errno(fcntl(fd, host_cmd, &fl));
3728 if (ret == 0) {
3729 if (!lock_user_struct(VERIFY_WRITE, target_fl, arg, 0))
3730 return -TARGET_EFAULT;
3731 target_fl->l_type = tswap16(fl.l_type);
3732 target_fl->l_whence = tswap16(fl.l_whence);
3733 target_fl->l_start = tswapl(fl.l_start);
3734 target_fl->l_len = tswapl(fl.l_len);
3735 target_fl->l_pid = tswap32(fl.l_pid);
3736 unlock_user_struct(target_fl, arg, 1);
3737 }
3738 break;
3739
3740 case TARGET_F_SETLK:
3741 case TARGET_F_SETLKW:
3742 if (!lock_user_struct(VERIFY_READ, target_fl, arg, 1))
3743 return -TARGET_EFAULT;
3744 fl.l_type = tswap16(target_fl->l_type);
3745 fl.l_whence = tswap16(target_fl->l_whence);
3746 fl.l_start = tswapl(target_fl->l_start);
3747 fl.l_len = tswapl(target_fl->l_len);
3748 fl.l_pid = tswap32(target_fl->l_pid);
3749 unlock_user_struct(target_fl, arg, 0);
3750 ret = get_errno(fcntl(fd, host_cmd, &fl));
3751 break;
3752
3753 case TARGET_F_GETLK64:
3754 if (!lock_user_struct(VERIFY_READ, target_fl64, arg, 1))
3755 return -TARGET_EFAULT;
3756 fl64.l_type = tswap16(target_fl64->l_type) >> 1;
3757 fl64.l_whence = tswap16(target_fl64->l_whence);
3758 fl64.l_start = tswapl(target_fl64->l_start);
3759 fl64.l_len = tswapl(target_fl64->l_len);
3760 fl64.l_pid = tswap32(target_fl64->l_pid);
3761 unlock_user_struct(target_fl64, arg, 0);
3762 ret = get_errno(fcntl(fd, host_cmd, &fl64));
3763 if (ret == 0) {
3764 if (!lock_user_struct(VERIFY_WRITE, target_fl64, arg, 0))
3765 return -TARGET_EFAULT;
3766 target_fl64->l_type = tswap16(fl64.l_type) >> 1;
3767 target_fl64->l_whence = tswap16(fl64.l_whence);
3768 target_fl64->l_start = tswapl(fl64.l_start);
3769 target_fl64->l_len = tswapl(fl64.l_len);
3770 target_fl64->l_pid = tswap32(fl64.l_pid);
3771 unlock_user_struct(target_fl64, arg, 1);
3772 }
3773 break;
3774 case TARGET_F_SETLK64:
3775 case TARGET_F_SETLKW64:
3776 if (!lock_user_struct(VERIFY_READ, target_fl64, arg, 1))
3777 return -TARGET_EFAULT;
3778 fl64.l_type = tswap16(target_fl64->l_type) >> 1;
3779 fl64.l_whence = tswap16(target_fl64->l_whence);
3780 fl64.l_start = tswapl(target_fl64->l_start);
3781 fl64.l_len = tswapl(target_fl64->l_len);
3782 fl64.l_pid = tswap32(target_fl64->l_pid);
3783 unlock_user_struct(target_fl64, arg, 0);
3784 ret = get_errno(fcntl(fd, host_cmd, &fl64));
3785 break;
3786
3787 case TARGET_F_GETFL:
3788 ret = get_errno(fcntl(fd, host_cmd, arg));
3789 if (ret >= 0) {
3790 ret = host_to_target_bitmask(ret, fcntl_flags_tbl);
3791 }
3792 break;
3793
3794 case TARGET_F_SETFL:
3795 ret = get_errno(fcntl(fd, host_cmd, target_to_host_bitmask(arg, fcntl_flags_tbl)));
3796 break;
3797
3798 case TARGET_F_SETOWN:
3799 case TARGET_F_GETOWN:
3800 case TARGET_F_SETSIG:
3801 case TARGET_F_GETSIG:
3802 case TARGET_F_SETLEASE:
3803 case TARGET_F_GETLEASE:
3804 ret = get_errno(fcntl(fd, host_cmd, arg));
3805 break;
3806
3807 default:
3808 ret = get_errno(fcntl(fd, cmd, arg));
3809 break;
3810 }
3811 return ret;
3812 }
3813
3814 #ifdef USE_UID16
3815
3816 static inline int high2lowuid(int uid)
3817 {
3818 if (uid > 65535)
3819 return 65534;
3820 else
3821 return uid;
3822 }
3823
3824 static inline int high2lowgid(int gid)
3825 {
3826 if (gid > 65535)
3827 return 65534;
3828 else
3829 return gid;
3830 }
3831
3832 static inline int low2highuid(int uid)
3833 {
3834 if ((int16_t)uid == -1)
3835 return -1;
3836 else
3837 return uid;
3838 }
3839
3840 static inline int low2highgid(int gid)
3841 {
3842 if ((int16_t)gid == -1)
3843 return -1;
3844 else
3845 return gid;
3846 }
3847
3848 #endif /* USE_UID16 */
3849
3850 void syscall_init(void)
3851 {
3852 IOCTLEntry *ie;
3853 const argtype *arg_type;
3854 int size;
3855 int i;
3856
3857 #define STRUCT(name, ...) thunk_register_struct(STRUCT_ ## name, #name, struct_ ## name ## _def);
3858 #define STRUCT_SPECIAL(name) thunk_register_struct_direct(STRUCT_ ## name, #name, &struct_ ## name ## _def);
3859 #include "syscall_types.h"
3860 #undef STRUCT
3861 #undef STRUCT_SPECIAL
3862
3863 /* we patch the ioctl size if necessary. We rely on the fact that
3864 no ioctl has all the bits at '1' in the size field */
3865 ie = ioctl_entries;
3866 while (ie->target_cmd != 0) {
3867 if (((ie->target_cmd >> TARGET_IOC_SIZESHIFT) & TARGET_IOC_SIZEMASK) ==
3868 TARGET_IOC_SIZEMASK) {
3869 arg_type = ie->arg_type;
3870 if (arg_type[0] != TYPE_PTR) {
3871 fprintf(stderr, "cannot patch size for ioctl 0x%x\n",
3872 ie->target_cmd);
3873 exit(1);
3874 }
3875 arg_type++;
3876 size = thunk_type_size(arg_type, 0);
3877 ie->target_cmd = (ie->target_cmd &
3878 ~(TARGET_IOC_SIZEMASK << TARGET_IOC_SIZESHIFT)) |
3879 (size << TARGET_IOC_SIZESHIFT);
3880 }
3881
3882 /* Build target_to_host_errno_table[] table from
3883 * host_to_target_errno_table[]. */
3884 for (i=0; i < ERRNO_TABLE_SIZE; i++)
3885 target_to_host_errno_table[host_to_target_errno_table[i]] = i;
3886
3887 /* automatic consistency check if same arch */
3888 #if (defined(__i386__) && defined(TARGET_I386) && defined(TARGET_ABI32)) || \
3889 (defined(__x86_64__) && defined(TARGET_X86_64))
3890 if (unlikely(ie->target_cmd != ie->host_cmd)) {
3891 fprintf(stderr, "ERROR: ioctl(%s): target=0x%x host=0x%x\n",
3892 ie->name, ie->target_cmd, ie->host_cmd);
3893 }
3894 #endif
3895 ie++;
3896 }
3897 }
3898
3899 #if TARGET_ABI_BITS == 32
3900 static inline uint64_t target_offset64(uint32_t word0, uint32_t word1)
3901 {
3902 #ifdef TARGET_WORDS_BIGENDIAN
3903 return ((uint64_t)word0 << 32) | word1;
3904 #else
3905 return ((uint64_t)word1 << 32) | word0;
3906 #endif
3907 }
3908 #else /* TARGET_ABI_BITS == 32 */
3909 static inline uint64_t target_offset64(uint64_t word0, uint64_t word1)
3910 {
3911 return word0;
3912 }
3913 #endif /* TARGET_ABI_BITS != 32 */
3914
3915 #ifdef TARGET_NR_truncate64
3916 static inline abi_long target_truncate64(void *cpu_env, const char *arg1,
3917 abi_long arg2,
3918 abi_long arg3,
3919 abi_long arg4)
3920 {
3921 #ifdef TARGET_ARM
3922 if (((CPUARMState *)cpu_env)->eabi)
3923 {
3924 arg2 = arg3;
3925 arg3 = arg4;
3926 }
3927 #endif
3928 return get_errno(truncate64(arg1, target_offset64(arg2, arg3)));
3929 }
3930 #endif
3931
3932 #ifdef TARGET_NR_ftruncate64
3933 static inline abi_long target_ftruncate64(void *cpu_env, abi_long arg1,
3934 abi_long arg2,
3935 abi_long arg3,
3936 abi_long arg4)
3937 {
3938 #ifdef TARGET_ARM
3939 if (((CPUARMState *)cpu_env)->eabi)
3940 {
3941 arg2 = arg3;
3942 arg3 = arg4;
3943 }
3944 #endif
3945 return get_errno(ftruncate64(arg1, target_offset64(arg2, arg3)));
3946 }
3947 #endif
3948
3949 static inline abi_long target_to_host_timespec(struct timespec *host_ts,
3950 abi_ulong target_addr)
3951 {
3952 struct target_timespec *target_ts;
3953
3954 if (!lock_user_struct(VERIFY_READ, target_ts, target_addr, 1))
3955 return -TARGET_EFAULT;
3956 host_ts->tv_sec = tswapl(target_ts->tv_sec);
3957 host_ts->tv_nsec = tswapl(target_ts->tv_nsec);
3958 unlock_user_struct(target_ts, target_addr, 0);
3959 return 0;
3960 }
3961
3962 static inline abi_long host_to_target_timespec(abi_ulong target_addr,
3963 struct timespec *host_ts)
3964 {
3965 struct target_timespec *target_ts;
3966
3967 if (!lock_user_struct(VERIFY_WRITE, target_ts, target_addr, 0))
3968 return -TARGET_EFAULT;
3969 target_ts->tv_sec = tswapl(host_ts->tv_sec);
3970 target_ts->tv_nsec = tswapl(host_ts->tv_nsec);
3971 unlock_user_struct(target_ts, target_addr, 1);
3972 return 0;
3973 }
3974
3975 #if defined(TARGET_NR_stat64) || defined(TARGET_NR_newfstatat)
3976 static inline abi_long host_to_target_stat64(void *cpu_env,
3977 abi_ulong target_addr,
3978 struct stat *host_st)
3979 {
3980 #ifdef TARGET_ARM
3981 if (((CPUARMState *)cpu_env)->eabi) {
3982 struct target_eabi_stat64 *target_st;
3983
3984 if (!lock_user_struct(VERIFY_WRITE, target_st, target_addr, 0))
3985 return -TARGET_EFAULT;
3986 memset(target_st, 0, sizeof(struct target_eabi_stat64));
3987 __put_user(host_st->st_dev, &target_st->st_dev);
3988 __put_user(host_st->st_ino, &target_st->st_ino);
3989 #ifdef TARGET_STAT64_HAS_BROKEN_ST_INO
3990 __put_user(host_st->st_ino, &target_st->__st_ino);
3991 #endif
3992 __put_user(host_st->st_mode, &target_st->st_mode);
3993 __put_user(host_st->st_nlink, &target_st->st_nlink);
3994 __put_user(host_st->st_uid, &target_st->st_uid);
3995 __put_user(host_st->st_gid, &target_st->st_gid);
3996 __put_user(host_st->st_rdev, &target_st->st_rdev);
3997 __put_user(host_st->st_size, &target_st->st_size);
3998 __put_user(host_st->st_blksize, &target_st->st_blksize);
3999 __put_user(host_st->st_blocks, &target_st->st_blocks);
4000 __put_user(host_st->st_atime, &target_st->target_st_atime);
4001 __put_user(host_st->st_mtime, &target_st->target_st_mtime);
4002 __put_user(host_st->st_ctime, &target_st->target_st_ctime);
4003 unlock_user_struct(target_st, target_addr, 1);
4004 } else
4005 #endif
4006 {
4007 #if (TARGET_LONG_BITS == 64) && (!defined(TARGET_ALPHA))
4008 struct target_stat *target_st;
4009 #else
4010 struct target_stat64 *target_st;
4011 #endif
4012
4013 if (!lock_user_struct(VERIFY_WRITE, target_st, target_addr, 0))
4014 return -TARGET_EFAULT;
4015 memset(target_st, 0, sizeof(*target_st));
4016 __put_user(host_st->st_dev, &target_st->st_dev);
4017 __put_user(host_st->st_ino, &target_st->st_ino);
4018 #ifdef TARGET_STAT64_HAS_BROKEN_ST_INO
4019 __put_user(host_st->st_ino, &target_st->__st_ino);
4020 #endif
4021 __put_user(host_st->st_mode, &target_st->st_mode);
4022 __put_user(host_st->st_nlink, &target_st->st_nlink);
4023 __put_user(host_st->st_uid, &target_st->st_uid);
4024 __put_user(host_st->st_gid, &target_st->st_gid);
4025 __put_user(host_st->st_rdev, &target_st->st_rdev);
4026 /* XXX: better use of kernel struct */
4027 __put_user(host_st->st_size, &target_st->st_size);
4028 __put_user(host_st->st_blksize, &target_st->st_blksize);
4029 __put_user(host_st->st_blocks, &target_st->st_blocks);
4030 __put_user(host_st->st_atime, &target_st->target_st_atime);
4031 __put_user(host_st->st_mtime, &target_st->target_st_mtime);
4032 __put_user(host_st->st_ctime, &target_st->target_st_ctime);
4033 unlock_user_struct(target_st, target_addr, 1);
4034 }
4035
4036 return 0;
4037 }
4038 #endif
4039
4040 #if defined(CONFIG_USE_NPTL)
4041 /* ??? Using host futex calls even when target atomic operations
4042 are not really atomic probably breaks things. However implementing
4043 futexes locally would make futexes shared between multiple processes
4044 tricky. However they're probably useless because guest atomic
4045 operations won't work either. */
4046 static int do_futex(target_ulong uaddr, int op, int val, target_ulong timeout,
4047 target_ulong uaddr2, int val3)
4048 {
4049 struct timespec ts, *pts;
4050 int base_op;
4051
4052 /* ??? We assume FUTEX_* constants are the same on both host
4053 and target. */
4054 #ifdef FUTEX_CMD_MASK
4055 base_op = op & FUTEX_CMD_MASK;
4056 #else
4057 base_op = op;
4058 #endif
4059 switch (base_op) {
4060 case FUTEX_WAIT:
4061 if (timeout) {
4062 pts = &ts;
4063 target_to_host_timespec(pts, timeout);
4064 } else {
4065 pts = NULL;
4066 }
4067 return get_errno(sys_futex(g2h(uaddr), op, tswap32(val),
4068 pts, NULL, 0));
4069 case FUTEX_WAKE:
4070 return get_errno(sys_futex(g2h(uaddr), op, val, NULL, NULL, 0));
4071 case FUTEX_FD:
4072 return get_errno(sys_futex(g2h(uaddr), op, val, NULL, NULL, 0));
4073 case FUTEX_REQUEUE:
4074 case FUTEX_CMP_REQUEUE:
4075 case FUTEX_WAKE_OP:
4076 /* For FUTEX_REQUEUE, FUTEX_CMP_REQUEUE, and FUTEX_WAKE_OP, the
4077 TIMEOUT parameter is interpreted as a uint32_t by the kernel.
4078 But the prototype takes a `struct timespec *'; insert casts
4079 to satisfy the compiler. We do not need to tswap TIMEOUT
4080 since it's not compared to guest memory. */
4081 pts = (struct timespec *)(uintptr_t) timeout;
4082 return get_errno(sys_futex(g2h(uaddr), op, val, pts,
4083 g2h(uaddr2),
4084 (base_op == FUTEX_CMP_REQUEUE
4085 ? tswap32(val3)
4086 : val3)));
4087 default:
4088 return -TARGET_ENOSYS;
4089 }
4090 }
4091 #endif
4092
4093 /* Map host to target signal numbers for the wait family of syscalls.
4094 Assume all other status bits are the same. */
4095 static int host_to_target_waitstatus(int status)
4096 {
4097 if (WIFSIGNALED(status)) {
4098 return host_to_target_signal(WTERMSIG(status)) | (status & ~0x7f);
4099 }
4100 if (WIFSTOPPED(status)) {
4101 return (host_to_target_signal(WSTOPSIG(status)) << 8)
4102 | (status & 0xff);
4103 }
4104 return status;
4105 }
4106
4107 int get_osversion(void)
4108 {
4109 static int osversion;
4110 struct new_utsname buf;
4111 const char *s;
4112 int i, n, tmp;
4113 if (osversion)
4114 return osversion;
4115 if (qemu_uname_release && *qemu_uname_release) {
4116 s = qemu_uname_release;
4117 } else {
4118 if (sys_uname(&buf))
4119 return 0;
4120 s = buf.release;
4121 }
4122 tmp = 0;
4123 for (i = 0; i < 3; i++) {
4124 n = 0;
4125 while (*s >= '0' && *s <= '9') {
4126 n *= 10;
4127 n += *s - '0';
4128 s++;
4129 }
4130 tmp = (tmp << 8) + n;
4131 if (*s == '.')
4132 s++;
4133 }
4134 osversion = tmp;
4135 return osversion;
4136 }
4137
4138 /* do_syscall() should always have a single exit point at the end so
4139 that actions, such as logging of syscall results, can be performed.
4140 All errnos that do_syscall() returns must be -TARGET_<errcode>. */
4141 abi_long do_syscall(void *cpu_env, int num, abi_long arg1,
4142 abi_long arg2, abi_long arg3, abi_long arg4,
4143 abi_long arg5, abi_long arg6)
4144 {
4145 abi_long ret;
4146 struct stat st;
4147 struct statfs stfs;
4148 void *p;
4149
4150 #ifdef DEBUG
4151 gemu_log("syscall %d", num);
4152 #endif
4153 if(do_strace)
4154 print_syscall(num, arg1, arg2, arg3, arg4, arg5, arg6);
4155
4156 switch(num) {
4157 case TARGET_NR_exit:
4158 #ifdef CONFIG_USE_NPTL
4159 /* In old applications this may be used to implement _exit(2).
4160 However in threaded applictions it is used for thread termination,
4161 and _exit_group is used for application termination.
4162 Do thread termination if we have more then one thread. */
4163 /* FIXME: This probably breaks if a signal arrives. We should probably
4164 be disabling signals. */
4165 if (first_cpu->next_cpu) {
4166 TaskState *ts;
4167 CPUState **lastp;
4168 CPUState *p;
4169
4170 cpu_list_lock();
4171 lastp = &first_cpu;
4172 p = first_cpu;
4173 while (p && p != (CPUState *)cpu_env) {
4174 lastp = &p->next_cpu;
4175 p = p->next_cpu;
4176 }
4177 /* If we didn't find the CPU for this thread then something is
4178 horribly wrong. */
4179 if (!p)
4180 abort();
4181 /* Remove the CPU from the list. */
4182 *lastp = p->next_cpu;
4183 cpu_list_unlock();
4184 ts = ((CPUState *)cpu_env)->opaque;
4185 if (ts->child_tidptr) {
4186 put_user_u32(0, ts->child_tidptr);
4187 sys_futex(g2h(ts->child_tidptr), FUTEX_WAKE, INT_MAX,
4188 NULL, NULL, 0);
4189 }
4190 /* TODO: Free CPU state. */
4191 pthread_exit(NULL);
4192 }
4193 #endif
4194 #ifdef TARGET_GPROF
4195 _mcleanup();
4196 #endif
4197 gdb_exit(cpu_env, arg1);
4198 _exit(arg1);
4199 ret = 0; /* avoid warning */
4200 break;
4201 case TARGET_NR_read:
4202 if (arg3 == 0)
4203 ret = 0;
4204 else {
4205 if (!(p = lock_user(VERIFY_WRITE, arg2, arg3, 0)))
4206 goto efault;
4207 ret = get_errno(read(arg1, p, arg3));
4208 unlock_user(p, arg2, ret);
4209 }
4210 break;
4211 case TARGET_NR_write:
4212 if (!(p = lock_user(VERIFY_READ, arg2, arg3, 1)))
4213 goto efault;
4214 ret = get_errno(write(arg1, p, arg3));
4215 unlock_user(p, arg2, 0);
4216 break;
4217 case TARGET_NR_open:
4218 if (!(p = lock_user_string(arg1)))
4219 goto efault;
4220 ret = get_errno(open(path(p),
4221 target_to_host_bitmask(arg2, fcntl_flags_tbl),
4222 arg3));
4223 unlock_user(p, arg1, 0);
4224 break;
4225 #if defined(TARGET_NR_openat) && defined(__NR_openat)
4226 case TARGET_NR_openat:
4227 if (!(p = lock_user_string(arg2)))
4228 goto efault;
4229 ret = get_errno(sys_openat(arg1,
4230 path(p),
4231 target_to_host_bitmask(arg3, fcntl_flags_tbl),
4232 arg4));
4233 unlock_user(p, arg2, 0);
4234 break;
4235 #endif
4236 case TARGET_NR_close:
4237 ret = get_errno(close(arg1));
4238 break;
4239 case TARGET_NR_brk:
4240 ret = do_brk(arg1);
4241 break;
4242 case TARGET_NR_fork:
4243 ret = get_errno(do_fork(cpu_env, SIGCHLD, 0, 0, 0, 0));
4244 break;
4245 #ifdef TARGET_NR_waitpid
4246 case TARGET_NR_waitpid:
4247 {
4248 int status;
4249 ret = get_errno(waitpid(arg1, &status, arg3));
4250 if (!is_error(ret) && arg2
4251 && put_user_s32(host_to_target_waitstatus(status), arg2))
4252 goto efault;
4253 }
4254 break;
4255 #endif
4256 #ifdef TARGET_NR_waitid
4257 case TARGET_NR_waitid:
4258 {
4259 siginfo_t info;
4260 info.si_pid = 0;
4261 ret = get_errno(waitid(arg1, arg2, &info, arg4));
4262 if (!is_error(ret) && arg3 && info.si_pid != 0) {
4263 if (!(p = lock_user(VERIFY_WRITE, arg3, sizeof(target_siginfo_t), 0)))
4264 goto efault;
4265 host_to_target_siginfo(p, &info);
4266 unlock_user(p, arg3, sizeof(target_siginfo_t));
4267 }
4268 }
4269 break;
4270 #endif
4271 #ifdef TARGET_NR_creat /* not on alpha */
4272 case TARGET_NR_creat:
4273 if (!(p = lock_user_string(arg1)))
4274 goto efault;
4275 ret = get_errno(creat(p, arg2));
4276 unlock_user(p, arg1, 0);
4277 break;
4278 #endif
4279 case TARGET_NR_link:
4280 {
4281 void * p2;
4282 p = lock_user_string(arg1);
4283 p2 = lock_user_string(arg2);
4284 if (!p || !p2)
4285 ret = -TARGET_EFAULT;
4286 else
4287 ret = get_errno(link(p, p2));
4288 unlock_user(p2, arg2, 0);
4289 unlock_user(p, arg1, 0);
4290 }
4291 break;
4292 #if defined(TARGET_NR_linkat) && defined(__NR_linkat)
4293 case TARGET_NR_linkat:
4294 {
4295 void * p2 = NULL;
4296 if (!arg2 || !arg4)
4297 goto efault;
4298 p = lock_user_string(arg2);
4299 p2 = lock_user_string(arg4);
4300 if (!p || !p2)
4301 ret = -TARGET_EFAULT;
4302 else
4303 ret = get_errno(sys_linkat(arg1, p, arg3, p2, arg5));
4304 unlock_user(p, arg2, 0);
4305 unlock_user(p2, arg4, 0);
4306 }
4307 break;
4308 #endif
4309 case TARGET_NR_unlink:
4310 if (!(p = lock_user_string(arg1)))
4311 goto efault;
4312 ret = get_errno(unlink(p));
4313 unlock_user(p, arg1, 0);
4314 break;
4315 #if defined(TARGET_NR_unlinkat) && defined(__NR_unlinkat)
4316 case TARGET_NR_unlinkat:
4317 if (!(p = lock_user_string(arg2)))
4318 goto efault;
4319 ret = get_errno(sys_unlinkat(arg1, p, arg3));
4320 unlock_user(p, arg2, 0);
4321 break;
4322 #endif
4323 case TARGET_NR_execve:
4324 {
4325 char **argp, **envp;
4326 int argc, envc;
4327 abi_ulong gp;
4328 abi_ulong guest_argp;
4329 abi_ulong guest_envp;
4330 abi_ulong addr;
4331 char **q;
4332
4333 argc = 0;
4334 guest_argp = arg2;
4335 for (gp = guest_argp; gp; gp += sizeof(abi_ulong)) {
4336 if (get_user_ual(addr, gp))
4337 goto efault;
4338 if (!addr)
4339 break;
4340 argc++;
4341 }
4342 envc = 0;
4343 guest_envp = arg3;
4344 for (gp = guest_envp; gp; gp += sizeof(abi_ulong)) {
4345 if (get_user_ual(addr, gp))
4346 goto efault;
4347 if (!addr)
4348 break;
4349 envc++;
4350 }
4351
4352 argp = alloca((argc + 1) * sizeof(void *));
4353 envp = alloca((envc + 1) * sizeof(void *));
4354
4355 for (gp = guest_argp, q = argp; gp;
4356 gp += sizeof(abi_ulong), q++) {
4357 if (get_user_ual(addr, gp))
4358 goto execve_efault;
4359 if (!addr)
4360 break;
4361 if (!(*q = lock_user_string(addr)))
4362 goto execve_efault;
4363 }
4364 *q = NULL;
4365
4366 for (gp = guest_envp, q = envp; gp;
4367 gp += sizeof(abi_ulong), q++) {
4368 if (get_user_ual(addr, gp))
4369 goto execve_efault;
4370 if (!addr)
4371 break;
4372 if (!(*q = lock_user_string(addr)))
4373 goto execve_efault;
4374 }
4375 *q = NULL;
4376
4377 if (!(p = lock_user_string(arg1)))
4378 goto execve_efault;
4379 ret = get_errno(execve(p, argp, envp));
4380 unlock_user(p, arg1, 0);
4381
4382 goto execve_end;
4383
4384 execve_efault:
4385 ret = -TARGET_EFAULT;
4386
4387 execve_end:
4388 for (gp = guest_argp, q = argp; *q;
4389 gp += sizeof(abi_ulong), q++) {
4390 if (get_user_ual(addr, gp)
4391 || !addr)
4392 break;
4393 unlock_user(*q, addr, 0);
4394 }
4395 for (gp = guest_envp, q = envp; *q;
4396 gp += sizeof(abi_ulong), q++) {
4397 if (get_user_ual(addr, gp)
4398 || !addr)
4399 break;
4400 unlock_user(*q, addr, 0);
4401 }
4402 }
4403 break;
4404 case TARGET_NR_chdir:
4405 if (!(p = lock_user_string(arg1)))
4406 goto efault;
4407 ret = get_errno(chdir(p));
4408 unlock_user(p, arg1, 0);
4409 break;
4410 #ifdef TARGET_NR_time
4411 case TARGET_NR_time:
4412 {
4413 time_t host_time;
4414 ret = get_errno(time(&host_time));
4415 if (!is_error(ret)
4416 && arg1
4417 && put_user_sal(host_time, arg1))
4418 goto efault;
4419 }
4420 break;
4421 #endif
4422 case TARGET_NR_mknod:
4423 if (!(p = lock_user_string(arg1)))
4424 goto efault;
4425 ret = get_errno(mknod(p, arg2, arg3));
4426 unlock_user(p, arg1, 0);
4427 break;
4428 #if defined(TARGET_NR_mknodat) && defined(__NR_mknodat)
4429 case TARGET_NR_mknodat:
4430 if (!(p = lock_user_string(arg2)))
4431 goto efault;
4432 ret = get_errno(sys_mknodat(arg1, p, arg3, arg4));
4433 unlock_user(p, arg2, 0);
4434 break;
4435 #endif
4436 case TARGET_NR_chmod:
4437 if (!(p = lock_user_string(arg1)))
4438 goto efault;
4439 ret = get_errno(chmod(p, arg2));
4440 unlock_user(p, arg1, 0);
4441 break;
4442 #ifdef TARGET_NR_break
4443 case TARGET_NR_break:
4444 goto unimplemented;
4445 #endif
4446 #ifdef TARGET_NR_oldstat
4447 case TARGET_NR_oldstat:
4448 goto unimplemented;
4449 #endif
4450 case TARGET_NR_lseek:
4451 ret = get_errno(lseek(arg1, arg2, arg3));
4452 break;
4453 #ifdef TARGET_NR_getxpid
4454 case TARGET_NR_getxpid:
4455 #else
4456 case TARGET_NR_getpid:
4457 #endif
4458 ret = get_errno(getpid());
4459 break;
4460 case TARGET_NR_mount:
4461 {
4462 /* need to look at the data field */
4463 void *p2, *p3;
4464 p = lock_user_string(arg1);
4465 p2 = lock_user_string(arg2);
4466 p3 = lock_user_string(arg3);
4467 if (!p || !p2 || !p3)
4468 ret = -TARGET_EFAULT;
4469 else {
4470 /* FIXME - arg5 should be locked, but it isn't clear how to
4471 * do that since it's not guaranteed to be a NULL-terminated
4472 * string.
4473 */
4474 if ( ! arg5 )
4475 ret = get_errno(mount(p, p2, p3, (unsigned long)arg4, NULL));
4476 else
4477 ret = get_errno(mount(p, p2, p3, (unsigned long)arg4, g2h(arg5)));
4478 }
4479 unlock_user(p, arg1, 0);
4480 unlock_user(p2, arg2, 0);
4481 unlock_user(p3, arg3, 0);
4482 break;
4483 }
4484 #ifdef TARGET_NR_umount
4485 case TARGET_NR_umount:
4486 if (!(p = lock_user_string(arg1)))
4487 goto efault;
4488 ret = get_errno(umount(p));
4489 unlock_user(p, arg1, 0);
4490 break;
4491 #endif
4492 #ifdef TARGET_NR_stime /* not on alpha */
4493 case TARGET_NR_stime:
4494 {
4495 time_t host_time;
4496 if (get_user_sal(host_time, arg1))
4497 goto efault;
4498 ret = get_errno(stime(&host_time));
4499 }
4500 break;
4501 #endif
4502 case TARGET_NR_ptrace:
4503 goto unimplemented;
4504 #ifdef TARGET_NR_alarm /* not on alpha */
4505 case TARGET_NR_alarm:
4506 ret = alarm(arg1);
4507 break;
4508 #endif
4509 #ifdef TARGET_NR_oldfstat
4510 case TARGET_NR_oldfstat:
4511 goto unimplemented;
4512 #endif
4513 #ifdef TARGET_NR_pause /* not on alpha */
4514 case TARGET_NR_pause:
4515 ret = get_errno(pause());
4516 break;
4517 #endif
4518 #ifdef TARGET_NR_utime
4519 case TARGET_NR_utime:
4520 {
4521 struct utimbuf tbuf, *host_tbuf;
4522 struct target_utimbuf *target_tbuf;
4523 if (arg2) {
4524 if (!lock_user_struct(VERIFY_READ, target_tbuf, arg2, 1))
4525 goto efault;
4526 tbuf.actime = tswapl(target_tbuf->actime);
4527 tbuf.modtime = tswapl(target_tbuf->modtime);
4528 unlock_user_struct(target_tbuf, arg2, 0);
4529 host_tbuf = &tbuf;
4530 } else {
4531 host_tbuf = NULL;
4532 }
4533 if (!(p = lock_user_string(arg1)))
4534 goto efault;
4535 ret = get_errno(utime(p, host_tbuf));
4536 unlock_user(p, arg1, 0);
4537 }
4538 break;
4539 #endif
4540 case TARGET_NR_utimes:
4541 {
4542 struct timeval *tvp, tv[2];
4543 if (arg2) {
4544 if (copy_from_user_timeval(&tv[0], arg2)
4545 || copy_from_user_timeval(&tv[1],
4546 arg2 + sizeof(struct target_timeval)))
4547 goto efault;
4548 tvp = tv;
4549 } else {
4550 tvp = NULL;
4551 }
4552 if (!(p = lock_user_string(arg1)))
4553 goto efault;
4554 ret = get_errno(utimes(p, tvp));
4555 unlock_user(p, arg1, 0);
4556 }
4557 break;
4558 #if defined(TARGET_NR_futimesat) && defined(__NR_futimesat)
4559 case TARGET_NR_futimesat:
4560 {
4561 struct timeval *tvp, tv[2];
4562 if (arg3) {
4563 if (copy_from_user_timeval(&tv[0], arg3)
4564 || copy_from_user_timeval(&tv[1],
4565 arg3 + sizeof(struct target_timeval)))
4566 goto efault;
4567 tvp = tv;
4568 } else {
4569 tvp = NULL;
4570 }
4571 if (!(p = lock_user_string(arg2)))
4572 goto efault;
4573 ret = get_errno(sys_futimesat(arg1, path(p), tvp));
4574 unlock_user(p, arg2, 0);
4575 }
4576 break;
4577 #endif
4578 #ifdef TARGET_NR_stty
4579 case TARGET_NR_stty:
4580 goto unimplemented;
4581 #endif
4582 #ifdef TARGET_NR_gtty
4583 case TARGET_NR_gtty:
4584 goto unimplemented;
4585 #endif
4586 case TARGET_NR_access:
4587 if (!(p = lock_user_string(arg1)))
4588 goto efault;
4589 ret = get_errno(access(path(p), arg2));
4590 unlock_user(p, arg1, 0);
4591 break;
4592 #if defined(TARGET_NR_faccessat) && defined(__NR_faccessat)
4593 case TARGET_NR_faccessat:
4594 if (!(p = lock_user_string(arg2)))
4595 goto efault;
4596 ret = get_errno(sys_faccessat(arg1, p, arg3));
4597 unlock_user(p, arg2, 0);
4598 break;
4599 #endif
4600 #ifdef TARGET_NR_nice /* not on alpha */
4601 case TARGET_NR_nice:
4602 ret = get_errno(nice(arg1));
4603 break;
4604 #endif
4605 #ifdef TARGET_NR_ftime
4606 case TARGET_NR_ftime:
4607 goto unimplemented;
4608 #endif
4609 case TARGET_NR_sync:
4610 sync();
4611 ret = 0;
4612 break;
4613 case TARGET_NR_kill:
4614 ret = get_errno(kill(arg1, target_to_host_signal(arg2)));
4615 break;
4616 case TARGET_NR_rename:
4617 {
4618 void *p2;
4619 p = lock_user_string(arg1);
4620 p2 = lock_user_string(arg2);
4621 if (!p || !p2)
4622 ret = -TARGET_EFAULT;
4623 else
4624 ret = get_errno(rename(p, p2));
4625 unlock_user(p2, arg2, 0);
4626 unlock_user(p, arg1, 0);
4627 }
4628 break;
4629 #if defined(TARGET_NR_renameat) && defined(__NR_renameat)
4630 case TARGET_NR_renameat:
4631 {
4632 void *p2;
4633 p = lock_user_string(arg2);
4634 p2 = lock_user_string(arg4);
4635 if (!p || !p2)
4636 ret = -TARGET_EFAULT;
4637 else
4638 ret = get_errno(sys_renameat(arg1, p, arg3, p2));
4639 unlock_user(p2, arg4, 0);
4640 unlock_user(p, arg2, 0);
4641 }
4642 break;
4643 #endif
4644 case TARGET_NR_mkdir:
4645 if (!(p = lock_user_string(arg1)))
4646 goto efault;
4647 ret = get_errno(mkdir(p, arg2));
4648 unlock_user(p, arg1, 0);
4649 break;
4650 #if defined(TARGET_NR_mkdirat) && defined(__NR_mkdirat)
4651 case TARGET_NR_mkdirat:
4652 if (!(p = lock_user_string(arg2)))
4653 goto efault;
4654 ret = get_errno(sys_mkdirat(arg1, p, arg3));
4655 unlock_user(p, arg2, 0);
4656 break;
4657 #endif
4658 case TARGET_NR_rmdir:
4659 if (!(p = lock_user_string(arg1)))
4660 goto efault;
4661 ret = get_errno(rmdir(p));
4662 unlock_user(p, arg1, 0);
4663 break;
4664 case TARGET_NR_dup:
4665 ret = get_errno(dup(arg1));
4666 break;
4667 case TARGET_NR_pipe:
4668 ret = do_pipe(cpu_env, arg1, 0);
4669 break;
4670 #ifdef TARGET_NR_pipe2
4671 case TARGET_NR_pipe2:
4672 ret = do_pipe(cpu_env, arg1, arg2);
4673 break;
4674 #endif
4675 case TARGET_NR_times:
4676 {
4677 struct target_tms *tmsp;
4678 struct tms tms;
4679 ret = get_errno(times(&tms));
4680 if (arg1) {
4681 tmsp = lock_user(VERIFY_WRITE, arg1, sizeof(struct target_tms), 0);
4682 if (!tmsp)
4683 goto efault;
4684 tmsp->tms_utime = tswapl(host_to_target_clock_t(tms.tms_utime));
4685 tmsp->tms_stime = tswapl(host_to_target_clock_t(tms.tms_stime));
4686 tmsp->tms_cutime = tswapl(host_to_target_clock_t(tms.tms_cutime));
4687 tmsp->tms_cstime = tswapl(host_to_target_clock_t(tms.tms_cstime));
4688 }
4689 if (!is_error(ret))
4690 ret = host_to_target_clock_t(ret);
4691 }
4692 break;
4693 #ifdef TARGET_NR_prof
4694 case TARGET_NR_prof:
4695 goto unimplemented;
4696 #endif
4697 #ifdef TARGET_NR_signal
4698 case TARGET_NR_signal:
4699 goto unimplemented;
4700 #endif
4701 case TARGET_NR_acct:
4702 if (arg1 == 0) {
4703 ret = get_errno(acct(NULL));
4704 } else {
4705 if (!(p = lock_user_string(arg1)))
4706 goto efault;
4707 ret = get_errno(acct(path(p)));
4708 unlock_user(p, arg1, 0);
4709 }
4710 break;
4711 #ifdef TARGET_NR_umount2 /* not on alpha */
4712 case TARGET_NR_umount2:
4713 if (!(p = lock_user_string(arg1)))
4714 goto efault;
4715 ret = get_errno(umount2(p, arg2));
4716 unlock_user(p, arg1, 0);
4717 break;
4718 #endif
4719 #ifdef TARGET_NR_lock
4720 case TARGET_NR_lock:
4721 goto unimplemented;
4722 #endif
4723 case TARGET_NR_ioctl:
4724 ret = do_ioctl(arg1, arg2, arg3);
4725 break;
4726 case TARGET_NR_fcntl:
4727 ret = do_fcntl(arg1, arg2, arg3);
4728 break;
4729 #ifdef TARGET_NR_mpx
4730 case TARGET_NR_mpx:
4731 goto unimplemented;
4732 #endif
4733 case TARGET_NR_setpgid:
4734 ret = get_errno(setpgid(arg1, arg2));
4735 break;
4736 #ifdef TARGET_NR_ulimit
4737 case TARGET_NR_ulimit:
4738 goto unimplemented;
4739 #endif
4740 #ifdef TARGET_NR_oldolduname
4741 case TARGET_NR_oldolduname:
4742 goto unimplemented;
4743 #endif
4744 case TARGET_NR_umask:
4745 ret = get_errno(umask(arg1));
4746 break;
4747 case TARGET_NR_chroot:
4748 if (!(p = lock_user_string(arg1)))
4749 goto efault;
4750 ret = get_errno(chroot(p));
4751 unlock_user(p, arg1, 0);
4752 break;
4753 case TARGET_NR_ustat:
4754 goto unimplemented;
4755 case TARGET_NR_dup2:
4756 ret = get_errno(dup2(arg1, arg2));
4757 break;
4758 #if defined(CONFIG_DUP3) && defined(TARGET_NR_dup3)
4759 case TARGET_NR_dup3:
4760 ret = get_errno(dup3(arg1, arg2, arg3));
4761 break;
4762 #endif
4763 #ifdef TARGET_NR_getppid /* not on alpha */
4764 case TARGET_NR_getppid:
4765 ret = get_errno(getppid());
4766 break;
4767 #endif
4768 case TARGET_NR_getpgrp:
4769 ret = get_errno(getpgrp());
4770 break;
4771 case TARGET_NR_setsid:
4772 ret = get_errno(setsid());
4773 break;
4774 #ifdef TARGET_NR_sigaction
4775 case TARGET_NR_sigaction:
4776 {
4777 #if !defined(TARGET_MIPS)
4778 struct target_old_sigaction *old_act;
4779 struct target_sigaction act, oact, *pact;
4780 if (arg2) {
4781 if (!lock_user_struct(VERIFY_READ, old_act, arg2, 1))
4782 goto efault;
4783 act._sa_handler = old_act->_sa_handler;
4784 target_siginitset(&act.sa_mask, old_act->sa_mask);
4785 act.sa_flags = old_act->sa_flags;
4786 act.sa_restorer = old_act->sa_restorer;
4787 unlock_user_struct(old_act, arg2, 0);
4788 pact = &act;
4789 } else {
4790 pact = NULL;
4791 }
4792 ret = get_errno(do_sigaction(arg1, pact, &oact));
4793 if (!is_error(ret) && arg3) {
4794 if (!lock_user_struct(VERIFY_WRITE, old_act, arg3, 0))
4795 goto efault;
4796 old_act->_sa_handler = oact._sa_handler;
4797 old_act->sa_mask = oact.sa_mask.sig[0];
4798 old_act->sa_flags = oact.sa_flags;
4799 old_act->sa_restorer = oact.sa_restorer;
4800 unlock_user_struct(old_act, arg3, 1);
4801 }
4802 #else
4803 struct target_sigaction act, oact, *pact, *old_act;
4804
4805 if (arg2) {
4806 if (!lock_user_struct(VERIFY_READ, old_act, arg2, 1))
4807 goto efault;
4808 act._sa_handler = old_act->_sa_handler;
4809 target_siginitset(&act.sa_mask, old_act->sa_mask.sig[0]);
4810 act.sa_flags = old_act->sa_flags;
4811 unlock_user_struct(old_act, arg2, 0);
4812 pact = &act;
4813 } else {
4814 pact = NULL;
4815 }
4816
4817 ret = get_errno(do_sigaction(arg1, pact, &oact));
4818
4819 if (!is_error(ret) && arg3) {
4820 if (!lock_user_struct(VERIFY_WRITE, old_act, arg3, 0))
4821 goto efault;
4822 old_act->_sa_handler = oact._sa_handler;
4823 old_act->sa_flags = oact.sa_flags;
4824 old_act->sa_mask.sig[0] = oact.sa_mask.sig[0];
4825 old_act->sa_mask.sig[1] = 0;
4826 old_act->sa_mask.sig[2] = 0;
4827 old_act->sa_mask.sig[3] = 0;
4828 unlock_user_struct(old_act, arg3, 1);
4829 }
4830 #endif
4831 }
4832 break;
4833 #endif
4834 case TARGET_NR_rt_sigaction:
4835 {
4836 struct target_sigaction *act;
4837 struct target_sigaction *oact;
4838
4839 if (arg2) {
4840 if (!lock_user_struct(VERIFY_READ, act, arg2, 1))
4841 goto efault;
4842 } else
4843 act = NULL;
4844 if (arg3) {
4845 if (!lock_user_struct(VERIFY_WRITE, oact, arg3, 0)) {
4846 ret = -TARGET_EFAULT;
4847 goto rt_sigaction_fail;
4848 }
4849 } else
4850 oact = NULL;
4851 ret = get_errno(do_sigaction(arg1, act, oact));
4852 rt_sigaction_fail:
4853 if (act)
4854 unlock_user_struct(act, arg2, 0);
4855 if (oact)
4856 unlock_user_struct(oact, arg3, 1);
4857 }
4858 break;
4859 #ifdef TARGET_NR_sgetmask /* not on alpha */
4860 case TARGET_NR_sgetmask:
4861 {
4862 sigset_t cur_set;
4863 abi_ulong target_set;
4864 sigprocmask(0, NULL, &cur_set);
4865 host_to_target_old_sigset(&target_set, &cur_set);
4866 ret = target_set;
4867 }
4868 break;
4869 #endif
4870 #ifdef TARGET_NR_ssetmask /* not on alpha */
4871 case TARGET_NR_ssetmask:
4872 {
4873 sigset_t set, oset, cur_set;
4874 abi_ulong target_set = arg1;
4875 sigprocmask(0, NULL, &cur_set);
4876 target_to_host_old_sigset(&set, &target_set);
4877 sigorset(&set, &set, &cur_set);
4878 sigprocmask(SIG_SETMASK, &set, &oset);
4879 host_to_target_old_sigset(&target_set, &oset);
4880 ret = target_set;
4881 }
4882 break;
4883 #endif
4884 #ifdef TARGET_NR_sigprocmask
4885 case TARGET_NR_sigprocmask:
4886 {
4887 int how = arg1;
4888 sigset_t set, oldset, *set_ptr;
4889
4890 if (arg2) {
4891 switch(how) {
4892 case TARGET_SIG_BLOCK:
4893 how = SIG_BLOCK;
4894 break;
4895 case TARGET_SIG_UNBLOCK:
4896 how = SIG_UNBLOCK;
4897 break;
4898 case TARGET_SIG_SETMASK:
4899 how = SIG_SETMASK;
4900 break;
4901 default:
4902 ret = -TARGET_EINVAL;
4903 goto fail;
4904 }
4905 if (!(p = lock_user(VERIFY_READ, arg2, sizeof(target_sigset_t), 1)))
4906 goto efault;
4907 target_to_host_old_sigset(&set, p);
4908 unlock_user(p, arg2, 0);
4909 set_ptr = &set;
4910 } else {
4911 how = 0;
4912 set_ptr = NULL;
4913 }
4914 ret = get_errno(sigprocmask(arg1, set_ptr, &oldset));
4915 if (!is_error(ret) && arg3) {
4916 if (!(p = lock_user(VERIFY_WRITE, arg3, sizeof(target_sigset_t), 0)))
4917 goto efault;
4918 host_to_target_old_sigset(p, &oldset);
4919 unlock_user(p, arg3, sizeof(target_sigset_t));
4920 }
4921 }
4922 break;
4923 #endif
4924 case TARGET_NR_rt_sigprocmask:
4925 {
4926 int how = arg1;
4927 sigset_t set, oldset, *set_ptr;
4928
4929 if (arg2) {
4930 switch(how) {
4931 case TARGET_SIG_BLOCK:
4932 how = SIG_BLOCK;
4933 break;
4934 case TARGET_SIG_UNBLOCK:
4935 how = SIG_UNBLOCK;
4936 break;
4937 case TARGET_SIG_SETMASK:
4938 how = SIG_SETMASK;
4939 break;
4940 default:
4941 ret = -TARGET_EINVAL;
4942 goto fail;
4943 }
4944 if (!(p = lock_user(VERIFY_READ, arg2, sizeof(target_sigset_t), 1)))
4945 goto efault;
4946 target_to_host_sigset(&set, p);
4947 unlock_user(p, arg2, 0);
4948 set_ptr = &set;
4949 } else {
4950 how = 0;
4951 set_ptr = NULL;
4952 }
4953 ret = get_errno(sigprocmask(how, set_ptr, &oldset));
4954 if (!is_error(ret) && arg3) {
4955 if (!(p = lock_user(VERIFY_WRITE, arg3, sizeof(target_sigset_t), 0)))
4956 goto efault;
4957 host_to_target_sigset(p, &oldset);
4958 unlock_user(p, arg3, sizeof(target_sigset_t));
4959 }
4960 }
4961 break;
4962 #ifdef TARGET_NR_sigpending
4963 case TARGET_NR_sigpending:
4964 {
4965 sigset_t set;
4966 ret = get_errno(sigpending(&set));
4967 if (!is_error(ret)) {
4968 if (!(p = lock_user(VERIFY_WRITE, arg1, sizeof(target_sigset_t), 0)))
4969 goto efault;
4970 host_to_target_old_sigset(p, &set);
4971 unlock_user(p, arg1, sizeof(target_sigset_t));
4972 }
4973 }
4974 break;
4975 #endif
4976 case TARGET_NR_rt_sigpending:
4977 {
4978 sigset_t set;
4979 ret = get_errno(sigpending(&set));
4980 if (!is_error(ret)) {
4981 if (!(p = lock_user(VERIFY_WRITE, arg1, sizeof(target_sigset_t), 0)))
4982 goto efault;
4983 host_to_target_sigset(p, &set);
4984 unlock_user(p, arg1, sizeof(target_sigset_t));
4985 }
4986 }
4987 break;
4988 #ifdef TARGET_NR_sigsuspend
4989 case TARGET_NR_sigsuspend:
4990 {
4991 sigset_t set;
4992 if (!(p = lock_user(VERIFY_READ, arg1, sizeof(target_sigset_t), 1)))
4993 goto efault;
4994 target_to_host_old_sigset(&set, p);
4995 unlock_user(p, arg1, 0);
4996 ret = get_errno(sigsuspend(&set));
4997 }
4998 break;
4999 #endif
5000 case TARGET_NR_rt_sigsuspend:
5001 {
5002 sigset_t set;
5003 if (!(p = lock_user(VERIFY_READ, arg1, sizeof(target_sigset_t), 1)))
5004 goto efault;
5005 target_to_host_sigset(&set, p);
5006 unlock_user(p, arg1, 0);
5007 ret = get_errno(sigsuspend(&set));
5008 }
5009 break;
5010 case TARGET_NR_rt_sigtimedwait:
5011 {
5012 sigset_t set;
5013 struct timespec uts, *puts;
5014 siginfo_t uinfo;
5015
5016 if (!(p = lock_user(VERIFY_READ, arg1, sizeof(target_sigset_t), 1)))
5017 goto efault;
5018 target_to_host_sigset(&set, p);
5019 unlock_user(p, arg1, 0);
5020 if (arg3) {
5021 puts = &uts;
5022 target_to_host_timespec(puts, arg3);
5023 } else {
5024 puts = NULL;
5025 }
5026 ret = get_errno(sigtimedwait(&set, &uinfo, puts));
5027 if (!is_error(ret) && arg2) {
5028 if (!(p = lock_user(VERIFY_WRITE, arg2, sizeof(target_siginfo_t), 0)))
5029 goto efault;
5030 host_to_target_siginfo(p, &uinfo);
5031 unlock_user(p, arg2, sizeof(target_siginfo_t));
5032 }
5033 }
5034 break;
5035 case TARGET_NR_rt_sigqueueinfo:
5036 {
5037 siginfo_t uinfo;
5038 if (!(p = lock_user(VERIFY_READ, arg3, sizeof(target_sigset_t), 1)))
5039 goto efault;
5040 target_to_host_siginfo(&uinfo, p);
5041 unlock_user(p, arg1, 0);
5042 ret = get_errno(sys_rt_sigqueueinfo(arg1, arg2, &uinfo));
5043 }
5044 break;
5045 #ifdef TARGET_NR_sigreturn
5046 case TARGET_NR_sigreturn:
5047 /* NOTE: ret is eax, so not transcoding must be done */
5048 ret = do_sigreturn(cpu_env);
5049 break;
5050 #endif
5051 case TARGET_NR_rt_sigreturn:
5052 /* NOTE: ret is eax, so not transcoding must be done */
5053 ret = do_rt_sigreturn(cpu_env);
5054 break;
5055 case TARGET_NR_sethostname:
5056 if (!(p = lock_user_string(arg1)))
5057 goto efault;
5058 ret = get_errno(sethostname(p, arg2));
5059 unlock_user(p, arg1, 0);
5060 break;
5061 case TARGET_NR_setrlimit:
5062 {
5063 /* XXX: convert resource ? */
5064 int resource = arg1;
5065 struct target_rlimit *target_rlim;
5066 struct rlimit rlim;
5067 if (!lock_user_struct(VERIFY_READ, target_rlim, arg2, 1))
5068 goto efault;
5069 rlim.rlim_cur = tswapl(target_rlim->rlim_cur);
5070 rlim.rlim_max = tswapl(target_rlim->rlim_max);
5071 unlock_user_struct(target_rlim, arg2, 0);
5072 ret = get_errno(setrlimit(resource, &rlim));
5073 }
5074 break;
5075 case TARGET_NR_getrlimit:
5076 {
5077 /* XXX: convert resource ? */
5078 int resource = arg1;
5079 struct target_rlimit *target_rlim;
5080 struct rlimit rlim;
5081
5082 ret = get_errno(getrlimit(resource, &rlim));
5083 if (!is_error(ret)) {
5084 if (!lock_user_struct(VERIFY_WRITE, target_rlim, arg2, 0))
5085 goto efault;
5086 target_rlim->rlim_cur = tswapl(rlim.rlim_cur);
5087 target_rlim->rlim_max = tswapl(rlim.rlim_max);
5088 unlock_user_struct(target_rlim, arg2, 1);
5089 }
5090 }
5091 break;
5092 case TARGET_NR_getrusage:
5093 {
5094 struct rusage rusage;
5095 ret = get_errno(getrusage(arg1, &rusage));
5096 if (!is_error(ret)) {
5097 host_to_target_rusage(arg2, &rusage);
5098 }
5099 }
5100 break;
5101 case TARGET_NR_gettimeofday:
5102 {
5103 struct timeval tv;
5104 ret = get_errno(gettimeofday(&tv, NULL));
5105 if (!is_error(ret)) {
5106 if (copy_to_user_timeval(arg1, &tv))
5107 goto efault;
5108 }
5109 }
5110 break;
5111 case TARGET_NR_settimeofday:
5112 {
5113 struct timeval tv;
5114 if (copy_from_user_timeval(&tv, arg1))
5115 goto efault;
5116 ret = get_errno(settimeofday(&tv, NULL));
5117 }
5118 break;
5119 #ifdef TARGET_NR_select
5120 case TARGET_NR_select:
5121 {
5122 struct target_sel_arg_struct *sel;
5123 abi_ulong inp, outp, exp, tvp;
5124 long nsel;
5125
5126 if (!lock_user_struct(VERIFY_READ, sel, arg1, 1))
5127 goto efault;
5128 nsel = tswapl(sel->n);
5129 inp = tswapl(sel->inp);
5130 outp = tswapl(sel->outp);
5131 exp = tswapl(sel->exp);
5132 tvp = tswapl(sel->tvp);
5133 unlock_user_struct(sel, arg1, 0);
5134 ret = do_select(nsel, inp, outp, exp, tvp);
5135 }
5136 break;
5137 #endif
5138 case TARGET_NR_symlink:
5139 {
5140 void *p2;
5141 p = lock_user_string(arg1);
5142 p2 = lock_user_string(arg2);
5143 if (!p || !p2)
5144 ret = -TARGET_EFAULT;
5145 else
5146 ret = get_errno(symlink(p, p2));
5147 unlock_user(p2, arg2, 0);
5148 unlock_user(p, arg1, 0);
5149 }
5150 break;
5151 #if defined(TARGET_NR_symlinkat) && defined(__NR_symlinkat)
5152 case TARGET_NR_symlinkat:
5153 {
5154 void *p2;
5155 p = lock_user_string(arg1);
5156 p2 = lock_user_string(arg3);
5157 if (!p || !p2)
5158 ret = -TARGET_EFAULT;
5159 else
5160 ret = get_errno(sys_symlinkat(p, arg2, p2));
5161 unlock_user(p2, arg3, 0);
5162 unlock_user(p, arg1, 0);
5163 }
5164 break;
5165 #endif
5166 #ifdef TARGET_NR_oldlstat
5167 case TARGET_NR_oldlstat:
5168 goto unimplemented;
5169 #endif
5170 case TARGET_NR_readlink:
5171 {
5172 void *p2, *temp;
5173 p = lock_user_string(arg1);
5174 p2 = lock_user(VERIFY_WRITE, arg2, arg3, 0);
5175 if (!p || !p2)
5176 ret = -TARGET_EFAULT;
5177 else {
5178 if (strncmp((const char *)p, "/proc/self/exe", 14) == 0) {
5179 char real[PATH_MAX];
5180 temp = realpath(exec_path,real);
5181 ret = (temp==NULL) ? get_errno(-1) : strlen(real) ;
5182 snprintf((char *)p2, arg3, "%s", real);
5183 }
5184 else
5185 ret = get_errno(readlink(path(p), p2, arg3));
5186 }
5187 unlock_user(p2, arg2, ret);
5188 unlock_user(p, arg1, 0);
5189 }
5190 break;
5191 #if defined(TARGET_NR_readlinkat) && defined(__NR_readlinkat)
5192 case TARGET_NR_readlinkat:
5193 {
5194 void *p2;
5195 p = lock_user_string(arg2);
5196 p2 = lock_user(VERIFY_WRITE, arg3, arg4, 0);
5197 if (!p || !p2)
5198 ret = -TARGET_EFAULT;
5199 else
5200 ret = get_errno(sys_readlinkat(arg1, path(p), p2, arg4));
5201 unlock_user(p2, arg3, ret);
5202 unlock_user(p, arg2, 0);
5203 }
5204 break;
5205 #endif
5206 #ifdef TARGET_NR_uselib
5207 case TARGET_NR_uselib:
5208 goto unimplemented;
5209 #endif
5210 #ifdef TARGET_NR_swapon
5211 case TARGET_NR_swapon:
5212 if (!(p = lock_user_string(arg1)))
5213 goto efault;
5214 ret = get_errno(swapon(p, arg2));
5215 unlock_user(p, arg1, 0);
5216 break;
5217 #endif
5218 case TARGET_NR_reboot:
5219 goto unimplemented;
5220 #ifdef TARGET_NR_readdir
5221 case TARGET_NR_readdir:
5222 goto unimplemented;
5223 #endif
5224 #ifdef TARGET_NR_mmap
5225 case TARGET_NR_mmap:
5226 #if (defined(TARGET_I386) && defined(TARGET_ABI32)) || defined(TARGET_ARM) || defined(TARGET_M68K) || defined(TARGET_CRIS) || defined(TARGET_MICROBLAZE)
5227 {
5228 abi_ulong *v;
5229 abi_ulong v1, v2, v3, v4, v5, v6;
5230 if (!(v = lock_user(VERIFY_READ, arg1, 6 * sizeof(abi_ulong), 1)))
5231 goto efault;
5232 v1 = tswapl(v[0]);
5233 v2 = tswapl(v[1]);
5234 v3 = tswapl(v[2]);
5235 v4 = tswapl(v[3]);
5236 v5 = tswapl(v[4]);
5237 v6 = tswapl(v[5]);
5238 unlock_user(v, arg1, 0);
5239 ret = get_errno(target_mmap(v1, v2, v3,
5240 target_to_host_bitmask(v4, mmap_flags_tbl),
5241 v5, v6));
5242 }
5243 #else
5244 ret = get_errno(target_mmap(arg1, arg2, arg3,
5245 target_to_host_bitmask(arg4, mmap_flags_tbl),
5246 arg5,
5247 arg6));
5248 #endif
5249 break;
5250 #endif
5251 #ifdef TARGET_NR_mmap2
5252 case TARGET_NR_mmap2:
5253 #ifndef MMAP_SHIFT
5254 #define MMAP_SHIFT 12
5255 #endif
5256 ret = get_errno(target_mmap(arg1, arg2, arg3,
5257 target_to_host_bitmask(arg4, mmap_flags_tbl),
5258 arg5,
5259 arg6 << MMAP_SHIFT));
5260 break;
5261 #endif
5262 case TARGET_NR_munmap:
5263 ret = get_errno(target_munmap(arg1, arg2));
5264 break;
5265 case TARGET_NR_mprotect:
5266 ret = get_errno(target_mprotect(arg1, arg2, arg3));
5267 break;
5268 #ifdef TARGET_NR_mremap
5269 case TARGET_NR_mremap:
5270 ret = get_errno(target_mremap(arg1, arg2, arg3, arg4, arg5));
5271 break;
5272 #endif
5273 /* ??? msync/mlock/munlock are broken for softmmu. */
5274 #ifdef TARGET_NR_msync
5275 case TARGET_NR_msync:
5276 ret = get_errno(msync(g2h(arg1), arg2, arg3));
5277 break;
5278 #endif
5279 #ifdef TARGET_NR_mlock
5280 case TARGET_NR_mlock:
5281 ret = get_errno(mlock(g2h(arg1), arg2));
5282 break;
5283 #endif
5284 #ifdef TARGET_NR_munlock
5285 case TARGET_NR_munlock:
5286 ret = get_errno(munlock(g2h(arg1), arg2));
5287 break;
5288 #endif
5289 #ifdef TARGET_NR_mlockall
5290 case TARGET_NR_mlockall:
5291 ret = get_errno(mlockall(arg1));
5292 break;
5293 #endif
5294 #ifdef TARGET_NR_munlockall
5295 case TARGET_NR_munlockall:
5296 ret = get_errno(munlockall());
5297 break;
5298 #endif
5299 case TARGET_NR_truncate:
5300 if (!(p = lock_user_string(arg1)))
5301 goto efault;
5302 ret = get_errno(truncate(p, arg2));
5303 unlock_user(p, arg1, 0);
5304 break;
5305 case TARGET_NR_ftruncate:
5306 ret = get_errno(ftruncate(arg1, arg2));
5307 break;
5308 case TARGET_NR_fchmod:
5309 ret = get_errno(fchmod(arg1, arg2));
5310 break;
5311 #if defined(TARGET_NR_fchmodat) && defined(__NR_fchmodat)
5312 case TARGET_NR_fchmodat:
5313 if (!(p = lock_user_string(arg2)))
5314 goto efault;
5315 ret = get_errno(sys_fchmodat(arg1, p, arg3));
5316 unlock_user(p, arg2, 0);
5317 break;
5318 #endif
5319 case TARGET_NR_getpriority:
5320 /* libc does special remapping of the return value of
5321 * sys_getpriority() so it's just easiest to call
5322 * sys_getpriority() directly rather than through libc. */
5323 ret = get_errno(sys_getpriority(arg1, arg2));
5324 break;
5325 case TARGET_NR_setpriority:
5326 ret = get_errno(setpriority(arg1, arg2, arg3));
5327 break;
5328 #ifdef TARGET_NR_profil
5329 case TARGET_NR_profil:
5330 goto unimplemented;
5331 #endif
5332 case TARGET_NR_statfs:
5333 if (!(p = lock_user_string(arg1)))
5334 goto efault;
5335 ret = get_errno(statfs(path(p), &stfs));
5336 unlock_user(p, arg1, 0);
5337 convert_statfs:
5338 if (!is_error(ret)) {
5339 struct target_statfs *target_stfs;
5340
5341 if (!lock_user_struct(VERIFY_WRITE, target_stfs, arg2, 0))
5342 goto efault;
5343 __put_user(stfs.f_type, &target_stfs->f_type);
5344 __put_user(stfs.f_bsize, &target_stfs->f_bsize);
5345 __put_user(stfs.f_blocks, &target_stfs->f_blocks);
5346 __put_user(stfs.f_bfree, &target_stfs->f_bfree);
5347 __put_user(stfs.f_bavail, &target_stfs->f_bavail);
5348 __put_user(stfs.f_files, &target_stfs->f_files);
5349 __put_user(stfs.f_ffree, &target_stfs->f_ffree);
5350 __put_user(stfs.f_fsid.__val[0], &target_stfs->f_fsid.val[0]);
5351 __put_user(stfs.f_fsid.__val[1], &target_stfs->f_fsid.val[1]);
5352 __put_user(stfs.f_namelen, &target_stfs->f_namelen);
5353 unlock_user_struct(target_stfs, arg2, 1);
5354 }
5355 break;
5356 case TARGET_NR_fstatfs:
5357 ret = get_errno(fstatfs(arg1, &stfs));
5358 goto convert_statfs;
5359 #ifdef TARGET_NR_statfs64
5360 case TARGET_NR_statfs64:
5361 if (!(p = lock_user_string(arg1)))
5362 goto efault;
5363 ret = get_errno(statfs(path(p), &stfs));
5364 unlock_user(p, arg1, 0);
5365 convert_statfs64:
5366 if (!is_error(ret)) {
5367 struct target_statfs64 *target_stfs;
5368
5369 if (!lock_user_struct(VERIFY_WRITE, target_stfs, arg3, 0))
5370 goto efault;
5371 __put_user(stfs.f_type, &target_stfs->f_type);
5372 __put_user(stfs.f_bsize, &target_stfs->f_bsize);
5373 __put_user(stfs.f_blocks, &target_stfs->f_blocks);
5374 __put_user(stfs.f_bfree, &target_stfs->f_bfree);
5375 __put_user(stfs.f_bavail, &target_stfs->f_bavail);
5376 __put_user(stfs.f_files, &target_stfs->f_files);
5377 __put_user(stfs.f_ffree, &target_stfs->f_ffree);
5378 __put_user(stfs.f_fsid.__val[0], &target_stfs->f_fsid.val[0]);
5379 __put_user(stfs.f_fsid.__val[1], &target_stfs->f_fsid.val[1]);
5380 __put_user(stfs.f_namelen, &target_stfs->f_namelen);
5381 unlock_user_struct(target_stfs, arg3, 1);
5382 }
5383 break;
5384 case TARGET_NR_fstatfs64:
5385 ret = get_errno(fstatfs(arg1, &stfs));
5386 goto convert_statfs64;
5387 #endif
5388 #ifdef TARGET_NR_ioperm
5389 case TARGET_NR_ioperm:
5390 goto unimplemented;
5391 #endif
5392 #ifdef TARGET_NR_socketcall
5393 case TARGET_NR_socketcall:
5394 ret = do_socketcall(arg1, arg2);
5395 break;
5396 #endif
5397 #ifdef TARGET_NR_accept
5398 case TARGET_NR_accept:
5399 ret = do_accept(arg1, arg2, arg3);
5400 break;
5401 #endif
5402 #ifdef TARGET_NR_bind
5403 case TARGET_NR_bind:
5404 ret = do_bind(arg1, arg2, arg3);
5405 break;
5406 #endif
5407 #ifdef TARGET_NR_connect
5408 case TARGET_NR_connect:
5409 ret = do_connect(arg1, arg2, arg3);
5410 break;
5411 #endif
5412 #ifdef TARGET_NR_getpeername
5413 case TARGET_NR_getpeername:
5414 ret = do_getpeername(arg1, arg2, arg3);
5415 break;
5416 #endif
5417 #ifdef TARGET_NR_getsockname
5418 case TARGET_NR_getsockname:
5419 ret = do_getsockname(arg1, arg2, arg3);
5420 break;
5421 #endif
5422 #ifdef TARGET_NR_getsockopt
5423 case TARGET_NR_getsockopt:
5424 ret = do_getsockopt(arg1, arg2, arg3, arg4, arg5);
5425 break;
5426 #endif
5427 #ifdef TARGET_NR_listen
5428 case TARGET_NR_listen:
5429 ret = get_errno(listen(arg1, arg2));
5430 break;
5431 #endif
5432 #ifdef TARGET_NR_recv
5433 case TARGET_NR_recv:
5434 ret = do_recvfrom(arg1, arg2, arg3, arg4, 0, 0);
5435 break;
5436 #endif
5437 #ifdef TARGET_NR_recvfrom
5438 case TARGET_NR_recvfrom:
5439 ret = do_recvfrom(arg1, arg2, arg3, arg4, arg5, arg6);
5440 break;
5441 #endif
5442 #ifdef TARGET_NR_recvmsg
5443 case TARGET_NR_recvmsg:
5444 ret = do_sendrecvmsg(arg1, arg2, arg3, 0);
5445 break;
5446 #endif
5447 #ifdef TARGET_NR_send
5448 case TARGET_NR_send:
5449 ret = do_sendto(arg1, arg2, arg3, arg4, 0, 0);
5450 break;
5451 #endif
5452 #ifdef TARGET_NR_sendmsg
5453 case TARGET_NR_sendmsg:
5454 ret = do_sendrecvmsg(arg1, arg2, arg3, 1);
5455 break;
5456 #endif
5457 #ifdef TARGET_NR_sendto
5458 case TARGET_NR_sendto:
5459 ret = do_sendto(arg1, arg2, arg3, arg4, arg5, arg6);
5460 break;
5461 #endif
5462 #ifdef TARGET_NR_shutdown
5463 case TARGET_NR_shutdown:
5464 ret = get_errno(shutdown(arg1, arg2));
5465 break;
5466 #endif
5467 #ifdef TARGET_NR_socket
5468 case TARGET_NR_socket:
5469 ret = do_socket(arg1, arg2, arg3);
5470 break;
5471 #endif
5472 #ifdef TARGET_NR_socketpair
5473 case TARGET_NR_socketpair:
5474 ret = do_socketpair(arg1, arg2, arg3, arg4);
5475 break;
5476 #endif
5477 #ifdef TARGET_NR_setsockopt
5478 case TARGET_NR_setsockopt:
5479 ret = do_setsockopt(arg1, arg2, arg3, arg4, (socklen_t) arg5);
5480 break;
5481 #endif
5482
5483 case TARGET_NR_syslog:
5484 if (!(p = lock_user_string(arg2)))
5485 goto efault;
5486 ret = get_errno(sys_syslog((int)arg1, p, (int)arg3));
5487 unlock_user(p, arg2, 0);
5488 break;
5489
5490 case TARGET_NR_setitimer:
5491 {
5492 struct itimerval value, ovalue, *pvalue;
5493
5494 if (arg2) {
5495 pvalue = &value;
5496 if (copy_from_user_timeval(&pvalue->it_interval, arg2)
5497 || copy_from_user_timeval(&pvalue->it_value,
5498 arg2 + sizeof(struct target_timeval)))
5499 goto efault;
5500 } else {
5501 pvalue = NULL;
5502 }
5503 ret = get_errno(setitimer(arg1, pvalue, &ovalue));
5504 if (!is_error(ret) && arg3) {
5505 if (copy_to_user_timeval(arg3,
5506 &ovalue.it_interval)
5507 || copy_to_user_timeval(arg3 + sizeof(struct target_timeval),
5508 &ovalue.it_value))
5509 goto efault;
5510 }
5511 }
5512 break;
5513 case TARGET_NR_getitimer:
5514 {
5515 struct itimerval value;
5516
5517 ret = get_errno(getitimer(arg1, &value));
5518 if (!is_error(ret) && arg2) {
5519 if (copy_to_user_timeval(arg2,
5520 &value.it_interval)
5521 || copy_to_user_timeval(arg2 + sizeof(struct target_timeval),
5522 &value.it_value))
5523 goto efault;
5524 }
5525 }
5526 break;
5527 case TARGET_NR_stat:
5528 if (!(p = lock_user_string(arg1)))
5529 goto efault;
5530 ret = get_errno(stat(path(p), &st));
5531 unlock_user(p, arg1, 0);
5532 goto do_stat;
5533 case TARGET_NR_lstat:
5534 if (!(p = lock_user_string(arg1)))
5535 goto efault;
5536 ret = get_errno(lstat(path(p), &st));
5537 unlock_user(p, arg1, 0);
5538 goto do_stat;
5539 case TARGET_NR_fstat:
5540 {
5541 ret = get_errno(fstat(arg1, &st));
5542 do_stat:
5543 if (!is_error(ret)) {
5544 struct target_stat *target_st;
5545
5546 if (!lock_user_struct(VERIFY_WRITE, target_st, arg2, 0))
5547 goto efault;
5548 memset(target_st, 0, sizeof(*target_st));
5549 __put_user(st.st_dev, &target_st->st_dev);
5550 __put_user(st.st_ino, &target_st->st_ino);
5551 __put_user(st.st_mode, &target_st->st_mode);
5552 __put_user(st.st_uid, &target_st->st_uid);
5553 __put_user(st.st_gid, &target_st->st_gid);
5554 __put_user(st.st_nlink, &target_st->st_nlink);
5555 __put_user(st.st_rdev, &target_st->st_rdev);
5556 __put_user(st.st_size, &target_st->st_size);
5557 __put_user(st.st_blksize, &target_st->st_blksize);
5558 __put_user(st.st_blocks, &target_st->st_blocks);
5559 __put_user(st.st_atime, &target_st->target_st_atime);
5560 __put_user(st.st_mtime, &target_st->target_st_mtime);
5561 __put_user(st.st_ctime, &target_st->target_st_ctime);
5562 unlock_user_struct(target_st, arg2, 1);
5563 }
5564 }
5565 break;
5566 #ifdef TARGET_NR_olduname
5567 case TARGET_NR_olduname:
5568 goto unimplemented;
5569 #endif
5570 #ifdef TARGET_NR_iopl
5571 case TARGET_NR_iopl:
5572 goto unimplemented;
5573 #endif
5574 case TARGET_NR_vhangup:
5575 ret = get_errno(vhangup());
5576 break;
5577 #ifdef TARGET_NR_idle
5578 case TARGET_NR_idle:
5579 goto unimplemented;
5580 #endif
5581 #ifdef TARGET_NR_syscall
5582 case TARGET_NR_syscall:
5583 ret = do_syscall(cpu_env,arg1 & 0xffff,arg2,arg3,arg4,arg5,arg6,0);
5584 break;
5585 #endif
5586 case TARGET_NR_wait4:
5587 {
5588 int status;
5589 abi_long status_ptr = arg2;
5590 struct rusage rusage, *rusage_ptr;
5591 abi_ulong target_rusage = arg4;
5592 if (target_rusage)
5593 rusage_ptr = &rusage;
5594 else
5595 rusage_ptr = NULL;
5596 ret = get_errno(wait4(arg1, &status, arg3, rusage_ptr));
5597 if (!is_error(ret)) {
5598 if (status_ptr) {
5599 status = host_to_target_waitstatus(status);
5600 if (put_user_s32(status, status_ptr))
5601 goto efault;
5602 }
5603 if (target_rusage)
5604 host_to_target_rusage(target_rusage, &rusage);
5605 }
5606 }
5607 break;
5608 #ifdef TARGET_NR_swapoff
5609 case TARGET_NR_swapoff:
5610 if (!(p = lock_user_string(arg1)))
5611 goto efault;
5612 ret = get_errno(swapoff(p));
5613 unlock_user(p, arg1, 0);
5614 break;
5615 #endif
5616 case TARGET_NR_sysinfo:
5617 {
5618 struct target_sysinfo *target_value;
5619 struct sysinfo value;
5620 ret = get_errno(sysinfo(&value));
5621 if (!is_error(ret) && arg1)
5622 {
5623 if (!lock_user_struct(VERIFY_WRITE, target_value, arg1, 0))
5624 goto efault;
5625 __put_user(value.uptime, &target_value->uptime);
5626 __put_user(value.loads[0], &target_value->loads[0]);
5627 __put_user(value.loads[1], &target_value->loads[1]);
5628 __put_user(value.loads[2], &target_value->loads[2]);
5629 __put_user(value.totalram, &target_value->totalram);
5630 __put_user(value.freeram, &target_value->freeram);
5631 __put_user(value.sharedram, &target_value->sharedram);
5632 __put_user(value.bufferram, &target_value->bufferram);
5633 __put_user(value.totalswap, &target_value->totalswap);
5634 __put_user(value.freeswap, &target_value->freeswap);
5635 __put_user(value.procs, &target_value->procs);
5636 __put_user(value.totalhigh, &target_value->totalhigh);
5637 __put_user(value.freehigh, &target_value->freehigh);
5638 __put_user(value.mem_unit, &target_value->mem_unit);
5639 unlock_user_struct(target_value, arg1, 1);
5640 }
5641 }
5642 break;
5643 #ifdef TARGET_NR_ipc
5644 case TARGET_NR_ipc:
5645 ret = do_ipc(arg1, arg2, arg3, arg4, arg5, arg6);
5646 break;
5647 #endif
5648 #ifdef TARGET_NR_semget
5649 case TARGET_NR_semget:
5650 ret = get_errno(semget(arg1, arg2, arg3));
5651 break;
5652 #endif
5653 #ifdef TARGET_NR_semop
5654 case TARGET_NR_semop:
5655 ret = get_errno(do_semop(arg1, arg2, arg3));
5656 break;
5657 #endif
5658 #ifdef TARGET_NR_semctl
5659 case TARGET_NR_semctl:
5660 ret = do_semctl(arg1, arg2, arg3, (union target_semun)(abi_ulong)arg4);
5661 break;
5662 #endif
5663 #ifdef TARGET_NR_msgctl
5664 case TARGET_NR_msgctl:
5665 ret = do_msgctl(arg1, arg2, arg3);
5666 break;
5667 #endif
5668 #ifdef TARGET_NR_msgget
5669 case TARGET_NR_msgget:
5670 ret = get_errno(msgget(arg1, arg2));
5671 break;
5672 #endif
5673 #ifdef TARGET_NR_msgrcv
5674 case TARGET_NR_msgrcv:
5675 ret = do_msgrcv(arg1, arg2, arg3, arg4, arg5);
5676 break;
5677 #endif
5678 #ifdef TARGET_NR_msgsnd
5679 case TARGET_NR_msgsnd:
5680 ret = do_msgsnd(arg1, arg2, arg3, arg4);
5681 break;
5682 #endif
5683 #ifdef TARGET_NR_shmget
5684 case TARGET_NR_shmget:
5685 ret = get_errno(shmget(arg1, arg2, arg3));
5686 break;
5687 #endif
5688 #ifdef TARGET_NR_shmctl
5689 case TARGET_NR_shmctl:
5690 ret = do_shmctl(arg1, arg2, arg3);
5691 break;
5692 #endif
5693 #ifdef TARGET_NR_shmat
5694 case TARGET_NR_shmat:
5695 ret = do_shmat(arg1, arg2, arg3);
5696 break;
5697 #endif
5698 #ifdef TARGET_NR_shmdt
5699 case TARGET_NR_shmdt:
5700 ret = do_shmdt(arg1);
5701 break;
5702 #endif
5703 case TARGET_NR_fsync:
5704 ret = get_errno(fsync(arg1));
5705 break;
5706 case TARGET_NR_clone:
5707 #if defined(TARGET_SH4)
5708 ret = get_errno(do_fork(cpu_env, arg1, arg2, arg3, arg5, arg4));
5709 #elif defined(TARGET_CRIS)
5710 ret = get_errno(do_fork(cpu_env, arg2, arg1, arg3, arg4, arg5));
5711 #else
5712 ret = get_errno(do_fork(cpu_env, arg1, arg2, arg3, arg4, arg5));
5713 #endif
5714 break;
5715 #ifdef __NR_exit_group
5716 /* new thread calls */
5717 case TARGET_NR_exit_group:
5718 #ifdef TARGET_GPROF
5719 _mcleanup();
5720 #endif
5721 gdb_exit(cpu_env, arg1);
5722 ret = get_errno(exit_group(arg1));
5723 break;
5724 #endif
5725 case TARGET_NR_setdomainname:
5726 if (!(p = lock_user_string(arg1)))
5727 goto efault;
5728 ret = get_errno(setdomainname(p, arg2));
5729 unlock_user(p, arg1, 0);
5730 break;
5731 case TARGET_NR_uname:
5732 /* no need to transcode because we use the linux syscall */
5733 {
5734 struct new_utsname * buf;
5735
5736 if (!lock_user_struct(VERIFY_WRITE, buf, arg1, 0))
5737 goto efault;
5738 ret = get_errno(sys_uname(buf));
5739 if (!is_error(ret)) {
5740 /* Overrite the native machine name with whatever is being
5741 emulated. */
5742 strcpy (buf->machine, UNAME_MACHINE);
5743 /* Allow the user to override the reported release. */
5744 if (qemu_uname_release && *qemu_uname_release)
5745 strcpy (buf->release, qemu_uname_release);
5746 }
5747 unlock_user_struct(buf, arg1, 1);
5748 }
5749 break;
5750 #ifdef TARGET_I386
5751 case TARGET_NR_modify_ldt:
5752 ret = do_modify_ldt(cpu_env, arg1, arg2, arg3);
5753 break;
5754 #if !defined(TARGET_X86_64)
5755 case TARGET_NR_vm86old:
5756 goto unimplemented;
5757 case TARGET_NR_vm86:
5758 ret = do_vm86(cpu_env, arg1, arg2);
5759 break;
5760 #endif
5761 #endif
5762 case TARGET_NR_adjtimex:
5763 goto unimplemented;
5764 #ifdef TARGET_NR_create_module
5765 case TARGET_NR_create_module:
5766 #endif
5767 case TARGET_NR_init_module:
5768 case TARGET_NR_delete_module:
5769 #ifdef TARGET_NR_get_kernel_syms
5770 case TARGET_NR_get_kernel_syms:
5771 #endif
5772 goto unimplemented;
5773 case TARGET_NR_quotactl:
5774 goto unimplemented;
5775 case TARGET_NR_getpgid:
5776 ret = get_errno(getpgid(arg1));
5777 break;
5778 case TARGET_NR_fchdir:
5779 ret = get_errno(fchdir(arg1));
5780 break;
5781 #ifdef TARGET_NR_bdflush /* not on x86_64 */
5782 case TARGET_NR_bdflush:
5783 goto unimplemented;
5784 #endif
5785 #ifdef TARGET_NR_sysfs
5786 case TARGET_NR_sysfs:
5787 goto unimplemented;
5788 #endif
5789 case TARGET_NR_personality:
5790 ret = get_errno(personality(arg1));
5791 break;
5792 #ifdef TARGET_NR_afs_syscall
5793 case TARGET_NR_afs_syscall:
5794 goto unimplemented;
5795 #endif
5796 #ifdef TARGET_NR__llseek /* Not on alpha */
5797 case TARGET_NR__llseek:
5798 {
5799 #if defined (__x86_64__)
5800 ret = get_errno(lseek(arg1, ((uint64_t )arg2 << 32) | arg3, arg5));
5801 if (put_user_s64(ret, arg4))
5802 goto efault;
5803 #else
5804 int64_t res;
5805 ret = get_errno(_llseek(arg1, arg2, arg3, &res, arg5));
5806 if (put_user_s64(res, arg4))
5807 goto efault;
5808 #endif
5809 }
5810 break;
5811 #endif
5812 case TARGET_NR_getdents:
5813 #if TARGET_ABI_BITS == 32 && HOST_LONG_BITS == 64
5814 {
5815 struct target_dirent *target_dirp;
5816 struct linux_dirent *dirp;
5817 abi_long count = arg3;
5818
5819 dirp = malloc(count);
5820 if (!dirp) {
5821 ret = -TARGET_ENOMEM;
5822 goto fail;
5823 }
5824
5825 ret = get_errno(sys_getdents(arg1, dirp, count));
5826 if (!is_error(ret)) {
5827 struct linux_dirent *de;
5828 struct target_dirent *tde;
5829 int len = ret;
5830 int reclen, treclen;
5831 int count1, tnamelen;
5832
5833 count1 = 0;
5834 de = dirp;
5835 if (!(target_dirp = lock_user(VERIFY_WRITE, arg2, count, 0)))
5836 goto efault;
5837 tde = target_dirp;
5838 while (len > 0) {
5839 reclen = de->d_reclen;
5840 treclen = reclen - (2 * (sizeof(long) - sizeof(abi_long)));
5841 tde->d_reclen = tswap16(treclen);
5842 tde->d_ino = tswapl(de->d_ino);
5843 tde->d_off = tswapl(de->d_off);
5844 tnamelen = treclen - (2 * sizeof(abi_long) + 2);
5845 if (tnamelen > 256)
5846 tnamelen = 256;
5847 /* XXX: may not be correct */
5848 pstrcpy(tde->d_name, tnamelen, de->d_name);
5849 de = (struct linux_dirent *)((char *)de + reclen);
5850 len -= reclen;
5851 tde = (struct target_dirent *)((char *)tde + treclen);
5852 count1 += treclen;
5853 }
5854 ret = count1;
5855 unlock_user(target_dirp, arg2, ret);
5856 }
5857 free(dirp);
5858 }
5859 #else
5860 {
5861 struct linux_dirent *dirp;
5862 abi_long count = arg3;
5863
5864 if (!(dirp = lock_user(VERIFY_WRITE, arg2, count, 0)))
5865 goto efault;
5866 ret = get_errno(sys_getdents(arg1, dirp, count));
5867 if (!is_error(ret)) {
5868 struct linux_dirent *de;
5869 int len = ret;
5870 int reclen;
5871 de = dirp;
5872 while (len > 0) {
5873 reclen = de->d_reclen;
5874 if (reclen > len)
5875 break;
5876 de->d_reclen = tswap16(reclen);
5877 tswapls(&de->d_ino);
5878 tswapls(&de->d_off);
5879 de = (struct linux_dirent *)((char *)de + reclen);
5880 len -= reclen;
5881 }
5882 }
5883 unlock_user(dirp, arg2, ret);
5884 }
5885 #endif
5886 break;
5887 #if defined(TARGET_NR_getdents64) && defined(__NR_getdents64)
5888 case TARGET_NR_getdents64:
5889 {
5890 struct linux_dirent64 *dirp;
5891 abi_long count = arg3;
5892 if (!(dirp = lock_user(VERIFY_WRITE, arg2, count, 0)))
5893 goto efault;
5894 ret = get_errno(sys_getdents64(arg1, dirp, count));
5895 if (!is_error(ret)) {
5896 struct linux_dirent64 *de;
5897 int len = ret;
5898 int reclen;
5899 de = dirp;
5900 while (len > 0) {
5901 reclen = de->d_reclen;
5902 if (reclen > len)
5903 break;
5904 de->d_reclen = tswap16(reclen);
5905 tswap64s((uint64_t *)&de->d_ino);
5906 tswap64s((uint64_t *)&de->d_off);
5907 de = (struct linux_dirent64 *)((char *)de + reclen);
5908 len -= reclen;
5909 }
5910 }
5911 unlock_user(dirp, arg2, ret);
5912 }
5913 break;
5914 #endif /* TARGET_NR_getdents64 */
5915 #ifdef TARGET_NR__newselect
5916 case TARGET_NR__newselect:
5917 ret = do_select(arg1, arg2, arg3, arg4, arg5);
5918 break;
5919 #endif
5920 #ifdef TARGET_NR_poll
5921 case TARGET_NR_poll:
5922 {
5923 struct target_pollfd *target_pfd;
5924 unsigned int nfds = arg2;
5925 int timeout = arg3;
5926 struct pollfd *pfd;
5927 unsigned int i;
5928
5929 target_pfd = lock_user(VERIFY_WRITE, arg1, sizeof(struct target_pollfd) * nfds, 1);
5930 if (!target_pfd)
5931 goto efault;
5932 pfd = alloca(sizeof(struct pollfd) * nfds);
5933 for(i = 0; i < nfds; i++) {
5934 pfd[i].fd = tswap32(target_pfd[i].fd);
5935 pfd[i].events = tswap16(target_pfd[i].events);
5936 }
5937 ret = get_errno(poll(pfd, nfds, timeout));
5938 if (!is_error(ret)) {
5939 for(i = 0; i < nfds; i++) {
5940 target_pfd[i].revents = tswap16(pfd[i].revents);
5941 }
5942 ret += nfds * (sizeof(struct target_pollfd)
5943 - sizeof(struct pollfd));
5944 }
5945 unlock_user(target_pfd, arg1, ret);
5946 }
5947 break;
5948 #endif
5949 case TARGET_NR_flock:
5950 /* NOTE: the flock constant seems to be the same for every
5951 Linux platform */
5952 ret = get_errno(flock(arg1, arg2));
5953 break;
5954 case TARGET_NR_readv:
5955 {
5956 int count = arg3;
5957 struct iovec *vec;
5958
5959 vec = alloca(count * sizeof(struct iovec));
5960 if (lock_iovec(VERIFY_WRITE, vec, arg2, count, 0) < 0)
5961 goto efault;
5962 ret = get_errno(readv(arg1, vec, count));
5963 unlock_iovec(vec, arg2, count, 1);
5964 }
5965 break;
5966 case TARGET_NR_writev:
5967 {
5968 int count = arg3;
5969 struct iovec *vec;
5970
5971 vec = alloca(count * sizeof(struct iovec));
5972 if (lock_iovec(VERIFY_READ, vec, arg2, count, 1) < 0)
5973 goto efault;
5974 ret = get_errno(writev(arg1, vec, count));
5975 unlock_iovec(vec, arg2, count, 0);
5976 }
5977 break;
5978 case TARGET_NR_getsid:
5979 ret = get_errno(getsid(arg1));
5980 break;
5981 #if defined(TARGET_NR_fdatasync) /* Not on alpha (osf_datasync ?) */
5982 case TARGET_NR_fdatasync:
5983 ret = get_errno(fdatasync(arg1));
5984 break;
5985 #endif
5986 case TARGET_NR__sysctl:
5987 /* We don't implement this, but ENOTDIR is always a safe
5988 return value. */
5989 ret = -TARGET_ENOTDIR;
5990 break;
5991 case TARGET_NR_sched_setparam:
5992 {
5993 struct sched_param *target_schp;
5994 struct sched_param schp;
5995
5996 if (!lock_user_struct(VERIFY_READ, target_schp, arg2, 1))
5997 goto efault;
5998 schp.sched_priority = tswap32(target_schp->sched_priority);
5999 unlock_user_struct(target_schp, arg2, 0);
6000 ret = get_errno(sched_setparam(arg1, &schp));
6001 }
6002 break;
6003 case TARGET_NR_sched_getparam:
6004 {
6005 struct sched_param *target_schp;
6006 struct sched_param schp;
6007 ret = get_errno(sched_getparam(arg1, &schp));
6008 if (!is_error(ret)) {
6009 if (!lock_user_struct(VERIFY_WRITE, target_schp, arg2, 0))
6010 goto efault;
6011 target_schp->sched_priority = tswap32(schp.sched_priority);
6012 unlock_user_struct(target_schp, arg2, 1);
6013 }
6014 }
6015 break;
6016 case TARGET_NR_sched_setscheduler:
6017 {
6018 struct sched_param *target_schp;
6019 struct sched_param schp;
6020 if (!lock_user_struct(VERIFY_READ, target_schp, arg3, 1))
6021 goto efault;
6022 schp.sched_priority = tswap32(target_schp->sched_priority);
6023 unlock_user_struct(target_schp, arg3, 0);
6024 ret = get_errno(sched_setscheduler(arg1, arg2, &schp));
6025 }
6026 break;
6027 case TARGET_NR_sched_getscheduler:
6028 ret = get_errno(sched_getscheduler(arg1));
6029 break;
6030 case TARGET_NR_sched_yield:
6031 ret = get_errno(sched_yield());
6032 break;
6033 case TARGET_NR_sched_get_priority_max:
6034 ret = get_errno(sched_get_priority_max(arg1));
6035 break;
6036 case TARGET_NR_sched_get_priority_min:
6037 ret = get_errno(sched_get_priority_min(arg1));
6038 break;
6039 case TARGET_NR_sched_rr_get_interval:
6040 {
6041 struct timespec ts;
6042 ret = get_errno(sched_rr_get_interval(arg1, &ts));
6043 if (!is_error(ret)) {
6044 host_to_target_timespec(arg2, &ts);
6045 }
6046 }
6047 break;
6048 case TARGET_NR_nanosleep:
6049 {
6050 struct timespec req, rem;
6051 target_to_host_timespec(&req, arg1);
6052 ret = get_errno(nanosleep(&req, &rem));
6053 if (is_error(ret) && arg2) {
6054 host_to_target_timespec(arg2, &rem);
6055 }
6056 }
6057 break;
6058 #ifdef TARGET_NR_query_module
6059 case TARGET_NR_query_module:
6060 goto unimplemented;
6061 #endif
6062 #ifdef TARGET_NR_nfsservctl
6063 case TARGET_NR_nfsservctl:
6064 goto unimplemented;
6065 #endif
6066 case TARGET_NR_prctl:
6067 switch (arg1)
6068 {
6069 case PR_GET_PDEATHSIG:
6070 {
6071 int deathsig;
6072 ret = get_errno(prctl(arg1, &deathsig, arg3, arg4, arg5));
6073 if (!is_error(ret) && arg2
6074 && put_user_ual(deathsig, arg2))
6075 goto efault;
6076 }
6077 break;
6078 default:
6079 ret = get_errno(prctl(arg1, arg2, arg3, arg4, arg5));
6080 break;
6081 }
6082 break;
6083 #ifdef TARGET_NR_arch_prctl
6084 case TARGET_NR_arch_prctl:
6085 #if defined(TARGET_I386) && !defined(TARGET_ABI32)
6086 ret = do_arch_prctl(cpu_env, arg1, arg2);
6087 break;
6088 #else
6089 goto unimplemented;
6090 #endif
6091 #endif
6092 #ifdef TARGET_NR_pread
6093 case TARGET_NR_pread:
6094 #ifdef TARGET_ARM
6095 if (((CPUARMState *)cpu_env)->eabi)
6096 arg4 = arg5;
6097 #endif
6098 if (!(p = lock_user(VERIFY_WRITE, arg2, arg3, 0)))
6099 goto efault;
6100 ret = get_errno(pread(arg1, p, arg3, arg4));
6101 unlock_user(p, arg2, ret);
6102 break;
6103 case TARGET_NR_pwrite:
6104 #ifdef TARGET_ARM
6105 if (((CPUARMState *)cpu_env)->eabi)
6106 arg4 = arg5;
6107 #endif
6108 if (!(p = lock_user(VERIFY_READ, arg2, arg3, 1)))
6109 goto efault;
6110 ret = get_errno(pwrite(arg1, p, arg3, arg4));
6111 unlock_user(p, arg2, 0);
6112 break;
6113 #endif
6114 #ifdef TARGET_NR_pread64
6115 case TARGET_NR_pread64:
6116 if (!(p = lock_user(VERIFY_WRITE, arg2, arg3, 0)))
6117 goto efault;
6118 ret = get_errno(pread64(arg1, p, arg3, target_offset64(arg4, arg5)));
6119 unlock_user(p, arg2, ret);
6120 break;
6121 case TARGET_NR_pwrite64:
6122 if (!(p = lock_user(VERIFY_READ, arg2, arg3, 1)))
6123 goto efault;
6124 ret = get_errno(pwrite64(arg1, p, arg3, target_offset64(arg4, arg5)));
6125 unlock_user(p, arg2, 0);
6126 break;
6127 #endif
6128 case TARGET_NR_getcwd:
6129 if (!(p = lock_user(VERIFY_WRITE, arg1, arg2, 0)))
6130 goto efault;
6131 ret = get_errno(sys_getcwd1(p, arg2));
6132 unlock_user(p, arg1, ret);
6133 break;
6134 case TARGET_NR_capget:
6135 goto unimplemented;
6136 case TARGET_NR_capset:
6137 goto unimplemented;
6138 case TARGET_NR_sigaltstack:
6139 #if defined(TARGET_I386) || defined(TARGET_ARM) || defined(TARGET_MIPS) || \
6140 defined(TARGET_SPARC) || defined(TARGET_PPC) || defined(TARGET_ALPHA) || \
6141 defined(TARGET_M68K)
6142 ret = do_sigaltstack(arg1, arg2, get_sp_from_cpustate((CPUState *)cpu_env));
6143 break;
6144 #else
6145 goto unimplemented;
6146 #endif
6147 case TARGET_NR_sendfile:
6148 goto unimplemented;
6149 #ifdef TARGET_NR_getpmsg
6150 case TARGET_NR_getpmsg:
6151 goto unimplemented;
6152 #endif
6153 #ifdef TARGET_NR_putpmsg
6154 case TARGET_NR_putpmsg:
6155 goto unimplemented;
6156 #endif
6157 #ifdef TARGET_NR_vfork
6158 case TARGET_NR_vfork:
6159 ret = get_errno(do_fork(cpu_env, CLONE_VFORK | CLONE_VM | SIGCHLD,
6160 0, 0, 0, 0));
6161 break;
6162 #endif
6163 #ifdef TARGET_NR_ugetrlimit
6164 case TARGET_NR_ugetrlimit:
6165 {
6166 struct rlimit rlim;
6167 ret = get_errno(getrlimit(arg1, &rlim));
6168 if (!is_error(ret)) {
6169 struct target_rlimit *target_rlim;
6170 if (!lock_user_struct(VERIFY_WRITE, target_rlim, arg2, 0))
6171 goto efault;
6172 target_rlim->rlim_cur = tswapl(rlim.rlim_cur);
6173 target_rlim->rlim_max = tswapl(rlim.rlim_max);
6174 unlock_user_struct(target_rlim, arg2, 1);
6175 }
6176 break;
6177 }
6178 #endif
6179 #ifdef TARGET_NR_truncate64
6180 case TARGET_NR_truncate64:
6181 if (!(p = lock_user_string(arg1)))
6182 goto efault;
6183 ret = target_truncate64(cpu_env, p, arg2, arg3, arg4);
6184 unlock_user(p, arg1, 0);
6185 break;
6186 #endif
6187 #ifdef TARGET_NR_ftruncate64
6188 case TARGET_NR_ftruncate64:
6189 ret = target_ftruncate64(cpu_env, arg1, arg2, arg3, arg4);
6190 break;
6191 #endif
6192 #ifdef TARGET_NR_stat64
6193 case TARGET_NR_stat64:
6194 if (!(p = lock_user_string(arg1)))
6195 goto efault;
6196 ret = get_errno(stat(path(p), &st));
6197 unlock_user(p, arg1, 0);
6198 if (!is_error(ret))
6199 ret = host_to_target_stat64(cpu_env, arg2, &st);
6200 break;
6201 #endif
6202 #ifdef TARGET_NR_lstat64
6203 case TARGET_NR_lstat64:
6204 if (!(p = lock_user_string(arg1)))
6205 goto efault;
6206 ret = get_errno(lstat(path(p), &st));
6207 unlock_user(p, arg1, 0);
6208 if (!is_error(ret))
6209 ret = host_to_target_stat64(cpu_env, arg2, &st);
6210 break;
6211 #endif
6212 #ifdef TARGET_NR_fstat64
6213 case TARGET_NR_fstat64:
6214 ret = get_errno(fstat(arg1, &st));
6215 if (!is_error(ret))
6216 ret = host_to_target_stat64(cpu_env, arg2, &st);
6217 break;
6218 #endif
6219 #if (defined(TARGET_NR_fstatat64) || defined(TARGET_NR_newfstatat)) && \
6220 (defined(__NR_fstatat64) || defined(__NR_newfstatat))
6221 #ifdef TARGET_NR_fstatat64
6222 case TARGET_NR_fstatat64:
6223 #endif
6224 #ifdef TARGET_NR_newfstatat
6225 case TARGET_NR_newfstatat:
6226 #endif
6227 if (!(p = lock_user_string(arg2)))
6228 goto efault;
6229 #ifdef __NR_fstatat64
6230 ret = get_errno(sys_fstatat64(arg1, path(p), &st, arg4));
6231 #else
6232 ret = get_errno(sys_newfstatat(arg1, path(p), &st, arg4));
6233 #endif
6234 if (!is_error(ret))
6235 ret = host_to_target_stat64(cpu_env, arg3, &st);
6236 break;
6237 #endif
6238 #ifdef USE_UID16
6239 case TARGET_NR_lchown:
6240 if (!(p = lock_user_string(arg1)))
6241 goto efault;
6242 ret = get_errno(lchown(p, low2highuid(arg2), low2highgid(arg3)));
6243 unlock_user(p, arg1, 0);
6244 break;
6245 case TARGET_NR_getuid:
6246 ret = get_errno(high2lowuid(getuid()));
6247 break;
6248 case TARGET_NR_getgid:
6249 ret = get_errno(high2lowgid(getgid()));
6250 break;
6251 case TARGET_NR_geteuid:
6252 ret = get_errno(high2lowuid(geteuid()));
6253 break;
6254 case TARGET_NR_getegid:
6255 ret = get_errno(high2lowgid(getegid()));
6256 break;
6257 case TARGET_NR_setreuid:
6258 ret = get_errno(setreuid(low2highuid(arg1), low2highuid(arg2)));
6259 break;
6260 case TARGET_NR_setregid:
6261 ret = get_errno(setregid(low2highgid(arg1), low2highgid(arg2)));
6262 break;
6263 case TARGET_NR_getgroups:
6264 {
6265 int gidsetsize = arg1;
6266 uint16_t *target_grouplist;
6267 gid_t *grouplist;
6268 int i;
6269
6270 grouplist = alloca(gidsetsize * sizeof(gid_t));
6271 ret = get_errno(getgroups(gidsetsize, grouplist));
6272 if (gidsetsize == 0)
6273 break;
6274 if (!is_error(ret)) {
6275 target_grouplist = lock_user(VERIFY_WRITE, arg2, gidsetsize * 2, 0);
6276 if (!target_grouplist)
6277 goto efault;
6278 for(i = 0;i < ret; i++)
6279 target_grouplist[i] = tswap16(grouplist[i]);
6280 unlock_user(target_grouplist, arg2, gidsetsize * 2);
6281 }
6282 }
6283 break;
6284 case TARGET_NR_setgroups:
6285 {
6286 int gidsetsize = arg1;
6287 uint16_t *target_grouplist;
6288 gid_t *grouplist;
6289 int i;
6290
6291 grouplist = alloca(gidsetsize * sizeof(gid_t));
6292 target_grouplist = lock_user(VERIFY_READ, arg2, gidsetsize * 2, 1);
6293 if (!target_grouplist) {
6294 ret = -TARGET_EFAULT;
6295 goto fail;
6296 }
6297 for(i = 0;i < gidsetsize; i++)
6298 grouplist[i] = tswap16(target_grouplist[i]);
6299 unlock_user(target_grouplist, arg2, 0);
6300 ret = get_errno(setgroups(gidsetsize, grouplist));
6301 }
6302 break;
6303 case TARGET_NR_fchown:
6304 ret = get_errno(fchown(arg1, low2highuid(arg2), low2highgid(arg3)));
6305 break;
6306 #if defined(TARGET_NR_fchownat) && defined(__NR_fchownat)
6307 case TARGET_NR_fchownat:
6308 if (!(p = lock_user_string(arg2)))
6309 goto efault;
6310 ret = get_errno(sys_fchownat(arg1, p, low2highuid(arg3), low2highgid(arg4), arg5));
6311 unlock_user(p, arg2, 0);
6312 break;
6313 #endif
6314 #ifdef TARGET_NR_setresuid
6315 case TARGET_NR_setresuid:
6316 ret = get_errno(setresuid(low2highuid(arg1),
6317 low2highuid(arg2),
6318 low2highuid(arg3)));
6319 break;
6320 #endif
6321 #ifdef TARGET_NR_getresuid
6322 case TARGET_NR_getresuid:
6323 {
6324 uid_t ruid, euid, suid;
6325 ret = get_errno(getresuid(&ruid, &euid, &suid));
6326 if (!is_error(ret)) {
6327 if (put_user_u16(high2lowuid(ruid), arg1)
6328 || put_user_u16(high2lowuid(euid), arg2)
6329 || put_user_u16(high2lowuid(suid), arg3))
6330 goto efault;
6331 }
6332 }
6333 break;
6334 #endif
6335 #ifdef TARGET_NR_getresgid
6336 case TARGET_NR_setresgid:
6337 ret = get_errno(setresgid(low2highgid(arg1),
6338 low2highgid(arg2),
6339 low2highgid(arg3)));
6340 break;
6341 #endif
6342 #ifdef TARGET_NR_getresgid
6343 case TARGET_NR_getresgid:
6344 {
6345 gid_t rgid, egid, sgid;
6346 ret = get_errno(getresgid(&rgid, &egid, &sgid));
6347 if (!is_error(ret)) {
6348 if (put_user_u16(high2lowgid(rgid), arg1)
6349 || put_user_u16(high2lowgid(egid), arg2)
6350 || put_user_u16(high2lowgid(sgid), arg3))
6351 goto efault;
6352 }
6353 }
6354 break;
6355 #endif
6356 case TARGET_NR_chown:
6357 if (!(p = lock_user_string(arg1)))
6358 goto efault;
6359 ret = get_errno(chown(p, low2highuid(arg2), low2highgid(arg3)));
6360 unlock_user(p, arg1, 0);
6361 break;
6362 case TARGET_NR_setuid:
6363 ret = get_errno(setuid(low2highuid(arg1)));
6364 break;
6365 case TARGET_NR_setgid:
6366 ret = get_errno(setgid(low2highgid(arg1)));
6367 break;
6368 case TARGET_NR_setfsuid:
6369 ret = get_errno(setfsuid(arg1));
6370 break;
6371 case TARGET_NR_setfsgid:
6372 ret = get_errno(setfsgid(arg1));
6373 break;
6374 #endif /* USE_UID16 */
6375
6376 #ifdef TARGET_NR_lchown32
6377 case TARGET_NR_lchown32:
6378 if (!(p = lock_user_string(arg1)))
6379 goto efault;
6380 ret = get_errno(lchown(p, arg2, arg3));
6381 unlock_user(p, arg1, 0);
6382 break;
6383 #endif
6384 #ifdef TARGET_NR_getuid32
6385 case TARGET_NR_getuid32:
6386 ret = get_errno(getuid());
6387 break;
6388 #endif
6389
6390 #if defined(TARGET_NR_getxuid) && defined(TARGET_ALPHA)
6391 /* Alpha specific */
6392 case TARGET_NR_getxuid:
6393 {
6394 uid_t euid;
6395 euid=geteuid();
6396 ((CPUAlphaState *)cpu_env)->ir[IR_A4]=euid;
6397 }
6398 ret = get_errno(getuid());
6399 break;
6400 #endif
6401 #if defined(TARGET_NR_getxgid) && defined(TARGET_ALPHA)
6402 /* Alpha specific */
6403 case TARGET_NR_getxgid:
6404 {
6405 uid_t egid;
6406 egid=getegid();
6407 ((CPUAlphaState *)cpu_env)->ir[IR_A4]=egid;
6408 }
6409 ret = get_errno(getgid());
6410 break;
6411 #endif
6412 #if defined(TARGET_NR_osf_getsysinfo) && defined(TARGET_ALPHA)
6413 /* Alpha specific */
6414 case TARGET_NR_osf_getsysinfo:
6415 ret = -TARGET_EOPNOTSUPP;
6416 switch (arg1) {
6417 case TARGET_GSI_IEEE_FP_CONTROL:
6418 {
6419 uint64_t swcr, fpcr = cpu_alpha_load_fpcr (cpu_env);
6420
6421 /* Copied from linux ieee_fpcr_to_swcr. */
6422 swcr = (fpcr >> 35) & SWCR_STATUS_MASK;
6423 swcr |= (fpcr >> 36) & SWCR_MAP_DMZ;
6424 swcr |= (~fpcr >> 48) & (SWCR_TRAP_ENABLE_INV
6425 | SWCR_TRAP_ENABLE_DZE
6426 | SWCR_TRAP_ENABLE_OVF);
6427 swcr |= (~fpcr >> 57) & (SWCR_TRAP_ENABLE_UNF
6428 | SWCR_TRAP_ENABLE_INE);
6429 swcr |= (fpcr >> 47) & SWCR_MAP_UMZ;
6430 swcr |= (~fpcr >> 41) & SWCR_TRAP_ENABLE_DNO;
6431
6432 if (put_user_u64 (swcr, arg2))
6433 goto efault;
6434 ret = 0;
6435 }
6436 break;
6437
6438 /* case GSI_IEEE_STATE_AT_SIGNAL:
6439 -- Not implemented in linux kernel.
6440 case GSI_UACPROC:
6441 -- Retrieves current unaligned access state; not much used.
6442 case GSI_PROC_TYPE:
6443 -- Retrieves implver information; surely not used.
6444 case GSI_GET_HWRPB:
6445 -- Grabs a copy of the HWRPB; surely not used.
6446 */
6447 }
6448 break;
6449 #endif
6450 #if defined(TARGET_NR_osf_setsysinfo) && defined(TARGET_ALPHA)
6451 /* Alpha specific */
6452 case TARGET_NR_osf_setsysinfo:
6453 ret = -TARGET_EOPNOTSUPP;
6454 switch (arg1) {
6455 case TARGET_SSI_IEEE_FP_CONTROL:
6456 case TARGET_SSI_IEEE_RAISE_EXCEPTION:
6457 {
6458 uint64_t swcr, fpcr, orig_fpcr;
6459
6460 if (get_user_u64 (swcr, arg2))
6461 goto efault;
6462 orig_fpcr = cpu_alpha_load_fpcr (cpu_env);
6463 fpcr = orig_fpcr & FPCR_DYN_MASK;
6464
6465 /* Copied from linux ieee_swcr_to_fpcr. */
6466 fpcr |= (swcr & SWCR_STATUS_MASK) << 35;
6467 fpcr |= (swcr & SWCR_MAP_DMZ) << 36;
6468 fpcr |= (~swcr & (SWCR_TRAP_ENABLE_INV
6469 | SWCR_TRAP_ENABLE_DZE
6470 | SWCR_TRAP_ENABLE_OVF)) << 48;
6471 fpcr |= (~swcr & (SWCR_TRAP_ENABLE_UNF
6472 | SWCR_TRAP_ENABLE_INE)) << 57;
6473 fpcr |= (swcr & SWCR_MAP_UMZ ? FPCR_UNDZ | FPCR_UNFD : 0);
6474 fpcr |= (~swcr & SWCR_TRAP_ENABLE_DNO) << 41;
6475
6476 cpu_alpha_store_fpcr (cpu_env, fpcr);
6477 ret = 0;
6478
6479 if (arg1 == TARGET_SSI_IEEE_RAISE_EXCEPTION) {
6480 /* Old exceptions are not signaled. */
6481 fpcr &= ~(orig_fpcr & FPCR_STATUS_MASK);
6482
6483 /* If any exceptions set by this call, and are unmasked,
6484 send a signal. */
6485 /* ??? FIXME */
6486 }
6487 }
6488 break;
6489
6490 /* case SSI_NVPAIRS:
6491 -- Used with SSIN_UACPROC to enable unaligned accesses.
6492 case SSI_IEEE_STATE_AT_SIGNAL:
6493 case SSI_IEEE_IGNORE_STATE_AT_SIGNAL:
6494 -- Not implemented in linux kernel
6495 */
6496 }
6497 break;
6498 #endif
6499 #ifdef TARGET_NR_osf_sigprocmask
6500 /* Alpha specific. */
6501 case TARGET_NR_osf_sigprocmask:
6502 {
6503 abi_ulong mask;
6504 int how = arg1;
6505 sigset_t set, oldset;
6506
6507 switch(arg1) {
6508 case TARGET_SIG_BLOCK:
6509 how = SIG_BLOCK;
6510 break;
6511 case TARGET_SIG_UNBLOCK:
6512 how = SIG_UNBLOCK;
6513 break;
6514 case TARGET_SIG_SETMASK:
6515 how = SIG_SETMASK;
6516 break;
6517 default:
6518 ret = -TARGET_EINVAL;
6519 goto fail;
6520 }
6521 mask = arg2;
6522 target_to_host_old_sigset(&set, &mask);
6523 sigprocmask(arg1, &set, &oldset);
6524 host_to_target_old_sigset(&mask, &oldset);
6525 ret = mask;
6526 }
6527 break;
6528 #endif
6529
6530 #ifdef TARGET_NR_getgid32
6531 case TARGET_NR_getgid32:
6532 ret = get_errno(getgid());
6533 break;
6534 #endif
6535 #ifdef TARGET_NR_geteuid32
6536 case TARGET_NR_geteuid32:
6537 ret = get_errno(geteuid());
6538 break;
6539 #endif
6540 #ifdef TARGET_NR_getegid32
6541 case TARGET_NR_getegid32:
6542 ret = get_errno(getegid());
6543 break;
6544 #endif
6545 #ifdef TARGET_NR_setreuid32
6546 case TARGET_NR_setreuid32:
6547 ret = get_errno(setreuid(arg1, arg2));
6548 break;
6549 #endif
6550 #ifdef TARGET_NR_setregid32
6551 case TARGET_NR_setregid32:
6552 ret = get_errno(setregid(arg1, arg2));
6553 break;
6554 #endif
6555 #ifdef TARGET_NR_getgroups32
6556 case TARGET_NR_getgroups32:
6557 {
6558 int gidsetsize = arg1;
6559 uint32_t *target_grouplist;
6560 gid_t *grouplist;
6561 int i;
6562
6563 grouplist = alloca(gidsetsize * sizeof(gid_t));
6564 ret = get_errno(getgroups(gidsetsize, grouplist));
6565 if (gidsetsize == 0)
6566 break;
6567 if (!is_error(ret)) {
6568 target_grouplist = lock_user(VERIFY_WRITE, arg2, gidsetsize * 4, 0);
6569 if (!target_grouplist) {
6570 ret = -TARGET_EFAULT;
6571 goto fail;
6572 }
6573 for(i = 0;i < ret; i++)
6574 target_grouplist[i] = tswap32(grouplist[i]);
6575 unlock_user(target_grouplist, arg2, gidsetsize * 4);
6576 }
6577 }
6578 break;
6579 #endif
6580 #ifdef TARGET_NR_setgroups32
6581 case TARGET_NR_setgroups32:
6582 {
6583 int gidsetsize = arg1;
6584 uint32_t *target_grouplist;
6585 gid_t *grouplist;
6586 int i;
6587
6588 grouplist = alloca(gidsetsize * sizeof(gid_t));
6589 target_grouplist = lock_user(VERIFY_READ, arg2, gidsetsize * 4, 1);
6590 if (!target_grouplist) {
6591 ret = -TARGET_EFAULT;
6592 goto fail;
6593 }
6594 for(i = 0;i < gidsetsize; i++)
6595 grouplist[i] = tswap32(target_grouplist[i]);
6596 unlock_user(target_grouplist, arg2, 0);
6597 ret = get_errno(setgroups(gidsetsize, grouplist));
6598 }
6599 break;
6600 #endif
6601 #ifdef TARGET_NR_fchown32
6602 case TARGET_NR_fchown32:
6603 ret = get_errno(fchown(arg1, arg2, arg3));
6604 break;
6605 #endif
6606 #ifdef TARGET_NR_setresuid32
6607 case TARGET_NR_setresuid32:
6608 ret = get_errno(setresuid(arg1, arg2, arg3));
6609 break;
6610 #endif
6611 #ifdef TARGET_NR_getresuid32
6612 case TARGET_NR_getresuid32:
6613 {
6614 uid_t ruid, euid, suid;
6615 ret = get_errno(getresuid(&ruid, &euid, &suid));
6616 if (!is_error(ret)) {
6617 if (put_user_u32(ruid, arg1)
6618 || put_user_u32(euid, arg2)
6619 || put_user_u32(suid, arg3))
6620 goto efault;
6621 }
6622 }
6623 break;
6624 #endif
6625 #ifdef TARGET_NR_setresgid32
6626 case TARGET_NR_setresgid32:
6627 ret = get_errno(setresgid(arg1, arg2, arg3));
6628 break;
6629 #endif
6630 #ifdef TARGET_NR_getresgid32
6631 case TARGET_NR_getresgid32:
6632 {
6633 gid_t rgid, egid, sgid;
6634 ret = get_errno(getresgid(&rgid, &egid, &sgid));
6635 if (!is_error(ret)) {
6636 if (put_user_u32(rgid, arg1)
6637 || put_user_u32(egid, arg2)
6638 || put_user_u32(sgid, arg3))
6639 goto efault;
6640 }
6641 }
6642 break;
6643 #endif
6644 #ifdef TARGET_NR_chown32
6645 case TARGET_NR_chown32:
6646 if (!(p = lock_user_string(arg1)))
6647 goto efault;
6648 ret = get_errno(chown(p, arg2, arg3));
6649 unlock_user(p, arg1, 0);
6650 break;
6651 #endif
6652 #ifdef TARGET_NR_setuid32
6653 case TARGET_NR_setuid32:
6654 ret = get_errno(setuid(arg1));
6655 break;
6656 #endif
6657 #ifdef TARGET_NR_setgid32
6658 case TARGET_NR_setgid32:
6659 ret = get_errno(setgid(arg1));
6660 break;
6661 #endif
6662 #ifdef TARGET_NR_setfsuid32
6663 case TARGET_NR_setfsuid32:
6664 ret = get_errno(setfsuid(arg1));
6665 break;
6666 #endif
6667 #ifdef TARGET_NR_setfsgid32
6668 case TARGET_NR_setfsgid32:
6669 ret = get_errno(setfsgid(arg1));
6670 break;
6671 #endif
6672
6673 case TARGET_NR_pivot_root:
6674 goto unimplemented;
6675 #ifdef TARGET_NR_mincore
6676 case TARGET_NR_mincore:
6677 {
6678 void *a;
6679 ret = -TARGET_EFAULT;
6680 if (!(a = lock_user(VERIFY_READ, arg1,arg2, 0)))
6681 goto efault;
6682 if (!(p = lock_user_string(arg3)))
6683 goto mincore_fail;
6684 ret = get_errno(mincore(a, arg2, p));
6685 unlock_user(p, arg3, ret);
6686 mincore_fail:
6687 unlock_user(a, arg1, 0);
6688 }
6689 break;
6690 #endif
6691 #ifdef TARGET_NR_arm_fadvise64_64
6692 case TARGET_NR_arm_fadvise64_64:
6693 {
6694 /*
6695 * arm_fadvise64_64 looks like fadvise64_64 but
6696 * with different argument order
6697 */
6698 abi_long temp;
6699 temp = arg3;
6700 arg3 = arg4;
6701 arg4 = temp;
6702 }
6703 #endif
6704 #if defined(TARGET_NR_fadvise64_64) || defined(TARGET_NR_arm_fadvise64_64) || defined(TARGET_NR_fadvise64)
6705 #ifdef TARGET_NR_fadvise64_64
6706 case TARGET_NR_fadvise64_64:
6707 #endif
6708 #ifdef TARGET_NR_fadvise64
6709 case TARGET_NR_fadvise64:
6710 #endif
6711 #ifdef TARGET_S390X
6712 switch (arg4) {
6713 case 4: arg4 = POSIX_FADV_NOREUSE + 1; break; /* make sure it's an invalid value */
6714 case 5: arg4 = POSIX_FADV_NOREUSE + 2; break; /* ditto */
6715 case 6: arg4 = POSIX_FADV_DONTNEED; break;
6716 case 7: arg4 = POSIX_FADV_NOREUSE; break;
6717 default: break;
6718 }
6719 #endif
6720 ret = -posix_fadvise(arg1, arg2, arg3, arg4);
6721 break;
6722 #endif
6723 #ifdef TARGET_NR_madvise
6724 case TARGET_NR_madvise:
6725 /* A straight passthrough may not be safe because qemu sometimes
6726 turns private flie-backed mappings into anonymous mappings.
6727 This will break MADV_DONTNEED.
6728 This is a hint, so ignoring and returning success is ok. */
6729 ret = get_errno(0);
6730 break;
6731 #endif
6732 #if TARGET_ABI_BITS == 32
6733 case TARGET_NR_fcntl64:
6734 {
6735 int cmd;
6736 struct flock64 fl;
6737 struct target_flock64 *target_fl;
6738 #ifdef TARGET_ARM
6739 struct target_eabi_flock64 *target_efl;
6740 #endif
6741
6742 cmd = target_to_host_fcntl_cmd(arg2);
6743 if (cmd == -TARGET_EINVAL)
6744 return cmd;
6745
6746 switch(arg2) {
6747 case TARGET_F_GETLK64:
6748 #ifdef TARGET_ARM
6749 if (((CPUARMState *)cpu_env)->eabi) {
6750 if (!lock_user_struct(VERIFY_READ, target_efl, arg3, 1))
6751 goto efault;
6752 fl.l_type = tswap16(target_efl->l_type);
6753 fl.l_whence = tswap16(target_efl->l_whence);
6754 fl.l_start = tswap64(target_efl->l_start);
6755 fl.l_len = tswap64(target_efl->l_len);
6756 fl.l_pid = tswap32(target_efl->l_pid);
6757 unlock_user_struct(target_efl, arg3, 0);
6758 } else
6759 #endif
6760 {
6761 if (!lock_user_struct(VERIFY_READ, target_fl, arg3, 1))
6762 goto efault;
6763 fl.l_type = tswap16(target_fl->l_type);
6764 fl.l_whence = tswap16(target_fl->l_whence);
6765 fl.l_start = tswap64(target_fl->l_start);
6766 fl.l_len = tswap64(target_fl->l_len);
6767 fl.l_pid = tswap32(target_fl->l_pid);
6768 unlock_user_struct(target_fl, arg3, 0);
6769 }
6770 ret = get_errno(fcntl(arg1, cmd, &fl));
6771 if (ret == 0) {
6772 #ifdef TARGET_ARM
6773 if (((CPUARMState *)cpu_env)->eabi) {
6774 if (!lock_user_struct(VERIFY_WRITE, target_efl, arg3, 0))
6775 goto efault;
6776 target_efl->l_type = tswap16(fl.l_type);
6777 target_efl->l_whence = tswap16(fl.l_whence);
6778 target_efl->l_start = tswap64(fl.l_start);
6779 target_efl->l_len = tswap64(fl.l_len);
6780 target_efl->l_pid = tswap32(fl.l_pid);
6781 unlock_user_struct(target_efl, arg3, 1);
6782 } else
6783 #endif
6784 {
6785 if (!lock_user_struct(VERIFY_WRITE, target_fl, arg3, 0))
6786 goto efault;
6787 target_fl->l_type = tswap16(fl.l_type);
6788 target_fl->l_whence = tswap16(fl.l_whence);
6789 target_fl->l_start = tswap64(fl.l_start);
6790 target_fl->l_len = tswap64(fl.l_len);
6791 target_fl->l_pid = tswap32(fl.l_pid);
6792 unlock_user_struct(target_fl, arg3, 1);
6793 }
6794 }
6795 break;
6796
6797 case TARGET_F_SETLK64:
6798 case TARGET_F_SETLKW64:
6799 #ifdef TARGET_ARM
6800 if (((CPUARMState *)cpu_env)->eabi) {
6801 if (!lock_user_struct(VERIFY_READ, target_efl, arg3, 1))
6802 goto efault;
6803 fl.l_type = tswap16(target_efl->l_type);
6804 fl.l_whence = tswap16(target_efl->l_whence);
6805 fl.l_start = tswap64(target_efl->l_start);
6806 fl.l_len = tswap64(target_efl->l_len);
6807 fl.l_pid = tswap32(target_efl->l_pid);
6808 unlock_user_struct(target_efl, arg3, 0);
6809 } else
6810 #endif
6811 {
6812 if (!lock_user_struct(VERIFY_READ, target_fl, arg3, 1))
6813 goto efault;
6814 fl.l_type = tswap16(target_fl->l_type);
6815 fl.l_whence = tswap16(target_fl->l_whence);
6816 fl.l_start = tswap64(target_fl->l_start);
6817 fl.l_len = tswap64(target_fl->l_len);
6818 fl.l_pid = tswap32(target_fl->l_pid);
6819 unlock_user_struct(target_fl, arg3, 0);
6820 }
6821 ret = get_errno(fcntl(arg1, cmd, &fl));
6822 break;
6823 default:
6824 ret = do_fcntl(arg1, arg2, arg3);
6825 break;
6826 }
6827 break;
6828 }
6829 #endif
6830 #ifdef TARGET_NR_cacheflush
6831 case TARGET_NR_cacheflush:
6832 /* self-modifying code is handled automatically, so nothing needed */
6833 ret = 0;
6834 break;
6835 #endif
6836 #ifdef TARGET_NR_security
6837 case TARGET_NR_security:
6838 goto unimplemented;
6839 #endif
6840 #ifdef TARGET_NR_getpagesize
6841 case TARGET_NR_getpagesize:
6842 ret = TARGET_PAGE_SIZE;
6843 break;
6844 #endif
6845 case TARGET_NR_gettid:
6846 ret = get_errno(gettid());
6847 break;
6848 #ifdef TARGET_NR_readahead
6849 case TARGET_NR_readahead:
6850 #if TARGET_ABI_BITS == 32
6851 #ifdef TARGET_ARM
6852 if (((CPUARMState *)cpu_env)->eabi)
6853 {
6854 arg2 = arg3;
6855 arg3 = arg4;
6856 arg4 = arg5;
6857 }
6858 #endif
6859 ret = get_errno(readahead(arg1, ((off64_t)arg3 << 32) | arg2, arg4));
6860 #else
6861 ret = get_errno(readahead(arg1, arg2, arg3));
6862 #endif
6863 break;
6864 #endif
6865 #ifdef TARGET_NR_setxattr
6866 case TARGET_NR_setxattr:
6867 case TARGET_NR_lsetxattr:
6868 case TARGET_NR_fsetxattr:
6869 case TARGET_NR_getxattr:
6870 case TARGET_NR_lgetxattr:
6871 case TARGET_NR_fgetxattr:
6872 case TARGET_NR_listxattr:
6873 case TARGET_NR_llistxattr:
6874 case TARGET_NR_flistxattr:
6875 case TARGET_NR_removexattr:
6876 case TARGET_NR_lremovexattr:
6877 case TARGET_NR_fremovexattr:
6878 ret = -TARGET_EOPNOTSUPP;
6879 break;
6880 #endif
6881 #ifdef TARGET_NR_set_thread_area
6882 case TARGET_NR_set_thread_area:
6883 #if defined(TARGET_MIPS)
6884 ((CPUMIPSState *) cpu_env)->tls_value = arg1;
6885 ret = 0;
6886 break;
6887 #elif defined(TARGET_CRIS)
6888 if (arg1 & 0xff)
6889 ret = -TARGET_EINVAL;
6890 else {
6891 ((CPUCRISState *) cpu_env)->pregs[PR_PID] = arg1;
6892 ret = 0;
6893 }
6894 break;
6895 #elif defined(TARGET_I386) && defined(TARGET_ABI32)
6896 ret = do_set_thread_area(cpu_env, arg1);
6897 break;
6898 #else
6899 goto unimplemented_nowarn;
6900 #endif
6901 #endif
6902 #ifdef TARGET_NR_get_thread_area
6903 case TARGET_NR_get_thread_area:
6904 #if defined(TARGET_I386) && defined(TARGET_ABI32)
6905 ret = do_get_thread_area(cpu_env, arg1);
6906 #else
6907 goto unimplemented_nowarn;
6908 #endif
6909 #endif
6910 #ifdef TARGET_NR_getdomainname
6911 case TARGET_NR_getdomainname:
6912 goto unimplemented_nowarn;
6913 #endif
6914
6915 #ifdef TARGET_NR_clock_gettime
6916 case TARGET_NR_clock_gettime:
6917 {
6918 struct timespec ts;
6919 ret = get_errno(clock_gettime(arg1, &ts));
6920 if (!is_error(ret)) {
6921 host_to_target_timespec(arg2, &ts);
6922 }
6923 break;
6924 }
6925 #endif
6926 #ifdef TARGET_NR_clock_getres
6927 case TARGET_NR_clock_getres:
6928 {
6929 struct timespec ts;
6930 ret = get_errno(clock_getres(arg1, &ts));
6931 if (!is_error(ret)) {
6932 host_to_target_timespec(arg2, &ts);
6933 }
6934 break;
6935 }
6936 #endif
6937 #ifdef TARGET_NR_clock_nanosleep
6938 case TARGET_NR_clock_nanosleep:
6939 {
6940 struct timespec ts;
6941 target_to_host_timespec(&ts, arg3);
6942 ret = get_errno(clock_nanosleep(arg1, arg2, &ts, arg4 ? &ts : NULL));
6943 if (arg4)
6944 host_to_target_timespec(arg4, &ts);
6945 break;
6946 }
6947 #endif
6948
6949 #if defined(TARGET_NR_set_tid_address) && defined(__NR_set_tid_address)
6950 case TARGET_NR_set_tid_address:
6951 ret = get_errno(set_tid_address((int *)g2h(arg1)));
6952 break;
6953 #endif
6954
6955 #if defined(TARGET_NR_tkill) && defined(__NR_tkill)
6956 case TARGET_NR_tkill:
6957 ret = get_errno(sys_tkill((int)arg1, target_to_host_signal(arg2)));
6958 break;
6959 #endif
6960
6961 #if defined(TARGET_NR_tgkill) && defined(__NR_tgkill)
6962 case TARGET_NR_tgkill:
6963 ret = get_errno(sys_tgkill((int)arg1, (int)arg2,
6964 target_to_host_signal(arg3)));
6965 break;
6966 #endif
6967
6968 #ifdef TARGET_NR_set_robust_list
6969 case TARGET_NR_set_robust_list:
6970 goto unimplemented_nowarn;
6971 #endif
6972
6973 #if defined(TARGET_NR_utimensat) && defined(__NR_utimensat)
6974 case TARGET_NR_utimensat:
6975 {
6976 struct timespec *tsp, ts[2];
6977 if (!arg3) {
6978 tsp = NULL;
6979 } else {
6980 target_to_host_timespec(ts, arg3);
6981 target_to_host_timespec(ts+1, arg3+sizeof(struct target_timespec));
6982 tsp = ts;
6983 }
6984 if (!arg2)
6985 ret = get_errno(sys_utimensat(arg1, NULL, tsp, arg4));
6986 else {
6987 if (!(p = lock_user_string(arg2))) {
6988 ret = -TARGET_EFAULT;
6989 goto fail;
6990 }
6991 ret = get_errno(sys_utimensat(arg1, path(p), tsp, arg4));
6992 unlock_user(p, arg2, 0);
6993 }
6994 }
6995 break;
6996 #endif
6997 #if defined(CONFIG_USE_NPTL)
6998 case TARGET_NR_futex:
6999 ret = do_futex(arg1, arg2, arg3, arg4, arg5, arg6);
7000 break;
7001 #endif
7002 #if defined(TARGET_NR_inotify_init) && defined(__NR_inotify_init)
7003 case TARGET_NR_inotify_init:
7004 ret = get_errno(sys_inotify_init());
7005 break;
7006 #endif
7007 #if defined(TARGET_NR_inotify_add_watch) && defined(__NR_inotify_add_watch)
7008 case TARGET_NR_inotify_add_watch:
7009 p = lock_user_string(arg2);
7010 ret = get_errno(sys_inotify_add_watch(arg1, path(p), arg3));
7011 unlock_user(p, arg2, 0);
7012 break;
7013 #endif
7014 #if defined(TARGET_NR_inotify_rm_watch) && defined(__NR_inotify_rm_watch)
7015 case TARGET_NR_inotify_rm_watch:
7016 ret = get_errno(sys_inotify_rm_watch(arg1, arg2));
7017 break;
7018 #endif
7019
7020 #if defined(TARGET_NR_mq_open) && defined(__NR_mq_open)
7021 case TARGET_NR_mq_open:
7022 {
7023 struct mq_attr posix_mq_attr;
7024
7025 p = lock_user_string(arg1 - 1);
7026 if (arg4 != 0)
7027 copy_from_user_mq_attr (&posix_mq_attr, arg4);
7028 ret = get_errno(mq_open(p, arg2, arg3, &posix_mq_attr));
7029 unlock_user (p, arg1, 0);
7030 }
7031 break;
7032
7033 case TARGET_NR_mq_unlink:
7034 p = lock_user_string(arg1 - 1);
7035 ret = get_errno(mq_unlink(p));
7036 unlock_user (p, arg1, 0);
7037 break;
7038
7039 case TARGET_NR_mq_timedsend:
7040 {
7041 struct timespec ts;
7042
7043 p = lock_user (VERIFY_READ, arg2, arg3, 1);
7044 if (arg5 != 0) {
7045 target_to_host_timespec(&ts, arg5);
7046 ret = get_errno(mq_timedsend(arg1, p, arg3, arg4, &ts));
7047 host_to_target_timespec(arg5, &ts);
7048 }
7049 else
7050 ret = get_errno(mq_send(arg1, p, arg3, arg4));
7051 unlock_user (p, arg2, arg3);
7052 }
7053 break;
7054
7055 case TARGET_NR_mq_timedreceive:
7056 {
7057 struct timespec ts;
7058 unsigned int prio;
7059
7060 p = lock_user (VERIFY_READ, arg2, arg3, 1);
7061 if (arg5 != 0) {
7062 target_to_host_timespec(&ts, arg5);
7063 ret = get_errno(mq_timedreceive(arg1, p, arg3, &prio, &ts));
7064 host_to_target_timespec(arg5, &ts);
7065 }
7066 else
7067 ret = get_errno(mq_receive(arg1, p, arg3, &prio));
7068 unlock_user (p, arg2, arg3);
7069 if (arg4 != 0)
7070 put_user_u32(prio, arg4);
7071 }
7072 break;
7073
7074 /* Not implemented for now... */
7075 /* case TARGET_NR_mq_notify: */
7076 /* break; */
7077
7078 case TARGET_NR_mq_getsetattr:
7079 {
7080 struct mq_attr posix_mq_attr_in, posix_mq_attr_out;
7081 ret = 0;
7082 if (arg3 != 0) {
7083 ret = mq_getattr(arg1, &posix_mq_attr_out);
7084 copy_to_user_mq_attr(arg3, &posix_mq_attr_out);
7085 }
7086 if (arg2 != 0) {
7087 copy_from_user_mq_attr(&posix_mq_attr_in, arg2);
7088 ret |= mq_setattr(arg1, &posix_mq_attr_in, &posix_mq_attr_out);
7089 }
7090
7091 }
7092 break;
7093 #endif
7094
7095 #ifdef CONFIG_SPLICE
7096 #ifdef TARGET_NR_tee
7097 case TARGET_NR_tee:
7098 {
7099 ret = get_errno(tee(arg1,arg2,arg3,arg4));
7100 }
7101 break;
7102 #endif
7103 #ifdef TARGET_NR_splice
7104 case TARGET_NR_splice:
7105 {
7106 loff_t loff_in, loff_out;
7107 loff_t *ploff_in = NULL, *ploff_out = NULL;
7108 if(arg2) {
7109 get_user_u64(loff_in, arg2);
7110 ploff_in = &loff_in;
7111 }
7112 if(arg4) {
7113 get_user_u64(loff_out, arg2);
7114 ploff_out = &loff_out;
7115 }
7116 ret = get_errno(splice(arg1, ploff_in, arg3, ploff_out, arg5, arg6));
7117 }
7118 break;
7119 #endif
7120 #ifdef TARGET_NR_vmsplice
7121 case TARGET_NR_vmsplice:
7122 {
7123 int count = arg3;
7124 struct iovec *vec;
7125
7126 vec = alloca(count * sizeof(struct iovec));
7127 if (lock_iovec(VERIFY_READ, vec, arg2, count, 1) < 0)
7128 goto efault;
7129 ret = get_errno(vmsplice(arg1, vec, count, arg4));
7130 unlock_iovec(vec, arg2, count, 0);
7131 }
7132 break;
7133 #endif
7134 #endif /* CONFIG_SPLICE */
7135 #ifdef CONFIG_EVENTFD
7136 #if defined(TARGET_NR_eventfd)
7137 case TARGET_NR_eventfd:
7138 ret = get_errno(eventfd(arg1, 0));
7139 break;
7140 #endif
7141 #if defined(TARGET_NR_eventfd2)
7142 case TARGET_NR_eventfd2:
7143 ret = get_errno(eventfd(arg1, arg2));
7144 break;
7145 #endif
7146 #endif /* CONFIG_EVENTFD */
7147 #if defined(CONFIG_FALLOCATE) && defined(TARGET_NR_fallocate)
7148 case TARGET_NR_fallocate:
7149 ret = get_errno(fallocate(arg1, arg2, arg3, arg4));
7150 break;
7151 #endif
7152 default:
7153 unimplemented:
7154 gemu_log("qemu: Unsupported syscall: %d\n", num);
7155 #if defined(TARGET_NR_setxattr) || defined(TARGET_NR_get_thread_area) || defined(TARGET_NR_getdomainname) || defined(TARGET_NR_set_robust_list)
7156 unimplemented_nowarn:
7157 #endif
7158 ret = -TARGET_ENOSYS;
7159 break;
7160 }
7161 fail:
7162 #ifdef DEBUG
7163 gemu_log(" = " TARGET_ABI_FMT_ld "\n", ret);
7164 #endif
7165 if(do_strace)
7166 print_syscall_ret(num, ret);
7167 return ret;
7168 efault:
7169 ret = -TARGET_EFAULT;
7170 goto fail;
7171 }
AR7 emulation for QEMU