Statistics
| Branch: | Revision:

root / linux-user / main.c @ a32ff1ad

History | View | Annotate | Download (73.2 kB)

1
/*
2
 *  qemu user main
3
 *
4
 *  Copyright (c) 2003 Fabrice Bellard
5
 *
6
 *  This program is free software; you can redistribute it and/or modify
7
 *  it under the terms of the GNU General Public License as published by
8
 *  the Free Software Foundation; either version 2 of the License, or
9
 *  (at your option) any later version.
10
 *
11
 *  This program is distributed in the hope that it will be useful,
12
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
13
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14
 *  GNU General Public License for more details.
15
 *
16
 *  You should have received a copy of the GNU General Public License
17
 *  along with this program; if not, write to the Free Software
18
 *  Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
19
 */
20
#include <stdlib.h>
21
#include <stdio.h>
22
#include <stdarg.h>
23
#include <string.h>
24
#include <errno.h>
25
#include <unistd.h>
26

    
27
#include "qemu.h"
28

    
29
#define DEBUG_LOGFILE "/tmp/qemu.log"
30

    
31
#ifdef __APPLE__
32
#include <crt_externs.h>
33
# define environ  (*_NSGetEnviron())
34
#endif
35

    
36
static const char *interp_prefix = CONFIG_QEMU_PREFIX;
37
const char *qemu_uname_release = CONFIG_UNAME_RELEASE;
38

    
39
#if defined(__i386__) && !defined(CONFIG_STATIC)
40
/* Force usage of an ELF interpreter even if it is an ELF shared
41
   object ! */
42
const char interp[] __attribute__((section(".interp"))) = "/lib/ld-linux.so.2";
43
#endif
44

    
45
/* for recent libc, we add these dummy symbols which are not declared
46
   when generating a linked object (bug in ld ?) */
47
#if (__GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 3)) && !defined(CONFIG_STATIC)
48
long __preinit_array_start[0];
49
long __preinit_array_end[0];
50
long __init_array_start[0];
51
long __init_array_end[0];
52
long __fini_array_start[0];
53
long __fini_array_end[0];
54
#endif
55

    
56
/* XXX: on x86 MAP_GROWSDOWN only works if ESP <= address + 32, so
57
   we allocate a bigger stack. Need a better solution, for example
58
   by remapping the process stack directly at the right place */
59
unsigned long x86_stack_size = 512 * 1024;
60

    
61
void gemu_log(const char *fmt, ...)
62
{
63
    va_list ap;
64

    
65
    va_start(ap, fmt);
66
    vfprintf(stderr, fmt, ap);
67
    va_end(ap);
68
}
69

    
70
void cpu_outb(CPUState *env, int addr, int val)
71
{
72
    fprintf(stderr, "outb: port=0x%04x, data=%02x\n", addr, val);
73
}
74

    
75
void cpu_outw(CPUState *env, int addr, int val)
76
{
77
    fprintf(stderr, "outw: port=0x%04x, data=%04x\n", addr, val);
78
}
79

    
80
void cpu_outl(CPUState *env, int addr, int val)
81
{
82
    fprintf(stderr, "outl: port=0x%04x, data=%08x\n", addr, val);
83
}
84

    
85
int cpu_inb(CPUState *env, int addr)
86
{
87
    fprintf(stderr, "inb: port=0x%04x\n", addr);
88
    return 0;
89
}
90

    
91
int cpu_inw(CPUState *env, int addr)
92
{
93
    fprintf(stderr, "inw: port=0x%04x\n", addr);
94
    return 0;
95
}
96

    
97
int cpu_inl(CPUState *env, int addr)
98
{
99
    fprintf(stderr, "inl: port=0x%04x\n", addr);
100
    return 0;
101
}
102

    
103
int cpu_get_pic_interrupt(CPUState *env)
104
{
105
    return -1;
106
}
107

    
108
/* timers for rdtsc */
109

    
110
#if 0
111

112
static uint64_t emu_time;
113

114
int64_t cpu_get_real_ticks(void)
115
{
116
    return emu_time++;
117
}
118

119
#endif
120

    
121
#ifdef TARGET_I386
122
/***********************************************************/
123
/* CPUX86 core interface */
124

    
125
void cpu_smm_update(CPUState *env)
126
{
127
}
128

    
129
uint64_t cpu_get_tsc(CPUX86State *env)
130
{
131
    return cpu_get_real_ticks();
132
}
133

    
134
static void write_dt(void *ptr, unsigned long addr, unsigned long limit,
135
                     int flags)
136
{
137
    unsigned int e1, e2;
138
    uint32_t *p;
139
    e1 = (addr << 16) | (limit & 0xffff);
140
    e2 = ((addr >> 16) & 0xff) | (addr & 0xff000000) | (limit & 0x000f0000);
141
    e2 |= flags;
142
    p = ptr;
143
    p[0] = tswapl(e1);
144
    p[1] = tswapl(e2);
145
}
146

    
147
static void set_gate(void *ptr, unsigned int type, unsigned int dpl,
148
                     unsigned long addr, unsigned int sel)
149
{
150
    unsigned int e1, e2;
151
    uint32_t *p;
152
    e1 = (addr & 0xffff) | (sel << 16);
153
    e2 = (addr & 0xffff0000) | 0x8000 | (dpl << 13) | (type << 8);
154
    p = ptr;
155
    p[0] = tswapl(e1);
156
    p[1] = tswapl(e2);
157
}
158

    
159
uint64_t gdt_table[6];
160
uint64_t idt_table[256];
161

    
162
/* only dpl matters as we do only user space emulation */
163
static void set_idt(int n, unsigned int dpl)
164
{
165
    set_gate(idt_table + n, 0, dpl, 0, 0);
166
}
167

    
168
void cpu_loop(CPUX86State *env)
169
{
170
    int trapnr;
171
    abi_ulong pc;
172
    target_siginfo_t info;
173

    
174
    for(;;) {
175
        trapnr = cpu_x86_exec(env);
176
        switch(trapnr) {
177
        case 0x80:
178
            /* linux syscall */
179
            env->regs[R_EAX] = do_syscall(env,
180
                                          env->regs[R_EAX],
181
                                          env->regs[R_EBX],
182
                                          env->regs[R_ECX],
183
                                          env->regs[R_EDX],
184
                                          env->regs[R_ESI],
185
                                          env->regs[R_EDI],
186
                                          env->regs[R_EBP]);
187
            break;
188
        case EXCP0B_NOSEG:
189
        case EXCP0C_STACK:
190
            info.si_signo = SIGBUS;
191
            info.si_errno = 0;
192
            info.si_code = TARGET_SI_KERNEL;
193
            info._sifields._sigfault._addr = 0;
194
            queue_signal(info.si_signo, &info);
195
            break;
196
        case EXCP0D_GPF:
197
#ifndef TARGET_X86_64
198
            if (env->eflags & VM_MASK) {
199
                handle_vm86_fault(env);
200
            } else
201
#endif
202
            {
203
                info.si_signo = SIGSEGV;
204
                info.si_errno = 0;
205
                info.si_code = TARGET_SI_KERNEL;
206
                info._sifields._sigfault._addr = 0;
207
                queue_signal(info.si_signo, &info);
208
            }
209
            break;
210
        case EXCP0E_PAGE:
211
            info.si_signo = SIGSEGV;
212
            info.si_errno = 0;
213
            if (!(env->error_code & 1))
214
                info.si_code = TARGET_SEGV_MAPERR;
215
            else
216
                info.si_code = TARGET_SEGV_ACCERR;
217
            info._sifields._sigfault._addr = env->cr[2];
218
            queue_signal(info.si_signo, &info);
219
            break;
220
        case EXCP00_DIVZ:
221
#ifndef TARGET_X86_64
222
            if (env->eflags & VM_MASK) {
223
                handle_vm86_trap(env, trapnr);
224
            } else
225
#endif
226
            {
227
                /* division by zero */
228
                info.si_signo = SIGFPE;
229
                info.si_errno = 0;
230
                info.si_code = TARGET_FPE_INTDIV;
231
                info._sifields._sigfault._addr = env->eip;
232
                queue_signal(info.si_signo, &info);
233
            }
234
            break;
235
        case EXCP01_SSTP:
236
        case EXCP03_INT3:
237
#ifndef TARGET_X86_64
238
            if (env->eflags & VM_MASK) {
239
                handle_vm86_trap(env, trapnr);
240
            } else
241
#endif
242
            {
243
                info.si_signo = SIGTRAP;
244
                info.si_errno = 0;
245
                if (trapnr == EXCP01_SSTP) {
246
                    info.si_code = TARGET_TRAP_BRKPT;
247
                    info._sifields._sigfault._addr = env->eip;
248
                } else {
249
                    info.si_code = TARGET_SI_KERNEL;
250
                    info._sifields._sigfault._addr = 0;
251
                }
252
                queue_signal(info.si_signo, &info);
253
            }
254
            break;
255
        case EXCP04_INTO:
256
        case EXCP05_BOUND:
257
#ifndef TARGET_X86_64
258
            if (env->eflags & VM_MASK) {
259
                handle_vm86_trap(env, trapnr);
260
            } else
261
#endif
262
            {
263
                info.si_signo = SIGSEGV;
264
                info.si_errno = 0;
265
                info.si_code = TARGET_SI_KERNEL;
266
                info._sifields._sigfault._addr = 0;
267
                queue_signal(info.si_signo, &info);
268
            }
269
            break;
270
        case EXCP06_ILLOP:
271
            info.si_signo = SIGILL;
272
            info.si_errno = 0;
273
            info.si_code = TARGET_ILL_ILLOPN;
274
            info._sifields._sigfault._addr = env->eip;
275
            queue_signal(info.si_signo, &info);
276
            break;
277
        case EXCP_INTERRUPT:
278
            /* just indicate that signals should be handled asap */
279
            break;
280
        case EXCP_DEBUG:
281
            {
282
                int sig;
283

    
284
                sig = gdb_handlesig (env, TARGET_SIGTRAP);
285
                if (sig)
286
                  {
287
                    info.si_signo = sig;
288
                    info.si_errno = 0;
289
                    info.si_code = TARGET_TRAP_BRKPT;
290
                    queue_signal(info.si_signo, &info);
291
                  }
292
            }
293
            break;
294
        default:
295
            pc = env->segs[R_CS].base + env->eip;
296
            fprintf(stderr, "qemu: 0x%08lx: unhandled CPU exception 0x%x - aborting\n",
297
                    (long)pc, trapnr);
298
            abort();
299
        }
300
        process_pending_signals(env);
301
    }
302
}
303
#endif
304

    
305
#ifdef TARGET_ARM
306

    
307
/* XXX: find a better solution */
308
extern void tb_invalidate_page_range(abi_ulong start, abi_ulong end);
309

    
310
static void arm_cache_flush(abi_ulong start, abi_ulong last)
311
{
312
    abi_ulong addr, last1;
313

    
314
    if (last < start)
315
        return;
316
    addr = start;
317
    for(;;) {
318
        last1 = ((addr + TARGET_PAGE_SIZE) & TARGET_PAGE_MASK) - 1;
319
        if (last1 > last)
320
            last1 = last;
321
        tb_invalidate_page_range(addr, last1 + 1);
322
        if (last1 == last)
323
            break;
324
        addr = last1 + 1;
325
    }
326
}
327

    
328
void cpu_loop(CPUARMState *env)
329
{
330
    int trapnr;
331
    unsigned int n, insn;
332
    target_siginfo_t info;
333
    uint32_t addr;
334

    
335
    for(;;) {
336
        trapnr = cpu_arm_exec(env);
337
        switch(trapnr) {
338
        case EXCP_UDEF:
339
            {
340
                TaskState *ts = env->opaque;
341
                uint32_t opcode;
342

    
343
                /* we handle the FPU emulation here, as Linux */
344
                /* we get the opcode */
345
                opcode = tget32(env->regs[15]);
346

    
347
                if (EmulateAll(opcode, &ts->fpa, env) == 0) {
348
                    info.si_signo = SIGILL;
349
                    info.si_errno = 0;
350
                    info.si_code = TARGET_ILL_ILLOPN;
351
                    info._sifields._sigfault._addr = env->regs[15];
352
                    queue_signal(info.si_signo, &info);
353
                } else {
354
                    /* increment PC */
355
                    env->regs[15] += 4;
356
                }
357
            }
358
            break;
359
        case EXCP_SWI:
360
        case EXCP_BKPT:
361
            {
362
                env->eabi = 1;
363
                /* system call */
364
                if (trapnr == EXCP_BKPT) {
365
                    if (env->thumb) {
366
                        insn = tget16(env->regs[15]);
367
                        n = insn & 0xff;
368
                        env->regs[15] += 2;
369
                    } else {
370
                        insn = tget32(env->regs[15]);
371
                        n = (insn & 0xf) | ((insn >> 4) & 0xff0);
372
                        env->regs[15] += 4;
373
                    }
374
                } else {
375
                    if (env->thumb) {
376
                        insn = tget16(env->regs[15] - 2);
377
                        n = insn & 0xff;
378
                    } else {
379
                        insn = tget32(env->regs[15] - 4);
380
                        n = insn & 0xffffff;
381
                    }
382
                }
383

    
384
                if (n == ARM_NR_cacheflush) {
385
                    arm_cache_flush(env->regs[0], env->regs[1]);
386
                } else if (n == ARM_NR_semihosting
387
                           || n == ARM_NR_thumb_semihosting) {
388
                    env->regs[0] = do_arm_semihosting (env);
389
                } else if (n == 0 || n >= ARM_SYSCALL_BASE
390
                           || (env->thumb && n == ARM_THUMB_SYSCALL)) {
391
                    /* linux syscall */
392
                    if (env->thumb || n == 0) {
393
                        n = env->regs[7];
394
                    } else {
395
                        n -= ARM_SYSCALL_BASE;
396
                        env->eabi = 0;
397
                    }
398
                    env->regs[0] = do_syscall(env,
399
                                              n,
400
                                              env->regs[0],
401
                                              env->regs[1],
402
                                              env->regs[2],
403
                                              env->regs[3],
404
                                              env->regs[4],
405
                                              env->regs[5]);
406
                } else {
407
                    goto error;
408
                }
409
            }
410
            break;
411
        case EXCP_INTERRUPT:
412
            /* just indicate that signals should be handled asap */
413
            break;
414
        case EXCP_PREFETCH_ABORT:
415
            addr = env->cp15.c6_data;
416
            goto do_segv;
417
        case EXCP_DATA_ABORT:
418
            addr = env->cp15.c6_insn;
419
            goto do_segv;
420
        do_segv:
421
            {
422
                info.si_signo = SIGSEGV;
423
                info.si_errno = 0;
424
                /* XXX: check env->error_code */
425
                info.si_code = TARGET_SEGV_MAPERR;
426
                info._sifields._sigfault._addr = addr;
427
                queue_signal(info.si_signo, &info);
428
            }
429
            break;
430
        case EXCP_DEBUG:
431
            {
432
                int sig;
433

    
434
                sig = gdb_handlesig (env, TARGET_SIGTRAP);
435
                if (sig)
436
                  {
437
                    info.si_signo = sig;
438
                    info.si_errno = 0;
439
                    info.si_code = TARGET_TRAP_BRKPT;
440
                    queue_signal(info.si_signo, &info);
441
                  }
442
            }
443
            break;
444
        default:
445
        error:
446
            fprintf(stderr, "qemu: unhandled CPU exception 0x%x - aborting\n",
447
                    trapnr);
448
            cpu_dump_state(env, stderr, fprintf, 0);
449
            abort();
450
        }
451
        process_pending_signals(env);
452
    }
453
}
454

    
455
#endif
456

    
457
#ifdef TARGET_SPARC
458

    
459
//#define DEBUG_WIN
460

    
461
/* WARNING: dealing with register windows _is_ complicated. More info
462
   can be found at http://www.sics.se/~psm/sparcstack.html */
