main.c 145.5 KB
Newer Older
1
/*
2
 *  qemu user main
3
 *
B
bellard 已提交
4
 *  Copyright (c) 2003-2008 Fabrice Bellard
5 6 7 8 9 10 11 12 13 14 15 16
 *
 *  This program is free software; you can redistribute it and/or modify
 *  it under the terms of the GNU General Public License as published by
 *  the Free Software Foundation; either version 2 of the License, or
 *  (at your option) any later version.
 *
 *  This program is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *  GNU General Public License for more details.
 *
 *  You should have received a copy of the GNU General Public License
17
 *  along with this program; if not, see <http://www.gnu.org/licenses/>.
18
 */
P
Peter Maydell 已提交
19
#include "qemu/osdep.h"
20
#include "qemu-version.h"
21
#include <sys/syscall.h>
22
#include <sys/resource.h>
23

24
#include "qapi/error.h"
B
bellard 已提交
25
#include "qemu.h"
26
#include "qemu/path.h"
27
#include "qemu/config-file.h"
28 29
#include "qemu/cutils.h"
#include "qemu/help_option.h"
30
#include "cpu.h"
31
#include "exec/exec-all.h"
32
#include "tcg.h"
33 34
#include "qemu/timer.h"
#include "qemu/envlist.h"
P
Paul Brook 已提交
35
#include "elf.h"
36
#include "exec/log.h"
37 38
#include "trace/control.h"
#include "glib-compat.h"
39

40 41
char *exec_path;

42
int singlestep;
43 44 45 46
static const char *filename;
static const char *argv0;
static int gdbstub_port;
static envlist_t *envlist;
47
static const char *cpu_model;
P
Paul Brook 已提交
48 49 50
unsigned long mmap_min_addr;
unsigned long guest_base;
int have_guest_base;
P
Paolo Bonzini 已提交
51 52 53 54 55 56 57 58 59 60 61 62

