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