]> git.proxmox.com Git - qemu.git/blob - linux-user/syscall.c
projects / qemu.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD
Tkill support, by Stuart Anderson.
[qemu.git] / linux-user / syscall.c
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, write to the Free Software
18 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
19 */
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 <sys/types.h>
31 #include <sys/ipc.h>
32 #include <sys/msg.h>
33 #include <sys/wait.h>
34 #include <sys/time.h>
35 #include <sys/stat.h>
36 #include <sys/mount.h>
37 #include <sys/prctl.h>
38 #include <sys/resource.h>
39 #include <sys/mman.h>
40 #include <sys/swap.h>
41 #include <signal.h>
42 #include <sched.h>
43 #include <sys/socket.h>
44 #include <sys/uio.h>
45 #include <sys/poll.h>
46 #include <sys/times.h>
47 #include <sys/shm.h>
48 #include <sys/sem.h>
49 #include <sys/statfs.h>
50 #include <utime.h>
51 #include <sys/sysinfo.h>
52 //#include <sys/user.h>
53 #include <netinet/ip.h>
54 #include <netinet/tcp.h>
55
56 #define termios host_termios
57 #define winsize host_winsize
58 #define termio host_termio
59 #define sgttyb host_sgttyb /* same as target */
60 #define tchars host_tchars /* same as target */
61 #define ltchars host_ltchars /* same as target */
62
63 #include <linux/termios.h>
64 #include <linux/unistd.h>
65 #include <linux/utsname.h>
66 #include <linux/cdrom.h>
67 #include <linux/hdreg.h>
68 #include <linux/soundcard.h>
69 #include <linux/dirent.h>
70 #include <linux/kd.h>
71
72 #include "qemu.h"
73
74 //#define DEBUG
75
76 #if defined(TARGET_I386) || defined(TARGET_ARM) || defined(TARGET_SPARC) \
77 || defined(TARGET_M68K) || defined(TARGET_SH4)
78 /* 16 bit uid wrappers emulation */
79 #define USE_UID16
80 #endif
81
82 //#include <linux/msdos_fs.h>
83 #define VFAT_IOCTL_READDIR_BOTH _IOR('r', 1, struct dirent [2])
84 #define VFAT_IOCTL_READDIR_SHORT _IOR('r', 2, struct dirent [2])
85
86
87 #undef _syscall0
88 #undef _syscall1
89 #undef _syscall2
90 #undef _syscall3
91 #undef _syscall4
92 #undef _syscall5
93 #undef _syscall6
94
95 #define _syscall0(type,name) \
96 type name (void) \
97 { \
98 return syscall(__NR_##name); \
99 }
100
101 #define _syscall1(type,name,type1,arg1) \
102 type name (type1 arg1) \
103 { \
104 return syscall(__NR_##name, arg1); \
105 }
106
107 #define _syscall2(type,name,type1,arg1,type2,arg2) \
108 type name (type1 arg1,type2 arg2) \
109 { \
110 return syscall(__NR_##name, arg1, arg2); \
111 }
112
113 #define _syscall3(type,name,type1,arg1,type2,arg2,type3,arg3) \
114 type name (type1 arg1,type2 arg2,type3 arg3) \
115 { \
116 return syscall(__NR_##name, arg1, arg2, arg3); \
117 }
118
119 #define _syscall4(type,name,type1,arg1,type2,arg2,type3,arg3,type4,arg4) \
120 type name (type1 arg1,type2 arg2,type3 arg3,type4 arg4) \
121 { \
122 return syscall(__NR_##name, arg1, arg2, arg3, arg4); \
123 }
124
125 #define _syscall5(type,name,type1,arg1,type2,arg2,type3,arg3,type4,arg4, \
126 type5,arg5) \
127 type name (type1 arg1,type2 arg2,type3 arg3,type4 arg4,type5 arg5) \
128 { \
129 return syscall(__NR_##name, arg1, arg2, arg3, arg4, arg5); \
130 }
131
132
133 #define _syscall6(type,name,type1,arg1,type2,arg2,type3,arg3,type4,arg4, \
134 type5,arg5,type6,arg6) \
135 type name (type1 arg1,type2 arg2,type3 arg3,type4 arg4,type5 arg5,type6 arg6) \
136 { \
137 return syscall(__NR_##name, arg1, arg2, arg3, arg4, arg5, arg6); \
138 }
139
140
141 #define __NR_sys_uname __NR_uname
142 #define __NR_sys_getcwd1 __NR_getcwd
143 #define __NR_sys_getdents __NR_getdents
144 #define __NR_sys_getdents64 __NR_getdents64
145 #define __NR_sys_rt_sigqueueinfo __NR_rt_sigqueueinfo
146 #define __NR_sys_syslog __NR_syslog
147 #define __NR_sys_tgkill __NR_tgkill
148 #define __NR_sys_tkill __NR_tkill
149
150 #if defined(__alpha__) || defined (__ia64__) || defined(__x86_64__)
151 #define __NR__llseek __NR_lseek
152 #endif
153
154 #ifdef __NR_gettid
155 _syscall0(int, gettid)
156 #else
157 static int gettid(void) {
158 return -ENOSYS;
159 }
160 #endif
161 _syscall1(int,sys_uname,struct new_utsname *,buf)
162 _syscall2(int,sys_getcwd1,char *,buf,size_t,size)
163 _syscall3(int, sys_getdents, uint, fd, struct dirent *, dirp, uint, count);
164 _syscall3(int, sys_getdents64, uint, fd, struct dirent64 *, dirp, uint, count);
165 _syscall5(int, _llseek, uint, fd, ulong, hi, ulong, lo,
166 loff_t *, res, uint, wh);
167 _syscall3(int,sys_rt_sigqueueinfo,int,pid,int,sig,siginfo_t *,uinfo)
168 _syscall3(int,sys_syslog,int,type,char*,bufp,int,len)
169 #ifdef TARGET_NR_tgkill
170 _syscall3(int,sys_tgkill,int,tgid,int,pid,int,sig)
171 #endif
172 #ifdef TARGET_NR_tkill
173 _syscall2(int,sys_tkill,int,tid,int,sig)
174 #endif
175 #ifdef __NR_exit_group
176 _syscall1(int,exit_group,int,error_code)
177 #endif
178 #if defined(TARGET_NR_set_tid_address) && defined(__NR_set_tid_address)
179 _syscall1(int,set_tid_address,int *,tidptr)
180 #endif
181
182 extern int personality(int);
183 extern int flock(int, int);
184 extern int setfsuid(int);
185 extern int setfsgid(int);
186 extern int setresuid(uid_t, uid_t, uid_t);
187 extern int getresuid(uid_t *, uid_t *, uid_t *);
188 extern int setresgid(gid_t, gid_t, gid_t);
189 extern int getresgid(gid_t *, gid_t *, gid_t *);
190 extern int setgroups(int, gid_t *);
191
192 /*
193 * This list is the union of errno values overridden in asm-<arch>/errno.h
194 * minus the errnos that are not actually generic to all archs.
195 */
196 static uint16_t host_to_target_errno_table[1200] = {
197 [EIDRM] = TARGET_EIDRM,
198 [ECHRNG] = TARGET_ECHRNG,
199 [EL2NSYNC] = TARGET_EL2NSYNC,
200 [EL3HLT] = TARGET_EL3HLT,
201 [EL3RST] = TARGET_EL3RST,
202 [ELNRNG] = TARGET_ELNRNG,
203 [EUNATCH] = TARGET_EUNATCH,
204 [ENOCSI] = TARGET_ENOCSI,
205 [EL2HLT] = TARGET_EL2HLT,
206 [EDEADLK] = TARGET_EDEADLK,
207 [ENOLCK] = TARGET_ENOLCK,
208 [EBADE] = TARGET_EBADE,
209 [EBADR] = TARGET_EBADR,
210 [EXFULL] = TARGET_EXFULL,
211 [ENOANO] = TARGET_ENOANO,
212 [EBADRQC] = TARGET_EBADRQC,
213 [EBADSLT] = TARGET_EBADSLT,
214 [EBFONT] = TARGET_EBFONT,
215 [ENOSTR] = TARGET_ENOSTR,
216 [ENODATA] = TARGET_ENODATA,
217 [ETIME] = TARGET_ETIME,
218 [ENOSR] = TARGET_ENOSR,
219 [ENONET] = TARGET_ENONET,
220 [ENOPKG] = TARGET_ENOPKG,
221 [EREMOTE] = TARGET_EREMOTE,
222 [ENOLINK] = TARGET_ENOLINK,
223 [EADV] = TARGET_EADV,
224 [ESRMNT] = TARGET_ESRMNT,
225 [ECOMM] = TARGET_ECOMM,
226 [EPROTO] = TARGET_EPROTO,
227 [EDOTDOT] = TARGET_EDOTDOT,
228 [EMULTIHOP] = TARGET_EMULTIHOP,
229 [EBADMSG] = TARGET_EBADMSG,
230 [ENAMETOOLONG] = TARGET_ENAMETOOLONG,
231 [EOVERFLOW] = TARGET_EOVERFLOW,
232 [ENOTUNIQ] = TARGET_ENOTUNIQ,
233 [EBADFD] = TARGET_EBADFD,
234 [EREMCHG] = TARGET_EREMCHG,
235 [ELIBACC] = TARGET_ELIBACC,
236 [ELIBBAD] = TARGET_ELIBBAD,
237 [ELIBSCN] = TARGET_ELIBSCN,
238 [ELIBMAX] = TARGET_ELIBMAX,
239 [ELIBEXEC] = TARGET_ELIBEXEC,
240 [EILSEQ] = TARGET_EILSEQ,
241 [ENOSYS] = TARGET_ENOSYS,
242 [ELOOP] = TARGET_ELOOP,
243 [ERESTART] = TARGET_ERESTART,
244 [ESTRPIPE] = TARGET_ESTRPIPE,
245 [ENOTEMPTY] = TARGET_ENOTEMPTY,
246 [EUSERS] = TARGET_EUSERS,
247 [ENOTSOCK] = TARGET_ENOTSOCK,
248 [EDESTADDRREQ] = TARGET_EDESTADDRREQ,
249 [EMSGSIZE] = TARGET_EMSGSIZE,
250 [EPROTOTYPE] = TARGET_EPROTOTYPE,
251 [ENOPROTOOPT] = TARGET_ENOPROTOOPT,
252 [EPROTONOSUPPORT] = TARGET_EPROTONOSUPPORT,
253 [ESOCKTNOSUPPORT] = TARGET_ESOCKTNOSUPPORT,
254 [EOPNOTSUPP] = TARGET_EOPNOTSUPP,
255 [EPFNOSUPPORT] = TARGET_EPFNOSUPPORT,
256 [EAFNOSUPPORT] = TARGET_EAFNOSUPPORT,
257 [EADDRINUSE] = TARGET_EADDRINUSE,
258 [EADDRNOTAVAIL] = TARGET_EADDRNOTAVAIL,
259 [ENETDOWN] = TARGET_ENETDOWN,
260 [ENETUNREACH] = TARGET_ENETUNREACH,
261 [ENETRESET] = TARGET_ENETRESET,
262 [ECONNABORTED] = TARGET_ECONNABORTED,
263 [ECONNRESET] = TARGET_ECONNRESET,
264 [ENOBUFS] = TARGET_ENOBUFS,
265 [EISCONN] = TARGET_EISCONN,
266 [ENOTCONN] = TARGET_ENOTCONN,
267 [EUCLEAN] = TARGET_EUCLEAN,
268 [ENOTNAM] = TARGET_ENOTNAM,
269 [ENAVAIL] = TARGET_ENAVAIL,
270 [EISNAM] = TARGET_EISNAM,
271 [EREMOTEIO] = TARGET_EREMOTEIO,
272 [ESHUTDOWN] = TARGET_ESHUTDOWN,
273 [ETOOMANYREFS] = TARGET_ETOOMANYREFS,
274 [ETIMEDOUT] = TARGET_ETIMEDOUT,
275 [ECONNREFUSED] = TARGET_ECONNREFUSED,
276 [EHOSTDOWN] = TARGET_EHOSTDOWN,
277 [EHOSTUNREACH] = TARGET_EHOSTUNREACH,
278 [EALREADY] = TARGET_EALREADY,
279 [EINPROGRESS] = TARGET_EINPROGRESS,
280 [ESTALE] = TARGET_ESTALE,
281 [ECANCELED] = TARGET_ECANCELED,
282 [ENOMEDIUM] = TARGET_ENOMEDIUM,
283 [EMEDIUMTYPE] = TARGET_EMEDIUMTYPE,
284 [ENOKEY] = TARGET_ENOKEY,
285 [EKEYEXPIRED] = TARGET_EKEYEXPIRED,
286 [EKEYREVOKED] = TARGET_EKEYREVOKED,
287 [EKEYREJECTED] = TARGET_EKEYREJECTED,
288 [EOWNERDEAD] = TARGET_EOWNERDEAD,
289 [ENOTRECOVERABLE] = TARGET_ENOTRECOVERABLE,
290 };
291
292 static inline int host_to_target_errno(int err)
293 {
294 if(host_to_target_errno_table[err])
295 return host_to_target_errno_table[err];
296 return err;
297 }
298
299 static inline long get_errno(long ret)
300 {
301 if (ret == -1)
302 return -host_to_target_errno(errno);
303 else
304 return ret;
305 }
306
307 static inline int is_error(long ret)
308 {
309 return (unsigned long)ret >= (unsigned long)(-4096);
310 }
311
312 static target_ulong target_brk;
313 static target_ulong target_original_brk;
314
315 void target_set_brk(target_ulong new_brk)
316 {
317 target_original_brk = target_brk = HOST_PAGE_ALIGN(new_brk);
318 }
319
320 long do_brk(target_ulong new_brk)
321 {
322 target_ulong brk_page;
323 long mapped_addr;
324 int new_alloc_size;
325
326 if (!new_brk)
327 return target_brk;
328 if (new_brk < target_original_brk)
329 return -ENOMEM;
330
331 brk_page = HOST_PAGE_ALIGN(target_brk);
332
333 /* If the new brk is less than this, set it and we're done... */
334 if (new_brk < brk_page) {
335 target_brk = new_brk;
336 return target_brk;
337 }
338
339 /* We need to allocate more memory after the brk... */
340 new_alloc_size = HOST_PAGE_ALIGN(new_brk - brk_page + 1);
341 mapped_addr = get_errno(target_mmap(brk_page, new_alloc_size,
342 PROT_READ|PROT_WRITE,
343 MAP_ANON|MAP_FIXED|MAP_PRIVATE, 0, 0));
344 if (is_error(mapped_addr)) {
345 return mapped_addr;
346 } else {
347 target_brk = new_brk;
348 return target_brk;
349 }
350 }
351
352 static inline fd_set *target_to_host_fds(fd_set *fds,
353 target_long *target_fds, int n)
354 {
355 #if !defined(BSWAP_NEEDED) && !defined(WORDS_BIGENDIAN)
356 return (fd_set *)target_fds;
357 #else
358 int i, b;
359 if (target_fds) {
360 FD_ZERO(fds);
361 for(i = 0;i < n; i++) {
362 b = (tswapl(target_fds[i / TARGET_LONG_BITS]) >>
363 (i & (TARGET_LONG_BITS - 1))) & 1;
364 if (b)
365 FD_SET(i, fds);
366 }
367 return fds;
368 } else {
369 return NULL;
370 }
371 #endif
372 }
373
374 static inline void host_to_target_fds(target_long *target_fds,
375 fd_set *fds, int n)
376 {
377 #if !defined(BSWAP_NEEDED) && !defined(WORDS_BIGENDIAN)
378 /* nothing to do */
379 #else
380 int i, nw, j, k;
381 target_long v;
382
383 if (target_fds) {
384 nw = (n + TARGET_LONG_BITS - 1) / TARGET_LONG_BITS;
385 k = 0;
386 for(i = 0;i < nw; i++) {
387 v = 0;
388 for(j = 0; j < TARGET_LONG_BITS; j++) {
389 v |= ((FD_ISSET(k, fds) != 0) << j);
390 k++;
391 }
392 target_fds[i] = tswapl(v);
393 }
394 }
395 #endif
396 }
397
398 #if defined(__alpha__)
399 #define HOST_HZ 1024
400 #else
401 #define HOST_HZ 100
402 #endif
403
404 static inline long host_to_target_clock_t(long ticks)
405 {
406 #if HOST_HZ == TARGET_HZ
407 return ticks;
408 #else
409 return ((int64_t)ticks * TARGET_HZ) / HOST_HZ;
410 #endif
411 }
412
413 static inline void host_to_target_rusage(target_ulong target_addr,
414 const struct rusage *rusage)
415 {
416 struct target_rusage *target_rusage;
417
418 lock_user_struct(target_rusage, target_addr, 0);
419 target_rusage->ru_utime.tv_sec = tswapl(rusage->ru_utime.tv_sec);
420 target_rusage->ru_utime.tv_usec = tswapl(rusage->ru_utime.tv_usec);
421 target_rusage->ru_stime.tv_sec = tswapl(rusage->ru_stime.tv_sec);
422 target_rusage->ru_stime.tv_usec = tswapl(rusage->ru_stime.tv_usec);
423 target_rusage->ru_maxrss = tswapl(rusage->ru_maxrss);
424 target_rusage->ru_ixrss = tswapl(rusage->ru_ixrss);
425 target_rusage->ru_idrss = tswapl(rusage->ru_idrss);
426 target_rusage->ru_isrss = tswapl(rusage->ru_isrss);
427 target_rusage->ru_minflt = tswapl(rusage->ru_minflt);
428 target_rusage->ru_majflt = tswapl(rusage->ru_majflt);
429 target_rusage->ru_nswap = tswapl(rusage->ru_nswap);
430 target_rusage->ru_inblock = tswapl(rusage->ru_inblock);
431 target_rusage->ru_oublock = tswapl(rusage->ru_oublock);
432 target_rusage->ru_msgsnd = tswapl(rusage->ru_msgsnd);
433 target_rusage->ru_msgrcv = tswapl(rusage->ru_msgrcv);
434 target_rusage->ru_nsignals = tswapl(rusage->ru_nsignals);
435 target_rusage->ru_nvcsw = tswapl(rusage->ru_nvcsw);
436 target_rusage->ru_nivcsw = tswapl(rusage->ru_nivcsw);
437 unlock_user_struct(target_rusage, target_addr, 1);
438 }
439
440 static inline void target_to_host_timeval(struct timeval *tv,
441 target_ulong target_addr)
442 {
443 struct target_timeval *target_tv;
444
445 lock_user_struct(target_tv, target_addr, 1);
446 tv->tv_sec = tswapl(target_tv->tv_sec);
447 tv->tv_usec = tswapl(target_tv->tv_usec);
448 unlock_user_struct(target_tv, target_addr, 0);
449 }
450
451 static inline void host_to_target_timeval(target_ulong target_addr,
452 const struct timeval *tv)
453 {
454 struct target_timeval *target_tv;
455
456 lock_user_struct(target_tv, target_addr, 0);
457 target_tv->tv_sec = tswapl(tv->tv_sec);
458 target_tv->tv_usec = tswapl(tv->tv_usec);
459 unlock_user_struct(target_tv, target_addr, 1);
460 }
461
462
463 static long do_select(long n,
464 target_ulong rfd_p, target_ulong wfd_p,
465 target_ulong efd_p, target_ulong target_tv)
466 {
467 fd_set rfds, wfds, efds;
468 fd_set *rfds_ptr, *wfds_ptr, *efds_ptr;
469 target_long *target_rfds, *target_wfds, *target_efds;
470 struct timeval tv, *tv_ptr;
471 long ret;
472 int ok;
473
474 if (rfd_p) {
475 target_rfds = lock_user(rfd_p, sizeof(target_long) * n, 1);
476 rfds_ptr = target_to_host_fds(&rfds, target_rfds, n);
477 } else {
478 target_rfds = NULL;
479 rfds_ptr = NULL;
480 }
481 if (wfd_p) {
482 target_wfds = lock_user(wfd_p, sizeof(target_long) * n, 1);
483 wfds_ptr = target_to_host_fds(&wfds, target_wfds, n);
484 } else {
485 target_wfds = NULL;
486 wfds_ptr = NULL;
487 }
488 if (efd_p) {
489 target_efds = lock_user(efd_p, sizeof(target_long) * n, 1);
490 efds_ptr = target_to_host_fds(&efds, target_efds, n);
491 } else {
492 target_efds = NULL;
493 efds_ptr = NULL;
494 }
495
496 if (target_tv) {
497 target_to_host_timeval(&tv, target_tv);
498 tv_ptr = &tv;
499 } else {
500 tv_ptr = NULL;
501 }
502 ret = get_errno(select(n, rfds_ptr, wfds_ptr, efds_ptr, tv_ptr));
503 ok = !is_error(ret);
504
505 if (ok) {
506 host_to_target_fds(target_rfds, rfds_ptr, n);
507 host_to_target_fds(target_wfds, wfds_ptr, n);
508 host_to_target_fds(target_efds, efds_ptr, n);
509
510 if (target_tv) {
511 host_to_target_timeval(target_tv, &tv);
512 }
513 }
514 if (target_rfds)
515 unlock_user(target_rfds, rfd_p, ok ? sizeof(target_long) * n : 0);
516 if (target_wfds)
517 unlock_user(target_wfds, wfd_p, ok ? sizeof(target_long) * n : 0);
518 if (target_efds)
519 unlock_user(target_efds, efd_p, ok ? sizeof(target_long) * n : 0);
520
521 return ret;
522 }
523
524 static inline void target_to_host_sockaddr(struct sockaddr *addr,
525 target_ulong target_addr,
526 socklen_t len)
527 {
528 struct target_sockaddr *target_saddr;
529
530 target_saddr = lock_user(target_addr, len, 1);
531 memcpy(addr, target_saddr, len);
532 addr->sa_family = tswap16(target_saddr->sa_family);
533 unlock_user(target_saddr, target_addr, 0);
534 }
535
536 static inline void host_to_target_sockaddr(target_ulong target_addr,
537 struct sockaddr *addr,
538 socklen_t len)
539 {
540 struct target_sockaddr *target_saddr;
541
542 target_saddr = lock_user(target_addr, len, 0);
543 memcpy(target_saddr, addr, len);
544 target_saddr->sa_family = tswap16(addr->sa_family);
545 unlock_user(target_saddr, target_addr, len);
546 }
547
548 /* ??? Should this also swap msgh->name? */
549 static inline void target_to_host_cmsg(struct msghdr *msgh,
550 struct target_msghdr *target_msgh)
551 {
552 struct cmsghdr *cmsg = CMSG_FIRSTHDR(msgh);
553 struct target_cmsghdr *target_cmsg = TARGET_CMSG_FIRSTHDR(target_msgh);
554 socklen_t space = 0;
555
556 while (cmsg && target_cmsg) {
557 void *data = CMSG_DATA(cmsg);
558 void *target_data = TARGET_CMSG_DATA(target_cmsg);
559
560 int len = tswapl(target_cmsg->cmsg_len)
561 - TARGET_CMSG_ALIGN(sizeof (struct target_cmsghdr));
562
563 space += CMSG_SPACE(len);
564 if (space > msgh->msg_controllen) {
565 space -= CMSG_SPACE(len);
566 gemu_log("Host cmsg overflow\n");
567 break;
568 }
569
570 cmsg->cmsg_level = tswap32(target_cmsg->cmsg_level);
571 cmsg->cmsg_type = tswap32(target_cmsg->cmsg_type);
572 cmsg->cmsg_len = CMSG_LEN(len);
573
574 if (cmsg->cmsg_level != TARGET_SOL_SOCKET || cmsg->cmsg_type != SCM_RIGHTS) {
575 gemu_log("Unsupported ancillary data: %d/%d\n", cmsg->cmsg_level, cmsg->cmsg_type);
576 memcpy(data, target_data, len);
577 } else {
578 int *fd = (int *)data;
579 int *target_fd = (int *)target_data;
580 int i, numfds = len / sizeof(int);
581
582 for (i = 0; i < numfds; i++)
583 fd[i] = tswap32(target_fd[i]);
584 }
585
586 cmsg = CMSG_NXTHDR(msgh, cmsg);
587 target_cmsg = TARGET_CMSG_NXTHDR(target_msgh, target_cmsg);
588 }
589
590 msgh->msg_controllen = space;
591 }
592
593 /* ??? Should this also swap msgh->name? */
594 static inline void host_to_target_cmsg(struct target_msghdr *target_msgh,
595 struct msghdr *msgh)
596 {
597 struct cmsghdr *cmsg = CMSG_FIRSTHDR(msgh);
598 struct target_cmsghdr *target_cmsg = TARGET_CMSG_FIRSTHDR(target_msgh);
599 socklen_t space = 0;
600
601 while (cmsg && target_cmsg) {
602 void *data = CMSG_DATA(cmsg);
603 void *target_data = TARGET_CMSG_DATA(target_cmsg);
604
605 int len = cmsg->cmsg_len - CMSG_ALIGN(sizeof (struct cmsghdr));
606
607 space += TARGET_CMSG_SPACE(len);
608 if (space > tswapl(target_msgh->msg_controllen)) {
609 space -= TARGET_CMSG_SPACE(len);
610 gemu_log("Target cmsg overflow\n");
611 break;
612 }
613
614 target_cmsg->cmsg_level = tswap32(cmsg->cmsg_level);
615 target_cmsg->cmsg_type = tswap32(cmsg->cmsg_type);
616 target_cmsg->cmsg_len = tswapl(TARGET_CMSG_LEN(len));
617
618 if (cmsg->cmsg_level != TARGET_SOL_SOCKET || cmsg->cmsg_type != SCM_RIGHTS) {
619 gemu_log("Unsupported ancillary data: %d/%d\n", cmsg->cmsg_level, cmsg->cmsg_type);
620 memcpy(target_data, data, len);
621 } else {
622 int *fd = (int *)data;
623 int *target_fd = (int *)target_data;
624 int i, numfds = len / sizeof(int);
625
626 for (i = 0; i < numfds; i++)
627 target_fd[i] = tswap32(fd[i]);
628 }
629
630 cmsg = CMSG_NXTHDR(msgh, cmsg);
631 target_cmsg = TARGET_CMSG_NXTHDR(target_msgh, target_cmsg);
632 }
633
634 msgh->msg_controllen = tswapl(space);
635 }
636
637 static long do_setsockopt(int sockfd, int level, int optname,
638 target_ulong optval, socklen_t optlen)
639 {
640 int val, ret;
641
642 switch(level) {
643 case SOL_TCP:
644 /* TCP options all take an 'int' value. */
645 if (optlen < sizeof(uint32_t))
646 return -EINVAL;
647
648 val = tget32(optval);
649 ret = get_errno(setsockopt(sockfd, level, optname, &val, sizeof(val)));
650 break;
651 case SOL_IP:
652 switch(optname) {
653 case IP_TOS:
654 case IP_TTL:
655 case IP_HDRINCL:
656 case IP_ROUTER_ALERT:
657 case IP_RECVOPTS:
658 case IP_RETOPTS:
659 case IP_PKTINFO:
660 case IP_MTU_DISCOVER:
661 case IP_RECVERR:
662 case IP_RECVTOS:
663 #ifdef IP_FREEBIND
664 case IP_FREEBIND:
665 #endif
666 case IP_MULTICAST_TTL:
667 case IP_MULTICAST_LOOP:
668 val = 0;
669 if (optlen >= sizeof(uint32_t)) {
670 val = tget32(optval);
671 } else if (optlen >= 1) {
672 val = tget8(optval);
673 }
674 ret = get_errno(setsockopt(sockfd, level, optname, &val, sizeof(val)));
675 break;
676 default:
677 goto unimplemented;
678 }
679 break;
680 case TARGET_SOL_SOCKET:
681 switch (optname) {
682 /* Options with 'int' argument. */
683 case TARGET_SO_DEBUG:
684 optname = SO_DEBUG;
685 break;
686 case TARGET_SO_REUSEADDR:
687 optname = SO_REUSEADDR;
688 break;
689 case TARGET_SO_TYPE:
690 optname = SO_TYPE;
691 break;
692 case TARGET_SO_ERROR:
693 optname = SO_ERROR;
694 break;
695 case TARGET_SO_DONTROUTE:
696 optname = SO_DONTROUTE;
697 break;
698 case TARGET_SO_BROADCAST:
699 optname = SO_BROADCAST;
700 break;
701 case TARGET_SO_SNDBUF:
702 optname = SO_SNDBUF;
703 break;
704 case TARGET_SO_RCVBUF:
705 optname = SO_RCVBUF;
706 break;
707 case TARGET_SO_KEEPALIVE:
708 optname = SO_KEEPALIVE;
709 break;
710 case TARGET_SO_OOBINLINE:
711 optname = SO_OOBINLINE;
712 break;
713 case TARGET_SO_NO_CHECK:
714 optname = SO_NO_CHECK;
715 break;
716 case TARGET_SO_PRIORITY:
717 optname = SO_PRIORITY;
718 break;
719 #ifdef SO_BSDCOMPAT
720 case TARGET_SO_BSDCOMPAT:
721 optname = SO_BSDCOMPAT;
722 break;
723 #endif
724 case TARGET_SO_PASSCRED:
725 optname = SO_PASSCRED;
726 break;
727 case TARGET_SO_TIMESTAMP:
728 optname = SO_TIMESTAMP;
729 break;
730 case TARGET_SO_RCVLOWAT:
731 optname = SO_RCVLOWAT;
732 break;
733 case TARGET_SO_RCVTIMEO:
734 optname = SO_RCVTIMEO;
735 break;
736 case TARGET_SO_SNDTIMEO:
737 optname = SO_SNDTIMEO;
738 break;
739 break;
740 default:
741 goto unimplemented;
742 }
743 if (optlen < sizeof(uint32_t))
744 return -EINVAL;
745
746 val = tget32(optval);
747 ret = get_errno(setsockopt(sockfd, SOL_SOCKET, optname, &val, sizeof(val)));
748 break;
749 default:
750 unimplemented:
751 gemu_log("Unsupported setsockopt level=%d optname=%d \n", level, optname);
752 ret = -ENOSYS;
753 }
754 return ret;
755 }
756
757 static long do_getsockopt(int sockfd, int level, int optname,
758 target_ulong optval, target_ulong optlen)
759 {
760 int len, lv, val, ret;
761
762 switch(level) {
763 case TARGET_SOL_SOCKET:
764 level = SOL_SOCKET;
765 switch (optname) {
766 case TARGET_SO_LINGER:
767 case TARGET_SO_RCVTIMEO:
768 case TARGET_SO_SNDTIMEO:
769 case TARGET_SO_PEERCRED:
770 case TARGET_SO_PEERNAME:
771 /* These don't just return a single integer */
772 goto unimplemented;
773 default:
774 goto int_case;
775 }
776 break;
777 case SOL_TCP:
778 /* TCP options all take an 'int' value. */
779 int_case:
780 len = tget32(optlen);
781 if (len < 0)
782 return -EINVAL;
783 lv = sizeof(int);
784 ret = get_errno(getsockopt(sockfd, level, optname, &val, &lv));
785 if (ret < 0)
786 return ret;
787 val = tswap32(val);
788 if (len > lv)
789 len = lv;
790 if (len == 4)
791 tput32(optval, val);
792 else
793 tput8(optval, val);
794 tput32(optlen, len);
795 break;
796 case SOL_IP:
797 switch(optname) {
798 case IP_TOS:
799 case IP_TTL:
800 case IP_HDRINCL:
801 case IP_ROUTER_ALERT:
802 case IP_RECVOPTS:
803 case IP_RETOPTS:
804 case IP_PKTINFO:
805 case IP_MTU_DISCOVER:
806 case IP_RECVERR:
807 case IP_RECVTOS:
808 #ifdef IP_FREEBIND
809 case IP_FREEBIND:
810 #endif
811 case IP_MULTICAST_TTL:
812 case IP_MULTICAST_LOOP:
813 len = tget32(optlen);
814 if (len < 0)
815 return -EINVAL;
816 lv = sizeof(int);
817 ret = get_errno(getsockopt(sockfd, level, optname, &val, &lv));
818 if (ret < 0)
819 return ret;
820 if (len < sizeof(int) && len > 0 && val >= 0 && val < 255) {
821 len = 1;
822 tput32(optlen, len);
823 tput8(optval, val);
824 } else {
825 if (len > sizeof(int))
826 len = sizeof(int);
827 tput32(optlen, len);
828 tput32(optval, val);
829 }
830 break;
831 default:
832 goto unimplemented;
833 }
834 break;
835 default:
836 unimplemented:
837 gemu_log("getsockopt level=%d optname=%d not yet supported\n",
838 level, optname);
839 ret = -ENOSYS;
840 break;
841 }
842 return ret;
843 }
844
845 static void lock_iovec(struct iovec *vec, target_ulong target_addr,
846 int count, int copy)
847 {
848 struct target_iovec *target_vec;
849 target_ulong base;
850 int i;
851
852 target_vec = lock_user(target_addr, count * sizeof(struct target_iovec), 1);
853 for(i = 0;i < count; i++) {
854 base = tswapl(target_vec[i].iov_base);
855 vec[i].iov_len = tswapl(target_vec[i].iov_len);
856 vec[i].iov_base = lock_user(base, vec[i].iov_len, copy);
857 }
858 unlock_user (target_vec, target_addr, 0);
859 }
860
861 static void unlock_iovec(struct iovec *vec, target_ulong target_addr,
862 int count, int copy)
863 {
864 struct target_iovec *target_vec;
865 target_ulong base;
866 int i;
867
868 target_vec = lock_user(target_addr, count * sizeof(struct target_iovec), 1);
869 for(i = 0;i < count; i++) {
870 base = tswapl(target_vec[i].iov_base);
871 unlock_user(vec[i].iov_base, base, copy ? vec[i].iov_len : 0);
872 }
873 unlock_user (target_vec, target_addr, 0);
874 }
875
876 static long do_socket(int domain, int type, int protocol)
877 {
878 #if defined(TARGET_MIPS)
879 switch(type) {
880 case TARGET_SOCK_DGRAM:
881 type = SOCK_DGRAM;
882 break;
883 case TARGET_SOCK_STREAM:
884 type = SOCK_STREAM;
885 break;
886 case TARGET_SOCK_RAW:
887 type = SOCK_RAW;
888 break;
889 case TARGET_SOCK_RDM:
890 type = SOCK_RDM;
891 break;
892 case TARGET_SOCK_SEQPACKET:
893 type = SOCK_SEQPACKET;
894 break;
895 case TARGET_SOCK_PACKET:
896 type = SOCK_PACKET;
897 break;
898 }
899 #endif
900 return get_errno(socket(domain, type, protocol));
901 }
902
903 static long do_bind(int sockfd, target_ulong target_addr,
904 socklen_t addrlen)
905 {
906 void *addr = alloca(addrlen);
907
908 target_to_host_sockaddr(addr, target_addr, addrlen);
909 return get_errno(bind(sockfd, addr, addrlen));
910 }
911
912 static long do_connect(int sockfd, target_ulong target_addr,
913 socklen_t addrlen)
914 {
915 void *addr = alloca(addrlen);
916
917 target_to_host_sockaddr(addr, target_addr, addrlen);
918 return get_errno(connect(sockfd, addr, addrlen));
919 }
920
921 static long do_sendrecvmsg(int fd, target_ulong target_msg,
922 int flags, int send)
923 {
924 long ret;
925 struct target_msghdr *msgp;
926 struct msghdr msg;
927 int count;
928 struct iovec *vec;
929 target_ulong target_vec;
930
931 lock_user_struct(msgp, target_msg, 1);
932 if (msgp->msg_name) {
933 msg.msg_namelen = tswap32(msgp->msg_namelen);
934 msg.msg_name = alloca(msg.msg_namelen);
935 target_to_host_sockaddr(msg.msg_name, tswapl(msgp->msg_name),
936 msg.msg_namelen);
937 } else {
938 msg.msg_name = NULL;
939 msg.msg_namelen = 0;
940 }
941 msg.msg_controllen = 2 * tswapl(msgp->msg_controllen);
942 msg.msg_control = alloca(msg.msg_controllen);
943 msg.msg_flags = tswap32(msgp->msg_flags);
944
945 count = tswapl(msgp->msg_iovlen);
946 vec = alloca(count * sizeof(struct iovec));
947 target_vec = tswapl(msgp->msg_iov);
948 lock_iovec(vec, target_vec, count, send);
949 msg.msg_iovlen = count;
950 msg.msg_iov = vec;
951
952 if (send) {
953 target_to_host_cmsg(&msg, msgp);
954 ret = get_errno(sendmsg(fd, &msg, flags));
955 } else {
956 ret = get_errno(recvmsg(fd, &msg, flags));
957 if (!is_error(ret))
958 host_to_target_cmsg(msgp, &msg);
959 }
960 unlock_iovec(vec, target_vec, count, !send);
961 return ret;
962 }
963
964 static long do_accept(int fd, target_ulong target_addr,
965 target_ulong target_addrlen)
966 {
967 socklen_t addrlen = tget32(target_addrlen);
968 void *addr = alloca(addrlen);
969 long ret;
970
971 ret = get_errno(accept(fd, addr, &addrlen));
972 if (!is_error(ret)) {
973 host_to_target_sockaddr(target_addr, addr, addrlen);
974 tput32(target_addrlen, addrlen);
975 }
976 return ret;
977 }
978
979 static long do_getpeername(int fd, target_ulong target_addr,
980 target_ulong target_addrlen)
981 {
982 socklen_t addrlen = tget32(target_addrlen);
983 void *addr = alloca(addrlen);
984 long ret;
985
986 ret = get_errno(getpeername(fd, addr, &addrlen));
987 if (!is_error(ret)) {
988 host_to_target_sockaddr(target_addr, addr, addrlen);
989 tput32(target_addrlen, addrlen);
990 }
991 return ret;
992 }
993
994 static long do_getsockname(int fd, target_ulong target_addr,
995 target_ulong target_addrlen)
996 {
997 socklen_t addrlen = tget32(target_addrlen);
998 void *addr = alloca(addrlen);
999 long ret;
1000
1001 ret = get_errno(getsockname(fd, addr, &addrlen));
1002 if (!is_error(ret)) {
1003 host_to_target_sockaddr(target_addr, addr, addrlen);
1004 tput32(target_addrlen, addrlen);
1005 }
1006 return ret;
1007 }
1008
1009 static long do_socketpair(int domain, int type, int protocol,
1010 target_ulong target_tab)
1011 {
1012 int tab[2];
1013 long ret;
1014
1015 ret = get_errno(socketpair(domain, type, protocol, tab));
1016 if (!is_error(ret)) {
1017 tput32(target_tab, tab[0]);
1018 tput32(target_tab + 4, tab[1]);
1019 }
1020 return ret;
1021 }
1022
1023 static long do_sendto(int fd, target_ulong msg, size_t len, int flags,
1024 target_ulong target_addr, socklen_t addrlen)
1025 {
1026 void *addr;
1027 void *host_msg;
1028 long ret;
1029
1030 host_msg = lock_user(msg, len, 1);
1031 if (target_addr) {
1032 addr = alloca(addrlen);
1033 target_to_host_sockaddr(addr, target_addr, addrlen);
1034 ret = get_errno(sendto(fd, host_msg, len, flags, addr, addrlen));
1035 } else {
1036 ret = get_errno(send(fd, host_msg, len, flags));
1037 }
1038 unlock_user(host_msg, msg, 0);
1039 return ret;
1040 }
1041
1042 static long do_recvfrom(int fd, target_ulong msg, size_t len, int flags,
1043 target_ulong target_addr, target_ulong target_addrlen)
1044 {
1045 socklen_t addrlen;
1046 void *addr;
1047 void *host_msg;
1048 long ret;
1049
1050 host_msg = lock_user(msg, len, 0);
1051 if (target_addr) {
1052 addrlen = tget32(target_addrlen);
1053 addr = alloca(addrlen);
1054 ret = get_errno(recvfrom(fd, host_msg, len, flags, addr, &addrlen));
1055 } else {
1056 addr = NULL; /* To keep compiler quiet. */
1057 ret = get_errno(recv(fd, host_msg, len, flags));
1058 }
1059 if (!is_error(ret)) {
1060 if (target_addr) {
1061 host_to_target_sockaddr(target_addr, addr, addrlen);
1062 tput32(target_addrlen, addrlen);
1063 }
1064 unlock_user(host_msg, msg, len);
1065 } else {
1066 unlock_user(host_msg, msg, 0);
1067 }
1068 return ret;
1069 }
1070
1071 static long do_socketcall(int num, target_ulong vptr)
1072 {
1073 long ret;
1074 const int n = sizeof(target_ulong);
1075
1076 switch(num) {
1077 case SOCKOP_socket:
1078 {
1079 int domain = tgetl(vptr);
1080 int type = tgetl(vptr + n);
1081 int protocol = tgetl(vptr + 2 * n);
1082 ret = do_socket(domain, type, protocol);
1083 }
1084 break;
1085 case SOCKOP_bind:
1086 {
1087 int sockfd = tgetl(vptr);
1088 target_ulong target_addr = tgetl(vptr + n);
1089 socklen_t addrlen = tgetl(vptr + 2 * n);
1090 ret = do_bind(sockfd, target_addr, addrlen);
1091 }
1092 break;
1093 case SOCKOP_connect:
1094 {
1095 int sockfd = tgetl(vptr);
1096 target_ulong target_addr = tgetl(vptr + n);
1097 socklen_t addrlen = tgetl(vptr + 2 * n);
1098 ret = do_connect(sockfd, target_addr, addrlen);
1099 }
1100 break;
1101 case SOCKOP_listen:
1102 {
1103 int sockfd = tgetl(vptr);
1104 int backlog = tgetl(vptr + n);
1105 ret = get_errno(listen(sockfd, backlog));
1106 }
1107 break;
1108 case SOCKOP_accept:
1109 {
1110 int sockfd = tgetl(vptr);
1111 target_ulong target_addr = tgetl(vptr + n);
1112 target_ulong target_addrlen = tgetl(vptr + 2 * n);
1113 ret = do_accept(sockfd, target_addr, target_addrlen);
1114 }
1115 break;
1116 case SOCKOP_getsockname:
1117 {
1118 int sockfd = tgetl(vptr);
1119 target_ulong target_addr = tgetl(vptr + n);
1120 target_ulong target_addrlen = tgetl(vptr + 2 * n);
1121 ret = do_getsockname(sockfd, target_addr, target_addrlen);
1122 }
1123 break;
1124 case SOCKOP_getpeername:
1125 {
1126 int sockfd = tgetl(vptr);
1127 target_ulong target_addr = tgetl(vptr + n);
1128 target_ulong target_addrlen = tgetl(vptr + 2 * n);
1129 ret = do_getpeername(sockfd, target_addr, target_addrlen);
1130 }
1131 break;
1132 case SOCKOP_socketpair:
1133 {
1134 int domain = tgetl(vptr);
1135 int type = tgetl(vptr + n);
1136 int protocol = tgetl(vptr + 2 * n);
1137 target_ulong tab = tgetl(vptr + 3 * n);
1138 ret = do_socketpair(domain, type, protocol, tab);
1139 }
1140 break;
1141 case SOCKOP_send:
1142 {
1143 int sockfd = tgetl(vptr);
1144 target_ulong msg = tgetl(vptr + n);
1145 size_t len = tgetl(vptr + 2 * n);
1146 int flags = tgetl(vptr + 3 * n);
1147 ret = do_sendto(sockfd, msg, len, flags, 0, 0);
1148 }
1149 break;
1150 case SOCKOP_recv:
1151 {
1152 int sockfd = tgetl(vptr);
1153 target_ulong msg = tgetl(vptr + n);
1154 size_t len = tgetl(vptr + 2 * n);
1155 int flags = tgetl(vptr + 3 * n);
1156 ret = do_recvfrom(sockfd, msg, len, flags, 0, 0);
1157 }
1158 break;
1159 case SOCKOP_sendto:
1160 {
1161 int sockfd = tgetl(vptr);
1162 target_ulong msg = tgetl(vptr + n);
1163 size_t len = tgetl(vptr + 2 * n);
1164 int flags = tgetl(vptr + 3 * n);
1165 target_ulong addr = tgetl(vptr + 4 * n);
1166 socklen_t addrlen = tgetl(vptr + 5 * n);
1167 ret = do_sendto(sockfd, msg, len, flags, addr, addrlen);
1168 }
1169 break;
1170 case SOCKOP_recvfrom:
1171 {
1172 int sockfd = tgetl(vptr);
1173 target_ulong msg = tgetl(vptr + n);
1174 size_t len = tgetl(vptr + 2 * n);
1175 int flags = tgetl(vptr + 3 * n);
1176 target_ulong addr = tgetl(vptr + 4 * n);
1177 target_ulong addrlen = tgetl(vptr + 5 * n);
1178 ret = do_recvfrom(sockfd, msg, len, flags, addr, addrlen);
1179 }
1180 break;
1181 case SOCKOP_shutdown:
1182 {
1183 int sockfd = tgetl(vptr);
1184 int how = tgetl(vptr + n);
1185
1186 ret = get_errno(shutdown(sockfd, how));
1187 }
1188 break;
1189 case SOCKOP_sendmsg:
1190 case SOCKOP_recvmsg:
1191 {
1192 int fd;
1193 target_ulong target_msg;
1194 int flags;
1195
1196 fd = tgetl(vptr);
1197 target_msg = tgetl(vptr + n);
1198 flags = tgetl(vptr + 2 * n);
1199
1200 ret = do_sendrecvmsg(fd, target_msg, flags,
1201 (num == SOCKOP_sendmsg));
1202 }
1203 break;
1204 case SOCKOP_setsockopt:
1205 {
1206 int sockfd = tgetl(vptr);
1207 int level = tgetl(vptr + n);
1208 int optname = tgetl(vptr + 2 * n);
1209 target_ulong optval = tgetl(vptr + 3 * n);
1210 socklen_t optlen = tgetl(vptr + 4 * n);
1211
1212 ret = do_setsockopt(sockfd, level, optname, optval, optlen);
1213 }
1214 break;
1215 case SOCKOP_getsockopt:
1216 {
1217 int sockfd = tgetl(vptr);
1218 int level = tgetl(vptr + n);
1219 int optname = tgetl(vptr + 2 * n);
1220 target_ulong optval = tgetl(vptr + 3 * n);
1221 target_ulong poptlen = tgetl(vptr + 4 * n);
1222
1223 ret = do_getsockopt(sockfd, level, optname, optval, poptlen);
1224 }
1225 break;
1226 default:
1227 gemu_log("Unsupported socketcall: %d\n", num);
1228 ret = -ENOSYS;
1229 break;
1230 }
1231 return ret;
1232 }
1233
1234 #define N_SHM_REGIONS 32
1235
1236 static struct shm_region {
1237 uint32_t start;
1238 uint32_t size;
1239 } shm_regions[N_SHM_REGIONS];
1240
1241 struct target_ipc_perm
1242 {
1243 target_long __key;
1244 target_ulong uid;
1245 target_ulong gid;
1246 target_ulong cuid;
1247 target_ulong cgid;
1248 unsigned short int mode;
1249 unsigned short int __pad1;
1250 unsigned short int __seq;
1251 unsigned short int __pad2;
1252 target_ulong __unused1;
1253 target_ulong __unused2;
1254 };
1255
1256 struct target_semid_ds
1257 {
1258 struct target_ipc_perm sem_perm;
1259 target_ulong sem_otime;
1260 target_ulong __unused1;
1261 target_ulong sem_ctime;
1262 target_ulong __unused2;
1263 target_ulong sem_nsems;
1264 target_ulong __unused3;
1265 target_ulong __unused4;
1266 };
1267
1268 static inline void target_to_host_ipc_perm(struct ipc_perm *host_ip,
1269 target_ulong target_addr)
1270 {
1271 struct target_ipc_perm *target_ip;
1272 struct target_semid_ds *target_sd;
1273
1274 lock_user_struct(target_sd, target_addr, 1);
1275 target_ip=&(target_sd->sem_perm);
1276 host_ip->__key = tswapl(target_ip->__key);
1277 host_ip->uid = tswapl(target_ip->uid);
1278 host_ip->gid = tswapl(target_ip->gid);
1279 host_ip->cuid = tswapl(target_ip->cuid);
1280 host_ip->cgid = tswapl(target_ip->cgid);
1281 host_ip->mode = tswapl(target_ip->mode);
1282 unlock_user_struct(target_sd, target_addr, 0);
1283 }
1284
1285 static inline void host_to_target_ipc_perm(target_ulong target_addr,
1286 struct ipc_perm *host_ip)
1287 {
1288 struct target_ipc_perm *target_ip;
1289 struct target_semid_ds *target_sd;
1290
1291 lock_user_struct(target_sd, target_addr, 0);
1292 target_ip = &(target_sd->sem_perm);
1293 target_ip->__key = tswapl(host_ip->__key);
1294 target_ip->uid = tswapl(host_ip->uid);
1295 target_ip->gid = tswapl(host_ip->gid);
1296 target_ip->cuid = tswapl(host_ip->cuid);
1297 target_ip->cgid = tswapl(host_ip->cgid);
1298 target_ip->mode = tswapl(host_ip->mode);
1299 unlock_user_struct(target_sd, target_addr, 1);
1300 }
1301
1302 static inline void target_to_host_semid_ds(struct semid_ds *host_sd,
1303 target_ulong target_addr)
1304 {
1305 struct target_semid_ds *target_sd;
1306
1307 lock_user_struct(target_sd, target_addr, 1);
1308 target_to_host_ipc_perm(&(host_sd->sem_perm),target_addr);
1309 host_sd->sem_nsems = tswapl(target_sd->sem_nsems);
1310 host_sd->sem_otime = tswapl(target_sd->sem_otime);
1311 host_sd->sem_ctime = tswapl(target_sd->sem_ctime);
1312 unlock_user_struct(target_sd, target_addr, 0);
1313 }
1314
1315 static inline void host_to_target_semid_ds(target_ulong target_addr,
1316 struct semid_ds *host_sd)
1317 {
1318 struct target_semid_ds *target_sd;
1319
1320 lock_user_struct(target_sd, target_addr, 0);
1321 host_to_target_ipc_perm(target_addr,&(host_sd->sem_perm));
1322 target_sd->sem_nsems = tswapl(host_sd->sem_nsems);
1323 target_sd->sem_otime = tswapl(host_sd->sem_otime);
1324 target_sd->sem_ctime = tswapl(host_sd->sem_ctime);
1325 unlock_user_struct(target_sd, target_addr, 1);
1326 }
1327
1328 union semun {
1329 int val;
1330 struct semid_ds *buf;
1331 unsigned short *array;
1332 };
1333
1334 union target_semun {
1335 int val;
1336 target_long buf;
1337 unsigned short int *array;
1338 };
1339
1340 static inline void target_to_host_semun(unsigned long cmd,
1341 union semun *host_su,
1342 target_ulong target_addr,
1343 struct semid_ds *ds)
1344 {
1345 union target_semun *target_su;
1346
1347 switch( cmd ) {
1348 case IPC_STAT:
1349 case IPC_SET:
1350 lock_user_struct(target_su, target_addr, 1);
1351 target_to_host_semid_ds(ds,target_su->buf);
1352 host_su->buf = ds;
1353 unlock_user_struct(target_su, target_addr, 0);
1354 break;
1355 case GETVAL:
1356 case SETVAL:
1357 lock_user_struct(target_su, target_addr, 1);
1358 host_su->val = tswapl(target_su->val);
1359 unlock_user_struct(target_su, target_addr, 0);
1360 break;
1361 case GETALL:
1362 case SETALL:
1363 lock_user_struct(target_su, target_addr, 1);
1364 *host_su->array = tswap16(*target_su->array);
1365 unlock_user_struct(target_su, target_addr, 0);
1366 break;
1367 default:
1368 gemu_log("semun operation not fully supported: %d\n", (int)cmd);
1369 }
1370 }
1371
1372 static inline void host_to_target_semun(unsigned long cmd,
1373 target_ulong target_addr,
1374 union semun *host_su,
1375 struct semid_ds *ds)
1376 {
1377 union target_semun *target_su;
1378
1379 switch( cmd ) {
1380 case IPC_STAT:
1381 case IPC_SET:
1382 lock_user_struct(target_su, target_addr, 0);
1383 host_to_target_semid_ds(target_su->buf,ds);
1384 unlock_user_struct(target_su, target_addr, 1);
1385 break;
1386 case GETVAL:
1387 case SETVAL:
1388 lock_user_struct(target_su, target_addr, 0);
1389 target_su->val = tswapl(host_su->val);
1390 unlock_user_struct(target_su, target_addr, 1);
1391 break;
1392 case GETALL:
1393 case SETALL:
1394 lock_user_struct(target_su, target_addr, 0);
1395 *target_su->array = tswap16(*host_su->array);
1396 unlock_user_struct(target_su, target_addr, 1);
1397 break;
1398 default:
1399 gemu_log("semun operation not fully supported: %d\n", (int)cmd);
1400 }
1401 }
1402
1403 static inline long do_semctl(long first, long second, long third, long ptr)
1404 {
1405 union semun arg;
1406 struct semid_ds dsarg;
1407 int cmd = third&0xff;
1408 long ret = 0;
1409
1410 switch( cmd ) {
1411 case GETVAL:
1412 target_to_host_semun(cmd,&arg,ptr,&dsarg);
1413 ret = get_errno(semctl(first, second, cmd, arg));
1414 host_to_target_semun(cmd,ptr,&arg,&dsarg);
1415 break;
1416 case SETVAL:
1417 target_to_host_semun(cmd,&arg,ptr,&dsarg);
1418 ret = get_errno(semctl(first, second, cmd, arg));
1419 host_to_target_semun(cmd,ptr,&arg,&dsarg);
1420 break;
1421 case GETALL:
1422 target_to_host_semun(cmd,&arg,ptr,&dsarg);
1423 ret = get_errno(semctl(first, second, cmd, arg));
1424 host_to_target_semun(cmd,ptr,&arg,&dsarg);
1425 break;
1426 case SETALL:
1427 target_to_host_semun(cmd,&arg,ptr,&dsarg);
1428 ret = get_errno(semctl(first, second, cmd, arg));
1429 host_to_target_semun(cmd,ptr,&arg,&dsarg);
1430 break;
1431 case IPC_STAT:
1432 target_to_host_semun(cmd,&arg,ptr,&dsarg);
1433 ret = get_errno(semctl(first, second, cmd, arg));
1434 host_to_target_semun(cmd,ptr,&arg,&dsarg);
1435 break;
1436 case IPC_SET:
1437 target_to_host_semun(cmd,&arg,ptr,&dsarg);
1438 ret = get_errno(semctl(first, second, cmd, arg));
1439 host_to_target_semun(cmd,ptr,&arg,&dsarg);
1440 break;
1441 default:
1442 ret = get_errno(semctl(first, second, cmd, arg));
1443 }
1444
1445 return ret;
1446 }
1447
1448 struct target_msqid_ds
1449 {
1450 struct target_ipc_perm msg_perm;
1451 target_ulong msg_stime;
1452 target_ulong __unused1;
1453 target_ulong msg_rtime;
1454 target_ulong __unused2;
1455 target_ulong msg_ctime;
1456 target_ulong __unused3;
1457 target_ulong __msg_cbytes;
1458 target_ulong msg_qnum;
1459 target_ulong msg_qbytes;
1460 target_ulong msg_lspid;
1461 target_ulong msg_lrpid;
1462 target_ulong __unused4;
1463 target_ulong __unused5;
1464 };
1465
1466 static inline void target_to_host_msqid_ds(struct msqid_ds *host_md,
1467 target_ulong target_addr)
1468 {
1469 struct target_msqid_ds *target_md;
1470
1471 lock_user_struct(target_md, target_addr, 1);
1472 target_to_host_ipc_perm(&(host_md->msg_perm),target_addr);
1473 host_md->msg_stime = tswapl(target_md->msg_stime);
1474 host_md->msg_rtime = tswapl(target_md->msg_rtime);
1475 host_md->msg_ctime = tswapl(target_md->msg_ctime);
1476 host_md->__msg_cbytes = tswapl(target_md->__msg_cbytes);
1477 host_md->msg_qnum = tswapl(target_md->msg_qnum);
1478 host_md->msg_qbytes = tswapl(target_md->msg_qbytes);
1479 host_md->msg_lspid = tswapl(target_md->msg_lspid);
1480 host_md->msg_lrpid = tswapl(target_md->msg_lrpid);
1481 unlock_user_struct(target_md, target_addr, 0);
1482 }
1483
1484 static inline void host_to_target_msqid_ds(target_ulong target_addr,
1485 struct msqid_ds *host_md)
1486 {
1487 struct target_msqid_ds *target_md;
1488
1489 lock_user_struct(target_md, target_addr, 0);
1490 host_to_target_ipc_perm(target_addr,&(host_md->msg_perm));
1491 target_md->msg_stime = tswapl(host_md->msg_stime);
1492 target_md->msg_rtime = tswapl(host_md->msg_rtime);
1493 target_md->msg_ctime = tswapl(host_md->msg_ctime);
1494 target_md->__msg_cbytes = tswapl(host_md->__msg_cbytes);
1495 target_md->msg_qnum = tswapl(host_md->msg_qnum);
1496 target_md->msg_qbytes = tswapl(host_md->msg_qbytes);
1497 target_md->msg_lspid = tswapl(host_md->msg_lspid);
1498 target_md->msg_lrpid = tswapl(host_md->msg_lrpid);
1499 unlock_user_struct(target_md, target_addr, 1);
1500 }
1501
1502 static inline long do_msgctl(long first, long second, long ptr)
1503 {
1504 struct msqid_ds dsarg;
1505 int cmd = second&0xff;
1506 long ret = 0;
1507 switch( cmd ) {
1508 case IPC_STAT:
1509 case IPC_SET:
1510 target_to_host_msqid_ds(&dsarg,ptr);
1511 ret = get_errno(msgctl(first, cmd, &dsarg));
1512 host_to_target_msqid_ds(ptr,&dsarg);
1513 default:
1514 ret = get_errno(msgctl(first, cmd, &dsarg));
1515 }
1516 return ret;
1517 }
1518
1519 struct target_msgbuf {
1520 target_ulong mtype;
1521 char mtext[1];
1522 };
1523
1524 static inline long do_msgsnd(long msqid, long msgp, long msgsz, long msgflg)
1525 {
1526 struct target_msgbuf *target_mb;
1527 struct msgbuf *host_mb;
1528 long ret = 0;
1529
1530 lock_user_struct(target_mb,msgp,0);
1531 host_mb = malloc(msgsz+sizeof(long));
1532 host_mb->mtype = tswapl(target_mb->mtype);
1533 memcpy(host_mb->mtext,target_mb->mtext,msgsz);
1534 ret = get_errno(msgsnd(msqid, host_mb, msgsz, msgflg));
1535 free(host_mb);
1536 unlock_user_struct(target_mb, msgp, 0);
1537
1538 return ret;
1539 }
1540
1541 static inline long do_msgrcv(long msqid, long msgp, long msgsz, long msgtype, long msgflg)
1542 {
1543 struct target_msgbuf *target_mb;
1544 struct msgbuf *host_mb;
1545 long ret = 0;
1546
1547 lock_user_struct(target_mb, msgp, 0);
1548 host_mb = malloc(msgsz+sizeof(long));
1549 ret = get_errno(msgrcv(msqid, host_mb, msgsz, 1, msgflg));
1550 if (ret > 0)
1551 memcpy(target_mb->mtext, host_mb->mtext, ret);
1552 target_mb->mtype = tswapl(host_mb->mtype);
1553 free(host_mb);
1554 unlock_user_struct(target_mb, msgp, 0);
1555
1556 return ret;
1557 }
1558
1559 /* ??? This only works with linear mappings. */
1560 static long do_ipc(long call, long first, long second, long third,
1561 long ptr, long fifth)
1562 {
1563 int version;
1564 long ret = 0;
1565 unsigned long raddr;
1566 struct shmid_ds shm_info;
1567 int i;
1568
1569 version = call >> 16;
1570 call &= 0xffff;
1571
1572 switch (call) {
1573 case IPCOP_semop:
1574 ret = get_errno(semop(first,(struct sembuf *) ptr, second));
1575 break;
1576
1577 case IPCOP_semget:
1578 ret = get_errno(semget(first, second, third));
1579 break;
1580
1581 case IPCOP_semctl:
1582 ret = do_semctl(first, second, third, ptr);
1583 break;
1584
1585 case IPCOP_semtimedop:
1586 gemu_log("Unsupported ipc call: %ld (version %d)\n", call, version);
1587 ret = -ENOSYS;
1588 break;
1589
1590 case IPCOP_msgget:
1591 ret = get_errno(msgget(first, second));
1592 break;
1593
1594 case IPCOP_msgsnd:
1595 ret = do_msgsnd(first, ptr, second, third);
1596 break;
1597
1598 case IPCOP_msgctl:
1599 ret = do_msgctl(first, second, ptr);
1600 break;
1601
1602 case IPCOP_msgrcv:
1603 {
1604 struct ipc_kludge
1605 {
1606 void *__unbounded msgp;
1607 long int msgtyp;
1608 };
1609
1610 struct ipc_kludge *foo = (struct ipc_kludge *) ptr;
1611 struct msgbuf *msgp = (struct msgbuf *) foo->msgp;
1612
1613 ret = do_msgrcv(first, (long)msgp, second, 0, third);
1614
1615 }
1616 break;
1617
1618 case IPCOP_shmat:
1619 /* SHM_* flags are the same on all linux platforms */
1620 ret = get_errno((long) shmat(first, (void *) ptr, second));
1621 if (is_error(ret))
1622 break;
1623 raddr = ret;
1624 /* find out the length of the shared memory segment */
1625
1626 ret = get_errno(shmctl(first, IPC_STAT, &shm_info));
1627 if (is_error(ret)) {
1628 /* can't get length, bail out */
1629 shmdt((void *) raddr);
1630 break;
1631 }
1632 page_set_flags(raddr, raddr + shm_info.shm_segsz,
1633 PAGE_VALID | PAGE_READ |
1634 ((second & SHM_RDONLY)? 0: PAGE_WRITE));
1635 for (i = 0; i < N_SHM_REGIONS; ++i) {
1636 if (shm_regions[i].start == 0) {
1637 shm_regions[i].start = raddr;
1638 shm_regions[i].size = shm_info.shm_segsz;
1639 break;
1640 }
1641 }
1642 if (put_user(raddr, (uint32_t *)third))
1643 return -EFAULT;
1644 ret = 0;
1645 break;
1646 case IPCOP_shmdt:
1647 for (i = 0; i < N_SHM_REGIONS; ++i) {
1648 if (shm_regions[i].start == ptr) {
1649 shm_regions[i].start = 0;
1650 page_set_flags(ptr, shm_regions[i].size, 0);
1651 break;
1652 }
1653 }
1654 ret = get_errno(shmdt((void *) ptr));
1655 break;
1656
1657 case IPCOP_shmget:
1658 /* IPC_* flag values are the same on all linux platforms */
1659 ret = get_errno(shmget(first, second, third));
1660 break;
1661
1662 /* IPC_* and SHM_* command values are the same on all linux platforms */
1663 case IPCOP_shmctl:
1664 switch(second) {
1665 case IPC_RMID:
1666 case SHM_LOCK:
1667 case SHM_UNLOCK:
1668 ret = get_errno(shmctl(first, second, NULL));
1669 break;
1670 default:
1671 goto unimplemented;
1672 }
1673 break;
1674 default:
1675 unimplemented:
1676 gemu_log("Unsupported ipc call: %ld (version %d)\n", call, version);
1677 ret = -ENOSYS;
1678 break;
1679 }
1680 return ret;
1681 }
1682
1683 /* kernel structure types definitions */
1684 #define IFNAMSIZ 16
1685
1686 #define STRUCT(name, list...) STRUCT_ ## name,
1687 #define STRUCT_SPECIAL(name) STRUCT_ ## name,
1688 enum {
1689 #include "syscall_types.h"
1690 };
1691 #undef STRUCT
1692 #undef STRUCT_SPECIAL
1693
1694 #define STRUCT(name, list...) const argtype struct_ ## name ## _def[] = { list, TYPE_NULL };
1695 #define STRUCT_SPECIAL(name)
1696 #include "syscall_types.h"
1697 #undef STRUCT
1698 #undef STRUCT_SPECIAL
1699
1700 typedef struct IOCTLEntry {
1701 unsigned int target_cmd;
1702 unsigned int host_cmd;
1703 const char *name;
1704 int access;
1705 const argtype arg_type[5];
1706 } IOCTLEntry;
1707
1708 #define IOC_R 0x0001
1709 #define IOC_W 0x0002
1710 #define IOC_RW (IOC_R | IOC_W)
1711
1712 #define MAX_STRUCT_SIZE 4096
1713
1714 IOCTLEntry ioctl_entries[] = {
1715 #define IOCTL(cmd, access, types...) \
1716 { TARGET_ ## cmd, cmd, #cmd, access, { types } },
1717 #include "ioctls.h"
1718 { 0, 0, },
1719 };
1720
1721 /* ??? Implement proper locking for ioctls. */
1722 static long do_ioctl(long fd, long cmd, long arg)
1723 {
1724 const IOCTLEntry *ie;
1725 const argtype *arg_type;
1726 long ret;
1727 uint8_t buf_temp[MAX_STRUCT_SIZE];
1728 int target_size;
1729 void *argptr;
1730
1731 ie = ioctl_entries;
1732 for(;;) {
1733 if (ie->target_cmd == 0) {
1734 gemu_log("Unsupported ioctl: cmd=0x%04lx\n", cmd);
1735 return -ENOSYS;
1736 }
1737 if (ie->target_cmd == cmd)
1738 break;
1739 ie++;
1740 }
1741 arg_type = ie->arg_type;
1742 #if defined(DEBUG)
1743 gemu_log("ioctl: cmd=0x%04lx (%s)\n", cmd, ie->name);
1744 #endif
1745 switch(arg_type[0]) {
1746 case TYPE_NULL:
1747 /* no argument */
1748 ret = get_errno(ioctl(fd, ie->host_cmd));
1749 break;
1750 case TYPE_PTRVOID:
1751 case TYPE_INT:
1752 /* int argment */
1753 ret = get_errno(ioctl(fd, ie->host_cmd, arg));
1754 break;
1755 case TYPE_PTR:
1756 arg_type++;
1757 target_size = thunk_type_size(arg_type, 0);
1758 switch(ie->access) {
1759 case IOC_R:
1760 ret = get_errno(ioctl(fd, ie->host_cmd, buf_temp));
1761 if (!is_error(ret)) {
1762 argptr = lock_user(arg, target_size, 0);
1763 thunk_convert(argptr, buf_temp, arg_type, THUNK_TARGET);
1764 unlock_user(argptr, arg, target_size);
1765 }
1766 break;
1767 case IOC_W:
1768 argptr = lock_user(arg, target_size, 1);
1769 thunk_convert(buf_temp, argptr, arg_type, THUNK_HOST);
1770 unlock_user(argptr, arg, 0);
1771 ret = get_errno(ioctl(fd, ie->host_cmd, buf_temp));
1772 break;
1773 default:
1774 case IOC_RW:
1775 argptr = lock_user(arg, target_size, 1);
1776 thunk_convert(buf_temp, argptr, arg_type, THUNK_HOST);
1777 unlock_user(argptr, arg, 0);
1778 ret = get_errno(ioctl(fd, ie->host_cmd, buf_temp));
1779 if (!is_error(ret)) {
1780 argptr = lock_user(arg, target_size, 0);
1781 thunk_convert(argptr, buf_temp, arg_type, THUNK_TARGET);
1782 unlock_user(argptr, arg, target_size);
1783 }
1784 break;
1785 }
1786 break;
1787 default:
1788 gemu_log("Unsupported ioctl type: cmd=0x%04lx type=%d\n", cmd, arg_type[0]);
1789 ret = -ENOSYS;
1790 break;
1791 }
1792 return ret;
1793 }
1794
1795 bitmask_transtbl iflag_tbl[] = {
1796 { TARGET_IGNBRK, TARGET_IGNBRK, IGNBRK, IGNBRK },
1797 { TARGET_BRKINT, TARGET_BRKINT, BRKINT, BRKINT },
1798 { TARGET_IGNPAR, TARGET_IGNPAR, IGNPAR, IGNPAR },
1799 { TARGET_PARMRK, TARGET_PARMRK, PARMRK, PARMRK },
1800 { TARGET_INPCK, TARGET_INPCK, INPCK, INPCK },
1801 { TARGET_ISTRIP, TARGET_ISTRIP, ISTRIP, ISTRIP },
1802 { TARGET_INLCR, TARGET_INLCR, INLCR, INLCR },
1803 { TARGET_IGNCR, TARGET_IGNCR, IGNCR, IGNCR },
1804 { TARGET_ICRNL, TARGET_ICRNL, ICRNL, ICRNL },
1805 { TARGET_IUCLC, TARGET_IUCLC, IUCLC, IUCLC },
1806 { TARGET_IXON, TARGET_IXON, IXON, IXON },
1807 { TARGET_IXANY, TARGET_IXANY, IXANY, IXANY },
1808 { TARGET_IXOFF, TARGET_IXOFF, IXOFF, IXOFF },
1809 { TARGET_IMAXBEL, TARGET_IMAXBEL, IMAXBEL, IMAXBEL },
1810 { 0, 0, 0, 0 }
1811 };
1812
1813 bitmask_transtbl oflag_tbl[] = {
1814 { TARGET_OPOST, TARGET_OPOST, OPOST, OPOST },
1815 { TARGET_OLCUC, TARGET_OLCUC, OLCUC, OLCUC },
1816 { TARGET_ONLCR, TARGET_ONLCR, ONLCR, ONLCR },
1817 { TARGET_OCRNL, TARGET_OCRNL, OCRNL, OCRNL },
1818 { TARGET_ONOCR, TARGET_ONOCR, ONOCR, ONOCR },
1819 { TARGET_ONLRET, TARGET_ONLRET, ONLRET, ONLRET },
1820 { TARGET_OFILL, TARGET_OFILL, OFILL, OFILL },
1821 { TARGET_OFDEL, TARGET_OFDEL, OFDEL, OFDEL },
1822 { TARGET_NLDLY, TARGET_NL0, NLDLY, NL0 },
1823 { TARGET_NLDLY, TARGET_NL1, NLDLY, NL1 },
1824 { TARGET_CRDLY, TARGET_CR0, CRDLY, CR0 },
1825 { TARGET_CRDLY, TARGET_CR1, CRDLY, CR1 },
1826 { TARGET_CRDLY, TARGET_CR2, CRDLY, CR2 },
1827 { TARGET_CRDLY, TARGET_CR3, CRDLY, CR3 },
1828 { TARGET_TABDLY, TARGET_TAB0, TABDLY, TAB0 },
1829 { TARGET_TABDLY, TARGET_TAB1, TABDLY, TAB1 },
1830 { TARGET_TABDLY, TARGET_TAB2, TABDLY, TAB2 },
1831 { TARGET_TABDLY, TARGET_TAB3, TABDLY, TAB3 },
1832 { TARGET_BSDLY, TARGET_BS0, BSDLY, BS0 },
1833 { TARGET_BSDLY, TARGET_BS1, BSDLY, BS1 },
1834 { TARGET_VTDLY, TARGET_VT0, VTDLY, VT0 },
1835 { TARGET_VTDLY, TARGET_VT1, VTDLY, VT1 },
1836 { TARGET_FFDLY, TARGET_FF0, FFDLY, FF0 },
1837 { TARGET_FFDLY, TARGET_FF1, FFDLY, FF1 },
1838 { 0, 0, 0, 0 }
1839 };
1840
1841 bitmask_transtbl cflag_tbl[] = {
1842 { TARGET_CBAUD, TARGET_B0, CBAUD, B0 },
1843 { TARGET_CBAUD, TARGET_B50, CBAUD, B50 },
1844 { TARGET_CBAUD, TARGET_B75, CBAUD, B75 },
1845 { TARGET_CBAUD, TARGET_B110, CBAUD, B110 },
1846 { TARGET_CBAUD, TARGET_B134, CBAUD, B134 },
1847 { TARGET_CBAUD, TARGET_B150, CBAUD, B150 },
1848 { TARGET_CBAUD, TARGET_B200, CBAUD, B200 },
1849 { TARGET_CBAUD, TARGET_B300, CBAUD, B300 },
1850 { TARGET_CBAUD, TARGET_B600, CBAUD, B600 },
1851 { TARGET_CBAUD, TARGET_B1200, CBAUD, B1200 },
1852 { TARGET_CBAUD, TARGET_B1800, CBAUD, B1800 },
1853 { TARGET_CBAUD, TARGET_B2400, CBAUD, B2400 },
1854 { TARGET_CBAUD, TARGET_B4800, CBAUD, B4800 },
1855 { TARGET_CBAUD, TARGET_B9600, CBAUD, B9600 },
1856 { TARGET_CBAUD, TARGET_B19200, CBAUD, B19200 },
1857 { TARGET_CBAUD, TARGET_B38400, CBAUD, B38400 },
1858 { TARGET_CBAUD, TARGET_B57600, CBAUD, B57600 },
1859 { TARGET_CBAUD, TARGET_B115200, CBAUD, B115200 },
1860 { TARGET_CBAUD, TARGET_B230400, CBAUD, B230400 },
1861 { TARGET_CBAUD, TARGET_B460800, CBAUD, B460800 },
1862 { TARGET_CSIZE, TARGET_CS5, CSIZE, CS5 },
1863 { TARGET_CSIZE, TARGET_CS6, CSIZE, CS6 },
1864 { TARGET_CSIZE, TARGET_CS7, CSIZE, CS7 },
1865 { TARGET_CSIZE, TARGET_CS8, CSIZE, CS8 },
1866 { TARGET_CSTOPB, TARGET_CSTOPB, CSTOPB, CSTOPB },
1867 { TARGET_CREAD, TARGET_CREAD, CREAD, CREAD },
1868 { TARGET_PARENB, TARGET_PARENB, PARENB, PARENB },
1869 { TARGET_PARODD, TARGET_PARODD, PARODD, PARODD },
1870 { TARGET_HUPCL, TARGET_HUPCL, HUPCL, HUPCL },
1871 { TARGET_CLOCAL, TARGET_CLOCAL, CLOCAL, CLOCAL },
1872 { TARGET_CRTSCTS, TARGET_CRTSCTS, CRTSCTS, CRTSCTS },
1873 { 0, 0, 0, 0 }
1874 };
1875
1876 bitmask_transtbl lflag_tbl[] = {
1877 { TARGET_ISIG, TARGET_ISIG, ISIG, ISIG },
1878 { TARGET_ICANON, TARGET_ICANON, ICANON, ICANON },
1879 { TARGET_XCASE, TARGET_XCASE, XCASE, XCASE },
1880 { TARGET_ECHO, TARGET_ECHO, ECHO, ECHO },
1881 { TARGET_ECHOE, TARGET_ECHOE, ECHOE, ECHOE },
1882 { TARGET_ECHOK, TARGET_ECHOK, ECHOK, ECHOK },
1883 { TARGET_ECHONL, TARGET_ECHONL, ECHONL, ECHONL },
1884 { TARGET_NOFLSH, TARGET_NOFLSH, NOFLSH, NOFLSH },
1885 { TARGET_TOSTOP, TARGET_TOSTOP, TOSTOP, TOSTOP },
1886 { TARGET_ECHOCTL, TARGET_ECHOCTL, ECHOCTL, ECHOCTL },
1887 { TARGET_ECHOPRT, TARGET_ECHOPRT, ECHOPRT, ECHOPRT },
1888 { TARGET_ECHOKE, TARGET_ECHOKE, ECHOKE, ECHOKE },
1889 { TARGET_FLUSHO, TARGET_FLUSHO, FLUSHO, FLUSHO },
1890 { TARGET_PENDIN, TARGET_PENDIN, PENDIN, PENDIN },
1891 { TARGET_IEXTEN, TARGET_IEXTEN, IEXTEN, IEXTEN },
1892 { 0, 0, 0, 0 }
1893 };
1894
1895 static void target_to_host_termios (void *dst, const void *src)
1896 {
1897 struct host_termios *host = dst;
1898 const struct target_termios *target = src;
1899
1900 host->c_iflag =
1901 target_to_host_bitmask(tswap32(target->c_iflag), iflag_tbl);
1902 host->c_oflag =
1903 target_to_host_bitmask(tswap32(target->c_oflag), oflag_tbl);
1904 host->c_cflag =
1905 target_to_host_bitmask(tswap32(target->c_cflag), cflag_tbl);
1906 host->c_lflag =
1907 target_to_host_bitmask(tswap32(target->c_lflag), lflag_tbl);
1908 host->c_line = target->c_line;
1909
1910 host->c_cc[VINTR] = target->c_cc[TARGET_VINTR];
1911 host->c_cc[VQUIT] = target->c_cc[TARGET_VQUIT];
1912 host->c_cc[VERASE] = target->c_cc[TARGET_VERASE];
1913 host->c_cc[VKILL] = target->c_cc[TARGET_VKILL];
1914 host->c_cc[VEOF] = target->c_cc[TARGET_VEOF];
1915 host->c_cc[VTIME] = target->c_cc[TARGET_VTIME];
1916 host->c_cc[VMIN] = target->c_cc[TARGET_VMIN];
1917 host->c_cc[VSWTC] = target->c_cc[TARGET_VSWTC];
1918 host->c_cc[VSTART] = target->c_cc[TARGET_VSTART];
1919 host->c_cc[VSTOP] = target->c_cc[TARGET_VSTOP];
1920 host->c_cc[VSUSP] = target->c_cc[TARGET_VSUSP];
1921 host->c_cc[VEOL] = target->c_cc[TARGET_VEOL];
1922 host->c_cc[VREPRINT] = target->c_cc[TARGET_VREPRINT];
1923 host->c_cc[VDISCARD] = target->c_cc[TARGET_VDISCARD];
1924 host->c_cc[VWERASE] = target->c_cc[TARGET_VWERASE];
1925 host->c_cc[VLNEXT] = target->c_cc[TARGET_VLNEXT];
1926 host->c_cc[VEOL2] = target->c_cc[TARGET_VEOL2];
1927 }
1928
1929 static void host_to_target_termios (void *dst, const void *src)
1930 {
1931 struct target_termios *target = dst;
1932 const struct host_termios *host = src;
1933
1934 target->c_iflag =
1935 tswap32(host_to_target_bitmask(host->c_iflag, iflag_tbl));
1936 target->c_oflag =
1937 tswap32(host_to_target_bitmask(host->c_oflag, oflag_tbl));
1938 target->c_cflag =
1939 tswap32(host_to_target_bitmask(host->c_cflag, cflag_tbl));
1940 target->c_lflag =
1941 tswap32(host_to_target_bitmask(host->c_lflag, lflag_tbl));
1942 target->c_line = host->c_line;
1943
1944 target->c_cc[TARGET_VINTR] = host->c_cc[VINTR];
1945 target->c_cc[TARGET_VQUIT] = host->c_cc[VQUIT];
1946 target->c_cc[TARGET_VERASE] = host->c_cc[VERASE];
1947 target->c_cc[TARGET_VKILL] = host->c_cc[VKILL];
1948 target->c_cc[TARGET_VEOF] = host->c_cc[VEOF];
1949 target->c_cc[TARGET_VTIME] = host->c_cc[VTIME];
1950 target->c_cc[TARGET_VMIN] = host->c_cc[VMIN];
1951 target->c_cc[TARGET_VSWTC] = host->c_cc[VSWTC];
1952 target->c_cc[TARGET_VSTART] = host->c_cc[VSTART];
1953 target->c_cc[TARGET_VSTOP] = host->c_cc[VSTOP];
1954 target->c_cc[TARGET_VSUSP] = host->c_cc[VSUSP];
1955 target->c_cc[TARGET_VEOL] = host->c_cc[VEOL];
1956 target->c_cc[TARGET_VREPRINT] = host->c_cc[VREPRINT];
1957 target->c_cc[TARGET_VDISCARD] = host->c_cc[VDISCARD];
1958 target->c_cc[TARGET_VWERASE] = host->c_cc[VWERASE];
1959 target->c_cc[TARGET_VLNEXT] = host->c_cc[VLNEXT];
1960 target->c_cc[TARGET_VEOL2] = host->c_cc[VEOL2];
1961 }
1962
1963 StructEntry struct_termios_def = {
1964 .convert = { host_to_target_termios, target_to_host_termios },
1965 .size = { sizeof(struct target_termios), sizeof(struct host_termios) },
1966 .align = { __alignof__(struct target_termios), __alignof__(struct host_termios) },
1967 };
1968
1969 static bitmask_transtbl mmap_flags_tbl[] = {
1970 { TARGET_MAP_SHARED, TARGET_MAP_SHARED, MAP_SHARED, MAP_SHARED },
1971 { TARGET_MAP_PRIVATE, TARGET_MAP_PRIVATE, MAP_PRIVATE, MAP_PRIVATE },
1972 { TARGET_MAP_FIXED, TARGET_MAP_FIXED, MAP_FIXED, MAP_FIXED },
1973 { TARGET_MAP_ANONYMOUS, TARGET_MAP_ANONYMOUS, MAP_ANONYMOUS, MAP_ANONYMOUS },
1974 { TARGET_MAP_GROWSDOWN, TARGET_MAP_GROWSDOWN, MAP_GROWSDOWN, MAP_GROWSDOWN },
1975 { TARGET_MAP_DENYWRITE, TARGET_MAP_DENYWRITE, MAP_DENYWRITE, MAP_DENYWRITE },
1976 { TARGET_MAP_EXECUTABLE, TARGET_MAP_EXECUTABLE, MAP_EXECUTABLE, MAP_EXECUTABLE },
1977 { TARGET_MAP_LOCKED, TARGET_MAP_LOCKED, MAP_LOCKED, MAP_LOCKED },
1978 { 0, 0, 0, 0 }
1979 };
1980
1981 static bitmask_transtbl fcntl_flags_tbl[] = {
1982 { TARGET_O_ACCMODE, TARGET_O_WRONLY, O_ACCMODE, O_WRONLY, },
1983 { TARGET_O_ACCMODE, TARGET_O_RDWR, O_ACCMODE, O_RDWR, },
1984 { TARGET_O_CREAT, TARGET_O_CREAT, O_CREAT, O_CREAT, },
1985 { TARGET_O_EXCL, TARGET_O_EXCL, O_EXCL, O_EXCL, },
1986 { TARGET_O_NOCTTY, TARGET_O_NOCTTY, O_NOCTTY, O_NOCTTY, },
1987 { TARGET_O_TRUNC, TARGET_O_TRUNC, O_TRUNC, O_TRUNC, },
1988 { TARGET_O_APPEND, TARGET_O_APPEND, O_APPEND, O_APPEND, },
1989 { TARGET_O_NONBLOCK, TARGET_O_NONBLOCK, O_NONBLOCK, O_NONBLOCK, },
1990 { TARGET_O_SYNC, TARGET_O_SYNC, O_SYNC, O_SYNC, },
1991 { TARGET_FASYNC, TARGET_FASYNC, FASYNC, FASYNC, },
1992 { TARGET_O_DIRECTORY, TARGET_O_DIRECTORY, O_DIRECTORY, O_DIRECTORY, },
1993 { TARGET_O_NOFOLLOW, TARGET_O_NOFOLLOW, O_NOFOLLOW, O_NOFOLLOW, },
1994 { TARGET_O_LARGEFILE, TARGET_O_LARGEFILE, O_LARGEFILE, O_LARGEFILE, },
1995 #if defined(O_DIRECT)
1996 { TARGET_O_DIRECT, TARGET_O_DIRECT, O_DIRECT, O_DIRECT, },
1997 #endif
1998 { 0, 0, 0, 0 }
1999 };
2000
2001 #if defined(TARGET_I386)
2002
2003 /* NOTE: there is really one LDT for all the threads */
2004 uint8_t *ldt_table;
2005
2006 static int read_ldt(target_ulong ptr, unsigned long bytecount)
2007 {
2008 int size;
2009 void *p;
2010
2011 if (!ldt_table)
2012 return 0;
2013 size = TARGET_LDT_ENTRIES * TARGET_LDT_ENTRY_SIZE;
2014 if (size > bytecount)
2015 size = bytecount;
2016 p = lock_user(ptr, size, 0);
2017 /* ??? Shoudl this by byteswapped? */
2018 memcpy(p, ldt_table, size);
2019 unlock_user(p, ptr, size);
2020 return size;
2021 }
2022
2023 /* XXX: add locking support */
2024 static int write_ldt(CPUX86State *env,
2025 target_ulong ptr, unsigned long bytecount, int oldmode)
2026 {
2027 struct target_modify_ldt_ldt_s ldt_info;
2028 struct target_modify_ldt_ldt_s *target_ldt_info;
2029 int seg_32bit, contents, read_exec_only, limit_in_pages;
2030 int seg_not_present, useable;
2031 uint32_t *lp, entry_1, entry_2;
2032
2033 if (bytecount != sizeof(ldt_info))
2034 return -EINVAL;
2035 lock_user_struct(target_ldt_info, ptr, 1);
2036 ldt_info.entry_number = tswap32(target_ldt_info->entry_number);
2037 ldt_info.base_addr = tswapl(target_ldt_info->base_addr);
2038 ldt_info.limit = tswap32(target_ldt_info->limit);
2039 ldt_info.flags = tswap32(target_ldt_info->flags);
2040 unlock_user_struct(target_ldt_info, ptr, 0);
2041
2042 if (ldt_info.entry_number >= TARGET_LDT_ENTRIES)
2043 return -EINVAL;
2044 seg_32bit = ldt_info.flags & 1;
2045 contents = (ldt_info.flags >> 1) & 3;
2046 read_exec_only = (ldt_info.flags >> 3) & 1;
2047 limit_in_pages = (ldt_info.flags >> 4) & 1;
2048 seg_not_present = (ldt_info.flags >> 5) & 1;
2049 useable = (ldt_info.flags >> 6) & 1;
2050
2051 if (contents == 3) {
2052 if (oldmode)
2053 return -EINVAL;
2054 if (seg_not_present == 0)
2055 return -EINVAL;
2056 }
2057 /* allocate the LDT */
2058 if (!ldt_table) {
2059 ldt_table = malloc(TARGET_LDT_ENTRIES * TARGET_LDT_ENTRY_SIZE);
2060 if (!ldt_table)
2061 return -ENOMEM;
2062 memset(ldt_table, 0, TARGET_LDT_ENTRIES * TARGET_LDT_ENTRY_SIZE);
2063 env->ldt.base = h2g(ldt_table);
2064 env->ldt.limit = 0xffff;
2065 }
2066
2067 /* NOTE: same code as Linux kernel */
2068 /* Allow LDTs to be cleared by the user. */
2069 if (ldt_info.base_addr == 0 && ldt_info.limit == 0) {
2070 if (oldmode ||
2071 (contents == 0 &&
2072 read_exec_only == 1 &&
2073 seg_32bit == 0 &&
2074 limit_in_pages == 0 &&
2075 seg_not_present == 1 &&
2076 useable == 0 )) {
2077 entry_1 = 0;
2078 entry_2 = 0;
2079 goto install;
2080 }
2081 }
2082
2083 entry_1 = ((ldt_info.base_addr & 0x0000ffff) << 16) |
2084 (ldt_info.limit & 0x0ffff);
2085 entry_2 = (ldt_info.base_addr & 0xff000000) |
2086 ((ldt_info.base_addr & 0x00ff0000) >> 16) |
2087 (ldt_info.limit & 0xf0000) |
2088 ((read_exec_only ^ 1) << 9) |
2089 (contents << 10) |
2090 ((seg_not_present ^ 1) << 15) |
2091 (seg_32bit << 22) |
2092 (limit_in_pages << 23) |
2093 0x7000;
2094 if (!oldmode)
2095 entry_2 |= (useable << 20);
2096
2097 /* Install the new entry ... */
2098 install:
2099 lp = (uint32_t *)(ldt_table + (ldt_info.entry_number << 3));
2100 lp[0] = tswap32(entry_1);
2101 lp[1] = tswap32(entry_2);
2102 return 0;
2103 }
2104
2105 /* specific and weird i386 syscalls */
2106 int do_modify_ldt(CPUX86State *env, int func, target_ulong ptr, unsigned long bytecount)
2107 {
2108 int ret = -ENOSYS;
2109
2110 switch (func) {
2111 case 0:
2112 ret = read_ldt(ptr, bytecount);
2113 break;
2114 case 1:
2115 ret = write_ldt(env, ptr, bytecount, 1);
2116 break;
2117 case 0x11:
2118 ret = write_ldt(env, ptr, bytecount, 0);
2119 break;
2120 }
2121 return ret;
2122 }
2123
2124 #endif /* defined(TARGET_I386) */
2125
2126 /* this stack is the equivalent of the kernel stack associated with a
2127 thread/process */
2128 #define NEW_STACK_SIZE 8192
2129
2130 static int clone_func(void *arg)
2131 {
2132 CPUState *env = arg;
2133 cpu_loop(env);
2134 /* never exits */
2135 return 0;
2136 }
2137
2138 int do_fork(CPUState *env, unsigned int flags, unsigned long newsp)
2139 {
2140 int ret;
2141 TaskState *ts;
2142 uint8_t *new_stack;
2143 CPUState *new_env;
2144
2145 if (flags & CLONE_VM) {
2146 ts = malloc(sizeof(TaskState) + NEW_STACK_SIZE);
2147 memset(ts, 0, sizeof(TaskState));
2148 new_stack = ts->stack;
2149 ts->used = 1;
2150 /* add in task state list */
2151 ts->next = first_task_state;
2152 first_task_state = ts;
2153 /* we create a new CPU instance. */
2154 new_env = cpu_copy(env);
2155 #if defined(TARGET_I386)
2156 if (!newsp)
2157 newsp = env->regs[R_ESP];
2158 new_env->regs[R_ESP] = newsp;
2159 new_env->regs[R_EAX] = 0;
2160 #elif defined(TARGET_ARM)
2161 if (!newsp)
2162 newsp = env->regs[13];
2163 new_env->regs[13] = newsp;
2164 new_env->regs[0] = 0;
2165 #elif defined(TARGET_SPARC)
2166 if (!newsp)
2167 newsp = env->regwptr[22];
2168 new_env->regwptr[22] = newsp;
2169 new_env->regwptr[0] = 0;
2170 /* XXXXX */
2171 printf ("HELPME: %s:%d\n", __FILE__, __LINE__);
2172 #elif defined(TARGET_M68K)
2173 if (!newsp)
2174 newsp = env->aregs[7];
2175 new_env->aregs[7] = newsp;
2176 new_env->dregs[0] = 0;
2177 /* ??? is this sufficient? */
2178 #elif defined(TARGET_MIPS)
2179 if (!newsp)
2180 newsp = env->gpr[29];
2181 new_env->gpr[29] = newsp;
2182 #elif defined(TARGET_PPC)
2183 if (!newsp)
2184 newsp = env->gpr[1];
2185 new_env->gpr[1] = newsp;
2186 {
2187 int i;
2188 for (i = 7; i < 32; i++)
2189 new_env->gpr[i] = 0;
2190 }
2191 #elif defined(TARGET_SH4)
2192 if (!newsp)
2193 newsp = env->gregs[15];
2194 new_env->gregs[15] = newsp;
2195 /* XXXXX */
2196 #elif defined(TARGET_ALPHA)
2197 if (!newsp)
2198 newsp = env->ir[30];
2199 new_env->ir[30] = newsp;
2200 /* ? */
2201 {
2202 int i;
2203 for (i = 7; i < 30; i++)
2204 new_env->ir[i] = 0;
2205 }
2206 #else
2207 #error unsupported target CPU
2208 #endif
2209 new_env->opaque = ts;
2210 #ifdef __ia64__
2211 ret = __clone2(clone_func, new_stack + NEW_STACK_SIZE, flags, new_env);
2212 #else
2213 ret = clone(clone_func, new_stack + NEW_STACK_SIZE, flags, new_env);
2214 #endif
2215 } else {
2216 /* if no CLONE_VM, we consider it is a fork */
2217 if ((flags & ~CSIGNAL) != 0)
2218 return -EINVAL;
2219 ret = fork();
2220 }
2221 return ret;
2222 }
2223
2224 static long do_fcntl(int fd, int cmd, target_ulong arg)
2225 {
2226 struct flock fl;
2227 struct target_flock *target_fl;
2228 struct flock64 fl64;
2229 struct target_flock64 *target_fl64;
2230 long ret;
2231
2232 switch(cmd) {
2233 case TARGET_F_GETLK:
2234 lock_user_struct(target_fl, arg, 1);
2235 fl.l_type = tswap16(target_fl->l_type);
2236 fl.l_whence = tswap16(target_fl->l_whence);
2237 fl.l_start = tswapl(target_fl->l_start);
2238 fl.l_len = tswapl(target_fl->l_len);
2239 fl.l_pid = tswapl(target_fl->l_pid);
2240 unlock_user_struct(target_fl, arg, 0);
2241 ret = fcntl(fd, cmd, &fl);
2242 if (ret == 0) {
2243 lock_user_struct(target_fl, arg, 0);
2244 target_fl->l_type = tswap16(fl.l_type);
2245 target_fl->l_whence = tswap16(fl.l_whence);
2246 target_fl->l_start = tswapl(fl.l_start);
2247 target_fl->l_len = tswapl(fl.l_len);
2248 target_fl->l_pid = tswapl(fl.l_pid);
2249 unlock_user_struct(target_fl, arg, 1);
2250 }
2251 break;
2252
2253 case TARGET_F_SETLK:
2254 case TARGET_F_SETLKW:
2255 lock_user_struct(target_fl, arg, 1);
2256 fl.l_type = tswap16(target_fl->l_type);
2257 fl.l_whence = tswap16(target_fl->l_whence);
2258 fl.l_start = tswapl(target_fl->l_start);
2259 fl.l_len = tswapl(target_fl->l_len);
2260 fl.l_pid = tswapl(target_fl->l_pid);
2261 unlock_user_struct(target_fl, arg, 0);
2262 ret = fcntl(fd, cmd, &fl);
2263 break;
2264
2265 case TARGET_F_GETLK64:
2266 lock_user_struct(target_fl64, arg, 1);
2267 fl64.l_type = tswap16(target_fl64->l_type) >> 1;
2268 fl64.l_whence = tswap16(target_fl64->l_whence);
2269 fl64.l_start = tswapl(target_fl64->l_start);
2270 fl64.l_len = tswapl(target_fl64->l_len);
2271 fl64.l_pid = tswap16(target_fl64->l_pid);
2272 unlock_user_struct(target_fl64, arg, 0);
2273 ret = fcntl(fd, cmd >> 1, &fl64);
2274 if (ret == 0) {
2275 lock_user_struct(target_fl64, arg, 0);
2276 target_fl64->l_type = tswap16(fl64.l_type) >> 1;
2277 target_fl64->l_whence = tswap16(fl64.l_whence);
2278 target_fl64->l_start = tswapl(fl64.l_start);
2279 target_fl64->l_len = tswapl(fl64.l_len);
2280 target_fl64->l_pid = tswapl(fl64.l_pid);
2281 unlock_user_struct(target_fl64, arg, 1);
2282 }
2283 break;
2284 case TARGET_F_SETLK64:
2285 case TARGET_F_SETLKW64:
2286 lock_user_struct(target_fl64, arg, 1);
2287 fl64.l_type = tswap16(target_fl64->l_type) >> 1;
2288 fl64.l_whence = tswap16(target_fl64->l_whence);
2289 fl64.l_start = tswapl(target_fl64->l_start);
2290 fl64.l_len = tswapl(target_fl64->l_len);
2291 fl64.l_pid = tswap16(target_fl64->l_pid);
2292 unlock_user_struct(target_fl64, arg, 0);
2293 ret = fcntl(fd, cmd >> 1, &fl64);
2294 break;
2295
2296 case F_GETFL:
2297 ret = fcntl(fd, cmd, arg);
2298 ret = host_to_target_bitmask(ret, fcntl_flags_tbl);
2299 break;
2300
2301 case F_SETFL:
2302 ret = fcntl(fd, cmd, target_to_host_bitmask(arg, fcntl_flags_tbl));
2303 break;
2304
2305 default:
2306 ret = fcntl(fd, cmd, arg);
2307 break;
2308 }
2309 return ret;
2310 }
2311
2312 #ifdef USE_UID16
2313
2314 static inline int high2lowuid(int uid)
2315 {
2316 if (uid > 65535)
2317 return 65534;
2318 else
2319 return uid;
2320 }
2321
2322 static inline int high2lowgid(int gid)
2323 {
2324 if (gid > 65535)
2325 return 65534;
2326 else
2327 return gid;
2328 }
2329
2330 static inline int low2highuid(int uid)
2331 {
2332 if ((int16_t)uid == -1)
2333 return -1;
2334 else
2335 return uid;
2336 }
2337
2338 static inline int low2highgid(int gid)
2339 {
2340 if ((int16_t)gid == -1)
2341 return -1;
2342 else
2343 return gid;
2344 }
2345
2346 #endif /* USE_UID16 */
2347
2348 void syscall_init(void)
2349 {
2350 IOCTLEntry *ie;
2351 const argtype *arg_type;
2352 int size;
2353
2354 #define STRUCT(name, list...) thunk_register_struct(STRUCT_ ## name, #name, struct_ ## name ## _def);
2355 #define STRUCT_SPECIAL(name) thunk_register_struct_direct(STRUCT_ ## name, #name, &struct_ ## name ## _def);
2356 #include "syscall_types.h"
2357 #undef STRUCT
2358 #undef STRUCT_SPECIAL
2359
2360 /* we patch the ioctl size if necessary. We rely on the fact that
2361 no ioctl has all the bits at '1' in the size field */
2362 ie = ioctl_entries;
2363 while (ie->target_cmd != 0) {
2364 if (((ie->target_cmd >> TARGET_IOC_SIZESHIFT) & TARGET_IOC_SIZEMASK) ==
2365 TARGET_IOC_SIZEMASK) {
2366 arg_type = ie->arg_type;
2367 if (arg_type[0] != TYPE_PTR) {
2368 fprintf(stderr, "cannot patch size for ioctl 0x%x\n",
2369 ie->target_cmd);
2370 exit(1);
2371 }
2372 arg_type++;
2373 size = thunk_type_size(arg_type, 0);
2374 ie->target_cmd = (ie->target_cmd &
2375 ~(TARGET_IOC_SIZEMASK << TARGET_IOC_SIZESHIFT)) |
2376 (size << TARGET_IOC_SIZESHIFT);
2377 }
2378 /* automatic consistency check if same arch */
2379 #if defined(__i386__) && defined(TARGET_I386)
2380 if (ie->target_cmd != ie->host_cmd) {
2381 fprintf(stderr, "ERROR: ioctl: target=0x%x host=0x%x\n",
2382 ie->target_cmd, ie->host_cmd);
2383 }
2384 #endif
2385 ie++;
2386 }
2387 }
2388
2389 static inline uint64_t target_offset64(uint32_t word0, uint32_t word1)
2390 {
2391 #ifdef TARGET_WORDS_BIG_ENDIAN
2392 return ((uint64_t)word0 << 32) | word1;
2393 #else
2394 return ((uint64_t)word1 << 32) | word0;
2395 #endif
2396 }
2397
2398 #ifdef TARGET_NR_truncate64
2399 static inline long target_truncate64(void *cpu_env, const char *arg1,
2400 long arg2, long arg3, long arg4)
2401 {
2402 #ifdef TARGET_ARM
2403 if (((CPUARMState *)cpu_env)->eabi)
2404 {
2405 arg2 = arg3;
2406 arg3 = arg4;
2407 }
2408 #endif
2409 return get_errno(truncate64(arg1, target_offset64(arg2, arg3)));
2410 }
2411 #endif
2412
2413 #ifdef TARGET_NR_ftruncate64
2414 static inline long target_ftruncate64(void *cpu_env, long arg1, long arg2,
2415 long arg3, long arg4)
2416 {
2417 #ifdef TARGET_ARM
2418 if (((CPUARMState *)cpu_env)->eabi)
2419 {
2420 arg2 = arg3;
2421 arg3 = arg4;
2422 }
2423 #endif
2424 return get_errno(ftruncate64(arg1, target_offset64(arg2, arg3)));
2425 }
2426 #endif
2427
2428 static inline void target_to_host_timespec(struct timespec *host_ts,
2429 target_ulong target_addr)
2430 {
2431 struct target_timespec *target_ts;
2432
2433 lock_user_struct(target_ts, target_addr, 1);
2434 host_ts->tv_sec = tswapl(target_ts->tv_sec);
2435 host_ts->tv_nsec = tswapl(target_ts->tv_nsec);
2436 unlock_user_struct(target_ts, target_addr, 0);
2437 }
2438
2439 static inline void host_to_target_timespec(target_ulong target_addr,
2440 struct timespec *host_ts)
2441 {
2442 struct target_timespec *target_ts;
2443
2444 lock_user_struct(target_ts, target_addr, 0);
2445 target_ts->tv_sec = tswapl(host_ts->tv_sec);
2446 target_ts->tv_nsec = tswapl(host_ts->tv_nsec);
2447 unlock_user_struct(target_ts, target_addr, 1);
2448 }
2449
2450 long do_syscall(void *cpu_env, int num, long arg1, long arg2, long arg3,
2451 long arg4, long arg5, long arg6)
2452 {
2453 long ret;
2454 struct stat st;
2455 struct statfs stfs;
2456 void *p;
2457
2458 #ifdef DEBUG
2459 gemu_log("syscall %d", num);
2460 #endif
2461 switch(num) {
2462 case TARGET_NR_exit:
2463 #ifdef HAVE_GPROF
2464 _mcleanup();
2465 #endif
2466 gdb_exit(cpu_env, arg1);
2467 /* XXX: should free thread stack and CPU env */
2468 _exit(arg1);
2469 ret = 0; /* avoid warning */
2470 break;
2471 case TARGET_NR_read:
2472 page_unprotect_range(arg2, arg3);
2473 p = lock_user(arg2, arg3, 0);
2474 ret = get_errno(read(arg1, p, arg3));
2475 unlock_user(p, arg2, ret);
2476 break;
2477 case TARGET_NR_write:
2478 p = lock_user(arg2, arg3, 1);
2479 ret = get_errno(write(arg1, p, arg3));
2480 unlock_user(p, arg2, 0);
2481 break;
2482 case TARGET_NR_open:
2483 p = lock_user_string(arg1);
2484 ret = get_errno(open(path(p),
2485 target_to_host_bitmask(arg2, fcntl_flags_tbl),
2486 arg3));
2487 unlock_user(p, arg1, 0);
2488 break;
2489 case TARGET_NR_close:
2490 ret = get_errno(close(arg1));
2491 break;
2492 case TARGET_NR_brk:
2493 ret = do_brk(arg1);
2494 break;
2495 case TARGET_NR_fork:
2496 ret = get_errno(do_fork(cpu_env, SIGCHLD, 0));
2497 break;
2498 #ifdef TARGET_NR_waitpid
2499 case TARGET_NR_waitpid:
2500 {
2501 int status;
2502 ret = get_errno(waitpid(arg1, &status, arg3));
2503 if (!is_error(ret) && arg2)
2504 tput32(arg2, status);
2505 }
2506 break;
2507 #endif
2508 #ifdef TARGET_NR_creat /* not on alpha */
2509 case TARGET_NR_creat:
2510 p = lock_user_string(arg1);
2511 ret = get_errno(creat(p, arg2));
2512 unlock_user(p, arg1, 0);
2513 break;
2514 #endif
2515 case TARGET_NR_link:
2516 {
2517 void * p2;
2518 p = lock_user_string(arg1);
2519 p2 = lock_user_string(arg2);
2520 ret = get_errno(link(p, p2));
2521 unlock_user(p2, arg2, 0);
2522 unlock_user(p, arg1, 0);
2523 }
2524 break;
2525 case TARGET_NR_unlink:
2526 p = lock_user_string(arg1);
2527 ret = get_errno(unlink(p));
2528 unlock_user(p, arg1, 0);
2529 break;
2530 case TARGET_NR_execve:
2531 {
2532 char **argp, **envp;
2533 int argc, envc;
2534 target_ulong gp;
2535 target_ulong guest_argp;
2536 target_ulong guest_envp;
2537 target_ulong addr;
2538 char **q;
2539
2540 argc = 0;
2541 guest_argp = arg2;
2542 for (gp = guest_argp; tgetl(gp); gp++)
2543 argc++;
2544 envc = 0;
2545 guest_envp = arg3;
2546 for (gp = guest_envp; tgetl(gp); gp++)
2547 envc++;
2548
2549 argp = alloca((argc + 1) * sizeof(void *));
2550 envp = alloca((envc + 1) * sizeof(void *));
2551
2552 for (gp = guest_argp, q = argp; ;
2553 gp += sizeof(target_ulong), q++) {
2554 addr = tgetl(gp);
2555 if (!addr)
2556 break;
2557 *q = lock_user_string(addr);
2558 }
2559 *q = NULL;
2560
2561 for (gp = guest_envp, q = envp; ;
2562 gp += sizeof(target_ulong), q++) {
2563 addr = tgetl(gp);
2564 if (!addr)
2565 break;
2566 *q = lock_user_string(addr);
2567 }
2568 *q = NULL;
2569
2570 p = lock_user_string(arg1);
2571 ret = get_errno(execve(p, argp, envp));
2572 unlock_user(p, arg1, 0);
2573
2574 for (gp = guest_argp, q = argp; *q;
2575 gp += sizeof(target_ulong), q++) {
2576 addr = tgetl(gp);
2577 unlock_user(*q, addr, 0);
2578 }
2579 for (gp = guest_envp, q = envp; *q;
2580 gp += sizeof(target_ulong), q++) {
2581 addr = tgetl(gp);
2582 unlock_user(*q, addr, 0);
2583 }
2584 }
2585 break;
2586 case TARGET_NR_chdir:
2587 p = lock_user_string(arg1);
2588 ret = get_errno(chdir(p));
2589 unlock_user(p, arg1, 0);
2590 break;
2591 #ifdef TARGET_NR_time
2592 case TARGET_NR_time:
2593 {
2594 time_t host_time;
2595 ret = get_errno(time(&host_time));
2596 if (!is_error(ret) && arg1)
2597 tputl(arg1, host_time);
2598 }
2599 break;
2600 #endif
2601 case TARGET_NR_mknod:
2602 p = lock_user_string(arg1);
2603 ret = get_errno(mknod(p, arg2, arg3));
2604 unlock_user(p, arg1, 0);
2605 break;
2606 case TARGET_NR_chmod:
2607 p = lock_user_string(arg1);
2608 ret = get_errno(chmod(p, arg2));
2609 unlock_user(p, arg1, 0);
2610 break;
2611 #ifdef TARGET_NR_break
2612 case TARGET_NR_break:
2613 goto unimplemented;
2614 #endif
2615 #ifdef TARGET_NR_oldstat
2616 case TARGET_NR_oldstat:
2617 goto unimplemented;
2618 #endif
2619 case TARGET_NR_lseek:
2620 ret = get_errno(lseek(arg1, arg2, arg3));
2621 break;
2622 #ifdef TARGET_NR_getxpid
2623 case TARGET_NR_getxpid:
2624 #else
2625 case TARGET_NR_getpid:
2626 #endif
2627 ret = get_errno(getpid());
2628 break;
2629 case TARGET_NR_mount:
2630 {
2631 /* need to look at the data field */
2632 void *p2, *p3;
2633 p = lock_user_string(arg1);
2634 p2 = lock_user_string(arg2);
2635 p3 = lock_user_string(arg3);
2636 ret = get_errno(mount(p, p2, p3, (unsigned long)arg4, (const void *)arg5));
2637 unlock_user(p, arg1, 0);
2638 unlock_user(p2, arg2, 0);
2639 unlock_user(p3, arg3, 0);
2640 break;
2641 }
2642 #ifdef TARGET_NR_umount
2643 case TARGET_NR_umount:
2644 p = lock_user_string(arg1);
2645 ret = get_errno(umount(p));
2646 unlock_user(p, arg1, 0);
2647 break;
2648 #endif
2649 #ifdef TARGET_NR_stime /* not on alpha */
2650 case TARGET_NR_stime:
2651 {
2652 time_t host_time;
2653 host_time = tgetl(arg1);
2654 ret = get_errno(stime(&host_time));
2655 }
2656 break;
2657 #endif
2658 case TARGET_NR_ptrace:
2659 goto unimplemented;
2660 #ifdef TARGET_NR_alarm /* not on alpha */
2661 case TARGET_NR_alarm:
2662 ret = alarm(arg1);
2663 break;
2664 #endif
2665 #ifdef TARGET_NR_oldfstat
2666 case TARGET_NR_oldfstat:
2667 goto unimplemented;
2668 #endif
2669 #ifdef TARGET_NR_pause /* not on alpha */
2670 case TARGET_NR_pause:
2671 ret = get_errno(pause());
2672 break;
2673 #endif
2674 #ifdef TARGET_NR_utime
2675 case TARGET_NR_utime:
2676 {
2677 struct utimbuf tbuf, *host_tbuf;
2678 struct target_utimbuf *target_tbuf;
2679 if (arg2) {
2680 lock_user_struct(target_tbuf, arg2, 1);
2681 tbuf.actime = tswapl(target_tbuf->actime);
2682 tbuf.modtime = tswapl(target_tbuf->modtime);
2683 unlock_user_struct(target_tbuf, arg2, 0);
2684 host_tbuf = &tbuf;
2685 } else {
2686 host_tbuf = NULL;
2687 }
2688 p = lock_user_string(arg1);
2689 ret = get_errno(utime(p, host_tbuf));
2690 unlock_user(p, arg1, 0);
2691 }
2692 break;
2693 #endif
2694 case TARGET_NR_utimes:
2695 {
2696 struct timeval *tvp, tv[2];
2697 if (arg2) {
2698 target_to_host_timeval(&tv[0], arg2);
2699 target_to_host_timeval(&tv[1],
2700 arg2 + sizeof (struct target_timeval));
2701 tvp = tv;
2702 } else {
2703 tvp = NULL;
2704 }
2705 p = lock_user_string(arg1);
2706 ret = get_errno(utimes(p, tvp));
2707 unlock_user(p, arg1, 0);
2708 }
2709 break;
2710 #ifdef TARGET_NR_stty
2711 case TARGET_NR_stty:
2712 goto unimplemented;
2713 #endif
2714 #ifdef TARGET_NR_gtty
2715 case TARGET_NR_gtty:
2716 goto unimplemented;
2717 #endif
2718 case TARGET_NR_access:
2719 p = lock_user_string(arg1);
2720 ret = get_errno(access(p, arg2));
2721 unlock_user(p, arg1, 0);
2722 break;
2723 #ifdef TARGET_NR_nice /* not on alpha */
2724 case TARGET_NR_nice:
2725 ret = get_errno(nice(arg1));
2726 break;
2727 #endif
2728 #ifdef TARGET_NR_ftime
2729 case TARGET_NR_ftime:
2730 goto unimplemented;
2731 #endif
2732 case TARGET_NR_sync:
2733 sync();
2734 ret = 0;
2735 break;
2736 case TARGET_NR_kill:
2737 ret = get_errno(kill(arg1, arg2));
2738 break;
2739 case TARGET_NR_rename:
2740 {
2741 void *p2;
2742 p = lock_user_string(arg1);
2743 p2 = lock_user_string(arg2);
2744 ret = get_errno(rename(p, p2));
2745 unlock_user(p2, arg2, 0);
2746 unlock_user(p, arg1, 0);
2747 }
2748 break;
2749 case TARGET_NR_mkdir:
2750 p = lock_user_string(arg1);
2751 ret = get_errno(mkdir(p, arg2));
2752 unlock_user(p, arg1, 0);
2753 break;
2754 case TARGET_NR_rmdir:
2755 p = lock_user_string(arg1);
2756 ret = get_errno(rmdir(p));
2757 unlock_user(p, arg1, 0);
2758 break;
2759 case TARGET_NR_dup:
2760 ret = get_errno(dup(arg1));
2761 break;
2762 case TARGET_NR_pipe:
2763 {
2764 int host_pipe[2];
2765 ret = get_errno(pipe(host_pipe));
2766 if (!is_error(ret)) {
2767 #if defined(TARGET_MIPS)
2768 ((CPUMIPSState*)cpu_env)->gpr[3] = host_pipe[1];
2769 ret = host_pipe[0];
2770 #else
2771 tput32(arg1, host_pipe[0]);
2772 tput32(arg1 + 4, host_pipe[1]);
2773 #endif
2774 }
2775 }
2776 break;
2777 case TARGET_NR_times:
2778 {
2779 struct target_tms *tmsp;
2780 struct tms tms;
2781 ret = get_errno(times(&tms));
2782 if (arg1) {
2783 tmsp = lock_user(arg1, sizeof(struct target_tms), 0);
2784 tmsp->tms_utime = tswapl(host_to_target_clock_t(tms.tms_utime));
2785 tmsp->tms_stime = tswapl(host_to_target_clock_t(tms.tms_stime));
2786 tmsp->tms_cutime = tswapl(host_to_target_clock_t(tms.tms_cutime));
2787 tmsp->tms_cstime = tswapl(host_to_target_clock_t(tms.tms_cstime));
2788 }
2789 if (!is_error(ret))
2790 ret = host_to_target_clock_t(ret);
2791 }
2792 break;
2793 #ifdef TARGET_NR_prof
2794 case TARGET_NR_prof:
2795 goto unimplemented;
2796 #endif
2797 #ifdef TARGET_NR_signal
2798 case TARGET_NR_signal:
2799 goto unimplemented;
2800 #endif
2801 case TARGET_NR_acct:
2802 p = lock_user_string(arg1);
2803 ret = get_errno(acct(path(p)));
2804 unlock_user(p, arg1, 0);
2805 break;
2806 #ifdef TARGET_NR_umount2 /* not on alpha */
2807 case TARGET_NR_umount2:
2808 p = lock_user_string(arg1);
2809 ret = get_errno(umount2(p, arg2));
2810 unlock_user(p, arg1, 0);
2811 break;
2812 #endif
2813 #ifdef TARGET_NR_lock
2814 case TARGET_NR_lock:
2815 goto unimplemented;
2816 #endif
2817 case TARGET_NR_ioctl:
2818 ret = do_ioctl(arg1, arg2, arg3);
2819 break;
2820 case TARGET_NR_fcntl:
2821 ret = get_errno(do_fcntl(arg1, arg2, arg3));
2822 break;
2823 #ifdef TARGET_NR_mpx
2824 case TARGET_NR_mpx:
2825 goto unimplemented;
2826 #endif
2827 case TARGET_NR_setpgid:
2828 ret = get_errno(setpgid(arg1, arg2));
2829 break;
2830 #ifdef TARGET_NR_ulimit
2831 case TARGET_NR_ulimit:
2832 goto unimplemented;
2833 #endif
2834 #ifdef TARGET_NR_oldolduname
2835 case TARGET_NR_oldolduname:
2836 goto unimplemented;
2837 #endif
2838 case TARGET_NR_umask:
2839 ret = get_errno(umask(arg1));
2840 break;
2841 case TARGET_NR_chroot:
2842 p = lock_user_string(arg1);
2843 ret = get_errno(chroot(p));
2844 unlock_user(p, arg1, 0);
2845 break;
2846 case TARGET_NR_ustat:
2847 goto unimplemented;
2848 case TARGET_NR_dup2:
2849 ret = get_errno(dup2(arg1, arg2));
2850 break;
2851 #ifdef TARGET_NR_getppid /* not on alpha */
2852 case TARGET_NR_getppid:
2853 ret = get_errno(getppid());
2854 break;
2855 #endif
2856 case TARGET_NR_getpgrp:
2857 ret = get_errno(getpgrp());
2858 break;
2859 case TARGET_NR_setsid:
2860 ret = get_errno(setsid());
2861 break;
2862 #ifdef TARGET_NR_sigaction
2863 case TARGET_NR_sigaction:
2864 {
2865 #if !defined(TARGET_MIPS)
2866 struct target_old_sigaction *old_act;
2867 struct target_sigaction act, oact, *pact;
2868 if (arg2) {
2869 lock_user_struct(old_act, arg2, 1);
2870 act._sa_handler = old_act->_sa_handler;
2871 target_siginitset(&act.sa_mask, old_act->sa_mask);
2872 act.sa_flags = old_act->sa_flags;
2873 act.sa_restorer = old_act->sa_restorer;
2874 unlock_user_struct(old_act, arg2, 0);
2875 pact = &act;
2876 } else {
2877 pact = NULL;
2878 }
2879 ret = get_errno(do_sigaction(arg1, pact, &oact));
2880 if (!is_error(ret) && arg3) {
2881 lock_user_struct(old_act, arg3, 0);
2882 old_act->_sa_handler = oact._sa_handler;
2883 old_act->sa_mask = oact.sa_mask.sig[0];
2884 old_act->sa_flags = oact.sa_flags;
2885 old_act->sa_restorer = oact.sa_restorer;
2886 unlock_user_struct(old_act, arg3, 1);
2887 }
2888 #else
2889 struct target_sigaction act, oact, *pact, *old_act;
2890
2891 if (arg2) {
2892 lock_user_struct(old_act, arg2, 1);
2893 act._sa_handler = old_act->_sa_handler;
2894 target_siginitset(&act.sa_mask, old_act->sa_mask.sig[0]);
2895 act.sa_flags = old_act->sa_flags;
2896 unlock_user_struct(old_act, arg2, 0);
2897 pact = &act;
2898 } else {
2899 pact = NULL;
2900 }
2901
2902 ret = get_errno(do_sigaction(arg1, pact, &oact));
2903
2904 if (!is_error(ret) && arg3) {
2905 lock_user_struct(old_act, arg3, 0);
2906 old_act->_sa_handler = oact._sa_handler;
2907 old_act->sa_flags = oact.sa_flags;
2908 old_act->sa_mask.sig[0] = oact.sa_mask.sig[0];
2909 old_act->sa_mask.sig[1] = 0;
2910 old_act->sa_mask.sig[2] = 0;
2911 old_act->sa_mask.sig[3] = 0;
2912 unlock_user_struct(old_act, arg3, 1);
2913 }
2914 #endif
2915 }
2916 break;
2917 #endif
2918 case TARGET_NR_rt_sigaction:
2919 {
2920 struct target_sigaction *act;
2921 struct target_sigaction *oact;
2922
2923 if (arg2)
2924 lock_user_struct(act, arg2, 1);
2925 else
2926 act = NULL;
2927 if (arg3)
2928 lock_user_struct(oact, arg3, 0);
2929 else
2930 oact = NULL;
2931 ret = get_errno(do_sigaction(arg1, act, oact));
2932 if (arg2)
2933 unlock_user_struct(act, arg2, 0);
2934 if (arg3)
2935 unlock_user_struct(oact, arg3, 1);
2936 }
2937 break;
2938 #ifdef TARGET_NR_sgetmask /* not on alpha */
2939 case TARGET_NR_sgetmask:
2940 {
2941 sigset_t cur_set;
2942 target_ulong target_set;
2943 sigprocmask(0, NULL, &cur_set);
2944 host_to_target_old_sigset(&target_set, &cur_set);
2945 ret = target_set;
2946 }
2947 break;
2948 #endif
2949 #ifdef TARGET_NR_ssetmask /* not on alpha */
2950 case TARGET_NR_ssetmask:
2951 {
2952 sigset_t set, oset, cur_set;
2953 target_ulong target_set = arg1;
2954 sigprocmask(0, NULL, &cur_set);
2955 target_to_host_old_sigset(&set, &target_set);
2956 sigorset(&set, &set, &cur_set);
2957 sigprocmask(SIG_SETMASK, &set, &oset);
2958 host_to_target_old_sigset(&target_set, &oset);
2959 ret = target_set;
2960 }
2961 break;
2962 #endif
2963 #ifdef TARGET_NR_sigprocmask
2964 case TARGET_NR_sigprocmask:
2965 {
2966 int how = arg1;
2967 sigset_t set, oldset, *set_ptr;
2968
2969 if (arg2) {
2970 switch(how) {
2971 case TARGET_SIG_BLOCK:
2972 how = SIG_BLOCK;
2973 break;
2974 case TARGET_SIG_UNBLOCK:
2975 how = SIG_UNBLOCK;
2976 break;
2977 case TARGET_SIG_SETMASK:
2978 how = SIG_SETMASK;
2979 break;
2980 default:
2981 ret = -EINVAL;
2982 goto fail;
2983 }
2984 p = lock_user(arg2, sizeof(target_sigset_t), 1);
2985 target_to_host_old_sigset(&set, p);
2986 unlock_user(p, arg2, 0);
2987 set_ptr = &set;
2988 } else {
2989 how = 0;
2990 set_ptr = NULL;
2991 }
2992 ret = get_errno(sigprocmask(arg1, set_ptr, &oldset));
2993 if (!is_error(ret) && arg3) {
2994 p = lock_user(arg3, sizeof(target_sigset_t), 0);
2995 host_to_target_old_sigset(p, &oldset);
2996 unlock_user(p, arg3, sizeof(target_sigset_t));
2997 }
2998 }
2999 break;
3000 #endif
3001 case TARGET_NR_rt_sigprocmask:
3002 {
3003 int how = arg1;
3004 sigset_t set, oldset, *set_ptr;
3005
3006 if (arg2) {
3007 switch(how) {
3008 case TARGET_SIG_BLOCK:
3009 how = SIG_BLOCK;
3010 break;
3011 case TARGET_SIG_UNBLOCK:
3012 how = SIG_UNBLOCK;
3013 break;
3014 case TARGET_SIG_SETMASK:
3015 how = SIG_SETMASK;
3016 break;
3017 default:
3018 ret = -EINVAL;
3019 goto fail;
3020 }
3021 p = lock_user(arg2, sizeof(target_sigset_t), 1);
3022 target_to_host_sigset(&set, p);
3023 unlock_user(p, arg2, 0);
3024 set_ptr = &set;
3025 } else {
3026 how = 0;
3027 set_ptr = NULL;
3028 }
3029 ret = get_errno(sigprocmask(how, set_ptr, &oldset));
3030 if (!is_error(ret) && arg3) {
3031 p = lock_user(arg3, sizeof(target_sigset_t), 0);
3032 host_to_target_sigset(p, &oldset);
3033 unlock_user(p, arg3, sizeof(target_sigset_t));
3034 }
3035 }
3036 break;
3037 #ifdef TARGET_NR_sigpending
3038 case TARGET_NR_sigpending:
3039 {
3040 sigset_t set;
3041 ret = get_errno(sigpending(&set));
3042 if (!is_error(ret)) {
3043 p = lock_user(arg1, sizeof(target_sigset_t), 0);
3044 host_to_target_old_sigset(p, &set);
3045 unlock_user(p, arg1, sizeof(target_sigset_t));
3046 }
3047 }
3048 break;
3049 #endif
3050 case TARGET_NR_rt_sigpending:
3051 {
3052 sigset_t set;
3053 ret = get_errno(sigpending(&set));
3054 if (!is_error(ret)) {
3055 p = lock_user(arg1, sizeof(target_sigset_t), 0);
3056 host_to_target_sigset(p, &set);
3057 unlock_user(p, arg1, sizeof(target_sigset_t));
3058 }
3059 }
3060 break;
3061 #ifdef TARGET_NR_sigsuspend
3062 case TARGET_NR_sigsuspend:
3063 {
3064 sigset_t set;
3065 p = lock_user(arg1, sizeof(target_sigset_t), 1);
3066 target_to_host_old_sigset(&set, p);
3067 unlock_user(p, arg1, 0);
3068 ret = get_errno(sigsuspend(&set));
3069 }
3070 break;
3071 #endif
3072 case TARGET_NR_rt_sigsuspend:
3073 {
3074 sigset_t set;
3075 p = lock_user(arg1, sizeof(target_sigset_t), 1);
3076 target_to_host_sigset(&set, p);
3077 unlock_user(p, arg1, 0);
3078 ret = get_errno(sigsuspend(&set));
3079 }
3080 break;
3081 case TARGET_NR_rt_sigtimedwait:
3082 {
3083 sigset_t set;
3084 struct timespec uts, *puts;
3085 siginfo_t uinfo;
3086
3087 p = lock_user(arg1, sizeof(target_sigset_t), 1);
3088 target_to_host_sigset(&set, p);
3089 unlock_user(p, arg1, 0);
3090 if (arg3) {
3091 puts = &uts;
3092 target_to_host_timespec(puts, arg3);
3093 } else {
3094 puts = NULL;
3095 }
3096 ret = get_errno(sigtimedwait(&set, &uinfo, puts));
3097 if (!is_error(ret) && arg2) {
3098 p = lock_user(arg2, sizeof(target_sigset_t), 0);
3099 host_to_target_siginfo(p, &uinfo);
3100 unlock_user(p, arg2, sizeof(target_sigset_t));
3101 }
3102 }
3103 break;
3104 case TARGET_NR_rt_sigqueueinfo:
3105 {
3106 siginfo_t uinfo;
3107 p = lock_user(arg3, sizeof(target_sigset_t), 1);
3108 target_to_host_siginfo(&uinfo, p);
3109 unlock_user(p, arg1, 0);
3110 ret = get_errno(sys_rt_sigqueueinfo(arg1, arg2, &uinfo));
3111 }
3112 break;
3113 #ifdef TARGET_NR_sigreturn
3114 case TARGET_NR_sigreturn:
3115 /* NOTE: ret is eax, so not transcoding must be done */
3116 ret = do_sigreturn(cpu_env);
3117 break;
3118 #endif
3119 case TARGET_NR_rt_sigreturn:
3120 /* NOTE: ret is eax, so not transcoding must be done */
3121 ret = do_rt_sigreturn(cpu_env);
3122 break;
3123 case TARGET_NR_sethostname:
3124 p = lock_user_string(arg1);
3125 ret = get_errno(sethostname(p, arg2));
3126 unlock_user(p, arg1, 0);
3127 break;
3128 case TARGET_NR_setrlimit:
3129 {
3130 /* XXX: convert resource ? */
3131 int resource = arg1;
3132 struct target_rlimit *target_rlim;
3133 struct rlimit rlim;
3134 lock_user_struct(target_rlim, arg2, 1);
3135 rlim.rlim_cur = tswapl(target_rlim->rlim_cur);
3136 rlim.rlim_max = tswapl(target_rlim->rlim_max);
3137 unlock_user_struct(target_rlim, arg2, 0);
3138 ret = get_errno(setrlimit(resource, &rlim));
3139 }
3140 break;
3141 case TARGET_NR_getrlimit:
3142 {
3143 /* XXX: convert resource ? */
3144 int resource = arg1;
3145 struct target_rlimit *target_rlim;
3146 struct rlimit rlim;
3147
3148 ret = get_errno(getrlimit(resource, &rlim));
3149 if (!is_error(ret)) {
3150 lock_user_struct(target_rlim, arg2, 0);
3151 rlim.rlim_cur = tswapl(target_rlim->rlim_cur);
3152 rlim.rlim_max = tswapl(target_rlim->rlim_max);
3153 unlock_user_struct(target_rlim, arg2, 1);
3154 }
3155 }
3156 break;
3157 case TARGET_NR_getrusage:
3158 {
3159 struct rusage rusage;
3160 ret = get_errno(getrusage(arg1, &rusage));
3161 if (!is_error(ret)) {
3162 host_to_target_rusage(arg2, &rusage);
3163 }
3164 }
3165 break;
3166 case TARGET_NR_gettimeofday:
3167 {
3168 struct timeval tv;
3169 ret = get_errno(gettimeofday(&tv, NULL));
3170 if (!is_error(ret)) {
3171 host_to_target_timeval(arg1, &tv);
3172 }
3173 }
3174 break;
3175 case TARGET_NR_settimeofday:
3176 {
3177 struct timeval tv;
3178 target_to_host_timeval(&tv, arg1);
3179 ret = get_errno(settimeofday(&tv, NULL));
3180 }
3181 break;
3182 #ifdef TARGET_NR_select
3183 case TARGET_NR_select:
3184 {
3185 struct target_sel_arg_struct *sel;
3186 target_ulong inp, outp, exp, tvp;
3187 long nsel;
3188
3189 lock_user_struct(sel, arg1, 1);
3190 nsel = tswapl(sel->n);
3191 inp = tswapl(sel->inp);
3192 outp = tswapl(sel->outp);
3193 exp = tswapl(sel->exp);
3194 tvp = tswapl(sel->tvp);
3195 unlock_user_struct(sel, arg1, 0);
3196 ret = do_select(nsel, inp, outp, exp, tvp);
3197 }
3198 break;
3199 #endif
3200 case TARGET_NR_symlink:
3201 {
3202 void *p2;
3203 p = lock_user_string(arg1);
3204 p2 = lock_user_string(arg2);
3205 ret = get_errno(symlink(p, p2));
3206 unlock_user(p2, arg2, 0);
3207 unlock_user(p, arg1, 0);
3208 }
3209 break;
3210 #ifdef TARGET_NR_oldlstat
3211 case TARGET_NR_oldlstat:
3212 goto unimplemented;
3213 #endif
3214 case TARGET_NR_readlink:
3215 {
3216 void *p2;
3217 p = lock_user_string(arg1);
3218 p2 = lock_user(arg2, arg3, 0);
3219 ret = get_errno(readlink(path(p), p2, arg3));
3220 unlock_user(p2, arg2, ret);
3221 unlock_user(p, arg1, 0);
3222 }
3223 break;
3224 #ifdef TARGET_NR_uselib
3225 case TARGET_NR_uselib:
3226 goto unimplemented;
3227 #endif
3228 #ifdef TARGET_NR_swapon
3229 case TARGET_NR_swapon:
3230 p = lock_user_string(arg1);
3231 ret = get_errno(swapon(p, arg2));
3232 unlock_user(p, arg1, 0);
3233 break;
3234 #endif
3235 case TARGET_NR_reboot:
3236 goto unimplemented;
3237 #ifdef TARGET_NR_readdir
3238 case TARGET_NR_readdir:
3239 goto unimplemented;
3240 #endif
3241 #ifdef TARGET_NR_mmap
3242 case TARGET_NR_mmap:
3243 #if defined(TARGET_I386) || defined(TARGET_ARM) || defined(TARGET_M68K)
3244 {
3245 target_ulong *v;
3246 target_ulong v1, v2, v3, v4, v5, v6;
3247 v = lock_user(arg1, 6 * sizeof(target_ulong), 1);
3248 v1 = tswapl(v[0]);
3249 v2 = tswapl(v[1]);
3250 v3 = tswapl(v[2]);
3251 v4 = tswapl(v[3]);
3252 v5 = tswapl(v[4]);
3253 v6 = tswapl(v[5]);
3254 unlock_user(v, arg1, 0);
3255 ret = get_errno(target_mmap(v1, v2, v3,
3256 target_to_host_bitmask(v4, mmap_flags_tbl),
3257 v5, v6));
3258 }
3259 #else
3260 ret = get_errno(target_mmap(arg1, arg2, arg3,
3261 target_to_host_bitmask(arg4, mmap_flags_tbl),
3262 arg5,
3263 arg6));
3264 #endif
3265 break;
3266 #endif
3267 #ifdef TARGET_NR_mmap2
3268 case TARGET_NR_mmap2:
3269 #if defined(TARGET_SPARC) || defined(TARGET_MIPS)
3270 #define MMAP_SHIFT 12
3271 #else
3272 #define MMAP_SHIFT TARGET_PAGE_BITS
3273 #endif
3274 ret = get_errno(target_mmap(arg1, arg2, arg3,
3275 target_to_host_bitmask(arg4, mmap_flags_tbl),
3276 arg5,
3277 arg6 << MMAP_SHIFT));
3278 break;
3279 #endif
3280 case TARGET_NR_munmap:
3281 ret = get_errno(target_munmap(arg1, arg2));
3282 break;
3283 case TARGET_NR_mprotect:
3284 ret = get_errno(target_mprotect(arg1, arg2, arg3));
3285 break;
3286 #ifdef TARGET_NR_mremap
3287 case TARGET_NR_mremap:
3288 ret = get_errno(target_mremap(arg1, arg2, arg3, arg4, arg5));
3289 break;
3290 #endif
3291 /* ??? msync/mlock/munlock are broken for softmmu. */
3292 #ifdef TARGET_NR_msync
3293 case TARGET_NR_msync:
3294 ret = get_errno(msync(g2h(arg1), arg2, arg3));
3295 break;
3296 #endif
3297 #ifdef TARGET_NR_mlock
3298 case TARGET_NR_mlock:
3299 ret = get_errno(mlock(g2h(arg1), arg2));
3300 break;
3301 #endif
3302 #ifdef TARGET_NR_munlock
3303 case TARGET_NR_munlock:
3304 ret = get_errno(munlock(g2h(arg1), arg2));
3305 break;
3306 #endif
3307 #ifdef TARGET_NR_mlockall
3308 case TARGET_NR_mlockall:
3309 ret = get_errno(mlockall(arg1));
3310 break;
3311 #endif
3312 #ifdef TARGET_NR_munlockall
3313 case TARGET_NR_munlockall:
3314 ret = get_errno(munlockall());
3315 break;
3316 #endif
3317 case TARGET_NR_truncate:
3318 p = lock_user_string(arg1);
3319 ret = get_errno(truncate(p, arg2));
3320 unlock_user(p, arg1, 0);
3321 break;
3322 case TARGET_NR_ftruncate:
3323 ret = get_errno(ftruncate(arg1, arg2));
3324 break;
3325 case TARGET_NR_fchmod:
3326 ret = get_errno(fchmod(arg1, arg2));
3327 break;
3328 case TARGET_NR_getpriority:
3329 ret = get_errno(getpriority(arg1, arg2));
3330 break;
3331 case TARGET_NR_setpriority:
3332 ret = get_errno(setpriority(arg1, arg2, arg3));
3333 break;
3334 #ifdef TARGET_NR_profil
3335 case TARGET_NR_profil:
3336 goto unimplemented;
3337 #endif
3338 case TARGET_NR_statfs:
3339 p = lock_user_string(arg1);
3340 ret = get_errno(statfs(path(p), &stfs));
3341 unlock_user(p, arg1, 0);
3342 convert_statfs:
3343 if (!is_error(ret)) {
3344 struct target_statfs *target_stfs;
3345
3346 lock_user_struct(target_stfs, arg2, 0);
3347 /* ??? put_user is probably wrong. */
3348 put_user(stfs.f_type, &target_stfs->f_type);
3349 put_user(stfs.f_bsize, &target_stfs->f_bsize);
3350 put_user(stfs.f_blocks, &target_stfs->f_blocks);
3351 put_user(stfs.f_bfree, &target_stfs->f_bfree);
3352 put_user(stfs.f_bavail, &target_stfs->f_bavail);
3353 put_user(stfs.f_files, &target_stfs->f_files);
3354 put_user(stfs.f_ffree, &target_stfs->f_ffree);
3355 put_user(stfs.f_fsid.__val[0], &target_stfs->f_fsid);
3356 put_user(stfs.f_namelen, &target_stfs->f_namelen);
3357 unlock_user_struct(target_stfs, arg2, 1);
3358 }
3359 break;
3360 case TARGET_NR_fstatfs:
3361 ret = get_errno(fstatfs(arg1, &stfs));
3362 goto convert_statfs;
3363 #ifdef TARGET_NR_statfs64
3364 case TARGET_NR_statfs64:
3365 p = lock_user_string(arg1);
3366 ret = get_errno(statfs(path(p), &stfs));
3367 unlock_user(p, arg1, 0);
3368 convert_statfs64:
3369 if (!is_error(ret)) {
3370 struct target_statfs64 *target_stfs;
3371
3372 lock_user_struct(target_stfs, arg3, 0);
3373 /* ??? put_user is probably wrong. */
3374 put_user(stfs.f_type, &target_stfs->f_type);
3375 put_user(stfs.f_bsize, &target_stfs->f_bsize);
3376 put_user(stfs.f_blocks, &target_stfs->f_blocks);
3377 put_user(stfs.f_bfree, &target_stfs->f_bfree);
3378 put_user(stfs.f_bavail, &target_stfs->f_bavail);
3379 put_user(stfs.f_files, &target_stfs->f_files);
3380 put_user(stfs.f_ffree, &target_stfs->f_ffree);
3381 put_user(stfs.f_fsid.__val[0], &target_stfs->f_fsid);
3382 put_user(stfs.f_namelen, &target_stfs->f_namelen);
3383 unlock_user_struct(target_stfs, arg3, 0);
3384 }
3385 break;
3386 case TARGET_NR_fstatfs64:
3387 ret = get_errno(fstatfs(arg1, &stfs));
3388 goto convert_statfs64;
3389 #endif
3390 #ifdef TARGET_NR_ioperm
3391 case TARGET_NR_ioperm:
3392 goto unimplemented;
3393 #endif
3394 #ifdef TARGET_NR_socketcall
3395 case TARGET_NR_socketcall:
3396 ret = do_socketcall(arg1, arg2);
3397 break;
3398 #endif
3399 #ifdef TARGET_NR_accept
3400 case TARGET_NR_accept:
3401 ret = do_accept(arg1, arg2, arg3);
3402 break;
3403 #endif
3404 #ifdef TARGET_NR_bind
3405 case TARGET_NR_bind:
3406 ret = do_bind(arg1, arg2, arg3);
3407 break;
3408 #endif
3409 #ifdef TARGET_NR_connect
3410 case TARGET_NR_connect:
3411 ret = do_connect(arg1, arg2, arg3);
3412 break;
3413 #endif
3414 #ifdef TARGET_NR_getpeername
3415 case TARGET_NR_getpeername:
3416 ret = do_getpeername(arg1, arg2, arg3);
3417 break;
3418 #endif
3419 #ifdef TARGET_NR_getsockname
3420 case TARGET_NR_getsockname:
3421 ret = do_getsockname(arg1, arg2, arg3);
3422 break;
3423 #endif
3424 #ifdef TARGET_NR_getsockopt
3425 case TARGET_NR_getsockopt:
3426 ret = do_getsockopt(arg1, arg2, arg3, arg4, arg5);
3427 break;
3428 #endif
3429 #ifdef TARGET_NR_listen
3430 case TARGET_NR_listen:
3431 ret = get_errno(listen(arg1, arg2));
3432 break;
3433 #endif
3434 #ifdef TARGET_NR_recv
3435 case TARGET_NR_recv:
3436 ret = do_recvfrom(arg1, arg2, arg3, arg4, 0, 0);
3437 break;
3438 #endif
3439 #ifdef TARGET_NR_recvfrom
3440 case TARGET_NR_recvfrom:
3441 ret = do_recvfrom(arg1, arg2, arg3, arg4, arg5, arg6);
3442 break;
3443 #endif
3444 #ifdef TARGET_NR_recvmsg
3445 case TARGET_NR_recvmsg:
3446 ret = do_sendrecvmsg(arg1, arg2, arg3, 0);
3447 break;
3448 #endif
3449 #ifdef TARGET_NR_send
3450 case TARGET_NR_send:
3451 ret = do_sendto(arg1, arg2, arg3, arg4, 0, 0);
3452 break;
3453 #endif
3454 #ifdef TARGET_NR_sendmsg
3455 case TARGET_NR_sendmsg:
3456 ret = do_sendrecvmsg(arg1, arg2, arg3, 1);
3457 break;
3458 #endif
3459 #ifdef TARGET_NR_sendto
3460 case TARGET_NR_sendto:
3461 ret = do_sendto(arg1, arg2, arg3, arg4, arg5, arg6);
3462 break;
3463 #endif
3464 #ifdef TARGET_NR_shutdown
3465 case TARGET_NR_shutdown:
3466 ret = get_errno(shutdown(arg1, arg2));
3467 break;
3468 #endif
3469 #ifdef TARGET_NR_socket
3470 case TARGET_NR_socket:
3471 ret = do_socket(arg1, arg2, arg3);
3472 break;
3473 #endif
3474 #ifdef TARGET_NR_socketpair
3475 case TARGET_NR_socketpair:
3476 ret = do_socketpair(arg1, arg2, arg3, arg4);
3477 break;
3478 #endif
3479 #ifdef TARGET_NR_setsockopt
3480 case TARGET_NR_setsockopt:
3481 ret = do_setsockopt(arg1, arg2, arg3, arg4, (socklen_t) arg5);
3482 break;
3483 #endif
3484
3485 case TARGET_NR_syslog:
3486 p = lock_user_string(arg2);
3487 ret = get_errno(sys_syslog((int)arg1, p, (int)arg3));
3488 unlock_user(p, arg2, 0);
3489 break;
3490
3491 case TARGET_NR_setitimer:
3492 {
3493 struct itimerval value, ovalue, *pvalue;
3494
3495 if (arg2) {
3496 pvalue = &value;
3497 target_to_host_timeval(&pvalue->it_interval,
3498 arg2);
3499 target_to_host_timeval(&pvalue->it_value,
3500 arg2 + sizeof(struct target_timeval));
3501 } else {
3502 pvalue = NULL;
3503 }
3504 ret = get_errno(setitimer(arg1, pvalue, &ovalue));
3505 if (!is_error(ret) && arg3) {
3506 host_to_target_timeval(arg3,
3507 &ovalue.it_interval);
3508 host_to_target_timeval(arg3 + sizeof(struct target_timeval),
3509 &ovalue.it_value);
3510 }
3511 }
3512 break;
3513 case TARGET_NR_getitimer:
3514 {
3515 struct itimerval value;
3516
3517 ret = get_errno(getitimer(arg1, &value));
3518 if (!is_error(ret) && arg2) {
3519 host_to_target_timeval(arg2,
3520 &value.it_interval);
3521 host_to_target_timeval(arg2 + sizeof(struct target_timeval),
3522 &value.it_value);
3523 }
3524 }
3525 break;
3526 case TARGET_NR_stat:
3527 p = lock_user_string(arg1);
3528 ret = get_errno(stat(path(p), &st));
3529 unlock_user(p, arg1, 0);
3530 goto do_stat;
3531 case TARGET_NR_lstat:
3532 p = lock_user_string(arg1);
3533 ret = get_errno(lstat(path(p), &st));
3534 unlock_user(p, arg1, 0);
3535 goto do_stat;
3536 case TARGET_NR_fstat:
3537 {
3538 ret = get_errno(fstat(arg1, &st));
3539 do_stat:
3540 if (!is_error(ret)) {
3541 struct target_stat *target_st;
3542
3543 lock_user_struct(target_st, arg2, 0);
3544 #if defined(TARGET_MIPS) || defined(TARGET_SPARC64)
3545 target_st->st_dev = tswap32(st.st_dev);
3546 #else
3547 target_st->st_dev = tswap16(st.st_dev);
3548 #endif
3549 target_st->st_ino = tswapl(st.st_ino);
3550 #if defined(TARGET_PPC) || defined(TARGET_MIPS)
3551 target_st->st_mode = tswapl(st.st_mode); /* XXX: check this */
3552 target_st->st_uid = tswap32(st.st_uid);
3553 target_st->st_gid = tswap32(st.st_gid);
3554 #elif defined(TARGET_SPARC64)
3555 target_st->st_mode = tswap32(st.st_mode);
3556 target_st->st_uid = tswap32(st.st_uid);
3557 target_st->st_gid = tswap32(st.st_gid);
3558 #else
3559 target_st->st_mode = tswap16(st.st_mode);
3560 target_st->st_uid = tswap16(st.st_uid);
3561 target_st->st_gid = tswap16(st.st_gid);
3562 #endif
3563 #if defined(TARGET_MIPS)
3564 /* If this is the same on PPC, then just merge w/ the above ifdef */
3565 target_st->st_nlink = tswapl(st.st_nlink);
3566 target_st->st_rdev = tswapl(st.st_rdev);
3567 #elif defined(TARGET_SPARC64)
3568 target_st->st_nlink = tswap32(st.st_nlink);
3569 target_st->st_rdev = tswap32(st.st_rdev);
3570 #else
3571 target_st->st_nlink = tswap16(st.st_nlink);
3572 target_st->st_rdev = tswap16(st.st_rdev);
3573 #endif
3574 target_st->st_size = tswapl(st.st_size);
3575 target_st->st_blksize = tswapl(st.st_blksize);
3576 target_st->st_blocks = tswapl(st.st_blocks);
3577 target_st->target_st_atime = tswapl(st.st_atime);
3578 target_st->target_st_mtime = tswapl(st.st_mtime);
3579 target_st->target_st_ctime = tswapl(st.st_ctime);
3580 unlock_user_struct(target_st, arg2, 1);
3581 }
3582 }
3583 break;
3584 #ifdef TARGET_NR_olduname
3585 case TARGET_NR_olduname:
3586 goto unimplemented;
3587 #endif
3588 #ifdef TARGET_NR_iopl
3589 case TARGET_NR_iopl:
3590 goto unimplemented;
3591 #endif
3592 case TARGET_NR_vhangup:
3593 ret = get_errno(vhangup());
3594 break;
3595 #ifdef TARGET_NR_idle
3596 case TARGET_NR_idle:
3597 goto unimplemented;
3598 #endif
3599 #ifdef TARGET_NR_syscall
3600 case TARGET_NR_syscall:
3601 ret = do_syscall(cpu_env,arg1 & 0xffff,arg2,arg3,arg4,arg5,arg6,0);
3602 break;
3603 #endif
3604 case TARGET_NR_wait4:
3605 {
3606 int status;
3607 target_long status_ptr = arg2;
3608 struct rusage rusage, *rusage_ptr;
3609 target_ulong target_rusage = arg4;
3610 if (target_rusage)
3611 rusage_ptr = &rusage;
3612 else
3613 rusage_ptr = NULL;
3614 ret = get_errno(wait4(arg1, &status, arg3, rusage_ptr));
3615 if (!is_error(ret)) {
3616 if (status_ptr)
3617 tputl(status_ptr, status);
3618 if (target_rusage) {
3619 host_to_target_rusage(target_rusage, &rusage);
3620 }
3621 }
3622 }
3623 break;
3624 #ifdef TARGET_NR_swapoff
3625 case TARGET_NR_swapoff:
3626 p = lock_user_string(arg1);
3627 ret = get_errno(swapoff(p));
3628 unlock_user(p, arg1, 0);
3629 break;
3630 #endif
3631 case TARGET_NR_sysinfo:
3632 {
3633 struct target_sysinfo *target_value;
3634 struct sysinfo value;
3635 ret = get_errno(sysinfo(&value));
3636 if (!is_error(ret) && arg1)
3637 {
3638 /* ??? __put_user is probably wrong. */
3639 lock_user_struct(target_value, arg1, 0);
3640 __put_user(value.uptime, &target_value->uptime);
3641 __put_user(value.loads[0], &target_value->loads[0]);
3642 __put_user(value.loads[1], &target_value->loads[1]);
3643 __put_user(value.loads[2], &target_value->loads[2]);
3644 __put_user(value.totalram, &target_value->totalram);
3645 __put_user(value.freeram, &target_value->freeram);
3646 __put_user(value.sharedram, &target_value->sharedram);
3647 __put_user(value.bufferram, &target_value->bufferram);
3648 __put_user(value.totalswap, &target_value->totalswap);
3649 __put_user(value.freeswap, &target_value->freeswap);
3650 __put_user(value.procs, &target_value->procs);
3651 __put_user(value.totalhigh, &target_value->totalhigh);
3652 __put_user(value.freehigh, &target_value->freehigh);
3653 __put_user(value.mem_unit, &target_value->mem_unit);
3654 unlock_user_struct(target_value, arg1, 1);
3655 }
3656 }
3657 break;
3658 #ifdef TARGET_NR_ipc
3659 case TARGET_NR_ipc:
3660 ret = do_ipc(arg1, arg2, arg3, arg4, arg5, arg6);
3661 break;
3662 #endif
3663 case TARGET_NR_fsync:
3664 ret = get_errno(fsync(arg1));
3665 break;
3666 case TARGET_NR_clone:
3667 ret = get_errno(do_fork(cpu_env, arg1, arg2));
3668 break;
3669 #ifdef __NR_exit_group
3670 /* new thread calls */
3671 case TARGET_NR_exit_group:
3672 gdb_exit(cpu_env, arg1);
3673 ret = get_errno(exit_group(arg1));
3674 break;
3675 #endif
3676 case TARGET_NR_setdomainname:
3677 p = lock_user_string(arg1);
3678 ret = get_errno(setdomainname(p, arg2));
3679 unlock_user(p, arg1, 0);
3680 break;
3681 case TARGET_NR_uname:
3682 /* no need to transcode because we use the linux syscall */
3683 {
3684 struct new_utsname * buf;
3685
3686 lock_user_struct(buf, arg1, 0);
3687 ret = get_errno(sys_uname(buf));
3688 if (!is_error(ret)) {
3689 /* Overrite the native machine name with whatever is being
3690 emulated. */
3691 strcpy (buf->machine, UNAME_MACHINE);
3692 /* Allow the user to override the reported release. */
3693 if (qemu_uname_release && *qemu_uname_release)
3694 strcpy (buf->release, qemu_uname_release);
3695 }
3696 unlock_user_struct(buf, arg1, 1);
3697 }
3698 break;
3699 #ifdef TARGET_I386
3700 case TARGET_NR_modify_ldt:
3701 ret = get_errno(do_modify_ldt(cpu_env, arg1, arg2, arg3));
3702 break;
3703 #if !defined(TARGET_X86_64)
3704 case TARGET_NR_vm86old:
3705 goto unimplemented;
3706 case TARGET_NR_vm86:
3707 ret = do_vm86(cpu_env, arg1, arg2);
3708 break;
3709 #endif
3710 #endif
3711 case TARGET_NR_adjtimex:
3712 goto unimplemented;
3713 #ifdef TARGET_NR_create_module
3714 case TARGET_NR_create_module:
3715 #endif
3716 case TARGET_NR_init_module:
3717 case TARGET_NR_delete_module:
3718 #ifdef TARGET_NR_get_kernel_syms
3719 case TARGET_NR_get_kernel_syms:
3720 #endif
3721 goto unimplemented;
3722 case TARGET_NR_quotactl:
3723 goto unimplemented;
3724 case TARGET_NR_getpgid:
3725 ret = get_errno(getpgid(arg1));
3726 break;
3727 case TARGET_NR_fchdir:
3728 ret = get_errno(fchdir(arg1));
3729 break;
3730 #ifdef TARGET_NR_bdflush /* not on x86_64 */
3731 case TARGET_NR_bdflush:
3732 goto unimplemented;
3733 #endif
3734 #ifdef TARGET_NR_sysfs
3735 case TARGET_NR_sysfs:
3736 goto unimplemented;
3737 #endif
3738 case TARGET_NR_personality:
3739 ret = get_errno(personality(arg1));
3740 break;
3741 #ifdef TARGET_NR_afs_syscall
3742 case TARGET_NR_afs_syscall:
3743 goto unimplemented;
3744 #endif
3745 #ifdef TARGET_NR__llseek /* Not on alpha */
3746 case TARGET_NR__llseek:
3747 {
3748 #if defined (__x86_64__)
3749 ret = get_errno(lseek(arg1, ((uint64_t )arg2 << 32) | arg3, arg5));
3750 tput64(arg4, ret);
3751 #else
3752 int64_t res;
3753 ret = get_errno(_llseek(arg1, arg2, arg3, &res, arg5));
3754 tput64(arg4, res);
3755 #endif
3756 }
3757 break;
3758 #endif
3759 case TARGET_NR_getdents:
3760 #if TARGET_LONG_SIZE != 4
3761 goto unimplemented;
3762 #warning not supported
3763 #elif TARGET_LONG_SIZE == 4 && HOST_LONG_SIZE == 8
3764 {
3765 struct target_dirent *target_dirp;
3766 struct dirent *dirp;
3767 long count = arg3;
3768
3769 dirp = malloc(count);
3770 if (!dirp)
3771 return -ENOMEM;
3772
3773 ret = get_errno(sys_getdents(arg1, dirp, count));
3774 if (!is_error(ret)) {
3775 struct dirent *de;
3776 struct target_dirent *tde;
3777 int len = ret;
3778 int reclen, treclen;
3779 int count1, tnamelen;
3780
3781 count1 = 0;
3782 de = dirp;
3783 target_dirp = lock_user(arg2, count, 0);
3784 tde = target_dirp;
3785 while (len > 0) {
3786 reclen = de->d_reclen;
3787 treclen = reclen - (2 * (sizeof(long) - sizeof(target_long)));
3788 tde->d_reclen = tswap16(treclen);
3789 tde->d_ino = tswapl(de->d_ino);
3790 tde->d_off = tswapl(de->d_off);
3791 tnamelen = treclen - (2 * sizeof(target_long) + 2);
3792 if (tnamelen > 256)
3793 tnamelen = 256;
3794 /* XXX: may not be correct */
3795 strncpy(tde->d_name, de->d_name, tnamelen);
3796 de = (struct dirent *)((char *)de + reclen);
3797 len -= reclen;
3798 tde = (struct target_dirent *)((char *)tde + treclen);
3799 count1 += treclen;
3800 }
3801 ret = count1;
3802 }
3803 unlock_user(target_dirp, arg2, ret);
3804 free(dirp);
3805 }
3806 #else
3807 {
3808 struct dirent *dirp;
3809 long count = arg3;
3810
3811 dirp = lock_user(arg2, count, 0);
3812 ret = get_errno(sys_getdents(arg1, dirp, count));
3813 if (!is_error(ret)) {
3814 struct dirent *de;
3815 int len = ret;
3816 int reclen;
3817 de = dirp;
3818 while (len > 0) {
3819 reclen = de->d_reclen;
3820 if (reclen > len)
3821 break;
3822 de->d_reclen = tswap16(reclen);
3823 tswapls(&de->d_ino);
3824 tswapls(&de->d_off);
3825 de = (struct dirent *)((char *)de + reclen);
3826 len -= reclen;
3827 }
3828 }
3829 unlock_user(dirp, arg2, ret);
3830 }
3831 #endif
3832 break;
3833 #ifdef TARGET_NR_getdents64
3834 case TARGET_NR_getdents64:
3835 {
3836 struct dirent64 *dirp;
3837 long count = arg3;
3838 dirp = lock_user(arg2, count, 0);
3839 ret = get_errno(sys_getdents64(arg1, dirp, count));
3840 if (!is_error(ret)) {
3841 struct dirent64 *de;
3842 int len = ret;
3843 int reclen;
3844 de = dirp;
3845 while (len > 0) {
3846 reclen = de->d_reclen;
3847 if (reclen > len)
3848 break;
3849 de->d_reclen = tswap16(reclen);
3850 tswap64s(&de->d_ino);
3851 tswap64s(&de->d_off);
3852 de = (struct dirent64 *)((char *)de + reclen);
3853 len -= reclen;
3854 }
3855 }
3856 unlock_user(dirp, arg2, ret);
3857 }
3858 break;
3859 #endif /* TARGET_NR_getdents64 */
3860 #ifdef TARGET_NR__newselect
3861 case TARGET_NR__newselect:
3862 ret = do_select(arg1, arg2, arg3, arg4, arg5);
3863 break;
3864 #endif
3865 #ifdef TARGET_NR_poll
3866 case TARGET_NR_poll:
3867 {
3868 struct target_pollfd *target_pfd;
3869 unsigned int nfds = arg2;
3870 int timeout = arg3;
3871 struct pollfd *pfd;
3872 unsigned int i;
3873
3874 target_pfd = lock_user(arg1, sizeof(struct target_pollfd) * nfds, 1);
3875 pfd = alloca(sizeof(struct pollfd) * nfds);
3876 for(i = 0; i < nfds; i++) {
3877 pfd[i].fd = tswap32(target_pfd[i].fd);
3878 pfd[i].events = tswap16(target_pfd[i].events);
3879 }
3880 ret = get_errno(poll(pfd, nfds, timeout));
3881 if (!is_error(ret)) {
3882 for(i = 0; i < nfds; i++) {
3883 target_pfd[i].revents = tswap16(pfd[i].revents);
3884 }
3885 ret += nfds * (sizeof(struct target_pollfd)
3886 - sizeof(struct pollfd));
3887 }
3888 unlock_user(target_pfd, arg1, ret);
3889 }
3890 break;
3891 #endif
3892 case TARGET_NR_flock:
3893 /* NOTE: the flock constant seems to be the same for every
3894 Linux platform */
3895 ret = get_errno(flock(arg1, arg2));
3896 break;
3897 case TARGET_NR_readv:
3898 {
3899 int count = arg3;
3900 struct iovec *vec;
3901
3902 vec = alloca(count * sizeof(struct iovec));
3903 lock_iovec(vec, arg2, count, 0);
3904 ret = get_errno(readv(arg1, vec, count));
3905 unlock_iovec(vec, arg2, count, 1);
3906 }
3907 break;
3908 case TARGET_NR_writev:
3909 {
3910 int count = arg3;
3911 struct iovec *vec;
3912
3913 vec = alloca(count * sizeof(struct iovec));
3914 lock_iovec(vec, arg2, count, 1);
3915 ret = get_errno(writev(arg1, vec, count));
3916 unlock_iovec(vec, arg2, count, 0);
3917 }
3918 break;
3919 case TARGET_NR_getsid:
3920 ret = get_errno(getsid(arg1));
3921 break;
3922 #if defined(TARGET_NR_fdatasync) /* Not on alpha (osf_datasync ?) */
3923 case TARGET_NR_fdatasync:
3924 ret = get_errno(fdatasync(arg1));
3925 break;
3926 #endif
3927 case TARGET_NR__sysctl:
3928 /* We don't implement this, but ENODIR is always a safe
3929 return value. */
3930 return -ENOTDIR;
3931 case TARGET_NR_sched_setparam:
3932 {
3933 struct sched_param *target_schp;
3934 struct sched_param schp;
3935
3936 lock_user_struct(target_schp, arg2, 1);
3937 schp.sched_priority = tswap32(target_schp->sched_priority);
3938 unlock_user_struct(target_schp, arg2, 0);
3939 ret = get_errno(sched_setparam(arg1, &schp));
3940 }
3941 break;
3942 case TARGET_NR_sched_getparam:
3943 {
3944 struct sched_param *target_schp;
3945 struct sched_param schp;
3946 ret = get_errno(sched_getparam(arg1, &schp));
3947 if (!is_error(ret)) {
3948 lock_user_struct(target_schp, arg2, 0);
3949 target_schp->sched_priority = tswap32(schp.sched_priority);
3950 unlock_user_struct(target_schp, arg2, 1);
3951 }
3952 }
3953 break;
3954 case TARGET_NR_sched_setscheduler:
3955 {
3956 struct sched_param *target_schp;
3957 struct sched_param schp;
3958 lock_user_struct(target_schp, arg3, 1);
3959 schp.sched_priority = tswap32(target_schp->sched_priority);
3960 unlock_user_struct(target_schp, arg3, 0);
3961 ret = get_errno(sched_setscheduler(arg1, arg2, &schp));
3962 }
3963 break;
3964 case TARGET_NR_sched_getscheduler:
3965 ret = get_errno(sched_getscheduler(arg1));
3966 break;
3967 case TARGET_NR_sched_yield:
3968 ret = get_errno(sched_yield());
3969 break;
3970 case TARGET_NR_sched_get_priority_max:
3971 ret = get_errno(sched_get_priority_max(arg1));
3972 break;
3973 case TARGET_NR_sched_get_priority_min:
3974 ret = get_errno(sched_get_priority_min(arg1));
3975 break;
3976 case TARGET_NR_sched_rr_get_interval:
3977 {
3978 struct timespec ts;
3979 ret = get_errno(sched_rr_get_interval(arg1, &ts));
3980 if (!is_error(ret)) {
3981 host_to_target_timespec(arg2, &ts);
3982 }
3983 }
3984 break;
3985 case TARGET_NR_nanosleep:
3986 {
3987 struct timespec req, rem;
3988 target_to_host_timespec(&req, arg1);
3989 ret = get_errno(nanosleep(&req, &rem));
3990 if (is_error(ret) && arg2) {
3991 host_to_target_timespec(arg2, &rem);
3992 }
3993 }
3994 break;
3995 #ifdef TARGET_NR_query_module
3996 case TARGET_NR_query_module:
3997 goto unimplemented;
3998 #endif
3999 #ifdef TARGET_NR_nfsservctl
4000 case TARGET_NR_nfsservctl:
4001 goto unimplemented;
4002 #endif
4003 case TARGET_NR_prctl:
4004 switch (arg1)
4005 {
4006 case PR_GET_PDEATHSIG:
4007 {
4008 int deathsig;
4009 ret = get_errno(prctl(arg1, &deathsig, arg3, arg4, arg5));
4010 if (!is_error(ret) && arg2)
4011 tput32(arg2, deathsig);
4012 }
4013 break;
4014 default:
4015 ret = get_errno(prctl(arg1, arg2, arg3, arg4, arg5));
4016 break;
4017 }
4018 break;
4019 #ifdef TARGET_NR_pread
4020 case TARGET_NR_pread:
4021 page_unprotect_range(arg2, arg3);
4022 p = lock_user(arg2, arg3, 0);
4023 ret = get_errno(pread(arg1, p, arg3, arg4));
4024 unlock_user(p, arg2, ret);
4025 break;
4026 case TARGET_NR_pwrite:
4027 p = lock_user(arg2, arg3, 1);
4028 ret = get_errno(pwrite(arg1, p, arg3, arg4));
4029 unlock_user(p, arg2, 0);
4030 break;
4031 #endif
4032 case TARGET_NR_getcwd:
4033 p = lock_user(arg1, arg2, 0);
4034 ret = get_errno(sys_getcwd1(p, arg2));
4035 unlock_user(p, arg1, ret);
4036 break;
4037 case TARGET_NR_capget:
4038 goto unimplemented;
4039 case TARGET_NR_capset:
4040 goto unimplemented;
4041 case TARGET_NR_sigaltstack:
4042 goto unimplemented;
4043 case TARGET_NR_sendfile:
4044 goto unimplemented;
4045 #ifdef TARGET_NR_getpmsg
4046 case TARGET_NR_getpmsg:
4047 goto unimplemented;
4048 #endif
4049 #ifdef TARGET_NR_putpmsg
4050 case TARGET_NR_putpmsg:
4051 goto unimplemented;
4052 #endif
4053 #ifdef TARGET_NR_vfork
4054 case TARGET_NR_vfork:
4055 ret = get_errno(do_fork(cpu_env, CLONE_VFORK | CLONE_VM | SIGCHLD, 0));
4056 break;
4057 #endif
4058 #ifdef TARGET_NR_ugetrlimit
4059 case TARGET_NR_ugetrlimit:
4060 {
4061 struct rlimit rlim;
4062 ret = get_errno(getrlimit(arg1, &rlim));
4063 if (!is_error(ret)) {
4064 struct target_rlimit *target_rlim;
4065 lock_user_struct(target_rlim, arg2, 0);
4066 target_rlim->rlim_cur = tswapl(rlim.rlim_cur);
4067 target_rlim->rlim_max = tswapl(rlim.rlim_max);
4068 unlock_user_struct(target_rlim, arg2, 1);
4069 }
4070 break;
4071 }
4072 #endif
4073 #ifdef TARGET_NR_truncate64
4074 case TARGET_NR_truncate64:
4075 p = lock_user_string(arg1);
4076 ret = target_truncate64(cpu_env, p, arg2, arg3, arg4);
4077 unlock_user(p, arg1, 0);
4078 break;
4079 #endif
4080 #ifdef TARGET_NR_ftruncate64
4081 case TARGET_NR_ftruncate64:
4082 ret = target_ftruncate64(cpu_env, arg1, arg2, arg3, arg4);
4083 break;
4084 #endif
4085 #ifdef TARGET_NR_stat64
4086 case TARGET_NR_stat64:
4087 p = lock_user_string(arg1);
4088 ret = get_errno(stat(path(p), &st));
4089 unlock_user(p, arg1, 0);
4090 goto do_stat64;
4091 #endif
4092 #ifdef TARGET_NR_lstat64
4093 case TARGET_NR_lstat64:
4094 p = lock_user_string(arg1);
4095 ret = get_errno(lstat(path(p), &st));
4096 unlock_user(p, arg1, 0);
4097 goto do_stat64;
4098 #endif
4099 #ifdef TARGET_NR_fstat64
4100 case TARGET_NR_fstat64:
4101 {
4102 ret = get_errno(fstat(arg1, &st));
4103 do_stat64:
4104 if (!is_error(ret)) {
4105 #ifdef TARGET_ARM
4106 if (((CPUARMState *)cpu_env)->eabi) {
4107 struct target_eabi_stat64 *target_st;
4108 lock_user_struct(target_st, arg2, 1);
4109 memset(target_st, 0, sizeof(struct target_eabi_stat64));
4110 /* put_user is probably wrong. */
4111 put_user(st.st_dev, &target_st->st_dev);
4112 put_user(st.st_ino, &target_st->st_ino);
4113 #ifdef TARGET_STAT64_HAS_BROKEN_ST_INO
4114 put_user(st.st_ino, &target_st->__st_ino);
4115 #endif
4116 put_user(st.st_mode, &target_st->st_mode);
4117 put_user(st.st_nlink, &target_st->st_nlink);
4118 put_user(st.st_uid, &target_st->st_uid);
4119 put_user(st.st_gid, &target_st->st_gid);
4120 put_user(st.st_rdev, &target_st->st_rdev);
4121 /* XXX: better use of kernel struct */
4122 put_user(st.st_size, &target_st->st_size);
4123 put_user(st.st_blksize, &target_st->st_blksize);
4124 put_user(st.st_blocks, &target_st->st_blocks);
4125 put_user(st.st_atime, &target_st->target_st_atime);
4126 put_user(st.st_mtime, &target_st->target_st_mtime);
4127 put_user(st.st_ctime, &target_st->target_st_ctime);
4128 unlock_user_struct(target_st, arg2, 0);
4129 } else
4130 #endif
4131 {
4132 struct target_stat64 *target_st;
4133 lock_user_struct(target_st, arg2, 1);
4134 memset(target_st, 0, sizeof(struct target_stat64));
4135 /* ??? put_user is probably wrong. */
4136 put_user(st.st_dev, &target_st->st_dev);
4137 put_user(st.st_ino, &target_st->st_ino);
4138 #ifdef TARGET_STAT64_HAS_BROKEN_ST_INO
4139 put_user(st.st_ino, &target_st->__st_ino);
4140 #endif
4141 put_user(st.st_mode, &target_st->st_mode);
4142 put_user(st.st_nlink, &target_st->st_nlink);
4143 put_user(st.st_uid, &target_st->st_uid);
4144 put_user(st.st_gid, &target_st->st_gid);
4145 put_user(st.st_rdev, &target_st->st_rdev);
4146 /* XXX: better use of kernel struct */
4147 put_user(st.st_size, &target_st->st_size);
4148 put_user(st.st_blksize, &target_st->st_blksize);
4149 put_user(st.st_blocks, &target_st->st_blocks);
4150 put_user(st.st_atime, &target_st->target_st_atime);
4151 put_user(st.st_mtime, &target_st->target_st_mtime);
4152 put_user(st.st_ctime, &target_st->target_st_ctime);
4153 unlock_user_struct(target_st, arg2, 0);
4154 }
4155 }
4156 }
4157 break;
4158 #endif
4159 #ifdef USE_UID16
4160 case TARGET_NR_lchown:
4161 p = lock_user_string(arg1);
4162 ret = get_errno(lchown(p, low2highuid(arg2), low2highgid(arg3)));
4163 unlock_user(p, arg1, 0);
4164 break;
4165 case TARGET_NR_getuid:
4166 ret = get_errno(high2lowuid(getuid()));
4167 break;
4168 case TARGET_NR_getgid:
4169 ret = get_errno(high2lowgid(getgid()));
4170 break;
4171 case TARGET_NR_geteuid:
4172 ret = get_errno(high2lowuid(geteuid()));
4173 break;
4174 case TARGET_NR_getegid:
4175 ret = get_errno(high2lowgid(getegid()));
4176 break;
4177 case TARGET_NR_setreuid:
4178 ret = get_errno(setreuid(low2highuid(arg1), low2highuid(arg2)));
4179 break;
4180 case TARGET_NR_setregid:
4181 ret = get_errno(setregid(low2highgid(arg1), low2highgid(arg2)));
4182 break;
4183 case TARGET_NR_getgroups:
4184 {
4185 int gidsetsize = arg1;
4186 uint16_t *target_grouplist;
4187 gid_t *grouplist;
4188 int i;
4189
4190 grouplist = alloca(gidsetsize * sizeof(gid_t));
4191 ret = get_errno(getgroups(gidsetsize, grouplist));
4192 if (!is_error(ret)) {
4193 target_grouplist = lock_user(arg2, gidsetsize * 2, 0);
4194 for(i = 0;i < gidsetsize; i++)
4195 target_grouplist[i] = tswap16(grouplist[i]);
4196 unlock_user(target_grouplist, arg2, gidsetsize * 2);
4197 }
4198 }
4199 break;
4200 case TARGET_NR_setgroups:
4201 {
4202 int gidsetsize = arg1;
4203 uint16_t *target_grouplist;
4204 gid_t *grouplist;
4205 int i;
4206
4207 grouplist = alloca(gidsetsize * sizeof(gid_t));
4208 target_grouplist = lock_user(arg2, gidsetsize * 2, 1);
4209 for(i = 0;i < gidsetsize; i++)
4210 grouplist[i] = tswap16(target_grouplist[i]);
4211 unlock_user(target_grouplist, arg2, 0);
4212 ret = get_errno(setgroups(gidsetsize, grouplist));
4213 }
4214 break;
4215 case TARGET_NR_fchown:
4216 ret = get_errno(fchown(arg1, low2highuid(arg2), low2highgid(arg3)));
4217 break;
4218 #ifdef TARGET_NR_setresuid
4219 case TARGET_NR_setresuid:
4220 ret = get_errno(setresuid(low2highuid(arg1),
4221 low2highuid(arg2),
4222 low2highuid(arg3)));
4223 break;
4224 #endif
4225 #ifdef TARGET_NR_getresuid
4226 case TARGET_NR_getresuid:
4227 {
4228 uid_t ruid, euid, suid;
4229 ret = get_errno(getresuid(&ruid, &euid, &suid));
4230 if (!is_error(ret)) {
4231 tput16(arg1, tswap16(high2lowuid(ruid)));
4232 tput16(arg2, tswap16(high2lowuid(euid)));
4233 tput16(arg3, tswap16(high2lowuid(suid)));
4234 }
4235 }
4236 break;
4237 #endif
4238 #ifdef TARGET_NR_getresgid
4239 case TARGET_NR_setresgid:
4240 ret = get_errno(setresgid(low2highgid(arg1),
4241 low2highgid(arg2),
4242 low2highgid(arg3)));
4243 break;
4244 #endif
4245 #ifdef TARGET_NR_getresgid
4246 case TARGET_NR_getresgid:
4247 {
4248 gid_t rgid, egid, sgid;
4249 ret = get_errno(getresgid(&rgid, &egid, &sgid));
4250 if (!is_error(ret)) {
4251 tput16(arg1, tswap16(high2lowgid(rgid)));
4252 tput16(arg2, tswap16(high2lowgid(egid)));
4253 tput16(arg3, tswap16(high2lowgid(sgid)));
4254 }
4255 }
4256 break;
4257 #endif
4258 case TARGET_NR_chown:
4259 p = lock_user_string(arg1);
4260 ret = get_errno(chown(p, low2highuid(arg2), low2highgid(arg3)));
4261 unlock_user(p, arg1, 0);
4262 break;
4263 case TARGET_NR_setuid:
4264 ret = get_errno(setuid(low2highuid(arg1)));
4265 break;
4266 case TARGET_NR_setgid:
4267 ret = get_errno(setgid(low2highgid(arg1)));
4268 break;
4269 case TARGET_NR_setfsuid:
4270 ret = get_errno(setfsuid(arg1));
4271 break;
4272 case TARGET_NR_setfsgid:
4273 ret = get_errno(setfsgid(arg1));
4274 break;
4275 #endif /* USE_UID16 */
4276
4277 #ifdef TARGET_NR_lchown32
4278 case TARGET_NR_lchown32:
4279 p = lock_user_string(arg1);
4280 ret = get_errno(lchown(p, arg2, arg3));
4281 unlock_user(p, arg1, 0);
4282 break;
4283 #endif
4284 #ifdef TARGET_NR_getuid32
4285 case TARGET_NR_getuid32:
4286 ret = get_errno(getuid());
4287 break;
4288 #endif
4289 #ifdef TARGET_NR_getgid32
4290 case TARGET_NR_getgid32:
4291 ret = get_errno(getgid());
4292 break;
4293 #endif
4294 #ifdef TARGET_NR_geteuid32
4295 case TARGET_NR_geteuid32:
4296 ret = get_errno(geteuid());
4297 break;
4298 #endif
4299 #ifdef TARGET_NR_getegid32
4300 case TARGET_NR_getegid32:
4301 ret = get_errno(getegid());
4302 break;
4303 #endif
4304 #ifdef TARGET_NR_setreuid32
4305 case TARGET_NR_setreuid32:
4306 ret = get_errno(setreuid(arg1, arg2));
4307 break;
4308 #endif
4309 #ifdef TARGET_NR_setregid32
4310 case TARGET_NR_setregid32:
4311 ret = get_errno(setregid(arg1, arg2));
4312 break;
4313 #endif
4314 #ifdef TARGET_NR_getgroups32
4315 case TARGET_NR_getgroups32:
4316 {
4317 int gidsetsize = arg1;
4318 uint32_t *target_grouplist;
4319 gid_t *grouplist;
4320 int i;
4321
4322 grouplist = alloca(gidsetsize * sizeof(gid_t));
4323 ret = get_errno(getgroups(gidsetsize, grouplist));
4324 if (!is_error(ret)) {
4325 target_grouplist = lock_user(arg2, gidsetsize * 4, 0);
4326 for(i = 0;i < gidsetsize; i++)
4327 target_grouplist[i] = tswap32(grouplist[i]);
4328 unlock_user(target_grouplist, arg2, gidsetsize * 4);
4329 }
4330 }
4331 break;
4332 #endif
4333 #ifdef TARGET_NR_setgroups32
4334 case TARGET_NR_setgroups32:
4335 {
4336 int gidsetsize = arg1;
4337 uint32_t *target_grouplist;
4338 gid_t *grouplist;
4339 int i;
4340
4341 grouplist = alloca(gidsetsize * sizeof(gid_t));
4342 target_grouplist = lock_user(arg2, gidsetsize * 4, 1);
4343 for(i = 0;i < gidsetsize; i++)
4344 grouplist[i] = tswap32(target_grouplist[i]);
4345 unlock_user(target_grouplist, arg2, 0);
4346 ret = get_errno(setgroups(gidsetsize, grouplist));
4347 }
4348 break;
4349 #endif
4350 #ifdef TARGET_NR_fchown32
4351 case TARGET_NR_fchown32:
4352 ret = get_errno(fchown(arg1, arg2, arg3));
4353 break;
4354 #endif
4355 #ifdef TARGET_NR_setresuid32
4356 case TARGET_NR_setresuid32:
4357 ret = get_errno(setresuid(arg1, arg2, arg3));
4358 break;
4359 #endif
4360 #ifdef TARGET_NR_getresuid32
4361 case TARGET_NR_getresuid32:
4362 {
4363 uid_t ruid, euid, suid;
4364 ret = get_errno(getresuid(&ruid, &euid, &suid));
4365 if (!is_error(ret)) {
4366 tput32(arg1, tswap32(ruid));
4367 tput32(arg2, tswap32(euid));
4368 tput32(arg3, tswap32(suid));
4369 }
4370 }
4371 break;
4372 #endif
4373 #ifdef TARGET_NR_setresgid32
4374 case TARGET_NR_setresgid32:
4375 ret = get_errno(setresgid(arg1, arg2, arg3));
4376 break;
4377 #endif
4378 #ifdef TARGET_NR_getresgid32
4379 case TARGET_NR_getresgid32:
4380 {
4381 gid_t rgid, egid, sgid;
4382 ret = get_errno(getresgid(&rgid, &egid, &sgid));
4383 if (!is_error(ret)) {
4384 tput32(arg1, tswap32(rgid));
4385 tput32(arg2, tswap32(egid));
4386 tput32(arg3, tswap32(sgid));
4387 }
4388 }
4389 break;
4390 #endif
4391 #ifdef TARGET_NR_chown32
4392 case TARGET_NR_chown32:
4393 p = lock_user_string(arg1);
4394 ret = get_errno(chown(p, arg2, arg3));
4395 unlock_user(p, arg1, 0);
4396 break;
4397 #endif
4398 #ifdef TARGET_NR_setuid32
4399 case TARGET_NR_setuid32:
4400 ret = get_errno(setuid(arg1));
4401 break;
4402 #endif
4403 #ifdef TARGET_NR_setgid32
4404 case TARGET_NR_setgid32:
4405 ret = get_errno(setgid(arg1));
4406 break;
4407 #endif
4408 #ifdef TARGET_NR_setfsuid32
4409 case TARGET_NR_setfsuid32:
4410 ret = get_errno(setfsuid(arg1));
4411 break;
4412 #endif
4413 #ifdef TARGET_NR_setfsgid32
4414 case TARGET_NR_setfsgid32:
4415 ret = get_errno(setfsgid(arg1));
4416 break;
4417 #endif
4418
4419 case TARGET_NR_pivot_root:
4420 goto unimplemented;
4421 #ifdef TARGET_NR_mincore
4422 case TARGET_NR_mincore:
4423 goto unimplemented;
4424 #endif
4425 #ifdef TARGET_NR_madvise
4426 case TARGET_NR_madvise:
4427 /* A straight passthrough may not be safe because qemu sometimes
4428 turns private flie-backed mappings into anonymous mappings.
4429 This will break MADV_DONTNEED.
4430 This is a hint, so ignoring and returning success is ok. */
4431 ret = get_errno(0);
4432 break;
4433 #endif
4434 #if TARGET_LONG_BITS == 32
4435 case TARGET_NR_fcntl64:
4436 {
4437 int cmd;
4438 struct flock64 fl;
4439 struct target_flock64 *target_fl;
4440 #ifdef TARGET_ARM
4441 struct target_eabi_flock64 *target_efl;
4442 #endif
4443
4444 switch(arg2){
4445 case TARGET_F_GETLK64:
4446 cmd = F_GETLK64;
4447 break;
4448 case TARGET_F_SETLK64:
4449 cmd = F_SETLK64;
4450 break;
4451 case TARGET_F_SETLKW64:
4452 cmd = F_SETLK64;
4453 break;
4454 default:
4455 cmd = arg2;
4456 break;
4457 }
4458
4459 switch(arg2) {
4460 case TARGET_F_GETLK64:
4461 #ifdef TARGET_ARM
4462 if (((CPUARMState *)cpu_env)->eabi) {
4463 lock_user_struct(target_efl, arg3, 1);
4464 fl.l_type = tswap16(target_efl->l_type);
4465 fl.l_whence = tswap16(target_efl->l_whence);
4466 fl.l_start = tswap64(target_efl->l_start);
4467 fl.l_len = tswap64(target_efl->l_len);
4468 fl.l_pid = tswapl(target_efl->l_pid);
4469 unlock_user_struct(target_efl, arg3, 0);
4470 } else
4471 #endif
4472 {
4473 lock_user_struct(target_fl, arg3, 1);
4474 fl.l_type = tswap16(target_fl->l_type);
4475 fl.l_whence = tswap16(target_fl->l_whence);
4476 fl.l_start = tswap64(target_fl->l_start);
4477 fl.l_len = tswap64(target_fl->l_len);
4478 fl.l_pid = tswapl(target_fl->l_pid);
4479 unlock_user_struct(target_fl, arg3, 0);
4480 }
4481 ret = get_errno(fcntl(arg1, cmd, &fl));
4482 if (ret == 0) {
4483 #ifdef TARGET_ARM
4484 if (((CPUARMState *)cpu_env)->eabi) {
4485 lock_user_struct(target_efl, arg3, 0);
4486 target_efl->l_type = tswap16(fl.l_type);
4487 target_efl->l_whence = tswap16(fl.l_whence);
4488 target_efl->l_start = tswap64(fl.l_start);
4489 target_efl->l_len = tswap64(fl.l_len);
4490 target_efl->l_pid = tswapl(fl.l_pid);
4491 unlock_user_struct(target_efl, arg3, 1);
4492 } else
4493 #endif
4494 {
4495 lock_user_struct(target_fl, arg3, 0);
4496 target_fl->l_type = tswap16(fl.l_type);
4497 target_fl->l_whence = tswap16(fl.l_whence);
4498 target_fl->l_start = tswap64(fl.l_start);
4499 target_fl->l_len = tswap64(fl.l_len);
4500 target_fl->l_pid = tswapl(fl.l_pid);
4501 unlock_user_struct(target_fl, arg3, 1);
4502 }
4503 }
4504 break;
4505
4506 case TARGET_F_SETLK64:
4507 case TARGET_F_SETLKW64:
4508 #ifdef TARGET_ARM
4509 if (((CPUARMState *)cpu_env)->eabi) {
4510 lock_user_struct(target_efl, arg3, 1);
4511 fl.l_type = tswap16(target_efl->l_type);
4512 fl.l_whence = tswap16(target_efl->l_whence);
4513 fl.l_start = tswap64(target_efl->l_start);
4514 fl.l_len = tswap64(target_efl->l_len);
4515 fl.l_pid = tswapl(target_efl->l_pid);
4516 unlock_user_struct(target_efl, arg3, 0);
4517 } else
4518 #endif
4519 {
4520 lock_user_struct(target_fl, arg3, 1);
4521 fl.l_type = tswap16(target_fl->l_type);
4522 fl.l_whence = tswap16(target_fl->l_whence);
4523 fl.l_start = tswap64(target_fl->l_start);
4524 fl.l_len = tswap64(target_fl->l_len);
4525 fl.l_pid = tswapl(target_fl->l_pid);
4526 unlock_user_struct(target_fl, arg3, 0);
4527 }
4528 ret = get_errno(fcntl(arg1, cmd, &fl));
4529 break;
4530 default:
4531 ret = get_errno(do_fcntl(arg1, cmd, arg3));
4532 break;
4533 }
4534 break;
4535 }
4536 #endif
4537 #ifdef TARGET_NR_cacheflush
4538 case TARGET_NR_cacheflush:
4539 /* self-modifying code is handled automatically, so nothing needed */
4540 ret = 0;
4541 break;
4542 #endif
4543 #ifdef TARGET_NR_security
4544 case TARGET_NR_security:
4545 goto unimplemented;
4546 #endif
4547 #ifdef TARGET_NR_getpagesize
4548 case TARGET_NR_getpagesize:
4549 ret = TARGET_PAGE_SIZE;
4550 break;
4551 #endif
4552 case TARGET_NR_gettid:
4553 ret = get_errno(gettid());
4554 break;
4555 #ifdef TARGET_NR_readahead
4556 case TARGET_NR_readahead:
4557 goto unimplemented;
4558 #endif
4559 #ifdef TARGET_NR_setxattr
4560 case TARGET_NR_setxattr:
4561 case TARGET_NR_lsetxattr:
4562 case TARGET_NR_fsetxattr:
4563 case TARGET_NR_getxattr:
4564 case TARGET_NR_lgetxattr:
4565 case TARGET_NR_fgetxattr:
4566 case TARGET_NR_listxattr:
4567 case TARGET_NR_llistxattr:
4568 case TARGET_NR_flistxattr:
4569 case TARGET_NR_removexattr:
4570 case TARGET_NR_lremovexattr:
4571 case TARGET_NR_fremovexattr:
4572 goto unimplemented_nowarn;
4573 #endif
4574 #ifdef TARGET_NR_set_thread_area
4575 case TARGET_NR_set_thread_area:
4576 #ifdef TARGET_MIPS
4577 ((CPUMIPSState *) cpu_env)->tls_value = arg1;
4578 ret = 0;
4579 break;
4580 #else
4581 goto unimplemented_nowarn;
4582 #endif
4583 #endif
4584 #ifdef TARGET_NR_get_thread_area
4585 case TARGET_NR_get_thread_area:
4586 goto unimplemented_nowarn;
4587 #endif
4588 #ifdef TARGET_NR_getdomainname
4589 case TARGET_NR_getdomainname:
4590 goto unimplemented_nowarn;
4591 #endif
4592
4593 #ifdef TARGET_NR_clock_gettime
4594 case TARGET_NR_clock_gettime:
4595 {
4596 struct timespec ts;
4597 ret = get_errno(clock_gettime(arg1, &ts));
4598 if (!is_error(ret)) {
4599 host_to_target_timespec(arg2, &ts);
4600 }
4601 break;
4602 }
4603 #endif
4604 #ifdef TARGET_NR_clock_getres
4605 case TARGET_NR_clock_getres:
4606 {
4607 struct timespec ts;
4608 ret = get_errno(clock_getres(arg1, &ts));
4609 if (!is_error(ret)) {
4610 host_to_target_timespec(arg2, &ts);
4611 }
4612 break;
4613 }
4614 #endif
4615
4616 #if defined(TARGET_NR_set_tid_address) && defined(__NR_set_tid_address)
4617 case TARGET_NR_set_tid_address:
4618 ret = get_errno(set_tid_address((int *) arg1));
4619 break;
4620 #endif
4621
4622 #ifdef TARGET_NR_tkill
4623 case TARGET_NR_tkill:
4624 ret = get_errno(sys_tkill((int)arg1, (int)arg2));
4625 break;
4626 #endif
4627
4628 #ifdef TARGET_NR_tgkill
4629 case TARGET_NR_tgkill:
4630 ret = get_errno(sys_tgkill((int)arg1, (int)arg2, (int)arg3));
4631 break;
4632 #endif
4633
4634 #ifdef TARGET_NR_set_robust_list
4635 case TARGET_NR_set_robust_list:
4636 goto unimplemented_nowarn;
4637 #endif
4638
4639 default:
4640 unimplemented:
4641 gemu_log("qemu: Unsupported syscall: %d\n", num);
4642 #if defined(TARGET_NR_setxattr) || defined(TARGET_NR_get_thread_area) || defined(TARGET_NR_getdomainname) || defined(TARGET_NR_set_robust_list)
4643 unimplemented_nowarn:
4644 #endif
4645 ret = -ENOSYS;
4646 break;
4647 }
4648 fail:
4649 #ifdef DEBUG
4650 gemu_log(" = %ld\n", ret);
4651 #endif
4652 return ret;
4653 }
4654
Qemu copy for testing