]> 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
endian fixes by Ulrich weigand
[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/wait.h>
32 #include <sys/time.h>
33 #include <sys/stat.h>
34 #include <sys/mount.h>
35 #include <sys/resource.h>
36 #include <sys/mman.h>
37 #include <sys/swap.h>
38 #include <signal.h>
39 #include <sched.h>
40 #include <sys/socket.h>
41 #include <sys/uio.h>
42 #include <sys/poll.h>
43 //#include <sys/user.h>
44 #include <netinet/tcp.h>
45
46 #define termios host_termios
47 #define winsize host_winsize
48 #define termio host_termio
49 #define sgttyb host_sgttyb /* same as target */
50 #define tchars host_tchars /* same as target */
51 #define ltchars host_ltchars /* same as target */
52
53 #include <linux/termios.h>
54 #include <linux/unistd.h>
55 #include <linux/utsname.h>
56 #include <linux/cdrom.h>
57 #include <linux/hdreg.h>
58 #include <linux/soundcard.h>
59 #include <linux/dirent.h>
60
61 #include "qemu.h"
62
63 //#define DEBUG
64
65 #ifndef PAGE_SIZE
66 #define PAGE_SIZE 4096
67 #define PAGE_MASK ~(PAGE_SIZE - 1)
68 #endif
69
70 //#include <linux/msdos_fs.h>
71 #define VFAT_IOCTL_READDIR_BOTH _IOR('r', 1, struct dirent [2])
72 #define VFAT_IOCTL_READDIR_SHORT _IOR('r', 2, struct dirent [2])
73
74 void host_to_target_siginfo(target_siginfo_t *tinfo, const siginfo_t *info);
75 void target_to_host_siginfo(siginfo_t *info, const target_siginfo_t *tinfo);
76 long do_sigreturn(CPUX86State *env);
77 long do_rt_sigreturn(CPUX86State *env);
78
79 #define __NR_sys_uname __NR_uname
80 #define __NR_sys_getcwd1 __NR_getcwd
81 #define __NR_sys_statfs __NR_statfs
82 #define __NR_sys_fstatfs __NR_fstatfs
83 #define __NR_sys_getdents __NR_getdents
84 #define __NR_sys_getdents64 __NR_getdents64
85 #define __NR_sys_rt_sigqueueinfo __NR_rt_sigqueueinfo
86
87 #ifdef __NR_gettid
88 _syscall0(int, gettid)
89 #else
90 static int gettid(void) {
91 return -ENOSYS;
92 }
93 #endif
94 _syscall1(int,sys_uname,struct new_utsname *,buf)
95 _syscall2(int,sys_getcwd1,char *,buf,size_t,size)
96 _syscall3(int, sys_getdents, uint, fd, struct dirent *, dirp, uint, count);
97 _syscall3(int, sys_getdents64, uint, fd, struct dirent64 *, dirp, uint, count);
98 _syscall5(int, _llseek, uint, fd, ulong, hi, ulong, lo,
99 loff_t *, res, uint, wh);
100 _syscall2(int,sys_statfs,const char *,path,struct kernel_statfs *,buf)
101 _syscall2(int,sys_fstatfs,int,fd,struct kernel_statfs *,buf)
102 _syscall3(int,sys_rt_sigqueueinfo,int,pid,int,sig,siginfo_t *,uinfo)
103
104 extern int personality(int);
105 extern int flock(int, int);
106 extern int setfsuid(int);
107 extern int setfsgid(int);
108 extern int setresuid(uid_t, uid_t, uid_t);
109 extern int getresuid(uid_t *, uid_t *, uid_t *);
110 extern int setresgid(gid_t, gid_t, gid_t);
111 extern int getresgid(gid_t *, gid_t *, gid_t *);
112
113 static inline long get_errno(long ret)
114 {
115 if (ret == -1)
116 return -errno;
117 else
118 return ret;
119 }
120
121 static inline int is_error(long ret)
122 {
123 return (unsigned long)ret >= (unsigned long)(-4096);
124 }
125
126 static char *target_brk;
127 static char *target_original_brk;
128
129 void target_set_brk(char *new_brk)
130 {
131 target_brk = new_brk;
132 target_original_brk = new_brk;
133 }
134
135 static long do_brk(char *new_brk)
136 {
137 char *brk_page;
138 long mapped_addr;
139 int new_alloc_size;
140
141 if (!new_brk)
142 return (long)target_brk;
143 if (new_brk < target_original_brk)
144 return -ENOMEM;
145
146 brk_page = (char *)(((unsigned long)target_brk + PAGE_SIZE - 1) & PAGE_MASK);
147
148 /* If the new brk is less than this, set it and we're done... */
149 if (new_brk < brk_page) {
150 target_brk = new_brk;
151 return (long)target_brk;
152 }
153
154 /* We need to allocate more memory after the brk... */
155 new_alloc_size = ((new_brk - brk_page + 1)+(PAGE_SIZE-1)) & PAGE_MASK;
156 mapped_addr = get_errno((long)mmap((caddr_t)brk_page, new_alloc_size,
157 PROT_READ|PROT_WRITE,
158 MAP_ANON|MAP_FIXED|MAP_PRIVATE, 0, 0));
159
160 if (is_error(mapped_addr)) {
161 return mapped_addr;
162 } else {
163 target_brk = new_brk;
164 return (long)target_brk;
165 }
166 }
167
168 static inline fd_set *target_to_host_fds(fd_set *fds,
169 target_long *target_fds, int n)
170 {
171 #if !defined(BSWAP_NEEDED) && !defined(WORDS_BIGENDIAN)
172 return (fd_set *)target_fds;
173 #else
174 int i, b;
175 if (target_fds) {
176 FD_ZERO(fds);
177 for(i = 0;i < n; i++) {
178 b = (tswapl(target_fds[i / TARGET_LONG_BITS]) >>
179 (i & (TARGET_LONG_BITS - 1))) & 1;
180 if (b)
181 FD_SET(i, fds);
182 }
183 return fds;
184 } else {
185 return NULL;
186 }
187 #endif
188 }
189
190 static inline void host_to_target_fds(target_long *target_fds,
191 fd_set *fds, int n)
192 {
193 #if !defined(BSWAP_NEEDED) && !defined(WORDS_BIGENDIAN)
194 /* nothing to do */
195 #else
196 int i, nw, j, k;
197 target_long v;
198
199 if (target_fds) {
200 nw = n / TARGET_LONG_BITS;
201 k = 0;
202 for(i = 0;i < nw; i++) {
203 v = 0;
204 for(j = 0; j < TARGET_LONG_BITS; j++) {
205 v |= ((FD_ISSET(k, fds) != 0) << j);
206 k++;
207 }
208 target_fds[i] = tswapl(v);
209 }
210 }
211 #endif
212 }
213
214 static inline void target_to_host_timeval(struct timeval *tv,
215 const struct target_timeval *target_tv)
216 {
217 tv->tv_sec = tswapl(target_tv->tv_sec);
218 tv->tv_usec = tswapl(target_tv->tv_usec);
219 }
220
221 static inline void host_to_target_timeval(struct target_timeval *target_tv,
222 const struct timeval *tv)
223 {
224 target_tv->tv_sec = tswapl(tv->tv_sec);
225 target_tv->tv_usec = tswapl(tv->tv_usec);
226 }
227
228
229 static long do_select(long n,
230 target_long *target_rfds, target_long *target_wfds,
231 target_long *target_efds, struct target_timeval *target_tv)
232 {
233 fd_set rfds, wfds, efds;
234 fd_set *rfds_ptr, *wfds_ptr, *efds_ptr;
235 struct timeval tv, *tv_ptr;
236 long ret;
237
238 rfds_ptr = target_to_host_fds(&rfds, target_rfds, n);
239 wfds_ptr = target_to_host_fds(&wfds, target_wfds, n);
240 efds_ptr = target_to_host_fds(&efds, target_efds, n);
241
242 if (target_tv) {
243 target_to_host_timeval(&tv, target_tv);
244 tv_ptr = &tv;
245 } else {
246 tv_ptr = NULL;
247 }
248 ret = get_errno(select(n, rfds_ptr, wfds_ptr, efds_ptr, tv_ptr));
249 if (!is_error(ret)) {
250 host_to_target_fds(target_rfds, rfds_ptr, n);
251 host_to_target_fds(target_wfds, wfds_ptr, n);
252 host_to_target_fds(target_efds, efds_ptr, n);
253
254 if (target_tv) {
255 host_to_target_timeval(target_tv, &tv);
256 }
257 }
258 return ret;
259 }
260
261 static inline void target_to_host_sockaddr(struct sockaddr *addr,
262 struct target_sockaddr *target_addr,
263 socklen_t len)
264 {
265 memcpy(addr, target_addr, len);
266 addr->sa_family = tswap16(target_addr->sa_family);
267 }
268
269 static inline void host_to_target_sockaddr(struct target_sockaddr *target_addr,
270 struct sockaddr *addr,
271 socklen_t len)
272 {
273 memcpy(target_addr, addr, len);
274 target_addr->sa_family = tswap16(addr->sa_family);
275 }
276
277 static inline void target_to_host_cmsg(struct msghdr *msgh,
278 struct target_msghdr *target_msgh)
279 {
280 struct cmsghdr *cmsg = CMSG_FIRSTHDR(msgh);
281 struct target_cmsghdr *target_cmsg = TARGET_CMSG_FIRSTHDR(target_msgh);
282 socklen_t space = 0;
283
284 while (cmsg && target_cmsg) {
285 void *data = CMSG_DATA(cmsg);
286 void *target_data = TARGET_CMSG_DATA(target_cmsg);
287
288 int len = tswapl(target_cmsg->cmsg_len)
289 - TARGET_CMSG_ALIGN(sizeof (struct target_cmsghdr));
290
291 space += CMSG_SPACE(len);
292 if (space > msgh->msg_controllen) {
293 space -= CMSG_SPACE(len);
294 gemu_log("Host cmsg overflow");
295 break;
296 }
297
298 cmsg->cmsg_level = tswap32(target_cmsg->cmsg_level);
299 cmsg->cmsg_type = tswap32(target_cmsg->cmsg_type);
300 cmsg->cmsg_len = CMSG_LEN(len);
301
302 if (cmsg->cmsg_level != SOL_SOCKET || cmsg->cmsg_type != SCM_RIGHTS) {
303 gemu_log("Unsupported ancillary data: %d/%d\n", cmsg->cmsg_level, cmsg->cmsg_type);
304 memcpy(data, target_data, len);
305 } else {
306 int *fd = (int *)data;
307 int *target_fd = (int *)target_data;
308 int i, numfds = len / sizeof(int);
309
310 for (i = 0; i < numfds; i++)
311 fd[i] = tswap32(target_fd[i]);
312 }
313
314 cmsg = CMSG_NXTHDR(msgh, cmsg);
315 target_cmsg = TARGET_CMSG_NXTHDR(target_msgh, target_cmsg);
316 }
317
318 msgh->msg_controllen = space;
319 }
320
321 static inline void host_to_target_cmsg(struct target_msghdr *target_msgh,
322 struct msghdr *msgh)
323 {
324 struct cmsghdr *cmsg = CMSG_FIRSTHDR(msgh);
325 struct target_cmsghdr *target_cmsg = TARGET_CMSG_FIRSTHDR(target_msgh);
326 socklen_t space = 0;
327
328 while (cmsg && target_cmsg) {
329 void *data = CMSG_DATA(cmsg);
330 void *target_data = TARGET_CMSG_DATA(target_cmsg);
331
332 int len = cmsg->cmsg_len - CMSG_ALIGN(sizeof (struct cmsghdr));
333
334 space += TARGET_CMSG_SPACE(len);
335 if (space > tswapl(target_msgh->msg_controllen)) {
336 space -= TARGET_CMSG_SPACE(len);
337 gemu_log("Target cmsg overflow");
338 break;
339 }
340
341 target_cmsg->cmsg_level = tswap32(cmsg->cmsg_level);
342 target_cmsg->cmsg_type = tswap32(cmsg->cmsg_type);
343 target_cmsg->cmsg_len = tswapl(TARGET_CMSG_LEN(len));
344
345 if (cmsg->cmsg_level != SOL_SOCKET || cmsg->cmsg_type != SCM_RIGHTS) {
346 gemu_log("Unsupported ancillary data: %d/%d\n", cmsg->cmsg_level, cmsg->cmsg_type);
347 memcpy(target_data, data, len);
348 } else {
349 int *fd = (int *)data;
350 int *target_fd = (int *)target_data;
351 int i, numfds = len / sizeof(int);
352
353 for (i = 0; i < numfds; i++)
354 target_fd[i] = tswap32(fd[i]);
355 }
356
357 cmsg = CMSG_NXTHDR(msgh, cmsg);
358 target_cmsg = TARGET_CMSG_NXTHDR(target_msgh, target_cmsg);
359 }
360
361 msgh->msg_controllen = tswapl(space);
362 }
363
364 static long do_setsockopt(int sockfd, int level, int optname,
365 void *optval, socklen_t optlen)
366 {
367 if (level == SOL_TCP) {
368 /* TCP options all take an 'int' value. */
369 int val;
370
371 if (optlen < sizeof(uint32_t))
372 return -EINVAL;
373
374 val = tswap32(*(uint32_t *)optval);
375 return get_errno(setsockopt(sockfd, level, optname, &val, sizeof(val)));
376 }
377
378 else if (level != SOL_SOCKET) {
379 gemu_log("Unsupported setsockopt level: %d\n", level);
380 return -ENOSYS;
381 }
382
383 switch (optname) {
384 /* Options with 'int' argument. */
385 case SO_DEBUG:
386 case SO_REUSEADDR:
387 case SO_TYPE:
388 case SO_ERROR:
389 case SO_DONTROUTE:
390 case SO_BROADCAST:
391 case SO_SNDBUF:
392 case SO_RCVBUF:
393 case SO_KEEPALIVE:
394 case SO_OOBINLINE:
395 case SO_NO_CHECK:
396 case SO_PRIORITY:
397 case SO_BSDCOMPAT:
398 case SO_PASSCRED:
399 case SO_TIMESTAMP:
400 case SO_RCVLOWAT:
401 case SO_RCVTIMEO:
402 case SO_SNDTIMEO:
403 {
404 int val;
405 if (optlen < sizeof(uint32_t))
406 return -EINVAL;
407 val = tswap32(*(uint32_t *)optval);
408 return get_errno(setsockopt(sockfd, level, optname, &val, sizeof(val)));
409 }
410
411 default:
412 gemu_log("Unsupported setsockopt SOL_SOCKET option: %d\n", optname);
413 return -ENOSYS;
414 }
415 }
416
417 static long do_getsockopt(int sockfd, int level, int optname,
418 void *optval, socklen_t *optlen)
419 {
420 gemu_log("getsockopt not yet supported\n");
421 return -ENOSYS;
422 }
423
424 static long do_socketcall(int num, int32_t *vptr)
425 {
426 long ret;
427
428 switch(num) {
429 case SOCKOP_socket:
430 {
431 int domain = tswap32(vptr[0]);
432 int type = tswap32(vptr[1]);
433 int protocol = tswap32(vptr[2]);
434
435 ret = get_errno(socket(domain, type, protocol));
436 }
437 break;
438 case SOCKOP_bind:
439 {
440 int sockfd = tswap32(vptr[0]);
441 void *target_addr = (void *)tswap32(vptr[1]);
442 socklen_t addrlen = tswap32(vptr[2]);
443 void *addr = alloca(addrlen);
444
445 target_to_host_sockaddr(addr, target_addr, addrlen);
446 ret = get_errno(bind(sockfd, addr, addrlen));
447 }
448 break;
449 case SOCKOP_connect:
450 {
451 int sockfd = tswap32(vptr[0]);
452 void *target_addr = (void *)tswap32(vptr[1]);
453 socklen_t addrlen = tswap32(vptr[2]);
454 void *addr = alloca(addrlen);
455
456 target_to_host_sockaddr(addr, target_addr, addrlen);
457 ret = get_errno(connect(sockfd, addr, addrlen));
458 }
459 break;
460 case SOCKOP_listen:
461 {
462 int sockfd = tswap32(vptr[0]);
463 int backlog = tswap32(vptr[1]);
464
465 ret = get_errno(listen(sockfd, backlog));
466 }
467 break;
468 case SOCKOP_accept:
469 {
470 int sockfd = tswap32(vptr[0]);
471 void *target_addr = (void *)tswap32(vptr[1]);
472 uint32_t *target_addrlen = (void *)tswap32(vptr[2]);
473 socklen_t addrlen = tswap32(*target_addrlen);
474 void *addr = alloca(addrlen);
475
476 ret = get_errno(accept(sockfd, addr, &addrlen));
477 if (!is_error(ret)) {
478 host_to_target_sockaddr(target_addr, addr, addrlen);
479 *target_addrlen = tswap32(addrlen);
480 }
481 }
482 break;
483 case SOCKOP_getsockname:
484 {
485 int sockfd = tswap32(vptr[0]);
486 void *target_addr = (void *)tswap32(vptr[1]);
487 uint32_t *target_addrlen = (void *)tswap32(vptr[2]);
488 socklen_t addrlen = tswap32(*target_addrlen);
489 void *addr = alloca(addrlen);
490
491 ret = get_errno(getsockname(sockfd, addr, &addrlen));
492 if (!is_error(ret)) {
493 host_to_target_sockaddr(target_addr, addr, addrlen);
494 *target_addrlen = tswap32(addrlen);
495 }
496 }
497 break;
498 case SOCKOP_getpeername:
499 {
500 int sockfd = tswap32(vptr[0]);
501 void *target_addr = (void *)tswap32(vptr[1]);
502 uint32_t *target_addrlen = (void *)tswap32(vptr[2]);
503 socklen_t addrlen = tswap32(*target_addrlen);
504 void *addr = alloca(addrlen);
505
506 ret = get_errno(getpeername(sockfd, addr, &addrlen));
507 if (!is_error(ret)) {
508 host_to_target_sockaddr(target_addr, addr, addrlen);
509 *target_addrlen = tswap32(addrlen);
510 }
511 }
512 break;
513 case SOCKOP_socketpair:
514 {
515 int domain = tswap32(vptr[0]);
516 int type = tswap32(vptr[1]);
517 int protocol = tswap32(vptr[2]);
518 int32_t *target_tab = (void *)tswap32(vptr[3]);
519 int tab[2];
520
521 ret = get_errno(socketpair(domain, type, protocol, tab));
522 if (!is_error(ret)) {
523 target_tab[0] = tswap32(tab[0]);
524 target_tab[1] = tswap32(tab[1]);
525 }
526 }
527 break;
528 case SOCKOP_send:
529 {
530 int sockfd = tswap32(vptr[0]);
531 void *msg = (void *)tswap32(vptr[1]);
532 size_t len = tswap32(vptr[2]);
533 int flags = tswap32(vptr[3]);
534
535 ret = get_errno(send(sockfd, msg, len, flags));
536 }
537 break;
538 case SOCKOP_recv:
539 {
540 int sockfd = tswap32(vptr[0]);
541 void *msg = (void *)tswap32(vptr[1]);
542 size_t len = tswap32(vptr[2]);
543 int flags = tswap32(vptr[3]);
544
545 ret = get_errno(recv(sockfd, msg, len, flags));
546 }
547 break;
548 case SOCKOP_sendto:
549 {
550 int sockfd = tswap32(vptr[0]);
551 void *msg = (void *)tswap32(vptr[1]);
552 size_t len = tswap32(vptr[2]);
553 int flags = tswap32(vptr[3]);
554 void *target_addr = (void *)tswap32(vptr[4]);
555 socklen_t addrlen = tswap32(vptr[5]);
556 void *addr = alloca(addrlen);
557
558 target_to_host_sockaddr(addr, target_addr, addrlen);
559 ret = get_errno(sendto(sockfd, msg, len, flags, addr, addrlen));
560 }
561 break;
562 case SOCKOP_recvfrom:
563 {
564 int sockfd = tswap32(vptr[0]);
565 void *msg = (void *)tswap32(vptr[1]);
566 size_t len = tswap32(vptr[2]);
567 int flags = tswap32(vptr[3]);
568 void *target_addr = (void *)tswap32(vptr[4]);
569 uint32_t *target_addrlen = (void *)tswap32(vptr[5]);
570 socklen_t addrlen = tswap32(*target_addrlen);
571 void *addr = alloca(addrlen);
572
573 ret = get_errno(recvfrom(sockfd, msg, len, flags, addr, &addrlen));
574 if (!is_error(ret)) {
575 host_to_target_sockaddr(target_addr, addr, addrlen);
576 *target_addrlen = tswap32(addrlen);
577 }
578 }
579 break;
580 case SOCKOP_shutdown:
581 {
582 int sockfd = tswap32(vptr[0]);
583 int how = tswap32(vptr[1]);
584
585 ret = get_errno(shutdown(sockfd, how));
586 }
587 break;
588 case SOCKOP_sendmsg:
589 case SOCKOP_recvmsg:
590 {
591 int fd;
592 struct target_msghdr *msgp;
593 struct msghdr msg;
594 int flags, count, i;
595 struct iovec *vec;
596 struct target_iovec *target_vec;
597
598 msgp = (void *)tswap32(vptr[1]);
599 msg.msg_name = (void *)tswapl(msgp->msg_name);
600 msg.msg_namelen = tswapl(msgp->msg_namelen);
601 msg.msg_controllen = 2 * tswapl(msgp->msg_controllen);
602 msg.msg_control = alloca(msg.msg_controllen);
603 msg.msg_flags = tswap32(msgp->msg_flags);
604
605 count = tswapl(msgp->msg_iovlen);
606 vec = alloca(count * sizeof(struct iovec));
607 target_vec = (void *)tswapl(msgp->msg_iov);
608 for(i = 0;i < count; i++) {
609 vec[i].iov_base = (void *)tswapl(target_vec[i].iov_base);
610 vec[i].iov_len = tswapl(target_vec[i].iov_len);
611 }
612 msg.msg_iovlen = count;
613 msg.msg_iov = vec;
614
615 fd = tswap32(vptr[0]);
616 flags = tswap32(vptr[2]);
617 if (num == SOCKOP_sendmsg) {
618 target_to_host_cmsg(&msg, msgp);
619 ret = get_errno(sendmsg(fd, &msg, flags));
620 } else {
621 ret = get_errno(recvmsg(fd, &msg, flags));
622 if (!is_error(ret))
623 host_to_target_cmsg(msgp, &msg);
624 }
625 }
626 break;
627 case SOCKOP_setsockopt:
628 {
629 int sockfd = tswap32(vptr[0]);
630 int level = tswap32(vptr[1]);
631 int optname = tswap32(vptr[2]);
632 void *optval = (void *)tswap32(vptr[3]);
633 socklen_t optlen = tswap32(vptr[4]);
634
635 ret = do_setsockopt(sockfd, level, optname, optval, optlen);
636 }
637 break;
638 case SOCKOP_getsockopt:
639 {
640 int sockfd = tswap32(vptr[0]);
641 int level = tswap32(vptr[1]);
642 int optname = tswap32(vptr[2]);
643 void *optval = (void *)tswap32(vptr[3]);
644 uint32_t *target_len = (void *)tswap32(vptr[4]);
645 socklen_t optlen = tswap32(*target_len);
646
647 ret = do_getsockopt(sockfd, level, optname, optval, &optlen);
648 if (!is_error(ret))
649 *target_len = tswap32(optlen);
650 }
651 break;
652 default:
653 gemu_log("Unsupported socketcall: %d\n", num);
654 ret = -ENOSYS;
655 break;
656 }
657 return ret;
658 }
659
660 /* kernel structure types definitions */
661 #define IFNAMSIZ 16
662
663 #define STRUCT(name, list...) STRUCT_ ## name,
664 #define STRUCT_SPECIAL(name) STRUCT_ ## name,
665 enum {
666 #include "syscall_types.h"
667 };
668 #undef STRUCT
669 #undef STRUCT_SPECIAL
670
671 #define STRUCT(name, list...) const argtype struct_ ## name ## _def[] = { list, TYPE_NULL };
672 #define STRUCT_SPECIAL(name)
673 #include "syscall_types.h"
674 #undef STRUCT
675 #undef STRUCT_SPECIAL
676
677 typedef struct IOCTLEntry {
678 int target_cmd;
679 int host_cmd;
680 const char *name;
681 int access;
682 const argtype arg_type[5];
683 } IOCTLEntry;
684
685 #define IOC_R 0x0001
686 #define IOC_W 0x0002
687 #define IOC_RW (IOC_R | IOC_W)
688
689 #define MAX_STRUCT_SIZE 4096
690
691 const IOCTLEntry ioctl_entries[] = {
692 #define IOCTL(cmd, access, types...) \
693 { TARGET_ ## cmd, cmd, #cmd, access, { types } },
694 #include "ioctls.h"
695 { 0, 0, },
696 };
697
698 static long do_ioctl(long fd, long cmd, long arg)
699 {
700 const IOCTLEntry *ie;
701 const argtype *arg_type;
702 long ret;
703 uint8_t buf_temp[MAX_STRUCT_SIZE];
704
705 ie = ioctl_entries;
706 for(;;) {
707 if (ie->target_cmd == 0) {
708 gemu_log("Unsupported ioctl: cmd=0x%04lx\n", cmd);
709 return -ENOSYS;
710 }
711 if (ie->target_cmd == cmd)
712 break;
713 ie++;
714 }
715 arg_type = ie->arg_type;
716 #if defined(DEBUG)
717 gemu_log("ioctl: cmd=0x%04lx (%s)\n", cmd, ie->name);
718 #endif
719 switch(arg_type[0]) {
720 case TYPE_NULL:
721 /* no argument */
722 ret = get_errno(ioctl(fd, ie->host_cmd));
723 break;
724 case TYPE_PTRVOID:
725 case TYPE_INT:
726 /* int argment */
727 ret = get_errno(ioctl(fd, ie->host_cmd, arg));
728 break;
729 case TYPE_PTR:
730 arg_type++;
731 switch(ie->access) {
732 case IOC_R:
733 ret = get_errno(ioctl(fd, ie->host_cmd, buf_temp));
734 if (!is_error(ret)) {
735 thunk_convert((void *)arg, buf_temp, arg_type, THUNK_TARGET);
736 }
737 break;
738 case IOC_W:
739 thunk_convert(buf_temp, (void *)arg, arg_type, THUNK_HOST);
740 ret = get_errno(ioctl(fd, ie->host_cmd, buf_temp));
741 break;
742 default:
743 case IOC_RW:
744 thunk_convert(buf_temp, (void *)arg, arg_type, THUNK_HOST);
745 ret = get_errno(ioctl(fd, ie->host_cmd, buf_temp));
746 if (!is_error(ret)) {
747 thunk_convert((void *)arg, buf_temp, arg_type, THUNK_TARGET);
748 }
749 break;
750 }
751 break;
752 default:
753 gemu_log("Unsupported ioctl type: cmd=0x%04lx type=%d\n", cmd, arg_type[0]);
754 ret = -ENOSYS;
755 break;
756 }
757 return ret;
758 }
759
760 bitmask_transtbl iflag_tbl[] = {
761 { TARGET_IGNBRK, TARGET_IGNBRK, IGNBRK, IGNBRK },
762 { TARGET_BRKINT, TARGET_BRKINT, BRKINT, BRKINT },
763 { TARGET_IGNPAR, TARGET_IGNPAR, IGNPAR, IGNPAR },
764 { TARGET_PARMRK, TARGET_PARMRK, PARMRK, PARMRK },
765 { TARGET_INPCK, TARGET_INPCK, INPCK, INPCK },
766 { TARGET_ISTRIP, TARGET_ISTRIP, ISTRIP, ISTRIP },
767 { TARGET_INLCR, TARGET_INLCR, INLCR, INLCR },
768 { TARGET_IGNCR, TARGET_IGNCR, IGNCR, IGNCR },
769 { TARGET_ICRNL, TARGET_ICRNL, ICRNL, ICRNL },
770 { TARGET_IUCLC, TARGET_IUCLC, IUCLC, IUCLC },
771 { TARGET_IXON, TARGET_IXON, IXON, IXON },
772 { TARGET_IXANY, TARGET_IXANY, IXANY, IXANY },
773 { TARGET_IXOFF, TARGET_IXOFF, IXOFF, IXOFF },
774 { TARGET_IMAXBEL, TARGET_IMAXBEL, IMAXBEL, IMAXBEL },
775 { 0, 0, 0, 0 }
776 };
777
778 bitmask_transtbl oflag_tbl[] = {
779 { TARGET_OPOST, TARGET_OPOST, OPOST, OPOST },
780 { TARGET_OLCUC, TARGET_OLCUC, OLCUC, OLCUC },
781 { TARGET_ONLCR, TARGET_ONLCR, ONLCR, ONLCR },
782 { TARGET_OCRNL, TARGET_OCRNL, OCRNL, OCRNL },
783 { TARGET_ONOCR, TARGET_ONOCR, ONOCR, ONOCR },
784 { TARGET_ONLRET, TARGET_ONLRET, ONLRET, ONLRET },
785 { TARGET_OFILL, TARGET_OFILL, OFILL, OFILL },
786 { TARGET_OFDEL, TARGET_OFDEL, OFDEL, OFDEL },
787 { TARGET_NLDLY, TARGET_NL0, NLDLY, NL0 },
788 { TARGET_NLDLY, TARGET_NL1, NLDLY, NL1 },
789 { TARGET_CRDLY, TARGET_CR0, CRDLY, CR0 },
790 { TARGET_CRDLY, TARGET_CR1, CRDLY, CR1 },
791 { TARGET_CRDLY, TARGET_CR2, CRDLY, CR2 },
792 { TARGET_CRDLY, TARGET_CR3, CRDLY, CR3 },
793 { TARGET_TABDLY, TARGET_TAB0, TABDLY, TAB0 },
794 { TARGET_TABDLY, TARGET_TAB1, TABDLY, TAB1 },
795 { TARGET_TABDLY, TARGET_TAB2, TABDLY, TAB2 },
796 { TARGET_TABDLY, TARGET_TAB3, TABDLY, TAB3 },
797 { TARGET_BSDLY, TARGET_BS0, BSDLY, BS0 },
798 { TARGET_BSDLY, TARGET_BS1, BSDLY, BS1 },
799 { TARGET_VTDLY, TARGET_VT0, VTDLY, VT0 },
800 { TARGET_VTDLY, TARGET_VT1, VTDLY, VT1 },
801 { TARGET_FFDLY, TARGET_FF0, FFDLY, FF0 },
802 { TARGET_FFDLY, TARGET_FF1, FFDLY, FF1 },
803 { 0, 0, 0, 0 }
804 };
805
806 bitmask_transtbl cflag_tbl[] = {
807 { TARGET_CBAUD, TARGET_B0, CBAUD, B0 },
808 { TARGET_CBAUD, TARGET_B50, CBAUD, B50 },
809 { TARGET_CBAUD, TARGET_B75, CBAUD, B75 },
810 { TARGET_CBAUD, TARGET_B110, CBAUD, B110 },
811 { TARGET_CBAUD, TARGET_B134, CBAUD, B134 },
812 { TARGET_CBAUD, TARGET_B150, CBAUD, B150 },
813 { TARGET_CBAUD, TARGET_B200, CBAUD, B200 },
814 { TARGET_CBAUD, TARGET_B300, CBAUD, B300 },
815 { TARGET_CBAUD, TARGET_B600, CBAUD, B600 },
816 { TARGET_CBAUD, TARGET_B1200, CBAUD, B1200 },
817 { TARGET_CBAUD, TARGET_B1800, CBAUD, B1800 },
818 { TARGET_CBAUD, TARGET_B2400, CBAUD, B2400 },
819 { TARGET_CBAUD, TARGET_B4800, CBAUD, B4800 },
820 { TARGET_CBAUD, TARGET_B9600, CBAUD, B9600 },
821 { TARGET_CBAUD, TARGET_B19200, CBAUD, B19200 },
822 { TARGET_CBAUD, TARGET_B38400, CBAUD, B38400 },
823 { TARGET_CBAUD, TARGET_B57600, CBAUD, B57600 },
824 { TARGET_CBAUD, TARGET_B115200, CBAUD, B115200 },
825 { TARGET_CBAUD, TARGET_B230400, CBAUD, B230400 },
826 { TARGET_CBAUD, TARGET_B460800, CBAUD, B460800 },
827 { TARGET_CSIZE, TARGET_CS5, CSIZE, CS5 },
828 { TARGET_CSIZE, TARGET_CS6, CSIZE, CS6 },
829 { TARGET_CSIZE, TARGET_CS7, CSIZE, CS7 },
830 { TARGET_CSIZE, TARGET_CS8, CSIZE, CS8 },
831 { TARGET_CSTOPB, TARGET_CSTOPB, CSTOPB, CSTOPB },
832 { TARGET_CREAD, TARGET_CREAD, CREAD, CREAD },
833 { TARGET_PARENB, TARGET_PARENB, PARENB, PARENB },
834 { TARGET_PARODD, TARGET_PARODD, PARODD, PARODD },
835 { TARGET_HUPCL, TARGET_HUPCL, HUPCL, HUPCL },
836 { TARGET_CLOCAL, TARGET_CLOCAL, CLOCAL, CLOCAL },
837 { TARGET_CRTSCTS, TARGET_CRTSCTS, CRTSCTS, CRTSCTS },
838 { 0, 0, 0, 0 }
839 };
840
841 bitmask_transtbl lflag_tbl[] = {
842 { TARGET_ISIG, TARGET_ISIG, ISIG, ISIG },
843 { TARGET_ICANON, TARGET_ICANON, ICANON, ICANON },
844 { TARGET_XCASE, TARGET_XCASE, XCASE, XCASE },
845 { TARGET_ECHO, TARGET_ECHO, ECHO, ECHO },
846 { TARGET_ECHOE, TARGET_ECHOE, ECHOE, ECHOE },
847 { TARGET_ECHOK, TARGET_ECHOK, ECHOK, ECHOK },
848 { TARGET_ECHONL, TARGET_ECHONL, ECHONL, ECHONL },
849 { TARGET_NOFLSH, TARGET_NOFLSH, NOFLSH, NOFLSH },
850 { TARGET_TOSTOP, TARGET_TOSTOP, TOSTOP, TOSTOP },
851 { TARGET_ECHOCTL, TARGET_ECHOCTL, ECHOCTL, ECHOCTL },
852 { TARGET_ECHOPRT, TARGET_ECHOPRT, ECHOPRT, ECHOPRT },
853 { TARGET_ECHOKE, TARGET_ECHOKE, ECHOKE, ECHOKE },
854 { TARGET_FLUSHO, TARGET_FLUSHO, FLUSHO, FLUSHO },
855 { TARGET_PENDIN, TARGET_PENDIN, PENDIN, PENDIN },
856 { TARGET_IEXTEN, TARGET_IEXTEN, IEXTEN, IEXTEN },
857 { 0, 0, 0, 0 }
858 };
859
860 static void target_to_host_termios (void *dst, const void *src)
861 {
862 struct host_termios *host = dst;
863 const struct target_termios *target = src;
864
865 host->c_iflag =
866 target_to_host_bitmask(tswap32(target->c_iflag), iflag_tbl);
867 host->c_oflag =
868 target_to_host_bitmask(tswap32(target->c_oflag), oflag_tbl);
869 host->c_cflag =
870 target_to_host_bitmask(tswap32(target->c_cflag), cflag_tbl);
871 host->c_lflag =
872 target_to_host_bitmask(tswap32(target->c_lflag), lflag_tbl);
873 host->c_line = target->c_line;
874
875 host->c_cc[VINTR] = target->c_cc[TARGET_VINTR];
876 host->c_cc[VQUIT] = target->c_cc[TARGET_VQUIT];
877 host->c_cc[VERASE] = target->c_cc[TARGET_VERASE];
878 host->c_cc[VKILL] = target->c_cc[TARGET_VKILL];
879 host->c_cc[VEOF] = target->c_cc[TARGET_VEOF];
880 host->c_cc[VTIME] = target->c_cc[TARGET_VTIME];
881 host->c_cc[VMIN] = target->c_cc[TARGET_VMIN];
882 host->c_cc[VSWTC] = target->c_cc[TARGET_VSWTC];
883 host->c_cc[VSTART] = target->c_cc[TARGET_VSTART];
884 host->c_cc[VSTOP] = target->c_cc[TARGET_VSTOP];
885 host->c_cc[VSUSP] = target->c_cc[TARGET_VSUSP];
886 host->c_cc[VEOL] = target->c_cc[TARGET_VEOL];
887 host->c_cc[VREPRINT] = target->c_cc[TARGET_VREPRINT];
888 host->c_cc[VDISCARD] = target->c_cc[TARGET_VDISCARD];
889 host->c_cc[VWERASE] = target->c_cc[TARGET_VWERASE];
890 host->c_cc[VLNEXT] = target->c_cc[TARGET_VLNEXT];
891 host->c_cc[VEOL2] = target->c_cc[TARGET_VEOL2];
892 }
893
894 static void host_to_target_termios (void *dst, const void *src)
895 {
896 struct target_termios *target = dst;
897 const struct host_termios *host = src;
898
899 target->c_iflag =
900 tswap32(host_to_target_bitmask(host->c_iflag, iflag_tbl));
901 target->c_oflag =
902 tswap32(host_to_target_bitmask(host->c_oflag, oflag_tbl));
903 target->c_cflag =
904 tswap32(host_to_target_bitmask(host->c_cflag, cflag_tbl));
905 target->c_lflag =
906 tswap32(host_to_target_bitmask(host->c_lflag, lflag_tbl));
907 target->c_line = host->c_line;
908
909 target->c_cc[TARGET_VINTR] = host->c_cc[VINTR];
910 target->c_cc[TARGET_VQUIT] = host->c_cc[VQUIT];
911 target->c_cc[TARGET_VERASE] = host->c_cc[VERASE];
912 target->c_cc[TARGET_VKILL] = host->c_cc[VKILL];
913 target->c_cc[TARGET_VEOF] = host->c_cc[VEOF];
914 target->c_cc[TARGET_VTIME] = host->c_cc[VTIME];
915 target->c_cc[TARGET_VMIN] = host->c_cc[VMIN];
916 target->c_cc[TARGET_VSWTC] = host->c_cc[VSWTC];
917 target->c_cc[TARGET_VSTART] = host->c_cc[VSTART];
918 target->c_cc[TARGET_VSTOP] = host->c_cc[VSTOP];
919 target->c_cc[TARGET_VSUSP] = host->c_cc[VSUSP];
920 target->c_cc[TARGET_VEOL] = host->c_cc[VEOL];
921 target->c_cc[TARGET_VREPRINT] = host->c_cc[VREPRINT];
922 target->c_cc[TARGET_VDISCARD] = host->c_cc[VDISCARD];
923 target->c_cc[TARGET_VWERASE] = host->c_cc[VWERASE];
924 target->c_cc[TARGET_VLNEXT] = host->c_cc[VLNEXT];
925 target->c_cc[TARGET_VEOL2] = host->c_cc[VEOL2];
926 }
927
928 StructEntry struct_termios_def = {
929 .convert = { host_to_target_termios, target_to_host_termios },
930 .size = { sizeof(struct target_termios), sizeof(struct host_termios) },
931 .align = { __alignof__(struct target_termios), __alignof__(struct host_termios) },
932 };
933
934 #ifdef TARGET_I386
935
936 /* NOTE: there is really one LDT for all the threads */
937 uint8_t *ldt_table;
938
939 static int read_ldt(void *ptr, unsigned long bytecount)
940 {
941 int size;
942
943 if (!ldt_table)
944 return 0;
945 size = TARGET_LDT_ENTRIES * TARGET_LDT_ENTRY_SIZE;
946 if (size > bytecount)
947 size = bytecount;
948 memcpy(ptr, ldt_table, size);
949 return size;
950 }
951
952 /* XXX: add locking support */
953 static int write_ldt(CPUX86State *env,
954 void *ptr, unsigned long bytecount, int oldmode)
955 {
956 struct target_modify_ldt_ldt_s ldt_info;
957 int seg_32bit, contents, read_exec_only, limit_in_pages;
958 int seg_not_present, useable;
959 uint32_t *lp, entry_1, entry_2;
960
961 if (bytecount != sizeof(ldt_info))
962 return -EINVAL;
963 memcpy(&ldt_info, ptr, sizeof(ldt_info));
964 tswap32s(&ldt_info.entry_number);
965 tswapls((long *)&ldt_info.base_addr);
966 tswap32s(&ldt_info.limit);
967 tswap32s(&ldt_info.flags);
968
969 if (ldt_info.entry_number >= TARGET_LDT_ENTRIES)
970 return -EINVAL;
971 seg_32bit = ldt_info.flags & 1;
972 contents = (ldt_info.flags >> 1) & 3;
973 read_exec_only = (ldt_info.flags >> 3) & 1;
974 limit_in_pages = (ldt_info.flags >> 4) & 1;
975 seg_not_present = (ldt_info.flags >> 5) & 1;
976 useable = (ldt_info.flags >> 6) & 1;
977
978 if (contents == 3) {
979 if (oldmode)
980 return -EINVAL;
981 if (seg_not_present == 0)
982 return -EINVAL;
983 }
984 /* allocate the LDT */
985 if (!ldt_table) {
986 ldt_table = malloc(TARGET_LDT_ENTRIES * TARGET_LDT_ENTRY_SIZE);
987 if (!ldt_table)
988 return -ENOMEM;
989 memset(ldt_table, 0, TARGET_LDT_ENTRIES * TARGET_LDT_ENTRY_SIZE);
990 env->ldt.base = ldt_table;
991 env->ldt.limit = 0xffff;
992 }
993
994 /* NOTE: same code as Linux kernel */
995 /* Allow LDTs to be cleared by the user. */
996 if (ldt_info.base_addr == 0 && ldt_info.limit == 0) {
997 if (oldmode ||
998 (contents == 0 &&
999 read_exec_only == 1 &&
1000 seg_32bit == 0 &&
1001 limit_in_pages == 0 &&
1002 seg_not_present == 1 &&
1003 useable == 0 )) {
1004 entry_1 = 0;
1005 entry_2 = 0;
1006 goto install;
1007 }
1008 }
1009
1010 entry_1 = ((ldt_info.base_addr & 0x0000ffff) << 16) |
1011 (ldt_info.limit & 0x0ffff);
1012 entry_2 = (ldt_info.base_addr & 0xff000000) |
1013 ((ldt_info.base_addr & 0x00ff0000) >> 16) |
1014 (ldt_info.limit & 0xf0000) |
1015 ((read_exec_only ^ 1) << 9) |
1016 (contents << 10) |
1017 ((seg_not_present ^ 1) << 15) |
1018 (seg_32bit << 22) |
1019 (limit_in_pages << 23) |
1020 0x7000;
1021 if (!oldmode)
1022 entry_2 |= (useable << 20);
1023
1024 /* Install the new entry ... */
1025 install:
1026 lp = (uint32_t *)(ldt_table + (ldt_info.entry_number << 3));
1027 lp[0] = tswap32(entry_1);
1028 lp[1] = tswap32(entry_2);
1029 return 0;
1030 }
1031
1032 /* specific and weird i386 syscalls */
1033 int do_modify_ldt(CPUX86State *env, int func, void *ptr, unsigned long bytecount)
1034 {
1035 int ret = -ENOSYS;
1036
1037 switch (func) {
1038 case 0:
1039 ret = read_ldt(ptr, bytecount);
1040 break;
1041 case 1:
1042 ret = write_ldt(env, ptr, bytecount, 1);
1043 break;
1044 case 0x11:
1045 ret = write_ldt(env, ptr, bytecount, 0);
1046 break;
1047 }
1048 return ret;
1049 }
1050
1051 /* vm86 emulation */
1052
1053 #define SAFE_MASK (0xDD5)
1054
1055 int do_vm86(CPUX86State *env, long subfunction,
1056 struct target_vm86plus_struct * target_v86)
1057 {
1058 TaskState *ts = env->opaque;
1059 int ret;
1060
1061 switch (subfunction) {
1062 case TARGET_VM86_REQUEST_IRQ:
1063 case TARGET_VM86_FREE_IRQ:
1064 case TARGET_VM86_GET_IRQ_BITS:
1065 case TARGET_VM86_GET_AND_RESET_IRQ:
1066 gemu_log("qemu: unsupported vm86 subfunction (%ld)\n", subfunction);
1067 ret = -EINVAL;
1068 goto out;
1069 case TARGET_VM86_PLUS_INSTALL_CHECK:
1070 /* NOTE: on old vm86 stuff this will return the error
1071 from verify_area(), because the subfunction is
1072 interpreted as (invalid) address to vm86_struct.
1073 So the installation check works.
1074 */
1075 ret = 0;
1076 goto out;
1077 }
1078
1079 ts->target_v86 = target_v86;
1080
1081 /* save current CPU regs */
1082 ts->vm86_saved_regs.eax = 0; /* default vm86 syscall return code */
1083 ts->vm86_saved_regs.ebx = env->regs[R_EBX];
1084 ts->vm86_saved_regs.ecx = env->regs[R_ECX];
1085 ts->vm86_saved_regs.edx = env->regs[R_EDX];
1086 ts->vm86_saved_regs.esi = env->regs[R_ESI];
1087 ts->vm86_saved_regs.edi = env->regs[R_EDI];
1088 ts->vm86_saved_regs.ebp = env->regs[R_EBP];
1089 ts->vm86_saved_regs.esp = env->regs[R_ESP];
1090 ts->vm86_saved_regs.eflags = env->eflags;
1091 ts->vm86_saved_regs.eip = env->eip;
1092 ts->vm86_saved_regs.cs = env->segs[R_CS];
1093 ts->vm86_saved_regs.ss = env->segs[R_SS];
1094 ts->vm86_saved_regs.ds = env->segs[R_DS];
1095 ts->vm86_saved_regs.es = env->segs[R_ES];
1096 ts->vm86_saved_regs.fs = env->segs[R_FS];
1097 ts->vm86_saved_regs.gs = env->segs[R_GS];
1098
1099 /* build vm86 CPU state */
1100 env->eflags = (env->eflags & ~SAFE_MASK) |
1101 (tswap32(target_v86->regs.eflags) & SAFE_MASK) | VM_MASK;
1102
1103 env->regs[R_EBX] = tswap32(target_v86->regs.ebx);
1104 env->regs[R_ECX] = tswap32(target_v86->regs.ecx);
1105 env->regs[R_EDX] = tswap32(target_v86->regs.edx);
1106 env->regs[R_ESI] = tswap32(target_v86->regs.esi);
1107 env->regs[R_EDI] = tswap32(target_v86->regs.edi);
1108 env->regs[R_EBP] = tswap32(target_v86->regs.ebp);
1109 env->regs[R_ESP] = tswap32(target_v86->regs.esp);
1110 env->eip = tswap32(target_v86->regs.eip);
1111 cpu_x86_load_seg(env, R_CS, tswap16(target_v86->regs.cs));
1112 cpu_x86_load_seg(env, R_SS, tswap16(target_v86->regs.ss));
1113 cpu_x86_load_seg(env, R_DS, tswap16(target_v86->regs.ds));
1114 cpu_x86_load_seg(env, R_ES, tswap16(target_v86->regs.es));
1115 cpu_x86_load_seg(env, R_FS, tswap16(target_v86->regs.fs));
1116 cpu_x86_load_seg(env, R_GS, tswap16(target_v86->regs.gs));
1117 ret = tswap32(target_v86->regs.eax); /* eax will be restored at
1118 the end of the syscall */
1119 /* now the virtual CPU is ready for vm86 execution ! */
1120 out:
1121 return ret;
1122 }
1123
1124 /* this stack is the equivalent of the kernel stack associated with a
1125 thread/process */
1126 #define NEW_STACK_SIZE 8192
1127
1128 static int clone_func(void *arg)
1129 {
1130 CPUX86State *env = arg;
1131 cpu_loop(env);
1132 /* never exits */
1133 return 0;
1134 }
1135
1136 int do_fork(CPUX86State *env, unsigned int flags, unsigned long newsp)
1137 {
1138 int ret;
1139 TaskState *ts;
1140 uint8_t *new_stack;
1141 CPUX86State *new_env;
1142
1143 if (flags & CLONE_VM) {
1144 if (!newsp)
1145 newsp = env->regs[R_ESP];
1146 ts = malloc(sizeof(TaskState) + NEW_STACK_SIZE);
1147 memset(ts, 0, sizeof(TaskState));
1148 new_stack = ts->stack;
1149 ts->used = 1;
1150 /* add in task state list */
1151 ts->next = first_task_state;
1152 first_task_state = ts;
1153 /* we create a new CPU instance. */
1154 new_env = cpu_x86_init();
1155 memcpy(new_env, env, sizeof(CPUX86State));
1156 new_env->regs[R_ESP] = newsp;
1157 new_env->regs[R_EAX] = 0;
1158 new_env->opaque = ts;
1159 ret = clone(clone_func, new_stack + NEW_STACK_SIZE, flags, new_env);
1160 } else {
1161 /* if no CLONE_VM, we consider it is a fork */
1162 if ((flags & ~CSIGNAL) != 0)
1163 return -EINVAL;
1164 ret = fork();
1165 }
1166 return ret;
1167 }
1168
1169 #endif
1170
1171 #define high2lowuid(x) (x)
1172 #define high2lowgid(x) (x)
1173 #define low2highuid(x) (x)
1174 #define low2highgid(x) (x)
1175
1176 void syscall_init(void)
1177 {
1178 #define STRUCT(name, list...) thunk_register_struct(STRUCT_ ## name, #name, struct_ ## name ## _def);
1179 #define STRUCT_SPECIAL(name) thunk_register_struct_direct(STRUCT_ ## name, #name, &struct_ ## name ## _def);
1180 #include "syscall_types.h"
1181 #undef STRUCT
1182 #undef STRUCT_SPECIAL
1183 }
1184
1185 long do_syscall(void *cpu_env, int num, long arg1, long arg2, long arg3,
1186 long arg4, long arg5, long arg6)
1187 {
1188 long ret;
1189 struct stat st;
1190 struct kernel_statfs *stfs;
1191
1192 #ifdef DEBUG
1193 gemu_log("syscall %d\n", num);
1194 #endif
1195 switch(num) {
1196 case TARGET_NR_exit:
1197 #ifdef HAVE_GPROF
1198 _mcleanup();
1199 #endif
1200 /* XXX: should free thread stack and CPU env */
1201 _exit(arg1);
1202 ret = 0; /* avoid warning */
1203 break;
1204 case TARGET_NR_read:
1205 ret = get_errno(read(arg1, (void *)arg2, arg3));
1206 break;
1207 case TARGET_NR_write:
1208 ret = get_errno(write(arg1, (void *)arg2, arg3));
1209 break;
1210 case TARGET_NR_open:
1211 ret = get_errno(open((const char *)arg1, arg2, arg3));
1212 break;
1213 case TARGET_NR_close:
1214 ret = get_errno(close(arg1));
1215 break;
1216 case TARGET_NR_brk:
1217 ret = do_brk((char *)arg1);
1218 break;
1219 case TARGET_NR_fork:
1220 ret = get_errno(do_fork(cpu_env, SIGCHLD, 0));
1221 break;
1222 case TARGET_NR_waitpid:
1223 {
1224 int *status = (int *)arg2;
1225 ret = get_errno(waitpid(arg1, status, arg3));
1226 if (!is_error(ret) && status)
1227 tswapls((long *)&status);
1228 }
1229 break;
1230 case TARGET_NR_creat:
1231 ret = get_errno(creat((const char *)arg1, arg2));
1232 break;
1233 case TARGET_NR_link:
1234 ret = get_errno(link((const char *)arg1, (const char *)arg2));
1235 break;
1236 case TARGET_NR_unlink:
1237 ret = get_errno(unlink((const char *)arg1));
1238 break;
1239 case TARGET_NR_execve:
1240 {
1241 char **argp, **envp;
1242 int argc = 0, envc = 0;
1243 uint32_t *p;
1244 char **q;
1245
1246 for (p = (void *)arg2; *p; p++)
1247 argc++;
1248 for (p = (void *)arg3; *p; p++)
1249 envc++;
1250
1251 argp = alloca(argc * sizeof(void *));
1252 envp = alloca(envc * sizeof(void *));
1253
1254 for (p = (void *)arg2, q = argp; *p; p++, q++)
1255 *q = (void *)tswap32(*p);
1256 for (p = (void *)arg3, q = envp; *p; p++, q++)
1257 *q = (void *)tswap32(*p);
1258
1259 ret = get_errno(execve((const char *)arg1, argp, envp));
1260 }
1261 break;
1262 case TARGET_NR_chdir:
1263 ret = get_errno(chdir((const char *)arg1));
1264 break;
1265 case TARGET_NR_time:
1266 {
1267 int *time_ptr = (int *)arg1;
1268 ret = get_errno(time((time_t *)time_ptr));
1269 if (!is_error(ret) && time_ptr)
1270 tswap32s(time_ptr);
1271 }
1272 break;
1273 case TARGET_NR_mknod:
1274 ret = get_errno(mknod((const char *)arg1, arg2, arg3));
1275 break;
1276 case TARGET_NR_chmod:
1277 ret = get_errno(chmod((const char *)arg1, arg2));
1278 break;
1279 case TARGET_NR_lchown:
1280 ret = get_errno(chown((const char *)arg1, arg2, arg3));
1281 break;
1282 case TARGET_NR_break:
1283 goto unimplemented;
1284 case TARGET_NR_oldstat:
1285 goto unimplemented;
1286 case TARGET_NR_lseek:
1287 ret = get_errno(lseek(arg1, arg2, arg3));
1288 break;
1289 case TARGET_NR_getpid:
1290 ret = get_errno(getpid());
1291 break;
1292 case TARGET_NR_mount:
1293 /* need to look at the data field */
1294 goto unimplemented;
1295 case TARGET_NR_umount:
1296 ret = get_errno(umount((const char *)arg1));
1297 break;
1298 case TARGET_NR_setuid:
1299 ret = get_errno(setuid(low2highuid(arg1)));
1300 break;
1301 case TARGET_NR_getuid:
1302 ret = get_errno(getuid());
1303 break;
1304 case TARGET_NR_stime:
1305 {
1306 int *time_ptr = (int *)arg1;
1307 if (time_ptr)
1308 tswap32s(time_ptr);
1309 ret = get_errno(stime((time_t *)time_ptr));
1310 }
1311 break;
1312 case TARGET_NR_ptrace:
1313 goto unimplemented;
1314 case TARGET_NR_alarm:
1315 ret = alarm(arg1);
1316 break;
1317 case TARGET_NR_oldfstat:
1318 goto unimplemented;
1319 case TARGET_NR_pause:
1320 ret = get_errno(pause());
1321 break;
1322 case TARGET_NR_utime:
1323 goto unimplemented;
1324 case TARGET_NR_stty:
1325 goto unimplemented;
1326 case TARGET_NR_gtty:
1327 goto unimplemented;
1328 case TARGET_NR_access:
1329 ret = get_errno(access((const char *)arg1, arg2));
1330 break;
1331 case TARGET_NR_nice:
1332 ret = get_errno(nice(arg1));
1333 break;
1334 case TARGET_NR_ftime:
1335 goto unimplemented;
1336 case TARGET_NR_sync:
1337 sync();
1338 ret = 0;
1339 break;
1340 case TARGET_NR_kill:
1341 ret = get_errno(kill(arg1, arg2));
1342 break;
1343 case TARGET_NR_rename:
1344 ret = get_errno(rename((const char *)arg1, (const char *)arg2));
1345 break;
1346 case TARGET_NR_mkdir:
1347 ret = get_errno(mkdir((const char *)arg1, arg2));
1348 break;
1349 case TARGET_NR_rmdir:
1350 ret = get_errno(rmdir((const char *)arg1));
1351 break;
1352 case TARGET_NR_dup:
1353 ret = get_errno(dup(arg1));
1354 break;
1355 case TARGET_NR_pipe:
1356 {
1357 int *pipe_ptr = (int *)arg1;
1358 ret = get_errno(pipe(pipe_ptr));
1359 if (!is_error(ret)) {
1360 tswap32s(&pipe_ptr[0]);
1361 tswap32s(&pipe_ptr[1]);
1362 }
1363 }
1364 break;
1365 case TARGET_NR_times:
1366 goto unimplemented;
1367 case TARGET_NR_prof:
1368 goto unimplemented;
1369 case TARGET_NR_setgid:
1370 ret = get_errno(setgid(low2highgid(arg1)));
1371 break;
1372 case TARGET_NR_getgid:
1373 ret = get_errno(getgid());
1374 break;
1375 case TARGET_NR_signal:
1376 goto unimplemented;
1377 case TARGET_NR_geteuid:
1378 ret = get_errno(geteuid());
1379 break;
1380 case TARGET_NR_getegid:
1381 ret = get_errno(getegid());
1382 break;
1383 case TARGET_NR_acct:
1384 goto unimplemented;
1385 case TARGET_NR_umount2:
1386 ret = get_errno(umount2((const char *)arg1, arg2));
1387 break;
1388 case TARGET_NR_lock:
1389 goto unimplemented;
1390 case TARGET_NR_ioctl:
1391 ret = do_ioctl(arg1, arg2, arg3);
1392 break;
1393 case TARGET_NR_fcntl:
1394 switch(arg2) {
1395 case F_GETLK:
1396 case F_SETLK:
1397 case F_SETLKW:
1398 goto unimplemented;
1399 default:
1400 ret = get_errno(fcntl(arg1, arg2, arg3));
1401 break;
1402 }
1403 break;
1404 case TARGET_NR_mpx:
1405 goto unimplemented;
1406 case TARGET_NR_setpgid:
1407 ret = get_errno(setpgid(arg1, arg2));
1408 break;
1409 case TARGET_NR_ulimit:
1410 goto unimplemented;
1411 case TARGET_NR_oldolduname:
1412 goto unimplemented;
1413 case TARGET_NR_umask:
1414 ret = get_errno(umask(arg1));
1415 break;
1416 case TARGET_NR_chroot:
1417 ret = get_errno(chroot((const char *)arg1));
1418 break;
1419 case TARGET_NR_ustat:
1420 goto unimplemented;
1421 case TARGET_NR_dup2:
1422 ret = get_errno(dup2(arg1, arg2));
1423 break;
1424 case TARGET_NR_getppid:
1425 ret = get_errno(getppid());
1426 break;
1427 case TARGET_NR_getpgrp:
1428 ret = get_errno(getpgrp());
1429 break;
1430 case TARGET_NR_setsid:
1431 ret = get_errno(setsid());
1432 break;
1433 case TARGET_NR_sigaction:
1434 {
1435 struct target_old_sigaction *old_act = (void *)arg2;
1436 struct target_old_sigaction *old_oact = (void *)arg3;
1437 struct target_sigaction act, oact, *pact;
1438 if (old_act) {
1439 act._sa_handler = old_act->_sa_handler;
1440 target_siginitset(&act.sa_mask, old_act->sa_mask);
1441 act.sa_flags = old_act->sa_flags;
1442 act.sa_restorer = old_act->sa_restorer;
1443 pact = &act;
1444 } else {
1445 pact = NULL;
1446 }
1447 ret = get_errno(do_sigaction(arg1, pact, &oact));
1448 if (!is_error(ret) && old_oact) {
1449 old_oact->_sa_handler = oact._sa_handler;
1450 old_oact->sa_mask = oact.sa_mask.sig[0];
1451 old_oact->sa_flags = oact.sa_flags;
1452 old_oact->sa_restorer = oact.sa_restorer;
1453 }
1454 }
1455 break;
1456 case TARGET_NR_rt_sigaction:
1457 ret = get_errno(do_sigaction(arg1, (void *)arg2, (void *)arg3));
1458 break;
1459 case TARGET_NR_sgetmask:
1460 {
1461 sigset_t cur_set;
1462 target_ulong target_set;
1463 sigprocmask(0, NULL, &cur_set);
1464 host_to_target_old_sigset(&target_set, &cur_set);
1465 ret = target_set;
1466 }
1467 break;
1468 case TARGET_NR_ssetmask:
1469 {
1470 sigset_t set, oset, cur_set;
1471 target_ulong target_set = arg1;
1472 sigprocmask(0, NULL, &cur_set);
1473 target_to_host_old_sigset(&set, &target_set);
1474 sigorset(&set, &set, &cur_set);
1475 sigprocmask(SIG_SETMASK, &set, &oset);
1476 host_to_target_old_sigset(&target_set, &oset);
1477 ret = target_set;
1478 }
1479 break;
1480 case TARGET_NR_sigprocmask:
1481 {
1482 int how = arg1;
1483 sigset_t set, oldset, *set_ptr;
1484 target_ulong *pset = (void *)arg2, *poldset = (void *)arg3;
1485
1486 if (pset) {
1487 switch(how) {
1488 case TARGET_SIG_BLOCK:
1489 how = SIG_BLOCK;
1490 break;
1491 case TARGET_SIG_UNBLOCK:
1492 how = SIG_UNBLOCK;
1493 break;
1494 case TARGET_SIG_SETMASK:
1495 how = SIG_SETMASK;
1496 break;
1497 default:
1498 ret = -EINVAL;
1499 goto fail;
1500 }
1501 target_to_host_old_sigset(&set, pset);
1502 set_ptr = &set;
1503 } else {
1504 how = 0;
1505 set_ptr = NULL;
1506 }
1507 ret = get_errno(sigprocmask(arg1, set_ptr, &oldset));
1508 if (!is_error(ret) && poldset) {
1509 host_to_target_old_sigset(poldset, &oldset);
1510 }
1511 }
1512 break;
1513 case TARGET_NR_rt_sigprocmask:
1514 {
1515 int how = arg1;
1516 sigset_t set, oldset, *set_ptr;
1517 target_sigset_t *pset = (void *)arg2;
1518 target_sigset_t *poldset = (void *)arg3;
1519
1520 if (pset) {
1521 switch(how) {
1522 case TARGET_SIG_BLOCK:
1523 how = SIG_BLOCK;
1524 break;
1525 case TARGET_SIG_UNBLOCK:
1526 how = SIG_UNBLOCK;
1527 break;
1528 case TARGET_SIG_SETMASK:
1529 how = SIG_SETMASK;
1530 break;
1531 default:
1532 ret = -EINVAL;
1533 goto fail;
1534 }
1535 target_to_host_sigset(&set, pset);
1536 set_ptr = &set;
1537 } else {
1538 how = 0;
1539 set_ptr = NULL;
1540 }
1541 ret = get_errno(sigprocmask(how, set_ptr, &oldset));
1542 if (!is_error(ret) && poldset) {
1543 host_to_target_sigset(poldset, &oldset);
1544 }
1545 }
1546 break;
1547 case TARGET_NR_sigpending:
1548 {
1549 sigset_t set;
1550 ret = get_errno(sigpending(&set));
1551 if (!is_error(ret)) {
1552 host_to_target_old_sigset((target_ulong *)arg1, &set);
1553 }
1554 }
1555 break;
1556 case TARGET_NR_rt_sigpending:
1557 {
1558 sigset_t set;
1559 ret = get_errno(sigpending(&set));
1560 if (!is_error(ret)) {
1561 host_to_target_sigset((target_sigset_t *)arg1, &set);
1562 }
1563 }
1564 break;
1565 case TARGET_NR_sigsuspend:
1566 {
1567 sigset_t set;
1568 target_to_host_old_sigset(&set, (target_ulong *)arg1);
1569 ret = get_errno(sigsuspend(&set));
1570 }
1571 break;
1572 case TARGET_NR_rt_sigsuspend:
1573 {
1574 sigset_t set;
1575 target_to_host_sigset(&set, (target_sigset_t *)arg1);
1576 ret = get_errno(sigsuspend(&set));
1577 }
1578 break;
1579 case TARGET_NR_rt_sigtimedwait:
1580 {
1581 target_sigset_t *target_set = (void *)arg1;
1582 target_siginfo_t *target_uinfo = (void *)arg2;
1583 struct target_timespec *target_uts = (void *)arg3;
1584 sigset_t set;
1585 struct timespec uts, *puts;
1586 siginfo_t uinfo;
1587
1588 target_to_host_sigset(&set, target_set);
1589 if (target_uts) {
1590 puts = &uts;
1591 puts->tv_sec = tswapl(target_uts->tv_sec);
1592 puts->tv_nsec = tswapl(target_uts->tv_nsec);
1593 } else {
1594 puts = NULL;
1595 }
1596 ret = get_errno(sigtimedwait(&set, &uinfo, puts));
1597 if (!is_error(ret) && target_uinfo) {
1598 host_to_target_siginfo(target_uinfo, &uinfo);
1599 }
1600 }
1601 break;
1602 case TARGET_NR_rt_sigqueueinfo:
1603 {
1604 siginfo_t uinfo;
1605 target_to_host_siginfo(&uinfo, (target_siginfo_t *)arg3);
1606 ret = get_errno(sys_rt_sigqueueinfo(arg1, arg2, &uinfo));
1607 }
1608 break;
1609 case TARGET_NR_sigreturn:
1610 /* NOTE: ret is eax, so not transcoding must be done */
1611 ret = do_sigreturn(cpu_env);
1612 break;
1613 case TARGET_NR_rt_sigreturn:
1614 /* NOTE: ret is eax, so not transcoding must be done */
1615 ret = do_rt_sigreturn(cpu_env);
1616 break;
1617 case TARGET_NR_setreuid:
1618 ret = get_errno(setreuid(arg1, arg2));
1619 break;
1620 case TARGET_NR_setregid:
1621 ret = get_errno(setregid(arg1, arg2));
1622 break;
1623 case TARGET_NR_sethostname:
1624 ret = get_errno(sethostname((const char *)arg1, arg2));
1625 break;
1626 case TARGET_NR_setrlimit:
1627 {
1628 /* XXX: convert resource ? */
1629 int resource = arg1;
1630 struct target_rlimit *target_rlim = (void *)arg2;
1631 struct rlimit rlim;
1632 rlim.rlim_cur = tswapl(target_rlim->rlim_cur);
1633 rlim.rlim_max = tswapl(target_rlim->rlim_max);
1634 ret = get_errno(setrlimit(resource, &rlim));
1635 }
1636 break;
1637 case TARGET_NR_getrlimit:
1638 {
1639 /* XXX: convert resource ? */
1640 int resource = arg1;
1641 struct target_rlimit *target_rlim = (void *)arg2;
1642 struct rlimit rlim;
1643
1644 ret = get_errno(getrlimit(resource, &rlim));
1645 if (!is_error(ret)) {
1646 target_rlim->rlim_cur = tswapl(rlim.rlim_cur);
1647 target_rlim->rlim_max = tswapl(rlim.rlim_max);
1648 }
1649 }
1650 break;
1651 case TARGET_NR_getrusage:
1652 goto unimplemented;
1653 case TARGET_NR_gettimeofday:
1654 {
1655 struct target_timeval *target_tv = (void *)arg1;
1656 struct timeval tv;
1657 ret = get_errno(gettimeofday(&tv, NULL));
1658 if (!is_error(ret)) {
1659 host_to_target_timeval(target_tv, &tv);
1660 }
1661 }
1662 break;
1663 case TARGET_NR_settimeofday:
1664 {
1665 struct target_timeval *target_tv = (void *)arg1;
1666 struct timeval tv;
1667 target_to_host_timeval(&tv, target_tv);
1668 ret = get_errno(settimeofday(&tv, NULL));
1669 }
1670 break;
1671 case TARGET_NR_getgroups:
1672 goto unimplemented;
1673 case TARGET_NR_setgroups:
1674 goto unimplemented;
1675 case TARGET_NR_select:
1676 goto unimplemented;
1677 case TARGET_NR_symlink:
1678 ret = get_errno(symlink((const char *)arg1, (const char *)arg2));
1679 break;
1680 case TARGET_NR_oldlstat:
1681 goto unimplemented;
1682 case TARGET_NR_readlink:
1683 ret = get_errno(readlink((const char *)arg1, (char *)arg2, arg3));
1684 break;
1685 case TARGET_NR_uselib:
1686 goto unimplemented;
1687 case TARGET_NR_swapon:
1688 ret = get_errno(swapon((const char *)arg1, arg2));
1689 break;
1690 case TARGET_NR_reboot:
1691 goto unimplemented;
1692 case TARGET_NR_readdir:
1693 goto unimplemented;
1694 #ifdef TARGET_I386
1695 case TARGET_NR_mmap:
1696 {
1697 uint32_t v1, v2, v3, v4, v5, v6, *vptr;
1698 vptr = (uint32_t *)arg1;
1699 v1 = tswap32(vptr[0]);
1700 v2 = tswap32(vptr[1]);
1701 v3 = tswap32(vptr[2]);
1702 v4 = tswap32(vptr[3]);
1703 v5 = tswap32(vptr[4]);
1704 v6 = tswap32(vptr[5]);
1705 ret = get_errno((long)mmap((void *)v1, v2, v3, v4, v5, v6));
1706 }
1707 break;
1708 #endif
1709 #ifdef TARGET_I386
1710 case TARGET_NR_mmap2:
1711 #else
1712 case TARGET_NR_mmap:
1713 #endif
1714 ret = get_errno((long)mmap((void *)arg1, arg2, arg3, arg4, arg5, arg6));
1715 break;
1716 case TARGET_NR_munmap:
1717 ret = get_errno(munmap((void *)arg1, arg2));
1718 break;
1719 case TARGET_NR_mprotect:
1720 ret = get_errno(mprotect((void *)arg1, arg2, arg3));
1721 break;
1722 case TARGET_NR_mremap:
1723 ret = get_errno((long)mremap((void *)arg1, arg2, arg3, arg4));
1724 break;
1725 case TARGET_NR_msync:
1726 ret = get_errno(msync((void *)arg1, arg2, arg3));
1727 break;
1728 case TARGET_NR_mlock:
1729 ret = get_errno(mlock((void *)arg1, arg2));
1730 break;
1731 case TARGET_NR_munlock:
1732 ret = get_errno(munlock((void *)arg1, arg2));
1733 break;
1734 case TARGET_NR_mlockall:
1735 ret = get_errno(mlockall(arg1));
1736 break;
1737 case TARGET_NR_munlockall:
1738 ret = get_errno(munlockall());
1739 break;
1740 case TARGET_NR_truncate:
1741 ret = get_errno(truncate((const char *)arg1, arg2));
1742 break;
1743 case TARGET_NR_ftruncate:
1744 ret = get_errno(ftruncate(arg1, arg2));
1745 break;
1746 case TARGET_NR_fchmod:
1747 ret = get_errno(fchmod(arg1, arg2));
1748 break;
1749 case TARGET_NR_fchown:
1750 ret = get_errno(fchown(arg1, arg2, arg3));
1751 break;
1752 case TARGET_NR_getpriority:
1753 ret = get_errno(getpriority(arg1, arg2));
1754 break;
1755 case TARGET_NR_setpriority:
1756 ret = get_errno(setpriority(arg1, arg2, arg3));
1757 break;
1758 case TARGET_NR_profil:
1759 goto unimplemented;
1760 case TARGET_NR_statfs:
1761 stfs = (void *)arg2;
1762 ret = get_errno(sys_statfs((const char *)arg1, stfs));
1763 convert_statfs:
1764 if (!is_error(ret)) {
1765 tswap32s(&stfs->f_type);
1766 tswap32s(&stfs->f_bsize);
1767 tswap32s(&stfs->f_blocks);
1768 tswap32s(&stfs->f_bfree);
1769 tswap32s(&stfs->f_bavail);
1770 tswap32s(&stfs->f_files);
1771 tswap32s(&stfs->f_ffree);
1772 tswap32s(&stfs->f_fsid.val[0]);
1773 tswap32s(&stfs->f_fsid.val[1]);
1774 tswap32s(&stfs->f_namelen);
1775 }
1776 break;
1777 case TARGET_NR_fstatfs:
1778 stfs = (void *)arg2;
1779 ret = get_errno(sys_fstatfs(arg1, stfs));
1780 goto convert_statfs;
1781 case TARGET_NR_ioperm:
1782 goto unimplemented;
1783 case TARGET_NR_socketcall:
1784 ret = do_socketcall(arg1, (int32_t *)arg2);
1785 break;
1786 case TARGET_NR_syslog:
1787 goto unimplemented;
1788 case TARGET_NR_setitimer:
1789 {
1790 struct target_itimerval *target_value = (void *)arg2;
1791 struct target_itimerval *target_ovalue = (void *)arg3;
1792 struct itimerval value, ovalue, *pvalue;
1793
1794 if (target_value) {
1795 pvalue = &value;
1796 target_to_host_timeval(&pvalue->it_interval,
1797 &target_value->it_interval);
1798 target_to_host_timeval(&pvalue->it_value,
1799 &target_value->it_value);
1800 } else {
1801 pvalue = NULL;
1802 }
1803 ret = get_errno(setitimer(arg1, pvalue, &ovalue));
1804 if (!is_error(ret) && target_ovalue) {
1805 host_to_target_timeval(&target_ovalue->it_interval,
1806 &ovalue.it_interval);
1807 host_to_target_timeval(&target_ovalue->it_value,
1808 &ovalue.it_value);
1809 }
1810 }
1811 break;
1812 case TARGET_NR_getitimer:
1813 {
1814 struct target_itimerval *target_value = (void *)arg2;
1815 struct itimerval value;
1816
1817 ret = get_errno(getitimer(arg1, &value));
1818 if (!is_error(ret) && target_value) {
1819 host_to_target_timeval(&target_value->it_interval,
1820 &value.it_interval);
1821 host_to_target_timeval(&target_value->it_value,
1822 &value.it_value);
1823 }
1824 }
1825 break;
1826 case TARGET_NR_stat:
1827 ret = get_errno(stat((const char *)arg1, &st));
1828 goto do_stat;
1829 case TARGET_NR_lstat:
1830 ret = get_errno(lstat((const char *)arg1, &st));
1831 goto do_stat;
1832 case TARGET_NR_fstat:
1833 {
1834 ret = get_errno(fstat(arg1, &st));
1835 do_stat:
1836 if (!is_error(ret)) {
1837 struct target_stat *target_st = (void *)arg2;
1838 target_st->st_dev = tswap16(st.st_dev);
1839 target_st->st_ino = tswapl(st.st_ino);
1840 target_st->st_mode = tswap16(st.st_mode);
1841 target_st->st_nlink = tswap16(st.st_nlink);
1842 target_st->st_uid = tswap16(st.st_uid);
1843 target_st->st_gid = tswap16(st.st_gid);
1844 target_st->st_rdev = tswap16(st.st_rdev);
1845 target_st->st_size = tswapl(st.st_size);
1846 target_st->st_blksize = tswapl(st.st_blksize);
1847 target_st->st_blocks = tswapl(st.st_blocks);
1848 target_st->target_st_atime = tswapl(st.st_atime);
1849 target_st->target_st_mtime = tswapl(st.st_mtime);
1850 target_st->target_st_ctime = tswapl(st.st_ctime);
1851 }
1852 }
1853 break;
1854 case TARGET_NR_olduname:
1855 goto unimplemented;
1856 case TARGET_NR_iopl:
1857 goto unimplemented;
1858 case TARGET_NR_vhangup:
1859 ret = get_errno(vhangup());
1860 break;
1861 case TARGET_NR_idle:
1862 goto unimplemented;
1863 case TARGET_NR_wait4:
1864 {
1865 int status;
1866 target_long *status_ptr = (void *)arg2;
1867 struct rusage rusage, *rusage_ptr;
1868 struct target_rusage *target_rusage = (void *)arg4;
1869 if (target_rusage)
1870 rusage_ptr = &rusage;
1871 else
1872 rusage_ptr = NULL;
1873 ret = get_errno(wait4(arg1, &status, arg3, rusage_ptr));
1874 if (!is_error(ret)) {
1875 if (status_ptr)
1876 *status_ptr = tswap32(status);
1877 if (target_rusage) {
1878 target_rusage->ru_utime.tv_sec = tswapl(rusage.ru_utime.tv_sec);
1879 target_rusage->ru_utime.tv_usec = tswapl(rusage.ru_utime.tv_usec);
1880 target_rusage->ru_stime.tv_sec = tswapl(rusage.ru_stime.tv_sec);
1881 target_rusage->ru_stime.tv_usec = tswapl(rusage.ru_stime.tv_usec);
1882 target_rusage->ru_maxrss = tswapl(rusage.ru_maxrss);
1883 target_rusage->ru_ixrss = tswapl(rusage.ru_ixrss);
1884 target_rusage->ru_idrss = tswapl(rusage.ru_idrss);
1885 target_rusage->ru_isrss = tswapl(rusage.ru_isrss);
1886 target_rusage->ru_minflt = tswapl(rusage.ru_minflt);
1887 target_rusage->ru_majflt = tswapl(rusage.ru_majflt);
1888 target_rusage->ru_nswap = tswapl(rusage.ru_nswap);
1889 target_rusage->ru_inblock = tswapl(rusage.ru_inblock);
1890 target_rusage->ru_oublock = tswapl(rusage.ru_oublock);
1891 target_rusage->ru_msgsnd = tswapl(rusage.ru_msgsnd);
1892 target_rusage->ru_msgrcv = tswapl(rusage.ru_msgrcv);
1893 target_rusage->ru_nsignals = tswapl(rusage.ru_nsignals);
1894 target_rusage->ru_nvcsw = tswapl(rusage.ru_nvcsw);
1895 target_rusage->ru_nivcsw = tswapl(rusage.ru_nivcsw);
1896 }
1897 }
1898 }
1899 break;
1900 case TARGET_NR_swapoff:
1901 ret = get_errno(swapoff((const char *)arg1));
1902 break;
1903 case TARGET_NR_sysinfo:
1904 goto unimplemented;
1905 case TARGET_NR_ipc:
1906 goto unimplemented;
1907 case TARGET_NR_fsync:
1908 ret = get_errno(fsync(arg1));
1909 break;
1910 case TARGET_NR_clone:
1911 ret = get_errno(do_fork(cpu_env, arg1, arg2));
1912 break;
1913 case TARGET_NR_setdomainname:
1914 ret = get_errno(setdomainname((const char *)arg1, arg2));
1915 break;
1916 case TARGET_NR_uname:
1917 /* no need to transcode because we use the linux syscall */
1918 ret = get_errno(sys_uname((struct new_utsname *)arg1));
1919 break;
1920 #ifdef TARGET_I386
1921 case TARGET_NR_modify_ldt:
1922 ret = get_errno(do_modify_ldt(cpu_env, arg1, (void *)arg2, arg3));
1923 break;
1924 case TARGET_NR_vm86old:
1925 goto unimplemented;
1926 case TARGET_NR_vm86:
1927 ret = do_vm86(cpu_env, arg1, (void *)arg2);
1928 break;
1929 #endif
1930 case TARGET_NR_adjtimex:
1931 goto unimplemented;
1932 case TARGET_NR_create_module:
1933 case TARGET_NR_init_module:
1934 case TARGET_NR_delete_module:
1935 case TARGET_NR_get_kernel_syms:
1936 goto unimplemented;
1937 case TARGET_NR_quotactl:
1938 goto unimplemented;
1939 case TARGET_NR_getpgid:
1940 ret = get_errno(getpgid(arg1));
1941 break;
1942 case TARGET_NR_fchdir:
1943 ret = get_errno(fchdir(arg1));
1944 break;
1945 case TARGET_NR_bdflush:
1946 goto unimplemented;
1947 case TARGET_NR_sysfs:
1948 goto unimplemented;
1949 case TARGET_NR_personality:
1950 ret = get_errno(personality(arg1));
1951 break;
1952 case TARGET_NR_afs_syscall:
1953 goto unimplemented;
1954 case TARGET_NR_setfsuid:
1955 ret = get_errno(setfsuid(arg1));
1956 break;
1957 case TARGET_NR_setfsgid:
1958 ret = get_errno(setfsgid(arg1));
1959 break;
1960 case TARGET_NR__llseek:
1961 {
1962 int64_t res;
1963 ret = get_errno(_llseek(arg1, arg2, arg3, &res, arg5));
1964 *(int64_t *)arg4 = tswap64(res);
1965 }
1966 break;
1967 case TARGET_NR_getdents:
1968 #if TARGET_LONG_SIZE != 4
1969 #error not supported
1970 #endif
1971 {
1972 struct dirent *dirp = (void *)arg2;
1973 long count = arg3;
1974
1975 ret = get_errno(sys_getdents(arg1, dirp, count));
1976 if (!is_error(ret)) {
1977 struct dirent *de;
1978 int len = ret;
1979 int reclen;
1980 de = dirp;
1981 while (len > 0) {
1982 reclen = de->d_reclen;
1983 if (reclen > len)
1984 break;
1985 de->d_reclen = tswap16(reclen);
1986 tswapls(&de->d_ino);
1987 tswapls(&de->d_off);
1988 de = (struct dirent *)((char *)de + reclen);
1989 len -= reclen;
1990 }
1991 }
1992 }
1993 break;
1994 case TARGET_NR_getdents64:
1995 {
1996 struct dirent64 *dirp = (void *)arg2;
1997 long count = arg3;
1998 ret = get_errno(sys_getdents64(arg1, dirp, count));
1999 if (!is_error(ret)) {
2000 struct dirent64 *de;
2001 int len = ret;
2002 int reclen;
2003 de = dirp;
2004 while (len > 0) {
2005 reclen = de->d_reclen;
2006 if (reclen > len)
2007 break;
2008 de->d_reclen = tswap16(reclen);
2009 tswap64s(&de->d_ino);
2010 tswap64s(&de->d_off);
2011 de = (struct dirent64 *)((char *)de + reclen);
2012 len -= reclen;
2013 }
2014 }
2015 }
2016 break;
2017 case TARGET_NR__newselect:
2018 ret = do_select(arg1, (void *)arg2, (void *)arg3, (void *)arg4,
2019 (void *)arg5);
2020 break;
2021 case TARGET_NR_poll:
2022 {
2023 struct target_pollfd *target_pfd = (void *)arg1;
2024 unsigned int nfds = arg2;
2025 int timeout = arg3;
2026 struct pollfd *pfd;
2027 unsigned int i;
2028
2029 pfd = alloca(sizeof(struct pollfd) * nfds);
2030 for(i = 0; i < nfds; i++) {
2031 pfd[i].fd = tswap32(target_pfd[i].fd);
2032 pfd[i].events = tswap16(target_pfd[i].events);
2033 }
2034 ret = get_errno(poll(pfd, nfds, timeout));
2035 if (!is_error(ret)) {
2036 for(i = 0; i < nfds; i++) {
2037 target_pfd[i].revents = tswap16(pfd[i].revents);
2038 }
2039 }
2040 }
2041 break;
2042 case TARGET_NR_flock:
2043 /* NOTE: the flock constant seems to be the same for every
2044 Linux platform */
2045 ret = get_errno(flock(arg1, arg2));
2046 break;
2047 case TARGET_NR_readv:
2048 {
2049 int count = arg3;
2050 int i;
2051 struct iovec *vec;
2052 struct target_iovec *target_vec = (void *)arg2;
2053
2054 vec = alloca(count * sizeof(struct iovec));
2055 for(i = 0;i < count; i++) {
2056 vec[i].iov_base = (void *)tswapl(target_vec[i].iov_base);
2057 vec[i].iov_len = tswapl(target_vec[i].iov_len);
2058 }
2059 ret = get_errno(readv(arg1, vec, count));
2060 }
2061 break;
2062 case TARGET_NR_writev:
2063 {
2064 int count = arg3;
2065 int i;
2066 struct iovec *vec;
2067 struct target_iovec *target_vec = (void *)arg2;
2068
2069 vec = alloca(count * sizeof(struct iovec));
2070 for(i = 0;i < count; i++) {
2071 vec[i].iov_base = (void *)tswapl(target_vec[i].iov_base);
2072 vec[i].iov_len = tswapl(target_vec[i].iov_len);
2073 }
2074 ret = get_errno(writev(arg1, vec, count));
2075 }
2076 break;
2077 case TARGET_NR_getsid:
2078 ret = get_errno(getsid(arg1));
2079 break;
2080 case TARGET_NR_fdatasync:
2081 ret = get_errno(fdatasync(arg1));
2082 break;
2083 case TARGET_NR__sysctl:
2084 goto unimplemented;
2085 case TARGET_NR_sched_setparam:
2086 {
2087 struct sched_param *target_schp = (void *)arg2;
2088 struct sched_param schp;
2089 schp.sched_priority = tswap32(target_schp->sched_priority);
2090 ret = get_errno(sched_setparam(arg1, &schp));
2091 }
2092 break;
2093 case TARGET_NR_sched_getparam:
2094 {
2095 struct sched_param *target_schp = (void *)arg2;
2096 struct sched_param schp;
2097 ret = get_errno(sched_getparam(arg1, &schp));
2098 if (!is_error(ret)) {
2099 target_schp->sched_priority = tswap32(schp.sched_priority);
2100 }
2101 }
2102 break;
2103 case TARGET_NR_sched_setscheduler:
2104 {
2105 struct sched_param *target_schp = (void *)arg3;
2106 struct sched_param schp;
2107 schp.sched_priority = tswap32(target_schp->sched_priority);
2108 ret = get_errno(sched_setscheduler(arg1, arg2, &schp));
2109 }
2110 break;
2111 case TARGET_NR_sched_getscheduler:
2112 ret = get_errno(sched_getscheduler(arg1));
2113 break;
2114 case TARGET_NR_sched_yield:
2115 ret = get_errno(sched_yield());
2116 break;
2117 case TARGET_NR_sched_get_priority_max:
2118 ret = get_errno(sched_get_priority_max(arg1));
2119 break;
2120 case TARGET_NR_sched_get_priority_min:
2121 ret = get_errno(sched_get_priority_min(arg1));
2122 break;
2123 case TARGET_NR_sched_rr_get_interval:
2124 {
2125 struct target_timespec *target_ts = (void *)arg2;
2126 struct timespec ts;
2127 ret = get_errno(sched_rr_get_interval(arg1, &ts));
2128 if (!is_error(ret)) {
2129 target_ts->tv_sec = tswapl(ts.tv_sec);
2130 target_ts->tv_nsec = tswapl(ts.tv_nsec);
2131 }
2132 }
2133 break;
2134 case TARGET_NR_nanosleep:
2135 {
2136 struct target_timespec *target_req = (void *)arg1;
2137 struct target_timespec *target_rem = (void *)arg2;
2138 struct timespec req, rem;
2139 req.tv_sec = tswapl(target_req->tv_sec);
2140 req.tv_nsec = tswapl(target_req->tv_nsec);
2141 ret = get_errno(nanosleep(&req, &rem));
2142 if (target_rem) {
2143 target_rem->tv_sec = tswapl(rem.tv_sec);
2144 target_rem->tv_nsec = tswapl(rem.tv_nsec);
2145 }
2146 }
2147 break;
2148 case TARGET_NR_setresuid:
2149 ret = get_errno(setresuid(low2highuid(arg1),
2150 low2highuid(arg2),
2151 low2highuid(arg3)));
2152 break;
2153 case TARGET_NR_getresuid:
2154 {
2155 int ruid, euid, suid;
2156 ret = get_errno(getresuid(&ruid, &euid, &suid));
2157 if (!is_error(ret)) {
2158 *(uint16_t *)arg1 = tswap16(high2lowuid(ruid));
2159 *(uint16_t *)arg2 = tswap16(high2lowuid(euid));
2160 *(uint16_t *)arg3 = tswap16(high2lowuid(suid));
2161 }
2162 }
2163 break;
2164 case TARGET_NR_setresgid:
2165 ret = get_errno(setresgid(low2highgid(arg1),
2166 low2highgid(arg2),
2167 low2highgid(arg3)));
2168 break;
2169 case TARGET_NR_getresgid:
2170 {
2171 int rgid, egid, sgid;
2172 ret = get_errno(getresgid(&rgid, &egid, &sgid));
2173 if (!is_error(ret)) {
2174 *(uint16_t *)arg1 = high2lowgid(tswap16(rgid));
2175 *(uint16_t *)arg2 = high2lowgid(tswap16(egid));
2176 *(uint16_t *)arg3 = high2lowgid(tswap16(sgid));
2177 }
2178 }
2179 break;
2180 case TARGET_NR_query_module:
2181 goto unimplemented;
2182 case TARGET_NR_nfsservctl:
2183 goto unimplemented;
2184 case TARGET_NR_prctl:
2185 goto unimplemented;
2186 case TARGET_NR_pread:
2187 goto unimplemented;
2188 case TARGET_NR_pwrite:
2189 goto unimplemented;
2190 case TARGET_NR_chown:
2191 ret = get_errno(chown((const char *)arg1, arg2, arg3));
2192 break;
2193 case TARGET_NR_getcwd:
2194 ret = get_errno(sys_getcwd1((char *)arg1, arg2));
2195 break;
2196 case TARGET_NR_capget:
2197 goto unimplemented;
2198 case TARGET_NR_capset:
2199 goto unimplemented;
2200 case TARGET_NR_sigaltstack:
2201 goto unimplemented;
2202 case TARGET_NR_sendfile:
2203 goto unimplemented;
2204 case TARGET_NR_getpmsg:
2205 goto unimplemented;
2206 case TARGET_NR_putpmsg:
2207 goto unimplemented;
2208 case TARGET_NR_vfork:
2209 ret = get_errno(do_fork(cpu_env, CLONE_VFORK | CLONE_VM | SIGCHLD, 0));
2210 break;
2211 case TARGET_NR_ugetrlimit:
2212 goto unimplemented;
2213 case TARGET_NR_truncate64:
2214 goto unimplemented;
2215 case TARGET_NR_ftruncate64:
2216 goto unimplemented;
2217 case TARGET_NR_stat64:
2218 ret = get_errno(stat((const char *)arg1, &st));
2219 goto do_stat64;
2220 case TARGET_NR_lstat64:
2221 ret = get_errno(lstat((const char *)arg1, &st));
2222 goto do_stat64;
2223 case TARGET_NR_fstat64:
2224 {
2225 ret = get_errno(fstat(arg1, &st));
2226 do_stat64:
2227 if (!is_error(ret)) {
2228 struct target_stat64 *target_st = (void *)arg2;
2229 target_st->st_dev = tswap16(st.st_dev);
2230 target_st->st_ino = tswapl(st.st_ino);
2231 target_st->st_mode = tswap16(st.st_mode);
2232 target_st->st_nlink = tswap16(st.st_nlink);
2233 target_st->st_uid = tswap16(st.st_uid);
2234 target_st->st_gid = tswap16(st.st_gid);
2235 target_st->st_rdev = tswap16(st.st_rdev);
2236 /* XXX: better use of kernel struct */
2237 target_st->st_size = tswapl(st.st_size);
2238 target_st->st_blksize = tswapl(st.st_blksize);
2239 target_st->st_blocks = tswapl(st.st_blocks);
2240 target_st->target_st_atime = tswapl(st.st_atime);
2241 target_st->target_st_mtime = tswapl(st.st_mtime);
2242 target_st->target_st_ctime = tswapl(st.st_ctime);
2243 }
2244 }
2245 break;
2246
2247 case TARGET_NR_lchown32:
2248 ret = get_errno(lchown((const char *)arg1, arg2, arg3));
2249 break;
2250 case TARGET_NR_getuid32:
2251 ret = get_errno(getuid());
2252 break;
2253 case TARGET_NR_getgid32:
2254 ret = get_errno(getgid());
2255 break;
2256 case TARGET_NR_geteuid32:
2257 ret = get_errno(geteuid());
2258 break;
2259 case TARGET_NR_getegid32:
2260 ret = get_errno(getegid());
2261 break;
2262 case TARGET_NR_setreuid32:
2263 ret = get_errno(setreuid(arg1, arg2));
2264 break;
2265 case TARGET_NR_setregid32:
2266 ret = get_errno(setregid(arg1, arg2));
2267 break;
2268 case TARGET_NR_getgroups32:
2269 goto unimplemented;
2270 case TARGET_NR_setgroups32:
2271 goto unimplemented;
2272 case TARGET_NR_fchown32:
2273 ret = get_errno(fchown(arg1, arg2, arg3));
2274 break;
2275 case TARGET_NR_setresuid32:
2276 ret = get_errno(setresuid(arg1, arg2, arg3));
2277 break;
2278 case TARGET_NR_getresuid32:
2279 {
2280 int ruid, euid, suid;
2281 ret = get_errno(getresuid(&ruid, &euid, &suid));
2282 if (!is_error(ret)) {
2283 *(uint32_t *)arg1 = tswap32(ruid);
2284 *(uint32_t *)arg2 = tswap32(euid);
2285 *(uint32_t *)arg3 = tswap32(suid);
2286 }
2287 }
2288 break;
2289 case TARGET_NR_setresgid32:
2290 ret = get_errno(setresgid(arg1, arg2, arg3));
2291 break;
2292 case TARGET_NR_getresgid32:
2293 {
2294 int rgid, egid, sgid;
2295 ret = get_errno(getresgid(&rgid, &egid, &sgid));
2296 if (!is_error(ret)) {
2297 *(uint32_t *)arg1 = tswap32(rgid);
2298 *(uint32_t *)arg2 = tswap32(egid);
2299 *(uint32_t *)arg3 = tswap32(sgid);
2300 }
2301 }
2302 break;
2303 case TARGET_NR_chown32:
2304 ret = get_errno(chown((const char *)arg1, arg2, arg3));
2305 break;
2306 case TARGET_NR_setuid32:
2307 ret = get_errno(setuid(arg1));
2308 break;
2309 case TARGET_NR_setgid32:
2310 ret = get_errno(setgid(arg1));
2311 break;
2312 case TARGET_NR_setfsuid32:
2313 ret = get_errno(setfsuid(arg1));
2314 break;
2315 case TARGET_NR_setfsgid32:
2316 ret = get_errno(setfsgid(arg1));
2317 break;
2318 case TARGET_NR_pivot_root:
2319 goto unimplemented;
2320 case TARGET_NR_mincore:
2321 goto unimplemented;
2322 case TARGET_NR_madvise:
2323 goto unimplemented;
2324 #if TARGET_LONG_BITS == 32
2325 case TARGET_NR_fcntl64:
2326 switch(arg2) {
2327 case F_GETLK64:
2328 case F_SETLK64:
2329 case F_SETLKW64:
2330 goto unimplemented;
2331 default:
2332 ret = get_errno(fcntl(arg1, arg2, arg3));
2333 break;
2334 }
2335 break;
2336 #endif
2337 case TARGET_NR_security:
2338 goto unimplemented;
2339 case TARGET_NR_gettid:
2340 ret = get_errno(gettid());
2341 break;
2342 case TARGET_NR_readahead:
2343 goto unimplemented;
2344 case TARGET_NR_setxattr:
2345 case TARGET_NR_lsetxattr:
2346 case TARGET_NR_fsetxattr:
2347 case TARGET_NR_getxattr:
2348 case TARGET_NR_lgetxattr:
2349 case TARGET_NR_fgetxattr:
2350 case TARGET_NR_listxattr:
2351 case TARGET_NR_llistxattr:
2352 case TARGET_NR_flistxattr:
2353 case TARGET_NR_removexattr:
2354 case TARGET_NR_lremovexattr:
2355 case TARGET_NR_fremovexattr:
2356 goto unimplemented_nowarn;
2357 case TARGET_NR_set_thread_area:
2358 case TARGET_NR_get_thread_area:
2359 goto unimplemented_nowarn;
2360 default:
2361 unimplemented:
2362 gemu_log("qemu: Unsupported syscall: %d\n", num);
2363 unimplemented_nowarn:
2364 ret = -ENOSYS;
2365 break;
2366 }
2367 fail:
2368 return ret;
2369 }
2370
Qemu copy for testing