root / darwin-user / syscall.c @ 8167ee88
History | View | Annotate | Download (48.2 kB)
| 1 |
/*
|
|---|---|
| 2 |
* Darwin syscalls
|
| 3 |
*
|
| 4 |
* Copyright (c) 2003 Fabrice Bellard
|
| 5 |
* Copyright (c) 2006 Pierre d'Herbemont
|
| 6 |
*
|
| 7 |
* This program is free software; you can redistribute it and/or modify
|
| 8 |
* it under the terms of the GNU General Public License as published by
|
| 9 |
* the Free Software Foundation; either version 2 of the License, or
|
| 10 |
* (at your option) any later version.
|
| 11 |
*
|
| 12 |
* This program is distributed in the hope that it will be useful,
|
| 13 |
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
| 14 |
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
| 15 |
* GNU General Public License for more details.
|
| 16 |
*
|
| 17 |
* You should have received a copy of the GNU General Public License
|
| 18 |
* along with this program; if not, see <http://www.gnu.org/licenses/>.
|
| 19 |
*/
|
| 20 |
#include <fcntl.h> |
| 21 |
#include <stdio.h> |
| 22 |
#include <stdlib.h> |
| 23 |
#include <errno.h> |
| 24 |
|
| 25 |
#include <mach/host_info.h> |
| 26 |
#include <mach/mach.h> |
| 27 |
#include <mach/mach_time.h> |
| 28 |
#include <mach/message.h> |
| 29 |
|
| 30 |
#include <pthread.h> |
| 31 |
#include <dirent.h> |
| 32 |
|
| 33 |
#include <sys/stat.h> |
| 34 |
#include <sys/syscall.h> |
| 35 |
#include <sys/sysctl.h> |
| 36 |
#include <sys/types.h> |
| 37 |
#include <unistd.h> |
| 38 |
#include <sys/ioctl.h> |
| 39 |
#include <sys/mman.h> |
| 40 |
#include <sys/types.h> |
| 41 |
#include <sys/dirent.h> |
| 42 |
#include <sys/uio.h> |
| 43 |
#include <sys/termios.h> |
| 44 |
#include <sys/ptrace.h> |
| 45 |
#include <net/if.h> |
| 46 |
|
| 47 |
#include <sys/param.h> |
| 48 |
#include <sys/mount.h> |
| 49 |
|
| 50 |
#include <sys/attr.h> |
| 51 |
|
| 52 |
#include <mach/ndr.h> |
| 53 |
#include <mach/mig_errors.h> |
| 54 |
|
| 55 |
#include <sys/xattr.h> |
| 56 |
|
| 57 |
#include "qemu.h" |
| 58 |
|
| 59 |
//#define DEBUG_SYSCALL
|
| 60 |
|
| 61 |
#ifdef DEBUG_SYSCALL
|
| 62 |
# define DEBUG_FORCE_ENABLE_LOCAL() int __DEBUG_qemu_user_force_enable = 1 |
| 63 |
# define DEBUG_BEGIN_ENABLE __DEBUG_qemu_user_force_enable = 1; |
| 64 |
# define DEBUG_END_ENABLE __DEBUG_qemu_user_force_enable = 0; |
| 65 |
|
| 66 |
# define DEBUG_DISABLE_ALL() static int __DEBUG_qemu_user_force_enable = 0 |
| 67 |
# define DEBUG_ENABLE_ALL() static int __DEBUG_qemu_user_force_enable = 1 |
| 68 |
DEBUG_ENABLE_ALL(); |
| 69 |
|
| 70 |
# define DPRINTF(...) do { qemu_log(__VA_ARGS__); \ |
| 71 |
if(__DEBUG_qemu_user_force_enable) fprintf(stderr, __VA_ARGS__); \
|
| 72 |
} while(0) |
| 73 |
#else
|
| 74 |
# define DEBUG_FORCE_ENABLE_LOCAL()
|
| 75 |
# define DEBUG_BEGIN_ENABLE
|
| 76 |
# define DEBUG_END_ENABLE
|
| 77 |
|
| 78 |
# define DPRINTF(...) do { qemu_log(__VA_ARGS__); } while(0) |
| 79 |
#endif
|
| 80 |
|
| 81 |
enum {
|
| 82 |
bswap_out = 0,
|
| 83 |
bswap_in = 1
|
| 84 |
}; |
| 85 |
|
| 86 |
extern const char *interp_prefix; |
| 87 |
|
| 88 |
static inline long get_errno(long ret) |
| 89 |
{
|
| 90 |
if (ret == -1) |
| 91 |
return -errno;
|
| 92 |
else
|
| 93 |
return ret;
|
| 94 |
} |
| 95 |
|
| 96 |
static inline int is_error(long ret) |
| 97 |
{
|
| 98 |
return (unsigned long)ret >= (unsigned long)(-4096); |
| 99 |
} |
| 100 |
|
| 101 |
/* ------------------------------------------------------------
|
| 102 |
Mach syscall handling
|
| 103 |
*/
|
| 104 |
|
| 105 |
void static inline print_description_msg_header(mach_msg_header_t *hdr) |
| 106 |
{
|
| 107 |
char *name = NULL; |
| 108 |
int i;
|
| 109 |
struct { int number; char *name; } msg_name[] = |
| 110 |
{
|
| 111 |
/* see http://fxr.watson.org/fxr/source/compat/mach/mach_namemap.c?v=NETBSD */
|
| 112 |
{ 200, "host_info" },
|
| 113 |
{ 202, "host_page_size" },
|
| 114 |
{ 206, "host_get_clock_service" },
|
| 115 |
{ 206, "host_get_clock_service" },
|
| 116 |
{ 206, "host_get_clock_service" },
|
| 117 |
{ 306, "host_get_clock_service" },
|
| 118 |
{ 3204, "mach_port_allocate" },
|
| 119 |
{ 3206, "mach_port_deallocate" },
|
| 120 |
{ 3404, "mach_ports_lookup" },
|
| 121 |
{ 3409, "mach_task_get_special_port" },
|
| 122 |
{ 3414, "mach_task_get_exception_ports" },
|
| 123 |
{ 3418, "mach_semaphore_create" },
|
| 124 |
{ 3504, "mach_semaphore_create" },
|
| 125 |
{ 3509, "mach_semaphore_create" },
|
| 126 |
{ 3518, "semaphore_create" },
|
| 127 |
{ 3616, "thread_policy" },
|
| 128 |
{ 3801, "vm_allocate" },
|
| 129 |
{ 3802, "vm_deallocate" },
|
| 130 |
{ 3802, "vm_deallocate" },
|
| 131 |
{ 3803, "vm_protect" },
|
| 132 |
{ 3812, "vm_map" },
|
| 133 |
{ 4241776, "lu_message_send_id" }, /* lookupd */
|
| 134 |
{ 4241876, "lu_message_reply_id" }, /* lookupd */
|
| 135 |
}; |
| 136 |
|
| 137 |
for(i = 0; i < ARRAY_SIZE(msg_name); i++) { |
| 138 |
if(msg_name[i].number == hdr->msgh_id)
|
| 139 |
{
|
| 140 |
name = msg_name[i].name; |
| 141 |
break;
|
| 142 |
} |
| 143 |
} |
| 144 |
if(!name)
|
| 145 |
DPRINTF("unknown mach msg %d 0x%x\n", hdr->msgh_id, hdr->msgh_id);
|
| 146 |
else
|
| 147 |
DPRINTF("%s\n", name);
|
| 148 |
#if 0
|
| 149 |
DPRINTF("Bits: %8x\n", hdr->msgh_bits);
|
| 150 |
DPRINTF("Size: %8x\n", hdr->msgh_size);
|
| 151 |
DPRINTF("Rmte: %8x\n", hdr->msgh_remote_port);
|
| 152 |
DPRINTF("Locl: %8x\n", hdr->msgh_local_port);
|
| 153 |
DPRINTF("Rsrv: %8x\n", hdr->msgh_reserved);
|
| 154 |
|
| 155 |
DPRINTF("Id : %8x\n", hdr->msgh_id);
|
| 156 |
|
| 157 |
NDR_record_t *ndr = (NDR_record_t *)(hdr + 1);
|
| 158 |
DPRINTF("hdr = %p, sizeof(hdr) = %x, NDR = %p\n", hdr, (unsigned int)sizeof(mach_msg_header_t), ndr);
|
| 159 |
DPRINTF("%d %d %d %d %d %d %d %d\n",
|
| 160 |
ndr->mig_vers, ndr->if_vers, ndr->reserved1, ndr->mig_encoding,
|
| 161 |
ndr->int_rep, ndr->char_rep, ndr->float_rep, ndr->reserved2);
|
| 162 |
#endif
|
| 163 |
} |
| 164 |
|
| 165 |
static inline void print_mach_msg_return(mach_msg_return_t ret) |
| 166 |
{
|
| 167 |
int i, found = 0; |
| 168 |
#define MACH_MSG_RET(msg) { msg, #msg } |
| 169 |
struct { int code; char *name; } msg_name[] = |
| 170 |
{
|
| 171 |
/* ref: http://darwinsource.opendarwin.org/10.4.2/xnu-792.2.4/osfmk/man/mach_msg.html */
|
| 172 |
/* send message */
|
| 173 |
MACH_MSG_RET(MACH_SEND_MSG_TOO_SMALL), |
| 174 |
MACH_MSG_RET(MACH_SEND_NO_BUFFER), |
| 175 |
MACH_MSG_RET(MACH_SEND_INVALID_DATA), |
| 176 |
MACH_MSG_RET(MACH_SEND_INVALID_HEADER), |
| 177 |
MACH_MSG_RET(MACH_SEND_INVALID_DEST), |
| 178 |
MACH_MSG_RET(MACH_SEND_INVALID_NOTIFY), |
| 179 |
MACH_MSG_RET(MACH_SEND_INVALID_REPLY), |
| 180 |
MACH_MSG_RET(MACH_SEND_INVALID_TRAILER), |
| 181 |
MACH_MSG_RET(MACH_SEND_INVALID_MEMORY), |
| 182 |
MACH_MSG_RET(MACH_SEND_INVALID_RIGHT), |
| 183 |
MACH_MSG_RET(MACH_SEND_INVALID_TYPE), |
| 184 |
MACH_MSG_RET(MACH_SEND_INTERRUPTED), |
| 185 |
MACH_MSG_RET(MACH_SEND_TIMED_OUT), |
| 186 |
|
| 187 |
MACH_MSG_RET(MACH_RCV_BODY_ERROR), |
| 188 |
MACH_MSG_RET(MACH_RCV_HEADER_ERROR), |
| 189 |
|
| 190 |
MACH_MSG_RET(MACH_RCV_IN_SET), |
| 191 |
MACH_MSG_RET(MACH_RCV_INTERRUPTED), |
| 192 |
|
| 193 |
MACH_MSG_RET(MACH_RCV_INVALID_DATA), |
| 194 |
MACH_MSG_RET(MACH_RCV_INVALID_NAME), |
| 195 |
MACH_MSG_RET(MACH_RCV_INVALID_NOTIFY), |
| 196 |
MACH_MSG_RET(MACH_RCV_INVALID_TRAILER), |
| 197 |
MACH_MSG_RET(MACH_RCV_INVALID_TYPE), |
| 198 |
|
| 199 |
MACH_MSG_RET(MACH_RCV_PORT_CHANGED), |
| 200 |
MACH_MSG_RET(MACH_RCV_PORT_DIED), |
| 201 |
|
| 202 |
MACH_MSG_RET(MACH_RCV_SCATTER_SMALL), |
| 203 |
MACH_MSG_RET(MACH_RCV_TIMED_OUT), |
| 204 |
MACH_MSG_RET(MACH_RCV_TOO_LARGE) |
| 205 |
}; |
| 206 |
#undef MACH_MSG_RET
|
| 207 |
|
| 208 |
if( ret == MACH_MSG_SUCCESS)
|
| 209 |
DPRINTF("MACH_MSG_SUCCESS\n");
|
| 210 |
else
|
| 211 |
{
|
| 212 |
for( i = 0; i < ARRAY_SIZE(msg_name); i++) { |
| 213 |
if(msg_name[i].code == ret) {
|
| 214 |
DPRINTF("%s\n", msg_name[i].name);
|
| 215 |
found = 1;
|
| 216 |
break;
|
| 217 |
} |
| 218 |
} |
| 219 |
if(!found)
|
| 220 |
qerror("unknow mach message ret code %d\n", ret);
|
| 221 |
} |
| 222 |
} |
| 223 |
|
| 224 |
static inline void swap_mach_msg_header(mach_msg_header_t *hdr) |
| 225 |
{
|
| 226 |
hdr->msgh_bits = tswap32(hdr->msgh_bits); |
| 227 |
hdr->msgh_size = tswap32(hdr->msgh_size); |
| 228 |
hdr->msgh_remote_port = tswap32(hdr->msgh_remote_port); |
| 229 |
hdr->msgh_local_port = tswap32(hdr->msgh_local_port); |
| 230 |
hdr->msgh_reserved = tswap32(hdr->msgh_reserved); |
| 231 |
hdr->msgh_id = tswap32(hdr->msgh_id); |
| 232 |
} |
| 233 |
|
| 234 |
struct complex_msg {
|
| 235 |
mach_msg_header_t hdr; |
| 236 |
mach_msg_body_t body; |
| 237 |
}; |
| 238 |
|
| 239 |
static inline void swap_mach_msg_body(struct complex_msg *complex_msg, int bswap) |
| 240 |
{
|
| 241 |
mach_msg_port_descriptor_t *descr = (mach_msg_port_descriptor_t *)(complex_msg+1);
|
| 242 |
int i,j;
|
| 243 |
|
| 244 |
if(bswap == bswap_in)
|
| 245 |
tswap32s(&complex_msg->body.msgh_descriptor_count); |
| 246 |
|
| 247 |
DPRINTF("body.msgh_descriptor_count %d\n", complex_msg->body.msgh_descriptor_count);
|
| 248 |
|
| 249 |
for(i = 0; i < complex_msg->body.msgh_descriptor_count; i++) { |
| 250 |
switch(descr->type)
|
| 251 |
{
|
| 252 |
case MACH_MSG_PORT_DESCRIPTOR:
|
| 253 |
tswap32s(&descr->name); |
| 254 |
descr++; |
| 255 |
break;
|
| 256 |
case MACH_MSG_OOL_DESCRIPTOR:
|
| 257 |
{
|
| 258 |
mach_msg_ool_descriptor_t *ool = (void *)descr;
|
| 259 |
tswap32s((uint32_t *)&ool->address); |
| 260 |
tswap32s(&ool->size); |
| 261 |
|
| 262 |
descr = (mach_msg_port_descriptor_t *)(ool+1);
|
| 263 |
break;
|
| 264 |
} |
| 265 |
case MACH_MSG_OOL_PORTS_DESCRIPTOR:
|
| 266 |
{
|
| 267 |
mach_msg_ool_ports_descriptor_t *ool_ports = (void *)descr;
|
| 268 |
mach_port_name_t * port_names; |
| 269 |
|
| 270 |
if(bswap == bswap_in)
|
| 271 |
{
|
| 272 |
tswap32s((uint32_t *)&ool_ports->address); |
| 273 |
tswap32s(&ool_ports->count); |
| 274 |
} |
| 275 |
|
| 276 |
port_names = ool_ports->address; |
| 277 |
|
| 278 |
for(j = 0; j < ool_ports->count; j++) |
| 279 |
tswap32s(&port_names[j]); |
| 280 |
|
| 281 |
if(bswap == bswap_out)
|
| 282 |
{
|
| 283 |
tswap32s((uint32_t *)&ool_ports->address); |
| 284 |
tswap32s(&ool_ports->count); |
| 285 |
} |
| 286 |
|
| 287 |
descr = (mach_msg_port_descriptor_t *)(ool_ports+1);
|
| 288 |
break;
|
| 289 |
} |
| 290 |
default: qerror("unknow mach msg descriptor type %x\n", descr->type); |
| 291 |
} |
| 292 |
} |
| 293 |
if(bswap == bswap_out)
|
| 294 |
tswap32s(&complex_msg->body.msgh_descriptor_count); |
| 295 |
} |
| 296 |
|
| 297 |
static inline void swap_mach_msg(mach_msg_header_t *hdr, int bswap) |
| 298 |
{
|
| 299 |
if (bswap == bswap_out && hdr->msgh_bits & MACH_MSGH_BITS_COMPLEX)
|
| 300 |
swap_mach_msg_body((struct complex_msg *)hdr, bswap);
|
| 301 |
|
| 302 |
swap_mach_msg_header(hdr); |
| 303 |
|
| 304 |
if (bswap == bswap_in && hdr->msgh_bits & MACH_MSGH_BITS_COMPLEX)
|
| 305 |
swap_mach_msg_body((struct complex_msg *)hdr, bswap);
|
| 306 |
} |
| 307 |
|
| 308 |
static inline uint32_t target_mach_msg_trap( |
| 309 |
mach_msg_header_t *hdr, uint32_t options, uint32_t send_size, |
| 310 |
uint32_t rcv_size, uint32_t rcv_name, uint32_t time_out, uint32_t notify) |
| 311 |
{
|
| 312 |
extern int mach_msg_trap(mach_msg_header_t *, mach_msg_option_t, |
| 313 |
mach_msg_size_t, mach_msg_size_t, mach_port_t, |
| 314 |
mach_msg_timeout_t, mach_port_t); |
| 315 |
mach_msg_audit_trailer_t *trailer; |
| 316 |
mach_msg_id_t msg_id; |
| 317 |
uint32_t ret = 0;
|
| 318 |
int i;
|
| 319 |
|
| 320 |
swap_mach_msg(hdr, bswap_in); |
| 321 |
|
| 322 |
msg_id = hdr->msgh_id; |
| 323 |
|
| 324 |
print_description_msg_header(hdr); |
| 325 |
|
| 326 |
ret = mach_msg_trap(hdr, options, send_size, rcv_size, rcv_name, time_out, notify); |
| 327 |
|
| 328 |
print_mach_msg_return(ret); |
| 329 |
|
| 330 |
if( (options & MACH_RCV_MSG) && (REQUESTED_TRAILER_SIZE(options) > 0) ) |
| 331 |
{
|
| 332 |
/* XXX: the kernel always return the full trailer with MACH_SEND_MSG, so we should
|
| 333 |
probably always bswap it */
|
| 334 |
/* warning: according to Mac OS X Internals (the book) msg_size might be expressed in
|
| 335 |
natural_t units but according to xnu/osfmk/mach/message.h: "The size of
|
| 336 |
the message must be specified in bytes" */
|
| 337 |
trailer = (mach_msg_audit_trailer_t *)((uint8_t *)hdr + hdr->msgh_size); |
| 338 |
/* XXX: Should probably do that based on the option asked by the sender, but dealing
|
| 339 |
with kernel answer seems more sound */
|
| 340 |
switch(trailer->msgh_trailer_size)
|
| 341 |
{
|
| 342 |
case sizeof(mach_msg_audit_trailer_t): |
| 343 |
for(i = 0; i < 8; i++) |
| 344 |
tswap32s(&trailer->msgh_audit.val[i]); |
| 345 |
/* Fall in mach_msg_security_trailer_t case */
|
| 346 |
case sizeof(mach_msg_security_trailer_t): |
| 347 |
tswap32s(&trailer->msgh_sender.val[0]);
|
| 348 |
tswap32s(&trailer->msgh_sender.val[1]);
|
| 349 |
/* Fall in mach_msg_seqno_trailer_t case */
|
| 350 |
case sizeof(mach_msg_seqno_trailer_t): |
| 351 |
tswap32s(&trailer->msgh_seqno); |
| 352 |
/* Fall in mach_msg_trailer_t case */
|
| 353 |
case sizeof(mach_msg_trailer_t): |
| 354 |
tswap32s(&trailer->msgh_trailer_type); |
| 355 |
tswap32s(&trailer->msgh_trailer_size); |
| 356 |
break;
|
| 357 |
case 0: |
| 358 |
/* Safer not to byteswap, but probably wrong */
|
| 359 |
break;
|
| 360 |
default:
|
| 361 |
qerror("unknow trailer type given its size %d\n", trailer->msgh_trailer_size);
|
| 362 |
break;
|
| 363 |
} |
| 364 |
} |
| 365 |
|
| 366 |
/* Special message handling */
|
| 367 |
switch (msg_id) {
|
| 368 |
case 200: /* host_info */ |
| 369 |
{
|
| 370 |
mig_reply_error_t *err = (mig_reply_error_t *)hdr; |
| 371 |
struct {
|
| 372 |
uint32_t unknow1; |
| 373 |
uint32_t max_cpus; |
| 374 |
uint32_t avail_cpus; |
| 375 |
uint32_t memory_size; |
| 376 |
uint32_t cpu_type; |
| 377 |
uint32_t cpu_subtype; |
| 378 |
} *data = (void *)(err+1); |
| 379 |
|
| 380 |
DPRINTF("maxcpu = 0x%x\n", data->max_cpus);
|
| 381 |
DPRINTF("numcpu = 0x%x\n", data->avail_cpus);
|
| 382 |
DPRINTF("memsize = 0x%x\n", data->memory_size);
|
| 383 |
|
| 384 |
#if defined(TARGET_I386)
|
| 385 |
data->cpu_type = CPU_TYPE_I386; |
| 386 |
DPRINTF("cpu_type changed to 0x%x(i386)\n", data->cpu_type);
|
| 387 |
data->cpu_subtype = CPU_SUBTYPE_PENT; |
| 388 |
DPRINTF("cpu_subtype changed to 0x%x(i386_pent)\n", data->cpu_subtype);
|
| 389 |
#elif defined(TARGET_PPC)
|
| 390 |
data->cpu_type = CPU_TYPE_POWERPC; |
| 391 |
DPRINTF("cpu_type changed to 0x%x(ppc)\n", data->cpu_type);
|
| 392 |
data->cpu_subtype = CPU_SUBTYPE_POWERPC_750; |
| 393 |
DPRINTF("cpu_subtype changed to 0x%x(ppc_all)\n", data->cpu_subtype);
|
| 394 |
#else
|
| 395 |
# error target not supported
|
| 396 |
#endif
|
| 397 |
break;
|
| 398 |
} |
| 399 |
case 202: /* host_page_size */ |
| 400 |
{
|
| 401 |
mig_reply_error_t *err = (mig_reply_error_t *)hdr; |
| 402 |
uint32_t *pagesize = (uint32_t *)(err+1);
|
| 403 |
|
| 404 |
DPRINTF("pagesize = %d\n", *pagesize);
|
| 405 |
break;
|
| 406 |
} |
| 407 |
default: break; |
| 408 |
} |
| 409 |
|
| 410 |
swap_mach_msg(hdr, bswap_out); |
| 411 |
|
| 412 |
return ret;
|
| 413 |
} |
| 414 |
|
| 415 |
long do_mach_syscall(void *cpu_env, int num, uint32_t arg1, uint32_t arg2, uint32_t arg3, |
| 416 |
uint32_t arg4, uint32_t arg5, uint32_t arg6, uint32_t arg7, |
| 417 |
uint32_t arg8) |
| 418 |
{
|
| 419 |
extern uint32_t mach_reply_port(void); |
| 420 |
|
| 421 |
long ret = 0; |
| 422 |
|
| 423 |
arg1 = tswap32(arg1); |
| 424 |
arg2 = tswap32(arg2); |
| 425 |
arg3 = tswap32(arg3); |
| 426 |
arg4 = tswap32(arg4); |
| 427 |
arg5 = tswap32(arg5); |
| 428 |
arg6 = tswap32(arg6); |
| 429 |
arg7 = tswap32(arg7); |
| 430 |
arg8 = tswap32(arg8); |
| 431 |
|
| 432 |
DPRINTF("mach syscall %d : " , num);
|
| 433 |
|
| 434 |
switch(num) {
|
| 435 |
/* see xnu/osfmk/mach/syscall_sw.h */
|
| 436 |
case -26: |
| 437 |
DPRINTF("mach_reply_port()\n");
|
| 438 |
ret = mach_reply_port(); |
| 439 |
break;
|
| 440 |
case -27: |
| 441 |
DPRINTF("mach_thread_self()\n");
|
| 442 |
ret = mach_thread_self(); |
| 443 |
break;
|
| 444 |
case -28: |
| 445 |
DPRINTF("mach_task_self()\n");
|
| 446 |
ret = mach_task_self(); |
| 447 |
break;
|
| 448 |
case -29: |
| 449 |
DPRINTF("mach_host_self()\n");
|
| 450 |
ret = mach_host_self(); |
| 451 |
break;
|
| 452 |
case -31: |
| 453 |
DPRINTF("mach_msg_trap(0x%x, 0x%x, 0x%x, 0x%x, 0x%x, 0x%x, 0x%x)\n",
|
| 454 |
arg1, arg2, arg3, arg4, arg5, arg6, arg7); |
| 455 |
ret = target_mach_msg_trap((mach_msg_header_t *)arg1, arg2, arg3, arg4, arg5, arg6, arg7); |
| 456 |
break;
|
| 457 |
/* may need more translation if target arch is different from host */
|
| 458 |
#if (defined(TARGET_I386) && defined(__i386__)) || (defined(TARGET_PPC) && defined(__ppc__))
|
| 459 |
case -33: |
| 460 |
DPRINTF("semaphore_signal_trap(0x%x)\n", arg1);
|
| 461 |
ret = semaphore_signal_trap(arg1); |
| 462 |
break;
|
| 463 |
case -34: |
| 464 |
DPRINTF("semaphore_signal_all_trap(0x%x)\n", arg1);
|
| 465 |
ret = semaphore_signal_all_trap(arg1); |
| 466 |
break;
|
| 467 |
case -35: |
| 468 |
DPRINTF("semaphore_signal_thread_trap(0x%x)\n", arg1, arg2);
|
| 469 |
ret = semaphore_signal_thread_trap(arg1,arg2); |
| 470 |
break;
|
| 471 |
#endif
|
| 472 |
case -36: |
| 473 |
DPRINTF("semaphore_wait_trap(0x%x)\n", arg1);
|
| 474 |
extern int semaphore_wait_trap(int); // XXX: is there any header for that? |
| 475 |
ret = semaphore_wait_trap(arg1); |
| 476 |
break;
|
| 477 |
/* may need more translation if target arch is different from host */
|
| 478 |
#if (defined(TARGET_I386) && defined(__i386__)) || (defined(TARGET_PPC) && defined(__ppc__))
|
| 479 |
case -37: |
| 480 |
DPRINTF("semaphore_wait_signal_trap(0x%x, 0x%x)\n", arg1, arg2);
|
| 481 |
ret = semaphore_wait_signal_trap(arg1,arg2); |
| 482 |
break;
|
| 483 |
#endif
|
| 484 |
case -43: |
| 485 |
DPRINTF("map_fd(0x%x, 0x%x, 0x%x, 0x%x, 0x%x)\n",
|
| 486 |
arg1, arg2, arg3, arg4, arg5); |
| 487 |
ret = map_fd(arg1, arg2, (void*)arg3, arg4, arg5);
|
| 488 |
tswap32s((uint32_t*)arg3); |
| 489 |
break;
|
| 490 |
/* may need more translation if target arch is different from host */
|
| 491 |
#if (defined(TARGET_I386) && defined(__i386__)) || (defined(TARGET_PPC) && defined(__ppc__))
|
| 492 |
case -61: |
| 493 |
DPRINTF("syscall_thread_switch(0x%x, 0x%x, 0x%x)\n",
|
| 494 |
arg1, arg2, arg3); |
| 495 |
ret = syscall_thread_switch(arg1, arg2, arg3); // just a hint to the scheduler; can drop?
|
| 496 |
break;
|
| 497 |
#endif
|
| 498 |
case -89: |
| 499 |
DPRINTF("mach_timebase_info(0x%x)\n", arg1);
|
| 500 |
struct mach_timebase_info info;
|
| 501 |
ret = mach_timebase_info(&info); |
| 502 |
if(!is_error(ret))
|
| 503 |
{
|
| 504 |
struct mach_timebase_info *outInfo = (void*)arg1; |
| 505 |
outInfo->numer = tswap32(info.numer); |
| 506 |
outInfo->denom = tswap32(info.denom); |
| 507 |
} |
| 508 |
break;
|
| 509 |
case -90: |
| 510 |
DPRINTF("mach_wait_until()\n");
|
| 511 |
extern int mach_wait_until(uint64_t); // XXX: is there any header for that? |
| 512 |
ret = mach_wait_until(((uint64_t)arg2<<32) | (uint64_t)arg1);
|
| 513 |
break;
|
| 514 |
case -91: |
| 515 |
DPRINTF("mk_timer_create()\n");
|
| 516 |
extern int mk_timer_create(); // XXX: is there any header for that? |
| 517 |
ret = mk_timer_create(); |
| 518 |
break;
|
| 519 |
case -92: |
| 520 |
DPRINTF("mk_timer_destroy()\n");
|
| 521 |
extern int mk_timer_destroy(int); // XXX: is there any header for that? |
| 522 |
ret = mk_timer_destroy(arg1); |
| 523 |
break;
|
| 524 |
case -93: |
| 525 |
DPRINTF("mk_timer_create()\n");
|
| 526 |
extern int mk_timer_arm(int, uint64_t); // XXX: is there any header for that? |
| 527 |
ret = mk_timer_arm(arg1, ((uint64_t)arg3<<32) | (uint64_t)arg2);
|
| 528 |
break;
|
| 529 |
case -94: |
| 530 |
DPRINTF("mk_timer_cancel()\n");
|
| 531 |
extern int mk_timer_cancel(int, uint64_t *); // XXX: is there any header for that? |
| 532 |
ret = mk_timer_cancel(arg1, (uint64_t *)arg2); |
| 533 |
if((!is_error(ret)) && arg2)
|
| 534 |
tswap64s((uint64_t *)arg2); |
| 535 |
break;
|
| 536 |
default:
|
| 537 |
gemu_log("qemu: Unsupported mach syscall: %d(0x%x)\n", num, num);
|
| 538 |
gdb_handlesig (cpu_env, SIGTRAP); |
| 539 |
exit(0);
|
| 540 |
break;
|
| 541 |
} |
| 542 |
return ret;
|
| 543 |
} |
| 544 |
|
| 545 |
/* ------------------------------------------------------------
|
| 546 |
thread type syscall handling
|
| 547 |
*/
|
| 548 |
long do_thread_syscall(void *cpu_env, int num, uint32_t arg1, uint32_t arg2, uint32_t arg3, |
| 549 |
uint32_t arg4, uint32_t arg5, uint32_t arg6, uint32_t arg7, |
| 550 |
uint32_t arg8) |
| 551 |
{
|
| 552 |
extern uint32_t cthread_set_self(uint32_t);
|
| 553 |
extern uint32_t processor_facilities_used(void); |
| 554 |
long ret = 0; |
| 555 |
|
| 556 |
arg1 = tswap32(arg1); |
| 557 |
arg2 = tswap32(arg2); |
| 558 |
arg3 = tswap32(arg3); |
| 559 |
arg4 = tswap32(arg4); |
| 560 |
arg5 = tswap32(arg5); |
| 561 |
arg6 = tswap32(arg6); |
| 562 |
arg7 = tswap32(arg7); |
| 563 |
arg8 = tswap32(arg8); |
| 564 |
|
| 565 |
DPRINTF("thread syscall %d : " , num);
|
| 566 |
|
| 567 |
switch(num) {
|
| 568 |
#ifdef TARGET_I386
|
| 569 |
case 0x3: |
| 570 |
#endif
|
| 571 |
case 0x7FF1: /* cthread_set_self */ |
| 572 |
DPRINTF("cthread_set_self(0x%x)\n", (unsigned int)arg1); |
| 573 |
ret = cthread_set_self(arg1); |
| 574 |
#ifdef TARGET_I386
|
| 575 |
/* we need to update the LDT with the address of the thread */
|
| 576 |
write_dt((void *)(((CPUX86State *) cpu_env)->ldt.base + (4 * sizeof(uint64_t))), arg1, 1, |
| 577 |
DESC_G_MASK | DESC_B_MASK | DESC_P_MASK | DESC_S_MASK | |
| 578 |
(3 << DESC_DPL_SHIFT) | (0x2 << DESC_TYPE_SHIFT)); |
| 579 |
/* New i386 convention, %gs should be set to our this LDT entry */
|
| 580 |
cpu_x86_load_seg(cpu_env, R_GS, 0x27);
|
| 581 |
/* Old i386 convention, the kernel returns the selector for the cthread (pre-10.4.8?)*/
|
| 582 |
ret = 0x27;
|
| 583 |
#endif
|
| 584 |
break;
|
| 585 |
case 0x7FF2: /* Called the super-fast pthread_self handler by the apple guys */ |
| 586 |
DPRINTF("pthread_self()\n");
|
| 587 |
ret = (uint32_t)pthread_self(); |
| 588 |
break;
|
| 589 |
case 0x7FF3: |
| 590 |
DPRINTF("processor_facilities_used()\n");
|
| 591 |
#ifdef __i386__
|
| 592 |
qerror("processor_facilities_used: not implemented!\n");
|
| 593 |
#else
|
| 594 |
ret = (uint32_t)processor_facilities_used(); |
| 595 |
#endif
|
| 596 |
break;
|
| 597 |
default:
|
| 598 |
gemu_log("qemu: Unsupported thread syscall: %d(0x%x)\n", num, num);
|
| 599 |
gdb_handlesig (cpu_env, SIGTRAP); |
| 600 |
exit(0);
|
| 601 |
break;
|
| 602 |
} |
| 603 |
return ret;
|
| 604 |
} |
| 605 |
|
| 606 |
/* ------------------------------------------------------------
|
| 607 |
ioctl handling
|
| 608 |
*/
|
| 609 |
static inline void byteswap_termios(struct termios *t) |
| 610 |
{
|
| 611 |
tswap32s((uint32_t*)&t->c_iflag); |
| 612 |
tswap32s((uint32_t*)&t->c_oflag); |
| 613 |
tswap32s((uint32_t*)&t->c_cflag); |
| 614 |
tswap32s((uint32_t*)&t->c_lflag); |
| 615 |
/* 20 (char) bytes then */
|
| 616 |
tswap32s((uint32_t*)&t->c_ispeed); |
| 617 |
tswap32s((uint32_t*)&t->c_ospeed); |
| 618 |
} |
| 619 |
|
| 620 |
static inline void byteswap_winsize(struct winsize *w) |
| 621 |
{
|
| 622 |
tswap16s(&w->ws_row); |
| 623 |
tswap16s(&w->ws_col); |
| 624 |
tswap16s(&w->ws_xpixel); |
| 625 |
tswap16s(&w->ws_ypixel); |
| 626 |
} |
| 627 |
|
| 628 |
#define STRUCT(name, ...) STRUCT_ ## name, |
| 629 |
#define STRUCT_SPECIAL(name) STRUCT_ ## name, |
| 630 |
enum {
|
| 631 |
#include "ioctls_types.h" |
| 632 |
}; |
| 633 |
#undef STRUCT
|
| 634 |
#undef STRUCT_SPECIAL
|
| 635 |
|
| 636 |
#define STRUCT(name, ...) const argtype struct_ ## name ## _def[] = { __VA_ARGS__, TYPE_NULL }; |
| 637 |
#define STRUCT_SPECIAL(name)
|
| 638 |
#include "ioctls_types.h" |
| 639 |
#undef STRUCT
|
| 640 |
#undef STRUCT_SPECIAL
|
| 641 |
|
| 642 |
typedef struct IOCTLEntry { |
| 643 |
unsigned int target_cmd; |
| 644 |
unsigned int host_cmd; |
| 645 |
const char *name; |
| 646 |
int access;
|
| 647 |
const argtype arg_type[5]; |
| 648 |
} IOCTLEntry; |
| 649 |
|
| 650 |
#define IOC_R 0x0001 |
| 651 |
#define IOC_W 0x0002 |
| 652 |
#define IOC_RW (IOC_R | IOC_W)
|
| 653 |
|
| 654 |
#define MAX_STRUCT_SIZE 4096 |
| 655 |
|
| 656 |
static IOCTLEntry ioctl_entries[] = {
|
| 657 |
#define IOCTL(cmd, access, ...) \
|
| 658 |
{ cmd, cmd, #cmd, access, { __VA_ARGS__ } },
|
| 659 |
#include "ioctls.h" |
| 660 |
{ 0, 0, },
|
| 661 |
}; |
| 662 |
|
| 663 |
/* ??? Implement proper locking for ioctls. */
|
| 664 |
static long do_ioctl(long fd, long cmd, long arg) |
| 665 |
{
|
| 666 |
const IOCTLEntry *ie;
|
| 667 |
const argtype *arg_type;
|
| 668 |
int ret;
|
| 669 |
uint8_t buf_temp[MAX_STRUCT_SIZE]; |
| 670 |
int target_size;
|
| 671 |
void *argptr;
|
| 672 |
|
| 673 |
ie = ioctl_entries; |
| 674 |
for(;;) {
|
| 675 |
if (ie->target_cmd == 0) { |
| 676 |
gemu_log("Unsupported ioctl: cmd=0x%04lx\n", cmd);
|
| 677 |
return -ENOSYS;
|
| 678 |
} |
| 679 |
if (ie->target_cmd == cmd)
|
| 680 |
break;
|
| 681 |
ie++; |
| 682 |
} |
| 683 |
arg_type = ie->arg_type; |
| 684 |
#if defined(DEBUG)
|
| 685 |
gemu_log("ioctl: cmd=0x%04lx (%s)\n", cmd, ie->name);
|
| 686 |
#endif
|
| 687 |
switch(arg_type[0]) { |
| 688 |
case TYPE_NULL:
|
| 689 |
/* no argument */
|
| 690 |
ret = get_errno(ioctl(fd, ie->host_cmd)); |
| 691 |
break;
|
| 692 |
case TYPE_PTRVOID:
|
| 693 |
case TYPE_INT:
|
| 694 |
/* int argment */
|
| 695 |
ret = get_errno(ioctl(fd, ie->host_cmd, arg)); |
| 696 |
break;
|
| 697 |
case TYPE_PTR:
|
| 698 |
arg_type++; |
| 699 |
target_size = thunk_type_size(arg_type, 0);
|
| 700 |
switch(ie->access) {
|
| 701 |
case IOC_R:
|
| 702 |
ret = get_errno(ioctl(fd, ie->host_cmd, buf_temp)); |
| 703 |
if (!is_error(ret)) {
|
| 704 |
argptr = lock_user(arg, target_size, 0);
|
| 705 |
thunk_convert(argptr, buf_temp, arg_type, THUNK_TARGET); |
| 706 |
unlock_user(argptr, arg, target_size); |
| 707 |
} |
| 708 |
break;
|
| 709 |
case IOC_W:
|
| 710 |
argptr = lock_user(arg, target_size, 1);
|
| 711 |
thunk_convert(buf_temp, argptr, arg_type, THUNK_HOST); |
| 712 |
unlock_user(argptr, arg, 0);
|
| 713 |
ret = get_errno(ioctl(fd, ie->host_cmd, buf_temp)); |
| 714 |
break;
|
| 715 |
default:
|
| 716 |
case IOC_RW:
|
| 717 |
argptr = lock_user(arg, target_size, 1);
|
| 718 |
thunk_convert(buf_temp, argptr, arg_type, THUNK_HOST); |
| 719 |
unlock_user(argptr, arg, 0);
|
| 720 |
ret = get_errno(ioctl(fd, ie->host_cmd, buf_temp)); |
| 721 |
if (!is_error(ret)) {
|
| 722 |
argptr = lock_user(arg, target_size, 0);
|
| 723 |
thunk_convert(argptr, buf_temp, arg_type, THUNK_TARGET); |
| 724 |
unlock_user(argptr, arg, target_size); |
| 725 |
} |
| 726 |
break;
|
| 727 |
} |
| 728 |
break;
|
| 729 |
default:
|
| 730 |
gemu_log("Unsupported ioctl type: cmd=0x%04lx type=%d\n", cmd, arg_type[0]); |
| 731 |
ret = -ENOSYS; |
| 732 |
break;
|
| 733 |
} |
| 734 |
return ret;
|
| 735 |
} |
| 736 |
|
| 737 |
/* ------------------------------------------------------------
|
| 738 |
Unix syscall handling
|
| 739 |
*/
|
| 740 |
|
| 741 |
static inline void byteswap_attrlist(struct attrlist *a) |
| 742 |
{
|
| 743 |
tswap16s(&a->bitmapcount); |
| 744 |
tswap16s(&a->reserved); |
| 745 |
tswap32s(&a->commonattr); |
| 746 |
tswap32s(&a->volattr); |
| 747 |
tswap32s(&a->dirattr); |
| 748 |
tswap32s(&a->fileattr); |
| 749 |
tswap32s(&a->forkattr); |
| 750 |
} |
| 751 |
|
| 752 |
struct attrbuf_header {
|
| 753 |
unsigned long length; |
| 754 |
}; |
| 755 |
|
| 756 |
static inline void byteswap_attrbuf(struct attrbuf_header *attrbuf, struct attrlist *attrlist) |
| 757 |
{
|
| 758 |
DPRINTF("attrBuf.lenght %lx\n", attrbuf->length);
|
| 759 |
} |
| 760 |
|
| 761 |
static inline void byteswap_statfs(struct statfs *s) |
| 762 |
{
|
| 763 |
tswap16s((uint16_t*)&s->f_otype); |
| 764 |
tswap16s((uint16_t*)&s->f_oflags); |
| 765 |
tswap32s((uint32_t*)&s->f_bsize); |
| 766 |
tswap32s((uint32_t*)&s->f_iosize); |
| 767 |
tswap32s((uint32_t*)&s->f_blocks); |
| 768 |
tswap32s((uint32_t*)&s->f_bfree); |
| 769 |
tswap32s((uint32_t*)&s->f_bavail); |
| 770 |
tswap32s((uint32_t*)&s->f_files); |
| 771 |
tswap32s((uint32_t*)&s->f_ffree); |
| 772 |
tswap32s((uint32_t*)&s->f_fsid.val[0]);
|
| 773 |
tswap32s((uint32_t*)&s->f_fsid.val[1]);
|
| 774 |
tswap16s((uint16_t*)&s->f_reserved1); |
| 775 |
tswap16s((uint16_t*)&s->f_type); |
| 776 |
tswap32s((uint32_t*)&s->f_flags); |
| 777 |
} |
| 778 |
|
| 779 |
static inline void byteswap_stat(struct stat *s) |
| 780 |
{
|
| 781 |
tswap32s((uint32_t*)&s->st_dev); |
| 782 |
tswap32s(&s->st_ino); |
| 783 |
tswap16s(&s->st_mode); |
| 784 |
tswap16s(&s->st_nlink); |
| 785 |
tswap32s(&s->st_uid); |
| 786 |
tswap32s(&s->st_gid); |
| 787 |
tswap32s((uint32_t*)&s->st_rdev); |
| 788 |
tswap32s((uint32_t*)&s->st_atimespec.tv_sec); |
| 789 |
tswap32s((uint32_t*)&s->st_atimespec.tv_nsec); |
| 790 |
tswap32s((uint32_t*)&s->st_mtimespec.tv_sec); |
| 791 |
tswap32s((uint32_t*)&s->st_mtimespec.tv_nsec); |
| 792 |
tswap32s((uint32_t*)&s->st_ctimespec.tv_sec); |
| 793 |
tswap32s((uint32_t*)&s->st_ctimespec.tv_nsec); |
| 794 |
tswap64s((uint64_t*)&s->st_size); |
| 795 |
tswap64s((uint64_t*)&s->st_blocks); |
| 796 |
tswap32s((uint32_t*)&s->st_blksize); |
| 797 |
tswap32s(&s->st_flags); |
| 798 |
tswap32s(&s->st_gen); |
| 799 |
} |
| 800 |
|
| 801 |
static inline void byteswap_dirents(struct dirent *d, int bytes) |
| 802 |
{
|
| 803 |
char *b;
|
| 804 |
for( b = (char*)d; (int)b < (int)d+bytes; ) |
| 805 |
{
|
| 806 |
unsigned short s = ((struct dirent *)b)->d_reclen; |
| 807 |
tswap32s(&((struct dirent *)b)->d_ino);
|
| 808 |
tswap16s(&((struct dirent *)b)->d_reclen);
|
| 809 |
if(s<=0) |
| 810 |
break;
|
| 811 |
b += s; |
| 812 |
} |
| 813 |
} |
| 814 |
|
| 815 |
static inline void byteswap_iovec(struct iovec *v, int n) |
| 816 |
{
|
| 817 |
int i;
|
| 818 |
for(i = 0; i < n; i++) |
| 819 |
{
|
| 820 |
tswap32s((uint32_t*)&v[i].iov_base); |
| 821 |
tswap32s((uint32_t*)&v[i].iov_len); |
| 822 |
} |
| 823 |
} |
| 824 |
|
| 825 |
static inline void byteswap_timeval(struct timeval *t) |
| 826 |
{
|
| 827 |
tswap32s((uint32_t*)&t->tv_sec); |
| 828 |
tswap32s((uint32_t*)&t->tv_usec); |
| 829 |
} |
| 830 |
|
| 831 |
long do_unix_syscall_indirect(void *cpu_env, int num); |
| 832 |
long do_sync(void); |
| 833 |
long do_exit(uint32_t arg1);
|
| 834 |
long do_getlogin(char *out, uint32_t size); |
| 835 |
long do_open(char * arg1, uint32_t arg2, uint32_t arg3); |
| 836 |
long do_getfsstat(struct statfs * arg1, uint32_t arg2, uint32_t arg3); |
| 837 |
long do_sigprocmask(uint32_t arg1, uint32_t * arg2, uint32_t * arg3);
|
| 838 |
long do_execve(char* arg1, char ** arg2, char ** arg3); |
| 839 |
long do_getgroups(uint32_t arg1, gid_t * arg2);
|
| 840 |
long do_gettimeofday(struct timeval * arg1, void * arg2); |
| 841 |
long do_readv(uint32_t arg1, struct iovec * arg2, uint32_t arg3); |
| 842 |
long do_writev(uint32_t arg1, struct iovec * arg2, uint32_t arg3); |
| 843 |
long do_utimes(char * arg1, struct timeval * arg2); |
| 844 |
long do_futimes(uint32_t arg1, struct timeval * arg2); |
| 845 |
long do_statfs(char * arg1, struct statfs * arg2); |
| 846 |
long do_fstatfs(uint32_t arg1, struct statfs * arg2); |
| 847 |
long do_stat(char * arg1, struct stat * arg2); |
| 848 |
long do_fstat(uint32_t arg1, struct stat * arg2); |
| 849 |
long do_lstat(char * arg1, struct stat * arg2); |
| 850 |
long do_getdirentries(uint32_t arg1, void* arg2, uint32_t arg3, void* arg4); |
| 851 |
long do_lseek(void *cpu_env, int num); |
| 852 |
long do___sysctl(int * name, uint32_t namelen, void * oldp, size_t * oldlenp, void * newp, size_t newlen /* ignored */); |
| 853 |
long do_getattrlist(void * arg1, void * arg2, void * arg3, uint32_t arg4, uint32_t arg5); |
| 854 |
long do_getdirentriesattr(uint32_t arg1, void * arg2, void * arg3, size_t arg4, void * arg5, void * arg6, void* arg7, uint32_t arg8); |
| 855 |
long do_fcntl(int fd, int cmd, int arg); |
| 856 |
|
| 857 |
long no_syscall(void *cpu_env, int num); |
| 858 |
|
| 859 |
long do_pread(uint32_t arg1, void * arg2, size_t arg3, off_t arg4) |
| 860 |
{
|
| 861 |
DPRINTF("0x%x, %p, 0x%lx, 0x%llx\n", arg1, arg2, arg3, arg4);
|
| 862 |
long ret = pread(arg1, arg2, arg3, arg4);
|
| 863 |
return ret;
|
| 864 |
} |
| 865 |
|
| 866 |
long do_read(int d, void *buf, size_t nbytes) |
| 867 |
{
|
| 868 |
DPRINTF("0x%x, %p, 0x%lx\n", d, buf, nbytes);
|
| 869 |
long ret = get_errno(read(d, buf, nbytes));
|
| 870 |
if(!is_error(ret))
|
| 871 |
DPRINTF("%x\n", *(uint32_t*)buf);
|
| 872 |
return ret;
|
| 873 |
} |
| 874 |
|
| 875 |
long unimpl_unix_syscall(void *cpu_env, int num); |
| 876 |
|
| 877 |
typedef long (*syscall_function_t)(void *cpu_env, int num); |
| 878 |
|
| 879 |
|
| 880 |
/* define a table that will handle the syscall number->function association */
|
| 881 |
#define VOID void |
| 882 |
#define INT (uint32_t)get_int_arg(&i, cpu_env)
|
| 883 |
#define INT64 (uint64_t)get_int64_arg(&i, cpu_env)
|
| 884 |
#define UINT (unsigned int)INT |
| 885 |
#define PTR (void*)INT |
| 886 |
|
| 887 |
#define SIZE INT
|
| 888 |
#define OFFSET INT64
|
| 889 |
|
| 890 |
#define WRAPPER_CALL_DIRECT_0(function, args) long __qemu_##function(void *cpu_env) { return (long)function(); } |
| 891 |
#define WRAPPER_CALL_DIRECT_1(function, _arg1) long __qemu_##function(void *cpu_env) { int i = 0; typeof(_arg1) arg1 = _arg1; return (long)function(arg1); } |
| 892 |
#define WRAPPER_CALL_DIRECT_2(function, _arg1, _arg2) long __qemu_##function(void *cpu_env) { int i = 0; typeof(_arg1) arg1 = _arg1; typeof(_arg2) arg2 = _arg2; return (long)function(arg1, arg2); } |
| 893 |
#define WRAPPER_CALL_DIRECT_3(function, _arg1, _arg2, _arg3) long __qemu_##function(void *cpu_env) { int i = 0; typeof(_arg1) arg1 = _arg1; typeof(_arg2) arg2 = _arg2; typeof(_arg3) arg3 = _arg3; return (long)function(arg1, arg2, arg3); } |
| 894 |
#define WRAPPER_CALL_DIRECT_4(function, _arg1, _arg2, _arg3, _arg4) long __qemu_##function(void *cpu_env) { int i = 0; typeof(_arg1) arg1 = _arg1; typeof(_arg2) arg2 = _arg2; typeof(_arg3) arg3 = _arg3; typeof(_arg4) arg4 = _arg4; return (long)function(arg1, arg2, arg3, arg4); } |
| 895 |
#define WRAPPER_CALL_DIRECT_5(function, _arg1, _arg2, _arg3, _arg4, _arg5) long __qemu_##function(void *cpu_env) { int i = 0; typeof(_arg1) arg1 = _arg1; typeof(_arg2) arg2 = _arg2; typeof(_arg3) arg3 = _arg3; typeof(_arg4) arg4 = _arg4; typeof(_arg5) arg5 = _arg5; return (long)function(arg1, arg2, arg3, arg4, arg5); } |
| 896 |
#define WRAPPER_CALL_DIRECT_6(function, _arg1, _arg2, _arg3, _arg4, _arg5, _arg6) long __qemu_##function(void *cpu_env) { int i = 0; typeof(_arg1) arg1 = _arg1; typeof(_arg2) arg2 = _arg2; typeof(_arg3) arg3 = _arg3; typeof(_arg4) arg4 = _arg4; typeof(_arg5) arg5 = _arg5; typeof(_arg6) arg6 = _arg6; return (long)function(arg1, arg2, arg3, arg4, arg5, arg6); } |
| 897 |
#define WRAPPER_CALL_DIRECT_7(function, _arg1, _arg2, _arg3, _arg4, _arg5, _arg6, _arg7) long __qemu_##function(void *cpu_env) { int i = 0; typeof(_arg1) arg1 = _arg1; typeof(_arg2) arg2 = _arg2; typeof(_arg3) arg3 = _arg3; typeof(_arg4) arg4 = _arg4; typeof(_arg5) arg5 = _arg5; typeof(_arg6) arg6 = _arg6; typeof(_arg7) arg7 = _arg7; return (long)function(arg1, arg2, arg3, arg4, arg5, arg6, arg7); } |
| 898 |
#define WRAPPER_CALL_DIRECT_8(function, _arg1, _arg2, _arg3, _arg4, _arg5, _arg6, _arg7, _arg8) long __qemu_##function(void *cpu_env) { int i = 0; typeof(_arg1) arg1 = _arg1; typeof(_arg2) arg2 = _arg2; typeof(_arg3) arg3 = _arg3; typeof(_arg4) arg4 = _arg4; typeof(_arg5) arg5 = _arg5; typeof(_arg6) arg6 = _arg6; typeof(_arg7) arg7 = _arg7; typeof(_arg8) arg8 = _arg8; return (long)function(arg1, arg2, arg3, arg4, arg5, arg6, arg7, arg8); } |
| 899 |
#define WRAPPER_CALL_DIRECT(function, nargs, ...) WRAPPER_CALL_DIRECT_##nargs(function, __VA_ARGS__) |
| 900 |
#define WRAPPER_CALL_NOERRNO(function, nargs, ...) WRAPPER_CALL_DIRECT(function, nargs, __VA_ARGS__)
|
| 901 |
#define WRAPPER_CALL_INDIRECT(function, nargs, ...)
|
| 902 |
#define ENTRY(name, number, function, nargs, call_type, ...) WRAPPER_##call_type(function, nargs, __VA_ARGS__) |
| 903 |
|
| 904 |
#include "syscalls.h" |
| 905 |
|
| 906 |
#undef ENTRY
|
| 907 |
#undef WRAPPER_CALL_DIRECT
|
| 908 |
#undef WRAPPER_CALL_NOERRNO
|
| 909 |
#undef WRAPPER_CALL_INDIRECT
|
| 910 |
#undef OFFSET
|
| 911 |
#undef SIZE
|
| 912 |
#undef INT
|
| 913 |
#undef PTR
|
| 914 |
#undef INT64
|
| 915 |
|
| 916 |
#define _ENTRY(name, number, function, nargs, call_type) [number] = {\
|
| 917 |
name, \ |
| 918 |
number, \ |
| 919 |
(syscall_function_t)function, \ |
| 920 |
nargs, \ |
| 921 |
call_type \ |
| 922 |
}, |
| 923 |
|
| 924 |
#define ENTRY_CALL_DIRECT(name, number, function, nargs, call_type) _ENTRY(name, number, __qemu_##function, nargs, call_type) |
| 925 |
#define ENTRY_CALL_NOERRNO(name, number, function, nargs, call_type) ENTRY_CALL_DIRECT(name, number, function, nargs, call_type)
|
| 926 |
#define ENTRY_CALL_INDIRECT(name, number, function, nargs, call_type) _ENTRY(name, number, function, nargs, call_type)
|
| 927 |
#define ENTRY(name, number, function, nargs, call_type, ...) ENTRY_##call_type(name, number, function, nargs, call_type) |
| 928 |
|
| 929 |
#define CALL_DIRECT 1 |
| 930 |
#define CALL_INDIRECT 2 |
| 931 |
#define CALL_NOERRNO (CALL_DIRECT | 4 /* = 5 */) |
| 932 |
|
| 933 |
struct unix_syscall {
|
| 934 |
char * name;
|
| 935 |
int number;
|
| 936 |
syscall_function_t function; |
| 937 |
int nargs;
|
| 938 |
int call_type;
|
| 939 |
} unix_syscall_table[SYS_MAXSYSCALL] = {
|
| 940 |
#include "syscalls.h" |
| 941 |
}; |
| 942 |
|
| 943 |
#undef ENTRY
|
| 944 |
#undef _ENTRY
|
| 945 |
#undef ENTRY_CALL_DIRECT
|
| 946 |
#undef ENTRY_CALL_INDIRECT
|
| 947 |
#undef ENTRY_CALL_NOERRNO
|
| 948 |
|
| 949 |
/* Actual syscalls implementation */
|
| 950 |
|
| 951 |
long do_unix_syscall_indirect(void *cpu_env, int num) |
| 952 |
{
|
| 953 |
long ret;
|
| 954 |
int new_num;
|
| 955 |
int i = 0; |
| 956 |
|
| 957 |
new_num = get_int_arg(&i, cpu_env); |
| 958 |
#ifdef TARGET_I386
|
| 959 |
((CPUX86State*)cpu_env)->regs[R_ESP] += 4;
|
| 960 |
/* XXX: not necessary */
|
| 961 |
((CPUX86State*)cpu_env)->regs[R_EAX] = new_num; |
| 962 |
#elif TARGET_PPC
|
| 963 |
{
|
| 964 |
int i;
|
| 965 |
uint32_t **regs = ((CPUPPCState*)cpu_env)->gpr; |
| 966 |
for(i = 3; i < 11; i++) |
| 967 |
*regs[i] = *regs[i+1];
|
| 968 |
/* XXX: not necessary */
|
| 969 |
*regs[0] = new_num;
|
| 970 |
} |
| 971 |
#endif
|
| 972 |
ret = do_unix_syscall(cpu_env, new_num); |
| 973 |
#ifdef TARGET_I386
|
| 974 |
((CPUX86State*)cpu_env)->regs[R_ESP] -= 4;
|
| 975 |
/* XXX: not necessary */
|
| 976 |
((CPUX86State*)cpu_env)->regs[R_EAX] = num; |
| 977 |
#elif TARGET_PPC
|
| 978 |
{
|
| 979 |
int i;
|
| 980 |
/* XXX: not really needed those regs are volatile accross calls */
|
| 981 |
uint32_t **regs = ((CPUPPCState*)cpu_env)->gpr; |
| 982 |
for(i = 11; i > 3; i--) |
| 983 |
*regs[i] = *regs[i-1];
|
| 984 |
regs[3] = new_num;
|
| 985 |
*regs[0] = num;
|
| 986 |
} |
| 987 |
#endif
|
| 988 |
return ret;
|
| 989 |
} |
| 990 |
|
| 991 |
long do_exit(uint32_t arg1)
|
| 992 |
{
|
| 993 |
exit(arg1); |
| 994 |
/* not reached */
|
| 995 |
return -1; |
| 996 |
} |
| 997 |
|
| 998 |
long do_sync(void) |
| 999 |
{
|
| 1000 |
sync(); |
| 1001 |
return 0; |
| 1002 |
} |
| 1003 |
|
| 1004 |
long do_getlogin(char *out, uint32_t size) |
| 1005 |
{
|
| 1006 |
char *login = getlogin();
|
| 1007 |
if(!login)
|
| 1008 |
return -1; |
| 1009 |
memcpy(out, login, size); |
| 1010 |
return 0; |
| 1011 |
} |
| 1012 |
long do_open(char * arg1, uint32_t arg2, uint32_t arg3) |
| 1013 |
{
|
| 1014 |
/* XXX: don't let the %s stay in there */
|
| 1015 |
DPRINTF("open(%s, 0x%x, 0x%x)\n", arg1, arg2, arg3);
|
| 1016 |
return get_errno(open(arg1, arg2, arg3));
|
| 1017 |
} |
| 1018 |
|
| 1019 |
long do_getfsstat(struct statfs * arg1, uint32_t arg2, uint32_t arg3) |
| 1020 |
{
|
| 1021 |
long ret;
|
| 1022 |
DPRINTF("getfsstat(%p, 0x%x, 0x%x)\n", arg1, arg2, arg3);
|
| 1023 |
ret = get_errno(getfsstat(arg1, arg2, arg3)); |
| 1024 |
if((!is_error(ret)) && arg1)
|
| 1025 |
byteswap_statfs(arg1); |
| 1026 |
return ret;
|
| 1027 |
} |
| 1028 |
|
| 1029 |
long do_sigprocmask(uint32_t arg1, uint32_t * arg2, uint32_t * arg3)
|
| 1030 |
{
|
| 1031 |
long ret;
|
| 1032 |
DPRINTF("sigprocmask(%d, %p, %p)\n", arg1, arg2, arg3);
|
| 1033 |
gemu_log("XXX: sigprocmask not tested (%d, %p, %p)\n", arg1, arg2, arg3);
|
| 1034 |
if(arg2)
|
| 1035 |
tswap32s(arg2); |
| 1036 |
ret = get_errno(sigprocmask(arg1, (void *)arg2, (void *)arg3)); |
| 1037 |
if((!is_error(ret)) && arg3)
|
| 1038 |
tswap32s(arg3); |
| 1039 |
if(arg2)
|
| 1040 |
tswap32s(arg2); |
| 1041 |
return ret;
|
| 1042 |
} |
| 1043 |
|
| 1044 |
long do_execve(char* arg1, char ** arg2, char ** arg3) |
| 1045 |
{
|
| 1046 |
long ret;
|
| 1047 |
char **argv = arg2;
|
| 1048 |
char **envp = arg3;
|
| 1049 |
int argc;
|
| 1050 |
int envc;
|
| 1051 |
|
| 1052 |
/* XXX: don't let the %s stay in here */
|
| 1053 |
DPRINTF("execve(%s, %p, %p)\n", arg1, arg2, arg3);
|
| 1054 |
|
| 1055 |
for(argc = 0; argv[argc]; argc++); |
| 1056 |
for(envc = 0; envp[envc]; envc++); |
| 1057 |
|
| 1058 |
argv = (char**)malloc(sizeof(char*)*argc); |
| 1059 |
envp = (char**)malloc(sizeof(char*)*envc); |
| 1060 |
|
| 1061 |
for(; argc >= 0; argc--) |
| 1062 |
argv[argc] = (char*)tswap32((uint32_t)(arg2)[argc]);
|
| 1063 |
|
| 1064 |
for(; envc >= 0; envc--) |
| 1065 |
envp[envc] = (char*)tswap32((uint32_t)(arg3)[envc]);
|
| 1066 |
|
| 1067 |
ret = get_errno(execve(arg1, argv, envp)); |
| 1068 |
free(argv); |
| 1069 |
free(envp); |
| 1070 |
return ret;
|
| 1071 |
} |
| 1072 |
|
| 1073 |
long do_getgroups(uint32_t arg1, gid_t * arg2)
|
| 1074 |
{
|
| 1075 |
long ret;
|
| 1076 |
int i;
|
| 1077 |
DPRINTF("getgroups(0x%x, %p)\n", arg1, arg2);
|
| 1078 |
ret = get_errno(getgroups(arg1, arg2)); |
| 1079 |
if(ret > 0) |
| 1080 |
for(i = 0; i < arg1; i++) |
| 1081 |
tswap32s(&arg2[i]); |
| 1082 |
return ret;
|
| 1083 |
} |
| 1084 |
|
| 1085 |
long do_gettimeofday(struct timeval * arg1, void * arg2) |
| 1086 |
{
|
| 1087 |
long ret;
|
| 1088 |
DPRINTF("gettimeofday(%p, %p)\n",
|
| 1089 |
arg1, arg2); |
| 1090 |
ret = get_errno(gettimeofday(arg1, arg2)); |
| 1091 |
if(!is_error(ret))
|
| 1092 |
{
|
| 1093 |
/* timezone no longer used according to the manpage, so don't bother with it */
|
| 1094 |
byteswap_timeval(arg1); |
| 1095 |
} |
| 1096 |
return ret;
|
| 1097 |
} |
| 1098 |
|
| 1099 |
long do_readv(uint32_t arg1, struct iovec * arg2, uint32_t arg3) |
| 1100 |
{
|
| 1101 |
long ret;
|
| 1102 |
DPRINTF("readv(0x%x, %p, 0x%x)\n", arg1, arg2, arg3);
|
| 1103 |
if(arg2)
|
| 1104 |
byteswap_iovec(arg2, arg3); |
| 1105 |
ret = get_errno(readv(arg1, arg2, arg3)); |
| 1106 |
if((!is_error(ret)) && arg2)
|
| 1107 |
byteswap_iovec(arg2, arg3); |
| 1108 |
return ret;
|
| 1109 |
} |
| 1110 |
|
| 1111 |
long do_writev(uint32_t arg1, struct iovec * arg2, uint32_t arg3) |
| 1112 |
{
|
| 1113 |
long ret;
|
| 1114 |
DPRINTF("writev(0x%x, %p, 0x%x)\n", arg1, arg2, arg3);
|
| 1115 |
if(arg2)
|
| 1116 |
byteswap_iovec(arg2, arg3); |
| 1117 |
ret = get_errno(writev(arg1, arg2, arg3)); |
| 1118 |
if((!is_error(ret)) && arg2)
|
| 1119 |
byteswap_iovec(arg2, arg3); |
| 1120 |
return ret;
|
| 1121 |
} |
| 1122 |
|
| 1123 |
long do_utimes(char * arg1, struct timeval * arg2) |
| 1124 |
{
|
| 1125 |
DPRINTF("utimes(%p, %p)\n", arg1, arg2);
|
| 1126 |
if(arg2)
|
| 1127 |
{
|
| 1128 |
byteswap_timeval(arg2); |
| 1129 |
byteswap_timeval(arg2+1);
|
| 1130 |
} |
| 1131 |
return get_errno(utimes(arg1, arg2));
|
| 1132 |
} |
| 1133 |
|
| 1134 |
long do_futimes(uint32_t arg1, struct timeval * arg2) |
| 1135 |
{
|
| 1136 |
DPRINTF("futimes(0x%x, %p)\n", arg1, arg2);
|
| 1137 |
if(arg2)
|
| 1138 |
{
|
| 1139 |
byteswap_timeval(arg2); |
| 1140 |
byteswap_timeval(arg2+1);
|
| 1141 |
} |
| 1142 |
return get_errno(futimes(arg1, arg2));
|
| 1143 |
} |
| 1144 |
|
| 1145 |
long do_statfs(char * arg1, struct statfs * arg2) |
| 1146 |
{
|
| 1147 |
long ret;
|
| 1148 |
DPRINTF("statfs(%p, %p)\n", arg1, arg2);
|
| 1149 |
ret = get_errno(statfs(arg1, arg2)); |
| 1150 |
if(!is_error(ret))
|
| 1151 |
byteswap_statfs(arg2); |
| 1152 |
return ret;
|
| 1153 |
} |
| 1154 |
|
| 1155 |
long do_fstatfs(uint32_t arg1, struct statfs* arg2) |
| 1156 |
{
|
| 1157 |
long ret;
|
| 1158 |
DPRINTF("fstatfs(0x%x, %p)\n",
|
| 1159 |
arg1, arg2); |
| 1160 |
ret = get_errno(fstatfs(arg1, arg2)); |
| 1161 |
if(!is_error(ret))
|
| 1162 |
byteswap_statfs(arg2); |
| 1163 |
|
| 1164 |
return ret;
|
| 1165 |
} |
| 1166 |
|
| 1167 |
long do_stat(char * arg1, struct stat * arg2) |
| 1168 |
{
|
| 1169 |
long ret;
|
| 1170 |
/* XXX: don't let the %s stay in there */
|
| 1171 |
DPRINTF("stat(%s, %p)\n", arg1, arg2);
|
| 1172 |
ret = get_errno(stat(arg1, arg2)); |
| 1173 |
if(!is_error(ret))
|
| 1174 |
byteswap_stat(arg2); |
| 1175 |
return ret;
|
| 1176 |
} |
| 1177 |
|
| 1178 |
long do_fstat(uint32_t arg1, struct stat * arg2) |
| 1179 |
{
|
| 1180 |
long ret;
|
| 1181 |
DPRINTF("fstat(0x%x, %p)\n", arg1, arg2);
|
| 1182 |
ret = get_errno(fstat(arg1, arg2)); |
| 1183 |
if(!is_error(ret))
|
| 1184 |
byteswap_stat(arg2); |
| 1185 |
return ret;
|
| 1186 |
} |
| 1187 |
|
| 1188 |
long do_lstat(char * arg1, struct stat * arg2) |
| 1189 |
{
|
| 1190 |
long ret;
|
| 1191 |
/* XXX: don't let the %s stay in there */
|
| 1192 |
DPRINTF("lstat(%s, %p)\n", (const char *)arg1, arg2); |
| 1193 |
ret = get_errno(lstat(arg1, arg2)); |
| 1194 |
if(!is_error(ret))
|
| 1195 |
byteswap_stat(arg2); |
| 1196 |
return ret;
|
| 1197 |
} |
| 1198 |
|
| 1199 |
long do_getdirentries(uint32_t arg1, void* arg2, uint32_t arg3, void* arg4) |
| 1200 |
{
|
| 1201 |
long ret;
|
| 1202 |
DPRINTF("getdirentries(0x%x, %p, 0x%x, %p)\n", arg1, arg2, arg3, arg4);
|
| 1203 |
if(arg4)
|
| 1204 |
tswap32s((uint32_t *)arg4); |
| 1205 |
ret = get_errno(getdirentries(arg1, arg2, arg3, arg4)); |
| 1206 |
if(arg4)
|
| 1207 |
tswap32s((uint32_t *)arg4); |
| 1208 |
if(!is_error(ret))
|
| 1209 |
byteswap_dirents(arg2, ret); |
| 1210 |
return ret;
|
| 1211 |
} |
| 1212 |
|
| 1213 |
long do_lseek(void *cpu_env, int num) |
| 1214 |
{
|
| 1215 |
long ret;
|
| 1216 |
int i = 0; |
| 1217 |
uint32_t arg1 = get_int_arg(&i, cpu_env); |
| 1218 |
uint64_t offset = get_int64_arg(&i, cpu_env); |
| 1219 |
uint32_t arg3 = get_int_arg(&i, cpu_env); |
| 1220 |
uint64_t r = lseek(arg1, offset, arg3); |
| 1221 |
#ifdef TARGET_I386
|
| 1222 |
/* lowest word in eax, highest in edx */
|
| 1223 |
ret = r & 0xffffffff; /* will be set to eax after do_unix_syscall exit */ |
| 1224 |
((CPUX86State *)cpu_env)->regs[R_EDX] = (uint32_t)((r >> 32) & 0xffffffff) ; |
| 1225 |
#elif defined TARGET_PPC
|
| 1226 |
ret = r & 0xffffffff; /* will be set to r3 after do_unix_syscall exit */ |
| 1227 |
((CPUPPCState *)cpu_env)->gpr[4] = (uint32_t)((r >> 32) & 0xffffffff) ; |
| 1228 |
#else
|
| 1229 |
qerror("64 bit ret value on your arch?");
|
| 1230 |
#endif
|
| 1231 |
return get_errno(ret);
|
| 1232 |
} |
| 1233 |
|
| 1234 |
void no_swap(void * oldp, int size) |
| 1235 |
{
|
| 1236 |
} |
| 1237 |
|
| 1238 |
void sysctl_tswap32s(void * oldp, int size) |
| 1239 |
{
|
| 1240 |
tswap32s(oldp); |
| 1241 |
} |
| 1242 |
|
| 1243 |
void bswap_oid(uint32_t * oldp, int size) |
| 1244 |
{
|
| 1245 |
int count = size / sizeof(int); |
| 1246 |
int i = 0; |
| 1247 |
do { tswap32s(oldp + i); } while (++i < count); |
| 1248 |
} |
| 1249 |
|
| 1250 |
void sysctl_usrstack(uint32_t * oldp, int size) |
| 1251 |
{
|
| 1252 |
DPRINTF("sysctl_usrstack: 0x%x\n", *oldp);
|
| 1253 |
tswap32s(oldp); |
| 1254 |
} |
| 1255 |
|
| 1256 |
void sysctl_ncpu(uint32_t * ncpu, int size) |
| 1257 |
{
|
| 1258 |
*ncpu = 0x1;
|
| 1259 |
DPRINTF("sysctl_ncpu: 0x%x\n", *ncpu);
|
| 1260 |
tswap32s(ncpu); |
| 1261 |
} |
| 1262 |
|
| 1263 |
void sysctl_exec(char * exec, int size) |
| 1264 |
{
|
| 1265 |
DPRINTF("sysctl_exec: %s\n", exec);
|
| 1266 |
} |
| 1267 |
|
| 1268 |
void sysctl_translate(char * exec, int size) |
| 1269 |
{
|
| 1270 |
DPRINTF("sysctl_translate: %s\n", exec);
|
| 1271 |
} |
| 1272 |
|
| 1273 |
struct sysctl_dir {
|
| 1274 |
int num;
|
| 1275 |
const char * name; |
| 1276 |
void (*swap_func)(void *, int); |
| 1277 |
struct sysctl_dir *childs;
|
| 1278 |
}; |
| 1279 |
|
| 1280 |
#define ENTRYD(num, name, childs) { num, name, NULL, childs } |
| 1281 |
#define ENTRYE(num, name, func) { num, name, (void (*)(void *, int))func, NULL } |
| 1282 |
struct sysctl_dir sysctls_unspec[] = {
|
| 1283 |
ENTRYE(3, "oip", bswap_oid), |
| 1284 |
{ 0, NULL, NULL, NULL }
|
| 1285 |
}; |
| 1286 |
|
| 1287 |
struct sysctl_dir sysctls_kern[] = {
|
| 1288 |
ENTRYE(KERN_TRANSLATE, "translate", sysctl_translate), /* 44 */ |
| 1289 |
ENTRYE(KERN_EXEC, "exec", sysctl_exec), /* 45 */ |
| 1290 |
ENTRYE(KERN_USRSTACK32, "KERN_USRSTACK32", sysctl_usrstack), /* 35 */ |
| 1291 |
ENTRYE(KERN_SHREG_PRIVATIZABLE, "KERN_SHREG_PRIVATIZABLE", sysctl_tswap32s), /* 54 */ |
| 1292 |
{ 0, NULL, NULL, NULL }
|
| 1293 |
}; |
| 1294 |
|
| 1295 |
struct sysctl_dir sysctls_hw[] = {
|
| 1296 |
ENTRYE(HW_NCPU, "ncpud", sysctl_tswap32s),
|
| 1297 |
ENTRYE(104, "104", no_swap), |
| 1298 |
ENTRYE(105, "105", no_swap), |
| 1299 |
{ 0, NULL, NULL, NULL }
|
| 1300 |
}; |
| 1301 |
|
| 1302 |
struct sysctl_dir sysctls[] = {
|
| 1303 |
ENTRYD(CTL_UNSPEC, "unspec", sysctls_unspec),
|
| 1304 |
ENTRYD(CTL_KERN, "kern", sysctls_kern),
|
| 1305 |
ENTRYD(CTL_HW, "hw", sysctls_hw ),
|
| 1306 |
{ 0, NULL, NULL, NULL }
|
| 1307 |
}; |
| 1308 |
|
| 1309 |
#undef ENTRYE
|
| 1310 |
#undef ENTRYD
|
| 1311 |
|
| 1312 |
static inline struct sysctl_dir * get_sysctl_entry_for_mib(int mib, struct sysctl_dir * sysctl_elmt) |
| 1313 |
{
|
| 1314 |
if(!sysctl_elmt)
|
| 1315 |
return NULL; |
| 1316 |
for(; sysctl_elmt->name != NULL ; sysctl_elmt++) { |
| 1317 |
if(sysctl_elmt->num == mib)
|
| 1318 |
return sysctl_elmt;
|
| 1319 |
} |
| 1320 |
return NULL; |
| 1321 |
} |
| 1322 |
|
| 1323 |
static inline long bswap_syctl(int * mib, int count, void *buf, int size) |
| 1324 |
{
|
| 1325 |
int i;
|
| 1326 |
struct sysctl_dir * sysctl = sysctls;
|
| 1327 |
struct sysctl_dir * ret = NULL; |
| 1328 |
|
| 1329 |
for(i = 0; i < count; i++) { |
| 1330 |
|
| 1331 |
if(!(ret = sysctl = get_sysctl_entry_for_mib(mib[i], sysctl))) {
|
| 1332 |
gemu_log("bswap_syctl: can't find mib %d\n", mib[i]);
|
| 1333 |
return -ENOTDIR;
|
| 1334 |
} |
| 1335 |
if(!(sysctl = sysctl->childs))
|
| 1336 |
break;
|
| 1337 |
} |
| 1338 |
|
| 1339 |
if(ret->childs)
|
| 1340 |
qerror("we shouldn't have a directory element\n");
|
| 1341 |
|
| 1342 |
ret->swap_func(buf, size); |
| 1343 |
return 0; |
| 1344 |
} |
| 1345 |
|
| 1346 |
static inline void print_syctl(int * mib, int count) |
| 1347 |
{
|
| 1348 |
int i;
|
| 1349 |
struct sysctl_dir * sysctl = sysctls;
|
| 1350 |
struct sysctl_dir * ret = NULL; |
| 1351 |
|
| 1352 |
for(i = 0; i < count; i++) { |
| 1353 |
if(!(ret = sysctl = get_sysctl_entry_for_mib(mib[i], sysctl))){
|
| 1354 |
gemu_log("print_syctl: can't find mib %d\n", mib[i]);
|
| 1355 |
return;
|
| 1356 |
} |
| 1357 |
DPRINTF("%s.", sysctl->name);
|
| 1358 |
if(!(sysctl = sysctl->childs))
|
| 1359 |
break;
|
| 1360 |
} |
| 1361 |
DPRINTF("\n");
|
| 1362 |
} |
| 1363 |
|
| 1364 |
long do___sysctl(int * name, uint32_t namelen, void * oldp, size_t * oldlenp, void * newp, size_t newlen /* ignored */) |
| 1365 |
{
|
| 1366 |
long ret = 0; |
| 1367 |
int i;
|
| 1368 |
DPRINTF("sysctl(%p, 0x%x, %p, %p, %p, 0x%lx)\n",
|
| 1369 |
name, namelen, oldp, oldlenp, newp, newlen); |
| 1370 |
if(name) {
|
| 1371 |
i = 0;
|
| 1372 |
do { tswap32s( name + i); } while (++i < namelen); |
| 1373 |
print_syctl(name, namelen); |
| 1374 |
//bswap_syctl(name, namelen, newp, newlen);
|
| 1375 |
tswap32s((uint32_t*)oldlenp); |
| 1376 |
} |
| 1377 |
|
| 1378 |
if(name) /* Sometimes sysctl is called with no arg1, ignore */ |
| 1379 |
ret = get_errno(sysctl(name, namelen, oldp, oldlenp, newp, newlen)); |
| 1380 |
|
| 1381 |
#if defined(TARGET_I386) ^ defined(__i386__) || defined(TARGET_PPC) ^ defined(__ppc__)
|
| 1382 |
if (!is_error(ret) && bswap_syctl(name, namelen, oldp, *oldlenp) != 0) { |
| 1383 |
return -ENOTDIR;
|
| 1384 |
} |
| 1385 |
#endif
|
| 1386 |
|
| 1387 |
if(name) {
|
| 1388 |
//bswap_syctl(name, namelen, newp, newlen);
|
| 1389 |
tswap32s((uint32_t*)oldlenp); |
| 1390 |
|
| 1391 |
i = 0;
|
| 1392 |
do { tswap32s( name + i); } while (++i < namelen); |
| 1393 |
} |
| 1394 |
return ret;
|
| 1395 |
} |
| 1396 |
|
| 1397 |
long do_getattrlist(void * arg1, void * arg2, void * arg3, uint32_t arg4, uint32_t arg5) |
| 1398 |
{
|
| 1399 |
struct attrlist * attrlist = (void *)arg2; |
| 1400 |
long ret;
|
| 1401 |
|
| 1402 |
#if defined(TARGET_I386) ^ defined(__i386__) || defined(TARGET_PPC) ^ defined(__ppc__)
|
| 1403 |
gemu_log("SYS_getdirentriesattr unimplemented\n");
|
| 1404 |
return -ENOTSUP;
|
| 1405 |
#endif
|
| 1406 |
/* XXX: don't let the %s stay in there */
|
| 1407 |
DPRINTF("getattrlist(%s, %p, %p, 0x%x, 0x%x)\n",
|
| 1408 |
(char *)arg1, arg2, arg3, arg4, arg5);
|
| 1409 |
|
| 1410 |
if(arg2) /* XXX: We should handle that in a copy especially |
| 1411 |
if the structure is not writable */
|
| 1412 |
byteswap_attrlist(attrlist); |
| 1413 |
|
| 1414 |
ret = get_errno(getattrlist((const char* )arg1, attrlist, (void *)arg3, arg4, arg5)); |
| 1415 |
|
| 1416 |
if(!is_error(ret))
|
| 1417 |
{
|
| 1418 |
byteswap_attrbuf((void *)arg3, attrlist);
|
| 1419 |
byteswap_attrlist(attrlist); |
| 1420 |
} |
| 1421 |
return ret;
|
| 1422 |
} |
| 1423 |
|
| 1424 |
long do_getdirentriesattr(uint32_t arg1, void * arg2, void * arg3, size_t arg4, void * arg5, void * arg6, void* arg7, uint32_t arg8) |
| 1425 |
{
|
| 1426 |
DPRINTF("getdirentriesattr(0x%x, %p, %p, 0x%lx, %p, %p, %p, 0x%x)\n",
|
| 1427 |
arg1, arg2, arg3, arg4, arg5, arg6, arg7, arg8); |
| 1428 |
#if defined(TARGET_I386) ^ defined(__i386__) || defined(TARGET_PPC) ^ defined(__ppc__)
|
| 1429 |
qerror("SYS_getdirentriesattr unimplemented\n");
|
| 1430 |
#endif
|
| 1431 |
|
| 1432 |
return get_errno(getdirentriesattr( arg1, (struct attrlist * )arg2, (void *)arg3, arg4, |
| 1433 |
(unsigned long *)arg5, (unsigned long *)arg6, |
| 1434 |
(unsigned long *)arg7, arg8)); |
| 1435 |
} |
| 1436 |
|
| 1437 |
static inline void bswap_flock(struct flock *f) |
| 1438 |
{
|
| 1439 |
tswap64s(&f->l_start); |
| 1440 |
tswap64s(&f->l_len); |
| 1441 |
tswap32s(&f->l_pid); |
| 1442 |
tswap16s(&f->l_type); |
| 1443 |
tswap16s(&f->l_whence); |
| 1444 |
} |
| 1445 |
|
| 1446 |
static inline void bswap_fstore(struct fstore *f) |
| 1447 |
{
|
| 1448 |
tswap32s(&f->fst_flags); |
| 1449 |
tswap32s(&f->fst_posmode); |
| 1450 |
tswap64s(&f->fst_offset); |
| 1451 |
tswap64s(&f->fst_length); |
| 1452 |
tswap64s(&f->fst_bytesalloc); |
| 1453 |
} |
| 1454 |
|
| 1455 |
static inline void bswap_radvisory(struct radvisory *f) |
| 1456 |
{
|
| 1457 |
tswap64s(&f->ra_offset); |
| 1458 |
tswap32s(&f->ra_count); |
| 1459 |
} |
| 1460 |
|
| 1461 |
static inline void bswap_fbootstraptransfer(struct fbootstraptransfer *f) |
| 1462 |
{
|
| 1463 |
tswap64s(&f->fbt_offset); |
| 1464 |
tswap32s((uint32_t*)&f->fbt_length); |
| 1465 |
tswap32s((uint32_t*)&f->fbt_buffer); /* XXX: this is a ptr */
|
| 1466 |
} |
| 1467 |
|
| 1468 |
static inline void bswap_log2phys(struct log2phys *f) |
| 1469 |
{
|
| 1470 |
tswap32s(&f->l2p_flags); |
| 1471 |
tswap64s(&f->l2p_contigbytes); |
| 1472 |
tswap64s(&f->l2p_devoffset); |
| 1473 |
} |
| 1474 |
|
| 1475 |
static inline void bswap_fcntl_arg(int cmd, void * arg) |
| 1476 |
{
|
| 1477 |
switch(cmd)
|
| 1478 |
{
|
| 1479 |
case F_DUPFD:
|
| 1480 |
case F_GETFD:
|
| 1481 |
case F_SETFD:
|
| 1482 |
case F_GETFL:
|
| 1483 |
case F_SETFL:
|
| 1484 |
case F_GETOWN:
|
| 1485 |
case F_SETOWN:
|
| 1486 |
case F_SETSIZE:
|
| 1487 |
case F_RDAHEAD:
|
| 1488 |
case F_FULLFSYNC:
|
| 1489 |
break;
|
| 1490 |
case F_GETLK:
|
| 1491 |
case F_SETLK:
|
| 1492 |
case F_SETLKW:
|
| 1493 |
bswap_flock(arg); |
| 1494 |
break;
|
| 1495 |
case F_PREALLOCATE:
|
| 1496 |
bswap_fstore(arg); |
| 1497 |
break;
|
| 1498 |
case F_RDADVISE:
|
| 1499 |
bswap_radvisory(arg); |
| 1500 |
break;
|
| 1501 |
case F_READBOOTSTRAP:
|
| 1502 |
case F_WRITEBOOTSTRAP:
|
| 1503 |
bswap_fbootstraptransfer(arg); |
| 1504 |
break;
|
| 1505 |
case F_LOG2PHYS:
|
| 1506 |
bswap_log2phys(arg); |
| 1507 |
break;
|
| 1508 |
default:
|
| 1509 |
gemu_log("unknow cmd in fcntl\n");
|
| 1510 |
} |
| 1511 |
} |
| 1512 |
|
| 1513 |
long do_fcntl(int fd, int cmd, int arg) |
| 1514 |
{
|
| 1515 |
long ret;
|
| 1516 |
bswap_fcntl_arg(cmd, (void *)arg);
|
| 1517 |
ret = get_errno(fcntl(fd, cmd, arg)); |
| 1518 |
if(!is_error(ret))
|
| 1519 |
bswap_fcntl_arg(cmd, (void *)arg);
|
| 1520 |
return ret;
|
| 1521 |
} |
| 1522 |
|
| 1523 |
long no_syscall(void *cpu_env, int num) |
| 1524 |
{
|
| 1525 |
/* XXX: We should probably fordward it to the host kernel */
|
| 1526 |
qerror("no unix syscall %d\n", num);
|
| 1527 |
/* not reached */
|
| 1528 |
return -1; |
| 1529 |
} |
| 1530 |
|
| 1531 |
long unimpl_unix_syscall(void *cpu_env, int num) |
| 1532 |
{
|
| 1533 |
if( (num < 0) || (num > SYS_MAXSYSCALL-1) ) |
| 1534 |
qerror("unix syscall %d is out of unix syscall bounds (0-%d) " , num, SYS_MAXSYSCALL-1); |
| 1535 |
|
| 1536 |
gemu_log("qemu: Unsupported unix syscall %s %d\n", unix_syscall_table[num].name , num);
|
| 1537 |
gdb_handlesig (cpu_env, SIGTRAP); |
| 1538 |
exit(-1);
|
| 1539 |
} |
| 1540 |
|
| 1541 |
long do_unix_syscall(void *cpu_env, int num) |
| 1542 |
{
|
| 1543 |
long ret = 0; |
| 1544 |
|
| 1545 |
DPRINTF("unix syscall %d: " , num);
|
| 1546 |
|
| 1547 |
if( (num < 0) || (num > SYS_MAXSYSCALL-1) ) |
| 1548 |
qerror("unix syscall %d is out of unix syscall bounds (0-%d) " , num, SYS_MAXSYSCALL-1); |
| 1549 |
|
| 1550 |
DPRINTF("%s [%s]", unix_syscall_table[num].name, unix_syscall_table[num].call_type & CALL_DIRECT ? "direct" : "indirect" ); |
| 1551 |
ret = unix_syscall_table[num].function(cpu_env, num); |
| 1552 |
|
| 1553 |
if(!(unix_syscall_table[num].call_type & CALL_NOERRNO))
|
| 1554 |
ret = get_errno(ret); |
| 1555 |
|
| 1556 |
DPRINTF("[returned 0x%x(%d)]\n", (int)ret, (int)ret); |
| 1557 |
return ret;
|
| 1558 |
} |
| 1559 |
|
| 1560 |
/* ------------------------------------------------------------
|
| 1561 |
syscall_init
|
| 1562 |
*/
|
| 1563 |
void syscall_init(void) |
| 1564 |
{
|
| 1565 |
/* Nothing yet */
|
| 1566 |
} |