#define EXCP_DUMP(env, fmt, ...)                                        \
do {                                                                    \
    CPUState *cs = ENV_GET_CPU(env);                                    \
    fprintf(stderr, fmt , ## __VA_ARGS__);                              \
    cpu_dump_state(cs, stderr, fprintf, 0);                             \
    if (qemu_log_separate()) {                                          \
        qemu_log(fmt, ## __VA_ARGS__);                                  \
        log_cpu_state(cs, 0);                                           \
    }                                                                   \
} while (0)

63 64 65 66 67 68 69 70
#if (TARGET_LONG_BITS == 32) && (HOST_LONG_BITS == 64)
/*
 * When running 32-on-64 we should make sure we can fit all of the possible
 * guest address space into a contiguous chunk of virtual host memory.
 *
 * This way we will never overlap with our own libraries or binaries or stack
 * or anything else that QEMU maps.
 */
71 72 73 74
# ifdef TARGET_MIPS
/* MIPS only supports 31 bits of virtual address space for user space */
unsigned long reserved_va = 0x77000000;
# else
75
unsigned long reserved_va = 0xf7000000;
76
# endif
77
#else
P
Paul Brook 已提交
78
unsigned long reserved_va;
P
Paul Brook 已提交
79
#endif
80

M
Meador Inge 已提交
81
static void usage(int exitcode);
82

P
Paolo Bonzini 已提交
83
static const char *interp_prefix = CONFIG_QEMU_INTERP_PREFIX;
84
const char *qemu_uname_release;
B
bellard 已提交
85

B
bellard 已提交
86 87 88
/* XXX: on x86 MAP_GROWSDOWN only works if ESP <= address + 32, so
   we allocate a bigger stack. Need a better solution, for example
   by remapping the process stack directly at the right place */
89
unsigned long guest_stack_size = 8 * 1024 * 1024UL;
90 91 92 93 94 95 96 97 98 99

void gemu_log(const char *fmt, ...)
{
    va_list ap;

    va_start(ap, fmt);
    vfprintf(stderr, fmt, ap);
    va_end(ap);
}

100
#if defined(TARGET_I386)
101
int cpu_get_pic_interrupt(CPUX86State *env)
102 103 104
{
    return -1;
}
105
#endif
106

P
pbrook 已提交
107 108 109 110 111 112
/***********************************************************/
/* Helper routines for implementing atomic operations.  */

/* Make sure everything is in a consistent state for calling fork().  */
void fork_start(void)
{
113
    cpu_list_lock();
K
KONRAD Frederic 已提交
114
    qemu_mutex_lock(&tcg_ctx.tb_ctx.tb_lock);
R
Riku Voipio 已提交
115
    mmap_fork_start();
P
pbrook 已提交
116 117 118 119
}

void fork_end(int child)
{
R
Riku Voipio 已提交
120
    mmap_fork_end(child);
P
pbrook 已提交
121
    if (child) {
A
Andreas Färber 已提交
122
        CPUState *cpu, *next_cpu;
P
pbrook 已提交
123 124
        /* Child processes created by fork() only have a single thread.
           Discard information about the parent threads.  */
A
Andreas Färber 已提交
125 126
        CPU_FOREACH_SAFE(cpu, next_cpu) {
            if (cpu != thread_cpu) {
127
                QTAILQ_REMOVE(&cpus, cpu, node);
A
Andreas Färber 已提交
128 129
            }
        }
K
KONRAD Frederic 已提交
130
        qemu_mutex_init(&tcg_ctx.tb_ctx.tb_lock);
131
        qemu_init_cpu_list();
132
        gdbserver_fork(thread_cpu);
P
pbrook 已提交
133
    } else {
K
KONRAD Frederic 已提交
134
        qemu_mutex_unlock(&tcg_ctx.tb_ctx.tb_lock);
135
        cpu_list_unlock();
P
pbrook 已提交
136 137 138
    }
}

139 140 141 142
#ifdef TARGET_I386
/***********************************************************/
/* CPUX86 core interface */

B
bellard 已提交
143 144
uint64_t cpu_get_tsc(CPUX86State *env)
{
145
    return cpu_get_host_ticks();
B
bellard 已提交
146 147
}

148
static void write_dt(void *ptr, unsigned long addr, unsigned long limit,
149
                     int flags)
B
bellard 已提交
150
{
151
    unsigned int e1, e2;
152
    uint32_t *p;
B
bellard 已提交
153 154
    e1 = (addr << 16) | (limit & 0xffff);
    e2 = ((addr >> 16) & 0xff) | (addr & 0xff000000) | (limit & 0x000f0000);
155
    e2 |= flags;
156
    p = ptr;
M
malc 已提交
157 158
    p[0] = tswap32(e1);
    p[1] = tswap32(e2);
159 160
}

161
static uint64_t *idt_table;
162
#ifdef TARGET_X86_64
B
bellard 已提交
163 164
static void set_gate64(void *ptr, unsigned int type, unsigned int dpl,
                       uint64_t addr, unsigned int sel)
165
{
B
bellard 已提交
166
    uint32_t *p, e1, e2;
167 168
    e1 = (addr & 0xffff) | (sel << 16);
    e2 = (addr & 0xffff0000) | 0x8000 | (dpl << 13) | (type << 8);
169
    p = ptr;
B
bellard 已提交
170 171 172 173
    p[0] = tswap32(e1);
    p[1] = tswap32(e2);
    p[2] = tswap32(addr >> 32);
    p[3] = 0;
B
bellard 已提交
174
}
B
bellard 已提交
175 176 177 178 179 180 181 182 183
/* only dpl matters as we do only user space emulation */
static void set_idt(int n, unsigned int dpl)
{
    set_gate64(idt_table + n * 2, 0, dpl, 0, 0);
}
#else
static void set_gate(void *ptr, unsigned int type, unsigned int dpl,
                     uint32_t addr, unsigned int sel)
{
B
bellard 已提交
184
    uint32_t *p, e1, e2;
B
bellard 已提交
185 186 187
    e1 = (addr & 0xffff) | (sel << 16);
    e2 = (addr & 0xffff0000) | 0x8000 | (dpl << 13) | (type << 8);
    p = ptr;
B
bellard 已提交
188 189
    p[0] = tswap32(e1);
    p[1] = tswap32(e2);
B
bellard 已提交
190 191
}

192 193 194 195 196
/* only dpl matters as we do only user space emulation */
static void set_idt(int n, unsigned int dpl)
{
    set_gate(idt_table + n, 0, dpl, 0, 0);
}
B
bellard 已提交
197
#endif
198

B
bellard 已提交
199
void cpu_loop(CPUX86State *env)
B
bellard 已提交
200
{
201
    CPUState *cs = CPU(x86_env_get_cpu(env));
B
bellard 已提交
202
    int trapnr;
203
    abi_ulong pc;
204
    abi_ulong ret;
A
Anthony Liguori 已提交
205
    target_siginfo_t info;
B
bellard 已提交
206

B
bellard 已提交
207
    for(;;) {
208
        cpu_exec_start(cs);
209
        trapnr = cpu_exec(cs);
210
        cpu_exec_end(cs);
211 212
        process_queued_cpu_work(cs);

B
bellard 已提交
213
        switch(trapnr) {
214
        case 0x80:
B
bellard 已提交
215
            /* linux syscall from int $0x80 */
216 217 218 219 220 221 222 223 224 225 226 227 228 229
            ret = do_syscall(env,
                             env->regs[R_EAX],
                             env->regs[R_EBX],
                             env->regs[R_ECX],
                             env->regs[R_EDX],
                             env->regs[R_ESI],
                             env->regs[R_EDI],
                             env->regs[R_EBP],
                             0, 0);
            if (ret == -TARGET_ERESTARTSYS) {
                env->eip -= 2;
            } else if (ret != -TARGET_QEMU_ESIGRETURN) {
                env->regs[R_EAX] = ret;
            }
230
            break;
B
bellard 已提交
231 232
#ifndef TARGET_ABI32
        case EXCP_SYSCALL:
233
            /* linux syscall from syscall instruction */
234 235 236 237 238 239 240 241 242 243 244 245 246 247
            ret = do_syscall(env,
                             env->regs[R_EAX],
                             env->regs[R_EDI],
                             env->regs[R_ESI],
                             env->regs[R_EDX],
                             env->regs[10],
                             env->regs[8],
                             env->regs[9],
                             0, 0);
            if (ret == -TARGET_ERESTARTSYS) {
                env->eip -= 2;
            } else if (ret != -TARGET_QEMU_ESIGRETURN) {
                env->regs[R_EAX] = ret;
            }
B
bellard 已提交
248 249
            break;
#endif
250 251
        case EXCP0B_NOSEG:
        case EXCP0C_STACK:
252
            info.si_signo = TARGET_SIGBUS;
253 254 255
            info.si_errno = 0;
            info.si_code = TARGET_SI_KERNEL;
            info._sifields._sigfault._addr = 0;
256
            queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
257
            break;
B
bellard 已提交
258
        case EXCP0D_GPF:
B
bellard 已提交
259
            /* XXX: potential problem if ABI32 */
260
#ifndef TARGET_X86_64
B
bellard 已提交
261
            if (env->eflags & VM_MASK) {
B
bellard 已提交
262
                handle_vm86_fault(env);
263 264 265
            } else
#endif
            {
266
                info.si_signo = TARGET_SIGSEGV;
267 268 269
                info.si_errno = 0;
                info.si_code = TARGET_SI_KERNEL;
                info._sifields._sigfault._addr = 0;
270
                queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
B
bellard 已提交
271 272
            }
            break;
B
bellard 已提交
273
        case EXCP0E_PAGE:
274
            info.si_signo = TARGET_SIGSEGV;
B
bellard 已提交
275 276 277 278 279
            info.si_errno = 0;
            if (!(env->error_code & 1))
                info.si_code = TARGET_SEGV_MAPERR;
            else
                info.si_code = TARGET_SEGV_ACCERR;
B
bellard 已提交
280
            info._sifields._sigfault._addr = env->cr[2];
281
            queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
B
bellard 已提交
282
            break;
B
bellard 已提交
283
        case EXCP00_DIVZ:
284
#ifndef TARGET_X86_64
B
bellard 已提交
285
            if (env->eflags & VM_MASK) {
B
bellard 已提交
286
                handle_vm86_trap(env, trapnr);
287 288 289
            } else
#endif
            {
B
bellard 已提交
290
                /* division by zero */
291
                info.si_signo = TARGET_SIGFPE;
B
bellard 已提交
292 293 294
                info.si_errno = 0;
                info.si_code = TARGET_FPE_INTDIV;
                info._sifields._sigfault._addr = env->eip;
295
                queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
B
bellard 已提交
296
            }
B
bellard 已提交
297
            break;
298
        case EXCP01_DB:
B
bellard 已提交
299
        case EXCP03_INT3:
300
#ifndef TARGET_X86_64
B
bellard 已提交
301 302
            if (env->eflags & VM_MASK) {
                handle_vm86_trap(env, trapnr);
303 304 305
            } else
#endif
            {
306
                info.si_signo = TARGET_SIGTRAP;
B
bellard 已提交
307
                info.si_errno = 0;
308
                if (trapnr == EXCP01_DB) {
B
bellard 已提交
309 310 311 312 313 314
                    info.si_code = TARGET_TRAP_BRKPT;
                    info._sifields._sigfault._addr = env->eip;
                } else {
                    info.si_code = TARGET_SI_KERNEL;
                    info._sifields._sigfault._addr = 0;
                }
315
                queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
B
bellard 已提交
316 317
            }
            break;
B
bellard 已提交
318 319
        case EXCP04_INTO:
        case EXCP05_BOUND:
320
#ifndef TARGET_X86_64
B
bellard 已提交
321
            if (env->eflags & VM_MASK) {
B
bellard 已提交
322
                handle_vm86_trap(env, trapnr);
323 324 325
            } else
#endif
            {
326
                info.si_signo = TARGET_SIGSEGV;
B
bellard 已提交
327
                info.si_errno = 0;
B
bellard 已提交
328
                info.si_code = TARGET_SI_KERNEL;
B
bellard 已提交
329
                info._sifields._sigfault._addr = 0;
330
                queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
B
bellard 已提交
331
            }
B
bellard 已提交
332 333
            break;
        case EXCP06_ILLOP:
334
            info.si_signo = TARGET_SIGILL;
B
bellard 已提交
335 336 337
            info.si_errno = 0;
            info.si_code = TARGET_ILL_ILLOPN;
            info._sifields._sigfault._addr = env->eip;
338
            queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
B
bellard 已提交
339 340 341 342
            break;
        case EXCP_INTERRUPT:
            /* just indicate that signals should be handled asap */
            break;
B
bellard 已提交
343 344 345 346
        case EXCP_DEBUG:
            {
                int sig;

347
                sig = gdb_handlesig(cs, TARGET_SIGTRAP);
B
bellard 已提交
348 349 350 351 352
                if (sig)
                  {
                    info.si_signo = sig;
                    info.si_errno = 0;
                    info.si_code = TARGET_TRAP_BRKPT;
353
                    queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
B
bellard 已提交
354 355 356
                  }
            }
            break;
R
Richard Henderson 已提交
357 358 359
        case EXCP_ATOMIC:
            cpu_exec_step_atomic(cs);
            break;
B
bellard 已提交
360
        default:
B
bellard 已提交
361
            pc = env->segs[R_CS].base + env->eip;
P
Paolo Bonzini 已提交
362 363
            EXCP_DUMP(env, "qemu: 0x%08lx: unhandled CPU exception 0x%x - aborting\n",
                      (long)pc, trapnr);
B
bellard 已提交
364 365
            abort();
        }
B
bellard 已提交
366
        process_pending_signals(env);
B
bellard 已提交
367 368
    }
}
B
bellard 已提交
369 370 371 372
#endif

#ifdef TARGET_ARM

373
#define get_user_code_u32(x, gaddr, env)                \
P
Paul Brook 已提交
374
    ({ abi_long __r = get_user_u32((x), (gaddr));       \
375
        if (!__r && bswap_code(arm_sctlr_b(env))) {     \
P
Paul Brook 已提交
376 377 378 379 380
            (x) = bswap32(x);                           \
        }                                               \
        __r;                                            \
    })

381
#define get_user_code_u16(x, gaddr, env)                \
P
Paul Brook 已提交
382
    ({ abi_long __r = get_user_u16((x), (gaddr));       \
383
        if (!__r && bswap_code(arm_sctlr_b(env))) {     \
P
Paul Brook 已提交
384 385 386 387 388
            (x) = bswap16(x);                           \
        }                                               \
        __r;                                            \
    })

389 390 391 392 393 394 395 396 397 398 399 400 401 402 403 404 405 406 407 408 409 410 411 412 413 414 415 416 417 418 419 420
#define get_user_data_u32(x, gaddr, env)                \
    ({ abi_long __r = get_user_u32((x), (gaddr));       \
        if (!__r && arm_cpu_bswap_data(env)) {          \
            (x) = bswap32(x);                           \
        }                                               \
        __r;                                            \
    })

#define get_user_data_u16(x, gaddr, env)                \
    ({ abi_long __r = get_user_u16((x), (gaddr));       \
        if (!__r && arm_cpu_bswap_data(env)) {          \
            (x) = bswap16(x);                           \
        }                                               \
        __r;                                            \
    })

#define put_user_data_u32(x, gaddr, env)                \
    ({ typeof(x) __x = (x);                             \
        if (arm_cpu_bswap_data(env)) {                  \
            __x = bswap32(__x);                         \
        }                                               \
        put_user_u32(__x, (gaddr));                     \
    })

#define put_user_data_u16(x, gaddr, env)                \
    ({ typeof(x) __x = (x);                             \
        if (arm_cpu_bswap_data(env)) {                  \
            __x = bswap16(__x);                         \
        }                                               \
        put_user_u16(__x, (gaddr));                     \
    })

421 422 423
#ifdef TARGET_ABI32
/* Commpage handling -- there is no commpage for AArch64 */

424 425 426 427 428 429 430 431 432 433 434 435 436 437 438 439 440 441 442 443 444 445 446 447 448 449 450 451 452 453 454
/*
 * See the Linux kernel's Documentation/arm/kernel_user_helpers.txt
 * Input:
 * r0 = pointer to oldval
 * r1 = pointer to newval
 * r2 = pointer to target value
 *
 * Output:
 * r0 = 0 if *ptr was changed, non-0 if no exchange happened
 * C set if *ptr was changed, clear if no exchange happened
 *
 * Note segv's in kernel helpers are a bit tricky, we can set the
 * data address sensibly but the PC address is just the entry point.
 */
static void arm_kernel_cmpxchg64_helper(CPUARMState *env)
{
    uint64_t oldval, newval, val;
    uint32_t addr, cpsr;
    target_siginfo_t info;

    /* Based on the 32 bit code in do_kernel_trap */

    /* XXX: This only works between threads, not between processes.
       It's probably possible to implement this with native host
       operations. However things like ldrex/strex are much harder so
       there's not much point trying.  */
    start_exclusive();
    cpsr = cpsr_read(env);
    addr = env->regs[2];

    if (get_user_u64(oldval, env->regs[0])) {
455
        env->exception.vaddress = env->regs[0];
456 457 458 459
        goto segv;
    };

    if (get_user_u64(newval, env->regs[1])) {
460
        env->exception.vaddress = env->regs[1];
461 462 463 464
        goto segv;
    };

    if (get_user_u64(val, addr)) {
465
        env->exception.vaddress = addr;
466 467 468 469 470 471 472
        goto segv;
    }

    if (val == oldval) {
        val = newval;

        if (put_user_u64(val, addr)) {
473
            env->exception.vaddress = addr;
474 475 476 477 478 479 480 481 482
            goto segv;
        };

        env->regs[0] = 0;
        cpsr |= CPSR_C;
    } else {
        env->regs[0] = -1;
        cpsr &= ~CPSR_C;
    }
483
    cpsr_write(env, cpsr, CPSR_C, CPSRWriteByInstr);
484 485 486 487 488 489 490
    end_exclusive();
    return;

segv:
    end_exclusive();
    /* We get the PC of the entry address - which is as good as anything,
       on a real kernel what you get depends on which mode it uses. */
491
    info.si_signo = TARGET_SIGSEGV;
492 493 494
    info.si_errno = 0;
    /* XXX: check env->error_code */
    info.si_code = TARGET_SEGV_MAPERR;
495
    info._sifields._sigfault._addr = env->exception.vaddress;
496
    queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
497 498
}

499 500 501 502 503 504 505 506 507 508 509 510 511
/* Handle a jump to the kernel code page.  */
static int
do_kernel_trap(CPUARMState *env)
{
    uint32_t addr;
    uint32_t cpsr;
    uint32_t val;

    switch (env->regs[15]) {
    case 0xffff0fa0: /* __kernel_memory_barrier */
        /* ??? No-op. Will need to do better for SMP.  */
        break;
    case 0xffff0fc0: /* __kernel_cmpxchg */
P
pbrook 已提交
512 513 514 515 516
         /* XXX: This only works between threads, not between processes.
            It's probably possible to implement this with native host
            operations. However things like ldrex/strex are much harder so
            there's not much point trying.  */
        start_exclusive();
517 518 519 520 521 522 523 524 525 526 527 528 529 530 531
        cpsr = cpsr_read(env);
        addr = env->regs[2];
        /* FIXME: This should SEGV if the access fails.  */
        if (get_user_u32(val, addr))
            val = ~env->regs[0];
        if (val == env->regs[0]) {
            val = env->regs[1];
            /* FIXME: Check for segfaults.  */
            put_user_u32(val, addr);
            env->regs[0] = 0;
            cpsr |= CPSR_C;
        } else {
            env->regs[0] = -1;
            cpsr &= ~CPSR_C;
        }
532
        cpsr_write(env, cpsr, CPSR_C, CPSRWriteByInstr);
P
pbrook 已提交
533
        end_exclusive();
534 535
        break;
    case 0xffff0fe0: /* __kernel_get_tls */
536
        env->regs[0] = cpu_get_tls(env);
537
        break;
538 539 540 541
    case 0xffff0f60: /* __kernel_cmpxchg64 */
        arm_kernel_cmpxchg64_helper(env);
        break;

542 543 544 545 546 547 548 549 550 551 552 553 554 555
    default:
        return 1;
    }
    /* Jump back to the caller.  */
    addr = env->regs[14];
    if (addr & 1) {
        env->thumb = 1;
        addr &= ~1;
    }
    env->regs[15] = addr;

    return 0;
}

B
bellard 已提交
556 557
void cpu_loop(CPUARMState *env)
{
558
    CPUState *cs = CPU(arm_env_get_cpu(env));
B
bellard 已提交
559 560
    int trapnr;
    unsigned int n, insn;
A
Anthony Liguori 已提交
561
    target_siginfo_t info;
B
bellard 已提交
562
    uint32_t addr;
563
    abi_ulong ret;
564

B
bellard 已提交
565
    for(;;) {
566
        cpu_exec_start(cs);
567
        trapnr = cpu_exec(cs);
568
        cpu_exec_end(cs);
569 570
        process_queued_cpu_work(cs);

B
bellard 已提交
571 572
        switch(trapnr) {
        case EXCP_UDEF:
573
            {
574
                TaskState *ts = cs->opaque;
575
                uint32_t opcode;
576
                int rc;
577 578 579

                /* we handle the FPU emulation here, as Linux */
                /* we get the opcode */
580
                /* FIXME - what to do if get_user() fails? */
581
                get_user_code_u32(opcode, env->regs[15], env);
582

583 584
                rc = EmulateAll(opcode, &ts->fpa, env);
                if (rc == 0) { /* illegal instruction */
585
                    info.si_signo = TARGET_SIGILL;
586 587 588
                    info.si_errno = 0;
                    info.si_code = TARGET_ILL_ILLOPN;
                    info._sifields._sigfault._addr = env->regs[15];
589
                    queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
590 591 592 593 594 595 596 597 598 599 600 601 602 603 604 605 606 607 608
                } else if (rc < 0) { /* FP exception */
                    int arm_fpe=0;

                    /* translate softfloat flags to FPSR flags */
                    if (-rc & float_flag_invalid)
                      arm_fpe |= BIT_IOC;
                    if (-rc & float_flag_divbyzero)
                      arm_fpe |= BIT_DZC;
                    if (-rc & float_flag_overflow)
                      arm_fpe |= BIT_OFC;
                    if (-rc & float_flag_underflow)
                      arm_fpe |= BIT_UFC;
                    if (-rc & float_flag_inexact)
                      arm_fpe |= BIT_IXC;

                    FPSR fpsr = ts->fpa.fpsr;
                    //printf("fpsr 0x%x, arm_fpe 0x%x\n",fpsr,arm_fpe);

                    if (fpsr & (arm_fpe << 16)) { /* exception enabled? */
609
                      info.si_signo = TARGET_SIGFPE;
610 611 612 613 614 615 616 617 618 619
                      info.si_errno = 0;

                      /* ordered by priority, least first */
                      if (arm_fpe & BIT_IXC) info.si_code = TARGET_FPE_FLTRES;
                      if (arm_fpe & BIT_UFC) info.si_code = TARGET_FPE_FLTUND;
                      if (arm_fpe & BIT_OFC) info.si_code = TARGET_FPE_FLTOVF;
                      if (arm_fpe & BIT_DZC) info.si_code = TARGET_FPE_FLTDIV;
                      if (arm_fpe & BIT_IOC) info.si_code = TARGET_FPE_FLTINV;

                      info._sifields._sigfault._addr = env->regs[15];
620
                      queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
621 622 623 624 625 626 627 628 629 630 631 632 633 634 635 636 637
                    } else {
                      env->regs[15] += 4;
                    }

                    /* accumulate unenabled exceptions */
                    if ((!(fpsr & BIT_IXE)) && (arm_fpe & BIT_IXC))
                      fpsr |= BIT_IXC;
                    if ((!(fpsr & BIT_UFE)) && (arm_fpe & BIT_UFC))
                      fpsr |= BIT_UFC;
                    if ((!(fpsr & BIT_OFE)) && (arm_fpe & BIT_OFC))
                      fpsr |= BIT_OFC;
                    if ((!(fpsr & BIT_DZE)) && (arm_fpe & BIT_DZC))
                      fpsr |= BIT_DZC;
                    if ((!(fpsr & BIT_IOE)) && (arm_fpe & BIT_IOC))
                      fpsr |= BIT_IOC;
                    ts->fpa.fpsr=fpsr;
                } else { /* everything OK */
638 639 640 641
                    /* increment PC */
                    env->regs[15] += 4;
                }
            }
B
bellard 已提交
642 643
            break;
        case EXCP_SWI:
P
pbrook 已提交
644
        case EXCP_BKPT:
B
bellard 已提交
645
            {
P
pbrook 已提交
646
                env->eabi = 1;
B
bellard 已提交
647
                /* system call */
P
pbrook 已提交
648 649
                if (trapnr == EXCP_BKPT) {
                    if (env->thumb) {
650
                        /* FIXME - what to do if get_user() fails? */
651
                        get_user_code_u16(insn, env->regs[15], env);
P
pbrook 已提交
652 653 654
                        n = insn & 0xff;
                        env->regs[15] += 2;
                    } else {
655
                        /* FIXME - what to do if get_user() fails? */
656
                        get_user_code_u32(insn, env->regs[15], env);
P
pbrook 已提交
657 658 659
                        n = (insn & 0xf) | ((insn >> 4) & 0xff0);
                        env->regs[15] += 4;
                    }
B
bellard 已提交
660
                } else {
P
pbrook 已提交
661
                    if (env->thumb) {
662
                        /* FIXME - what to do if get_user() fails? */
663
                        get_user_code_u16(insn, env->regs[15] - 2, env);
P
pbrook 已提交
664 665
                        n = insn & 0xff;
                    } else {
666
                        /* FIXME - what to do if get_user() fails? */
667
                        get_user_code_u32(insn, env->regs[15] - 4, env);
P
pbrook 已提交
668 669
                        n = insn & 0xffffff;
                    }
B
bellard 已提交
670 671
                }

672
                if (n == ARM_NR_cacheflush) {
673
                    /* nop */
674 675 676
                } else if (n == ARM_NR_semihosting
                           || n == ARM_NR_thumb_semihosting) {
                    env->regs[0] = do_arm_semihosting (env);
677
                } else if (n == 0 || n >= ARM_SYSCALL_BASE || env->thumb) {
B
bellard 已提交
678
                    /* linux syscall */
P
pbrook 已提交
679
                    if (env->thumb || n == 0) {
B
bellard 已提交
680 681 682
                        n = env->regs[7];
                    } else {
                        n -= ARM_SYSCALL_BASE;
P
pbrook 已提交
683
                        env->eabi = 0;
B
bellard 已提交
684
                    }
685 686 687
                    if ( n > ARM_NR_BASE) {
                        switch (n) {
                        case ARM_NR_cacheflush:
688
                            /* nop */
689 690 691 692 693
                            break;
                        case ARM_NR_set_tls:
                            cpu_set_tls(env, env->regs[0]);
                            env->regs[0] = 0;
                            break;
694 695 696
                        case ARM_NR_breakpoint:
                            env->regs[15] -= env->thumb ? 2 : 4;
                            goto excp_debug;
697 698 699 700 701 702 703
                        default:
                            gemu_log("qemu: Unsupported ARM syscall: 0x%x\n",
                                     n);
                            env->regs[0] = -TARGET_ENOSYS;
                            break;
                        }
                    } else {
704 705 706 707 708 709 710 711 712 713 714 715 716 717
                        ret = do_syscall(env,
                                         n,
                                         env->regs[0],
                                         env->regs[1],
                                         env->regs[2],
                                         env->regs[3],
                                         env->regs[4],
                                         env->regs[5],
                                         0, 0);
                        if (ret == -TARGET_ERESTARTSYS) {
                            env->regs[15] -= env->thumb ? 2 : 4;
                        } else if (ret != -TARGET_QEMU_ESIGRETURN) {
                            env->regs[0] = ret;
                        }
718
                    }
B
bellard 已提交
719 720 721 722 723
                } else {
                    goto error;
                }
            }
            break;
724 725 726
        case EXCP_SEMIHOST:
            env->regs[0] = do_arm_semihosting(env);
            break;
B
bellard 已提交
727 728 729
        case EXCP_INTERRUPT:
            /* just indicate that signals should be handled asap */
            break;
B
bellard 已提交
730 731
        case EXCP_PREFETCH_ABORT:
        case EXCP_DATA_ABORT:
732
            addr = env->exception.vaddress;
B
bellard 已提交
733
            {
734
                info.si_signo = TARGET_SIGSEGV;
B
bellard 已提交
735 736 737
                info.si_errno = 0;
                /* XXX: check env->error_code */
                info.si_code = TARGET_SEGV_MAPERR;
B
bellard 已提交
738
                info._sifields._sigfault._addr = addr;
739
                queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
B
bellard 已提交
740 741
            }
            break;
B
bellard 已提交
742
        case EXCP_DEBUG:
743
        excp_debug:
B
bellard 已提交
744 745 746
            {
                int sig;

747
                sig = gdb_handlesig(cs, TARGET_SIGTRAP);
B
bellard 已提交
748 749 750 751 752
                if (sig)
                  {
                    info.si_signo = sig;
                    info.si_errno = 0;
                    info.si_code = TARGET_TRAP_BRKPT;
753
                    queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
B
bellard 已提交
754 755 756
                  }
            }
            break;
757 758 759 760
        case EXCP_KERNEL_TRAP:
            if (do_kernel_trap(env))
              goto error;
            break;
761 762 763
        case EXCP_YIELD:
            /* nothing to do here for user-mode, just resume guest code */
            break;
R
Richard Henderson 已提交
764 765 766
        case EXCP_ATOMIC:
            cpu_exec_step_atomic(cs);
            break;
B
bellard 已提交
767 768
        default:
        error:
P
Paolo Bonzini 已提交
769
            EXCP_DUMP(env, "qemu: unhandled CPU exception 0x%x - aborting\n", trapnr);
B
bellard 已提交
770 771 772 773 774 775
            abort();
        }
        process_pending_signals(env);
    }
}

776 777 778 779 780 781 782
#else

/* AArch64 main loop */
void cpu_loop(CPUARMState *env)
{
    CPUState *cs = CPU(arm_env_get_cpu(env));
    int trapnr, sig;
783
    abi_long ret;
784 785 786 787
    target_siginfo_t info;

    for (;;) {
        cpu_exec_start(cs);
788
        trapnr = cpu_exec(cs);
789
        cpu_exec_end(cs);
790
        process_queued_cpu_work(cs);
791 792 793

        switch (trapnr) {
        case EXCP_SWI:
794 795 796 797 798 799 800 801 802 803 804 805 806 807
            ret = do_syscall(env,
                             env->xregs[8],
                             env->xregs[0],
                             env->xregs[1],
                             env->xregs[2],
                             env->xregs[3],
                             env->xregs[4],
                             env->xregs[5],
                             0, 0);
            if (ret == -TARGET_ERESTARTSYS) {
                env->pc -= 4;
            } else if (ret != -TARGET_QEMU_ESIGRETURN) {
                env->xregs[0] = ret;
            }
808 809 810 811 812
            break;
        case EXCP_INTERRUPT:
            /* just indicate that signals should be handled asap */
            break;
        case EXCP_UDEF:
813
            info.si_signo = TARGET_SIGILL;
814 815 816
            info.si_errno = 0;
            info.si_code = TARGET_ILL_ILLOPN;
            info._sifields._sigfault._addr = env->pc;
817
            queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
818 819 820
            break;
        case EXCP_PREFETCH_ABORT:
        case EXCP_DATA_ABORT:
821
            info.si_signo = TARGET_SIGSEGV;
822 823 824
            info.si_errno = 0;
            /* XXX: check env->error_code */
            info.si_code = TARGET_SEGV_MAPERR;
825
            info._sifields._sigfault._addr = env->exception.vaddress;
826
            queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
827 828 829 830 831 832 833 834
            break;
        case EXCP_DEBUG:
        case EXCP_BKPT:
            sig = gdb_handlesig(cs, TARGET_SIGTRAP);
            if (sig) {
                info.si_signo = sig;
                info.si_errno = 0;
                info.si_code = TARGET_TRAP_BRKPT;
835
                queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
836 837
            }
            break;
838 839 840
        case EXCP_SEMIHOST:
            env->xregs[0] = do_arm_semihosting(env);
            break;
841 842 843
        case EXCP_YIELD:
            /* nothing to do here for user-mode, just resume guest code */
            break;
R
Richard Henderson 已提交
844 845 846
        case EXCP_ATOMIC:
            cpu_exec_step_atomic(cs);
            break;
847
        default:
P
Paolo Bonzini 已提交
848
            EXCP_DUMP(env, "qemu: unhandled CPU exception 0x%x - aborting\n", trapnr);
849 850 851
            abort();
        }
        process_pending_signals(env);
852 853 854 855
        /* Exception return on AArch64 always clears the exclusive monitor,
         * so any return to running guest code implies this.
         */
        env->exclusive_addr = -1;
856 857 858 859
    }
}
#endif /* ndef TARGET_ABI32 */

B
bellard 已提交
860
#endif
B
bellard 已提交
861

862 863
#ifdef TARGET_UNICORE32

864
void cpu_loop(CPUUniCore32State *env)
865
{
866
    CPUState *cs = CPU(uc32_env_get_cpu(env));
867 868 869 870 871
    int trapnr;
    unsigned int n, insn;
    target_siginfo_t info;

    for (;;) {
872
        cpu_exec_start(cs);
873
        trapnr = cpu_exec(cs);
874
        cpu_exec_end(cs);
875 876
        process_queued_cpu_work(cs);

877 878 879 880 881 882 883 884 885 886 887 888 889 890
        switch (trapnr) {
        case UC32_EXCP_PRIV:
            {
                /* system call */
                get_user_u32(insn, env->regs[31] - 4);
                n = insn & 0xffffff;

                if (n >= UC32_SYSCALL_BASE) {
                    /* linux syscall */
                    n -= UC32_SYSCALL_BASE;
                    if (n == UC32_SYSCALL_NR_set_tls) {
                            cpu_set_tls(env, env->regs[0]);
                            env->regs[0] = 0;
                    } else {
891
                        abi_long ret = do_syscall(env,
892 893 894 895 896 897
                                                  n,
                                                  env->regs[0],
                                                  env->regs[1],
                                                  env->regs[2],
                                                  env->regs[3],
                                                  env->regs[4],
898 899
                                                  env->regs[5],
                                                  0, 0);
900 901 902 903 904
                        if (ret == -TARGET_ERESTARTSYS) {
                            env->regs[31] -= 4;
                        } else if (ret != -TARGET_QEMU_ESIGRETURN) {
                            env->regs[0] = ret;
                        }
905 906 907 908 909 910
                    }
                } else {
                    goto error;
                }
            }
            break;
911 912
        case UC32_EXCP_DTRAP:
        case UC32_EXCP_ITRAP:
913
            info.si_signo = TARGET_SIGSEGV;
914 915 916 917
            info.si_errno = 0;
            /* XXX: check env->error_code */
            info.si_code = TARGET_SEGV_MAPERR;
            info._sifields._sigfault._addr = env->cp0.c4_faultaddr;
918
            queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
919 920 921 922 923 924 925 926
            break;
        case EXCP_INTERRUPT:
            /* just indicate that signals should be handled asap */
            break;
        case EXCP_DEBUG:
            {
                int sig;

927
                sig = gdb_handlesig(cs, TARGET_SIGTRAP);
928 929 930 931
                if (sig) {
                    info.si_signo = sig;
                    info.si_errno = 0;
                    info.si_code = TARGET_TRAP_BRKPT;
932
                    queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
933 934 935
                }
            }
            break;
R
Richard Henderson 已提交
936 937 938
        case EXCP_ATOMIC:
            cpu_exec_step_atomic(cs);
            break;
939 940 941 942 943 944 945
        default:
            goto error;
        }
        process_pending_signals(env);
    }

error:
P
Paolo Bonzini 已提交
946
    EXCP_DUMP(env, "qemu: unhandled CPU exception 0x%x - aborting\n", trapnr);
947 948 949 950
    abort();
}
#endif

951
#ifdef TARGET_SPARC
952
#define SPARC64_STACK_BIAS 2047
953

954 955
//#define DEBUG_WIN

956 957
/* WARNING: dealing with register windows _is_ complicated. More info
   can be found at http://www.sics.se/~psm/sparcstack.html */
958 959
static inline int get_reg_index(CPUSPARCState *env, int cwp, int index)
{
960
    index = (index + cwp * 16) % (16 * env->nwindows);
961 962
    /* wrap handling : if cwp is on the last window, then we use the
       registers 'after' the end */
963 964
    if (index < 8 && env->cwp == env->nwindows - 1)
        index += 16 * env->nwindows;
965 966 967
    return index;
}

968 969
/* save the register window 'cwp1' */
static inline void save_window_offset(CPUSPARCState *env, int cwp1)
970
{
971
    unsigned int i;
972
    abi_ulong sp_ptr;
973

974
    sp_ptr = env->regbase[get_reg_index(env, cwp1, 6)];
975 976 977 978
#ifdef TARGET_SPARC64
    if (sp_ptr & 3)
        sp_ptr += SPARC64_STACK_BIAS;
#endif
979
#if defined(DEBUG_WIN)
980 981
    printf("win_overflow: sp_ptr=0x" TARGET_ABI_FMT_lx " save_cwp=%d\n",
           sp_ptr, cwp1);
982
#endif
983
    for(i = 0; i < 16; i++) {
984 985
        /* FIXME - what to do if put_user() fails? */
        put_user_ual(env->regbase[get_reg_index(env, cwp1, 8 + i)], sp_ptr);
986
        sp_ptr += sizeof(abi_ulong);
987
    }
988 989 990 991
}

static void save_window(CPUSPARCState *env)
{
992
#ifndef TARGET_SPARC64
993
    unsigned int new_wim;
994 995 996
    new_wim = ((env->wim >> 1) | (env->wim << (env->nwindows - 1))) &
        ((1LL << env->nwindows) - 1);
    save_window_offset(env, cpu_cwp_dec(env, env->cwp - 2));
997
    env->wim = new_wim;
998
#else
999
    save_window_offset(env, cpu_cwp_dec(env, env->cwp - 2));
1000 1001 1002
    env->cansave++;
    env->canrestore--;
#endif
1003 1004 1005 1006
}

static void restore_window(CPUSPARCState *env)
{
1007 1008 1009 1010
#ifndef TARGET_SPARC64
    unsigned int new_wim;
#endif
    unsigned int i, cwp1;
1011
    abi_ulong sp_ptr;
1012

1013
#ifndef TARGET_SPARC64
1014 1015
    new_wim = ((env->wim << 1) | (env->wim >> (env->nwindows - 1))) &
        ((1LL << env->nwindows) - 1);
1016
#endif
1017

1018
    /* restore the invalid window */
1019
    cwp1 = cpu_cwp_inc(env, env->cwp + 1);
1020
    sp_ptr = env->regbase[get_reg_index(env, cwp1, 6)];
1021 1022 1023 1024
#ifdef TARGET_SPARC64
    if (sp_ptr & 3)
        sp_ptr += SPARC64_STACK_BIAS;
#endif
1025
#if defined(DEBUG_WIN)
1026 1027
    printf("win_underflow: sp_ptr=0x" TARGET_ABI_FMT_lx " load_cwp=%d\n",
           sp_ptr, cwp1);
1028
#endif
1029
    for(i = 0; i < 16; i++) {
1030 1031
        /* FIXME - what to do if get_user() fails? */
        get_user_ual(env->regbase[get_reg_index(env, cwp1, 8 + i)], sp_ptr);
1032
        sp_ptr += sizeof(abi_ulong);
1033
    }
1034 1035
#ifdef TARGET_SPARC64
    env->canrestore++;
1036 1037
    if (env->cleanwin < env->nwindows - 1)
        env->cleanwin++;
1038
    env->cansave--;
1039 1040
#else
    env->wim = new_wim;
1041
#endif
1042 1043 1044 1045 1046
}

static void flush_windows(CPUSPARCState *env)
{
    int offset, cwp1;
1047 1048

    offset = 1;
1049 1050
    for(;;) {
        /* if restore would invoke restore_window(), then we can stop */
1051
        cwp1 = cpu_cwp_inc(env, env->cwp + offset);
1052
#ifndef TARGET_SPARC64
1053 1054
        if (env->wim & (1 << cwp1))
            break;
1055 1056 1057 1058 1059 1060
#else
        if (env->canrestore == 0)
            break;
        env->cansave++;
        env->canrestore--;
#endif
1061
        save_window_offset(env, cwp1);
1062 1063
        offset++;
    }
1064
    cwp1 = cpu_cwp_inc(env, env->cwp + 1);
1065 1066
#ifndef TARGET_SPARC64
    /* set wim so that restore will reload the registers */
1067
    env->wim = 1 << cwp1;
1068
#endif
1069 1070
#if defined(DEBUG_WIN)
    printf("flush_windows: nb=%d\n", offset - 1);
B
bellard 已提交
1071
#endif
1072
}
1073

1074 1075
void cpu_loop (CPUSPARCState *env)
{
1076
    CPUState *cs = CPU(sparc_env_get_cpu(env));
1077 1078
    int trapnr;
    abi_long ret;
A
Anthony Liguori 已提交
1079
    target_siginfo_t info;
1080

1081
    while (1) {
1082
        cpu_exec_start(cs);
1083
        trapnr = cpu_exec(cs);
1084
        cpu_exec_end(cs);
1085
        process_queued_cpu_work(cs);
1086

1087 1088 1089 1090 1091
        /* Compute PSR before exposing state.  */
        if (env->cc_op != CC_OP_FLAGS) {
            cpu_get_psr(env);
        }

1092
        switch (trapnr) {
1093
#ifndef TARGET_SPARC64
1094
        case 0x88:
1095
        case 0x90:
1096
#else
1097
        case 0x110:
1098 1099
        case 0x16d:
#endif
1100
            ret = do_syscall (env, env->gregs[1],
1101 1102
                              env->regwptr[0], env->regwptr[1],
                              env->regwptr[2], env->regwptr[3],
1103 1104
                              env->regwptr[4], env->regwptr[5],
                              0, 0);
1105 1106 1107
            if (ret == -TARGET_ERESTARTSYS || ret == -TARGET_QEMU_ESIGRETURN) {
                break;
            }
1108
            if ((abi_ulong)ret >= (abi_ulong)(-515)) {
1109
#if defined(TARGET_SPARC64) && !defined(TARGET_ABI32)
B
bellard 已提交
1110 1111
                env->xcc |= PSR_CARRY;
#else
1112
                env->psr |= PSR_CARRY;
B
bellard 已提交
1113
#endif
1114 1115
                ret = -ret;
            } else {
1116
#if defined(TARGET_SPARC64) && !defined(TARGET_ABI32)
B
bellard 已提交
1117 1118
                env->xcc &= ~PSR_CARRY;
#else
1119
                env->psr &= ~PSR_CARRY;
B
bellard 已提交
1120
#endif
1121 1122 1123 1124 1125 1126 1127
            }
            env->regwptr[0] = ret;
            /* next instruction */
            env->pc = env->npc;
            env->npc = env->npc + 4;
            break;
        case 0x83: /* flush windows */
1128 1129 1130
#ifdef TARGET_ABI32
        case 0x103:
#endif
1131
            flush_windows(env);
1132 1133 1134 1135
            /* next instruction */
            env->pc = env->npc;
            env->npc = env->npc + 4;
            break;
B
bellard 已提交
1136
#ifndef TARGET_SPARC64
1137 1138 1139 1140 1141 1142
        case TT_WIN_OVF: /* window overflow */
            save_window(env);
            break;
        case TT_WIN_UNF: /* window underflow */
            restore_window(env);
            break;
B
bellard 已提交
1143 1144 1145
        case TT_TFAULT:
        case TT_DFAULT:
            {
1146
                info.si_signo = TARGET_SIGSEGV;
B
bellard 已提交
1147 1148 1149 1150
                info.si_errno = 0;
                /* XXX: check env->error_code */
                info.si_code = TARGET_SEGV_MAPERR;
                info._sifields._sigfault._addr = env->mmuregs[4];
1151
                queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
B
bellard 已提交
1152 1153
            }
            break;
B
bellard 已提交
1154
#else
1155 1156 1157 1158 1159 1160
        case TT_SPILL: /* window overflow */
            save_window(env);
            break;
        case TT_FILL: /* window underflow */
            restore_window(env);
            break;
B
blueswir1 已提交
1161 1162 1163
        case TT_TFAULT:
        case TT_DFAULT:
            {
1164
                info.si_signo = TARGET_SIGSEGV;
B
blueswir1 已提交
1165 1166 1167 1168
                info.si_errno = 0;
                /* XXX: check env->error_code */
                info.si_code = TARGET_SEGV_MAPERR;
                if (trapnr == TT_DFAULT)
1169
                    info._sifields._sigfault._addr = env->dmmu.mmuregs[4];
B
blueswir1 已提交
1170
                else
1171
                    info._sifields._sigfault._addr = cpu_tsptr(env)->tpc;
1172
                queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
B
blueswir1 已提交
1173 1174
            }
            break;
1175
#ifndef TARGET_ABI32
B
blueswir1 已提交
1176 1177 1178 1179 1180 1181 1182 1183
        case 0x16e:
            flush_windows(env);
            sparc64_get_context(env);
            break;
        case 0x16f:
            flush_windows(env);
            sparc64_set_context(env);
            break;
1184
#endif
B
bellard 已提交
1185
#endif
B
bellard 已提交
1186 1187 1188
        case EXCP_INTERRUPT:
            /* just indicate that signals should be handled asap */
            break;
1189 1190 1191 1192 1193 1194
        case TT_ILL_INSN:
            {
                info.si_signo = TARGET_SIGILL;
                info.si_errno = 0;
                info.si_code = TARGET_ILL_ILLOPC;
                info._sifields._sigfault._addr = env->pc;
1195
                queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
1196 1197
            }
            break;
B
bellard 已提交
1198 1199 1200 1201
        case EXCP_DEBUG:
            {
                int sig;

1202
                sig = gdb_handlesig(cs, TARGET_SIGTRAP);
B
bellard 已提交
1203 1204 1205 1206 1207
                if (sig)
                  {
                    info.si_signo = sig;
                    info.si_errno = 0;
                    info.si_code = TARGET_TRAP_BRKPT;
1208
                    queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
B
bellard 已提交
1209 1210 1211
                  }
            }
            break;
R
Richard Henderson 已提交
1212 1213 1214
        case EXCP_ATOMIC:
            cpu_exec_step_atomic(cs);
            break;
1215 1216
        default:
            printf ("Unhandled trap: 0x%x\n", trapnr);
1217
            cpu_dump_state(cs, stderr, fprintf, 0);
1218
            exit(EXIT_FAILURE);
1219 1220 1221
        }
        process_pending_signals (env);
    }
1222 1223 1224 1225
}

#endif

1226
#ifdef TARGET_PPC
1227
static inline uint64_t cpu_ppc_get_tb(CPUPPCState *env)
1228
{
1229
    return cpu_get_host_ticks();
1230
}
1231

1232
uint64_t cpu_ppc_load_tbl(CPUPPCState *env)
1233
{
A
Alexander Graf 已提交
1234
    return cpu_ppc_get_tb(env);
1235
}
1236

1237
uint32_t cpu_ppc_load_tbu(CPUPPCState *env)
1238 1239 1240
{
    return cpu_ppc_get_tb(env) >> 32;
}
1241

1242
uint64_t cpu_ppc_load_atbl(CPUPPCState *env)
1243
{
A
Aurelien Jarno 已提交
1244
    return cpu_ppc_get_tb(env);
1245
}
1246

1247
uint32_t cpu_ppc_load_atbu(CPUPPCState *env)
1248
{
1249
    return cpu_ppc_get_tb(env) >> 32;
1250
}
1251

1252
uint32_t cpu_ppc601_load_rtcu(CPUPPCState *env)
1253 1254
__attribute__ (( alias ("cpu_ppc_load_tbu") ));

1255
uint32_t cpu_ppc601_load_rtcl(CPUPPCState *env)
1256
{
1257
    return cpu_ppc_load_tbl(env) & 0x3FFFFF80;
1258
}
1259

1260
/* XXX: to be fixed */
A
Alexander Graf 已提交
1261
int ppc_dcr_read (ppc_dcr_t *dcr_env, int dcrn, uint32_t *valp)
1262 1263 1264 1265
{
    return -1;
}

A
Alexander Graf 已提交
1266
int ppc_dcr_write (ppc_dcr_t *dcr_env, int dcrn, uint32_t val)
1267 1268 1269 1270
{
    return -1;
}

1271 1272 1273 1274
static int do_store_exclusive(CPUPPCState *env)
{
    target_ulong addr;
    target_ulong page_addr;
1275
    target_ulong val, val2 __attribute__((unused)) = 0;
1276 1277 1278 1279 1280 1281 1282 1283 1284 1285 1286 1287
    int flags;
    int segv = 0;

    addr = env->reserve_ea;
    page_addr = addr & TARGET_PAGE_MASK;
    start_exclusive();
    mmap_lock();
    flags = page_get_flags(page_addr);
    if ((flags & PAGE_READ) == 0) {
        segv = 1;
    } else {
        int reg = env->reserve_info & 0x1f;
1288
        int size = env->reserve_info >> 5;
1289 1290 1291 1292 1293 1294 1295 1296 1297
        int stored = 0;

        if (addr == env->reserve_addr) {
            switch (size) {
            case 1: segv = get_user_u8(val, addr); break;
            case 2: segv = get_user_u16(val, addr); break;
            case 4: segv = get_user_u32(val, addr); break;
#if defined(TARGET_PPC64)
            case 8: segv = get_user_u64(val, addr); break;
1298 1299 1300 1301 1302 1303 1304
            case 16: {
                segv = get_user_u64(val, addr);
                if (!segv) {
                    segv = get_user_u64(val2, addr + 8);
                }
                break;
            }
1305 1306 1307 1308 1309 1310 1311 1312 1313 1314 1315
#endif
            default: abort();
            }
            if (!segv && val == env->reserve_val) {
                val = env->gpr[reg];
                switch (size) {
                case 1: segv = put_user_u8(val, addr); break;
                case 2: segv = put_user_u16(val, addr); break;
                case 4: segv = put_user_u32(val, addr); break;
#if defined(TARGET_PPC64)
                case 8: segv = put_user_u64(val, addr); break;
1316 1317
                case 16: {
                    if (val2 == env->reserve_val2) {
1318 1319 1320 1321 1322 1323
                        if (msr_le) {
                            val2 = val;
                            val = env->gpr[reg+1];
                        } else {
                            val2 = env->gpr[reg+1];
                        }
1324 1325 1326 1327 1328 1329 1330
                        segv = put_user_u64(val, addr);
                        if (!segv) {
                            segv = put_user_u64(val2, addr + 8);
                        }
                    }
                    break;
                }
1331 1332 1333 1334 1335 1336 1337 1338 1339 1340 1341 1342 1343 1344 1345 1346 1347 1348 1349
#endif
                default: abort();
                }
                if (!segv) {
                    stored = 1;
                }
            }
        }
        env->crf[0] = (stored << 1) | xer_so;
        env->reserve_addr = (target_ulong)-1;
    }
    if (!segv) {
        env->nip += 4;
    }
    mmap_unlock();
    end_exclusive();
    return segv;
}

1350 1351
void cpu_loop(CPUPPCState *env)
{
1352
    CPUState *cs = CPU(ppc_env_get_cpu(env));
A
Anthony Liguori 已提交
1353
    target_siginfo_t info;
B
bellard 已提交
1354
    int trapnr;
1355
    target_ulong ret;
1356

1357
    for(;;) {
1358
        cpu_exec_start(cs);
1359
        trapnr = cpu_exec(cs);
1360
        cpu_exec_end(cs);
1361 1362
        process_queued_cpu_work(cs);

1363
        switch(trapnr) {
1364 1365
        case POWERPC_EXCP_NONE:
            /* Just go on */
1366
            break;
1367
        case POWERPC_EXCP_CRITICAL: /* Critical input                        */
1368
            cpu_abort(cs, "Critical interrupt while in user mode. "
1369
                      "Aborting\n");
B
bellard 已提交
1370
            break;
1371
        case POWERPC_EXCP_MCHECK:   /* Machine check exception               */
1372
            cpu_abort(cs, "Machine check exception while in user mode. "
1373 1374 1375 1376
                      "Aborting\n");
            break;
        case POWERPC_EXCP_DSI:      /* Data storage exception                */
            /* XXX: check this. Seems bugged */
1377 1378
            switch (env->error_code & 0xFF000000) {
            case 0x40000000:
1379
            case 0x42000000:
B
bellard 已提交
1380 1381 1382 1383
                info.si_signo = TARGET_SIGSEGV;
                info.si_errno = 0;
                info.si_code = TARGET_SEGV_MAPERR;
                break;
1384
            case 0x04000000:
B
bellard 已提交
1385 1386 1387 1388
                info.si_signo = TARGET_SIGILL;
                info.si_errno = 0;
                info.si_code = TARGET_ILL_ILLADR;
                break;
1389
            case 0x08000000:
B
bellard 已提交
1390 1391 1392 1393 1394 1395
                info.si_signo = TARGET_SIGSEGV;
                info.si_errno = 0;
                info.si_code = TARGET_SEGV_ACCERR;
                break;
            default:
                /* Let's send a regular segfault... */
1396 1397
                EXCP_DUMP(env, "Invalid segfault errno (%02x)\n",
                          env->error_code);
B
bellard 已提交
1398 1399 1400 1401 1402
                info.si_signo = TARGET_SIGSEGV;
                info.si_errno = 0;
                info.si_code = TARGET_SEGV_MAPERR;
                break;
            }
1403
            info._sifields._sigfault._addr = env->nip;
1404
            queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
1405
            break;
1406 1407
        case POWERPC_EXCP_ISI:      /* Instruction storage exception         */
            /* XXX: check this */
1408 1409
            switch (env->error_code & 0xFF000000) {
            case 0x40000000:
B
bellard 已提交
1410
                info.si_signo = TARGET_SIGSEGV;
1411
            info.si_errno = 0;
B
bellard 已提交
1412 1413
                info.si_code = TARGET_SEGV_MAPERR;
                break;
1414 1415
            case 0x10000000:
            case 0x08000000:
B
bellard 已提交
1416 1417 1418 1419 1420 1421
                info.si_signo = TARGET_SIGSEGV;
                info.si_errno = 0;
                info.si_code = TARGET_SEGV_ACCERR;
                break;
            default:
                /* Let's send a regular segfault... */
1422 1423
                EXCP_DUMP(env, "Invalid segfault errno (%02x)\n",
                          env->error_code);
B
bellard 已提交
1424 1425 1426 1427 1428 1429
                info.si_signo = TARGET_SIGSEGV;
                info.si_errno = 0;
                info.si_code = TARGET_SEGV_MAPERR;
                break;
            }
            info._sifields._sigfault._addr = env->nip - 4;
1430
            queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
1431
            break;
1432
        case POWERPC_EXCP_EXTERNAL: /* External input                        */
1433
            cpu_abort(cs, "External interrupt while in user mode. "
1434 1435 1436 1437
                      "Aborting\n");
            break;
        case POWERPC_EXCP_ALIGN:    /* Alignment exception                   */
            /* XXX: check this */
B
bellard 已提交
1438
            info.si_signo = TARGET_SIGBUS;
1439
            info.si_errno = 0;
B
bellard 已提交
1440
            info.si_code = TARGET_BUS_ADRALN;
1441
            info._sifields._sigfault._addr = env->nip;
1442
            queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
1443
            break;
1444
        case POWERPC_EXCP_PROGRAM:  /* Program exception                     */
1445
        case POWERPC_EXCP_HV_EMU:   /* HV emulation                          */
1446
            /* XXX: check this */
B
bellard 已提交
1447
            switch (env->error_code & ~0xF) {
1448
            case POWERPC_EXCP_FP:
B
bellard 已提交
1449 1450 1451
                info.si_signo = TARGET_SIGFPE;
                info.si_errno = 0;
                switch (env->error_code & 0xF) {
1452
                case POWERPC_EXCP_FP_OX:
B
bellard 已提交
1453 1454
                    info.si_code = TARGET_FPE_FLTOVF;
                    break;
1455
                case POWERPC_EXCP_FP_UX:
B
bellard 已提交
1456 1457
                    info.si_code = TARGET_FPE_FLTUND;
                    break;
1458 1459
                case POWERPC_EXCP_FP_ZX:
                case POWERPC_EXCP_FP_VXZDZ:
B
bellard 已提交
1460 1461
                    info.si_code = TARGET_FPE_FLTDIV;
                    break;
1462
                case POWERPC_EXCP_FP_XX:
B
bellard 已提交
1463 1464
                    info.si_code = TARGET_FPE_FLTRES;
                    break;
1465
                case POWERPC_EXCP_FP_VXSOFT:
B
bellard 已提交
1466 1467
                    info.si_code = TARGET_FPE_FLTINV;
                    break;
1468
                case POWERPC_EXCP_FP_VXSNAN:
1469 1470 1471 1472 1473 1474
                case POWERPC_EXCP_FP_VXISI:
                case POWERPC_EXCP_FP_VXIDI:
                case POWERPC_EXCP_FP_VXIMZ:
                case POWERPC_EXCP_FP_VXVC:
                case POWERPC_EXCP_FP_VXSQRT:
                case POWERPC_EXCP_FP_VXCVI:
B
bellard 已提交
1475 1476 1477
                    info.si_code = TARGET_FPE_FLTSUB;
                    break;
                default:
1478 1479 1480
                    EXCP_DUMP(env, "Unknown floating point exception (%02x)\n",
                              env->error_code);
                    break;
B
bellard 已提交
1481
                }
1482 1483
                break;
            case POWERPC_EXCP_INVAL:
B
bellard 已提交
1484 1485 1486
                info.si_signo = TARGET_SIGILL;
                info.si_errno = 0;
                switch (env->error_code & 0xF) {
1487
                case POWERPC_EXCP_INVAL_INVAL:
B
bellard 已提交
1488 1489
                    info.si_code = TARGET_ILL_ILLOPC;
                    break;
1490
                case POWERPC_EXCP_INVAL_LSWX:
1491
                    info.si_code = TARGET_ILL_ILLOPN;
B
bellard 已提交
1492
                    break;
1493
                case POWERPC_EXCP_INVAL_SPR:
B
bellard 已提交
1494 1495
                    info.si_code = TARGET_ILL_PRVREG;
                    break;
1496
                case POWERPC_EXCP_INVAL_FP:
B
bellard 已提交
1497 1498 1499
                    info.si_code = TARGET_ILL_COPROC;
                    break;
                default:
1500 1501
                    EXCP_DUMP(env, "Unknown invalid operation (%02x)\n",
                              env->error_code & 0xF);
B
bellard 已提交
1502 1503 1504 1505
                    info.si_code = TARGET_ILL_ILLADR;
                    break;
                }
                break;
1506
            case POWERPC_EXCP_PRIV:
B
bellard 已提交
1507 1508 1509
                info.si_signo = TARGET_SIGILL;
                info.si_errno = 0;
                switch (env->error_code & 0xF) {
1510
                case POWERPC_EXCP_PRIV_OPC:
B
bellard 已提交
1511 1512
                    info.si_code = TARGET_ILL_PRVOPC;
                    break;
1513
                case POWERPC_EXCP_PRIV_REG:
B
bellard 已提交
1514
                    info.si_code = TARGET_ILL_PRVREG;
1515
                    break;
B
bellard 已提交
1516
                default:
1517 1518
                    EXCP_DUMP(env, "Unknown privilege violation (%02x)\n",
                              env->error_code & 0xF);
B
bellard 已提交
1519 1520 1521 1522
                    info.si_code = TARGET_ILL_PRVOPC;
                    break;
                }
                break;
1523
            case POWERPC_EXCP_TRAP:
1524
                cpu_abort(cs, "Tried to call a TRAP\n");
1525
                break;
B
bellard 已提交
1526 1527
            default:
                /* Should not happen ! */
1528
                cpu_abort(cs, "Unknown program exception (%02x)\n",
1529 1530
                          env->error_code);
                break;
B
bellard 已提交
1531
            }
1532
            info._sifields._sigfault._addr = env->nip;
1533
            queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
1534
            break;
1535
        case POWERPC_EXCP_FPU:      /* Floating-point unavailable exception  */
B
bellard 已提交
1536
            info.si_signo = TARGET_SIGILL;
1537
            info.si_errno = 0;
B
bellard 已提交
1538
            info.si_code = TARGET_ILL_COPROC;
1539
            info._sifields._sigfault._addr = env->nip;
1540
            queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
1541
            break;
1542
        case POWERPC_EXCP_SYSCALL:  /* System call exception                 */
1543
            cpu_abort(cs, "Syscall exception while in user mode. "
1544
                      "Aborting\n");
B
bellard 已提交
1545
            break;
1546 1547 1548 1549
        case POWERPC_EXCP_APU:      /* Auxiliary processor unavailable       */
            info.si_signo = TARGET_SIGILL;
            info.si_errno = 0;
            info.si_code = TARGET_ILL_COPROC;
1550
            info._sifields._sigfault._addr = env->nip;
1551
            queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
B
bellard 已提交
1552
            break;
1553
        case POWERPC_EXCP_DECR:     /* Decrementer exception                 */
1554
            cpu_abort(cs, "Decrementer interrupt while in user mode. "
1555
                      "Aborting\n");
B
bellard 已提交
1556
            break;
1557
        case POWERPC_EXCP_FIT:      /* Fixed-interval timer interrupt        */
1558
            cpu_abort(cs, "Fix interval timer interrupt while in user mode. "
1559 1560 1561
                      "Aborting\n");
            break;
        case POWERPC_EXCP_WDT:      /* Watchdog timer interrupt              */
1562
            cpu_abort(cs, "Watchdog timer interrupt while in user mode. "
1563 1564 1565
                      "Aborting\n");
            break;
        case POWERPC_EXCP_DTLB:     /* Data TLB error                        */
1566
            cpu_abort(cs, "Data TLB exception while in user mode. "
1567 1568 1569
                      "Aborting\n");
            break;
        case POWERPC_EXCP_ITLB:     /* Instruction TLB error                 */
1570
            cpu_abort(cs, "Instruction TLB exception while in user mode. "
1571 1572 1573 1574 1575 1576
                      "Aborting\n");
            break;
        case POWERPC_EXCP_SPEU:     /* SPE/embedded floating-point unavail.  */
            info.si_signo = TARGET_SIGILL;
            info.si_errno = 0;
            info.si_code = TARGET_ILL_COPROC;
1577
            info._sifields._sigfault._addr = env->nip;
1578
            queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
1579 1580
            break;
        case POWERPC_EXCP_EFPDI:    /* Embedded floating-point data IRQ      */
1581
            cpu_abort(cs, "Embedded floating-point data IRQ not handled\n");
1582 1583
            break;
        case POWERPC_EXCP_EFPRI:    /* Embedded floating-point round IRQ     */
1584
            cpu_abort(cs, "Embedded floating-point round IRQ not handled\n");
1585 1586
            break;
        case POWERPC_EXCP_EPERFM:   /* Embedded performance monitor IRQ      */
1587
            cpu_abort(cs, "Performance monitor exception not handled\n");
1588 1589
            break;
        case POWERPC_EXCP_DOORI:    /* Embedded doorbell interrupt           */
1590
            cpu_abort(cs, "Doorbell interrupt while in user mode. "
1591 1592 1593
                       "Aborting\n");
            break;
        case POWERPC_EXCP_DOORCI:   /* Embedded doorbell critical interrupt  */
1594
            cpu_abort(cs, "Doorbell critical interrupt while in user mode. "
1595 1596 1597
                      "Aborting\n");
            break;
        case POWERPC_EXCP_RESET:    /* System reset exception                */
1598
            cpu_abort(cs, "Reset interrupt while in user mode. "
1599 1600 1601
                      "Aborting\n");
            break;
        case POWERPC_EXCP_DSEG:     /* Data segment exception                */
1602
            cpu_abort(cs, "Data segment exception while in user mode. "
1603 1604 1605
                      "Aborting\n");
            break;
        case POWERPC_EXCP_ISEG:     /* Instruction segment exception         */
1606
            cpu_abort(cs, "Instruction segment exception "
1607 1608
                      "while in user mode. Aborting\n");
            break;
1609
        /* PowerPC 64 with hypervisor mode support */
1610
        case POWERPC_EXCP_HDECR:    /* Hypervisor decrementer exception      */
1611
            cpu_abort(cs, "Hypervisor decrementer interrupt "
1612 1613 1614 1615 1616 1617 1618
                      "while in user mode. Aborting\n");
            break;
        case POWERPC_EXCP_TRACE:    /* Trace exception                       */
            /* Nothing to do:
             * we use this exception to emulate step-by-step execution mode.
             */
            break;
1619
        /* PowerPC 64 with hypervisor mode support */
1620
        case POWERPC_EXCP_HDSI:     /* Hypervisor data storage exception     */
1621
            cpu_abort(cs, "Hypervisor data storage exception "
1622 1623 1624
                      "while in user mode. Aborting\n");
            break;
        case POWERPC_EXCP_HISI:     /* Hypervisor instruction storage excp   */
1625
            cpu_abort(cs, "Hypervisor instruction storage exception "
1626 1627 1628
                      "while in user mode. Aborting\n");
            break;
        case POWERPC_EXCP_HDSEG:    /* Hypervisor data segment exception     */
1629
            cpu_abort(cs, "Hypervisor data segment exception "
1630 1631 1632
                      "while in user mode. Aborting\n");
            break;
        case POWERPC_EXCP_HISEG:    /* Hypervisor instruction segment excp   */
1633
            cpu_abort(cs, "Hypervisor instruction segment exception "
1634 1635 1636 1637 1638 1639
                      "while in user mode. Aborting\n");
            break;
        case POWERPC_EXCP_VPU:      /* Vector unavailable exception          */
            info.si_signo = TARGET_SIGILL;
            info.si_errno = 0;
            info.si_code = TARGET_ILL_COPROC;
1640
            info._sifields._sigfault._addr = env->nip;
1641
            queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
1642 1643
            break;
        case POWERPC_EXCP_PIT:      /* Programmable interval timer IRQ       */
1644
            cpu_abort(cs, "Programmable interval timer interrupt "
1645 1646 1647
                      "while in user mode. Aborting\n");
            break;
        case POWERPC_EXCP_IO:       /* IO error exception                    */
1648
            cpu_abort(cs, "IO error exception while in user mode. "
1649 1650 1651
                      "Aborting\n");
            break;
        case POWERPC_EXCP_RUNM:     /* Run mode exception                    */
1652
            cpu_abort(cs, "Run mode exception while in user mode. "
1653 1654 1655
                      "Aborting\n");
            break;
        case POWERPC_EXCP_EMUL:     /* Emulation trap exception              */
1656
            cpu_abort(cs, "Emulation trap exception not handled\n");
1657 1658
            break;
        case POWERPC_EXCP_IFTLB:    /* Instruction fetch TLB error           */
1659
            cpu_abort(cs, "Instruction fetch TLB exception "
1660 1661 1662
                      "while in user-mode. Aborting");
            break;
        case POWERPC_EXCP_DLTLB:    /* Data load TLB miss                    */
1663
            cpu_abort(cs, "Data load TLB exception while in user-mode. "
1664 1665 1666
                      "Aborting");
            break;
        case POWERPC_EXCP_DSTLB:    /* Data store TLB miss                   */
1667
            cpu_abort(cs, "Data store TLB exception while in user-mode. "
1668 1669 1670
                      "Aborting");
            break;
        case POWERPC_EXCP_FPA:      /* Floating-point assist exception       */
1671
            cpu_abort(cs, "Floating-point assist exception not handled\n");
1672 1673
            break;
        case POWERPC_EXCP_IABR:     /* Instruction address breakpoint        */
1674
            cpu_abort(cs, "Instruction address breakpoint exception "
1675 1676 1677
                      "not handled\n");
            break;
        case POWERPC_EXCP_SMI:      /* System management interrupt           */
1678
            cpu_abort(cs, "System management interrupt while in user mode. "
1679 1680 1681
                      "Aborting\n");
            break;
        case POWERPC_EXCP_THERM:    /* Thermal interrupt                     */
1682
            cpu_abort(cs, "Thermal interrupt interrupt while in user mode. "
1683 1684 1685
                      "Aborting\n");
            break;
        case POWERPC_EXCP_PERFM:   /* Embedded performance monitor IRQ      */
1686
            cpu_abort(cs, "Performance monitor exception not handled\n");
1687 1688
            break;
        case POWERPC_EXCP_VPUA:     /* Vector assist exception               */
1689
            cpu_abort(cs, "Vector assist exception not handled\n");
1690 1691
            break;
        case POWERPC_EXCP_SOFTP:    /* Soft patch exception                  */
1692
            cpu_abort(cs, "Soft patch exception not handled\n");
1693 1694
            break;
        case POWERPC_EXCP_MAINT:    /* Maintenance exception                 */
1695
            cpu_abort(cs, "Maintenance exception while in user mode. "
1696 1697 1698 1699 1700 1701 1702 1703 1704 1705 1706 1707 1708 1709 1710 1711 1712
                      "Aborting\n");
            break;
        case POWERPC_EXCP_STOP:     /* stop translation                      */
            /* We did invalidate the instruction cache. Go on */
            break;
        case POWERPC_EXCP_BRANCH:   /* branch instruction:                   */
            /* We just stopped because of a branch. Go on */
            break;
        case POWERPC_EXCP_SYSCALL_USER:
            /* system call in user-mode emulation */
            /* WARNING:
             * PPC ABI uses overflow flag in cr0 to signal an error
             * in syscalls.
             */
            env->crf[0] &= ~0x1;
            ret = do_syscall(env, env->gpr[0], env->gpr[3], env->gpr[4],
                             env->gpr[5], env->gpr[6], env->gpr[7],
1713
                             env->gpr[8], 0, 0);
1714 1715 1716
            if (ret == -TARGET_ERESTARTSYS) {
                break;
            }
1717
            if (ret == (target_ulong)(-TARGET_QEMU_ESIGRETURN)) {
N
Nathan Froyd 已提交
1718 1719 1720 1721
                /* Returning from a successful sigreturn syscall.
                   Avoid corrupting register state.  */
                break;
            }
1722
            env->nip += 4;
1723
            if (ret > (target_ulong)(-515)) {
1724 1725
                env->crf[0] |= 0x1;
                ret = -ret;
B
bellard 已提交
1726
            }
1727 1728
            env->gpr[3] = ret;
            break;
1729 1730 1731 1732 1733 1734
        case POWERPC_EXCP_STCX:
            if (do_store_exclusive(env)) {
                info.si_signo = TARGET_SIGSEGV;
                info.si_errno = 0;
                info.si_code = TARGET_SEGV_MAPERR;
                info._sifields._sigfault._addr = env->nip;
1735
                queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
1736 1737
            }
            break;
A
aurel32 已提交
1738 1739 1740 1741
        case EXCP_DEBUG:
            {
                int sig;

1742
                sig = gdb_handlesig(cs, TARGET_SIGTRAP);
A
aurel32 已提交
1743 1744 1745 1746
                if (sig) {
                    info.si_signo = sig;
                    info.si_errno = 0;
                    info.si_code = TARGET_TRAP_BRKPT;
1747
                    queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
A
aurel32 已提交
1748 1749 1750
                  }
            }
            break;
1751 1752 1753
        case EXCP_INTERRUPT:
            /* just indicate that signals should be handled asap */
            break;
R
Richard Henderson 已提交
1754 1755 1756
        case EXCP_ATOMIC:
            cpu_exec_step_atomic(cs);
            break;
1757
        default:
1758
            cpu_abort(cs, "Unknown exception 0x%x. Aborting\n", trapnr);
1759
            break;
1760 1761 1762 1763 1764 1765
        }
        process_pending_signals(env);
    }
}
#endif

B
bellard 已提交
1766 1767
#ifdef TARGET_MIPS

1768 1769
# ifdef TARGET_ABI_MIPSO32
#  define MIPS_SYS(name, args) args,
B
bellard 已提交
1770
static const uint8_t mips_syscall_args[] = {
1771
	MIPS_SYS(sys_syscall	, 8)	/* 4000 */
B
bellard 已提交
1772 1773 1774 1775 1776 1777 1778 1779 1780 1781 1782 1783 1784 1785 1786 1787 1788 1789 1790 1791 1792
	MIPS_SYS(sys_exit	, 1)
	MIPS_SYS(sys_fork	, 0)
	MIPS_SYS(sys_read	, 3)
	MIPS_SYS(sys_write	, 3)
	MIPS_SYS(sys_open	, 3)	/* 4005 */
	MIPS_SYS(sys_close	, 1)
	MIPS_SYS(sys_waitpid	, 3)
	MIPS_SYS(sys_creat	, 2)
	MIPS_SYS(sys_link	, 2)
	MIPS_SYS(sys_unlink	, 1)	/* 4010 */
	MIPS_SYS(sys_execve	, 0)
	MIPS_SYS(sys_chdir	, 1)
	MIPS_SYS(sys_time	, 1)
	MIPS_SYS(sys_mknod	, 3)
	MIPS_SYS(sys_chmod	, 2)	/* 4015 */
	MIPS_SYS(sys_lchown	, 3)
	MIPS_SYS(sys_ni_syscall	, 0)
	MIPS_SYS(sys_ni_syscall	, 0)	/* was sys_stat */
	MIPS_SYS(sys_lseek	, 3)
	MIPS_SYS(sys_getpid	, 0)	/* 4020 */
	MIPS_SYS(sys_mount	, 5)
1793
	MIPS_SYS(sys_umount	, 1)
B
bellard 已提交
1794 1795 1796 1797 1798 1799 1800 1801 1802 1803 1804 1805 1806 1807 1808 1809 1810 1811 1812 1813 1814 1815 1816 1817 1818 1819 1820 1821 1822
	MIPS_SYS(sys_setuid	, 1)
	MIPS_SYS(sys_getuid	, 0)
	MIPS_SYS(sys_stime	, 1)	/* 4025 */
	MIPS_SYS(sys_ptrace	, 4)
	MIPS_SYS(sys_alarm	, 1)
	MIPS_SYS(sys_ni_syscall	, 0)	/* was sys_fstat */
	MIPS_SYS(sys_pause	, 0)
	MIPS_SYS(sys_utime	, 2)	/* 4030 */
	MIPS_SYS(sys_ni_syscall	, 0)
	MIPS_SYS(sys_ni_syscall	, 0)
	MIPS_SYS(sys_access	, 2)
	MIPS_SYS(sys_nice	, 1)
	MIPS_SYS(sys_ni_syscall	, 0)	/* 4035 */
	MIPS_SYS(sys_sync	, 0)
	MIPS_SYS(sys_kill	, 2)
	MIPS_SYS(sys_rename	, 2)
	MIPS_SYS(sys_mkdir	, 2)
	MIPS_SYS(sys_rmdir	, 1)	/* 4040 */
	MIPS_SYS(sys_dup		, 1)
	MIPS_SYS(sys_pipe	, 0)
	MIPS_SYS(sys_times	, 1)
	MIPS_SYS(sys_ni_syscall	, 0)
	MIPS_SYS(sys_brk		, 1)	/* 4045 */
	MIPS_SYS(sys_setgid	, 1)
	MIPS_SYS(sys_getgid	, 0)
	MIPS_SYS(sys_ni_syscall	, 0)	/* was signal(2) */
	MIPS_SYS(sys_geteuid	, 0)
	MIPS_SYS(sys_getegid	, 0)	/* 4050 */
	MIPS_SYS(sys_acct	, 0)
1823
	MIPS_SYS(sys_umount2	, 2)
B
bellard 已提交
1824 1825 1826 1827 1828 1829 1830 1831 1832 1833 1834 1835 1836 1837 1838 1839 1840 1841 1842 1843 1844 1845 1846 1847 1848 1849 1850 1851 1852 1853 1854 1855 1856 1857 1858 1859 1860 1861 1862 1863 1864 1865 1866 1867 1868 1869 1870 1871 1872 1873 1874 1875 1876 1877 1878 1879 1880 1881 1882 1883 1884 1885 1886 1887 1888 1889 1890
	MIPS_SYS(sys_ni_syscall	, 0)
	MIPS_SYS(sys_ioctl	, 3)
	MIPS_SYS(sys_fcntl	, 3)	/* 4055 */
	MIPS_SYS(sys_ni_syscall	, 2)
	MIPS_SYS(sys_setpgid	, 2)
	MIPS_SYS(sys_ni_syscall	, 0)
	MIPS_SYS(sys_olduname	, 1)
	MIPS_SYS(sys_umask	, 1)	/* 4060 */
	MIPS_SYS(sys_chroot	, 1)
	MIPS_SYS(sys_ustat	, 2)
	MIPS_SYS(sys_dup2	, 2)
	MIPS_SYS(sys_getppid	, 0)
	MIPS_SYS(sys_getpgrp	, 0)	/* 4065 */
	MIPS_SYS(sys_setsid	, 0)
	MIPS_SYS(sys_sigaction	, 3)
	MIPS_SYS(sys_sgetmask	, 0)
	MIPS_SYS(sys_ssetmask	, 1)
	MIPS_SYS(sys_setreuid	, 2)	/* 4070 */
	MIPS_SYS(sys_setregid	, 2)
	MIPS_SYS(sys_sigsuspend	, 0)
	MIPS_SYS(sys_sigpending	, 1)
	MIPS_SYS(sys_sethostname	, 2)
	MIPS_SYS(sys_setrlimit	, 2)	/* 4075 */
	MIPS_SYS(sys_getrlimit	, 2)
	MIPS_SYS(sys_getrusage	, 2)
	MIPS_SYS(sys_gettimeofday, 2)
	MIPS_SYS(sys_settimeofday, 2)
	MIPS_SYS(sys_getgroups	, 2)	/* 4080 */
	MIPS_SYS(sys_setgroups	, 2)
	MIPS_SYS(sys_ni_syscall	, 0)	/* old_select */
	MIPS_SYS(sys_symlink	, 2)
	MIPS_SYS(sys_ni_syscall	, 0)	/* was sys_lstat */
	MIPS_SYS(sys_readlink	, 3)	/* 4085 */
	MIPS_SYS(sys_uselib	, 1)
	MIPS_SYS(sys_swapon	, 2)
	MIPS_SYS(sys_reboot	, 3)
	MIPS_SYS(old_readdir	, 3)
	MIPS_SYS(old_mmap	, 6)	/* 4090 */
	MIPS_SYS(sys_munmap	, 2)
	MIPS_SYS(sys_truncate	, 2)
	MIPS_SYS(sys_ftruncate	, 2)
	MIPS_SYS(sys_fchmod	, 2)
	MIPS_SYS(sys_fchown	, 3)	/* 4095 */
	MIPS_SYS(sys_getpriority	, 2)
	MIPS_SYS(sys_setpriority	, 3)
	MIPS_SYS(sys_ni_syscall	, 0)
	MIPS_SYS(sys_statfs	, 2)
	MIPS_SYS(sys_fstatfs	, 2)	/* 4100 */
	MIPS_SYS(sys_ni_syscall	, 0)	/* was ioperm(2) */
	MIPS_SYS(sys_socketcall	, 2)
	MIPS_SYS(sys_syslog	, 3)
	MIPS_SYS(sys_setitimer	, 3)
	MIPS_SYS(sys_getitimer	, 2)	/* 4105 */
	MIPS_SYS(sys_newstat	, 2)
	MIPS_SYS(sys_newlstat	, 2)
	MIPS_SYS(sys_newfstat	, 2)
	MIPS_SYS(sys_uname	, 1)
	MIPS_SYS(sys_ni_syscall	, 0)	/* 4110 was iopl(2) */
	MIPS_SYS(sys_vhangup	, 0)
	MIPS_SYS(sys_ni_syscall	, 0)	/* was sys_idle() */
	MIPS_SYS(sys_ni_syscall	, 0)	/* was sys_vm86 */
	MIPS_SYS(sys_wait4	, 4)
	MIPS_SYS(sys_swapoff	, 1)	/* 4115 */
	MIPS_SYS(sys_sysinfo	, 1)
	MIPS_SYS(sys_ipc		, 6)
	MIPS_SYS(sys_fsync	, 1)
	MIPS_SYS(sys_sigreturn	, 0)
P
Paul Brook 已提交
1891
	MIPS_SYS(sys_clone	, 6)	/* 4120 */
B
bellard 已提交
1892 1893 1894 1895 1896 1897 1898 1899 1900 1901 1902 1903 1904 1905 1906 1907 1908 1909 1910 1911 1912 1913 1914 1915 1916 1917 1918 1919 1920 1921 1922 1923 1924 1925 1926 1927 1928 1929 1930 1931 1932 1933 1934 1935 1936 1937
	MIPS_SYS(sys_setdomainname, 2)
	MIPS_SYS(sys_newuname	, 1)
	MIPS_SYS(sys_ni_syscall	, 0)	/* sys_modify_ldt */
	MIPS_SYS(sys_adjtimex	, 1)
	MIPS_SYS(sys_mprotect	, 3)	/* 4125 */
	MIPS_SYS(sys_sigprocmask	, 3)
	MIPS_SYS(sys_ni_syscall	, 0)	/* was create_module */
	MIPS_SYS(sys_init_module	, 5)
	MIPS_SYS(sys_delete_module, 1)
	MIPS_SYS(sys_ni_syscall	, 0)	/* 4130	was get_kernel_syms */
	MIPS_SYS(sys_quotactl	, 0)
	MIPS_SYS(sys_getpgid	, 1)
	MIPS_SYS(sys_fchdir	, 1)
	MIPS_SYS(sys_bdflush	, 2)
	MIPS_SYS(sys_sysfs	, 3)	/* 4135 */
	MIPS_SYS(sys_personality	, 1)
	MIPS_SYS(sys_ni_syscall	, 0)	/* for afs_syscall */
	MIPS_SYS(sys_setfsuid	, 1)
	MIPS_SYS(sys_setfsgid	, 1)
	MIPS_SYS(sys_llseek	, 5)	/* 4140 */
	MIPS_SYS(sys_getdents	, 3)
	MIPS_SYS(sys_select	, 5)
	MIPS_SYS(sys_flock	, 2)
	MIPS_SYS(sys_msync	, 3)
	MIPS_SYS(sys_readv	, 3)	/* 4145 */
	MIPS_SYS(sys_writev	, 3)
	MIPS_SYS(sys_cacheflush	, 3)
	MIPS_SYS(sys_cachectl	, 3)
	MIPS_SYS(sys_sysmips	, 4)
	MIPS_SYS(sys_ni_syscall	, 0)	/* 4150 */
	MIPS_SYS(sys_getsid	, 1)
	MIPS_SYS(sys_fdatasync	, 0)
	MIPS_SYS(sys_sysctl	, 1)
	MIPS_SYS(sys_mlock	, 2)
	MIPS_SYS(sys_munlock	, 2)	/* 4155 */
	MIPS_SYS(sys_mlockall	, 1)
	MIPS_SYS(sys_munlockall	, 0)
	MIPS_SYS(sys_sched_setparam, 2)
	MIPS_SYS(sys_sched_getparam, 2)
	MIPS_SYS(sys_sched_setscheduler, 3)	/* 4160 */
	MIPS_SYS(sys_sched_getscheduler, 1)
	MIPS_SYS(sys_sched_yield	, 0)
	MIPS_SYS(sys_sched_get_priority_max, 1)
	MIPS_SYS(sys_sched_get_priority_min, 1)
	MIPS_SYS(sys_sched_rr_get_interval, 2)	/* 4165 */
	MIPS_SYS(sys_nanosleep,	2)
1938
	MIPS_SYS(sys_mremap	, 5)
B
bellard 已提交
1939 1940 1941 1942 1943 1944 1945 1946 1947 1948 1949 1950 1951 1952 1953 1954 1955 1956 1957 1958 1959 1960 1961 1962 1963 1964 1965 1966 1967 1968 1969 1970 1971 1972 1973 1974 1975 1976
	MIPS_SYS(sys_accept	, 3)
	MIPS_SYS(sys_bind	, 3)
	MIPS_SYS(sys_connect	, 3)	/* 4170 */
	MIPS_SYS(sys_getpeername	, 3)
	MIPS_SYS(sys_getsockname	, 3)
	MIPS_SYS(sys_getsockopt	, 5)
	MIPS_SYS(sys_listen	, 2)
	MIPS_SYS(sys_recv	, 4)	/* 4175 */
	MIPS_SYS(sys_recvfrom	, 6)
	MIPS_SYS(sys_recvmsg	, 3)
	MIPS_SYS(sys_send	, 4)
	MIPS_SYS(sys_sendmsg	, 3)
	MIPS_SYS(sys_sendto	, 6)	/* 4180 */
	MIPS_SYS(sys_setsockopt	, 5)
	MIPS_SYS(sys_shutdown	, 2)
	MIPS_SYS(sys_socket	, 3)
	MIPS_SYS(sys_socketpair	, 4)
	MIPS_SYS(sys_setresuid	, 3)	/* 4185 */
	MIPS_SYS(sys_getresuid	, 3)
	MIPS_SYS(sys_ni_syscall	, 0)	/* was sys_query_module */
	MIPS_SYS(sys_poll	, 3)
	MIPS_SYS(sys_nfsservctl	, 3)
	MIPS_SYS(sys_setresgid	, 3)	/* 4190 */
	MIPS_SYS(sys_getresgid	, 3)
	MIPS_SYS(sys_prctl	, 5)
	MIPS_SYS(sys_rt_sigreturn, 0)
	MIPS_SYS(sys_rt_sigaction, 4)
	MIPS_SYS(sys_rt_sigprocmask, 4)	/* 4195 */
	MIPS_SYS(sys_rt_sigpending, 2)
	MIPS_SYS(sys_rt_sigtimedwait, 4)
	MIPS_SYS(sys_rt_sigqueueinfo, 3)
	MIPS_SYS(sys_rt_sigsuspend, 0)
	MIPS_SYS(sys_pread64	, 6)	/* 4200 */
	MIPS_SYS(sys_pwrite64	, 6)
	MIPS_SYS(sys_chown	, 3)
	MIPS_SYS(sys_getcwd	, 2)
	MIPS_SYS(sys_capget	, 2)
	MIPS_SYS(sys_capset	, 2)	/* 4205 */
W
Wesley W. Terpstra 已提交
1977
	MIPS_SYS(sys_sigaltstack	, 2)
B
bellard 已提交
1978 1979 1980 1981 1982 1983 1984 1985 1986 1987 1988 1989 1990 1991 1992 1993 1994 1995 1996 1997 1998 1999 2000 2001 2002 2003 2004 2005 2006 2007 2008
	MIPS_SYS(sys_sendfile	, 4)
	MIPS_SYS(sys_ni_syscall	, 0)
	MIPS_SYS(sys_ni_syscall	, 0)
	MIPS_SYS(sys_mmap2	, 6)	/* 4210 */
	MIPS_SYS(sys_truncate64	, 4)
	MIPS_SYS(sys_ftruncate64	, 4)
	MIPS_SYS(sys_stat64	, 2)
	MIPS_SYS(sys_lstat64	, 2)
	MIPS_SYS(sys_fstat64	, 2)	/* 4215 */
	MIPS_SYS(sys_pivot_root	, 2)
	MIPS_SYS(sys_mincore	, 3)
	MIPS_SYS(sys_madvise	, 3)
	MIPS_SYS(sys_getdents64	, 3)
	MIPS_SYS(sys_fcntl64	, 3)	/* 4220 */
	MIPS_SYS(sys_ni_syscall	, 0)
	MIPS_SYS(sys_gettid	, 0)
	MIPS_SYS(sys_readahead	, 5)
	MIPS_SYS(sys_setxattr	, 5)
	MIPS_SYS(sys_lsetxattr	, 5)	/* 4225 */
	MIPS_SYS(sys_fsetxattr	, 5)
	MIPS_SYS(sys_getxattr	, 4)
	MIPS_SYS(sys_lgetxattr	, 4)
	MIPS_SYS(sys_fgetxattr	, 4)
	MIPS_SYS(sys_listxattr	, 3)	/* 4230 */
	MIPS_SYS(sys_llistxattr	, 3)
	MIPS_SYS(sys_flistxattr	, 3)
	MIPS_SYS(sys_removexattr	, 2)
	MIPS_SYS(sys_lremovexattr, 2)
	MIPS_SYS(sys_fremovexattr, 2)	/* 4235 */
	MIPS_SYS(sys_tkill	, 2)
	MIPS_SYS(sys_sendfile64	, 5)
2009
	MIPS_SYS(sys_futex	, 6)
B
bellard 已提交
2010 2011 2012 2013 2014 2015 2016 2017 2018 2019 2020 2021 2022 2023 2024 2025 2026 2027 2028 2029 2030 2031 2032 2033 2034 2035 2036 2037 2038 2039 2040 2041 2042 2043 2044 2045 2046 2047 2048 2049 2050 2051
	MIPS_SYS(sys_sched_setaffinity, 3)
	MIPS_SYS(sys_sched_getaffinity, 3)	/* 4240 */
	MIPS_SYS(sys_io_setup	, 2)
	MIPS_SYS(sys_io_destroy	, 1)
	MIPS_SYS(sys_io_getevents, 5)
	MIPS_SYS(sys_io_submit	, 3)
	MIPS_SYS(sys_io_cancel	, 3)	/* 4245 */
	MIPS_SYS(sys_exit_group	, 1)
	MIPS_SYS(sys_lookup_dcookie, 3)
	MIPS_SYS(sys_epoll_create, 1)
	MIPS_SYS(sys_epoll_ctl	, 4)
	MIPS_SYS(sys_epoll_wait	, 3)	/* 4250 */
	MIPS_SYS(sys_remap_file_pages, 5)
	MIPS_SYS(sys_set_tid_address, 1)
	MIPS_SYS(sys_restart_syscall, 0)
	MIPS_SYS(sys_fadvise64_64, 7)
	MIPS_SYS(sys_statfs64	, 3)	/* 4255 */
	MIPS_SYS(sys_fstatfs64	, 2)
	MIPS_SYS(sys_timer_create, 3)
	MIPS_SYS(sys_timer_settime, 4)
	MIPS_SYS(sys_timer_gettime, 2)
	MIPS_SYS(sys_timer_getoverrun, 1)	/* 4260 */
	MIPS_SYS(sys_timer_delete, 1)
	MIPS_SYS(sys_clock_settime, 2)
	MIPS_SYS(sys_clock_gettime, 2)
	MIPS_SYS(sys_clock_getres, 2)
	MIPS_SYS(sys_clock_nanosleep, 4)	/* 4265 */
	MIPS_SYS(sys_tgkill	, 3)
	MIPS_SYS(sys_utimes	, 2)
	MIPS_SYS(sys_mbind	, 4)
	MIPS_SYS(sys_ni_syscall	, 0)	/* sys_get_mempolicy */
	MIPS_SYS(sys_ni_syscall	, 0)	/* 4270 sys_set_mempolicy */
	MIPS_SYS(sys_mq_open	, 4)
	MIPS_SYS(sys_mq_unlink	, 1)
	MIPS_SYS(sys_mq_timedsend, 5)
	MIPS_SYS(sys_mq_timedreceive, 5)
	MIPS_SYS(sys_mq_notify	, 2)	/* 4275 */
	MIPS_SYS(sys_mq_getsetattr, 3)
	MIPS_SYS(sys_ni_syscall	, 0)	/* sys_vserver */
	MIPS_SYS(sys_waitid	, 4)
	MIPS_SYS(sys_ni_syscall	, 0)	/* available, was setaltroot */
	MIPS_SYS(sys_add_key	, 5)
T
ths 已提交
2052
	MIPS_SYS(sys_request_key, 4)
B
bellard 已提交
2053
	MIPS_SYS(sys_keyctl	, 5)
2054
	MIPS_SYS(sys_set_thread_area, 1)
T
ths 已提交
2055 2056 2057 2058 2059 2060 2061 2062 2063 2064 2065 2066 2067 2068 2069 2070 2071 2072 2073 2074
	MIPS_SYS(sys_inotify_init, 0)
	MIPS_SYS(sys_inotify_add_watch, 3) /* 4285 */
	MIPS_SYS(sys_inotify_rm_watch, 2)
	MIPS_SYS(sys_migrate_pages, 4)
	MIPS_SYS(sys_openat, 4)
	MIPS_SYS(sys_mkdirat, 3)
	MIPS_SYS(sys_mknodat, 4)	/* 4290 */
	MIPS_SYS(sys_fchownat, 5)
	MIPS_SYS(sys_futimesat, 3)
	MIPS_SYS(sys_fstatat64, 4)
	MIPS_SYS(sys_unlinkat, 3)
	MIPS_SYS(sys_renameat, 4)	/* 4295 */
	MIPS_SYS(sys_linkat, 5)
	MIPS_SYS(sys_symlinkat, 3)
	MIPS_SYS(sys_readlinkat, 4)
	MIPS_SYS(sys_fchmodat, 3)
	MIPS_SYS(sys_faccessat, 3)	/* 4300 */
	MIPS_SYS(sys_pselect6, 6)
	MIPS_SYS(sys_ppoll, 5)
	MIPS_SYS(sys_unshare, 1)
2075
	MIPS_SYS(sys_splice, 6)
T
ths 已提交
2076 2077 2078 2079 2080 2081 2082 2083 2084 2085 2086
	MIPS_SYS(sys_sync_file_range, 7) /* 4305 */
	MIPS_SYS(sys_tee, 4)
	MIPS_SYS(sys_vmsplice, 4)
	MIPS_SYS(sys_move_pages, 6)
	MIPS_SYS(sys_set_robust_list, 2)
	MIPS_SYS(sys_get_robust_list, 3) /* 4310 */
	MIPS_SYS(sys_kexec_load, 4)
	MIPS_SYS(sys_getcpu, 3)
	MIPS_SYS(sys_epoll_pwait, 6)
	MIPS_SYS(sys_ioprio_set, 3)
	MIPS_SYS(sys_ioprio_get, 2)
2087 2088 2089 2090 2091 2092 2093 2094 2095 2096 2097 2098 2099 2100
        MIPS_SYS(sys_utimensat, 4)
        MIPS_SYS(sys_signalfd, 3)
        MIPS_SYS(sys_ni_syscall, 0)     /* was timerfd */
        MIPS_SYS(sys_eventfd, 1)
        MIPS_SYS(sys_fallocate, 6)      /* 4320 */
        MIPS_SYS(sys_timerfd_create, 2)
        MIPS_SYS(sys_timerfd_gettime, 2)
        MIPS_SYS(sys_timerfd_settime, 4)
        MIPS_SYS(sys_signalfd4, 4)
        MIPS_SYS(sys_eventfd2, 2)       /* 4325 */
        MIPS_SYS(sys_epoll_create1, 1)
        MIPS_SYS(sys_dup3, 3)
        MIPS_SYS(sys_pipe2, 2)
        MIPS_SYS(sys_inotify_init1, 1)
2101 2102
        MIPS_SYS(sys_preadv, 5)         /* 4330 */
        MIPS_SYS(sys_pwritev, 5)
2103 2104 2105 2106 2107 2108 2109 2110 2111 2112 2113
        MIPS_SYS(sys_rt_tgsigqueueinfo, 4)
        MIPS_SYS(sys_perf_event_open, 5)
        MIPS_SYS(sys_accept4, 4)
        MIPS_SYS(sys_recvmmsg, 5)       /* 4335 */
        MIPS_SYS(sys_fanotify_init, 2)
        MIPS_SYS(sys_fanotify_mark, 6)
        MIPS_SYS(sys_prlimit64, 4)
        MIPS_SYS(sys_name_to_handle_at, 5)
        MIPS_SYS(sys_open_by_handle_at, 3) /* 4340 */
        MIPS_SYS(sys_clock_adjtime, 2)
        MIPS_SYS(sys_syncfs, 1)
2114 2115 2116 2117 2118 2119 2120 2121 2122 2123 2124 2125 2126 2127 2128 2129 2130 2131 2132 2133
        MIPS_SYS(sys_sendmmsg, 4)
        MIPS_SYS(sys_setns, 2)
        MIPS_SYS(sys_process_vm_readv, 6) /* 345 */
        MIPS_SYS(sys_process_vm_writev, 6)
        MIPS_SYS(sys_kcmp, 5)
        MIPS_SYS(sys_finit_module, 3)
        MIPS_SYS(sys_sched_setattr, 2)
        MIPS_SYS(sys_sched_getattr, 3)  /* 350 */
        MIPS_SYS(sys_renameat2, 5)
        MIPS_SYS(sys_seccomp, 3)
        MIPS_SYS(sys_getrandom, 3)
        MIPS_SYS(sys_memfd_create, 2)
        MIPS_SYS(sys_bpf, 3)            /* 355 */
        MIPS_SYS(sys_execveat, 5)
        MIPS_SYS(sys_userfaultfd, 1)
        MIPS_SYS(sys_membarrier, 2)
        MIPS_SYS(sys_mlock2, 3)
        MIPS_SYS(sys_copy_file_range, 6) /* 360 */
        MIPS_SYS(sys_preadv2, 6)
        MIPS_SYS(sys_pwritev2, 6)
B
bellard 已提交
2134
};
2135 2136
#  undef MIPS_SYS
# endif /* O32 */
B
bellard 已提交
2137

P
Paul Brook 已提交
2138 2139 2140 2141 2142 2143 2144 2145 2146 2147
static int do_store_exclusive(CPUMIPSState *env)
{
    target_ulong addr;
    target_ulong page_addr;
    target_ulong val;
    int flags;
    int segv = 0;
    int reg;
    int d;

2148
    addr = env->lladdr;
P
Paul Brook 已提交
2149 2150 2151 2152 2153 2154 2155 2156 2157 2158 2159 2160 2161 2162 2163 2164 2165 2166 2167 2168 2169 2170 2171 2172 2173 2174 2175 2176 2177
    page_addr = addr & TARGET_PAGE_MASK;
    start_exclusive();
    mmap_lock();
    flags = page_get_flags(page_addr);
    if ((flags & PAGE_READ) == 0) {
        segv = 1;
    } else {
        reg = env->llreg & 0x1f;
        d = (env->llreg & 0x20) != 0;
        if (d) {
            segv = get_user_s64(val, addr);
        } else {
            segv = get_user_s32(val, addr);
        }
        if (!segv) {
            if (val != env->llval) {
                env->active_tc.gpr[reg] = 0;
            } else {
                if (d) {
                    segv = put_user_u64(env->llnewval, addr);
                } else {
                    segv = put_user_u32(env->llnewval, addr);
                }
                if (!segv) {
                    env->active_tc.gpr[reg] = 1;
                }
            }
        }
    }
2178
    env->lladdr = -1;
P
Paul Brook 已提交
2179 2180 2181 2182 2183 2184 2185 2186
    if (!segv) {
        env->active_tc.PC += 4;
    }
    mmap_unlock();
    end_exclusive();
    return segv;
}

2187 2188 2189 2190 2191 2192 2193 2194 2195 2196 2197 2198 2199 2200 2201 2202 2203
/* Break codes */
enum {
    BRK_OVERFLOW = 6,
    BRK_DIVZERO = 7
};

static int do_break(CPUMIPSState *env, target_siginfo_t *info,
                    unsigned int code)
{
    int ret = -1;

    switch (code) {
    case BRK_OVERFLOW:
    case BRK_DIVZERO:
        info->si_signo = TARGET_SIGFPE;
        info->si_errno = 0;
        info->si_code = (code == BRK_OVERFLOW) ? FPE_INTOVF : FPE_INTDIV;
2204
        queue_signal(env, info->si_signo, QEMU_SI_FAULT, &*info);
2205 2206 2207
        ret = 0;
        break;
    default:
2208 2209
        info->si_signo = TARGET_SIGTRAP;
        info->si_errno = 0;
2210
        queue_signal(env, info->si_signo, QEMU_SI_FAULT, &*info);
2211
        ret = 0;
2212 2213 2214 2215 2216 2217
        break;
    }

    return ret;
}

B
bellard 已提交
2218 2219
void cpu_loop(CPUMIPSState *env)
{
2220
    CPUState *cs = CPU(mips_env_get_cpu(env));
A
Anthony Liguori 已提交
2221
    target_siginfo_t info;
2222 2223 2224
    int trapnr;
    abi_long ret;
# ifdef TARGET_ABI_MIPSO32
B
bellard 已提交
2225
    unsigned int syscall_num;
2226
# endif
B
bellard 已提交
2227 2228

    for(;;) {
2229
        cpu_exec_start(cs);
2230
        trapnr = cpu_exec(cs);
2231
        cpu_exec_end(cs);
2232 2233
        process_queued_cpu_work(cs);

B
bellard 已提交
2234 2235
        switch(trapnr) {
        case EXCP_SYSCALL:
2236
            env->active_tc.PC += 4;
2237 2238
# ifdef TARGET_ABI_MIPSO32
            syscall_num = env->active_tc.gpr[2] - 4000;
T
ths 已提交
2239
            if (syscall_num >= sizeof(mips_syscall_args)) {
2240
                ret = -TARGET_ENOSYS;
T
ths 已提交
2241 2242
            } else {
                int nb_args;
2243 2244
                abi_ulong sp_reg;
                abi_ulong arg5 = 0, arg6 = 0, arg7 = 0, arg8 = 0;
T
ths 已提交
2245 2246

                nb_args = mips_syscall_args[syscall_num];
2247
                sp_reg = env->active_tc.gpr[29];
T
ths 已提交
2248 2249
                switch (nb_args) {
                /* these arguments are taken from the stack */
2250 2251 2252 2253 2254 2255 2256 2257 2258 2259 2260 2261 2262 2263 2264 2265
                case 8:
                    if ((ret = get_user_ual(arg8, sp_reg + 28)) != 0) {
                        goto done_syscall;
                    }
                case 7:
                    if ((ret = get_user_ual(arg7, sp_reg + 24)) != 0) {
                        goto done_syscall;
                    }
                case 6:
                    if ((ret = get_user_ual(arg6, sp_reg + 20)) != 0) {
                        goto done_syscall;
                    }
                case 5:
                    if ((ret = get_user_ual(arg5, sp_reg + 16)) != 0) {
                        goto done_syscall;
                    }
T
ths 已提交
2266 2267
                default:
                    break;
B
bellard 已提交
2268
                }
2269 2270 2271 2272 2273
                ret = do_syscall(env, env->active_tc.gpr[2],
                                 env->active_tc.gpr[4],
                                 env->active_tc.gpr[5],
                                 env->active_tc.gpr[6],
                                 env->active_tc.gpr[7],
2274
                                 arg5, arg6, arg7, arg8);
T
ths 已提交
2275
            }
2276
done_syscall:
2277 2278 2279 2280 2281 2282 2283
# else
            ret = do_syscall(env, env->active_tc.gpr[2],
                             env->active_tc.gpr[4], env->active_tc.gpr[5],
                             env->active_tc.gpr[6], env->active_tc.gpr[7],
                             env->active_tc.gpr[8], env->active_tc.gpr[9],
                             env->active_tc.gpr[10], env->active_tc.gpr[11]);
# endif /* O32 */
2284 2285 2286 2287
            if (ret == -TARGET_ERESTARTSYS) {
                env->active_tc.PC -= 4;
                break;
            }
P
pbrook 已提交
2288 2289 2290 2291 2292
            if (ret == -TARGET_QEMU_ESIGRETURN) {
                /* Returning from a successful sigreturn syscall.
                   Avoid clobbering register state.  */
                break;
            }
2293
            if ((abi_ulong)ret >= (abi_ulong)-1133) {
2294
                env->active_tc.gpr[7] = 1; /* error flag */
T
ths 已提交
2295 2296
                ret = -ret;
            } else {
2297
                env->active_tc.gpr[7] = 0; /* error flag */
B
bellard 已提交
2298
            }
2299
            env->active_tc.gpr[2] = ret;
B
bellard 已提交
2300
            break;
2301 2302
        case EXCP_TLBL:
        case EXCP_TLBS:
2303 2304
        case EXCP_AdEL:
        case EXCP_AdES:
2305 2306 2307 2308 2309
            info.si_signo = TARGET_SIGSEGV;
            info.si_errno = 0;
            /* XXX: check env->error_code */
            info.si_code = TARGET_SEGV_MAPERR;
            info._sifields._sigfault._addr = env->CP0_BadVAddr;
2310
            queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
2311
            break;
B
bellard 已提交
2312
        case EXCP_CpU:
B
bellard 已提交
2313
        case EXCP_RI:
2314 2315 2316
            info.si_signo = TARGET_SIGILL;
            info.si_errno = 0;
            info.si_code = 0;
2317
            queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
B
bellard 已提交
2318
            break;
2319 2320 2321
        case EXCP_INTERRUPT:
            /* just indicate that signals should be handled asap */
            break;
2322 2323 2324 2325
        case EXCP_DEBUG:
            {
                int sig;

2326
                sig = gdb_handlesig(cs, TARGET_SIGTRAP);
2327 2328 2329 2330 2331
                if (sig)
                  {
                    info.si_signo = sig;
                    info.si_errno = 0;
                    info.si_code = TARGET_TRAP_BRKPT;
2332
                    queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
2333 2334 2335
                  }
            }
            break;
P
Paul Brook 已提交
2336 2337 2338 2339 2340 2341
        case EXCP_SC:
            if (do_store_exclusive(env)) {
                info.si_signo = TARGET_SIGSEGV;
                info.si_errno = 0;
                info.si_code = TARGET_SEGV_MAPERR;
                info._sifields._sigfault._addr = env->active_tc.PC;
2342
                queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
P
Paul Brook 已提交
2343 2344
            }
            break;
2345 2346 2347 2348
        case EXCP_DSPDIS:
            info.si_signo = TARGET_SIGILL;
            info.si_errno = 0;
            info.si_code = TARGET_ILL_ILLOPC;
2349
            queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
2350
            break;
2351 2352 2353 2354 2355 2356 2357 2358
        /* The code below was inspired by the MIPS Linux kernel trap
         * handling code in arch/mips/kernel/traps.c.
         */
        case EXCP_BREAK:
            {
                abi_ulong trap_instr;
                unsigned int code;

2359 2360 2361
                if (env->hflags & MIPS_HFLAG_M16) {
                    if (env->insn_flags & ASE_MICROMIPS) {
                        /* microMIPS mode */
2362 2363 2364 2365
                        ret = get_user_u16(trap_instr, env->active_tc.PC);
                        if (ret != 0) {
                            goto error;
                        }
2366

2367 2368 2369 2370 2371 2372 2373 2374 2375 2376 2377 2378 2379 2380 2381 2382 2383 2384 2385 2386
                        if ((trap_instr >> 10) == 0x11) {
                            /* 16-bit instruction */
                            code = trap_instr & 0xf;
                        } else {
                            /* 32-bit instruction */
                            abi_ulong instr_lo;

                            ret = get_user_u16(instr_lo,
                                               env->active_tc.PC + 2);
                            if (ret != 0) {
                                goto error;
                            }
                            trap_instr = (trap_instr << 16) | instr_lo;
                            code = ((trap_instr >> 6) & ((1 << 20) - 1));
                            /* Unfortunately, microMIPS also suffers from
                               the old assembler bug...  */
                            if (code >= (1 << 10)) {
                                code >>= 10;
                            }
                        }
2387 2388 2389 2390 2391 2392 2393 2394 2395
                    } else {
                        /* MIPS16e mode */
                        ret = get_user_u16(trap_instr, env->active_tc.PC);
                        if (ret != 0) {
                            goto error;
                        }
                        code = (trap_instr >> 6) & 0x3f;
                    }
                } else {
2396
                    ret = get_user_u32(trap_instr, env->active_tc.PC);
2397 2398 2399
                    if (ret != 0) {
                        goto error;
                    }
2400

2401 2402 2403 2404 2405 2406 2407 2408
                    /* As described in the original Linux kernel code, the
                     * below checks on 'code' are to work around an old
                     * assembly bug.
                     */
                    code = ((trap_instr >> 6) & ((1 << 20) - 1));
                    if (code >= (1 << 10)) {
                        code >>= 10;
                    }
2409 2410 2411 2412 2413 2414 2415 2416 2417 2418 2419 2420
                }

                if (do_break(env, &info, code) != 0) {
                    goto error;
                }
            }
            break;
        case EXCP_TRAP:
            {
                abi_ulong trap_instr;
                unsigned int code = 0;

2421 2422 2423 2424 2425 2426 2427 2428 2429
                if (env->hflags & MIPS_HFLAG_M16) {
                    /* microMIPS mode */
                    abi_ulong instr[2];

                    ret = get_user_u16(instr[0], env->active_tc.PC) ||
                          get_user_u16(instr[1], env->active_tc.PC + 2);

                    trap_instr = (instr[0] << 16) | instr[1];
                } else {
2430
                    ret = get_user_u32(trap_instr, env->active_tc.PC);
2431 2432
                }

2433 2434 2435 2436 2437 2438
                if (ret != 0) {
                    goto error;
                }

                /* The immediate versions don't provide a code.  */
                if (!(trap_instr & 0xFC000000)) {
2439 2440 2441 2442 2443 2444
                    if (env->hflags & MIPS_HFLAG_M16) {
                        /* microMIPS mode */
                        code = ((trap_instr >> 12) & ((1 << 4) - 1));
                    } else {
                        code = ((trap_instr >> 6) & ((1 << 10) - 1));
                    }
2445 2446 2447 2448 2449 2450 2451
                }

                if (do_break(env, &info, code) != 0) {
                    goto error;
                }
            }
            break;
R
Richard Henderson 已提交
2452 2453 2454
        case EXCP_ATOMIC:
            cpu_exec_step_atomic(cs);
            break;
B
bellard 已提交
2455
        default:
2456
error:
P
Paolo Bonzini 已提交
2457
            EXCP_DUMP(env, "qemu: unhandled CPU exception 0x%x - aborting\n", trapnr);
B
bellard 已提交
2458 2459 2460 2461 2462 2463 2464
            abort();
        }
        process_pending_signals(env);
    }
}
#endif

J
Jia Liu 已提交
2465 2466 2467 2468
#ifdef TARGET_OPENRISC

void cpu_loop(CPUOpenRISCState *env)
{
2469
    CPUState *cs = CPU(openrisc_env_get_cpu(env));
J
Jia Liu 已提交
2470
    int trapnr, gdbsig;
2471
    abi_long ret;
J
Jia Liu 已提交
2472 2473

    for (;;) {
2474
        cpu_exec_start(cs);
2475
        trapnr = cpu_exec(cs);
2476
        cpu_exec_end(cs);
2477
        process_queued_cpu_work(cs);
J
Jia Liu 已提交
2478 2479 2480 2481
        gdbsig = 0;

        switch (trapnr) {
        case EXCP_RESET:
P
Paolo Bonzini 已提交
2482
            qemu_log_mask(CPU_LOG_INT, "\nReset request, exit, pc is %#x\n", env->pc);
2483
            exit(EXIT_FAILURE);
J
Jia Liu 已提交
2484 2485
            break;
        case EXCP_BUSERR:
P
Paolo Bonzini 已提交
2486
            qemu_log_mask(CPU_LOG_INT, "\nBus error, exit, pc is %#x\n", env->pc);
2487
            gdbsig = TARGET_SIGBUS;
J
Jia Liu 已提交
2488 2489 2490
            break;
        case EXCP_DPF:
        case EXCP_IPF:
2491
            cpu_dump_state(cs, stderr, fprintf, 0);
J
Jia Liu 已提交
2492 2493 2494
            gdbsig = TARGET_SIGSEGV;
            break;
        case EXCP_TICK:
P
Paolo Bonzini 已提交
2495
            qemu_log_mask(CPU_LOG_INT, "\nTick time interrupt pc is %#x\n", env->pc);
J
Jia Liu 已提交
2496 2497
            break;
        case EXCP_ALIGN:
P
Paolo Bonzini 已提交
2498
            qemu_log_mask(CPU_LOG_INT, "\nAlignment pc is %#x\n", env->pc);
2499
            gdbsig = TARGET_SIGBUS;
J
Jia Liu 已提交
2500 2501
            break;
        case EXCP_ILLEGAL:
P
Paolo Bonzini 已提交
2502
            qemu_log_mask(CPU_LOG_INT, "\nIllegal instructionpc is %#x\n", env->pc);
2503
            gdbsig = TARGET_SIGILL;
J
Jia Liu 已提交
2504 2505
            break;
        case EXCP_INT:
P
Paolo Bonzini 已提交
2506
            qemu_log_mask(CPU_LOG_INT, "\nExternal interruptpc is %#x\n", env->pc);
J
Jia Liu 已提交
2507 2508 2509
            break;
        case EXCP_DTLBMISS:
        case EXCP_ITLBMISS:
P
Paolo Bonzini 已提交
2510
            qemu_log_mask(CPU_LOG_INT, "\nTLB miss\n");
J
Jia Liu 已提交
2511 2512
            break;
        case EXCP_RANGE:
P
Paolo Bonzini 已提交
2513
            qemu_log_mask(CPU_LOG_INT, "\nRange\n");
2514
            gdbsig = TARGET_SIGSEGV;
J
Jia Liu 已提交
2515 2516 2517
            break;
        case EXCP_SYSCALL:
            env->pc += 4;   /* 0xc00; */
2518 2519 2520 2521 2522 2523 2524 2525 2526 2527 2528 2529 2530
            ret = do_syscall(env,
                             env->gpr[11], /* return value       */
                             env->gpr[3],  /* r3 - r7 are params */
                             env->gpr[4],
                             env->gpr[5],
                             env->gpr[6],
                             env->gpr[7],
                             env->gpr[8], 0, 0);
            if (ret == -TARGET_ERESTARTSYS) {
                env->pc -= 4;
            } else if (ret != -TARGET_QEMU_ESIGRETURN) {
                env->gpr[11] = ret;
            }
J
Jia Liu 已提交
2531 2532
            break;
        case EXCP_FPE:
P
Paolo Bonzini 已提交
2533
            qemu_log_mask(CPU_LOG_INT, "\nFloating point error\n");
J
Jia Liu 已提交
2534 2535
            break;
        case EXCP_TRAP:
P
Paolo Bonzini 已提交
2536
            qemu_log_mask(CPU_LOG_INT, "\nTrap\n");
2537
            gdbsig = TARGET_SIGTRAP;
J
Jia Liu 已提交
2538 2539
            break;
        case EXCP_NR:
P
Paolo Bonzini 已提交
2540
            qemu_log_mask(CPU_LOG_INT, "\nNR\n");
J
Jia Liu 已提交
2541
            break;
R
Richard Henderson 已提交
2542 2543 2544
        case EXCP_ATOMIC:
            cpu_exec_step_atomic(cs);
            break;
J
Jia Liu 已提交
2545
        default:
P
Paolo Bonzini 已提交
2546
            EXCP_DUMP(env, "\nqemu: unhandled CPU exception %#x - aborting\n",
J
Jia Liu 已提交
2547 2548 2549 2550 2551
                     trapnr);
            gdbsig = TARGET_SIGILL;
            break;
        }
        if (gdbsig) {
2552
            gdb_handlesig(cs, gdbsig);
J
Jia Liu 已提交
2553
            if (gdbsig != TARGET_SIGTRAP) {
2554
                exit(EXIT_FAILURE);
J
Jia Liu 已提交
2555 2556 2557 2558 2559 2560 2561 2562 2563
            }
        }

        process_pending_signals(env);
    }
}

#endif /* TARGET_OPENRISC */

B
bellard 已提交
2564
#ifdef TARGET_SH4
2565
void cpu_loop(CPUSH4State *env)
B
bellard 已提交
2566
{
2567
    CPUState *cs = CPU(sh_env_get_cpu(env));
B
bellard 已提交
2568
    int trapnr, ret;
A
Anthony Liguori 已提交
2569
    target_siginfo_t info;
2570

B
bellard 已提交
2571
    while (1) {
2572
        cpu_exec_start(cs);
2573
        trapnr = cpu_exec(cs);
2574
        cpu_exec_end(cs);
2575
        process_queued_cpu_work(cs);
2576

B
bellard 已提交
2577 2578
        switch (trapnr) {
        case 0x160:
A
aurel32 已提交
2579
            env->pc += 2;
2580 2581 2582 2583 2584 2585 2586
            ret = do_syscall(env,
                             env->gregs[3],
                             env->gregs[4],
                             env->gregs[5],
                             env->gregs[6],
                             env->gregs[7],
                             env->gregs[0],
2587 2588
                             env->gregs[1],
                             0, 0);
2589 2590 2591 2592 2593
            if (ret == -TARGET_ERESTARTSYS) {
                env->pc -= 2;
            } else if (ret != -TARGET_QEMU_ESIGRETURN) {
                env->gregs[0] = ret;
            }
B
bellard 已提交
2594
            break;
2595 2596 2597
        case EXCP_INTERRUPT:
            /* just indicate that signals should be handled asap */
            break;
P
pbrook 已提交
2598 2599 2600 2601
        case EXCP_DEBUG:
            {
                int sig;

2602
                sig = gdb_handlesig(cs, TARGET_SIGTRAP);
P
pbrook 已提交
2603 2604 2605 2606 2607
                if (sig)
                  {
                    info.si_signo = sig;
                    info.si_errno = 0;
                    info.si_code = TARGET_TRAP_BRKPT;
2608
                    queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
P
pbrook 已提交
2609 2610 2611
                  }
            }
            break;
2612 2613
	case 0xa0:
	case 0xc0:
2614
            info.si_signo = TARGET_SIGSEGV;
2615 2616 2617
            info.si_errno = 0;
            info.si_code = TARGET_SEGV_MAPERR;
            info._sifields._sigfault._addr = env->tea;
2618
            queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
2619 2620
	    break;

R
Richard Henderson 已提交
2621 2622 2623
        case EXCP_ATOMIC:
            cpu_exec_step_atomic(cs);
            break;
B
bellard 已提交
2624 2625
        default:
            printf ("Unhandled trap: 0x%x\n", trapnr);
2626
            cpu_dump_state(cs, stderr, fprintf, 0);
2627
            exit(EXIT_FAILURE);
B
bellard 已提交
2628 2629 2630 2631 2632 2633
        }
        process_pending_signals (env);
    }
}
#endif

2634
#ifdef TARGET_CRIS
2635
void cpu_loop(CPUCRISState *env)
2636
{
2637
    CPUState *cs = CPU(cris_env_get_cpu(env));
2638
    int trapnr, ret;
A
Anthony Liguori 已提交
2639
    target_siginfo_t info;
2640 2641
    
    while (1) {
2642
        cpu_exec_start(cs);
2643
        trapnr = cpu_exec(cs);
2644
        cpu_exec_end(cs);
2645 2646
        process_queued_cpu_work(cs);

2647 2648 2649
        switch (trapnr) {
        case 0xaa:
            {
2650
                info.si_signo = TARGET_SIGSEGV;
2651 2652 2653
                info.si_errno = 0;
                /* XXX: check env->error_code */
                info.si_code = TARGET_SEGV_MAPERR;
2654
                info._sifields._sigfault._addr = env->pregs[PR_EDA];
2655
                queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
2656 2657
            }
            break;
2658 2659 2660
	case EXCP_INTERRUPT:
	  /* just indicate that signals should be handled asap */
	  break;
2661 2662 2663 2664 2665 2666 2667 2668
        case EXCP_BREAK:
            ret = do_syscall(env, 
                             env->regs[9], 
                             env->regs[10], 
                             env->regs[11], 
                             env->regs[12], 
                             env->regs[13], 
                             env->pregs[7], 
2669 2670
                             env->pregs[11],
                             0, 0);
2671 2672 2673 2674 2675
            if (ret == -TARGET_ERESTARTSYS) {
                env->pc -= 2;
            } else if (ret != -TARGET_QEMU_ESIGRETURN) {
                env->regs[10] = ret;
            }
2676 2677 2678 2679 2680
            break;
        case EXCP_DEBUG:
            {
                int sig;

2681
                sig = gdb_handlesig(cs, TARGET_SIGTRAP);
2682 2683 2684 2685 2686
                if (sig)
                  {
                    info.si_signo = sig;
                    info.si_errno = 0;
                    info.si_code = TARGET_TRAP_BRKPT;
2687
                    queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
2688 2689 2690
                  }
            }
            break;
R
Richard Henderson 已提交
2691 2692 2693
        case EXCP_ATOMIC:
            cpu_exec_step_atomic(cs);
            break;
2694 2695
        default:
            printf ("Unhandled trap: 0x%x\n", trapnr);
2696
            cpu_dump_state(cs, stderr, fprintf, 0);
2697
            exit(EXIT_FAILURE);
2698 2699 2700 2701 2702 2703
        }
        process_pending_signals (env);
    }
}
#endif

2704
#ifdef TARGET_MICROBLAZE
2705
void cpu_loop(CPUMBState *env)
2706
{
2707
    CPUState *cs = CPU(mb_env_get_cpu(env));
2708
    int trapnr, ret;
A
Anthony Liguori 已提交
2709
    target_siginfo_t info;
2710 2711
    
    while (1) {
2712
        cpu_exec_start(cs);
2713
        trapnr = cpu_exec(cs);
2714
        cpu_exec_end(cs);
2715 2716
        process_queued_cpu_work(cs);

2717 2718 2719
        switch (trapnr) {
        case 0xaa:
            {
2720
                info.si_signo = TARGET_SIGSEGV;
2721 2722 2723 2724
                info.si_errno = 0;
                /* XXX: check env->error_code */
                info.si_code = TARGET_SEGV_MAPERR;
                info._sifields._sigfault._addr = 0;
2725
                queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
2726 2727 2728 2729 2730 2731 2732 2733
            }
            break;
	case EXCP_INTERRUPT:
	  /* just indicate that signals should be handled asap */
	  break;
        case EXCP_BREAK:
            /* Return address is 4 bytes after the call.  */
            env->regs[14] += 4;
2734
            env->sregs[SR_PC] = env->regs[14];
2735 2736 2737 2738 2739 2740 2741
            ret = do_syscall(env, 
                             env->regs[12], 
                             env->regs[5], 
                             env->regs[6], 
                             env->regs[7], 
                             env->regs[8], 
                             env->regs[9], 
2742 2743
                             env->regs[10],
                             0, 0);
2744 2745 2746 2747 2748 2749
            if (ret == -TARGET_ERESTARTSYS) {
                /* Wind back to before the syscall. */
                env->sregs[SR_PC] -= 4;
            } else if (ret != -TARGET_QEMU_ESIGRETURN) {
                env->regs[3] = ret;
            }
2750 2751 2752 2753 2754 2755 2756
            /* All syscall exits result in guest r14 being equal to the
             * PC we return to, because the kernel syscall exit "rtbd" does
             * this. (This is true even for sigreturn(); note that r14 is
             * not a userspace-usable register, as the kernel may clobber it
             * at any point.)
             */
            env->regs[14] = env->sregs[SR_PC];
2757
            break;
2758 2759 2760 2761 2762
        case EXCP_HW_EXCP:
            env->regs[17] = env->sregs[SR_PC] + 4;
            if (env->iflags & D_FLAG) {
                env->sregs[SR_ESR] |= 1 << 12;
                env->sregs[SR_PC] -= 4;
2763
                /* FIXME: if branch was immed, replay the imm as well.  */
2764 2765 2766 2767 2768
            }

            env->iflags &= ~(IMM_FLAG | D_FLAG);

            switch (env->sregs[SR_ESR] & 31) {
2769
                case ESR_EC_DIVZERO:
2770
                    info.si_signo = TARGET_SIGFPE;
2771 2772 2773
                    info.si_errno = 0;
                    info.si_code = TARGET_FPE_FLTDIV;
                    info._sifields._sigfault._addr = 0;
2774
                    queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
2775
                    break;
2776
                case ESR_EC_FPU:
2777
                    info.si_signo = TARGET_SIGFPE;
2778 2779 2780 2781 2782 2783 2784 2785
                    info.si_errno = 0;
                    if (env->sregs[SR_FSR] & FSR_IO) {
                        info.si_code = TARGET_FPE_FLTINV;
                    }
                    if (env->sregs[SR_FSR] & FSR_DZ) {
                        info.si_code = TARGET_FPE_FLTDIV;
                    }
                    info._sifields._sigfault._addr = 0;
2786
                    queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
2787 2788 2789
                    break;
                default:
                    printf ("Unhandled hw-exception: 0x%x\n",
2790
                            env->sregs[SR_ESR] & ESR_EC_MASK);
2791
                    cpu_dump_state(cs, stderr, fprintf, 0);
2792
                    exit(EXIT_FAILURE);
2793 2794 2795
                    break;
            }
            break;
2796 2797 2798 2799
        case EXCP_DEBUG:
            {
                int sig;

2800
                sig = gdb_handlesig(cs, TARGET_SIGTRAP);
2801 2802 2803 2804 2805
                if (sig)
                  {
                    info.si_signo = sig;
                    info.si_errno = 0;
                    info.si_code = TARGET_TRAP_BRKPT;
2806
                    queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
2807 2808 2809
                  }
            }
            break;
R
Richard Henderson 已提交
2810 2811 2812
        case EXCP_ATOMIC:
            cpu_exec_step_atomic(cs);
            break;
2813 2814
        default:
            printf ("Unhandled trap: 0x%x\n", trapnr);
2815
            cpu_dump_state(cs, stderr, fprintf, 0);
2816
            exit(EXIT_FAILURE);
2817 2818 2819 2820 2821 2822
        }
        process_pending_signals (env);
    }
}
#endif

P
pbrook 已提交
2823 2824 2825 2826
#ifdef TARGET_M68K

void cpu_loop(CPUM68KState *env)
{
2827
    CPUState *cs = CPU(m68k_env_get_cpu(env));
P
pbrook 已提交
2828 2829
    int trapnr;
    unsigned int n;
A
Anthony Liguori 已提交
2830
    target_siginfo_t info;
2831
    TaskState *ts = cs->opaque;
2832

P
pbrook 已提交
2833
    for(;;) {
2834
        cpu_exec_start(cs);
2835
        trapnr = cpu_exec(cs);
2836
        cpu_exec_end(cs);
2837 2838
        process_queued_cpu_work(cs);

P
pbrook 已提交
2839 2840 2841 2842 2843
        switch(trapnr) {
        case EXCP_ILLEGAL:
            {
                if (ts->sim_syscalls) {
                    uint16_t nr;
2844
                    get_user_u16(nr, env->pc + 2);
P
pbrook 已提交
2845 2846 2847 2848 2849 2850 2851
                    env->pc += 4;
                    do_m68k_simcall(env, nr);
                } else {
                    goto do_sigill;
                }
            }
            break;
P
pbrook 已提交
2852
        case EXCP_HALT_INSN:
P
pbrook 已提交
2853
            /* Semihosing syscall.  */
P
pbrook 已提交
2854
            env->pc += 4;
P
pbrook 已提交
2855 2856 2857 2858 2859 2860
            do_m68k_semihosting(env, env->dregs[0]);
            break;
        case EXCP_LINEA:
        case EXCP_LINEF:
        case EXCP_UNSUPPORTED:
        do_sigill:
2861
            info.si_signo = TARGET_SIGILL;
P
pbrook 已提交
2862 2863 2864
            info.si_errno = 0;
            info.si_code = TARGET_ILL_ILLOPN;
            info._sifields._sigfault._addr = env->pc;
2865 2866 2867 2868 2869 2870 2871
            queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
            break;
        case EXCP_DIV0:
            info.si_signo = TARGET_SIGFPE;
            info.si_errno = 0;
            info.si_code = TARGET_FPE_INTDIV;
            info._sifields._sigfault._addr = env->pc;
2872
            queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
P
pbrook 已提交
2873 2874 2875
            break;
        case EXCP_TRAP0:
            {
2876
                abi_long ret;
P
pbrook 已提交
2877 2878 2879
                ts->sim_syscalls = 0;
                n = env->dregs[0];
                env->pc += 2;
2880 2881 2882 2883 2884 2885 2886 2887 2888 2889 2890 2891 2892 2893
                ret = do_syscall(env,
                                 n,
                                 env->dregs[1],
                                 env->dregs[2],
                                 env->dregs[3],
                                 env->dregs[4],
                                 env->dregs[5],
                                 env->aregs[0],
                                 0, 0);
                if (ret == -TARGET_ERESTARTSYS) {
                    env->pc -= 2;
                } else if (ret != -TARGET_QEMU_ESIGRETURN) {
                    env->dregs[0] = ret;
                }
P
pbrook 已提交
2894 2895 2896 2897 2898 2899 2900
            }
            break;
        case EXCP_INTERRUPT:
            /* just indicate that signals should be handled asap */
            break;
        case EXCP_ACCESS:
            {
2901
                info.si_signo = TARGET_SIGSEGV;
P
pbrook 已提交
2902 2903 2904 2905
                info.si_errno = 0;
                /* XXX: check env->error_code */
                info.si_code = TARGET_SEGV_MAPERR;
                info._sifields._sigfault._addr = env->mmu.ar;
2906
                queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
P
pbrook 已提交
2907 2908 2909 2910 2911 2912
            }
            break;
        case EXCP_DEBUG:
            {
                int sig;

2913
                sig = gdb_handlesig(cs, TARGET_SIGTRAP);
P
pbrook 已提交
2914 2915 2916 2917 2918
                if (sig)
                  {
                    info.si_signo = sig;
                    info.si_errno = 0;
                    info.si_code = TARGET_TRAP_BRKPT;
2919
                    queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
P
pbrook 已提交
2920 2921 2922
                  }
            }
            break;
R
Richard Henderson 已提交
2923 2924 2925
        case EXCP_ATOMIC:
            cpu_exec_step_atomic(cs);
            break;
P
pbrook 已提交
2926
        default:
P
Paolo Bonzini 已提交
2927
            EXCP_DUMP(env, "qemu: unhandled CPU exception 0x%x - aborting\n", trapnr);
P
pbrook 已提交
2928 2929 2930 2931 2932 2933 2934
            abort();
        }
        process_pending_signals(env);
    }
}
#endif /* TARGET_M68K */

2935
#ifdef TARGET_ALPHA
2936
void cpu_loop(CPUAlphaState *env)
2937
{
2938
    CPUState *cs = CPU(alpha_env_get_cpu(env));
2939
    int trapnr;
A
Anthony Liguori 已提交
2940
    target_siginfo_t info;
2941
    abi_long sysret;
2942

2943
    while (1) {
2944
        cpu_exec_start(cs);
2945
        trapnr = cpu_exec(cs);
2946
        cpu_exec_end(cs);
2947
        process_queued_cpu_work(cs);
2948

2949 2950 2951 2952 2953
        /* All of the traps imply a transition through PALcode, which
           implies an REI instruction has been executed.  Which means
           that the intr_flag should be cleared.  */
        env->intr_flag = 0;

2954 2955 2956
        switch (trapnr) {
        case EXCP_RESET:
            fprintf(stderr, "Reset requested. Exit\n");
2957
            exit(EXIT_FAILURE);
2958 2959 2960
            break;
        case EXCP_MCHK:
            fprintf(stderr, "Machine check exception. Exit\n");
2961
            exit(EXIT_FAILURE);
2962
            break;
2963 2964 2965
        case EXCP_SMP_INTERRUPT:
        case EXCP_CLK_INTERRUPT:
        case EXCP_DEV_INTERRUPT:
2966
            fprintf(stderr, "External interrupt. Exit\n");
2967
            exit(EXIT_FAILURE);
2968
            break;
2969
        case EXCP_MMFAULT:
2970
            env->lock_addr = -1;
2971 2972
            info.si_signo = TARGET_SIGSEGV;
            info.si_errno = 0;
2973
            info.si_code = (page_get_flags(env->trap_arg0) & PAGE_VALID
2974
                            ? TARGET_SEGV_ACCERR : TARGET_SEGV_MAPERR);
2975
            info._sifields._sigfault._addr = env->trap_arg0;
2976
            queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
2977 2978
            break;
        case EXCP_UNALIGN:
2979
            env->lock_addr = -1;
2980 2981 2982
            info.si_signo = TARGET_SIGBUS;
            info.si_errno = 0;
            info.si_code = TARGET_BUS_ADRALN;
2983
            info._sifields._sigfault._addr = env->trap_arg0;
2984
            queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
2985 2986
            break;
        case EXCP_OPCDEC:
2987
        do_sigill:
2988
            env->lock_addr = -1;
2989 2990 2991 2992
            info.si_signo = TARGET_SIGILL;
            info.si_errno = 0;
            info.si_code = TARGET_ILL_ILLOPC;
            info._sifields._sigfault._addr = env->pc;
2993
            queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
2994
            break;
2995 2996 2997 2998 2999 3000
        case EXCP_ARITH:
            env->lock_addr = -1;
            info.si_signo = TARGET_SIGFPE;
            info.si_errno = 0;
            info.si_code = TARGET_FPE_FLTINV;
            info._sifields._sigfault._addr = env->pc;
3001
            queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
3002
            break;
3003
        case EXCP_FEN:
3004
            /* No-op.  Linux simply re-enables the FPU.  */
3005
            break;
3006
        case EXCP_CALL_PAL:
3007
            env->lock_addr = -1;
3008
            switch (env->error_code) {
3009 3010 3011 3012 3013 3014
            case 0x80:
                /* BPT */
                info.si_signo = TARGET_SIGTRAP;
                info.si_errno = 0;
                info.si_code = TARGET_TRAP_BRKPT;
                info._sifields._sigfault._addr = env->pc;
3015
                queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
3016 3017 3018 3019 3020 3021 3022
                break;
            case 0x81:
                /* BUGCHK */
                info.si_signo = TARGET_SIGTRAP;
                info.si_errno = 0;
                info.si_code = 0;
                info._sifields._sigfault._addr = env->pc;
3023
                queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
3024 3025 3026 3027 3028 3029 3030
                break;
            case 0x83:
                /* CALLSYS */
                trapnr = env->ir[IR_V0];
                sysret = do_syscall(env, trapnr,
                                    env->ir[IR_A0], env->ir[IR_A1],
                                    env->ir[IR_A2], env->ir[IR_A3],
3031 3032
                                    env->ir[IR_A4], env->ir[IR_A5],
                                    0, 0);
3033 3034 3035 3036 3037
                if (sysret == -TARGET_ERESTARTSYS) {
                    env->pc -= 4;
                    break;
                }
                if (sysret == -TARGET_QEMU_ESIGRETURN) {
3038 3039 3040
                    break;
                }
                /* Syscall writes 0 to V0 to bypass error check, similar
3041 3042 3043 3044 3045
                   to how this is handled internal to Linux kernel.
                   (Ab)use trapnr temporarily as boolean indicating error.  */
                trapnr = (env->ir[IR_V0] != 0 && sysret < 0);
                env->ir[IR_V0] = (trapnr ? -sysret : sysret);
                env->ir[IR_A3] = trapnr;
3046 3047 3048 3049 3050 3051 3052 3053 3054 3055 3056 3057 3058 3059 3060 3061 3062 3063 3064 3065 3066 3067 3068 3069 3070 3071 3072 3073 3074 3075 3076 3077 3078 3079 3080 3081 3082 3083 3084 3085 3086 3087 3088 3089 3090 3091 3092 3093 3094
                break;
            case 0x86:
                /* IMB */
                /* ??? We can probably elide the code using page_unprotect
                   that is checking for self-modifying code.  Instead we
                   could simply call tb_flush here.  Until we work out the
                   changes required to turn off the extra write protection,
                   this can be a no-op.  */
                break;
            case 0x9E:
                /* RDUNIQUE */
                /* Handled in the translator for usermode.  */
                abort();
            case 0x9F:
                /* WRUNIQUE */
                /* Handled in the translator for usermode.  */
                abort();
            case 0xAA:
                /* GENTRAP */
                info.si_signo = TARGET_SIGFPE;
                switch (env->ir[IR_A0]) {
                case TARGET_GEN_INTOVF:
                    info.si_code = TARGET_FPE_INTOVF;
                    break;
                case TARGET_GEN_INTDIV:
                    info.si_code = TARGET_FPE_INTDIV;
                    break;
                case TARGET_GEN_FLTOVF:
                    info.si_code = TARGET_FPE_FLTOVF;
                    break;
                case TARGET_GEN_FLTUND:
                    info.si_code = TARGET_FPE_FLTUND;
                    break;
                case TARGET_GEN_FLTINV:
                    info.si_code = TARGET_FPE_FLTINV;
                    break;
                case TARGET_GEN_FLTINE:
                    info.si_code = TARGET_FPE_FLTRES;
                    break;
                case TARGET_GEN_ROPRAND:
                    info.si_code = 0;
                    break;
                default:
                    info.si_signo = TARGET_SIGTRAP;
                    info.si_code = 0;
                    break;
                }
                info.si_errno = 0;
                info._sifields._sigfault._addr = env->pc;
3095
                queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
3096 3097 3098 3099
                break;
            default:
                goto do_sigill;
            }
3100 3101
            break;
        case EXCP_DEBUG:
3102
            info.si_signo = gdb_handlesig(cs, TARGET_SIGTRAP);
3103
            if (info.si_signo) {
3104
                env->lock_addr = -1;
3105 3106
                info.si_errno = 0;
                info.si_code = TARGET_TRAP_BRKPT;
3107
                queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
3108 3109
            }
            break;
3110 3111 3112
        case EXCP_INTERRUPT:
            /* Just indicate that signals should be handled asap.  */
            break;
R
Richard Henderson 已提交
3113 3114 3115
        case EXCP_ATOMIC:
            cpu_exec_step_atomic(cs);
            break;
3116 3117
        default:
            printf ("Unhandled trap: 0x%x\n", trapnr);
3118
            cpu_dump_state(cs, stderr, fprintf, 0);
3119
            exit(EXIT_FAILURE);
3120 3121 3122 3123 3124 3125
        }
        process_pending_signals (env);
    }
}
#endif /* TARGET_ALPHA */

U
Ulrich Hecht 已提交
3126 3127 3128
#ifdef TARGET_S390X
void cpu_loop(CPUS390XState *env)
{
3129
    CPUState *cs = CPU(s390_env_get_cpu(env));
3130
    int trapnr, n, sig;
U
Ulrich Hecht 已提交
3131
    target_siginfo_t info;
3132
    target_ulong addr;
3133
    abi_long ret;
U
Ulrich Hecht 已提交
3134 3135

    while (1) {
3136
        cpu_exec_start(cs);
3137
        trapnr = cpu_exec(cs);
3138
        cpu_exec_end(cs);
3139 3140
        process_queued_cpu_work(cs);

U
Ulrich Hecht 已提交
3141 3142
        switch (trapnr) {
        case EXCP_INTERRUPT:
3143
            /* Just indicate that signals should be handled asap.  */
U
Ulrich Hecht 已提交
3144 3145
            break;

3146 3147 3148 3149 3150
        case EXCP_SVC:
            n = env->int_svc_code;
            if (!n) {
                /* syscalls > 255 */
                n = env->regs[1];
U
Ulrich Hecht 已提交
3151
            }
3152
            env->psw.addr += env->int_svc_ilen;
3153 3154 3155 3156 3157 3158 3159 3160
            ret = do_syscall(env, n, env->regs[2], env->regs[3],
                             env->regs[4], env->regs[5],
                             env->regs[6], env->regs[7], 0, 0);
            if (ret == -TARGET_ERESTARTSYS) {
                env->psw.addr -= env->int_svc_ilen;
            } else if (ret != -TARGET_QEMU_ESIGRETURN) {
                env->regs[2] = ret;
            }
U
Ulrich Hecht 已提交
3161
            break;
3162 3163

        case EXCP_DEBUG:
3164
            sig = gdb_handlesig(cs, TARGET_SIGTRAP);
3165 3166 3167
            if (sig) {
                n = TARGET_TRAP_BRKPT;
                goto do_signal_pc;
U
Ulrich Hecht 已提交
3168 3169
            }
            break;
3170 3171 3172 3173 3174
        case EXCP_PGM:
            n = env->int_pgm_code;
            switch (n) {
            case PGM_OPERATION:
            case PGM_PRIVILEGED:
3175
                sig = TARGET_SIGILL;
3176 3177 3178 3179
                n = TARGET_ILL_ILLOPC;
                goto do_signal_pc;
            case PGM_PROTECTION:
            case PGM_ADDRESSING:
3180
                sig = TARGET_SIGSEGV;
U
Ulrich Hecht 已提交
3181
                /* XXX: check env->error_code */
3182 3183 3184 3185 3186 3187 3188 3189
                n = TARGET_SEGV_MAPERR;
                addr = env->__excp_addr;
                goto do_signal;
            case PGM_EXECUTE:
            case PGM_SPECIFICATION:
            case PGM_SPECIAL_OP:
            case PGM_OPERAND:
            do_sigill_opn:
3190
                sig = TARGET_SIGILL;
3191 3192 3193 3194
                n = TARGET_ILL_ILLOPN;
                goto do_signal_pc;

            case PGM_FIXPT_OVERFLOW:
3195
                sig = TARGET_SIGFPE;
3196 3197 3198
                n = TARGET_FPE_INTOVF;
                goto do_signal_pc;
            case PGM_FIXPT_DIVIDE:
3199
                sig = TARGET_SIGFPE;
3200 3201 3202 3203 3204 3205 3206 3207 3208 3209 3210 3211 3212 3213 3214 3215 3216 3217 3218 3219 3220 3221 3222 3223
                n = TARGET_FPE_INTDIV;
                goto do_signal_pc;

            case PGM_DATA:
                n = (env->fpc >> 8) & 0xff;
                if (n == 0xff) {
                    /* compare-and-trap */
                    goto do_sigill_opn;
                } else {
                    /* An IEEE exception, simulated or otherwise.  */
                    if (n & 0x80) {
                        n = TARGET_FPE_FLTINV;
                    } else if (n & 0x40) {
                        n = TARGET_FPE_FLTDIV;
                    } else if (n & 0x20) {
                        n = TARGET_FPE_FLTOVF;
                    } else if (n & 0x10) {
                        n = TARGET_FPE_FLTUND;
                    } else if (n & 0x08) {
                        n = TARGET_FPE_FLTRES;
                    } else {
                        /* ??? Quantum exception; BFP, DFP error.  */
                        goto do_sigill_opn;
                    }
3224
                    sig = TARGET_SIGFPE;
3225 3226 3227 3228 3229
                    goto do_signal_pc;
                }

            default:
                fprintf(stderr, "Unhandled program exception: %#x\n", n);
3230
                cpu_dump_state(cs, stderr, fprintf, 0);
3231
                exit(EXIT_FAILURE);
U
Ulrich Hecht 已提交
3232 3233
            }
            break;
3234 3235 3236 3237 3238 3239 3240 3241

        do_signal_pc:
            addr = env->psw.addr;
        do_signal:
            info.si_signo = sig;
            info.si_errno = 0;
            info.si_code = n;
            info._sifields._sigfault._addr = addr;
3242
            queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
U
Ulrich Hecht 已提交
3243
            break;
3244

R
Richard Henderson 已提交
3245 3246 3247
        case EXCP_ATOMIC:
            cpu_exec_step_atomic(cs);
            break;
U
Ulrich Hecht 已提交
3248
        default:
3249
            fprintf(stderr, "Unhandled trap: 0x%x\n", trapnr);
3250
            cpu_dump_state(cs, stderr, fprintf, 0);
3251
            exit(EXIT_FAILURE);
U
Ulrich Hecht 已提交
3252 3253 3254 3255 3256 3257 3258
        }
        process_pending_signals (env);
    }
}

#endif /* TARGET_S390X */

3259 3260 3261 3262 3263 3264 3265 3266 3267 3268
#ifdef TARGET_TILEGX

static void gen_sigill_reg(CPUTLGState *env)
{
    target_siginfo_t info;

    info.si_signo = TARGET_SIGILL;
    info.si_errno = 0;
    info.si_code = TARGET_ILL_PRVREG;
    info._sifields._sigfault._addr = env->pc;
3269
    queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
3270 3271
}

3272
static void do_signal(CPUTLGState *env, int signo, int sigcode)
3273 3274 3275
{
    target_siginfo_t info;

3276
    info.si_signo = signo;
3277 3278
    info.si_errno = 0;
    info._sifields._sigfault._addr = env->pc;
3279 3280 3281 3282 3283 3284 3285 3286 3287 3288 3289 3290 3291 3292

    if (signo == TARGET_SIGSEGV) {
        /* The passed in sigcode is a dummy; check for a page mapping
           and pass either MAPERR or ACCERR.  */
        target_ulong addr = env->excaddr;
        info._sifields._sigfault._addr = addr;
        if (page_check_range(addr, 1, PAGE_VALID) < 0) {
            sigcode = TARGET_SEGV_MAPERR;
        } else {
            sigcode = TARGET_SEGV_ACCERR;
        }
    }
    info.si_code = sigcode;

3293
    queue_signal(env, info.si_signo, QEMU_SI_FAULT, &info);
3294 3295
}

3296 3297 3298 3299 3300 3301
static void gen_sigsegv_maperr(CPUTLGState *env, target_ulong addr)
{
    env->excaddr = addr;
    do_signal(env, TARGET_SIGSEGV, 0);
}

3302 3303 3304 3305 3306 3307 3308 3309 3310 3311 3312 3313 3314 3315 3316 3317 3318 3319 3320 3321 3322 3323 3324 3325 3326 3327 3328 3329 3330 3331 3332 3333 3334 3335 3336 3337 3338 3339 3340 3341 3342 3343 3344 3345 3346 3347 3348 3349 3350 3351 3352 3353 3354 3355 3356 3357 3358 3359 3360 3361 3362 3363 3364 3365 3366 3367 3368 3369 3370 3371 3372 3373 3374 3375 3376 3377 3378 3379 3380 3381 3382 3383 3384 3385 3386 3387 3388 3389 3390 3391 3392 3393 3394 3395 3396 3397 3398 3399 3400 3401 3402 3403 3404 3405 3406 3407 3408 3409 3410 3411 3412 3413 3414 3415 3416 3417 3418 3419 3420 3421 3422 3423 3424 3425 3426 3427 3428 3429 3430 3431 3432 3433 3434 3435 3436 3437 3438 3439 3440 3441 3442 3443
static void set_regval(CPUTLGState *env, uint8_t reg, uint64_t val)
{
    if (unlikely(reg >= TILEGX_R_COUNT)) {
        switch (reg) {
        case TILEGX_R_SN:
        case TILEGX_R_ZERO:
            return;
        case TILEGX_R_IDN0:
        case TILEGX_R_IDN1:
        case TILEGX_R_UDN0:
        case TILEGX_R_UDN1:
        case TILEGX_R_UDN2:
        case TILEGX_R_UDN3:
            gen_sigill_reg(env);
            return;
        default:
            g_assert_not_reached();
        }
    }
    env->regs[reg] = val;
}

/*
 * Compare the 8-byte contents of the CmpValue SPR with the 8-byte value in
 * memory at the address held in the first source register. If the values are
 * not equal, then no memory operation is performed. If the values are equal,
 * the 8-byte quantity from the second source register is written into memory
 * at the address held in the first source register. In either case, the result
 * of the instruction is the value read from memory. The compare and write to
 * memory are atomic and thus can be used for synchronization purposes. This
 * instruction only operates for addresses aligned to a 8-byte boundary.
 * Unaligned memory access causes an Unaligned Data Reference interrupt.
 *
 * Functional Description (64-bit)
 *       uint64_t memVal = memoryReadDoubleWord (rf[SrcA]);
 *       rf[Dest] = memVal;
 *       if (memVal == SPR[CmpValueSPR])
 *           memoryWriteDoubleWord (rf[SrcA], rf[SrcB]);
 *
 * Functional Description (32-bit)
 *       uint64_t memVal = signExtend32 (memoryReadWord (rf[SrcA]));
 *       rf[Dest] = memVal;
 *       if (memVal == signExtend32 (SPR[CmpValueSPR]))
 *           memoryWriteWord (rf[SrcA], rf[SrcB]);
 *
 *
 * This function also processes exch and exch4 which need not process SPR.
 */
static void do_exch(CPUTLGState *env, bool quad, bool cmp)
{
    target_ulong addr;
    target_long val, sprval;

    start_exclusive();

    addr = env->atomic_srca;
    if (quad ? get_user_s64(val, addr) : get_user_s32(val, addr)) {
        goto sigsegv_maperr;
    }

    if (cmp) {
        if (quad) {
            sprval = env->spregs[TILEGX_SPR_CMPEXCH];
        } else {
            sprval = sextract64(env->spregs[TILEGX_SPR_CMPEXCH], 0, 32);
        }
    }

    if (!cmp || val == sprval) {
        target_long valb = env->atomic_srcb;
        if (quad ? put_user_u64(valb, addr) : put_user_u32(valb, addr)) {
            goto sigsegv_maperr;
        }
    }

    set_regval(env, env->atomic_dstr, val);
    end_exclusive();
    return;

 sigsegv_maperr:
    end_exclusive();
    gen_sigsegv_maperr(env, addr);
}

static void do_fetch(CPUTLGState *env, int trapnr, bool quad)
{
    int8_t write = 1;
    target_ulong addr;
    target_long val, valb;

    start_exclusive();

    addr = env->atomic_srca;
    valb = env->atomic_srcb;
    if (quad ? get_user_s64(val, addr) : get_user_s32(val, addr)) {
        goto sigsegv_maperr;
    }

    switch (trapnr) {
    case TILEGX_EXCP_OPCODE_FETCHADD:
    case TILEGX_EXCP_OPCODE_FETCHADD4:
        valb += val;
        break;
    case TILEGX_EXCP_OPCODE_FETCHADDGEZ:
        valb += val;
        if (valb < 0) {
            write = 0;
        }
        break;
    case TILEGX_EXCP_OPCODE_FETCHADDGEZ4:
        valb += val;
        if ((int32_t)valb < 0) {
            write = 0;
        }
        break;
    case TILEGX_EXCP_OPCODE_FETCHAND:
    case TILEGX_EXCP_OPCODE_FETCHAND4:
        valb &= val;
        break;
    case TILEGX_EXCP_OPCODE_FETCHOR:
    case TILEGX_EXCP_OPCODE_FETCHOR4:
        valb |= val;
        break;
    default:
        g_assert_not_reached();
    }

    if (write) {
        if (quad ? put_user_u64(valb, addr) : put_user_u32(valb, addr)) {
            goto sigsegv_maperr;
        }
    }

    set_regval(env, env->atomic_dstr, val);
    end_exclusive();
    return;

 sigsegv_maperr:
    end_exclusive();
    gen_sigsegv_maperr(env, addr);
}

3444 3445 3446 3447 3448 3449 3450
void cpu_loop(CPUTLGState *env)
{
    CPUState *cs = CPU(tilegx_env_get_cpu(env));
    int trapnr;

    while (1) {
        cpu_exec_start(cs);
3451
        trapnr = cpu_exec(cs);
3452
        cpu_exec_end(cs);
3453 3454
        process_queued_cpu_work(cs);

3455 3456
        switch (trapnr) {
        case TILEGX_EXCP_SYSCALL:
3457 3458 3459 3460 3461 3462 3463 3464 3465 3466 3467 3468
        {
            abi_ulong ret = do_syscall(env, env->regs[TILEGX_R_NR],
                                       env->regs[0], env->regs[1],
                                       env->regs[2], env->regs[3],
                                       env->regs[4], env->regs[5],
                                       env->regs[6], env->regs[7]);
            if (ret == -TARGET_ERESTARTSYS) {
                env->pc -= 8;
            } else if (ret != -TARGET_QEMU_ESIGRETURN) {
                env->regs[TILEGX_R_RE] = ret;
                env->regs[TILEGX_R_ERR] = TILEGX_IS_ERRNO(ret) ? -ret : 0;
            }
3469
            break;
3470
        }
3471 3472 3473 3474 3475 3476 3477 3478 3479 3480 3481 3482 3483 3484 3485 3486 3487 3488 3489 3490 3491 3492 3493 3494
        case TILEGX_EXCP_OPCODE_EXCH:
            do_exch(env, true, false);
            break;
        case TILEGX_EXCP_OPCODE_EXCH4:
            do_exch(env, false, false);
            break;
        case TILEGX_EXCP_OPCODE_CMPEXCH:
            do_exch(env, true, true);
            break;
        case TILEGX_EXCP_OPCODE_CMPEXCH4:
            do_exch(env, false, true);
            break;
        case TILEGX_EXCP_OPCODE_FETCHADD:
        case TILEGX_EXCP_OPCODE_FETCHADDGEZ:
        case TILEGX_EXCP_OPCODE_FETCHAND:
        case TILEGX_EXCP_OPCODE_FETCHOR:
            do_fetch(env, trapnr, true);
            break;
        case TILEGX_EXCP_OPCODE_FETCHADD4:
        case TILEGX_EXCP_OPCODE_FETCHADDGEZ4:
        case TILEGX_EXCP_OPCODE_FETCHAND4:
        case TILEGX_EXCP_OPCODE_FETCHOR4:
            do_fetch(env, trapnr, false);
            break;
3495
        case TILEGX_EXCP_SIGNAL:
3496
            do_signal(env, env->signo, env->sigcode);
3497
            break;
3498 3499 3500 3501
        case TILEGX_EXCP_REG_IDN_ACCESS:
        case TILEGX_EXCP_REG_UDN_ACCESS:
            gen_sigill_reg(env);
            break;
R
Richard Henderson 已提交
3502 3503 3504
        case EXCP_ATOMIC:
            cpu_exec_step_atomic(cs);
            break;
3505 3506 3507 3508 3509 3510 3511 3512 3513 3514
        default:
            fprintf(stderr, "trapnr is %d[0x%x].\n", trapnr, trapnr);
            g_assert_not_reached();
        }
        process_pending_signals(env);
    }
}

#endif

3515
THREAD CPUState *thread_cpu;
B
bellard 已提交
3516

3517 3518 3519 3520 3521 3522 3523 3524 3525 3526
bool qemu_cpu_is_self(CPUState *cpu)
{
    return thread_cpu == cpu;
}

void qemu_cpu_kick(CPUState *cpu)
{
    cpu_exit(cpu);
}

3527 3528 3529 3530 3531 3532 3533 3534 3535 3536 3537 3538 3539 3540 3541 3542
void task_settid(TaskState *ts)
{
    if (ts->ts_tid == 0) {
        ts->ts_tid = (pid_t)syscall(SYS_gettid);
    }
}

void stop_all_tasks(void)
{
    /*
     * We trust that when using NPTL, start_exclusive()
     * handles thread stopping correctly.
     */
    start_exclusive();
}

3543
/* Assumes contents are already zeroed.  */
P
pbrook 已提交
3544 3545 3546 3547
void init_task_state(TaskState *ts)
{
    ts->used = 1;
}
3548

3549 3550
CPUArchState *cpu_copy(CPUArchState *env)
{
3551
    CPUState *cpu = ENV_GET_CPU(env);
3552
    CPUState *new_cpu = cpu_init(cpu_model);
L
Leon Alrae 已提交
3553
    CPUArchState *new_env = new_cpu->env_ptr;
3554 3555 3556 3557
    CPUBreakpoint *bp;
    CPUWatchpoint *wp;

    /* Reset non arch specific state */
3558
    cpu_reset(new_cpu);
3559 3560 3561 3562 3563 3564

    memcpy(new_env, env, sizeof(CPUArchState));

    /* Clone all break/watchpoints.
       Note: Once we support ptrace with hw-debug register access, make sure
       BP_CPU break/watchpoints are handled correctly on clone. */
3565 3566
    QTAILQ_INIT(&new_cpu->breakpoints);
    QTAILQ_INIT(&new_cpu->watchpoints);
3567
    QTAILQ_FOREACH(bp, &cpu->breakpoints, entry) {
3568
        cpu_breakpoint_insert(new_cpu, bp->pc, bp->flags, NULL);
3569
    }
3570
    QTAILQ_FOREACH(wp, &cpu->watchpoints, entry) {
3571
        cpu_watchpoint_insert(new_cpu, wp->vaddr, wp->len, wp->flags, NULL);
3572 3573 3574 3575 3576
    }

    return new_env;
}

3577 3578
static void handle_arg_help(const char *arg)
{
3579
    usage(EXIT_SUCCESS);
3580 3581 3582 3583 3584 3585
}

static void handle_arg_log(const char *arg)
{
    int mask;

3586
    mask = qemu_str_to_log_mask(arg);
3587
    if (!mask) {
3588
        qemu_print_log_usage(stdout);
3589
        exit(EXIT_FAILURE);
3590
    }
P
Paolo Bonzini 已提交
3591
    qemu_log_needs_buffers();
3592
    qemu_set_log(mask);
3593 3594
}

3595 3596
static void handle_arg_log_filename(const char *arg)
{
3597
    qemu_set_log_filename(arg, &error_fatal);
3598 3599
}

3600 3601 3602 3603 3604 3605
static void handle_arg_set_env(const char *arg)
{
    char *r, *p, *token;
    r = p = strdup(arg);
    while ((token = strsep(&p, ",")) != NULL) {
        if (envlist_setenv(envlist, token) != 0) {
3606
            usage(EXIT_FAILURE);
3607 3608 3609 3610 3611 3612 3613 3614 3615 3616 3617
        }
    }
    free(r);
}

static void handle_arg_unset_env(const char *arg)
{
    char *r, *p, *token;
    r = p = strdup(arg);
    while ((token = strsep(&p, ",")) != NULL) {
        if (envlist_unsetenv(envlist, token) != 0) {
3618
            usage(EXIT_FAILURE);
3619 3620 3621 3622 3623 3624 3625 3626 3627 3628 3629 3630 3631 3632 3633
        }
    }
    free(r);
}

static void handle_arg_argv0(const char *arg)
{
    argv0 = strdup(arg);
}

static void handle_arg_stack_size(const char *arg)
{
    char *p;
    guest_stack_size = strtoul(arg, &p, 0);
    if (guest_stack_size == 0) {
3634
        usage(EXIT_FAILURE);
3635 3636 3637 3638 3639 3640 3641 3642 3643 3644 3645 3646 3647 3648 3649 3650 3651 3652 3653 3654
    }

    if (*p == 'M') {
        guest_stack_size *= 1024 * 1024;
    } else if (*p == 'k' || *p == 'K') {
        guest_stack_size *= 1024;
    }
}

static void handle_arg_ld_prefix(const char *arg)
{
    interp_prefix = strdup(arg);
}

static void handle_arg_pagesize(const char *arg)
{
    qemu_host_page_size = atoi(arg);
    if (qemu_host_page_size == 0 ||
        (qemu_host_page_size & (qemu_host_page_size - 1)) != 0) {
        fprintf(stderr, "page size must be a power of two\n");
3655
        exit(EXIT_FAILURE);
3656 3657 3658
    }
}

3659 3660 3661 3662 3663 3664
static void handle_arg_randseed(const char *arg)
{
    unsigned long long seed;

    if (parse_uint_full(arg, &seed, 0) != 0 || seed > UINT_MAX) {
        fprintf(stderr, "Invalid seed number: %s\n", arg);
3665
        exit(EXIT_FAILURE);
3666 3667 3668 3669
    }
    srand(seed);
}

3670 3671 3672 3673 3674 3675 3676 3677 3678 3679 3680 3681 3682
static void handle_arg_gdb(const char *arg)
{
    gdbstub_port = atoi(arg);
}

static void handle_arg_uname(const char *arg)
{
    qemu_uname_release = strdup(arg);
}

static void handle_arg_cpu(const char *arg)
{
    cpu_model = strdup(arg);
3683
    if (cpu_model == NULL || is_help_option(cpu_model)) {
3684
        /* XXX: implement xxx_cpu_list for targets that still miss it */
P
Peter Maydell 已提交
3685 3686
#if defined(cpu_list)
        cpu_list(stdout, &fprintf);
3687
#endif
3688
        exit(EXIT_FAILURE);
3689 3690 3691 3692 3693 3694 3695 3696 3697 3698 3699 3700 3701 3702 3703 3704 3705 3706 3707 3708 3709 3710 3711 3712 3713 3714 3715 3716 3717 3718 3719 3720 3721 3722 3723 3724
    }
}

static void handle_arg_guest_base(const char *arg)
{
    guest_base = strtol(arg, NULL, 0);
    have_guest_base = 1;
}

static void handle_arg_reserved_va(const char *arg)
{
    char *p;
    int shift = 0;
    reserved_va = strtoul(arg, &p, 0);
    switch (*p) {
    case 'k':
    case 'K':
        shift = 10;
        break;
    case 'M':
        shift = 20;
        break;
    case 'G':
        shift = 30;
        break;
    }
    if (shift) {
        unsigned long unshifted = reserved_va;
        p++;
        reserved_va <<= shift;
        if (((reserved_va >> shift) != unshifted)
#if HOST_LONG_BITS > TARGET_VIRT_ADDR_SPACE_BITS
            || (reserved_va > (1ul << TARGET_VIRT_ADDR_SPACE_BITS))
#endif
            ) {
            fprintf(stderr, "Reserved virtual address too big\n");
3725
            exit(EXIT_FAILURE);
3726 3727 3728 3729
        }
    }
    if (*p) {
        fprintf(stderr, "Unrecognised -R size suffix '%s'\n", p);
3730
        exit(EXIT_FAILURE);
3731 3732 3733 3734 3735 3736 3737 3738 3739 3740 3741 3742 3743 3744 3745
    }
}

static void handle_arg_singlestep(const char *arg)
{
    singlestep = 1;
}

static void handle_arg_strace(const char *arg)
{
    do_strace = 1;
}

static void handle_arg_version(const char *arg)
{
3746
    printf("qemu-" TARGET_NAME " version " QEMU_VERSION QEMU_PKGVERSION
3747
           "\n" QEMU_COPYRIGHT "\n");
3748
    exit(EXIT_SUCCESS);
3749 3750
}

3751 3752 3753 3754 3755 3756 3757
static char *trace_file;
static void handle_arg_trace(const char *arg)
{
    g_free(trace_file);
    trace_file = trace_opt_parse(arg);
}

3758 3759 3760 3761 3762 3763 3764 3765 3766
struct qemu_argument {
    const char *argv;
    const char *env;
    bool has_arg;
    void (*handle_opt)(const char *arg);
    const char *example;
    const char *help;
};

3767
static const struct qemu_argument arg_table[] = {
3768 3769
    {"h",          "",                 false, handle_arg_help,
     "",           "print this help"},
M
Meador Inge 已提交
3770 3771
    {"help",       "",                 false, handle_arg_help,
     "",           ""},
3772 3773 3774 3775 3776 3777 3778
    {"g",          "QEMU_GDB",         true,  handle_arg_gdb,
     "port",       "wait gdb connection to 'port'"},
    {"L",          "QEMU_LD_PREFIX",   true,  handle_arg_ld_prefix,
     "path",       "set the elf interpreter prefix to 'path'"},
    {"s",          "QEMU_STACK_SIZE",  true,  handle_arg_stack_size,
     "size",       "set the stack size to 'size' bytes"},
    {"cpu",        "QEMU_CPU",         true,  handle_arg_cpu,
3779
     "model",      "select CPU (-cpu help for list)"},
3780 3781 3782 3783 3784 3785 3786 3787 3788 3789 3790 3791 3792
    {"E",          "QEMU_SET_ENV",     true,  handle_arg_set_env,
     "var=value",  "sets targets environment variable (see below)"},
    {"U",          "QEMU_UNSET_ENV",   true,  handle_arg_unset_env,
     "var",        "unsets targets environment variable (see below)"},
    {"0",          "QEMU_ARGV0",       true,  handle_arg_argv0,
     "argv0",      "forces target process argv[0] to be 'argv0'"},
    {"r",          "QEMU_UNAME",       true,  handle_arg_uname,
     "uname",      "set qemu uname release string to 'uname'"},
    {"B",          "QEMU_GUEST_BASE",  true,  handle_arg_guest_base,
     "address",    "set guest_base address to 'address'"},
    {"R",          "QEMU_RESERVED_VA", true,  handle_arg_reserved_va,
     "size",       "reserve 'size' bytes for guest virtual address space"},
    {"d",          "QEMU_LOG",         true,  handle_arg_log,
3793 3794
     "item[,...]", "enable logging of specified items "
     "(use '-d help' for a list of items)"},
3795
    {"D",          "QEMU_LOG_FILENAME", true, handle_arg_log_filename,
3796
     "logfile",     "write logs to 'logfile' (default stderr)"},
3797 3798 3799 3800 3801 3802
    {"p",          "QEMU_PAGESIZE",    true,  handle_arg_pagesize,
     "pagesize",   "set the host page size to 'pagesize'"},
    {"singlestep", "QEMU_SINGLESTEP",  false, handle_arg_singlestep,
     "",           "run in singlestep mode"},
    {"strace",     "QEMU_STRACE",      false, handle_arg_strace,
     "",           "log system calls"},
3803 3804
    {"seed",       "QEMU_RAND_SEED",   true,  handle_arg_randseed,
     "",           "Seed for pseudo-random number generator"},
3805 3806
    {"trace",      "QEMU_TRACE",       true,  handle_arg_trace,
     "",           "[[enable=]<pattern>][,events=<file>][,file=<file>]"},
3807
    {"version",    "QEMU_VERSION",     false, handle_arg_version,
3808
     "",           "display version information and exit"},
3809 3810 3811
    {NULL, NULL, false, NULL, NULL, NULL}
};

M
Meador Inge 已提交
3812
static void usage(int exitcode)
3813
{
3814
    const struct qemu_argument *arginfo;
3815 3816 3817
    int maxarglen;
    int maxenvlen;

3818 3819
    printf("usage: qemu-" TARGET_NAME " [options] program [arguments...]\n"
           "Linux CPU emulator (compiled for " TARGET_NAME " emulation)\n"
3820 3821 3822 3823
           "\n"
           "Options and associated environment variables:\n"
           "\n");

3824 3825 3826 3827 3828
    /* Calculate column widths. We must always have at least enough space
     * for the column header.
     */
    maxarglen = strlen("Argument");
    maxenvlen = strlen("Env-variable");
3829 3830

    for (arginfo = arg_table; arginfo->handle_opt != NULL; arginfo++) {
3831 3832 3833 3834
        int arglen = strlen(arginfo->argv);
        if (arginfo->has_arg) {
            arglen += strlen(arginfo->example) + 1;
        }
3835 3836 3837
        if (strlen(arginfo->env) > maxenvlen) {
            maxenvlen = strlen(arginfo->env);
        }
3838 3839
        if (arglen > maxarglen) {
            maxarglen = arglen;
3840 3841 3842
        }
    }

3843 3844
    printf("%-*s %-*s Description\n", maxarglen+1, "Argument",
            maxenvlen, "Env-variable");
3845 3846 3847 3848

    for (arginfo = arg_table; arginfo->handle_opt != NULL; arginfo++) {
        if (arginfo->has_arg) {
            printf("-%s %-*s %-*s %s\n", arginfo->argv,
3849 3850
                   (int)(maxarglen - strlen(arginfo->argv) - 1),
                   arginfo->example, maxenvlen, arginfo->env, arginfo->help);
3851
        } else {
3852
            printf("-%-*s %-*s %s\n", maxarglen, arginfo->argv,
3853 3854 3855 3856 3857 3858 3859 3860
                    maxenvlen, arginfo->env,
                    arginfo->help);
        }
    }

    printf("\n"
           "Defaults:\n"
           "QEMU_LD_PREFIX  = %s\n"
3861
           "QEMU_STACK_SIZE = %ld byte\n",
3862
           interp_prefix,
3863
           guest_stack_size);
3864 3865 3866 3867 3868 3869 3870 3871 3872 3873 3874 3875 3876 3877 3878

    printf("\n"
           "You can use -E and -U options or the QEMU_SET_ENV and\n"
           "QEMU_UNSET_ENV environment variables to set and unset\n"
           "environment variables for the target process.\n"
           "It is possible to provide several variables by separating them\n"
           "by commas in getsubopt(3) style. Additionally it is possible to\n"
           "provide the -E and -U options multiple times.\n"
           "The following lines are equivalent:\n"
           "    -E var1=val2 -E var2=val2 -U LD_PRELOAD -U LD_DEBUG\n"
           "    -E var1=val2,var2=val2 -U LD_PRELOAD,LD_DEBUG\n"
           "    QEMU_SET_ENV=var1=val2,var2=val2 QEMU_UNSET_ENV=LD_PRELOAD,LD_DEBUG\n"
           "Note that if you provide several changes to a single variable\n"
           "the last change will stay in effect.\n");

M
Meador Inge 已提交
3879
    exit(exitcode);
3880 3881 3882 3883 3884 3885
}

static int parse_args(int argc, char **argv)
{
    const char *r;
    int optind;
3886
    const struct qemu_argument *arginfo;
3887 3888 3889 3890 3891 3892 3893 3894 3895 3896 3897 3898 3899 3900 3901 3902 3903 3904 3905 3906 3907 3908 3909 3910 3911 3912

    for (arginfo = arg_table; arginfo->handle_opt != NULL; arginfo++) {
        if (arginfo->env == NULL) {
            continue;
        }

        r = getenv(arginfo->env);
        if (r != NULL) {
            arginfo->handle_opt(r);
        }
    }

    optind = 1;
    for (;;) {
        if (optind >= argc) {
            break;
        }
        r = argv[optind];
        if (r[0] != '-') {
            break;
        }
        optind++;
        r++;
        if (!strcmp(r, "-")) {
            break;
        }
3913 3914 3915 3916
        /* Treat --foo the same as -foo.  */
        if (r[0] == '-') {
            r++;
        }
3917 3918 3919 3920

        for (arginfo = arg_table; arginfo->handle_opt != NULL; arginfo++) {
            if (!strcmp(r, arginfo->argv)) {
                if (arginfo->has_arg) {
3921
                    if (optind >= argc) {
3922 3923
                        (void) fprintf(stderr,
                            "qemu: missing argument for option '%s'\n", r);
3924
                        exit(EXIT_FAILURE);
3925 3926
                    }
                    arginfo->handle_opt(argv[optind]);
3927
                    optind++;
3928 3929
                } else {
                    arginfo->handle_opt(NULL);
3930 3931 3932 3933 3934 3935 3936
                }
                break;
            }
        }

        /* no option matched the current argv */
        if (arginfo->handle_opt == NULL) {
3937
            (void) fprintf(stderr, "qemu: unknown option '%s'\n", r);
3938
            exit(EXIT_FAILURE);
3939 3940 3941 3942
        }
    }

    if (optind >= argc) {
3943
        (void) fprintf(stderr, "qemu: no user program specified\n");
3944
        exit(EXIT_FAILURE);
3945 3946 3947 3948 3949 3950 3951 3952
    }

    filename = argv[optind];
    exec_path = argv[optind];

    return optind;
}

M
malc 已提交
3953
int main(int argc, char **argv, char **envp)
3954
{
B
bellard 已提交
3955
    struct target_pt_regs regs1, *regs = &regs1;
3956
    struct image_info info1, *info = &info1;
3957
    struct linux_binprm bprm;
3958
    TaskState *ts;
3959
    CPUArchState *env;
3960
    CPUState *cpu;
B
bellard 已提交
3961
    int optind;
3962
    char **target_environ, **wrk;
3963 3964 3965
    char **target_argv;
    int target_argc;
    int i;
3966
    int ret;
3967
    int execfd;
3968

3969
    module_call_init(MODULE_INIT_TRACE);
3970
    qemu_init_cpu_list();
3971 3972
    module_call_init(MODULE_INIT_QOM);

3973 3974
    if ((envlist = envlist_create()) == NULL) {
        (void) fprintf(stderr, "Unable to allocate envlist\n");
3975
        exit(EXIT_FAILURE);
3976 3977 3978 3979 3980 3981 3982
    }

    /* add current environment into the list */
    for (wrk = environ; *wrk != NULL; wrk++) {
        (void) envlist_setenv(envlist, *wrk);
    }

3983 3984 3985 3986 3987
    /* Read the stack limit from the kernel.  If it's "unlimited",
       then we can do little else besides use the default.  */
    {
        struct rlimit lim;
        if (getrlimit(RLIMIT_STACK, &lim) == 0
3988 3989
            && lim.rlim_cur != RLIM_INFINITY
            && lim.rlim_cur == (target_long)lim.rlim_cur) {
3990 3991 3992 3993
            guest_stack_size = lim.rlim_cur;
        }
    }

3994
    cpu_model = NULL;
3995

3996 3997
    srand(time(NULL));

3998 3999
    qemu_add_opts(&qemu_trace_opts);

4000
    optind = parse_args(argc, argv);
B
bellard 已提交
4001

4002 4003 4004 4005 4006
    if (!trace_init_backends()) {
        exit(1);
    }
    trace_init_file(trace_file);

4007
    /* Zero out regs */
B
bellard 已提交
4008
    memset(regs, 0, sizeof(struct target_pt_regs));
4009 4010 4011 4012

    /* Zero out image_info */
    memset(info, 0, sizeof(struct image_info));

4013 4014
    memset(&bprm, 0, sizeof (bprm));

B
bellard 已提交
4015 4016 4017
    /* Scan interp_prefix dir for replacement files. */
    init_paths(interp_prefix);

4018 4019
    init_qemu_uname_release();

4020
    if (cpu_model == NULL) {
B
bellard 已提交
4021
#if defined(TARGET_I386)
4022 4023 4024 4025 4026
#ifdef TARGET_X86_64
        cpu_model = "qemu64";
#else
        cpu_model = "qemu32";
#endif
B
bellard 已提交
4027
#elif defined(TARGET_ARM)
4028
        cpu_model = "any";
4029 4030
#elif defined(TARGET_UNICORE32)
        cpu_model = "any";
B
bellard 已提交
4031 4032 4033 4034 4035 4036 4037
#elif defined(TARGET_M68K)
        cpu_model = "any";
#elif defined(TARGET_SPARC)
#ifdef TARGET_SPARC64
        cpu_model = "TI UltraSparc II";
#else
        cpu_model = "Fujitsu MB86904";
4038
#endif
B
bellard 已提交
4039 4040
#elif defined(TARGET_MIPS)
#if defined(TARGET_ABI_MIPSN32) || defined(TARGET_ABI_MIPSN64)
4041
        cpu_model = "5KEf";
B
bellard 已提交
4042 4043 4044
#else
        cpu_model = "24Kf";
#endif
J
Jia Liu 已提交
4045 4046
#elif defined TARGET_OPENRISC
        cpu_model = "or1200";
B
bellard 已提交
4047
#elif defined(TARGET_PPC)
4048
# ifdef TARGET_PPC64
4049
        cpu_model = "POWER8";
4050
# else
B
bellard 已提交
4051
        cpu_model = "750";
4052
# endif
4053 4054
#elif defined TARGET_SH4
        cpu_model = TYPE_SH7785_CPU;
B
bellard 已提交
4055 4056 4057 4058
#else
        cpu_model = "any";
#endif
    }
4059
    tcg_exec_init(0);
4060 4061
    /* NOTE: we need to init the CPU at this stage to get
       qemu_host_page_size */
4062 4063
    cpu = cpu_init(cpu_model);
    if (!cpu) {
B
bellard 已提交
4064
        fprintf(stderr, "Unable to find CPU definition\n");
4065
        exit(EXIT_FAILURE);
B
bellard 已提交
4066
    }
4067
    env = cpu->env_ptr;
4068
    cpu_reset(cpu);
4069

4070
    thread_cpu = cpu;
4071

B
bellard 已提交
4072 4073
    if (getenv("QEMU_STRACE")) {
        do_strace = 1;
4074 4075
    }

4076 4077 4078 4079
    if (getenv("QEMU_RAND_SEED")) {
        handle_arg_randseed(getenv("QEMU_RAND_SEED"));
    }

4080 4081
    target_environ = envlist_to_environ(envlist, NULL);
    envlist_free(envlist);
4082

P
Paul Brook 已提交
4083 4084 4085 4086 4087
    /*
     * Now that page sizes are configured in cpu_init() we can do
     * proper page alignment for guest_base.
     */
    guest_base = HOST_PAGE_ALIGN(guest_base);
P
Paul Brook 已提交
4088

4089 4090 4091 4092
    if (reserved_va || have_guest_base) {
        guest_base = init_guest_space(guest_base, reserved_va, 0,
                                      have_guest_base);
        if (guest_base == (unsigned long)-1) {
4093 4094 4095 4096
            fprintf(stderr, "Unable to reserve 0x%lx bytes of virtual address "
                    "space for use as guest address space (check your virtual "
                    "memory ulimit setting or reserve less using -R option)\n",
                    reserved_va);
4097
            exit(EXIT_FAILURE);
P
Paul Brook 已提交
4098
        }
4099

4100 4101
        if (reserved_va) {
            mmap_next_start = reserved_va;
4102 4103
        }
    }
P
Paul Brook 已提交
4104 4105 4106 4107

    /*
     * Read in mmap_min_addr kernel parameter.  This value is used
     * When loading the ELF image to determine whether guest_base
4108
     * is needed.  It is also used in mmap_find_vma.
P
Paul Brook 已提交
4109
     */
4110
    {
P
Paul Brook 已提交
4111 4112 4113 4114 4115 4116
        FILE *fp;

        if ((fp = fopen("/proc/sys/vm/mmap_min_addr", "r")) != NULL) {
            unsigned long tmp;
            if (fscanf(fp, "%lu", &tmp) == 1) {
                mmap_min_addr = tmp;
P
Paolo Bonzini 已提交
4117
                qemu_log_mask(CPU_LOG_PAGE, "host mmap_min_addr=0x%lx\n", mmap_min_addr);
P
Paul Brook 已提交
4118 4119 4120 4121 4122
            }
            fclose(fp);
        }
    }

4123 4124 4125 4126 4127 4128 4129
    /*
     * Prepare copy of argv vector for target.
     */
    target_argc = argc - optind;
    target_argv = calloc(target_argc + 1, sizeof (char *));
    if (target_argv == NULL) {
	(void) fprintf(stderr, "Unable to allocate memory for target_argv\n");
4130
	exit(EXIT_FAILURE);
4131 4132 4133 4134 4135 4136 4137 4138 4139 4140 4141 4142 4143 4144 4145
    }

    /*
     * If argv0 is specified (using '-0' switch) we replace
     * argv[0] pointer with the given one.
     */
    i = 0;
    if (argv0 != NULL) {
        target_argv[i++] = strdup(argv0);
    }
    for (; i < target_argc; i++) {
        target_argv[i] = strdup(argv[optind + i]);
    }
    target_argv[target_argc] = NULL;

4146
    ts = g_new0(TaskState, 1);
4147 4148 4149 4150
    init_task_state(ts);
    /* build Task State */
    ts->info = info;
    ts->bprm = &bprm;
4151
    cpu->opaque = ts;
4152 4153
    task_settid(ts);

4154 4155
    execfd = qemu_getauxval(AT_EXECFD);
    if (execfd == 0) {
4156
        execfd = open(filename, O_RDONLY);
4157 4158
        if (execfd < 0) {
            printf("Error while loading %s: %s\n", filename, strerror(errno));
4159
            _exit(EXIT_FAILURE);
4160
        }
4161 4162 4163
    }

    ret = loader_exec(execfd, filename, target_argv, target_environ, regs,
4164 4165
        info, &bprm);
    if (ret != 0) {
4166
        printf("Error while loading %s: %s\n", filename, strerror(-ret));
4167
        _exit(EXIT_FAILURE);
4168 4169 4170 4171
    }

    for (wrk = target_environ; *wrk; wrk++) {
        free(*wrk);
4172
    }
4173

4174 4175
    free(target_environ);

P
Paolo Bonzini 已提交
4176
    if (qemu_loglevel_mask(CPU_LOG_PAGE)) {
P
Paul Brook 已提交
4177
        qemu_log("guest_base  0x%lx\n", guest_base);
4178 4179 4180 4181 4182 4183 4184 4185 4186 4187 4188 4189 4190 4191
        log_page_dump();

        qemu_log("start_brk   0x" TARGET_ABI_FMT_lx "\n", info->start_brk);
        qemu_log("end_code    0x" TARGET_ABI_FMT_lx "\n", info->end_code);
        qemu_log("start_code  0x" TARGET_ABI_FMT_lx "\n",
                 info->start_code);
        qemu_log("start_data  0x" TARGET_ABI_FMT_lx "\n",
                 info->start_data);
        qemu_log("end_data    0x" TARGET_ABI_FMT_lx "\n", info->end_data);
        qemu_log("start_stack 0x" TARGET_ABI_FMT_lx "\n",
                 info->start_stack);
        qemu_log("brk         0x" TARGET_ABI_FMT_lx "\n", info->brk);
        qemu_log("entry       0x" TARGET_ABI_FMT_lx "\n", info->entry);
    }
4192

4193
    target_set_brk(info->brk);
4194
    syscall_init();
B
bellard 已提交
4195
    signal_init();
4196

4197 4198 4199 4200 4201
    /* Now that we've loaded the binary, GUEST_BASE is fixed.  Delay
       generating the prologue until now so that the prologue can take
       the real value of GUEST_BASE into account.  */
    tcg_prologue_init(&tcg_ctx);

B
bellard 已提交
4202
#if defined(TARGET_I386)
B
bellard 已提交
4203
    env->cr[0] = CR0_PG_MASK | CR0_WP_MASK | CR0_PE_MASK;
4204
    env->hflags |= HF_PE_MASK | HF_CPL_MASK;
4205
    if (env->features[FEAT_1_EDX] & CPUID_SSE) {
B
sse fix  
bellard 已提交
4206 4207 4208
        env->cr[4] |= CR4_OSFXSR_MASK;
        env->hflags |= HF_OSFXSR_MASK;
    }
B
bellard 已提交
4209
#ifndef TARGET_ABI32
B
bellard 已提交
4210
    /* enable 64 bit mode if possible */
4211
    if (!(env->features[FEAT_8000_0001_EDX] & CPUID_EXT2_LM)) {
B
bellard 已提交
4212
        fprintf(stderr, "The selected x86 CPU does not support 64 bit mode\n");
4213
        exit(EXIT_FAILURE);
B
bellard 已提交
4214
    }
B
bellard 已提交
4215
    env->cr[4] |= CR4_PAE_MASK;
B
bellard 已提交
4216
    env->efer |= MSR_EFER_LMA | MSR_EFER_LME;
B
bellard 已提交
4217 4218
    env->hflags |= HF_LMA_MASK;
#endif
B
sse fix  
bellard 已提交
4219

B
cleanup  
bellard 已提交
4220 4221
    /* flags setup : we activate the IRQs by default as in user mode */
    env->eflags |= IF_MASK;
4222

B
bellard 已提交
4223
    /* linux register setup */
B
bellard 已提交
4224
#ifndef TARGET_ABI32
4225 4226 4227 4228 4229 4230 4231 4232 4233 4234
    env->regs[R_EAX] = regs->rax;
    env->regs[R_EBX] = regs->rbx;
    env->regs[R_ECX] = regs->rcx;
    env->regs[R_EDX] = regs->rdx;
    env->regs[R_ESI] = regs->rsi;
    env->regs[R_EDI] = regs->rdi;
    env->regs[R_EBP] = regs->rbp;
    env->regs[R_ESP] = regs->rsp;
    env->eip = regs->rip;
#else
B
bellard 已提交
4235 4236 4237 4238 4239 4240 4241 4242
    env->regs[R_EAX] = regs->eax;
    env->regs[R_EBX] = regs->ebx;
    env->regs[R_ECX] = regs->ecx;
    env->regs[R_EDX] = regs->edx;
    env->regs[R_ESI] = regs->esi;
    env->regs[R_EDI] = regs->edi;
    env->regs[R_EBP] = regs->ebp;
    env->regs[R_ESP] = regs->esp;
B
bellard 已提交
4243
    env->eip = regs->eip;
4244
#endif
4245

4246
    /* linux interrupt setup */
4247 4248 4249 4250 4251 4252 4253 4254 4255
#ifndef TARGET_ABI32
    env->idt.limit = 511;
#else
    env->idt.limit = 255;
#endif
    env->idt.base = target_mmap(0, sizeof(uint64_t) * (env->idt.limit + 1),
                                PROT_READ|PROT_WRITE,
                                MAP_ANONYMOUS|MAP_PRIVATE, -1, 0);
    idt_table = g2h(env->idt.base);
4256 4257 4258 4259 4260
    set_idt(0, 0);
    set_idt(1, 0);
    set_idt(2, 0);
    set_idt(3, 3);
    set_idt(4, 3);
B
bellard 已提交
4261
    set_idt(5, 0);
4262 4263 4264 4265 4266 4267 4268 4269 4270 4271 4272 4273 4274 4275 4276 4277
    set_idt(6, 0);
    set_idt(7, 0);
    set_idt(8, 0);
    set_idt(9, 0);
    set_idt(10, 0);
    set_idt(11, 0);
    set_idt(12, 0);
    set_idt(13, 0);
    set_idt(14, 0);
    set_idt(15, 0);
    set_idt(16, 0);
    set_idt(17, 0);
    set_idt(18, 0);
    set_idt(19, 0);
    set_idt(0x80, 3);

B
bellard 已提交
4278
    /* linux segment setup */
B
bellard 已提交
4279 4280
    {
        uint64_t *gdt_table;
4281 4282 4283
        env->gdt.base = target_mmap(0, sizeof(uint64_t) * TARGET_GDT_ENTRIES,
                                    PROT_READ|PROT_WRITE,
                                    MAP_ANONYMOUS|MAP_PRIVATE, -1, 0);
B
bellard 已提交
4284
        env->gdt.limit = sizeof(uint64_t) * TARGET_GDT_ENTRIES - 1;
4285
        gdt_table = g2h(env->gdt.base);
B
bellard 已提交
4286
#ifdef TARGET_ABI32
B
bellard 已提交
4287 4288 4289
        write_dt(&gdt_table[__USER_CS >> 3], 0, 0xfffff,
                 DESC_G_MASK | DESC_B_MASK | DESC_P_MASK | DESC_S_MASK |
                 (3 << DESC_DPL_SHIFT) | (0xa << DESC_TYPE_SHIFT));
B
bellard 已提交
4290 4291 4292 4293 4294 4295 4296
#else
        /* 64 bit code segment */
        write_dt(&gdt_table[__USER_CS >> 3], 0, 0xfffff,
                 DESC_G_MASK | DESC_B_MASK | DESC_P_MASK | DESC_S_MASK |
                 DESC_L_MASK |
                 (3 << DESC_DPL_SHIFT) | (0xa << DESC_TYPE_SHIFT));
#endif
B
bellard 已提交
4297 4298 4299 4300
        write_dt(&gdt_table[__USER_DS >> 3], 0, 0xfffff,
                 DESC_G_MASK | DESC_B_MASK | DESC_P_MASK | DESC_S_MASK |
                 (3 << DESC_DPL_SHIFT) | (0x2 << DESC_TYPE_SHIFT));
    }
B
bellard 已提交
4301
    cpu_x86_load_seg(env, R_CS, __USER_CS);
B
bellard 已提交
4302 4303
    cpu_x86_load_seg(env, R_SS, __USER_DS);
#ifdef TARGET_ABI32
B
bellard 已提交
4304 4305 4306 4307
    cpu_x86_load_seg(env, R_DS, __USER_DS);
    cpu_x86_load_seg(env, R_ES, __USER_DS);
    cpu_x86_load_seg(env, R_FS, __USER_DS);
    cpu_x86_load_seg(env, R_GS, __USER_DS);
4308 4309
    /* This hack makes Wine work... */
    env->segs[R_FS].selector = 0;
B
bellard 已提交
4310 4311 4312 4313 4314 4315
#else
    cpu_x86_load_seg(env, R_DS, 0);
    cpu_x86_load_seg(env, R_ES, 0);
    cpu_x86_load_seg(env, R_FS, 0);
    cpu_x86_load_seg(env, R_GS, 0);
#endif
A
Alexander Graf 已提交
4316 4317 4318 4319 4320 4321 4322
#elif defined(TARGET_AARCH64)
    {
        int i;

        if (!(arm_feature(env, ARM_FEATURE_AARCH64))) {
            fprintf(stderr,
                    "The selected ARM CPU does not support 64 bit mode\n");
4323
            exit(EXIT_FAILURE);
A
Alexander Graf 已提交
4324 4325 4326 4327 4328 4329 4330 4331
        }

        for (i = 0; i < 31; i++) {
            env->xregs[i] = regs->regs[i];
        }
        env->pc = regs->pc;
        env->xregs[31] = regs->sp;
    }
B
bellard 已提交
4332 4333 4334
#elif defined(TARGET_ARM)
    {
        int i;
4335 4336
        cpsr_write(env, regs->uregs[16], CPSR_USER | CPSR_EXEC,
                   CPSRWriteByInstr);
B
bellard 已提交
4337 4338 4339
        for(i = 0; i < 16; i++) {
            env->regs[i] = regs->uregs[i];
        }
4340
#ifdef TARGET_WORDS_BIGENDIAN
P
Paul Brook 已提交
4341 4342 4343
        /* Enable BE8.  */
        if (EF_ARM_EABI_VERSION(info->elf_flags) >= EF_ARM_EABI_VER4
            && (info->elf_flags & EF_ARM_BE8)) {
4344 4345
            env->uncached_cpsr |= CPSR_E;
            env->cp15.sctlr_el[1] |= SCTLR_E0E;
4346 4347
        } else {
            env->cp15.sctlr_el[1] |= SCTLR_B;
P
Paul Brook 已提交
4348
        }
4349
#endif
B
bellard 已提交
4350
    }
4351 4352 4353 4354 4355 4356 4357 4358
#elif defined(TARGET_UNICORE32)
    {
        int i;
        cpu_asr_write(env, regs->uregs[32], 0xffffffff);
        for (i = 0; i < 32; i++) {
            env->regs[i] = regs->uregs[i];
        }
    }
4359
#elif defined(TARGET_SPARC)
4360 4361 4362 4363 4364 4365 4366 4367 4368 4369
    {
        int i;
	env->pc = regs->pc;
	env->npc = regs->npc;
        env->y = regs->y;
        for(i = 0; i < 8; i++)
            env->gregs[i] = regs->u_regs[i];
        for(i = 0; i < 8; i++)
            env->regwptr[i] = regs->u_regs[i + 8];
    }
4370 4371 4372
#elif defined(TARGET_PPC)
    {
        int i;
4373

4374
#if defined(TARGET_PPC64)
4375
        int flag = (env->insns_flags2 & PPC2_BOOKE206) ? MSR_CM : MSR_SF;
4376
#if defined(TARGET_ABI32)
4377
        env->msr &= ~((target_ulong)1 << flag);
4378
#else
4379
        env->msr |= (target_ulong)1 << flag;
4380
#endif
4381
#endif
4382 4383 4384 4385 4386
        env->nip = regs->nip;
        for(i = 0; i < 32; i++) {
            env->gpr[i] = regs->gpr[i];
        }
    }
P
pbrook 已提交
4387 4388 4389 4390 4391 4392 4393 4394 4395 4396 4397 4398 4399 4400 4401 4402 4403 4404 4405 4406 4407 4408
#elif defined(TARGET_M68K)
    {
        env->pc = regs->pc;
        env->dregs[0] = regs->d0;
        env->dregs[1] = regs->d1;
        env->dregs[2] = regs->d2;
        env->dregs[3] = regs->d3;
        env->dregs[4] = regs->d4;
        env->dregs[5] = regs->d5;
        env->dregs[6] = regs->d6;
        env->dregs[7] = regs->d7;
        env->aregs[0] = regs->a0;
        env->aregs[1] = regs->a1;
        env->aregs[2] = regs->a2;
        env->aregs[3] = regs->a3;
        env->aregs[4] = regs->a4;
        env->aregs[5] = regs->a5;
        env->aregs[6] = regs->a6;
        env->aregs[7] = regs->usp;
        env->sr = regs->sr;
        ts->sim_syscalls = 1;
    }
4409 4410 4411 4412 4413 4414 4415 4416 4417 4418 4419 4420 4421 4422 4423 4424 4425 4426 4427 4428 4429 4430 4431 4432 4433 4434 4435 4436 4437 4438 4439 4440 4441 4442 4443 4444
#elif defined(TARGET_MICROBLAZE)
    {
        env->regs[0] = regs->r0;
        env->regs[1] = regs->r1;
        env->regs[2] = regs->r2;
        env->regs[3] = regs->r3;
        env->regs[4] = regs->r4;
        env->regs[5] = regs->r5;
        env->regs[6] = regs->r6;
        env->regs[7] = regs->r7;
        env->regs[8] = regs->r8;
        env->regs[9] = regs->r9;
        env->regs[10] = regs->r10;
        env->regs[11] = regs->r11;
        env->regs[12] = regs->r12;
        env->regs[13] = regs->r13;
        env->regs[14] = regs->r14;
        env->regs[15] = regs->r15;	    
        env->regs[16] = regs->r16;	    
        env->regs[17] = regs->r17;	    
        env->regs[18] = regs->r18;	    
        env->regs[19] = regs->r19;	    
        env->regs[20] = regs->r20;	    
        env->regs[21] = regs->r21;	    
        env->regs[22] = regs->r22;	    
        env->regs[23] = regs->r23;	    
        env->regs[24] = regs->r24;	    
        env->regs[25] = regs->r25;	    
        env->regs[26] = regs->r26;	    
        env->regs[27] = regs->r27;	    
        env->regs[28] = regs->r28;	    
        env->regs[29] = regs->r29;	    
        env->regs[30] = regs->r30;	    
        env->regs[31] = regs->r31;	    
        env->sregs[SR_PC] = regs->pc;
    }
B
bellard 已提交
4445 4446 4447 4448 4449
#elif defined(TARGET_MIPS)
    {
        int i;

        for(i = 0; i < 32; i++) {
4450
            env->active_tc.gpr[i] = regs->regs[i];
B
bellard 已提交
4451
        }
4452 4453 4454 4455
        env->active_tc.PC = regs->cp0_epc & ~(target_ulong)1;
        if (regs->cp0_epc & 1) {
            env->hflags |= MIPS_HFLAG_M16;
        }
4456 4457 4458 4459 4460 4461 4462 4463 4464 4465 4466 4467 4468 4469
        if (((info->elf_flags & EF_MIPS_NAN2008) != 0) !=
            ((env->active_fpu.fcr31 & (1 << FCR31_NAN2008)) != 0)) {
            if ((env->active_fpu.fcr31_rw_bitmask &
                  (1 << FCR31_NAN2008)) == 0) {
                fprintf(stderr, "ELF binary's NaN mode not supported by CPU\n");
                exit(1);
            }
            if ((info->elf_flags & EF_MIPS_NAN2008) != 0) {
                env->active_fpu.fcr31 |= (1 << FCR31_NAN2008);
            } else {
                env->active_fpu.fcr31 &= ~(1 << FCR31_NAN2008);
            }
            restore_snan_bit_mode(env);
        }
B
bellard 已提交
4470
    }
J
Jia Liu 已提交
4471 4472 4473 4474 4475 4476 4477 4478 4479 4480 4481
#elif defined(TARGET_OPENRISC)
    {
        int i;

        for (i = 0; i < 32; i++) {
            env->gpr[i] = regs->gpr[i];
        }

        env->sr = regs->sr;
        env->pc = regs->pc;
    }
B
bellard 已提交
4482 4483 4484 4485 4486 4487 4488 4489 4490
#elif defined(TARGET_SH4)
    {
        int i;

        for(i = 0; i < 16; i++) {
            env->gregs[i] = regs->regs[i];
        }
        env->pc = regs->pc;
    }
4491 4492 4493 4494 4495
#elif defined(TARGET_ALPHA)
    {
        int i;

        for(i = 0; i < 28; i++) {
4496
            env->ir[i] = ((abi_ulong *)regs)[i];
4497
        }
4498
        env->ir[IR_SP] = regs->usp;
4499 4500
        env->pc = regs->pc;
    }
4501 4502 4503 4504 4505 4506 4507 4508 4509 4510 4511 4512 4513 4514 4515 4516 4517 4518 4519 4520
#elif defined(TARGET_CRIS)
    {
	    env->regs[0] = regs->r0;
	    env->regs[1] = regs->r1;
	    env->regs[2] = regs->r2;
	    env->regs[3] = regs->r3;
	    env->regs[4] = regs->r4;
	    env->regs[5] = regs->r5;
	    env->regs[6] = regs->r6;
	    env->regs[7] = regs->r7;
	    env->regs[8] = regs->r8;
	    env->regs[9] = regs->r9;
	    env->regs[10] = regs->r10;
	    env->regs[11] = regs->r11;
	    env->regs[12] = regs->r12;
	    env->regs[13] = regs->r13;
	    env->regs[14] = info->start_stack;
	    env->regs[15] = regs->acr;	    
	    env->pc = regs->erp;
    }
U
Ulrich Hecht 已提交
4521 4522 4523 4524 4525 4526 4527 4528 4529
#elif defined(TARGET_S390X)
    {
            int i;
            for (i = 0; i < 16; i++) {
                env->regs[i] = regs->gprs[i];
            }
            env->psw.mask = regs->psw.mask;
            env->psw.addr = regs->psw.addr;
    }
4530 4531 4532 4533 4534 4535 4536 4537 4538 4539 4540
#elif defined(TARGET_TILEGX)
    {
        int i;
        for (i = 0; i < TILEGX_R_COUNT; i++) {
            env->regs[i] = regs->regs[i];
        }
        for (i = 0; i < TILEGX_SPR_COUNT; i++) {
            env->spregs[i] = 0;
        }
        env->pc = regs->pc;
    }
B
bellard 已提交
4541 4542 4543
#else
#error unsupported target CPU
#endif
4544

4545
#if defined(TARGET_ARM) || defined(TARGET_M68K) || defined(TARGET_UNICORE32)
P
pbrook 已提交
4546 4547 4548 4549 4550 4551
    ts->stack_base = info->start_stack;
    ts->heap_base = info->brk;
    /* This will be filled in on the first SYS_HEAPINFO call.  */
    ts->heap_limit = 0;
#endif

4552
    if (gdbstub_port) {
4553 4554 4555
        if (gdbserver_start(gdbstub_port) < 0) {
            fprintf(stderr, "qemu: could not open gdbserver on port %d\n",
                    gdbstub_port);
4556
            exit(EXIT_FAILURE);
4557
        }
4558
        gdb_handlesig(cpu, 0);
B
bellard 已提交
4559
    }
B
bellard 已提交
4560 4561
    cpu_loop(env);
    /* never exits */
4562 4563
    return 0;
}