Statistics
| Branch: | Revision:

root / linux-user / main.c @ 7a3148a9

History | View | Annotate | Download (60.8 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
    target_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
            if (env->eflags & VM_MASK) {
198
                handle_vm86_fault(env);
199
            } else {
200
                info.si_signo = SIGSEGV;
201
                info.si_errno = 0;
202
                info.si_code = TARGET_SI_KERNEL;
203
                info._sifields._sigfault._addr = 0;
204
                queue_signal(info.si_signo, &info);
205
            }
206
            break;
207
        case EXCP0E_PAGE:
208
            info.si_signo = SIGSEGV;
209
            info.si_errno = 0;
210
            if (!(env->error_code & 1))
211
                info.si_code = TARGET_SEGV_MAPERR;
212
            else
213
                info.si_code = TARGET_SEGV_ACCERR;
214
            info._sifields._sigfault._addr = env->cr[2];
215
            queue_signal(info.si_signo, &info);
216
            break;
217
        case EXCP00_DIVZ:
218
            if (env->eflags & VM_MASK) {
219
                handle_vm86_trap(env, trapnr);
220
            } else {
221
                /* division by zero */
222
                info.si_signo = SIGFPE;
223
                info.si_errno = 0;
224
                info.si_code = TARGET_FPE_INTDIV;
225
                info._sifields._sigfault._addr = env->eip;
226
                queue_signal(info.si_signo, &info);
227
            }
228
            break;
229
        case EXCP01_SSTP:
230
        case EXCP03_INT3:
231
            if (env->eflags & VM_MASK) {
232
                handle_vm86_trap(env, trapnr);
233
            } else {
234
                info.si_signo = SIGTRAP;
235
                info.si_errno = 0;
236
                if (trapnr == EXCP01_SSTP) {
237
                    info.si_code = TARGET_TRAP_BRKPT;
238
                    info._sifields._sigfault._addr = env->eip;
239
                } else {
240
                    info.si_code = TARGET_SI_KERNEL;
241
                    info._sifields._sigfault._addr = 0;
242
                }
243
                queue_signal(info.si_signo, &info);
244
            }
245
            break;
246
        case EXCP04_INTO:
247
        case EXCP05_BOUND:
248
            if (env->eflags & VM_MASK) {
249
                handle_vm86_trap(env, trapnr);
250
            } else {
251
                info.si_signo = SIGSEGV;
252
                info.si_errno = 0;
253
                info.si_code = TARGET_SI_KERNEL;
254
                info._sifields._sigfault._addr = 0;
255
                queue_signal(info.si_signo, &info);
256
            }
257
            break;
258
        case EXCP06_ILLOP:
259
            info.si_signo = SIGILL;
260
            info.si_errno = 0;
261
            info.si_code = TARGET_ILL_ILLOPN;
262
            info._sifields._sigfault._addr = env->eip;
263
            queue_signal(info.si_signo, &info);
264
            break;
265
        case EXCP_INTERRUPT:
266
            /* just indicate that signals should be handled asap */
267
            break;
268
        case EXCP_DEBUG:
269
            {
270
                int sig;
271

    
272
                sig = gdb_handlesig (env, TARGET_SIGTRAP);
273
                if (sig)
274
                  {
275
                    info.si_signo = sig;
276
                    info.si_errno = 0;
277
                    info.si_code = TARGET_TRAP_BRKPT;
278
                    queue_signal(info.si_signo, &info);
279
                  }
280
            }
281
            break;
282
        default:
283
            pc = env->segs[R_CS].base + env->eip;
284
            fprintf(stderr, "qemu: 0x%08lx: unhandled CPU exception 0x%x - aborting\n", 
285
                    (long)pc, trapnr);
286
            abort();
287
        }
288
        process_pending_signals(env);
289
    }
290
}
291
#endif
292

    
293
#ifdef TARGET_ARM
294

    
295
/* XXX: find a better solution */
296
extern void tb_invalidate_page_range(target_ulong start, target_ulong end);
297

    
298
static void arm_cache_flush(target_ulong start, target_ulong last)
299
{
300
    target_ulong addr, last1;
301

    
302
    if (last < start)
303
        return;
304
    addr = start;
305
    for(;;) {
306
        last1 = ((addr + TARGET_PAGE_SIZE) & TARGET_PAGE_MASK) - 1;
307
        if (last1 > last)
308
            last1 = last;
309
        tb_invalidate_page_range(addr, last1 + 1);
310
        if (last1 == last)
311
            break;
312
        addr = last1 + 1;
313
    }
314
}
315

    
316
void cpu_loop(CPUARMState *env)
317
{
318
    int trapnr;
319
    unsigned int n, insn;
320
    target_siginfo_t info;
321
    uint32_t addr;
322
    
323
    for(;;) {
324
        trapnr = cpu_arm_exec(env);
325
        switch(trapnr) {
326
        case EXCP_UDEF:
327
            {
328
                TaskState *ts = env->opaque;
329
                uint32_t opcode;
330

    
331
                /* we handle the FPU emulation here, as Linux */
332
                /* we get the opcode */
333
                opcode = tget32(env->regs[15]);
334
                
335
                if (EmulateAll(opcode, &ts->fpa, env) == 0) {
336
                    info.si_signo = SIGILL;
337
                    info.si_errno = 0;
338
                    info.si_code = TARGET_ILL_ILLOPN;
339
                    info._sifields._sigfault._addr = env->regs[15];
340
                    queue_signal(info.si_signo, &info);
341
                } else {
342
                    /* increment PC */
343
                    env->regs[15] += 4;
344
                }
345
            }
346
            break;
347
        case EXCP_SWI:
348
        case EXCP_BKPT:
349
            {
350
                env->eabi = 1;
351
                /* system call */
352
                if (trapnr == EXCP_BKPT) {
353
                    if (env->thumb) {
354
                        insn = tget16(env->regs[15]);
355
                        n = insn & 0xff;
356
                        env->regs[15] += 2;
357
                    } else {
358
                        insn = tget32(env->regs[15]);
359
                        n = (insn & 0xf) | ((insn >> 4) & 0xff0);
360
                        env->regs[15] += 4;
361
                    }
362
                } else {
363
                    if (env->thumb) {
364
                        insn = tget16(env->regs[15] - 2);
365
                        n = insn & 0xff;
366
                    } else {
367
                        insn = tget32(env->regs[15] - 4);
368
                        n = insn & 0xffffff;
369
                    }
370
                }
371

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

    
422
                sig = gdb_handlesig (env, TARGET_SIGTRAP);
423
                if (sig)
424
                  {
425
                    info.si_signo = sig;
426
                    info.si_errno = 0;
427
                    info.si_code = TARGET_TRAP_BRKPT;
428
                    queue_signal(info.si_signo, &info);
429
                  }
430
            }
431
            break;
432
        default:
433
        error:
434
            fprintf(stderr, "qemu: unhandled CPU exception 0x%x - aborting\n", 
435
                    trapnr);
436
            cpu_dump_state(env, stderr, fprintf, 0);
437
            abort();
438
        }
439
        process_pending_signals(env);
440
    }
441
}
442

    
443
#endif
444

    
445
#ifdef TARGET_SPARC
446

    
447
//#define DEBUG_WIN
448

    
449
/* WARNING: dealing with register windows _is_ complicated. More info
450
   can be found at http://www.sics.se/~psm/sparcstack.html */