463
static inline int get_reg_index(CPUSPARCState *env, int cwp, int index)
464
{
465
    index = (index + cwp * 16) & (16 * NWINDOWS - 1);
466
    /* wrap handling : if cwp is on the last window, then we use the
467
       registers 'after' the end */
468
    if (index < 8 && env->cwp == (NWINDOWS - 1))
469
        index += (16 * NWINDOWS);
470
    return index;
471
}
472

    
473
/* save the register window 'cwp1' */
474
static inline void save_window_offset(CPUSPARCState *env, int cwp1)
475
{
476
    unsigned int i;
477
    abi_ulong sp_ptr;
478

    
479
    sp_ptr = env->regbase[get_reg_index(env, cwp1, 6)];
480
#if defined(DEBUG_WIN)
481
    printf("win_overflow: sp_ptr=0x%x save_cwp=%d\n",
482
           (int)sp_ptr, cwp1);
483
#endif
484
    for(i = 0; i < 16; i++) {
485
        tputl(sp_ptr, env->regbase[get_reg_index(env, cwp1, 8 + i)]);
486
        sp_ptr += sizeof(abi_ulong);
487
    }
488
}
489

    
490
static void save_window(CPUSPARCState *env)
491
{
492
#ifndef TARGET_SPARC64
493
    unsigned int new_wim;
494
    new_wim = ((env->wim >> 1) | (env->wim << (NWINDOWS - 1))) &
495
        ((1LL << NWINDOWS) - 1);
496
    save_window_offset(env, (env->cwp - 2) & (NWINDOWS - 1));
497
    env->wim = new_wim;
498
#else
499
    save_window_offset(env, (env->cwp - 2) & (NWINDOWS - 1));
500
    env->cansave++;
501
    env->canrestore--;
502
#endif
503
}
504

    
505
static void restore_window(CPUSPARCState *env)
506
{
507
    unsigned int new_wim, i, cwp1;
508
    abi_ulong sp_ptr;
509

    
510
    new_wim = ((env->wim << 1) | (env->wim >> (NWINDOWS - 1))) &
511
        ((1LL << NWINDOWS) - 1);
512

    
513
    /* restore the invalid window */
514
    cwp1 = (env->cwp + 1) & (NWINDOWS - 1);
515
    sp_ptr = env->regbase[get_reg_index(env, cwp1, 6)];
516
#if defined(DEBUG_WIN)
517
    printf("win_underflow: sp_ptr=0x%x load_cwp=%d\n",
518
           (int)sp_ptr, cwp1);
519
#endif
520
    for(i = 0; i < 16; i++) {
521
        env->regbase[get_reg_index(env, cwp1, 8 + i)] = tgetl(sp_ptr);
522
        sp_ptr += sizeof(abi_ulong);
523
    }
524
    env->wim = new_wim;
525
#ifdef TARGET_SPARC64
526
    env->canrestore++;
527
    if (env->cleanwin < NWINDOWS - 1)
528
        env->cleanwin++;
529
    env->cansave--;
530
#endif
531
}
532

    
533
static void flush_windows(CPUSPARCState *env)
534
{
535
    int offset, cwp1;
536

    
537
    offset = 1;
538
    for(;;) {
539
        /* if restore would invoke restore_window(), then we can stop */
540
        cwp1 = (env->cwp + offset) & (NWINDOWS - 1);
541
        if (env->wim & (1 << cwp1))
542
            break;
543
        save_window_offset(env, cwp1);
544
        offset++;
545
    }
546
    /* set wim so that restore will reload the registers */
547
    cwp1 = (env->cwp + 1) & (NWINDOWS - 1);
548
    env->wim = 1 << cwp1;
549
#if defined(DEBUG_WIN)
550
    printf("flush_windows: nb=%d\n", offset - 1);
551
#endif
552
}
553

    
554
void cpu_loop (CPUSPARCState *env)
555
{
556
    int trapnr, ret;
557
    target_siginfo_t info;
558

    
559
    while (1) {
560
        trapnr = cpu_sparc_exec (env);
561

    
562
        switch (trapnr) {
563
#ifndef TARGET_SPARC64
564
        case 0x88:
565
        case 0x90:
566
#else
567
        case 0x110:
568
        case 0x16d:
569
#endif
570
            ret = do_syscall (env, env->gregs[1],
571
                              env->regwptr[0], env->regwptr[1],
572
                              env->regwptr[2], env->regwptr[3],
573
                              env->regwptr[4], env->regwptr[5]);
574
            if ((unsigned int)ret >= (unsigned int)(-515)) {
575
#if defined(TARGET_SPARC64) && !defined(TARGET_ABI32)
576
                env->xcc |= PSR_CARRY;
577
#else
578
                env->psr |= PSR_CARRY;
579
#endif
580
                ret = -ret;
581
            } else {
582
#if defined(TARGET_SPARC64) && !defined(TARGET_ABI32)
583
                env->xcc &= ~PSR_CARRY;
584
#else
585
                env->psr &= ~PSR_CARRY;
586
#endif
587
            }
588
            env->regwptr[0] = ret;
589
            /* next instruction */
590
            env->pc = env->npc;
591
            env->npc = env->npc + 4;
592
            break;
593
        case 0x83: /* flush windows */
594
#ifdef TARGET_ABI32
595
        case 0x103:
596
#endif
597
            flush_windows(env);
598
            /* next instruction */
599
            env->pc = env->npc;
600
            env->npc = env->npc + 4;
601
            break;
602
#ifndef TARGET_SPARC64
603
        case TT_WIN_OVF: /* window overflow */
604
            save_window(env);
605
            break;
606
        case TT_WIN_UNF: /* window underflow */
607
            restore_window(env);
608
            break;
609
        case TT_TFAULT:
610
        case TT_DFAULT:
611
            {
612
                info.si_signo = SIGSEGV;
613
                info.si_errno = 0;
614
                /* XXX: check env->error_code */
615
                info.si_code = TARGET_SEGV_MAPERR;
616
                info._sifields._sigfault._addr = env->mmuregs[4];
617
                queue_signal(info.si_signo, &info);
618
            }
619
            break;
620
#else
621
        case TT_SPILL: /* window overflow */
622
            save_window(env);
623
            break;
624
        case TT_FILL: /* window underflow */
625
            restore_window(env);
626
            break;
627
        case TT_TFAULT:
628
        case TT_DFAULT:
629
            {
630
                info.si_signo = SIGSEGV;
631
                info.si_errno = 0;
632
                /* XXX: check env->error_code */
633
                info.si_code = TARGET_SEGV_MAPERR;
634
                if (trapnr == TT_DFAULT)
635
                    info._sifields._sigfault._addr = env->dmmuregs[4];
636
                else
637
                    info._sifields._sigfault._addr = env->tpc[env->tl];
638
                queue_signal(info.si_signo, &info);
639
            }
640
            break;
641
        case 0x16e:
642
            flush_windows(env);
643
            sparc64_get_context(env);
644
            break;
645
        case 0x16f:
646
            flush_windows(env);
647
            sparc64_set_context(env);
648
            break;
649
#endif
650
        case EXCP_INTERRUPT:
651
            /* just indicate that signals should be handled asap */
652
            break;
653
        case EXCP_DEBUG:
654
            {
655
                int sig;
656

    
657
                sig = gdb_handlesig (env, TARGET_SIGTRAP);
658
                if (sig)
659
                  {
660
                    info.si_signo = sig;
661
                    info.si_errno = 0;
662
                    info.si_code = TARGET_TRAP_BRKPT;
663
                    queue_signal(info.si_signo, &info);
664
                  }
665
            }
666
            break;
667
        default:
668
            printf ("Unhandled trap: 0x%x\n", trapnr);
669
            cpu_dump_state(env, stderr, fprintf, 0);
670
            exit (1);
671
        }
672
        process_pending_signals (env);
673
    }
674
}
675

    
676
#endif
677

    
678
#ifdef TARGET_PPC
679
static inline uint64_t cpu_ppc_get_tb (CPUState *env)
680
{
681
    /* TO FIX */
682
    return 0;
683
}
684

    
685
uint32_t cpu_ppc_load_tbl (CPUState *env)
686
{
687
    return cpu_ppc_get_tb(env) & 0xFFFFFFFF;
688
}
689

    
690
uint32_t cpu_ppc_load_tbu (CPUState *env)
691
{
692
    return cpu_ppc_get_tb(env) >> 32;
693
}
694

    
695
uint32_t cpu_ppc_load_atbl (CPUState *env)
696
{
697
    return cpu_ppc_get_tb(env) & 0xFFFFFFFF;
698
}
699

    
700
uint32_t cpu_ppc_load_atbu (CPUState *env)
701
{
702
    return cpu_ppc_get_tb(env) >> 32;
703
}
704

    
705
uint32_t cpu_ppc601_load_rtcu (CPUState *env)
706
__attribute__ (( alias ("cpu_ppc_load_tbu") ));
707

    
708
uint32_t cpu_ppc601_load_rtcl (CPUState *env)
709
{
710
    return cpu_ppc_load_tbl(env) & 0x3FFFFF80;
711
}
712

    
713
/* XXX: to be fixed */
714
int ppc_dcr_read (ppc_dcr_t *dcr_env, int dcrn, target_ulong *valp)
715
{
716
    return -1;
717
}
718

    
719
int ppc_dcr_write (ppc_dcr_t *dcr_env, int dcrn, target_ulong val)
720
{
721
    return -1;
722
}
723

    
724
#define EXCP_DUMP(env, fmt, args...)                                         \
725
do {                                                                          \
726
    fprintf(stderr, fmt , ##args);                                            \
727
    cpu_dump_state(env, stderr, fprintf, 0);                                  \
728
    if (loglevel != 0) {                                                      \
729
        fprintf(logfile, fmt , ##args);                                       \
730
        cpu_dump_state(env, logfile, fprintf, 0);                             \
731
    }                                                                         \
732
} while (0)
733

    
734
void cpu_loop(CPUPPCState *env)
735
{
736
    target_siginfo_t info;
737
    int trapnr;
738
    uint32_t ret;
739

    
740
    for(;;) {
741
        trapnr = cpu_ppc_exec(env);
742
        switch(trapnr) {
743
        case POWERPC_EXCP_NONE:
744
            /* Just go on */
745
            break;
746
        case POWERPC_EXCP_CRITICAL: /* Critical input                        */
747
            cpu_abort(env, "Critical interrupt while in user mode. "
748
                      "Aborting\n");
749
            break;
750
        case POWERPC_EXCP_MCHECK:   /* Machine check exception               */
751
            cpu_abort(env, "Machine check exception while in user mode. "
752
                      "Aborting\n");
753
            break;
754
        case POWERPC_EXCP_DSI:      /* Data storage exception                */
755
            EXCP_DUMP(env, "Invalid data memory access: 0x" ADDRX "\n",
756
                      env->spr[SPR_DAR]);
757
            /* XXX: check this. Seems bugged */
758
            switch (env->error_code & 0xFF000000) {
759
            case 0x40000000:
760
                info.si_signo = TARGET_SIGSEGV;
761
                info.si_errno = 0;
762
                info.si_code = TARGET_SEGV_MAPERR;
763
                break;
764
            case 0x04000000:
765
                info.si_signo = TARGET_SIGILL;
766
                info.si_errno = 0;
767
                info.si_code = TARGET_ILL_ILLADR;
768
                break;
769
            case 0x08000000:
770
                info.si_signo = TARGET_SIGSEGV;
771
                info.si_errno = 0;
772
                info.si_code = TARGET_SEGV_ACCERR;
773
                break;
774
            default:
775
                /* Let's send a regular segfault... */
776
                EXCP_DUMP(env, "Invalid segfault errno (%02x)\n",
777
                          env->error_code);
778
                info.si_signo = TARGET_SIGSEGV;
779
                info.si_errno = 0;
780
                info.si_code = TARGET_SEGV_MAPERR;
781
                break;
782
            }
783
            info._sifields._sigfault._addr = env->nip;
784
            queue_signal(info.si_signo, &info);
785
            break;
786
        case POWERPC_EXCP_ISI:      /* Instruction storage exception         */
787
            EXCP_DUMP(env, "Invalid instruction fetch: 0x\n" ADDRX "\n",
788
                      env->spr[SPR_DAR]);
789
            /* XXX: check this */
790
            switch (env->error_code & 0xFF000000) {
791
            case 0x40000000:
792
                info.si_signo = TARGET_SIGSEGV;
793
            info.si_errno = 0;
794
                info.si_code = TARGET_SEGV_MAPERR;
795
                break;
796
            case 0x10000000:
797
            case 0x08000000:
798
                info.si_signo = TARGET_SIGSEGV;
799
                info.si_errno = 0;
800
                info.si_code = TARGET_SEGV_ACCERR;
801
                break;
802
            default:
803
                /* Let's send a regular segfault... */
804
                EXCP_DUMP(env, "Invalid segfault errno (%02x)\n",
805
                          env->error_code);
806
                info.si_signo = TARGET_SIGSEGV;
807
                info.si_errno = 0;
808
                info.si_code = TARGET_SEGV_MAPERR;
809
                break;
810
            }
811
            info._sifields._sigfault._addr = env->nip - 4;
812
            queue_signal(info.si_signo, &info);
813
            break;
814
        case POWERPC_EXCP_EXTERNAL: /* External input                        */
815
            cpu_abort(env, "External interrupt while in user mode. "
816
                      "Aborting\n");
817
            break;
818
        case POWERPC_EXCP_ALIGN:    /* Alignment exception                   */
819
            EXCP_DUMP(env, "Unaligned memory access\n");
820
            /* XXX: check this */
821
            info.si_signo = TARGET_SIGBUS;
822
            info.si_errno = 0;
823
            info.si_code = TARGET_BUS_ADRALN;
824
            info._sifields._sigfault._addr = env->nip - 4;
825
            queue_signal(info.si_signo, &info);
826
            break;
827
        case POWERPC_EXCP_PROGRAM:  /* Program exception                     */
828
            /* XXX: check this */
829
            switch (env->error_code & ~0xF) {
830
            case POWERPC_EXCP_FP:
831
                EXCP_DUMP(env, "Floating point program exception\n");
832
                /* Set FX */
833
                env->fpscr[7] |= 0x8;
834
                /* Finally, update FEX */
835
                if ((((env->fpscr[7] & 0x3) << 3) | (env->fpscr[6] >> 1)) &
836
                    ((env->fpscr[1] << 1) | (env->fpscr[0] >> 3)))
837
                    env->fpscr[7] |= 0x4;
838
                info.si_signo = TARGET_SIGFPE;
839
                info.si_errno = 0;
840
                switch (env->error_code & 0xF) {
841
                case POWERPC_EXCP_FP_OX:
842
                    info.si_code = TARGET_FPE_FLTOVF;
843
                    break;
844
                case POWERPC_EXCP_FP_UX:
845
                    info.si_code = TARGET_FPE_FLTUND;
846
                    break;
847
                case POWERPC_EXCP_FP_ZX:
848
                case POWERPC_EXCP_FP_VXZDZ:
849
                    info.si_code = TARGET_FPE_FLTDIV;
850
                    break;
851
                case POWERPC_EXCP_FP_XX:
852
                    info.si_code = TARGET_FPE_FLTRES;
853
                    break;
854
                case POWERPC_EXCP_FP_VXSOFT:
855
                    info.si_code = TARGET_FPE_FLTINV;
856
                    break;
857
                case POWERPC_EXCP_FP_VXNAN:
858
                case POWERPC_EXCP_FP_VXISI:
859
                case POWERPC_EXCP_FP_VXIDI:
860
                case POWERPC_EXCP_FP_VXIMZ:
861
                case POWERPC_EXCP_FP_VXVC:
862
                case POWERPC_EXCP_FP_VXSQRT:
863
                case POWERPC_EXCP_FP_VXCVI:
864
                    info.si_code = TARGET_FPE_FLTSUB;
865
                    break;
866
                default:
867
                    EXCP_DUMP(env, "Unknown floating point exception (%02x)\n",
868
                              env->error_code);
869
                    break;
870
                }
871
                break;
872
            case POWERPC_EXCP_INVAL:
873
                EXCP_DUMP(env, "Invalid instruction\n");
874
                info.si_signo = TARGET_SIGILL;
875
                info.si_errno = 0;
876
                switch (env->error_code & 0xF) {
877
                case POWERPC_EXCP_INVAL_INVAL:
878
                    info.si_code = TARGET_ILL_ILLOPC;
879
                    break;
880
                case POWERPC_EXCP_INVAL_LSWX:
881
                    info.si_code = TARGET_ILL_ILLOPN;
882
                    break;
883
                case POWERPC_EXCP_INVAL_SPR:
884
                    info.si_code = TARGET_ILL_PRVREG;
885
                    break;
886
                case POWERPC_EXCP_INVAL_FP:
887
                    info.si_code = TARGET_ILL_COPROC;
888
                    break;
889
                default:
890
                    EXCP_DUMP(env, "Unknown invalid operation (%02x)\n",
891
                              env->error_code & 0xF);
892
                    info.si_code = TARGET_ILL_ILLADR;
893
                    break;
894
                }
895
                break;
896
            case POWERPC_EXCP_PRIV:
897
                EXCP_DUMP(env, "Privilege violation\n");
898
                info.si_signo = TARGET_SIGILL;
899
                info.si_errno = 0;
900
                switch (env->error_code & 0xF) {
901
                case POWERPC_EXCP_PRIV_OPC:
902
                    info.si_code = TARGET_ILL_PRVOPC;
903
                    break;
904
                case POWERPC_EXCP_PRIV_REG:
905
                    info.si_code = TARGET_ILL_PRVREG;
906
                    break;
907
                default:
908
                    EXCP_DUMP(env, "Unknown privilege violation (%02x)\n",
909
                              env->error_code & 0xF);
910
                    info.si_code = TARGET_ILL_PRVOPC;
911
                    break;
912
                }
913
                break;
914
            case POWERPC_EXCP_TRAP:
915
                cpu_abort(env, "Tried to call a TRAP\n");
916
                break;
917
            default:
918
                /* Should not happen ! */
919
                cpu_abort(env, "Unknown program exception (%02x)\n",
920
                          env->error_code);
921
                break;
922
            }
923
            info._sifields._sigfault._addr = env->nip - 4;
924
            queue_signal(info.si_signo, &info);
925
            break;
926
        case POWERPC_EXCP_FPU:      /* Floating-point unavailable exception  */
927
            EXCP_DUMP(env, "No floating point allowed\n");
928
            info.si_signo = TARGET_SIGILL;
929
            info.si_errno = 0;
930
            info.si_code = TARGET_ILL_COPROC;
931
            info._sifields._sigfault._addr = env->nip - 4;
932
            queue_signal(info.si_signo, &info);
933
            break;
934
        case POWERPC_EXCP_SYSCALL:  /* System call exception                 */
935
            cpu_abort(env, "Syscall exception while in user mode. "
936
                      "Aborting\n");
937
            break;
938
        case POWERPC_EXCP_APU:      /* Auxiliary processor unavailable       */
939
            EXCP_DUMP(env, "No APU instruction allowed\n");
940
            info.si_signo = TARGET_SIGILL;
941
            info.si_errno = 0;
942
            info.si_code = TARGET_ILL_COPROC;
943
            info._sifields._sigfault._addr = env->nip - 4;
944
            queue_signal(info.si_signo, &info);
945
            break;
946
        case POWERPC_EXCP_DECR:     /* Decrementer exception                 */
947
            cpu_abort(env, "Decrementer interrupt while in user mode. "
948
                      "Aborting\n");
949
            break;
950
        case POWERPC_EXCP_FIT:      /* Fixed-interval timer interrupt        */
951
            cpu_abort(env, "Fix interval timer interrupt while in user mode. "
952
                      "Aborting\n");
953
            break;
954
        case POWERPC_EXCP_WDT:      /* Watchdog timer interrupt              */
955
            cpu_abort(env, "Watchdog timer interrupt while in user mode. "
956
                      "Aborting\n");
957
            break;
958
        case POWERPC_EXCP_DTLB:     /* Data TLB error                        */
959
            cpu_abort(env, "Data TLB exception while in user mode. "
960
                      "Aborting\n");
961
            break;
962
        case POWERPC_EXCP_ITLB:     /* Instruction TLB error                 */
963
            cpu_abort(env, "Instruction TLB exception while in user mode. "
964
                      "Aborting\n");
965
            break;
966
        case POWERPC_EXCP_DEBUG:    /* Debug interrupt                       */
967
            /* XXX: check this */
968
            {
969
                int sig;
970

    
971
                sig = gdb_handlesig(env, TARGET_SIGTRAP);
972
                if (sig) {
973
                    info.si_signo = sig;
974
                    info.si_errno = 0;
975
                    info.si_code = TARGET_TRAP_BRKPT;
976
                    queue_signal(info.si_signo, &info);
977
                  }
978
            }
979
            break;
980
#if defined(TARGET_PPCEMB)
981
        case POWERPC_EXCP_SPEU:     /* SPE/embedded floating-point unavail.  */
982
            EXCP_DUMP(env, "No SPE/floating-point instruction allowed\n");
983
            info.si_signo = TARGET_SIGILL;
984
            info.si_errno = 0;
985
            info.si_code = TARGET_ILL_COPROC;
986
            info._sifields._sigfault._addr = env->nip - 4;
987
            queue_signal(info.si_signo, &info);
988
            break;
989
        case POWERPC_EXCP_EFPDI:    /* Embedded floating-point data IRQ      */
990
            cpu_abort(env, "Embedded floating-point data IRQ not handled\n");
991
            break;
992
        case POWERPC_EXCP_EFPRI:    /* Embedded floating-point round IRQ     */
993
            cpu_abort(env, "Embedded floating-point round IRQ not handled\n");
994
            break;
995
        case POWERPC_EXCP_EPERFM:   /* Embedded performance monitor IRQ      */
996
            cpu_abort(env, "Performance monitor exception not handled\n");
997
            break;
998
        case POWERPC_EXCP_DOORI:    /* Embedded doorbell interrupt           */
999
            cpu_abort(env, "Doorbell interrupt while in user mode. "
1000
                       "Aborting\n");
1001
            break;
1002
        case POWERPC_EXCP_DOORCI:   /* Embedded doorbell critical interrupt  */
1003
            cpu_abort(env, "Doorbell critical interrupt while in user mode. "
1004
                      "Aborting\n");
1005
            break;
1006
        case POWERPC_EXCP_RESET:    /* System reset exception                */
1007
            cpu_abort(env, "Reset interrupt while in user mode. "
1008
                      "Aborting\n");
1009
            break;
1010
#endif /* defined(TARGET_PPCEMB) */
1011
#if defined(TARGET_PPC64) && !defined(TARGET_ABI32) /* PowerPC 64 */
1012
        case POWERPC_EXCP_DSEG:     /* Data segment exception                */
1013
            cpu_abort(env, "Data segment exception while in user mode. "
1014
                      "Aborting\n");
1015
            break;
1016
        case POWERPC_EXCP_ISEG:     /* Instruction segment exception         */
1017
            cpu_abort(env, "Instruction segment exception "
1018
                      "while in user mode. Aborting\n");
1019
            break;
1020
#endif /* defined(TARGET_PPC64) && !defined(TARGET_ABI32) */
1021
#if defined(TARGET_PPC64H) && !defined(TARGET_ABI32)
1022
        /* PowerPC 64 with hypervisor mode support */
1023
        case POWERPC_EXCP_HDECR:    /* Hypervisor decrementer exception      */
1024
            cpu_abort(env, "Hypervisor decrementer interrupt "
1025
                      "while in user mode. Aborting\n");
1026
            break;
1027
#endif /* defined(TARGET_PPC64H) && !defined(TARGET_ABI32) */
1028
        case POWERPC_EXCP_TRACE:    /* Trace exception                       */
1029
            /* Nothing to do:
1030
             * we use this exception to emulate step-by-step execution mode.
1031
             */
1032
            break;
1033
#if defined(TARGET_PPC64H) && !defined(TARGET_ABI32)
1034
        /* PowerPC 64 with hypervisor mode support */
1035
        case POWERPC_EXCP_HDSI:     /* Hypervisor data storage exception     */
1036
            cpu_abort(env, "Hypervisor data storage exception "
1037
                      "while in user mode. Aborting\n");
1038
            break;
1039
        case POWERPC_EXCP_HISI:     /* Hypervisor instruction storage excp   */
1040
            cpu_abort(env, "Hypervisor instruction storage exception "
1041
                      "while in user mode. Aborting\n");
1042
            break;
1043
        case POWERPC_EXCP_HDSEG:    /* Hypervisor data segment exception     */
1044
            cpu_abort(env, "Hypervisor data segment exception "
1045
                      "while in user mode. Aborting\n");
1046
            break;
1047
        case POWERPC_EXCP_HISEG:    /* Hypervisor instruction segment excp   */
1048
            cpu_abort(env, "Hypervisor instruction segment exception "
1049
                      "while in user mode. Aborting\n");
1050
            break;
1051
#endif /* defined(TARGET_PPC64H) && !defined(TARGET_ABI32) */
1052
        case POWERPC_EXCP_VPU:      /* Vector unavailable exception          */
1053
            EXCP_DUMP(env, "No Altivec instructions allowed\n");
1054
            info.si_signo = TARGET_SIGILL;
1055
            info.si_errno = 0;
1056
            info.si_code = TARGET_ILL_COPROC;
1057
            info._sifields._sigfault._addr = env->nip - 4;
1058
            queue_signal(info.si_signo, &info);
1059
            break;
1060
        case POWERPC_EXCP_PIT:      /* Programmable interval timer IRQ       */
1061
            cpu_abort(env, "Programable interval timer interrupt "
1062
                      "while in user mode. Aborting\n");
1063
            break;
1064
        case POWERPC_EXCP_IO:       /* IO error exception                    */
1065
            cpu_abort(env, "IO error exception while in user mode. "
1066
                      "Aborting\n");
1067
            break;
1068
        case POWERPC_EXCP_RUNM:     /* Run mode exception                    */
1069
            cpu_abort(env, "Run mode exception while in user mode. "
1070
                      "Aborting\n");
1071
            break;
1072
        case POWERPC_EXCP_EMUL:     /* Emulation trap exception              */
1073
            cpu_abort(env, "Emulation trap exception not handled\n");
1074
            break;
1075
        case POWERPC_EXCP_IFTLB:    /* Instruction fetch TLB error           */
1076
            cpu_abort(env, "Instruction fetch TLB exception "
1077
                      "while in user-mode. Aborting");
1078
            break;
1079
        case POWERPC_EXCP_DLTLB:    /* Data load TLB miss                    */
1080
            cpu_abort(env, "Data load TLB exception while in user-mode. "
1081
                      "Aborting");
1082
            break;
1083
        case POWERPC_EXCP_DSTLB:    /* Data store TLB miss                   */
1084
            cpu_abort(env, "Data store TLB exception while in user-mode. "
1085
                      "Aborting");
1086
            break;
1087
        case POWERPC_EXCP_FPA:      /* Floating-point assist exception       */
1088
            cpu_abort(env, "Floating-point assist exception not handled\n");
1089
            break;
1090
        case POWERPC_EXCP_IABR:     /* Instruction address breakpoint        */
1091
            cpu_abort(env, "Instruction address breakpoint exception "
1092
                      "not handled\n");
1093
            break;
1094
        case POWERPC_EXCP_SMI:      /* System management interrupt           */
1095
            cpu_abort(env, "System management interrupt while in user mode. "
1096
                      "Aborting\n");
1097
            break;
1098
        case POWERPC_EXCP_THERM:    /* Thermal interrupt                     */
1099
            cpu_abort(env, "Thermal interrupt interrupt while in user mode. "
1100
                      "Aborting\n");
1101
            break;
1102
        case POWERPC_EXCP_PERFM:   /* Embedded performance monitor IRQ      */
1103
            cpu_abort(env, "Performance monitor exception not handled\n");
1104
            break;
1105
        case POWERPC_EXCP_VPUA:     /* Vector assist exception               */
1106
            cpu_abort(env, "Vector assist exception not handled\n");
1107
            break;
1108
        case POWERPC_EXCP_SOFTP:    /* Soft patch exception                  */
1109
            cpu_abort(env, "Soft patch exception not handled\n");
1110
            break;
1111
        case POWERPC_EXCP_MAINT:    /* Maintenance exception                 */
1112
            cpu_abort(env, "Maintenance exception while in user mode. "
1113
                      "Aborting\n");
1114
            break;
1115
        case POWERPC_EXCP_STOP:     /* stop translation                      */
1116
            /* We did invalidate the instruction cache. Go on */
1117
            break;
1118
        case POWERPC_EXCP_BRANCH:   /* branch instruction:                   */
1119
            /* We just stopped because of a branch. Go on */
1120
            break;
1121
        case POWERPC_EXCP_SYSCALL_USER:
1122
            /* system call in user-mode emulation */
1123
            /* WARNING:
1124
             * PPC ABI uses overflow flag in cr0 to signal an error
1125
             * in syscalls.
1126
             */
1127
#if 0
1128
            printf("syscall %d 0x%08x 0x%08x 0x%08x 0x%08x\n", env->gpr[0],
1129
                   env->gpr[3], env->gpr[4], env->gpr[5], env->gpr[6]);
1130
#endif
1131
            env->crf[0] &= ~0x1;
1132
            ret = do_syscall(env, env->gpr[0], env->gpr[3], env->gpr[4],
1133
                             env->gpr[5], env->gpr[6], env->gpr[7],
1134
                             env->gpr[8]);
1135
            if (ret > (uint32_t)(-515)) {
1136
                env->crf[0] |= 0x1;
1137
                ret = -ret;
1138
            }
1139
            env->gpr[3] = ret;
1140
#if 0
1141
            printf("syscall returned 0x%08x (%d)\n", ret, ret);
1142
#endif
1143
            break;
1144
        case EXCP_INTERRUPT:
1145
            /* just indicate that signals should be handled asap */
1146
            break;
1147
        default:
1148
            cpu_abort(env, "Unknown exception 0x%d. Aborting\n", trapnr);
1149
            break;
1150
        }
1151
        process_pending_signals(env);
1152
    }
1153
}
1154
#endif
1155

    
1156
#ifdef TARGET_MIPS
1157

    
1158
#define MIPS_SYS(name, args) args,
1159

    
1160
static const uint8_t mips_syscall_args[] = {
1161
        MIPS_SYS(sys_syscall        , 0)        /* 4000 */
1162
        MIPS_SYS(sys_exit        , 1)
1163
        MIPS_SYS(sys_fork        , 0)
1164
        MIPS_SYS(sys_read        , 3)
1165
        MIPS_SYS(sys_write        , 3)
1166
        MIPS_SYS(sys_open        , 3)        /* 4005 */
1167
        MIPS_SYS(sys_close        , 1)
1168
        MIPS_SYS(sys_waitpid        , 3)
1169
        MIPS_SYS(sys_creat        , 2)
1170
        MIPS_SYS(sys_link        , 2)
1171
        MIPS_SYS(sys_unlink        , 1)        /* 4010 */
1172
        MIPS_SYS(sys_execve        , 0)
1173
        MIPS_SYS(sys_chdir        , 1)
1174
        MIPS_SYS(sys_time        , 1)
1175
        MIPS_SYS(sys_mknod        , 3)
1176
        MIPS_SYS(sys_chmod        , 2)        /* 4015 */
1177
        MIPS_SYS(sys_lchown        , 3)
1178
        MIPS_SYS(sys_ni_syscall        , 0)
1179
        MIPS_SYS(sys_ni_syscall        , 0)        /* was sys_stat */
1180
        MIPS_SYS(sys_lseek        , 3)
1181
        MIPS_SYS(sys_getpid        , 0)        /* 4020 */
1182
        MIPS_SYS(sys_mount        , 5)
1183
        MIPS_SYS(sys_oldumount        , 1)
1184
        MIPS_SYS(sys_setuid        , 1)
1185
        MIPS_SYS(sys_getuid        , 0)
1186
        MIPS_SYS(sys_stime        , 1)        /* 4025 */
1187
        MIPS_SYS(sys_ptrace        , 4)
1188
        MIPS_SYS(sys_alarm        , 1)
1189
        MIPS_SYS(sys_ni_syscall        , 0)        /* was sys_fstat */
1190
        MIPS_SYS(sys_pause        , 0)
1191
        MIPS_SYS(sys_utime        , 2)        /* 4030 */
1192
        MIPS_SYS(sys_ni_syscall        , 0)
1193
        MIPS_SYS(sys_ni_syscall        , 0)
1194
        MIPS_SYS(sys_access        , 2)
1195
        MIPS_SYS(sys_nice        , 1)
1196
        MIPS_SYS(sys_ni_syscall        , 0)        /* 4035 */
1197
        MIPS_SYS(sys_sync        , 0)
1198
        MIPS_SYS(sys_kill        , 2)
1199
        MIPS_SYS(sys_rename        , 2)
1200
        MIPS_SYS(sys_mkdir        , 2)
1201
        MIPS_SYS(sys_rmdir        , 1)        /* 4040 */
1202
        MIPS_SYS(sys_dup                , 1)
1203
        MIPS_SYS(sys_pipe        , 0)
1204
        MIPS_SYS(sys_times        , 1)
1205
        MIPS_SYS(sys_ni_syscall        , 0)
1206
        MIPS_SYS(sys_brk                , 1)        /* 4045 */
1207
        MIPS_SYS(sys_setgid        , 1)
1208
        MIPS_SYS(sys_getgid        , 0)
1209
        MIPS_SYS(sys_ni_syscall        , 0)        /* was signal(2) */
1210
        MIPS_SYS(sys_geteuid        , 0)
1211
        MIPS_SYS(sys_getegid        , 0)        /* 4050 */
1212
        MIPS_SYS(sys_acct        , 0)
1213
        MIPS_SYS(sys_umount        , 2)
1214
        MIPS_SYS(sys_ni_syscall        , 0)
1215
        MIPS_SYS(sys_ioctl        , 3)
1216
        MIPS_SYS(sys_fcntl        , 3)        /* 4055 */
1217
        MIPS_SYS(sys_ni_syscall        , 2)
1218
        MIPS_SYS(sys_setpgid        , 2)
1219
        MIPS_SYS(sys_ni_syscall        , 0)
1220
        MIPS_SYS(sys_olduname        , 1)
1221
        MIPS_SYS(sys_umask        , 1)        /* 4060 */
1222
        MIPS_SYS(sys_chroot        , 1)
1223
        MIPS_SYS(sys_ustat        , 2)
1224
        MIPS_SYS(sys_dup2        , 2)
1225
        MIPS_SYS(sys_getppid        , 0)
1226
        MIPS_SYS(sys_getpgrp        , 0)        /* 4065 */
1227
        MIPS_SYS(sys_setsid        , 0)
1228
        MIPS_SYS(sys_sigaction        , 3)
1229
        MIPS_SYS(sys_sgetmask        , 0)
1230
        MIPS_SYS(sys_ssetmask        , 1)
1231
        MIPS_SYS(sys_setreuid        , 2)        /* 4070 */
1232
        MIPS_SYS(sys_setregid        , 2)
1233
        MIPS_SYS(sys_sigsuspend        , 0)
1234
        MIPS_SYS(sys_sigpending        , 1)
1235
        MIPS_SYS(sys_sethostname        , 2)
1236
        MIPS_SYS(sys_setrlimit        , 2)        /* 4075 */
1237
        MIPS_SYS(sys_getrlimit        , 2)
1238
        MIPS_SYS(sys_getrusage        , 2)
1239
        MIPS_SYS(sys_gettimeofday, 2)
1240
        MIPS_SYS(sys_settimeofday, 2)
1241
        MIPS_SYS(sys_getgroups        , 2)        /* 4080 */
1242
        MIPS_SYS(sys_setgroups        , 2)
1243
        MIPS_SYS(sys_ni_syscall        , 0)        /* old_select */
1244
        MIPS_SYS(sys_symlink        , 2)
1245
        MIPS_SYS(sys_ni_syscall        , 0)        /* was sys_lstat */
1246
        MIPS_SYS(sys_readlink        , 3)        /* 4085 */
1247
        MIPS_SYS(sys_uselib        , 1)
1248
        MIPS_SYS(sys_swapon        , 2)
1249
        MIPS_SYS(sys_reboot        , 3)
1250
        MIPS_SYS(old_readdir        , 3)
1251
        MIPS_SYS(old_mmap        , 6)        /* 4090 */
1252
        MIPS_SYS(sys_munmap        , 2)
1253
        MIPS_SYS(sys_truncate        , 2)
1254
        MIPS_SYS(sys_ftruncate        , 2)
1255
        MIPS_SYS(sys_fchmod        , 2)
1256
        MIPS_SYS(sys_fchown        , 3)        /* 4095 */
1257
        MIPS_SYS(sys_getpriority        , 2)
1258
        MIPS_SYS(sys_setpriority        , 3)
1259
        MIPS_SYS(sys_ni_syscall        , 0)
1260
        MIPS_SYS(sys_statfs        , 2)
1261
        MIPS_SYS(sys_fstatfs        , 2)        /* 4100 */
1262
        MIPS_SYS(sys_ni_syscall        , 0)        /* was ioperm(2) */
1263
        MIPS_SYS(sys_socketcall        , 2)
1264
        MIPS_SYS(sys_syslog        , 3)
1265
        MIPS_SYS(sys_setitimer        , 3)
1266
        MIPS_SYS(sys_getitimer        , 2)        /* 4105 */
1267
        MIPS_SYS(sys_newstat        , 2)
1268
        MIPS_SYS(sys_newlstat        , 2)
1269
        MIPS_SYS(sys_newfstat        , 2)
1270
        MIPS_SYS(sys_uname        , 1)
1271
        MIPS_SYS(sys_ni_syscall        , 0)        /* 4110 was iopl(2) */
1272
        MIPS_SYS(sys_vhangup        , 0)
1273
        MIPS_SYS(sys_ni_syscall        , 0)        /* was sys_idle() */
1274
        MIPS_SYS(sys_ni_syscall        , 0)        /* was sys_vm86 */
1275
        MIPS_SYS(sys_wait4        , 4)
1276
        MIPS_SYS(sys_swapoff        , 1)        /* 4115 */
1277
        MIPS_SYS(sys_sysinfo        , 1)
1278
        MIPS_SYS(sys_ipc                , 6)
1279
        MIPS_SYS(sys_fsync        , 1)
1280
        MIPS_SYS(sys_sigreturn        , 0)
1281
        MIPS_SYS(sys_clone        , 0)        /* 4120 */
1282
        MIPS_SYS(sys_setdomainname, 2)
1283
        MIPS_SYS(sys_newuname        , 1)
1284
        MIPS_SYS(sys_ni_syscall        , 0)        /* sys_modify_ldt */
1285
        MIPS_SYS(sys_adjtimex        , 1)
1286
        MIPS_SYS(sys_mprotect        , 3)        /* 4125 */
1287
        MIPS_SYS(sys_sigprocmask        , 3)
1288
        MIPS_SYS(sys_ni_syscall        , 0)        /* was create_module */
1289
        MIPS_SYS(sys_init_module        , 5)
1290
        MIPS_SYS(sys_delete_module, 1)
1291
        MIPS_SYS(sys_ni_syscall        , 0)        /* 4130        was get_kernel_syms */
1292
        MIPS_SYS(sys_quotactl        , 0)
1293
        MIPS_SYS(sys_getpgid        , 1)
1294
        MIPS_SYS(sys_fchdir        , 1)
1295
        MIPS_SYS(sys_bdflush        , 2)
1296
        MIPS_SYS(sys_sysfs        , 3)        /* 4135 */
1297
        MIPS_SYS(sys_personality        , 1)
1298
        MIPS_SYS(sys_ni_syscall        , 0)        /* for afs_syscall */
1299
        MIPS_SYS(sys_setfsuid        , 1)
1300
        MIPS_SYS(sys_setfsgid        , 1)
1301
        MIPS_SYS(sys_llseek        , 5)        /* 4140 */
1302
        MIPS_SYS(sys_getdents        , 3)
1303
        MIPS_SYS(sys_select        , 5)
1304
        MIPS_SYS(sys_flock        , 2)
1305
        MIPS_SYS(sys_msync        , 3)
1306
        MIPS_SYS(sys_readv        , 3)        /* 4145 */
1307
        MIPS_SYS(sys_writev        , 3)
1308
        MIPS_SYS(sys_cacheflush        , 3)
1309
        MIPS_SYS(sys_cachectl        , 3)
1310
        MIPS_SYS(sys_sysmips        , 4)
1311
        MIPS_SYS(sys_ni_syscall        , 0)        /* 4150 */
1312
        MIPS_SYS(sys_getsid        , 1)
1313
        MIPS_SYS(sys_fdatasync        , 0)
1314
        MIPS_SYS(sys_sysctl        , 1)
1315
        MIPS_SYS(sys_mlock        , 2)
1316
        MIPS_SYS(sys_munlock        , 2)        /* 4155 */
1317
        MIPS_SYS(sys_mlockall        , 1)
1318
        MIPS_SYS(sys_munlockall        , 0)
1319
        MIPS_SYS(sys_sched_setparam, 2)
1320
        MIPS_SYS(sys_sched_getparam, 2)
1321
        MIPS_SYS(sys_sched_setscheduler, 3)        /* 4160 */
1322
        MIPS_SYS(sys_sched_getscheduler, 1)
1323
        MIPS_SYS(sys_sched_yield        , 0)
1324
        MIPS_SYS(sys_sched_get_priority_max, 1)
1325
        MIPS_SYS(sys_sched_get_priority_min, 1)
1326
        MIPS_SYS(sys_sched_rr_get_interval, 2)        /* 4165 */
1327
        MIPS_SYS(sys_nanosleep,        2)
1328
        MIPS_SYS(sys_mremap        , 4)
1329
        MIPS_SYS(sys_accept        , 3)
1330
        MIPS_SYS(sys_bind        , 3)
1331
        MIPS_SYS(sys_connect        , 3)        /* 4170 */
1332
        MIPS_SYS(sys_getpeername        , 3)
1333
        MIPS_SYS(sys_getsockname        , 3)
1334
        MIPS_SYS(sys_getsockopt        , 5)
1335
        MIPS_SYS(sys_listen        , 2)
1336
        MIPS_SYS(sys_recv        , 4)        /* 4175 */
1337
        MIPS_SYS(sys_recvfrom        , 6)
1338
        MIPS_SYS(sys_recvmsg        , 3)
1339
        MIPS_SYS(sys_send        , 4)
1340
        MIPS_SYS(sys_sendmsg        , 3)
1341
        MIPS_SYS(sys_sendto        , 6)        /* 4180 */
1342
        MIPS_SYS(sys_setsockopt        , 5)
1343
        MIPS_SYS(sys_shutdown        , 2)
1344
        MIPS_SYS(sys_socket        , 3)
1345
        MIPS_SYS(sys_socketpair        , 4)
1346
        MIPS_SYS(sys_setresuid        , 3)        /* 4185 */
1347
        MIPS_SYS(sys_getresuid        , 3)
1348
        MIPS_SYS(sys_ni_syscall        , 0)        /* was sys_query_module */
1349
        MIPS_SYS(sys_poll        , 3)
1350
        MIPS_SYS(sys_nfsservctl        , 3)
1351
        MIPS_SYS(sys_setresgid        , 3)        /* 4190 */
1352
        MIPS_SYS(sys_getresgid        , 3)
1353
        MIPS_SYS(sys_prctl        , 5)
1354
        MIPS_SYS(sys_rt_sigreturn, 0)
1355
        MIPS_SYS(sys_rt_sigaction, 4)
1356
        MIPS_SYS(sys_rt_sigprocmask, 4)        /* 4195 */
1357
        MIPS_SYS(sys_rt_sigpending, 2)
1358
        MIPS_SYS(sys_rt_sigtimedwait, 4)
1359
        MIPS_SYS(sys_rt_sigqueueinfo, 3)
1360
        MIPS_SYS(sys_rt_sigsuspend, 0)
1361
        MIPS_SYS(sys_pread64        , 6)        /* 4200 */
1362
        MIPS_SYS(sys_pwrite64        , 6)
1363
        MIPS_SYS(sys_chown        , 3)
1364
        MIPS_SYS(sys_getcwd        , 2)
1365
        MIPS_SYS(sys_capget        , 2)
1366
        MIPS_SYS(sys_capset        , 2)        /* 4205 */
1367
        MIPS_SYS(sys_sigaltstack        , 0)
1368
        MIPS_SYS(sys_sendfile        , 4)
1369
        MIPS_SYS(sys_ni_syscall        , 0)
1370
        MIPS_SYS(sys_ni_syscall        , 0)
1371
        MIPS_SYS(sys_mmap2        , 6)        /* 4210 */
1372
        MIPS_SYS(sys_truncate64        , 4)
1373
        MIPS_SYS(sys_ftruncate64        , 4)
1374
        MIPS_SYS(sys_stat64        , 2)
1375
        MIPS_SYS(sys_lstat64        , 2)
1376
        MIPS_SYS(sys_fstat64        , 2)        /* 4215 */
1377
        MIPS_SYS(sys_pivot_root        , 2)
1378
        MIPS_SYS(sys_mincore        , 3)
1379
        MIPS_SYS(sys_madvise        , 3)
1380
        MIPS_SYS(sys_getdents64        , 3)
1381
        MIPS_SYS(sys_fcntl64        , 3)        /* 4220 */
1382
        MIPS_SYS(sys_ni_syscall        , 0)
1383
        MIPS_SYS(sys_gettid        , 0)
1384
        MIPS_SYS(sys_readahead        , 5)
1385
        MIPS_SYS(sys_setxattr        , 5)
1386
        MIPS_SYS(sys_lsetxattr        , 5)        /* 4225 */
1387
        MIPS_SYS(sys_fsetxattr        , 5)
1388
        MIPS_SYS(sys_getxattr        , 4)
1389
        MIPS_SYS(sys_lgetxattr        , 4)
1390
        MIPS_SYS(sys_fgetxattr        , 4)
1391
        MIPS_SYS(sys_listxattr        , 3)        /* 4230 */
1392
        MIPS_SYS(sys_llistxattr        , 3)
1393
        MIPS_SYS(sys_flistxattr        , 3)
1394
        MIPS_SYS(sys_removexattr        , 2)
1395
        MIPS_SYS(sys_lremovexattr, 2)
1396
        MIPS_SYS(sys_fremovexattr, 2)        /* 4235 */
1397
        MIPS_SYS(sys_tkill        , 2)
1398
        MIPS_SYS(sys_sendfile64        , 5)
1399
        MIPS_SYS(sys_futex        , 2)
1400
        MIPS_SYS(sys_sched_setaffinity, 3)
1401
        MIPS_SYS(sys_sched_getaffinity, 3)        /* 4240 */
1402
        MIPS_SYS(sys_io_setup        , 2)
1403
        MIPS_SYS(sys_io_destroy        , 1)
1404
        MIPS_SYS(sys_io_getevents, 5)
1405
        MIPS_SYS(sys_io_submit        , 3)
1406
        MIPS_SYS(sys_io_cancel        , 3)        /* 4245 */
1407
        MIPS_SYS(sys_exit_group        , 1)
1408
        MIPS_SYS(sys_lookup_dcookie, 3)
1409
        MIPS_SYS(sys_epoll_create, 1)
1410
        MIPS_SYS(sys_epoll_ctl        , 4)
1411
        MIPS_SYS(sys_epoll_wait        , 3)        /* 4250 */
1412
        MIPS_SYS(sys_remap_file_pages, 5)
1413
        MIPS_SYS(sys_set_tid_address, 1)
1414
        MIPS_SYS(sys_restart_syscall, 0)
1415
        MIPS_SYS(sys_fadvise64_64, 7)
1416
        MIPS_SYS(sys_statfs64        , 3)        /* 4255 */
1417
        MIPS_SYS(sys_fstatfs64        , 2)
1418
        MIPS_SYS(sys_timer_create, 3)
1419
        MIPS_SYS(sys_timer_settime, 4)
1420
        MIPS_SYS(sys_timer_gettime, 2)
1421
        MIPS_SYS(sys_timer_getoverrun, 1)        /* 4260 */
1422
        MIPS_SYS(sys_timer_delete, 1)
1423
        MIPS_SYS(sys_clock_settime, 2)
1424
        MIPS_SYS(sys_clock_gettime, 2)
1425
        MIPS_SYS(sys_clock_getres, 2)
1426
        MIPS_SYS(sys_clock_nanosleep, 4)        /* 4265 */
1427
        MIPS_SYS(sys_tgkill        , 3)
1428
        MIPS_SYS(sys_utimes        , 2)
1429
        MIPS_SYS(sys_mbind        , 4)
1430
        MIPS_SYS(sys_ni_syscall        , 0)        /* sys_get_mempolicy */
1431
        MIPS_SYS(sys_ni_syscall        , 0)        /* 4270 sys_set_mempolicy */
1432
        MIPS_SYS(sys_mq_open        , 4)
1433
        MIPS_SYS(sys_mq_unlink        , 1)
1434
        MIPS_SYS(sys_mq_timedsend, 5)
1435
        MIPS_SYS(sys_mq_timedreceive, 5)
1436
        MIPS_SYS(sys_mq_notify        , 2)        /* 4275 */
1437
        MIPS_SYS(sys_mq_getsetattr, 3)
1438
        MIPS_SYS(sys_ni_syscall        , 0)        /* sys_vserver */
1439
        MIPS_SYS(sys_waitid        , 4)
1440
        MIPS_SYS(sys_ni_syscall        , 0)        /* available, was setaltroot */
1441
        MIPS_SYS(sys_add_key        , 5)
1442
        MIPS_SYS(sys_request_key, 4)
1443
        MIPS_SYS(sys_keyctl        , 5)
1444
        MIPS_SYS(sys_set_thread_area, 1)
1445
        MIPS_SYS(sys_inotify_init, 0)
1446
        MIPS_SYS(sys_inotify_add_watch, 3) /* 4285 */
1447
        MIPS_SYS(sys_inotify_rm_watch, 2)
1448
        MIPS_SYS(sys_migrate_pages, 4)
1449
        MIPS_SYS(sys_openat, 4)
1450
        MIPS_SYS(sys_mkdirat, 3)
1451
        MIPS_SYS(sys_mknodat, 4)        /* 4290 */
1452
        MIPS_SYS(sys_fchownat, 5)
1453
        MIPS_SYS(sys_futimesat, 3)
1454
        MIPS_SYS(sys_fstatat64, 4)
1455
        MIPS_SYS(sys_unlinkat, 3)
1456
        MIPS_SYS(sys_renameat, 4)        /* 4295 */
1457
        MIPS_SYS(sys_linkat, 5)
1458
        MIPS_SYS(sys_symlinkat, 3)
1459
        MIPS_SYS(sys_readlinkat, 4)
1460
        MIPS_SYS(sys_fchmodat, 3)
1461
        MIPS_SYS(sys_faccessat, 3)        /* 4300 */
1462
        MIPS_SYS(sys_pselect6, 6)
1463
        MIPS_SYS(sys_ppoll, 5)
1464
        MIPS_SYS(sys_unshare, 1)
1465
        MIPS_SYS(sys_splice, 4)
1466
        MIPS_SYS(sys_sync_file_range, 7) /* 4305 */
1467
        MIPS_SYS(sys_tee, 4)
1468
        MIPS_SYS(sys_vmsplice, 4)
1469
        MIPS_SYS(sys_move_pages, 6)
1470
        MIPS_SYS(sys_set_robust_list, 2)
1471
        MIPS_SYS(sys_get_robust_list, 3) /* 4310 */
1472
        MIPS_SYS(sys_kexec_load, 4)
1473
        MIPS_SYS(sys_getcpu, 3)
1474
        MIPS_SYS(sys_epoll_pwait, 6)
1475
        MIPS_SYS(sys_ioprio_set, 3)
1476
        MIPS_SYS(sys_ioprio_get, 2)
1477
};
1478

    
1479
#undef MIPS_SYS
1480

    
1481
void cpu_loop(CPUMIPSState *env)
1482
{
1483
    target_siginfo_t info;
1484
    int trapnr, ret;
1485
    unsigned int syscall_num;
1486

    
1487
    for(;;) {
1488
        trapnr = cpu_mips_exec(env);
1489
        switch(trapnr) {
1490
        case EXCP_SYSCALL:
1491
            syscall_num = env->gpr[2][env->current_tc] - 4000;
1492
            env->PC[env->current_tc] += 4;
1493
            if (syscall_num >= sizeof(mips_syscall_args)) {
1494
                ret = -ENOSYS;
1495
            } else {
1496
                int nb_args;
1497
                abi_ulong sp_reg;
1498
                abi_ulong arg5 = 0, arg6 = 0, arg7 = 0, arg8 = 0;
1499

    
1500
                nb_args = mips_syscall_args[syscall_num];
1501
                sp_reg = env->gpr[29][env->current_tc];
1502
                switch (nb_args) {
1503
                /* these arguments are taken from the stack */
1504
                case 8: arg8 = tgetl(sp_reg + 28);
1505
                case 7: arg7 = tgetl(sp_reg + 24);
1506
                case 6: arg6 = tgetl(sp_reg + 20);
1507
                case 5: arg5 = tgetl(sp_reg + 16);
1508
                default:
1509
                    break;
1510
                }
1511
                ret = do_syscall(env, env->gpr[2][env->current_tc],
1512
                                 env->gpr[4][env->current_tc],
1513
                                 env->gpr[5][env->current_tc],
1514
                                 env->gpr[6][env->current_tc],
1515
                                 env->gpr[7][env->current_tc],
1516
                                 arg5, arg6/*, arg7, arg8*/);
1517
            }
1518
            if ((unsigned int)ret >= (unsigned int)(-1133)) {
1519
                env->gpr[7][env->current_tc] = 1; /* error flag */
1520
                ret = -ret;
1521
            } else {
1522
                env->gpr[7][env->current_tc] = 0; /* error flag */
1523
            }
1524
            env->gpr[2][env->current_tc] = ret;
1525
            break;
1526
        case EXCP_TLBL:
1527
        case EXCP_TLBS:
1528
        case EXCP_CpU:
1529
        case EXCP_RI:
1530
            info.si_signo = TARGET_SIGILL;
1531
            info.si_errno = 0;
1532
            info.si_code = 0;
1533
            queue_signal(info.si_signo, &info);
1534
            break;
1535
        case EXCP_INTERRUPT:
1536
            /* just indicate that signals should be handled asap */
1537
            break;
1538
        case EXCP_DEBUG:
1539
            {
1540
                int sig;
1541

    
1542
                sig = gdb_handlesig (env, TARGET_SIGTRAP);
1543
                if (sig)
1544
                  {
1545
                    info.si_signo = sig;
1546
                    info.si_errno = 0;
1547
                    info.si_code = TARGET_TRAP_BRKPT;
1548
                    queue_signal(info.si_signo, &info);
1549
                  }
1550
            }
1551
            break;
1552
        default:
1553
            //        error:
1554
            fprintf(stderr, "qemu: unhandled CPU exception 0x%x - aborting\n",
1555
                    trapnr);
1556
            cpu_dump_state(env, stderr, fprintf, 0);
1557
            abort();
1558
        }
1559
        process_pending_signals(env);
1560
    }
1561
}
1562
#endif
1563

    
1564
#ifdef TARGET_SH4
1565
void cpu_loop (CPUState *env)
1566
{
1567
    int trapnr, ret;
1568
    target_siginfo_t info;
1569

    
1570
    while (1) {
1571
        trapnr = cpu_sh4_exec (env);
1572

    
1573
        switch (trapnr) {
1574
        case 0x160:
1575
            ret = do_syscall(env,
1576
                             env->gregs[3],
1577
                             env->gregs[4],
1578
                             env->gregs[5],
1579
                             env->gregs[6],
1580
                             env->gregs[7],
1581
                             env->gregs[0],
1582
                             0);
1583
            env->gregs[0] = ret;
1584
            env->pc += 2;
1585
            break;
1586
        case EXCP_DEBUG:
1587
            {
1588
                int sig;
1589

    
1590
                sig = gdb_handlesig (env, TARGET_SIGTRAP);
1591
                if (sig)
1592
                  {
1593
                    info.si_signo = sig;
1594
                    info.si_errno = 0;
1595
                    info.si_code = TARGET_TRAP_BRKPT;
1596
                    queue_signal(info.si_signo, &info);
1597
                  }
1598
            }
1599
            break;
1600
        default:
1601
            printf ("Unhandled trap: 0x%x\n", trapnr);
1602
            cpu_dump_state(env, stderr, fprintf, 0);
1603
            exit (1);
1604
        }
1605
        process_pending_signals (env);
1606
    }
1607
}
1608
#endif
1609

    
1610
#ifdef TARGET_CRIS
1611
void cpu_loop (CPUState *env)
1612
{
1613
    int trapnr, ret;
1614
    target_siginfo_t info;
1615
    
1616
    while (1) {
1617
        trapnr = cpu_cris_exec (env);
1618
        switch (trapnr) {
1619
        case 0xaa:
1620
            {
1621
                info.si_signo = SIGSEGV;
1622
                info.si_errno = 0;
1623
                /* XXX: check env->error_code */
1624
                info.si_code = TARGET_SEGV_MAPERR;
1625
                info._sifields._sigfault._addr = env->debug1;
1626
                queue_signal(info.si_signo, &info);
1627
            }
1628
            break;
1629
        case EXCP_BREAK:
1630
            ret = do_syscall(env, 
1631
                             env->regs[9], 
1632
                             env->regs[10], 
1633
                             env->regs[11], 
1634
                             env->regs[12], 
1635
                             env->regs[13], 
1636
                             env->pregs[7], 
1637
                             env->pregs[11]);
1638
            env->regs[10] = ret;
1639
            env->pc += 2;
1640
            break;
1641
        case EXCP_DEBUG:
1642
            {
1643
                int sig;
1644

    
1645
                sig = gdb_handlesig (env, TARGET_SIGTRAP);
1646
                if (sig)
1647
                  {
1648
                    info.si_signo = sig;
1649
                    info.si_errno = 0;
1650
                    info.si_code = TARGET_TRAP_BRKPT;
1651
                    queue_signal(info.si_signo, &info);
1652
                  }
1653
            }
1654
            break;
1655
        default:
1656
            printf ("Unhandled trap: 0x%x\n", trapnr);
1657
            cpu_dump_state(env, stderr, fprintf, 0);
1658
            exit (1);
1659
        }
1660
        process_pending_signals (env);
1661
    }
1662
}
1663
#endif
1664

    
1665
#ifdef TARGET_M68K
1666

    
1667
void cpu_loop(CPUM68KState *env)
1668
{
1669
    int trapnr;
1670
    unsigned int n;
1671
    target_siginfo_t info;
1672
    TaskState *ts = env->opaque;
1673

    
1674
    for(;;) {
1675
        trapnr = cpu_m68k_exec(env);
1676
        switch(trapnr) {
1677
        case EXCP_ILLEGAL:
1678
            {
1679
                if (ts->sim_syscalls) {
1680
                    uint16_t nr;
1681
                    nr = lduw(env->pc + 2);
1682
                    env->pc += 4;
1683
                    do_m68k_simcall(env, nr);
1684
                } else {
1685
                    goto do_sigill;
1686
                }
1687
            }
1688
            break;
1689
        case EXCP_HALT_INSN:
1690
            /* Semihosing syscall.  */
1691
            env->pc += 4;
1692
            do_m68k_semihosting(env, env->dregs[0]);
1693
            break;
1694
        case EXCP_LINEA:
1695
        case EXCP_LINEF:
1696
        case EXCP_UNSUPPORTED:
1697
        do_sigill:
1698
            info.si_signo = SIGILL;
1699
            info.si_errno = 0;
1700
            info.si_code = TARGET_ILL_ILLOPN;
1701
            info._sifields._sigfault._addr = env->pc;
1702
            queue_signal(info.si_signo, &info);
1703
            break;
1704
        case EXCP_TRAP0:
1705
            {
1706
                ts->sim_syscalls = 0;
1707
                n = env->dregs[0];
1708
                env->pc += 2;
1709
                env->dregs[0] = do_syscall(env,
1710
                                          n,
1711
                                          env->dregs[1],
1712
                                          env->dregs[2],
1713
                                          env->dregs[3],
1714
                                          env->dregs[4],
1715
                                          env->dregs[5],
1716
                                          env->dregs[6]);
1717
            }
1718
            break;
1719
        case EXCP_INTERRUPT:
1720
            /* just indicate that signals should be handled asap */
1721
            break;
1722
        case EXCP_ACCESS:
1723
            {
1724
                info.si_signo = SIGSEGV;
1725
                info.si_errno = 0;
1726
                /* XXX: check env->error_code */
1727
                info.si_code = TARGET_SEGV_MAPERR;
1728
                info._sifields._sigfault._addr = env->mmu.ar;
1729
                queue_signal(info.si_signo, &info);
1730
            }
1731
            break;
1732
        case EXCP_DEBUG:
1733
            {
1734
                int sig;
1735

    
1736
                sig = gdb_handlesig (env, TARGET_SIGTRAP);
1737
                if (sig)
1738
                  {
1739
                    info.si_signo = sig;
1740
                    info.si_errno = 0;
1741
                    info.si_code = TARGET_TRAP_BRKPT;
1742
                    queue_signal(info.si_signo, &info);
1743
                  }
1744
            }
1745
            break;
1746
        default:
1747
            fprintf(stderr, "qemu: unhandled CPU exception 0x%x - aborting\n",
1748
                    trapnr);
1749
            cpu_dump_state(env, stderr, fprintf, 0);
1750
            abort();
1751
        }
1752
        process_pending_signals(env);
1753
    }
1754
}
1755
#endif /* TARGET_M68K */
1756

    
1757
#ifdef TARGET_ALPHA
1758
void cpu_loop (CPUState *env)
1759
{
1760
    int trapnr;
1761
    target_siginfo_t info;
1762

    
1763
    while (1) {
1764
        trapnr = cpu_alpha_exec (env);
1765

    
1766
        switch (trapnr) {
1767
        case EXCP_RESET:
1768
            fprintf(stderr, "Reset requested. Exit\n");
1769
            exit(1);
1770
            break;
1771
        case EXCP_MCHK:
1772
            fprintf(stderr, "Machine check exception. Exit\n");
1773
            exit(1);
1774
            break;
1775
        case EXCP_ARITH:
1776
            fprintf(stderr, "Arithmetic trap.\n");
1777
            exit(1);
1778
            break;
1779
        case EXCP_HW_INTERRUPT:
1780
            fprintf(stderr, "External interrupt. Exit\n");
1781
            exit(1);
1782
            break;
1783
        case EXCP_DFAULT:
1784
            fprintf(stderr, "MMU data fault\n");
1785
            exit(1);
1786
            break;
1787
        case EXCP_DTB_MISS_PAL:
1788
            fprintf(stderr, "MMU data TLB miss in PALcode\n");
1789
            exit(1);
1790
            break;
1791
        case EXCP_ITB_MISS:
1792
            fprintf(stderr, "MMU instruction TLB miss\n");
1793
            exit(1);
1794
            break;
1795
        case EXCP_ITB_ACV:
1796
            fprintf(stderr, "MMU instruction access violation\n");
1797
            exit(1);
1798
            break;
1799
        case EXCP_DTB_MISS_NATIVE:
1800
            fprintf(stderr, "MMU data TLB miss\n");
1801
            exit(1);
1802
            break;
1803
        case EXCP_UNALIGN:
1804
            fprintf(stderr, "Unaligned access\n");
1805
            exit(1);
1806
            break;
1807
        case EXCP_OPCDEC:
1808
            fprintf(stderr, "Invalid instruction\n");
1809
            exit(1);
1810
            break;
1811
        case EXCP_FEN:
1812
            fprintf(stderr, "Floating-point not allowed\n");
1813
            exit(1);
1814
            break;
1815
        case EXCP_CALL_PAL ... (EXCP_CALL_PALP - 1):
1816
            fprintf(stderr, "Call to PALcode\n");
1817
            call_pal(env, (trapnr >> 6) | 0x80);
1818
            break;
1819
        case EXCP_CALL_PALP ... (EXCP_CALL_PALE - 1):
1820
            fprintf(stderr, "Privileged call to PALcode\n");
1821
            exit(1);
1822
            break;
1823
        case EXCP_DEBUG:
1824
            {
1825
                int sig;
1826

    
1827
                sig = gdb_handlesig (env, TARGET_SIGTRAP);
1828
                if (sig)
1829
                  {
1830
                    info.si_signo = sig;
1831
                    info.si_errno = 0;
1832
                    info.si_code = TARGET_TRAP_BRKPT;
1833
                    queue_signal(info.si_signo, &info);
1834
                  }
1835
            }
1836
            break;
1837
        default:
1838
            printf ("Unhandled trap: 0x%x\n", trapnr);
1839
            cpu_dump_state(env, stderr, fprintf, 0);
1840
            exit (1);
1841
        }
1842
        process_pending_signals (env);
1843
    }
1844
}
1845
#endif /* TARGET_ALPHA */
1846

    
1847
void usage(void)
1848
{
1849
    printf("qemu-" TARGET_ARCH " version " QEMU_VERSION ", Copyright (c) 2003-2007 Fabrice Bellard\n"
1850
           "usage: qemu-" TARGET_ARCH " [-h] [-g] [-d opts] [-L path] [-s size] [-cpu model] program [arguments...]\n"
1851
           "Linux CPU emulator (compiled for %s emulation)\n"
1852
           "\n"
1853
           "-h                print this help\n"
1854
           "-g port           wait gdb connection to port\n"
1855
           "-L path           set the elf interpreter prefix (default=%s)\n"
1856
           "-s size           set the stack size in bytes (default=%ld)\n"
1857
           "-cpu model        select CPU (-cpu ? for list)\n"
1858
           "-drop-ld-preload  drop LD_PRELOAD for target process\n"
1859
           "\n"
1860
           "debug options:\n"
1861
#ifdef USE_CODE_COPY
1862
           "-no-code-copy   disable code copy acceleration\n"
1863
#endif
1864
           "-d options   activate log (logfile=%s)\n"
1865
           "-p pagesize  set the host page size to 'pagesize'\n",
1866
           TARGET_ARCH,
1867
           interp_prefix,
1868
           x86_stack_size,
1869
           DEBUG_LOGFILE);
1870
    _exit(1);
1871
}
1872

    
1873
/* XXX: currently only used for async signals (see signal.c) */
1874
CPUState *global_env;
1875

    
1876
/* used to free thread contexts */
1877
TaskState *first_task_state;
1878

    
1879
int main(int argc, char **argv)
1880
{
1881
    const char *filename;
1882
    const char *cpu_model;
1883
    struct target_pt_regs regs1, *regs = &regs1;
1884
    struct image_info info1, *info = &info1;
1885
    TaskState ts1, *ts = &ts1;
1886
    CPUState *env;
1887
    int optind;
1888
    const char *r;
1889
    int gdbstub_port = 0;
1890
    int drop_ld_preload = 0, environ_count = 0;
1891
    char **target_environ, **wrk, **dst;
1892

    
1893
    if (argc <= 1)
1894
        usage();
1895

    
1896
    /* init debug */
1897
    cpu_set_log_filename(DEBUG_LOGFILE);
1898

    
1899
    cpu_model = NULL;
1900
    optind = 1;
1901
    for(;;) {
1902
        if (optind >= argc)
1903
            break;
1904
        r = argv[optind];
1905
        if (r[0] != '-')
1906
            break;
1907
        optind++;
1908
        r++;
1909
        if (!strcmp(r, "-")) {
1910
            break;
1911
        } else if (!strcmp(r, "d")) {
1912
            int mask;
1913
            CPULogItem *item;
1914

    
1915
            if (optind >= argc)
1916
                break;
1917

    
1918
            r = argv[optind++];
1919
            mask = cpu_str_to_log_mask(r);
1920
            if (!mask) {
1921
                printf("Log items (comma separated):\n");
1922
                for(item = cpu_log_items; item->mask != 0; item++) {
1923
                    printf("%-10s %s\n", item->name, item->help);
1924
                }
1925
                exit(1);
1926
            }
1927
            cpu_set_log(mask);
1928
        } else if (!strcmp(r, "s")) {
1929
            r = argv[optind++];
1930
            x86_stack_size = strtol(r, (char **)&r, 0);
1931
            if (x86_stack_size <= 0)
1932
                usage();
1933
            if (*r == 'M')
1934
                x86_stack_size *= 1024 * 1024;
1935
            else if (*r == 'k' || *r == 'K')
1936
                x86_stack_size *= 1024;
1937
        } else if (!strcmp(r, "L")) {
1938
            interp_prefix = argv[optind++];
1939
        } else if (!strcmp(r, "p")) {
1940
            qemu_host_page_size = atoi(argv[optind++]);
1941
            if (qemu_host_page_size == 0 ||
1942
                (qemu_host_page_size & (qemu_host_page_size - 1)) != 0) {
1943
                fprintf(stderr, "page size must be a power of two\n");
1944
                exit(1);
1945
            }
1946
        } else if (!strcmp(r, "g")) {
1947
            gdbstub_port = atoi(argv[optind++]);
1948
        } else if (!strcmp(r, "r")) {
1949
            qemu_uname_release = argv[optind++];
1950
        } else if (!strcmp(r, "cpu")) {
1951
            cpu_model = argv[optind++];
1952
            if (strcmp(cpu_model, "?") == 0) {
1953
/* XXX: implement xxx_cpu_list for targets that still miss it */
1954
#if defined(cpu_list)
1955
                    cpu_list(stdout, &fprintf);
1956
#endif
1957
                _exit(1);
1958
            }
1959
        } else if (!strcmp(r, "drop-ld-preload")) {
1960
            drop_ld_preload = 1;
1961
        } else
1962
#ifdef USE_CODE_COPY
1963
        if (!strcmp(r, "no-code-copy")) {
1964
            code_copy_enabled = 0;
1965
        } else
1966
#endif
1967
        {
1968
            usage();
1969
        }
1970
    }
1971
    if (optind >= argc)
1972
        usage();
1973
    filename = argv[optind];
1974

    
1975
    /* Zero out regs */
1976
    memset(regs, 0, sizeof(struct target_pt_regs));
1977

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

    
1981
    /* Scan interp_prefix dir for replacement files. */
1982
    init_paths(interp_prefix);
1983

    
1984
    /* NOTE: we need to init the CPU at this stage to get
1985
       qemu_host_page_size */
1986
    env = cpu_init();
1987
    global_env = env;
1988

    
1989
    wrk = environ;
1990
    while (*(wrk++))
1991
        environ_count++;
1992

    
1993
    target_environ = malloc((environ_count + 1) * sizeof(char *));
1994
    if (!target_environ)
1995
        abort();
1996
    for (wrk = environ, dst = target_environ; *wrk; wrk++) {
1997
        if (drop_ld_preload && !strncmp(*wrk, "LD_PRELOAD=", 11))
1998
            continue;
1999
        *(dst++) = strdup(*wrk);
2000
    }
2001
    *dst = NULL; /* NULL terminate target_environ */
2002

    
2003
    if (loader_exec(filename, argv+optind, target_environ, regs, info) != 0) {
2004
        printf("Error loading %s\n", filename);
2005
        _exit(1);
2006
    }
2007

    
2008
    for (wrk = target_environ; *wrk; wrk++) {
2009
        free(*wrk);
2010
    }
2011

    
2012
    free(target_environ);
2013

    
2014
    if (loglevel) {
2015
        page_dump(logfile);
2016

    
2017
        fprintf(logfile, "start_brk   0x" TARGET_FMT_lx "\n", info->start_brk);
2018
        fprintf(logfile, "end_code    0x" TARGET_FMT_lx "\n", info->end_code);
2019
        fprintf(logfile, "start_code  0x" TARGET_FMT_lx "\n",
2020
                info->start_code);
2021
        fprintf(logfile, "start_data  0x" TARGET_FMT_lx "\n",
2022
                info->start_data);
2023
        fprintf(logfile, "end_data    0x" TARGET_FMT_lx "\n", info->end_data);
2024
        fprintf(logfile, "start_stack 0x" TARGET_FMT_lx "\n",
2025
                info->start_stack);
2026
        fprintf(logfile, "brk         0x" TARGET_FMT_lx "\n", info->brk);
2027
        fprintf(logfile, "entry       0x" TARGET_FMT_lx "\n", info->entry);
2028
    }
2029

    
2030
    target_set_brk(info->brk);
2031
    syscall_init();
2032
    signal_init();
2033

    
2034
    /* build Task State */
2035
    memset(ts, 0, sizeof(TaskState));
2036
    env->opaque = ts;
2037
    ts->used = 1;
2038
    ts->info = info;
2039
    env->user_mode_only = 1;
2040

    
2041
#if defined(TARGET_I386)
2042
    cpu_x86_set_cpl(env, 3);
2043

    
2044
    env->cr[0] = CR0_PG_MASK | CR0_WP_MASK | CR0_PE_MASK;
2045
    env->hflags |= HF_PE_MASK;
2046
    if (env->cpuid_features & CPUID_SSE) {
2047
        env->cr[4] |= CR4_OSFXSR_MASK;
2048
        env->hflags |= HF_OSFXSR_MASK;
2049
    }
2050

    
2051
    /* flags setup : we activate the IRQs by default as in user mode */
2052
    env->eflags |= IF_MASK;
2053

    
2054
    /* linux register setup */
2055
#if defined(TARGET_X86_64)
2056
    env->regs[R_EAX] = regs->rax;
2057
    env->regs[R_EBX] = regs->rbx;
2058
    env->regs[R_ECX] = regs->rcx;
2059
    env->regs[R_EDX] = regs->rdx;
2060
    env->regs[R_ESI] = regs->rsi;
2061
    env->regs[R_EDI] = regs->rdi;
2062
    env->regs[R_EBP] = regs->rbp;
2063
    env->regs[R_ESP] = regs->rsp;
2064
    env->eip = regs->rip;
2065
#else
2066
    env->regs[R_EAX] = regs->eax;
2067
    env->regs[R_EBX] = regs->ebx;
2068
    env->regs[R_ECX] = regs->ecx;
2069
    env->regs[R_EDX] = regs->edx;
2070
    env->regs[R_ESI] = regs->esi;
2071
    env->regs[R_EDI] = regs->edi;
2072
    env->regs[R_EBP] = regs->ebp;
2073
    env->regs[R_ESP] = regs->esp;
2074
    env->eip = regs->eip;
2075
#endif
2076

    
2077
    /* linux interrupt setup */
2078
    env->idt.base = h2g(idt_table);
2079
    env->idt.limit = sizeof(idt_table) - 1;
2080
    set_idt(0, 0);
2081
    set_idt(1, 0);
2082
    set_idt(2, 0);
2083
    set_idt(3, 3);
2084
    set_idt(4, 3);
2085
    set_idt(5, 3);
2086
    set_idt(6, 0);
2087
    set_idt(7, 0);
2088
    set_idt(8, 0);
2089
    set_idt(9, 0);
2090
    set_idt(10, 0);
2091
    set_idt(11, 0);
2092
    set_idt(12, 0);
2093
    set_idt(13, 0);
2094
    set_idt(14, 0);
2095
    set_idt(15, 0);
2096
    set_idt(16, 0);
2097
    set_idt(17, 0);
2098
    set_idt(18, 0);
2099
    set_idt(19, 0);
2100
    set_idt(0x80, 3);
2101

    
2102
    /* linux segment setup */
2103
    env->gdt.base = h2g(gdt_table);
2104
    env->gdt.limit = sizeof(gdt_table) - 1;
2105
    write_dt(&gdt_table[__USER_CS >> 3], 0, 0xfffff,
2106
             DESC_G_MASK | DESC_B_MASK | DESC_P_MASK | DESC_S_MASK |
2107
             (3 << DESC_DPL_SHIFT) | (0xa << DESC_TYPE_SHIFT));
2108
    write_dt(&gdt_table[__USER_DS >> 3], 0, 0xfffff,
2109
             DESC_G_MASK | DESC_B_MASK | DESC_P_MASK | DESC_S_MASK |
2110
             (3 << DESC_DPL_SHIFT) | (0x2 << DESC_TYPE_SHIFT));
2111
    cpu_x86_load_seg(env, R_CS, __USER_CS);
2112
    cpu_x86_load_seg(env, R_DS, __USER_DS);
2113
    cpu_x86_load_seg(env, R_ES, __USER_DS);
2114
    cpu_x86_load_seg(env, R_SS, __USER_DS);
2115
    cpu_x86_load_seg(env, R_FS, __USER_DS);
2116
    cpu_x86_load_seg(env, R_GS, __USER_DS);
2117

    
2118
    /* This hack makes Wine work... */
2119
    env->segs[R_FS].selector = 0;
2120
#elif defined(TARGET_ARM)
2121
    {
2122
        int i;
2123
        if (cpu_model == NULL)
2124
            cpu_model = "arm926";
2125
        cpu_arm_set_model(env, cpu_model);
2126
        cpsr_write(env, regs->uregs[16], 0xffffffff);
2127
        for(i = 0; i < 16; i++) {
2128
            env->regs[i] = regs->uregs[i];
2129
        }
2130
    }
2131
#elif defined(TARGET_SPARC)
2132
    {
2133
        int i;
2134
        const sparc_def_t *def;
2135
#ifdef TARGET_SPARC64
2136
        if (cpu_model == NULL)
2137
            cpu_model = "TI UltraSparc II";
2138
#else
2139
        if (cpu_model == NULL)
2140
            cpu_model = "Fujitsu MB86904";
2141
#endif
2142
        sparc_find_by_name(cpu_model, &def);
2143
        if (def == NULL) {
2144
            fprintf(stderr, "Unable to find Sparc CPU definition\n");
2145
            exit(1);
2146
        }
2147
        cpu_sparc_register(env, def, 0);
2148
        env->pc = regs->pc;
2149
        env->npc = regs->npc;
2150
        env->y = regs->y;
2151
        for(i = 0; i < 8; i++)
2152
            env->gregs[i] = regs->u_regs[i];
2153
        for(i = 0; i < 8; i++)
2154
            env->regwptr[i] = regs->u_regs[i + 8];
2155
    }
2156
#elif defined(TARGET_PPC)
2157
    {
2158
        ppc_def_t *def;
2159
        int i;
2160

    
2161
        /* Choose and initialise CPU */
2162
        if (cpu_model == NULL)
2163
            cpu_model = "750";
2164
        ppc_find_by_name(cpu_model, &def);
2165
        if (def == NULL) {
2166
            cpu_abort(env,
2167
                      "Unable to find PowerPC CPU definition\n");
2168
        }
2169
        cpu_ppc_register(env, def);
2170
        cpu_ppc_reset(env);
2171
#if defined(TARGET_PPC64)
2172
#if defined(TARGET_ABI32)
2173
        env->msr &= ~((target_ulong)1 << MSR_SF);
2174
#else
2175
        env->msr |= (target_ulong)1 << MSR_SF;
2176
#endif
2177
#endif
2178
        env->nip = regs->nip;
2179
        for(i = 0; i < 32; i++) {
2180
            env->gpr[i] = regs->gpr[i];
2181
        }
2182
    }
2183
#elif defined(TARGET_M68K)
2184
    {
2185
        if (cpu_model == NULL)
2186
            cpu_model = "any";
2187
        if (cpu_m68k_set_model(env, cpu_model)) {
2188
            cpu_abort(cpu_single_env,
2189
                      "Unable to find m68k CPU definition\n");
2190
        }
2191
        env->pc = regs->pc;
2192
        env->dregs[0] = regs->d0;
2193
        env->dregs[1] = regs->d1;
2194
        env->dregs[2] = regs->d2;
2195
        env->dregs[3] = regs->d3;
2196
        env->dregs[4] = regs->d4;
2197
        env->dregs[5] = regs->d5;
2198
        env->dregs[6] = regs->d6;
2199
        env->dregs[7] = regs->d7;
2200
        env->aregs[0] = regs->a0;
2201
        env->aregs[1] = regs->a1;
2202
        env->aregs[2] = regs->a2;
2203
        env->aregs[3] = regs->a3;
2204
        env->aregs[4] = regs->a4;
2205
        env->aregs[5] = regs->a5;
2206
        env->aregs[6] = regs->a6;
2207
        env->aregs[7] = regs->usp;
2208
        env->sr = regs->sr;
2209
        ts->sim_syscalls = 1;
2210
    }
2211
#elif defined(TARGET_MIPS)
2212
    {
2213
        mips_def_t *def;
2214
        int i;
2215

    
2216
        /* Choose and initialise CPU */
2217
        if (cpu_model == NULL)
2218
#if defined(TARGET_MIPSN32) || defined(TARGET_MIPS64)
2219
            cpu_model = "20Kc";
2220
#else
2221
            cpu_model = "24Kf";
2222
#endif
2223
        mips_find_by_name(cpu_model, &def);
2224
        if (def == NULL)
2225
            cpu_abort(env, "Unable to find MIPS CPU definition\n");
2226
        cpu_mips_register(env, def);
2227

    
2228
        for(i = 0; i < 32; i++) {
2229
            env->gpr[i][env->current_tc] = regs->regs[i];
2230
        }
2231
        env->PC[env->current_tc] = regs->cp0_epc;
2232
    }
2233
#elif defined(TARGET_SH4)
2234
    {
2235
        int i;
2236

    
2237
        for(i = 0; i < 16; i++) {
2238
            env->gregs[i] = regs->regs[i];
2239
        }
2240
        env->pc = regs->pc;
2241
    }
2242
#elif defined(TARGET_ALPHA)
2243
    {
2244
        int i;
2245

    
2246
        for(i = 0; i < 28; i++) {
2247
            env->ir[i] = ((abi_ulong *)regs)[i];
2248
        }
2249
        env->ipr[IPR_USP] = regs->usp;
2250
        env->ir[30] = regs->usp;
2251
        env->pc = regs->pc;
2252
        env->unique = regs->unique;
2253
    }
2254
#elif defined(TARGET_CRIS)
2255
    {
2256
            env->regs[0] = regs->r0;
2257
            env->regs[1] = regs->r1;
2258
            env->regs[2] = regs->r2;
2259
            env->regs[3] = regs->r3;
2260
            env->regs[4] = regs->r4;
2261
            env->regs[5] = regs->r5;
2262
            env->regs[6] = regs->r6;
2263
            env->regs[7] = regs->r7;
2264
            env->regs[8] = regs->r8;
2265
            env->regs[9] = regs->r9;
2266
            env->regs[10] = regs->r10;
2267
            env->regs[11] = regs->r11;
2268
            env->regs[12] = regs->r12;
2269
            env->regs[13] = regs->r13;
2270
            env->regs[14] = info->start_stack;
2271
            env->regs[15] = regs->acr;            
2272
            env->pc = regs->erp;
2273
    }
2274
#else
2275
#error unsupported target CPU
2276
#endif
2277

    
2278
#if defined(TARGET_ARM) || defined(TARGET_M68K)
2279
    ts->stack_base = info->start_stack;
2280
    ts->heap_base = info->brk;
2281
    /* This will be filled in on the first SYS_HEAPINFO call.  */
2282
    ts->heap_limit = 0;
2283
#endif
2284

    
2285
    if (gdbstub_port) {
2286
        gdbserver_start (gdbstub_port);
2287
        gdb_handlesig(env, 0);
2288
    }
2289
    cpu_loop(env);
2290
    /* never exits */
2291
    return 0;
2292
}