451
static inline int get_reg_index(CPUSPARCState *env, int cwp, int index)
452
{
453
    index = (index + cwp * 16) & (16 * NWINDOWS - 1);
454
    /* wrap handling : if cwp is on the last window, then we use the
455
       registers 'after' the end */
456
    if (index < 8 && env->cwp == (NWINDOWS - 1))
457
        index += (16 * NWINDOWS);
458
    return index;
459
}
460

    
461
/* save the register window 'cwp1' */
462
static inline void save_window_offset(CPUSPARCState *env, int cwp1)
463
{
464
    unsigned int i;
465
    target_ulong sp_ptr;
466
    
467
    sp_ptr = env->regbase[get_reg_index(env, cwp1, 6)];
468
#if defined(DEBUG_WIN)
469
    printf("win_overflow: sp_ptr=0x%x save_cwp=%d\n", 
470
           (int)sp_ptr, cwp1);
471
#endif
472
    for(i = 0; i < 16; i++) {
473
        tputl(sp_ptr, env->regbase[get_reg_index(env, cwp1, 8 + i)]);
474
        sp_ptr += sizeof(target_ulong);
475
    }
476
}
477

    
478
static void save_window(CPUSPARCState *env)
479
{
480
#ifndef TARGET_SPARC64
481
    unsigned int new_wim;
482
    new_wim = ((env->wim >> 1) | (env->wim << (NWINDOWS - 1))) &
483
        ((1LL << NWINDOWS) - 1);
484
    save_window_offset(env, (env->cwp - 2) & (NWINDOWS - 1));
485
    env->wim = new_wim;
486
#else
487
    save_window_offset(env, (env->cwp - 2) & (NWINDOWS - 1));
488
    env->cansave++;
489
    env->canrestore--;
490
#endif
491
}
492

    
493
static void restore_window(CPUSPARCState *env)
494
{
495
    unsigned int new_wim, i, cwp1;
496
    target_ulong sp_ptr;
497
    
498
    new_wim = ((env->wim << 1) | (env->wim >> (NWINDOWS - 1))) &
499
        ((1LL << NWINDOWS) - 1);
500
    
501
    /* restore the invalid window */
502
    cwp1 = (env->cwp + 1) & (NWINDOWS - 1);
503
    sp_ptr = env->regbase[get_reg_index(env, cwp1, 6)];
504
#if defined(DEBUG_WIN)
505
    printf("win_underflow: sp_ptr=0x%x load_cwp=%d\n", 
506
           (int)sp_ptr, cwp1);
507
#endif
508
    for(i = 0; i < 16; i++) {
509
        env->regbase[get_reg_index(env, cwp1, 8 + i)] = tgetl(sp_ptr);
510
        sp_ptr += sizeof(target_ulong);
511
    }
512
    env->wim = new_wim;
513
#ifdef TARGET_SPARC64
514
    env->canrestore++;
515
    if (env->cleanwin < NWINDOWS - 1)
516
        env->cleanwin++;
517
    env->cansave--;
518
#endif
519
}
520

    
521
static void flush_windows(CPUSPARCState *env)
522
{
523
    int offset, cwp1;
524

    
525
    offset = 1;
526
    for(;;) {
527
        /* if restore would invoke restore_window(), then we can stop */
528
        cwp1 = (env->cwp + offset) & (NWINDOWS - 1);
529
        if (env->wim & (1 << cwp1))
530
            break;
531
        save_window_offset(env, cwp1);
532
        offset++;
533
    }
534
    /* set wim so that restore will reload the registers */
535
    cwp1 = (env->cwp + 1) & (NWINDOWS - 1);
536
    env->wim = 1 << cwp1;
537
#if defined(DEBUG_WIN)
538
    printf("flush_windows: nb=%d\n", offset - 1);
539
#endif
540
}
541

    
542
void cpu_loop (CPUSPARCState *env)
543
{
544
    int trapnr, ret;
545
    target_siginfo_t info;
546
    
547
    while (1) {
548
        trapnr = cpu_sparc_exec (env);
549
        
550
        switch (trapnr) {
551
#ifndef TARGET_SPARC64
552
        case 0x88: 
553
        case 0x90:
554
#else
555
        case 0x16d:
556
#endif
557
            ret = do_syscall (env, env->gregs[1],
558
                              env->regwptr[0], env->regwptr[1], 
559
                              env->regwptr[2], env->regwptr[3], 
560
                              env->regwptr[4], env->regwptr[5]);
561
            if ((unsigned int)ret >= (unsigned int)(-515)) {
562
#ifdef TARGET_SPARC64
563
                env->xcc |= PSR_CARRY;
564
#else
565
                env->psr |= PSR_CARRY;
566
#endif
567
                ret = -ret;
568
            } else {
569
#ifdef TARGET_SPARC64
570
                env->xcc &= ~PSR_CARRY;
571
#else
572
                env->psr &= ~PSR_CARRY;
573
#endif
574
            }
575
            env->regwptr[0] = ret;
576
            /* next instruction */
577
            env->pc = env->npc;
578
            env->npc = env->npc + 4;
579
            break;
580
        case 0x83: /* flush windows */
581
            flush_windows(env);
582
            /* next instruction */
583
            env->pc = env->npc;
584
            env->npc = env->npc + 4;
585
            break;
586
#ifndef TARGET_SPARC64
587
        case TT_WIN_OVF: /* window overflow */
588
            save_window(env);
589
            break;
590
        case TT_WIN_UNF: /* window underflow */
591
            restore_window(env);
592
            break;
593
        case TT_TFAULT:
594
        case TT_DFAULT:
595
            {
596
                info.si_signo = SIGSEGV;
597
                info.si_errno = 0;
598
                /* XXX: check env->error_code */
599
                info.si_code = TARGET_SEGV_MAPERR;
600
                info._sifields._sigfault._addr = env->mmuregs[4];
601
                queue_signal(info.si_signo, &info);
602
            }
603
            break;
604
#else
605
        case TT_SPILL: /* window overflow */
606
            save_window(env);
607
            break;
608
        case TT_FILL: /* window underflow */
609
            restore_window(env);
610
            break;
611
            // XXX
612
#endif
613
        case EXCP_INTERRUPT:
614
            /* just indicate that signals should be handled asap */
615
            break;
616
        case EXCP_DEBUG:
617
            {
618
                int sig;
619

    
620
                sig = gdb_handlesig (env, TARGET_SIGTRAP);
621
                if (sig)
622
                  {
623
                    info.si_signo = sig;
624
                    info.si_errno = 0;
625
                    info.si_code = TARGET_TRAP_BRKPT;
626
                    queue_signal(info.si_signo, &info);
627
                  }
628
            }
629
            break;
630
        default:
631
            printf ("Unhandled trap: 0x%x\n", trapnr);
632
            cpu_dump_state(env, stderr, fprintf, 0);
633
            exit (1);
634
        }
635
        process_pending_signals (env);
636
    }
637
}
638

    
639
#endif
640

    
641
#ifdef TARGET_PPC
642

    
643
static inline uint64_t cpu_ppc_get_tb (CPUState *env)
644
{
645
    /* TO FIX */
646
    return 0;
647
}
648
  
649
uint32_t cpu_ppc_load_tbl (CPUState *env)
650
{
651
    return cpu_ppc_get_tb(env) & 0xFFFFFFFF;
652
}
653
  
654
uint32_t cpu_ppc_load_tbu (CPUState *env)
655
{
656
    return cpu_ppc_get_tb(env) >> 32;
657
}
658
  
659
static void cpu_ppc_store_tb (CPUState *env, uint64_t value)
660
{
661
    /* TO FIX */
662
}
663

    
664
void cpu_ppc_store_tbu (CPUState *env, uint32_t value)
665
{
666
    cpu_ppc_store_tb(env, ((uint64_t)value << 32) | cpu_ppc_load_tbl(env));
667
}
668
 
669
void cpu_ppc_store_tbl (CPUState *env, uint32_t value)
670
{
671
    cpu_ppc_store_tb(env, ((uint64_t)cpu_ppc_load_tbl(env) << 32) | value);
672
}
673

    
674
void cpu_ppc601_store_rtcu (CPUState *env, uint32_t value)
675
__attribute__ (( alias ("cpu_ppc_store_tbu") ));
676

    
677
uint32_t cpu_ppc601_load_rtcu (CPUState *env)
678
__attribute__ (( alias ("cpu_ppc_load_tbu") ));
679

    
680
void cpu_ppc601_store_rtcl (CPUState *env, uint32_t value)
681
{
682
    cpu_ppc_store_tbl(env, value & 0x3FFFFF80);
683
}
684

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

    
690
void cpu_loop(CPUPPCState *env)
691
{
692
    target_siginfo_t info;
693
    int trapnr;
694
    uint32_t ret;
695
    
696
    for(;;) {
697
        trapnr = cpu_ppc_exec(env);
698
        if (trapnr != EXCP_SYSCALL_USER && trapnr != EXCP_BRANCH &&
699
            trapnr != EXCP_TRACE) {
700
            if (loglevel > 0) {
701
                cpu_dump_state(env, logfile, fprintf, 0);
702
            }
703
        }
704
        switch(trapnr) {
705
        case EXCP_NONE:
706
            break;
707
        case EXCP_SYSCALL_USER:
708
            /* system call */
709
            /* WARNING:
710
             * PPC ABI uses overflow flag in cr0 to signal an error
711
             * in syscalls.
712
             */
713
#if 0
714
            printf("syscall %d 0x%08x 0x%08x 0x%08x 0x%08x\n", env->gpr[0],
715
                   env->gpr[3], env->gpr[4], env->gpr[5], env->gpr[6]);
716
#endif
717
            env->crf[0] &= ~0x1;
718
            ret = do_syscall(env, env->gpr[0], env->gpr[3], env->gpr[4],
719
                             env->gpr[5], env->gpr[6], env->gpr[7],
720
                             env->gpr[8]);
721
            if (ret > (uint32_t)(-515)) {
722
                env->crf[0] |= 0x1;
723
                ret = -ret;
724
            }
725
            env->gpr[3] = ret;
726
#if 0
727
            printf("syscall returned 0x%08x (%d)\n", ret, ret);
728
#endif
729
            break;
730
        case EXCP_RESET:
731
            /* Should not happen ! */
732
            fprintf(stderr, "RESET asked... Stop emulation\n");
733
            if (loglevel)
734
                fprintf(logfile, "RESET asked... Stop emulation\n");
735
            abort();
736
        case EXCP_MACHINE_CHECK:
737
            fprintf(stderr, "Machine check exeption...  Stop emulation\n");
738
            if (loglevel)
739
                fprintf(logfile, "RESET asked... Stop emulation\n");
740
            info.si_signo = TARGET_SIGBUS;
741
            info.si_errno = 0;
742
            info.si_code = TARGET_BUS_OBJERR;
743
            info._sifields._sigfault._addr = env->nip - 4;
744
            queue_signal(info.si_signo, &info);
745
        case EXCP_DSI:
746
            fprintf(stderr, "Invalid data memory access: 0x%08x\n",
747
                    env->spr[SPR_DAR]);
748
            if (loglevel) {
749
                fprintf(logfile, "Invalid data memory access: 0x%08x\n",
750
                        env->spr[SPR_DAR]);
751
            }
752
            switch (env->error_code & 0xFF000000) {
753
            case 0x40000000:
754
                info.si_signo = TARGET_SIGSEGV;
755
                info.si_errno = 0;
756
                info.si_code = TARGET_SEGV_MAPERR;
757
                break;
758
            case 0x04000000:
759
                info.si_signo = TARGET_SIGILL;
760
                info.si_errno = 0;
761
                info.si_code = TARGET_ILL_ILLADR;
762
                break;
763
            case 0x08000000:
764
                info.si_signo = TARGET_SIGSEGV;
765
                info.si_errno = 0;
766
                info.si_code = TARGET_SEGV_ACCERR;
767
                break;
768
            default:
769
                /* Let's send a regular segfault... */
770
                fprintf(stderr, "Invalid segfault errno (%02x)\n",
771
                        env->error_code);
772
                if (loglevel) {
773
                    fprintf(logfile, "Invalid segfault errno (%02x)\n",
774
                            env->error_code);
775
                }
776
                info.si_signo = TARGET_SIGSEGV;
777
                info.si_errno = 0;
778
                info.si_code = TARGET_SEGV_MAPERR;
779
                break;
780
            }
781
            info._sifields._sigfault._addr = env->nip;
782
            queue_signal(info.si_signo, &info);
783
            break;
784
        case EXCP_ISI:
785
            fprintf(stderr, "Invalid instruction fetch\n");
786
            if (loglevel)
787
                fprintf(logfile, "Invalid instruction fetch\n");
788
            switch (env->error_code & 0xFF000000) {
789
            case 0x40000000:
790
                info.si_signo = TARGET_SIGSEGV;
791
            info.si_errno = 0;
792
                info.si_code = TARGET_SEGV_MAPERR;
793
                break;
794
            case 0x10000000:
795
            case 0x08000000:
796
                info.si_signo = TARGET_SIGSEGV;
797
                info.si_errno = 0;
798
                info.si_code = TARGET_SEGV_ACCERR;
799
                break;
800
            default:
801
                /* Let's send a regular segfault... */
802
                fprintf(stderr, "Invalid segfault errno (%02x)\n",
803
                        env->error_code);
804
                if (loglevel) {
805
                    fprintf(logfile, "Invalid segfault errno (%02x)\n",
806
                            env->error_code);
807
                }
808
                info.si_signo = TARGET_SIGSEGV;
809
                info.si_errno = 0;
810
                info.si_code = TARGET_SEGV_MAPERR;
811
                break;
812
            }
813
            info._sifields._sigfault._addr = env->nip - 4;
814
            queue_signal(info.si_signo, &info);
815
            break;
816
        case EXCP_EXTERNAL:
817
            /* Should not happen ! */
818
            fprintf(stderr, "External interruption... Stop emulation\n");
819
            if (loglevel)
820
                fprintf(logfile, "External interruption... Stop emulation\n");
821
            abort();
822
        case EXCP_ALIGN:
823
            fprintf(stderr, "Invalid unaligned memory access\n");
824
            if (loglevel)
825
                fprintf(logfile, "Invalid unaligned memory access\n");
826
            info.si_signo = TARGET_SIGBUS;
827
            info.si_errno = 0;
828
            info.si_code = TARGET_BUS_ADRALN;
829
            info._sifields._sigfault._addr = env->nip - 4;
830
            queue_signal(info.si_signo, &info);
831
            break;
832
        case EXCP_PROGRAM:
833
            switch (env->error_code & ~0xF) {
834
            case EXCP_FP:
835
            fprintf(stderr, "Program exception\n");
836
                if (loglevel)
837
                    fprintf(logfile, "Program exception\n");
838
                /* Set FX */
839
                env->fpscr[7] |= 0x8;
840
                /* Finally, update FEX */
841
                if ((((env->fpscr[7] & 0x3) << 3) | (env->fpscr[6] >> 1)) &
842
                    ((env->fpscr[1] << 1) | (env->fpscr[0] >> 3)))
843
                    env->fpscr[7] |= 0x4;
844
                info.si_signo = TARGET_SIGFPE;
845
                info.si_errno = 0;
846
                switch (env->error_code & 0xF) {
847
                case EXCP_FP_OX:
848
                    info.si_code = TARGET_FPE_FLTOVF;
849
                    break;
850
                case EXCP_FP_UX:
851
                    info.si_code = TARGET_FPE_FLTUND;
852
                    break;
853
                case EXCP_FP_ZX:
854
                case EXCP_FP_VXZDZ:
855
                    info.si_code = TARGET_FPE_FLTDIV;
856
                    break;
857
                case EXCP_FP_XX:
858
                    info.si_code = TARGET_FPE_FLTRES;
859
                    break;
860
                case EXCP_FP_VXSOFT:
861
                    info.si_code = TARGET_FPE_FLTINV;
862
                    break;
863
                case EXCP_FP_VXNAN:
864
                case EXCP_FP_VXISI:
865
                case EXCP_FP_VXIDI:
866
                case EXCP_FP_VXIMZ:
867
                case EXCP_FP_VXVC:
868
                case EXCP_FP_VXSQRT:
869
                case EXCP_FP_VXCVI:
870
                    info.si_code = TARGET_FPE_FLTSUB;
871
                    break;
872
                default:
873
                    fprintf(stderr, "Unknown floating point exception "
874
                            "(%02x)\n", env->error_code);
875
                    if (loglevel) {
876
                        fprintf(logfile, "Unknown floating point exception "
877
                                "(%02x)\n", env->error_code & 0xF);
878
                    }
879
                }
880
            break;
881
        case EXCP_INVAL:
882
                fprintf(stderr, "Invalid instruction\n");
883
                if (loglevel)
884
                    fprintf(logfile, "Invalid instruction\n");
885
                info.si_signo = TARGET_SIGILL;
886
                info.si_errno = 0;
887
                switch (env->error_code & 0xF) {
888
                case EXCP_INVAL_INVAL:
889
                    info.si_code = TARGET_ILL_ILLOPC;
890
                    break;
891
                case EXCP_INVAL_LSWX:
892
            info.si_code = TARGET_ILL_ILLOPN;
893
                    break;
894
                case EXCP_INVAL_SPR:
895
                    info.si_code = TARGET_ILL_PRVREG;
896
                    break;
897
                case EXCP_INVAL_FP:
898
                    info.si_code = TARGET_ILL_COPROC;
899
                    break;
900
                default:
901
                    fprintf(stderr, "Unknown invalid operation (%02x)\n",
902
                            env->error_code & 0xF);
903
                    if (loglevel) {
904
                        fprintf(logfile, "Unknown invalid operation (%02x)\n",
905
                                env->error_code & 0xF);
906
                    }
907
                    info.si_code = TARGET_ILL_ILLADR;
908
                    break;
909
                }
910
                break;
911
            case EXCP_PRIV:
912
                fprintf(stderr, "Privilege violation\n");
913
                if (loglevel)
914
                    fprintf(logfile, "Privilege violation\n");
915
                info.si_signo = TARGET_SIGILL;
916
                info.si_errno = 0;
917
                switch (env->error_code & 0xF) {
918
                case EXCP_PRIV_OPC:
919
                    info.si_code = TARGET_ILL_PRVOPC;
920
                    break;
921
                case EXCP_PRIV_REG:
922
                    info.si_code = TARGET_ILL_PRVREG;
923
                break;
924
                default:
925
                    fprintf(stderr, "Unknown privilege violation (%02x)\n",
926
                            env->error_code & 0xF);
927
                    info.si_code = TARGET_ILL_PRVOPC;
928
                    break;
929
                }
930
                break;
931
            case EXCP_TRAP:
932
                fprintf(stderr, "Tried to call a TRAP\n");
933
                if (loglevel)
934
                    fprintf(logfile, "Tried to call a TRAP\n");
935
                abort();
936
            default:
937
                /* Should not happen ! */
938
                fprintf(stderr, "Unknown program exception (%02x)\n",
939
                        env->error_code);
940
                if (loglevel) {
941
                    fprintf(logfile, "Unknwon program exception (%02x)\n",
942
                            env->error_code);
943
                }
944
                abort();
945
            }
946
            info._sifields._sigfault._addr = env->nip - 4;
947
            queue_signal(info.si_signo, &info);
948
            break;
949
        case EXCP_NO_FP:
950
            fprintf(stderr, "No floating point allowed\n");
951
            if (loglevel)
952
                fprintf(logfile, "No floating point allowed\n");
953
            info.si_signo = TARGET_SIGILL;
954
            info.si_errno = 0;
955
            info.si_code = TARGET_ILL_COPROC;
956
            info._sifields._sigfault._addr = env->nip - 4;
957
            queue_signal(info.si_signo, &info);
958
            break;
959
        case EXCP_DECR:
960
            /* Should not happen ! */
961
            fprintf(stderr, "Decrementer exception\n");
962
            if (loglevel)
963
                fprintf(logfile, "Decrementer exception\n");
964
            abort();
965
        case EXCP_TRACE:
966
            /* Do nothing: we use this to trace execution */
967
            break;
968
        case EXCP_FP_ASSIST:
969
            /* Should not happen ! */
970
            fprintf(stderr, "Floating point assist exception\n");
971
            if (loglevel)
972
                fprintf(logfile, "Floating point assist exception\n");
973
            abort();
974
        case EXCP_MTMSR:
975
            /* We reloaded the msr, just go on */
976
            if (msr_pr == 0) {
977
                fprintf(stderr, "Tried to go into supervisor mode !\n");
978
                if (loglevel)
979
                    fprintf(logfile, "Tried to go into supervisor mode !\n");
980
                abort();
981
        }
982
            break;
983
        case EXCP_BRANCH:
984
            /* We stopped because of a jump... */
985
            break;
986
        case EXCP_INTERRUPT:
987
            /* Don't know why this should ever happen... */
988
            break;
989
        case EXCP_DEBUG:
990
            {
991
                int sig;
992

    
993
                sig = gdb_handlesig (env, TARGET_SIGTRAP);
994
                if (sig)
995
                  {
996
                    info.si_signo = sig;
997
                    info.si_errno = 0;
998
                    info.si_code = TARGET_TRAP_BRKPT;
999
                    queue_signal(info.si_signo, &info);
1000
                  }
1001
            }
1002
            break;
1003
        default:
1004
            fprintf(stderr, "qemu: unhandled CPU exception 0x%x - aborting\n", 
1005
                    trapnr);
1006
            if (loglevel) {
1007
                fprintf(logfile, "qemu: unhandled CPU exception 0x%02x - "
1008
                        "0x%02x - aborting\n", trapnr, env->error_code);
1009
            }
1010
            abort();
1011
        }
1012
        process_pending_signals(env);
1013
    }
1014
}
1015
#endif
1016

    
1017
#ifdef TARGET_MIPS
1018

    
1019
#define MIPS_SYS(name, args) args,
1020

    
1021
static const uint8_t mips_syscall_args[] = {
1022
        MIPS_SYS(sys_syscall        , 0)        /* 4000 */
1023
        MIPS_SYS(sys_exit        , 1)
1024
        MIPS_SYS(sys_fork        , 0)
1025
        MIPS_SYS(sys_read        , 3)
1026
        MIPS_SYS(sys_write        , 3)
1027
        MIPS_SYS(sys_open        , 3)        /* 4005 */
1028
        MIPS_SYS(sys_close        , 1)
1029
        MIPS_SYS(sys_waitpid        , 3)
1030
        MIPS_SYS(sys_creat        , 2)
1031
        MIPS_SYS(sys_link        , 2)
1032
        MIPS_SYS(sys_unlink        , 1)        /* 4010 */
1033
        MIPS_SYS(sys_execve        , 0)
1034
        MIPS_SYS(sys_chdir        , 1)
1035
        MIPS_SYS(sys_time        , 1)
1036
        MIPS_SYS(sys_mknod        , 3)
1037
        MIPS_SYS(sys_chmod        , 2)        /* 4015 */
1038
        MIPS_SYS(sys_lchown        , 3)
1039
        MIPS_SYS(sys_ni_syscall        , 0)
1040
        MIPS_SYS(sys_ni_syscall        , 0)        /* was sys_stat */
1041
        MIPS_SYS(sys_lseek        , 3)
1042
        MIPS_SYS(sys_getpid        , 0)        /* 4020 */
1043
        MIPS_SYS(sys_mount        , 5)
1044
        MIPS_SYS(sys_oldumount        , 1)
1045
        MIPS_SYS(sys_setuid        , 1)
1046
        MIPS_SYS(sys_getuid        , 0)
1047
        MIPS_SYS(sys_stime        , 1)        /* 4025 */
1048
        MIPS_SYS(sys_ptrace        , 4)
1049
        MIPS_SYS(sys_alarm        , 1)
1050
        MIPS_SYS(sys_ni_syscall        , 0)        /* was sys_fstat */
1051
        MIPS_SYS(sys_pause        , 0)
1052
        MIPS_SYS(sys_utime        , 2)        /* 4030 */
1053
        MIPS_SYS(sys_ni_syscall        , 0)
1054
        MIPS_SYS(sys_ni_syscall        , 0)
1055
        MIPS_SYS(sys_access        , 2)
1056
        MIPS_SYS(sys_nice        , 1)
1057
        MIPS_SYS(sys_ni_syscall        , 0)        /* 4035 */
1058
        MIPS_SYS(sys_sync        , 0)
1059
        MIPS_SYS(sys_kill        , 2)
1060
        MIPS_SYS(sys_rename        , 2)
1061
        MIPS_SYS(sys_mkdir        , 2)
1062
        MIPS_SYS(sys_rmdir        , 1)        /* 4040 */
1063
        MIPS_SYS(sys_dup                , 1)
1064
        MIPS_SYS(sys_pipe        , 0)
1065
        MIPS_SYS(sys_times        , 1)
1066
        MIPS_SYS(sys_ni_syscall        , 0)
1067
        MIPS_SYS(sys_brk                , 1)        /* 4045 */
1068
        MIPS_SYS(sys_setgid        , 1)
1069
        MIPS_SYS(sys_getgid        , 0)
1070
        MIPS_SYS(sys_ni_syscall        , 0)        /* was signal(2) */
1071
        MIPS_SYS(sys_geteuid        , 0)
1072
        MIPS_SYS(sys_getegid        , 0)        /* 4050 */
1073
        MIPS_SYS(sys_acct        , 0)
1074
        MIPS_SYS(sys_umount        , 2)
1075
        MIPS_SYS(sys_ni_syscall        , 0)
1076
        MIPS_SYS(sys_ioctl        , 3)
1077
        MIPS_SYS(sys_fcntl        , 3)        /* 4055 */
1078
        MIPS_SYS(sys_ni_syscall        , 2)
1079
        MIPS_SYS(sys_setpgid        , 2)
1080
        MIPS_SYS(sys_ni_syscall        , 0)
1081
        MIPS_SYS(sys_olduname        , 1)
1082
        MIPS_SYS(sys_umask        , 1)        /* 4060 */
1083
        MIPS_SYS(sys_chroot        , 1)
1084
        MIPS_SYS(sys_ustat        , 2)
1085
        MIPS_SYS(sys_dup2        , 2)
1086
        MIPS_SYS(sys_getppid        , 0)
1087
        MIPS_SYS(sys_getpgrp        , 0)        /* 4065 */
1088
        MIPS_SYS(sys_setsid        , 0)
1089
        MIPS_SYS(sys_sigaction        , 3)
1090
        MIPS_SYS(sys_sgetmask        , 0)
1091
        MIPS_SYS(sys_ssetmask        , 1)
1092
        MIPS_SYS(sys_setreuid        , 2)        /* 4070 */
1093
        MIPS_SYS(sys_setregid        , 2)
1094
        MIPS_SYS(sys_sigsuspend        , 0)
1095
        MIPS_SYS(sys_sigpending        , 1)
1096
        MIPS_SYS(sys_sethostname        , 2)
1097
        MIPS_SYS(sys_setrlimit        , 2)        /* 4075 */
1098
        MIPS_SYS(sys_getrlimit        , 2)
1099
        MIPS_SYS(sys_getrusage        , 2)
1100
        MIPS_SYS(sys_gettimeofday, 2)
1101
        MIPS_SYS(sys_settimeofday, 2)
1102
        MIPS_SYS(sys_getgroups        , 2)        /* 4080 */
1103
        MIPS_SYS(sys_setgroups        , 2)
1104
        MIPS_SYS(sys_ni_syscall        , 0)        /* old_select */
1105
        MIPS_SYS(sys_symlink        , 2)
1106
        MIPS_SYS(sys_ni_syscall        , 0)        /* was sys_lstat */
1107
        MIPS_SYS(sys_readlink        , 3)        /* 4085 */
1108
        MIPS_SYS(sys_uselib        , 1)
1109
        MIPS_SYS(sys_swapon        , 2)
1110
        MIPS_SYS(sys_reboot        , 3)
1111
        MIPS_SYS(old_readdir        , 3)
1112
        MIPS_SYS(old_mmap        , 6)        /* 4090 */
1113
        MIPS_SYS(sys_munmap        , 2)
1114
        MIPS_SYS(sys_truncate        , 2)
1115
        MIPS_SYS(sys_ftruncate        , 2)
1116
        MIPS_SYS(sys_fchmod        , 2)
1117
        MIPS_SYS(sys_fchown        , 3)        /* 4095 */
1118
        MIPS_SYS(sys_getpriority        , 2)
1119
        MIPS_SYS(sys_setpriority        , 3)
1120
        MIPS_SYS(sys_ni_syscall        , 0)
1121
        MIPS_SYS(sys_statfs        , 2)
1122
        MIPS_SYS(sys_fstatfs        , 2)        /* 4100 */
1123
        MIPS_SYS(sys_ni_syscall        , 0)        /* was ioperm(2) */
1124
        MIPS_SYS(sys_socketcall        , 2)
1125
        MIPS_SYS(sys_syslog        , 3)
1126
        MIPS_SYS(sys_setitimer        , 3)
1127
        MIPS_SYS(sys_getitimer        , 2)        /* 4105 */
1128
        MIPS_SYS(sys_newstat        , 2)
1129
        MIPS_SYS(sys_newlstat        , 2)
1130
        MIPS_SYS(sys_newfstat        , 2)
1131
        MIPS_SYS(sys_uname        , 1)
1132
        MIPS_SYS(sys_ni_syscall        , 0)        /* 4110 was iopl(2) */
1133
        MIPS_SYS(sys_vhangup        , 0)
1134
        MIPS_SYS(sys_ni_syscall        , 0)        /* was sys_idle() */
1135
        MIPS_SYS(sys_ni_syscall        , 0)        /* was sys_vm86 */
1136
        MIPS_SYS(sys_wait4        , 4)
1137
        MIPS_SYS(sys_swapoff        , 1)        /* 4115 */
1138
        MIPS_SYS(sys_sysinfo        , 1)
1139
        MIPS_SYS(sys_ipc                , 6)
1140
        MIPS_SYS(sys_fsync        , 1)
1141
        MIPS_SYS(sys_sigreturn        , 0)
1142
        MIPS_SYS(sys_clone        , 0)        /* 4120 */
1143
        MIPS_SYS(sys_setdomainname, 2)
1144
        MIPS_SYS(sys_newuname        , 1)
1145
        MIPS_SYS(sys_ni_syscall        , 0)        /* sys_modify_ldt */
1146
        MIPS_SYS(sys_adjtimex        , 1)
1147
        MIPS_SYS(sys_mprotect        , 3)        /* 4125 */
1148
        MIPS_SYS(sys_sigprocmask        , 3)
1149
        MIPS_SYS(sys_ni_syscall        , 0)        /* was create_module */
1150
        MIPS_SYS(sys_init_module        , 5)
1151
        MIPS_SYS(sys_delete_module, 1)
1152
        MIPS_SYS(sys_ni_syscall        , 0)        /* 4130        was get_kernel_syms */
1153
        MIPS_SYS(sys_quotactl        , 0)
1154
        MIPS_SYS(sys_getpgid        , 1)
1155
        MIPS_SYS(sys_fchdir        , 1)
1156
        MIPS_SYS(sys_bdflush        , 2)
1157
        MIPS_SYS(sys_sysfs        , 3)        /* 4135 */
1158
        MIPS_SYS(sys_personality        , 1)
1159
        MIPS_SYS(sys_ni_syscall        , 0)        /* for afs_syscall */
1160
        MIPS_SYS(sys_setfsuid        , 1)
1161
        MIPS_SYS(sys_setfsgid        , 1)
1162
        MIPS_SYS(sys_llseek        , 5)        /* 4140 */
1163
        MIPS_SYS(sys_getdents        , 3)
1164
        MIPS_SYS(sys_select        , 5)
1165
        MIPS_SYS(sys_flock        , 2)
1166
        MIPS_SYS(sys_msync        , 3)
1167
        MIPS_SYS(sys_readv        , 3)        /* 4145 */
1168
        MIPS_SYS(sys_writev        , 3)
1169
        MIPS_SYS(sys_cacheflush        , 3)
1170
        MIPS_SYS(sys_cachectl        , 3)
1171
        MIPS_SYS(sys_sysmips        , 4)
1172
        MIPS_SYS(sys_ni_syscall        , 0)        /* 4150 */
1173
        MIPS_SYS(sys_getsid        , 1)
1174
        MIPS_SYS(sys_fdatasync        , 0)
1175
        MIPS_SYS(sys_sysctl        , 1)
1176
        MIPS_SYS(sys_mlock        , 2)
1177
        MIPS_SYS(sys_munlock        , 2)        /* 4155 */
1178
        MIPS_SYS(sys_mlockall        , 1)
1179
        MIPS_SYS(sys_munlockall        , 0)
1180
        MIPS_SYS(sys_sched_setparam, 2)
1181
        MIPS_SYS(sys_sched_getparam, 2)
1182
        MIPS_SYS(sys_sched_setscheduler, 3)        /* 4160 */
1183
        MIPS_SYS(sys_sched_getscheduler, 1)
1184
        MIPS_SYS(sys_sched_yield        , 0)
1185
        MIPS_SYS(sys_sched_get_priority_max, 1)
1186
        MIPS_SYS(sys_sched_get_priority_min, 1)
1187
        MIPS_SYS(sys_sched_rr_get_interval, 2)        /* 4165 */
1188
        MIPS_SYS(sys_nanosleep,        2)
1189
        MIPS_SYS(sys_mremap        , 4)
1190
        MIPS_SYS(sys_accept        , 3)
1191
        MIPS_SYS(sys_bind        , 3)
1192
        MIPS_SYS(sys_connect        , 3)        /* 4170 */
1193
        MIPS_SYS(sys_getpeername        , 3)
1194
        MIPS_SYS(sys_getsockname        , 3)
1195
        MIPS_SYS(sys_getsockopt        , 5)
1196
        MIPS_SYS(sys_listen        , 2)
1197
        MIPS_SYS(sys_recv        , 4)        /* 4175 */
1198
        MIPS_SYS(sys_recvfrom        , 6)
1199
        MIPS_SYS(sys_recvmsg        , 3)
1200
        MIPS_SYS(sys_send        , 4)
1201
        MIPS_SYS(sys_sendmsg        , 3)
1202
        MIPS_SYS(sys_sendto        , 6)        /* 4180 */
1203
        MIPS_SYS(sys_setsockopt        , 5)
1204
        MIPS_SYS(sys_shutdown        , 2)
1205
        MIPS_SYS(sys_socket        , 3)
1206
        MIPS_SYS(sys_socketpair        , 4)
1207
        MIPS_SYS(sys_setresuid        , 3)        /* 4185 */
1208
        MIPS_SYS(sys_getresuid        , 3)
1209
        MIPS_SYS(sys_ni_syscall        , 0)        /* was sys_query_module */
1210
        MIPS_SYS(sys_poll        , 3)
1211
        MIPS_SYS(sys_nfsservctl        , 3)
1212
        MIPS_SYS(sys_setresgid        , 3)        /* 4190 */
1213
        MIPS_SYS(sys_getresgid        , 3)
1214
        MIPS_SYS(sys_prctl        , 5)
1215
        MIPS_SYS(sys_rt_sigreturn, 0)
1216
        MIPS_SYS(sys_rt_sigaction, 4)
1217
        MIPS_SYS(sys_rt_sigprocmask, 4)        /* 4195 */
1218
        MIPS_SYS(sys_rt_sigpending, 2)
1219
        MIPS_SYS(sys_rt_sigtimedwait, 4)
1220
        MIPS_SYS(sys_rt_sigqueueinfo, 3)
1221
        MIPS_SYS(sys_rt_sigsuspend, 0)
1222
        MIPS_SYS(sys_pread64        , 6)        /* 4200 */
1223
        MIPS_SYS(sys_pwrite64        , 6)
1224
        MIPS_SYS(sys_chown        , 3)
1225
        MIPS_SYS(sys_getcwd        , 2)
1226
        MIPS_SYS(sys_capget        , 2)
1227
        MIPS_SYS(sys_capset        , 2)        /* 4205 */
1228
        MIPS_SYS(sys_sigaltstack        , 0)
1229
        MIPS_SYS(sys_sendfile        , 4)
1230
        MIPS_SYS(sys_ni_syscall        , 0)
1231
        MIPS_SYS(sys_ni_syscall        , 0)
1232
        MIPS_SYS(sys_mmap2        , 6)        /* 4210 */
1233
        MIPS_SYS(sys_truncate64        , 4)
1234
        MIPS_SYS(sys_ftruncate64        , 4)
1235
        MIPS_SYS(sys_stat64        , 2)
1236
        MIPS_SYS(sys_lstat64        , 2)
1237
        MIPS_SYS(sys_fstat64        , 2)        /* 4215 */
1238
        MIPS_SYS(sys_pivot_root        , 2)
1239
        MIPS_SYS(sys_mincore        , 3)
1240
        MIPS_SYS(sys_madvise        , 3)
1241
        MIPS_SYS(sys_getdents64        , 3)
1242
        MIPS_SYS(sys_fcntl64        , 3)        /* 4220 */
1243
        MIPS_SYS(sys_ni_syscall        , 0)
1244
        MIPS_SYS(sys_gettid        , 0)
1245
        MIPS_SYS(sys_readahead        , 5)
1246
        MIPS_SYS(sys_setxattr        , 5)
1247
        MIPS_SYS(sys_lsetxattr        , 5)        /* 4225 */
1248
        MIPS_SYS(sys_fsetxattr        , 5)
1249
        MIPS_SYS(sys_getxattr        , 4)
1250
        MIPS_SYS(sys_lgetxattr        , 4)
1251
        MIPS_SYS(sys_fgetxattr        , 4)
1252
        MIPS_SYS(sys_listxattr        , 3)        /* 4230 */
1253
        MIPS_SYS(sys_llistxattr        , 3)
1254
        MIPS_SYS(sys_flistxattr        , 3)
1255
        MIPS_SYS(sys_removexattr        , 2)
1256
        MIPS_SYS(sys_lremovexattr, 2)
1257
        MIPS_SYS(sys_fremovexattr, 2)        /* 4235 */
1258
        MIPS_SYS(sys_tkill        , 2)
1259
        MIPS_SYS(sys_sendfile64        , 5)
1260
        MIPS_SYS(sys_futex        , 2)
1261
        MIPS_SYS(sys_sched_setaffinity, 3)
1262
        MIPS_SYS(sys_sched_getaffinity, 3)        /* 4240 */
1263
        MIPS_SYS(sys_io_setup        , 2)
1264
        MIPS_SYS(sys_io_destroy        , 1)
1265
        MIPS_SYS(sys_io_getevents, 5)
1266
        MIPS_SYS(sys_io_submit        , 3)
1267
        MIPS_SYS(sys_io_cancel        , 3)        /* 4245 */
1268
        MIPS_SYS(sys_exit_group        , 1)
1269
        MIPS_SYS(sys_lookup_dcookie, 3)
1270
        MIPS_SYS(sys_epoll_create, 1)
1271
        MIPS_SYS(sys_epoll_ctl        , 4)
1272
        MIPS_SYS(sys_epoll_wait        , 3)        /* 4250 */
1273
        MIPS_SYS(sys_remap_file_pages, 5)
1274
        MIPS_SYS(sys_set_tid_address, 1)
1275
        MIPS_SYS(sys_restart_syscall, 0)
1276
        MIPS_SYS(sys_fadvise64_64, 7)
1277
        MIPS_SYS(sys_statfs64        , 3)        /* 4255 */
1278
        MIPS_SYS(sys_fstatfs64        , 2)
1279
        MIPS_SYS(sys_timer_create, 3)
1280
        MIPS_SYS(sys_timer_settime, 4)
1281
        MIPS_SYS(sys_timer_gettime, 2)
1282
        MIPS_SYS(sys_timer_getoverrun, 1)        /* 4260 */
1283
        MIPS_SYS(sys_timer_delete, 1)
1284
        MIPS_SYS(sys_clock_settime, 2)
1285
        MIPS_SYS(sys_clock_gettime, 2)
1286
        MIPS_SYS(sys_clock_getres, 2)
1287
        MIPS_SYS(sys_clock_nanosleep, 4)        /* 4265 */
1288
        MIPS_SYS(sys_tgkill        , 3)
1289
        MIPS_SYS(sys_utimes        , 2)
1290
        MIPS_SYS(sys_mbind        , 4)
1291
        MIPS_SYS(sys_ni_syscall        , 0)        /* sys_get_mempolicy */
1292
        MIPS_SYS(sys_ni_syscall        , 0)        /* 4270 sys_set_mempolicy */
1293
        MIPS_SYS(sys_mq_open        , 4)
1294
        MIPS_SYS(sys_mq_unlink        , 1)
1295
        MIPS_SYS(sys_mq_timedsend, 5)
1296
        MIPS_SYS(sys_mq_timedreceive, 5)
1297
        MIPS_SYS(sys_mq_notify        , 2)        /* 4275 */
1298
        MIPS_SYS(sys_mq_getsetattr, 3)
1299
        MIPS_SYS(sys_ni_syscall        , 0)        /* sys_vserver */
1300
        MIPS_SYS(sys_waitid        , 4)
1301
        MIPS_SYS(sys_ni_syscall        , 0)        /* available, was setaltroot */
1302
        MIPS_SYS(sys_add_key        , 5)
1303
        MIPS_SYS(sys_request_key        , 4)
1304
        MIPS_SYS(sys_keyctl        , 5)
1305
        MIPS_SYS(sys_set_thread_area, 1)
1306
};
1307

    
1308
#undef MIPS_SYS
1309

    
1310
void cpu_loop(CPUMIPSState *env)
1311
{
1312
    target_siginfo_t info;
1313
    int trapnr, ret, nb_args;
1314
    unsigned int syscall_num;
1315
    target_ulong arg5, arg6, sp_reg;
1316

    
1317
    for(;;) {
1318
        trapnr = cpu_mips_exec(env);
1319
        switch(trapnr) {
1320
        case EXCP_SYSCALL:
1321
            {
1322
                syscall_num = env->gpr[2] - 4000;
1323
                env->PC += 4;
1324
                if (syscall_num >= sizeof(mips_syscall_args)) {
1325
                    ret = -ENOSYS;
1326
                } else {
1327
                    nb_args = mips_syscall_args[syscall_num];
1328
                    if (nb_args >= 5) {
1329
                        sp_reg = env->gpr[29];
1330
                        /* these arguments are taken from the stack */
1331
                        arg5 = tgetl(sp_reg + 16);
1332
                        if (nb_args >= 6) {
1333
                            arg6 = tgetl(sp_reg + 20);
1334
                        } else {
1335
                            arg6 = 0;
1336
                        }
1337
                    } else {
1338
                        arg5 = 0;
1339
                        arg6 = 0;
1340
                    }
1341
                    ret = do_syscall(env, 
1342
                                     env->gpr[2], 
1343
                                     env->gpr[4],
1344
                                     env->gpr[5],
1345
                                     env->gpr[6],
1346
                                     env->gpr[7],
1347
                                     arg5, 
1348
                                     arg6);
1349
                }
1350
                if ((unsigned int)ret >= (unsigned int)(-1133)) {
1351
                    env->gpr[7] = 1; /* error flag */
1352
                    ret = -ret;
1353
                    env->gpr[0] = ret;
1354
                    env->gpr[2] = ret;
1355
                } else {
1356
                    env->gpr[7] = 0; /* error flag */
1357
                    env->gpr[2] = ret;
1358
                }
1359
            }
1360
            break;
1361
        case EXCP_TLBL:
1362
        case EXCP_TLBS:
1363
        case EXCP_CpU:
1364
        case EXCP_RI:
1365
            info.si_signo = TARGET_SIGILL;
1366
            info.si_errno = 0;
1367
            info.si_code = 0;
1368
            queue_signal(info.si_signo, &info);
1369
            break;
1370
        case EXCP_INTERRUPT:
1371
            /* just indicate that signals should be handled asap */
1372
            break;
1373
        case EXCP_DEBUG:
1374
            {
1375
                int sig;
1376

    
1377
                sig = gdb_handlesig (env, TARGET_SIGTRAP);
1378
                if (sig)
1379
                  {
1380
                    info.si_signo = sig;
1381
                    info.si_errno = 0;
1382
                    info.si_code = TARGET_TRAP_BRKPT;
1383
                    queue_signal(info.si_signo, &info);
1384
                  }
1385
            }
1386
            break;
1387
        default:
1388
            //        error:
1389
            fprintf(stderr, "qemu: unhandled CPU exception 0x%x - aborting\n", 
1390
                    trapnr);
1391
            cpu_dump_state(env, stderr, fprintf, 0);
1392
            abort();
1393
        }
1394
        process_pending_signals(env);
1395
    }
1396
}
1397
#endif
1398

    
1399
#ifdef TARGET_SH4
1400
void cpu_loop (CPUState *env)
1401
{
1402
    int trapnr, ret;
1403
    target_siginfo_t info;
1404
    
1405
    while (1) {
1406
        trapnr = cpu_sh4_exec (env);
1407
        
1408
        switch (trapnr) {
1409
        case 0x160:
1410
            ret = do_syscall(env, 
1411
                             env->gregs[3], 
1412
                             env->gregs[4], 
1413
                             env->gregs[5], 
1414
                             env->gregs[6], 
1415
                             env->gregs[7], 
1416
                             env->gregs[0], 
1417
                             0);
1418
            env->gregs[0] = ret;
1419
            env->pc += 2;
1420
            break;
1421
        case EXCP_DEBUG:
1422
            {
1423
                int sig;
1424

    
1425
                sig = gdb_handlesig (env, TARGET_SIGTRAP);
1426
                if (sig)
1427
                  {
1428
                    info.si_signo = sig;
1429
                    info.si_errno = 0;
1430
                    info.si_code = TARGET_TRAP_BRKPT;
1431
                    queue_signal(info.si_signo, &info);
1432
                  }
1433
            }
1434
            break;
1435
        default:
1436
            printf ("Unhandled trap: 0x%x\n", trapnr);
1437
            cpu_dump_state(env, stderr, fprintf, 0);
1438
            exit (1);
1439
        }
1440
        process_pending_signals (env);
1441
    }
1442
}
1443
#endif
1444

    
1445
#ifdef TARGET_M68K
1446

    
1447
void cpu_loop(CPUM68KState *env)
1448
{
1449
    int trapnr;
1450
    unsigned int n;
1451
    target_siginfo_t info;
1452
    TaskState *ts = env->opaque;
1453
    
1454
    for(;;) {
1455
        trapnr = cpu_m68k_exec(env);
1456
        switch(trapnr) {
1457
        case EXCP_ILLEGAL:
1458
            {
1459
                if (ts->sim_syscalls) {
1460
                    uint16_t nr;
1461
                    nr = lduw(env->pc + 2);
1462
                    env->pc += 4;
1463
                    do_m68k_simcall(env, nr);
1464
                } else {
1465
                    goto do_sigill;
1466
                }
1467
            }
1468
            break;
1469
        case EXCP_HALTED:
1470
            /* Semihosing syscall.  */
1471
            env->pc += 2;
1472
            do_m68k_semihosting(env, env->dregs[0]);
1473
            break;
1474
        case EXCP_LINEA:
1475
        case EXCP_LINEF:
1476
        case EXCP_UNSUPPORTED:
1477
        do_sigill:
1478
            info.si_signo = SIGILL;
1479
            info.si_errno = 0;
1480
            info.si_code = TARGET_ILL_ILLOPN;
1481
            info._sifields._sigfault._addr = env->pc;
1482
            queue_signal(info.si_signo, &info);
1483
            break;
1484
        case EXCP_TRAP0:
1485
            {
1486
                ts->sim_syscalls = 0;
1487
                n = env->dregs[0];
1488
                env->pc += 2;
1489
                env->dregs[0] = do_syscall(env, 
1490
                                          n, 
1491
                                          env->dregs[1],
1492
                                          env->dregs[2],
1493
                                          env->dregs[3],
1494
                                          env->dregs[4],
1495
                                          env->dregs[5],
1496
                                          env->dregs[6]);
1497
            }
1498
            break;
1499
        case EXCP_INTERRUPT:
1500
            /* just indicate that signals should be handled asap */
1501
            break;
1502
        case EXCP_ACCESS:
1503
            {
1504
                info.si_signo = SIGSEGV;
1505
                info.si_errno = 0;
1506
                /* XXX: check env->error_code */
1507
                info.si_code = TARGET_SEGV_MAPERR;
1508
                info._sifields._sigfault._addr = env->mmu.ar;
1509
                queue_signal(info.si_signo, &info);
1510
            }
1511
            break;
1512
        case EXCP_DEBUG:
1513
            {
1514
                int sig;
1515

    
1516
                sig = gdb_handlesig (env, TARGET_SIGTRAP);
1517
                if (sig)
1518
                  {
1519
                    info.si_signo = sig;
1520
                    info.si_errno = 0;
1521
                    info.si_code = TARGET_TRAP_BRKPT;
1522
                    queue_signal(info.si_signo, &info);
1523
                  }
1524
            }
1525
            break;
1526
        default:
1527
            fprintf(stderr, "qemu: unhandled CPU exception 0x%x - aborting\n", 
1528
                    trapnr);
1529
            cpu_dump_state(env, stderr, fprintf, 0);
1530
            abort();
1531
        }
1532
        process_pending_signals(env);
1533
    }
1534
}
1535
#endif /* TARGET_M68K */
1536

    
1537
#ifdef TARGET_ALPHA
1538
void cpu_loop (CPUState *env)
1539
{
1540
    int trapnr, ret;
1541
    target_siginfo_t info;
1542
    
1543
    while (1) {
1544
        trapnr = cpu_alpha_exec (env);
1545
        
1546
        switch (trapnr) {
1547
        case EXCP_RESET:
1548
            fprintf(stderr, "Reset requested. Exit\n");
1549
            exit(1);
1550
            break;
1551
        case EXCP_MCHK:
1552
            fprintf(stderr, "Machine check exception. Exit\n");
1553
            exit(1);
1554
            break;
1555
        case EXCP_ARITH:
1556
            fprintf(stderr, "Arithmetic trap.\n");
1557
            exit(1);
1558
            break;
1559
        case EXCP_HW_INTERRUPT:
1560
            fprintf(stderr, "External interrupt. Exit\n"); 
1561
            exit(1);
1562
            break;
1563
        case EXCP_DFAULT:
1564
            fprintf(stderr, "MMU data fault\n");
1565
            exit(1);
1566
            break;
1567
        case EXCP_DTB_MISS_PAL:
1568
            fprintf(stderr, "MMU data TLB miss in PALcode\n");
1569
            exit(1);
1570
            break;
1571
        case EXCP_ITB_MISS:
1572
            fprintf(stderr, "MMU instruction TLB miss\n");
1573
            exit(1);
1574
            break;
1575
        case EXCP_ITB_ACV:
1576
            fprintf(stderr, "MMU instruction access violation\n");
1577
            exit(1);
1578
            break;
1579
        case EXCP_DTB_MISS_NATIVE:
1580
            fprintf(stderr, "MMU data TLB miss\n");
1581
            exit(1);
1582
            break;
1583
        case EXCP_UNALIGN:
1584
            fprintf(stderr, "Unaligned access\n");
1585
            exit(1);
1586
            break;
1587
        case EXCP_OPCDEC:
1588
            fprintf(stderr, "Invalid instruction\n");
1589
            exit(1);
1590
            break;
1591
        case EXCP_FEN:
1592
            fprintf(stderr, "Floating-point not allowed\n");
1593
            exit(1);
1594
            break;
1595
        case EXCP_CALL_PAL ... (EXCP_CALL_PALP - 1):
1596
            fprintf(stderr, "Call to PALcode\n");
1597
            call_pal(env, (trapnr >> 6) | 0x80);
1598
            break;
1599
        case EXCP_CALL_PALP ... (EXCP_CALL_PALE - 1):
1600
            fprintf(stderr, "Priviledged call to PALcode\n");
1601
            exit(1);
1602
            break;
1603
        case EXCP_DEBUG:
1604
            {
1605
                int sig;
1606

    
1607
                sig = gdb_handlesig (env, TARGET_SIGTRAP);
1608
                if (sig)
1609
                  {
1610
                    info.si_signo = sig;
1611
                    info.si_errno = 0;
1612
                    info.si_code = TARGET_TRAP_BRKPT;
1613
                    queue_signal(info.si_signo, &info);
1614
                  }
1615
            }
1616
            break;
1617
        default:
1618
            printf ("Unhandled trap: 0x%x\n", trapnr);
1619
            cpu_dump_state(env, stderr, fprintf, 0);
1620
            exit (1);
1621
        }
1622
        process_pending_signals (env);
1623
    }
1624
}
1625
#endif /* TARGET_ALPHA */
1626

    
1627
void usage(void)
1628
{
1629
    printf("qemu-" TARGET_ARCH " version " QEMU_VERSION ", Copyright (c) 2003-2007 Fabrice Bellard\n"
1630
           "usage: qemu-" TARGET_ARCH " [-h] [-g] [-d opts] [-L path] [-s size] [-cpu model] program [arguments...]\n"
1631
           "Linux CPU emulator (compiled for %s emulation)\n"
1632
           "\n"
1633
           "-h           print this help\n"
1634
           "-g port      wait gdb connection to port\n"
1635
           "-L path      set the elf interpreter prefix (default=%s)\n"
1636
           "-s size      set the stack size in bytes (default=%ld)\n"
1637
           "-cpu model   select CPU (-cpu ? for list)\n"
1638
           "\n"
1639
           "debug options:\n"
1640
#ifdef USE_CODE_COPY
1641
           "-no-code-copy   disable code copy acceleration\n"
1642
#endif
1643
           "-d options   activate log (logfile=%s)\n"
1644
           "-p pagesize  set the host page size to 'pagesize'\n",
1645
           TARGET_ARCH,
1646
           interp_prefix, 
1647
           x86_stack_size,
1648
           DEBUG_LOGFILE);
1649
    _exit(1);
1650
}
1651

    
1652
/* XXX: currently only used for async signals (see signal.c) */
1653
CPUState *global_env;
1654

    
1655
/* used to free thread contexts */
1656
TaskState *first_task_state;
1657

    
1658
int main(int argc, char **argv)
1659
{
1660
    const char *filename;
1661
    const char *cpu_model;
1662
    struct target_pt_regs regs1, *regs = &regs1;
1663
    struct image_info info1, *info = &info1;
1664
    TaskState ts1, *ts = &ts1;
1665
    CPUState *env;
1666
    int optind;
1667
    const char *r;
1668
    int gdbstub_port = 0;
1669
    
1670
    if (argc <= 1)
1671
        usage();
1672

    
1673
    /* init debug */
1674
    cpu_set_log_filename(DEBUG_LOGFILE);
1675

    
1676
    cpu_model = NULL;
1677
    optind = 1;
1678
    for(;;) {
1679
        if (optind >= argc)
1680
            break;
1681
        r = argv[optind];
1682
        if (r[0] != '-')
1683
            break;
1684
        optind++;
1685
        r++;
1686
        if (!strcmp(r, "-")) {
1687
            break;
1688
        } else if (!strcmp(r, "d")) {
1689
            int mask;
1690
            CPULogItem *item;
1691

    
1692
            if (optind >= argc)
1693
                break;
1694
            
1695
            r = argv[optind++];
1696
            mask = cpu_str_to_log_mask(r);
1697
            if (!mask) {
1698
                printf("Log items (comma separated):\n");
1699
                for(item = cpu_log_items; item->mask != 0; item++) {
1700
                    printf("%-10s %s\n", item->name, item->help);
1701
                }
1702
                exit(1);
1703
            }
1704
            cpu_set_log(mask);
1705
        } else if (!strcmp(r, "s")) {
1706
            r = argv[optind++];
1707
            x86_stack_size = strtol(r, (char **)&r, 0);
1708
            if (x86_stack_size <= 0)
1709
                usage();
1710
            if (*r == 'M')
1711
                x86_stack_size *= 1024 * 1024;
1712
            else if (*r == 'k' || *r == 'K')
1713
                x86_stack_size *= 1024;
1714
        } else if (!strcmp(r, "L")) {
1715
            interp_prefix = argv[optind++];
1716
        } else if (!strcmp(r, "p")) {
1717
            qemu_host_page_size = atoi(argv[optind++]);
1718
            if (qemu_host_page_size == 0 ||
1719
                (qemu_host_page_size & (qemu_host_page_size - 1)) != 0) {
1720
                fprintf(stderr, "page size must be a power of two\n");
1721
                exit(1);
1722
            }
1723
        } else if (!strcmp(r, "g")) {
1724
            gdbstub_port = atoi(argv[optind++]);
1725
        } else if (!strcmp(r, "r")) {
1726
            qemu_uname_release = argv[optind++];
1727
        } else if (!strcmp(r, "cpu")) {
1728
            cpu_model = argv[optind++];
1729
            if (strcmp(cpu_model, "?") == 0) {
1730
#if defined(TARGET_PPC)
1731
                ppc_cpu_list(stdout, &fprintf);
1732
#elif defined(TARGET_ARM)
1733
                arm_cpu_list();
1734
#elif defined(TARGET_MIPS)
1735
                mips_cpu_list(stdout, &fprintf);
1736
#endif
1737
                _exit(1);
1738
            }
1739
        } else 
1740
#ifdef USE_CODE_COPY
1741
        if (!strcmp(r, "no-code-copy")) {
1742
            code_copy_enabled = 0;
1743
        } else 
1744
#endif
1745
        {
1746
            usage();
1747
        }
1748
    }
1749
    if (optind >= argc)
1750
        usage();
1751
    filename = argv[optind];
1752

    
1753
    /* Zero out regs */
1754
    memset(regs, 0, sizeof(struct target_pt_regs));
1755

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

    
1759
    /* Scan interp_prefix dir for replacement files. */
1760
    init_paths(interp_prefix);
1761

    
1762
    /* NOTE: we need to init the CPU at this stage to get
1763
       qemu_host_page_size */
1764
    env = cpu_init();
1765
    global_env = env;
1766
    
1767
    if (loader_exec(filename, argv+optind, environ, regs, info) != 0) {
1768
        printf("Error loading %s\n", filename);
1769
        _exit(1);
1770
    }
1771
    
1772
    if (loglevel) {
1773
        page_dump(logfile);
1774
    
1775
        fprintf(logfile, "start_brk   0x%08lx\n" , info->start_brk);
1776
        fprintf(logfile, "end_code    0x%08lx\n" , info->end_code);
1777
        fprintf(logfile, "start_code  0x%08lx\n" , info->start_code);
1778
        fprintf(logfile, "start_data  0x%08lx\n" , info->start_data);
1779
        fprintf(logfile, "end_data    0x%08lx\n" , info->end_data);
1780
        fprintf(logfile, "start_stack 0x%08lx\n" , info->start_stack);
1781
        fprintf(logfile, "brk         0x%08lx\n" , info->brk);
1782
        fprintf(logfile, "entry       0x%08lx\n" , info->entry);
1783
    }
1784

    
1785
    target_set_brk(info->brk);
1786
    syscall_init();
1787
    signal_init();
1788

    
1789
    /* build Task State */
1790
    memset(ts, 0, sizeof(TaskState));
1791
    env->opaque = ts;
1792
    ts->used = 1;
1793
    ts->info = info;
1794
    env->user_mode_only = 1;
1795
    
1796
#if defined(TARGET_I386)
1797
    cpu_x86_set_cpl(env, 3);
1798

    
1799
    env->cr[0] = CR0_PG_MASK | CR0_WP_MASK | CR0_PE_MASK;
1800
    env->hflags |= HF_PE_MASK;
1801
    if (env->cpuid_features & CPUID_SSE) {
1802
        env->cr[4] |= CR4_OSFXSR_MASK;
1803
        env->hflags |= HF_OSFXSR_MASK;
1804
    }
1805

    
1806
    /* flags setup : we activate the IRQs by default as in user mode */
1807
    env->eflags |= IF_MASK;
1808
    
1809
    /* linux register setup */
1810
    env->regs[R_EAX] = regs->eax;
1811
    env->regs[R_EBX] = regs->ebx;
1812
    env->regs[R_ECX] = regs->ecx;
1813
    env->regs[R_EDX] = regs->edx;
1814
    env->regs[R_ESI] = regs->esi;
1815
    env->regs[R_EDI] = regs->edi;
1816
    env->regs[R_EBP] = regs->ebp;
1817
    env->regs[R_ESP] = regs->esp;
1818
    env->eip = regs->eip;
1819

    
1820
    /* linux interrupt setup */
1821
    env->idt.base = h2g(idt_table);
1822
    env->idt.limit = sizeof(idt_table) - 1;
1823
    set_idt(0, 0);
1824
    set_idt(1, 0);
1825
    set_idt(2, 0);
1826
    set_idt(3, 3);
1827
    set_idt(4, 3);
1828
    set_idt(5, 3);
1829
    set_idt(6, 0);
1830
    set_idt(7, 0);
1831
    set_idt(8, 0);
1832
    set_idt(9, 0);
1833
    set_idt(10, 0);
1834
    set_idt(11, 0);
1835
    set_idt(12, 0);
1836
    set_idt(13, 0);
1837
    set_idt(14, 0);
1838
    set_idt(15, 0);
1839
    set_idt(16, 0);
1840
    set_idt(17, 0);
1841
    set_idt(18, 0);
1842
    set_idt(19, 0);
1843
    set_idt(0x80, 3);
1844

    
1845
    /* linux segment setup */
1846
    env->gdt.base = h2g(gdt_table);
1847
    env->gdt.limit = sizeof(gdt_table) - 1;
1848
    write_dt(&gdt_table[__USER_CS >> 3], 0, 0xfffff,
1849
             DESC_G_MASK | DESC_B_MASK | DESC_P_MASK | DESC_S_MASK | 
1850
             (3 << DESC_DPL_SHIFT) | (0xa << DESC_TYPE_SHIFT));
1851
    write_dt(&gdt_table[__USER_DS >> 3], 0, 0xfffff,
1852
             DESC_G_MASK | DESC_B_MASK | DESC_P_MASK | DESC_S_MASK | 
1853
             (3 << DESC_DPL_SHIFT) | (0x2 << DESC_TYPE_SHIFT));
1854
    cpu_x86_load_seg(env, R_CS, __USER_CS);
1855
    cpu_x86_load_seg(env, R_DS, __USER_DS);
1856
    cpu_x86_load_seg(env, R_ES, __USER_DS);
1857
    cpu_x86_load_seg(env, R_SS, __USER_DS);
1858
    cpu_x86_load_seg(env, R_FS, __USER_DS);
1859
    cpu_x86_load_seg(env, R_GS, __USER_DS);
1860

    
1861
#elif defined(TARGET_ARM)
1862
    {
1863
        int i;
1864
        if (cpu_model == NULL)
1865
            cpu_model = "arm926";
1866
        cpu_arm_set_model(env, cpu_model);
1867
        cpsr_write(env, regs->uregs[16], 0xffffffff);
1868
        for(i = 0; i < 16; i++) {
1869
            env->regs[i] = regs->uregs[i];
1870
        }
1871
        ts->stack_base = info->start_stack;
1872
        ts->heap_base = info->brk;
1873
        /* This will be filled in on the first SYS_HEAPINFO call.  */
1874
        ts->heap_limit = 0;
1875
    }
1876
#elif defined(TARGET_SPARC)
1877
    {
1878
        int i;
1879
        env->pc = regs->pc;
1880
        env->npc = regs->npc;
1881
        env->y = regs->y;
1882
        for(i = 0; i < 8; i++)
1883
            env->gregs[i] = regs->u_regs[i];
1884
        for(i = 0; i < 8; i++)
1885
            env->regwptr[i] = regs->u_regs[i + 8];
1886
    }
1887
#elif defined(TARGET_PPC)
1888
    {
1889
        ppc_def_t *def;
1890
        int i;
1891

    
1892
        /* Choose and initialise CPU */
1893
        if (cpu_model == NULL)
1894
            cpu_model = "750";
1895
        ppc_find_by_name(cpu_model, &def);
1896
        if (def == NULL) {
1897
            cpu_abort(env,
1898
                      "Unable to find PowerPC CPU definition\n");
1899
        }
1900
        cpu_ppc_register(env, def);
1901

    
1902
        for (i = 0; i < 32; i++) {
1903
            if (i != 12 && i != 6 && i != 13)
1904
                env->msr[i] = (regs->msr >> i) & 1;
1905
        }
1906
        env->nip = regs->nip;
1907
        for(i = 0; i < 32; i++) {
1908
            env->gpr[i] = regs->gpr[i];
1909
        }
1910
    }
1911
#elif defined(TARGET_M68K)
1912
    {
1913
        m68k_def_t *def;
1914
        def = m68k_find_by_name("cfv4e");
1915
        if (def == NULL) {
1916
            cpu_abort(cpu_single_env,
1917
                      "Unable to find m68k CPU definition\n");
1918
        }
1919
        cpu_m68k_register(cpu_single_env, def);
1920
        env->pc = regs->pc;
1921
        env->dregs[0] = regs->d0;
1922
        env->dregs[1] = regs->d1;
1923
        env->dregs[2] = regs->d2;
1924
        env->dregs[3] = regs->d3;
1925
        env->dregs[4] = regs->d4;
1926
        env->dregs[5] = regs->d5;
1927
        env->dregs[6] = regs->d6;
1928
        env->dregs[7] = regs->d7;
1929
        env->aregs[0] = regs->a0;
1930
        env->aregs[1] = regs->a1;
1931
        env->aregs[2] = regs->a2;
1932
        env->aregs[3] = regs->a3;
1933
        env->aregs[4] = regs->a4;
1934
        env->aregs[5] = regs->a5;
1935
        env->aregs[6] = regs->a6;
1936
        env->aregs[7] = regs->usp;
1937
        env->sr = regs->sr;
1938
        ts->sim_syscalls = 1;
1939
    }
1940
#elif defined(TARGET_MIPS)
1941
    {
1942
        mips_def_t *def;
1943
        int i;
1944

    
1945
        /* Choose and initialise CPU */
1946
        if (cpu_model == NULL)
1947
            cpu_model = "24Kf";
1948
        mips_find_by_name(cpu_model, &def);
1949
        if (def == NULL)
1950
            cpu_abort(env, "Unable to find MIPS CPU definition\n");
1951
        cpu_mips_register(env, def);
1952

    
1953
        for(i = 0; i < 32; i++) {
1954
            env->gpr[i] = regs->regs[i];
1955
        }
1956
        env->PC = regs->cp0_epc;
1957
        if (env->CP0_Config1 & (1 << CP0C1_FP)) {
1958
            env->CP0_Status |= (1 << CP0St_CU1);
1959
        }
1960
    }
1961
#elif defined(TARGET_SH4)
1962
    {
1963
        int i;
1964

    
1965
        for(i = 0; i < 16; i++) {
1966
            env->gregs[i] = regs->regs[i];
1967
        }
1968
        env->pc = regs->pc;
1969
    }
1970
#elif defined(TARGET_ALPHA)
1971
    {
1972
        int i;
1973

    
1974
        for(i = 0; i < 28; i++) {
1975
            env->ir[i] = ((target_ulong *)regs)[i];
1976
        }
1977
        env->ipr[IPR_USP] = regs->usp;
1978
        env->ir[30] = regs->usp;
1979
        env->pc = regs->pc;
1980
        env->unique = regs->unique;
1981
    }
1982
#else
1983
#error unsupported target CPU
1984
#endif
1985

    
1986
    if (gdbstub_port) {
1987
        gdbserver_start (gdbstub_port);
1988
        gdb_handlesig(env, 0);
1989
    }
1990
    cpu_loop(env);
1991
    /* never exits */
1992
    return 0;
1993
}