Statistics
| Branch: | Revision:

root / vl.c @ 80cabfad

History | View | Annotate | Download (33.1 kB)

1 0824d6fc bellard
/*
2 80cabfad bellard
 * QEMU System Emulator
3 0824d6fc bellard
 * 
4 80cabfad bellard
 * Copyright (c) 2003-2004 Fabrice Bellard
5 0824d6fc bellard
 * 
6 1df912cf bellard
 * Permission is hereby granted, free of charge, to any person obtaining a copy
7 1df912cf bellard
 * of this software and associated documentation files (the "Software"), to deal
8 1df912cf bellard
 * in the Software without restriction, including without limitation the rights
9 1df912cf bellard
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
10 1df912cf bellard
 * copies of the Software, and to permit persons to whom the Software is
11 1df912cf bellard
 * furnished to do so, subject to the following conditions:
12 1df912cf bellard
 *
13 1df912cf bellard
 * The above copyright notice and this permission notice shall be included in
14 1df912cf bellard
 * all copies or substantial portions of the Software.
15 1df912cf bellard
 *
16 1df912cf bellard
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
17 1df912cf bellard
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
18 1df912cf bellard
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
19 1df912cf bellard
 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
20 1df912cf bellard
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
21 1df912cf bellard
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
22 1df912cf bellard
 * THE SOFTWARE.
23 0824d6fc bellard
 */
24 0824d6fc bellard
#include <stdlib.h>
25 0824d6fc bellard
#include <stdio.h>
26 1df912cf bellard
#include <stdarg.h>
27 0824d6fc bellard
#include <string.h>
28 c45886db bellard
#include <ctype.h>
29 0824d6fc bellard
#include <getopt.h>
30 0824d6fc bellard
#include <inttypes.h>
31 0824d6fc bellard
#include <unistd.h>
32 0824d6fc bellard
#include <sys/mman.h>
33 0824d6fc bellard
#include <fcntl.h>
34 0824d6fc bellard
#include <signal.h>
35 0824d6fc bellard
#include <time.h>
36 0824d6fc bellard
#include <sys/time.h>
37 0824d6fc bellard
#include <malloc.h>
38 0824d6fc bellard
#include <termios.h>
39 0824d6fc bellard
#include <sys/poll.h>
40 0824d6fc bellard
#include <errno.h>
41 f1510b2c bellard
#include <sys/wait.h>
42 f1510b2c bellard
43 f1510b2c bellard
#include <sys/ioctl.h>
44 f1510b2c bellard
#include <sys/socket.h>
45 f1510b2c bellard
#include <linux/if.h>
46 f1510b2c bellard
#include <linux/if_tun.h>
47 0824d6fc bellard
48 0824d6fc bellard
#include "disas.h"
49 fc01f7e7 bellard
#include "thunk.h"
50 fc01f7e7 bellard
51 fc01f7e7 bellard
#include "vl.h"
52 0824d6fc bellard
53 5a67135a bellard
#define DEFAULT_NETWORK_SCRIPT "/etc/qemu-ifup"
54 f1510b2c bellard
55 0824d6fc bellard
//#define DEBUG_UNUSED_IOPORT
56 330d0414 bellard
57 bb551faa bellard
#if !defined(CONFIG_SOFTMMU)
58 7916e224 bellard
#define PHYS_RAM_MAX_SIZE (256 * 1024 * 1024)
59 bb551faa bellard
#else
60 bb551faa bellard
#define PHYS_RAM_MAX_SIZE (2047 * 1024 * 1024)
61 bb551faa bellard
#endif
62 7916e224 bellard
63 c45886db bellard
#if defined (TARGET_I386)
64 c45886db bellard
#elif defined (TARGET_PPC)
65 c45886db bellard
//#define USE_OPEN_FIRMWARE
66 3f5dcc34 bellard
#if !defined (USE_OPEN_FIRMWARE)
67 c45886db bellard
#define KERNEL_LOAD_ADDR    0x01000000
68 c45886db bellard
#define KERNEL_STACK_ADDR   0x01200000
69 c45886db bellard
#else
70 c45886db bellard
#define KERNEL_LOAD_ADDR    0x00000000
71 c45886db bellard
#define KERNEL_STACK_ADDR   0x00400000
72 c45886db bellard
#endif
73 c45886db bellard
#endif
74 0824d6fc bellard
75 313aa567 bellard
#define GUI_REFRESH_INTERVAL 30 
76 313aa567 bellard
77 7dea1da4 bellard
/* XXX: use a two level table to limit memory usage */
78 7dea1da4 bellard
#define MAX_IOPORTS 65536
79 0824d6fc bellard
80 80cabfad bellard
const char *bios_dir = CONFIG_QEMU_SHAREDIR;
81 0824d6fc bellard
char phys_ram_file[1024];
82 c45886db bellard
CPUState *global_env;
83 c45886db bellard
CPUState *cpu_single_env;
84 fc01f7e7 bellard
IOPortReadFunc *ioport_read_table[3][MAX_IOPORTS];
85 fc01f7e7 bellard
IOPortWriteFunc *ioport_write_table[3][MAX_IOPORTS];
86 c45886db bellard
BlockDriverState *bs_table[MAX_DISKS], *fd_table[MAX_FD];
87 313aa567 bellard
int vga_ram_size;
88 313aa567 bellard
static DisplayState display_state;
89 a20dd508 bellard
int nographic;
90 313aa567 bellard
int term_inited;
91 313aa567 bellard
int64_t ticks_per_sec;
92 36b486bb bellard
int boot_device = 'c';
93 1ccde1cb bellard
static int ram_size;
94 80cabfad bellard
static char network_script[1024];
95 80cabfad bellard
int pit_min_timer_count = 0;
96 0824d6fc bellard
97 0824d6fc bellard
/***********************************************************/
98 0824d6fc bellard
/* x86 io ports */
99 0824d6fc bellard
100 c45886db bellard
uint32_t default_ioport_readb(CPUState *env, uint32_t address)
101 0824d6fc bellard
{
102 0824d6fc bellard
#ifdef DEBUG_UNUSED_IOPORT
103 0824d6fc bellard
    fprintf(stderr, "inb: port=0x%04x\n", address);
104 0824d6fc bellard
#endif
105 fc01f7e7 bellard
    return 0xff;
106 0824d6fc bellard
}
107 0824d6fc bellard
108 c45886db bellard
void default_ioport_writeb(CPUState *env, uint32_t address, uint32_t data)
109 0824d6fc bellard
{
110 0824d6fc bellard
#ifdef DEBUG_UNUSED_IOPORT
111 0824d6fc bellard
    fprintf(stderr, "outb: port=0x%04x data=0x%02x\n", address, data);
112 0824d6fc bellard
#endif
113 0824d6fc bellard
}
114 0824d6fc bellard
115 0824d6fc bellard
/* default is to make two byte accesses */
116 c45886db bellard
uint32_t default_ioport_readw(CPUState *env, uint32_t address)
117 0824d6fc bellard
{
118 0824d6fc bellard
    uint32_t data;
119 330d0414 bellard
    data = ioport_read_table[0][address & (MAX_IOPORTS - 1)](env, address);
120 330d0414 bellard
    data |= ioport_read_table[0][(address + 1) & (MAX_IOPORTS - 1)](env, address + 1) << 8;
121 0824d6fc bellard
    return data;
122 0824d6fc bellard
}
123 0824d6fc bellard
124 c45886db bellard
void default_ioport_writew(CPUState *env, uint32_t address, uint32_t data)
125 0824d6fc bellard
{
126 330d0414 bellard
    ioport_write_table[0][address & (MAX_IOPORTS - 1)](env, address, data & 0xff);
127 330d0414 bellard
    ioport_write_table[0][(address + 1) & (MAX_IOPORTS - 1)](env, address + 1, (data >> 8) & 0xff);
128 0824d6fc bellard
}
129 0824d6fc bellard
130 c45886db bellard
uint32_t default_ioport_readl(CPUState *env, uint32_t address)
131 0824d6fc bellard
{
132 fc01f7e7 bellard
#ifdef DEBUG_UNUSED_IOPORT
133 fc01f7e7 bellard
    fprintf(stderr, "inl: port=0x%04x\n", address);
134 fc01f7e7 bellard
#endif
135 fc01f7e7 bellard
    return 0xffffffff;
136 0824d6fc bellard
}
137 0824d6fc bellard
138 c45886db bellard
void default_ioport_writel(CPUState *env, uint32_t address, uint32_t data)
139 0824d6fc bellard
{
140 fc01f7e7 bellard
#ifdef DEBUG_UNUSED_IOPORT
141 fc01f7e7 bellard
    fprintf(stderr, "outl: port=0x%04x data=0x%02x\n", address, data);
142 fc01f7e7 bellard
#endif
143 0824d6fc bellard
}
144 0824d6fc bellard
145 fc01f7e7 bellard
void init_ioports(void)
146 0824d6fc bellard
{
147 0824d6fc bellard
    int i;
148 0824d6fc bellard
149 fc01f7e7 bellard
    for(i = 0; i < MAX_IOPORTS; i++) {
150 fc01f7e7 bellard
        ioport_read_table[0][i] = default_ioport_readb;
151 fc01f7e7 bellard
        ioport_write_table[0][i] = default_ioport_writeb;
152 fc01f7e7 bellard
        ioport_read_table[1][i] = default_ioport_readw;
153 fc01f7e7 bellard
        ioport_write_table[1][i] = default_ioport_writew;
154 fc01f7e7 bellard
        ioport_read_table[2][i] = default_ioport_readl;
155 fc01f7e7 bellard
        ioport_write_table[2][i] = default_ioport_writel;
156 fc01f7e7 bellard
    }
157 0824d6fc bellard
}
158 0824d6fc bellard
159 fc01f7e7 bellard
/* size is the word size in byte */
160 fc01f7e7 bellard
int register_ioport_read(int start, int length, IOPortReadFunc *func, int size)
161 f1510b2c bellard
{
162 fc01f7e7 bellard
    int i, bsize;
163 f1510b2c bellard
164 fc01f7e7 bellard
    if (size == 1)
165 fc01f7e7 bellard
        bsize = 0;
166 fc01f7e7 bellard
    else if (size == 2)
167 fc01f7e7 bellard
        bsize = 1;
168 fc01f7e7 bellard
    else if (size == 4)
169 fc01f7e7 bellard
        bsize = 2;
170 fc01f7e7 bellard
    else
171 fc01f7e7 bellard
        return -1;
172 fc01f7e7 bellard
    for(i = start; i < start + length; i += size)
173 fc01f7e7 bellard
        ioport_read_table[bsize][i] = func;
174 f1510b2c bellard
    return 0;
175 f1510b2c bellard
}
176 f1510b2c bellard
177 fc01f7e7 bellard
/* size is the word size in byte */
178 fc01f7e7 bellard
int register_ioport_write(int start, int length, IOPortWriteFunc *func, int size)
179 f1510b2c bellard
{
180 fc01f7e7 bellard
    int i, bsize;
181 f1510b2c bellard
182 fc01f7e7 bellard
    if (size == 1)
183 fc01f7e7 bellard
        bsize = 0;
184 fc01f7e7 bellard
    else if (size == 2)
185 fc01f7e7 bellard
        bsize = 1;
186 fc01f7e7 bellard
    else if (size == 4)
187 fc01f7e7 bellard
        bsize = 2;
188 fc01f7e7 bellard
    else
189 fc01f7e7 bellard
        return -1;
190 fc01f7e7 bellard
    for(i = start; i < start + length; i += size)
191 fc01f7e7 bellard
        ioport_write_table[bsize][i] = func;
192 f1510b2c bellard
    return 0;
193 f1510b2c bellard
}
194 f1510b2c bellard
195 0824d6fc bellard
void pstrcpy(char *buf, int buf_size, const char *str)
196 0824d6fc bellard
{
197 0824d6fc bellard
    int c;
198 0824d6fc bellard
    char *q = buf;
199 0824d6fc bellard
200 0824d6fc bellard
    if (buf_size <= 0)
201 0824d6fc bellard
        return;
202 0824d6fc bellard
203 0824d6fc bellard
    for(;;) {
204 0824d6fc bellard
        c = *str++;
205 0824d6fc bellard
        if (c == 0 || q >= buf + buf_size - 1)
206 0824d6fc bellard
            break;
207 0824d6fc bellard
        *q++ = c;
208 0824d6fc bellard
    }
209 0824d6fc bellard
    *q = '\0';
210 0824d6fc bellard
}
211 0824d6fc bellard
212 0824d6fc bellard
/* strcat and truncate. */
213 0824d6fc bellard
char *pstrcat(char *buf, int buf_size, const char *s)
214 0824d6fc bellard
{
215 0824d6fc bellard
    int len;
216 0824d6fc bellard
    len = strlen(buf);
217 0824d6fc bellard
    if (len < buf_size) 
218 0824d6fc bellard
        pstrcpy(buf + len, buf_size - len, s);
219 0824d6fc bellard
    return buf;
220 0824d6fc bellard
}
221 0824d6fc bellard
222 0824d6fc bellard
/* return the size or -1 if error */
223 0824d6fc bellard
int load_image(const char *filename, uint8_t *addr)
224 0824d6fc bellard
{
225 0824d6fc bellard
    int fd, size;
226 0824d6fc bellard
    fd = open(filename, O_RDONLY);
227 0824d6fc bellard
    if (fd < 0)
228 0824d6fc bellard
        return -1;
229 0824d6fc bellard
    size = lseek(fd, 0, SEEK_END);
230 0824d6fc bellard
    lseek(fd, 0, SEEK_SET);
231 0824d6fc bellard
    if (read(fd, addr, size) != size) {
232 0824d6fc bellard
        close(fd);
233 0824d6fc bellard
        return -1;
234 0824d6fc bellard
    }
235 0824d6fc bellard
    close(fd);
236 0824d6fc bellard
    return size;
237 0824d6fc bellard
}
238 0824d6fc bellard
239 c45886db bellard
void cpu_outb(CPUState *env, int addr, int val)
240 0824d6fc bellard
{
241 fc01f7e7 bellard
    ioport_write_table[0][addr & (MAX_IOPORTS - 1)](env, addr, val);
242 0824d6fc bellard
}
243 0824d6fc bellard
244 c45886db bellard
void cpu_outw(CPUState *env, int addr, int val)
245 0824d6fc bellard
{
246 fc01f7e7 bellard
    ioport_write_table[1][addr & (MAX_IOPORTS - 1)](env, addr, val);
247 0824d6fc bellard
}
248 0824d6fc bellard
249 c45886db bellard
void cpu_outl(CPUState *env, int addr, int val)
250 0824d6fc bellard
{
251 fc01f7e7 bellard
    ioport_write_table[2][addr & (MAX_IOPORTS - 1)](env, addr, val);
252 0824d6fc bellard
}
253 0824d6fc bellard
254 c45886db bellard
int cpu_inb(CPUState *env, int addr)
255 0824d6fc bellard
{
256 fc01f7e7 bellard
    return ioport_read_table[0][addr & (MAX_IOPORTS - 1)](env, addr);
257 0824d6fc bellard
}
258 0824d6fc bellard
259 c45886db bellard
int cpu_inw(CPUState *env, int addr)
260 0824d6fc bellard
{
261 fc01f7e7 bellard
    return ioport_read_table[1][addr & (MAX_IOPORTS - 1)](env, addr);
262 0824d6fc bellard
}
263 0824d6fc bellard
264 c45886db bellard
int cpu_inl(CPUState *env, int addr)
265 0824d6fc bellard
{
266 fc01f7e7 bellard
    return ioport_read_table[2][addr & (MAX_IOPORTS - 1)](env, addr);
267 0824d6fc bellard
}
268 0824d6fc bellard
269 0824d6fc bellard
/***********************************************************/
270 0824d6fc bellard
void hw_error(const char *fmt, ...)
271 0824d6fc bellard
{
272 0824d6fc bellard
    va_list ap;
273 0824d6fc bellard
274 0824d6fc bellard
    va_start(ap, fmt);
275 0824d6fc bellard
    fprintf(stderr, "qemu: hardware error: ");
276 0824d6fc bellard
    vfprintf(stderr, fmt, ap);
277 0824d6fc bellard
    fprintf(stderr, "\n");
278 0824d6fc bellard
#ifdef TARGET_I386
279 0824d6fc bellard
    cpu_x86_dump_state(global_env, stderr, X86_DUMP_FPU | X86_DUMP_CCOP);
280 c45886db bellard
#else
281 c45886db bellard
    cpu_dump_state(global_env, stderr, 0);
282 0824d6fc bellard
#endif
283 0824d6fc bellard
    va_end(ap);
284 0824d6fc bellard
    abort();
285 0824d6fc bellard
}
286 0824d6fc bellard
287 34865134 bellard
#if defined(__powerpc__)
288 34865134 bellard
289 34865134 bellard
static inline uint32_t get_tbl(void) 
290 0824d6fc bellard
{
291 34865134 bellard
    uint32_t tbl;
292 34865134 bellard
    asm volatile("mftb %0" : "=r" (tbl));
293 34865134 bellard
    return tbl;
294 0824d6fc bellard
}
295 0824d6fc bellard
296 34865134 bellard
static inline uint32_t get_tbu(void) 
297 34865134 bellard
{
298 34865134 bellard
        uint32_t tbl;
299 34865134 bellard
        asm volatile("mftbu %0" : "=r" (tbl));
300 34865134 bellard
        return tbl;
301 34865134 bellard
}
302 34865134 bellard
303 34865134 bellard
int64_t cpu_get_real_ticks(void)
304 34865134 bellard
{
305 34865134 bellard
    uint32_t l, h, h1;
306 34865134 bellard
    /* NOTE: we test if wrapping has occurred */
307 34865134 bellard
    do {
308 34865134 bellard
        h = get_tbu();
309 34865134 bellard
        l = get_tbl();
310 34865134 bellard
        h1 = get_tbu();
311 34865134 bellard
    } while (h != h1);
312 34865134 bellard
    return ((int64_t)h << 32) | l;
313 34865134 bellard
}
314 34865134 bellard
315 34865134 bellard
#elif defined(__i386__)
316 34865134 bellard
317 34865134 bellard
int64_t cpu_get_real_ticks(void)
318 0824d6fc bellard
{
319 0824d6fc bellard
    int64_t val;
320 0824d6fc bellard
    asm("rdtsc" : "=A" (val));
321 0824d6fc bellard
    return val;
322 0824d6fc bellard
}
323 0824d6fc bellard
324 34865134 bellard
#else
325 34865134 bellard
#error unsupported CPU
326 34865134 bellard
#endif
327 34865134 bellard
328 34865134 bellard
static int64_t cpu_ticks_offset;
329 34865134 bellard
static int64_t cpu_ticks_last;
330 34865134 bellard
331 34865134 bellard
int64_t cpu_get_ticks(void)
332 34865134 bellard
{
333 34865134 bellard
    return cpu_get_real_ticks() + cpu_ticks_offset;
334 34865134 bellard
}
335 34865134 bellard
336 34865134 bellard
/* enable cpu_get_ticks() */
337 34865134 bellard
void cpu_enable_ticks(void)
338 34865134 bellard
{
339 34865134 bellard
    cpu_ticks_offset = cpu_ticks_last - cpu_get_real_ticks();
340 34865134 bellard
}
341 34865134 bellard
342 34865134 bellard
/* disable cpu_get_ticks() : the clock is stopped. You must not call
343 34865134 bellard
   cpu_get_ticks() after that.  */
344 34865134 bellard
void cpu_disable_ticks(void)
345 34865134 bellard
{
346 34865134 bellard
    cpu_ticks_last = cpu_get_ticks();
347 34865134 bellard
}
348 34865134 bellard
349 34865134 bellard
int64_t get_clock(void)
350 34865134 bellard
{
351 34865134 bellard
    struct timeval tv;
352 34865134 bellard
    gettimeofday(&tv, NULL);
353 34865134 bellard
    return tv.tv_sec * 1000000LL + tv.tv_usec;
354 34865134 bellard
}
355 34865134 bellard
356 0824d6fc bellard
void cpu_calibrate_ticks(void)
357 0824d6fc bellard
{
358 0824d6fc bellard
    int64_t usec, ticks;
359 0824d6fc bellard
360 0824d6fc bellard
    usec = get_clock();
361 0824d6fc bellard
    ticks = cpu_get_ticks();
362 0824d6fc bellard
    usleep(50 * 1000);
363 0824d6fc bellard
    usec = get_clock() - usec;
364 0824d6fc bellard
    ticks = cpu_get_ticks() - ticks;
365 0824d6fc bellard
    ticks_per_sec = (ticks * 1000000LL + (usec >> 1)) / usec;
366 0824d6fc bellard
}
367 0824d6fc bellard
368 87858c89 bellard
/* compute with 96 bit intermediate result: (a*b)/c */
369 80cabfad bellard
uint64_t muldiv64(uint64_t a, uint32_t b, uint32_t c)
370 87858c89 bellard
{
371 87858c89 bellard
    union {
372 87858c89 bellard
        uint64_t ll;
373 87858c89 bellard
        struct {
374 87858c89 bellard
#ifdef WORDS_BIGENDIAN
375 87858c89 bellard
            uint32_t high, low;
376 87858c89 bellard
#else
377 87858c89 bellard
            uint32_t low, high;
378 87858c89 bellard
#endif            
379 87858c89 bellard
        } l;
380 87858c89 bellard
    } u, res;
381 87858c89 bellard
    uint64_t rl, rh;
382 87858c89 bellard
383 87858c89 bellard
    u.ll = a;
384 87858c89 bellard
    rl = (uint64_t)u.l.low * (uint64_t)b;
385 87858c89 bellard
    rh = (uint64_t)u.l.high * (uint64_t)b;
386 87858c89 bellard
    rh += (rl >> 32);
387 87858c89 bellard
    res.l.high = rh / c;
388 87858c89 bellard
    res.l.low = (((rh % c) << 32) + (rl & 0xffffffff)) / c;
389 87858c89 bellard
    return res.ll;
390 87858c89 bellard
}
391 87858c89 bellard
392 80cabfad bellard
#define TERM_ESCAPE 0x01 /* ctrl-a is used for escape */
393 80cabfad bellard
static int term_got_escape, term_command;
394 80cabfad bellard
static unsigned char term_cmd_buf[128];
395 0824d6fc bellard
396 80cabfad bellard
typedef struct term_cmd_t {
397 80cabfad bellard
    const unsigned char *name;
398 80cabfad bellard
    void (*handler)(unsigned char *params);
399 80cabfad bellard
} term_cmd_t;
400 87858c89 bellard
401 80cabfad bellard
static void do_change_cdrom (unsigned char *params);
402 80cabfad bellard
static void do_change_fd0 (unsigned char *params);
403 80cabfad bellard
static void do_change_fd1 (unsigned char *params);
404 c45886db bellard
405 c45886db bellard
static term_cmd_t term_cmds[] = {
406 c45886db bellard
    { "changecd", &do_change_cdrom, },
407 c45886db bellard
    { "changefd0", &do_change_fd0, },
408 c45886db bellard
    { "changefd1", &do_change_fd1, },
409 80cabfad bellard
    { NULL, NULL, },
410 80cabfad bellard
};
411 313aa567 bellard
412 80cabfad bellard
void term_print_help(void)
413 cd4c3e88 bellard
{
414 80cabfad bellard
    printf("\n"
415 80cabfad bellard
           "C-a h    print this help\n"
416 80cabfad bellard
           "C-a x    exit emulatior\n"
417 80cabfad bellard
           "C-a d    switch on/off debug log\n"
418 80cabfad bellard
           "C-a s    save disk data back to file (if -snapshot)\n"
419 80cabfad bellard
           "C-a b    send break (magic sysrq)\n"
420 80cabfad bellard
           "C-a c    send qemu internal command\n"
421 80cabfad bellard
           "C-a C-a  send C-a\n"
422 80cabfad bellard
           );
423 cd4c3e88 bellard
}
424 cd4c3e88 bellard
425 80cabfad bellard
static void do_change_cdrom (unsigned char *params)
426 cd4c3e88 bellard
{
427 80cabfad bellard
    /* Dunno how to do it... */
428 330d0414 bellard
}
429 330d0414 bellard
430 80cabfad bellard
static void do_change_fd (int fd, unsigned char *params)
431 330d0414 bellard
{
432 80cabfad bellard
    unsigned char *name_start, *name_end, *ros;
433 80cabfad bellard
    int ro;
434 330d0414 bellard
435 80cabfad bellard
    for (name_start = params;
436 80cabfad bellard
         isspace(*name_start); name_start++)
437 80cabfad bellard
        continue;
438 80cabfad bellard
    if (*name_start == '\0')
439 80cabfad bellard
        return;
440 80cabfad bellard
    for (name_end = name_start;
441 80cabfad bellard
         !isspace(*name_end) && *name_end != '\0'; name_end++)
442 80cabfad bellard
        continue;
443 80cabfad bellard
    for (ros = name_end + 1; isspace(*ros); ros++)
444 80cabfad bellard
        continue;
445 80cabfad bellard
    if (ros[0] == 'r' && ros[1] == 'o')
446 80cabfad bellard
        ro = 1;
447 80cabfad bellard
    else
448 80cabfad bellard
        ro = 0;
449 80cabfad bellard
    *name_end = '\0';
450 80cabfad bellard
    printf("Change fd %d to %s (%s)\n", fd, name_start, params);
451 80cabfad bellard
    fdctrl_disk_change(fd, name_start, ro);
452 330d0414 bellard
}
453 330d0414 bellard
454 80cabfad bellard
static void do_change_fd0 (unsigned char *params)
455 330d0414 bellard
{
456 80cabfad bellard
    do_change_fd(0, params);
457 313aa567 bellard
}
458 313aa567 bellard
459 80cabfad bellard
static void do_change_fd1 (unsigned char *params)
460 313aa567 bellard
{
461 80cabfad bellard
    do_change_fd(1, params);
462 313aa567 bellard
}
463 313aa567 bellard
464 80cabfad bellard
static void term_treat_command(void)
465 313aa567 bellard
{
466 80cabfad bellard
    unsigned char *cmd_start, *cmd_end;
467 80cabfad bellard
    int i;
468 313aa567 bellard
469 80cabfad bellard
    for (cmd_start = term_cmd_buf; isspace(*cmd_start); cmd_start++)
470 80cabfad bellard
        continue;
471 80cabfad bellard
    for (cmd_end = cmd_start;
472 80cabfad bellard
         !isspace(*cmd_end) && *cmd_end != '\0'; cmd_end++)
473 80cabfad bellard
        continue;
474 80cabfad bellard
    for (i = 0; term_cmds[i].name != NULL; i++) {
475 80cabfad bellard
        if (strlen(term_cmds[i].name) == (cmd_end - cmd_start) &&
476 80cabfad bellard
            memcmp(term_cmds[i].name, cmd_start, cmd_end - cmd_start) == 0) {
477 80cabfad bellard
            (*term_cmds[i].handler)(cmd_end + 1);
478 80cabfad bellard
            return;
479 313aa567 bellard
        }
480 313aa567 bellard
    }
481 80cabfad bellard
    *cmd_end = '\0';
482 80cabfad bellard
    printf("Unknown term command: %s\n", cmd_start);
483 313aa567 bellard
}
484 313aa567 bellard
485 80cabfad bellard
extern FILE *logfile;
486 80cabfad bellard
487 80cabfad bellard
/* called when a char is received */
488 80cabfad bellard
void term_received_byte(int ch)
489 313aa567 bellard
{
490 80cabfad bellard
    if (term_command) {
491 80cabfad bellard
        if (ch == '\n' || ch == '\r' || term_command == 127) {
492 80cabfad bellard
            printf("\n");
493 80cabfad bellard
            term_treat_command();
494 80cabfad bellard
            term_command = 0;
495 80cabfad bellard
        } else {
496 80cabfad bellard
            if (ch == 0x7F || ch == 0x08) {
497 80cabfad bellard
                if (term_command > 1) {
498 80cabfad bellard
                    term_cmd_buf[--term_command - 1] = '\0';
499 80cabfad bellard
                    printf("\r                                               "
500 80cabfad bellard
                           "                               ");
501 80cabfad bellard
                    printf("\r> %s", term_cmd_buf);
502 80cabfad bellard
                }
503 80cabfad bellard
            } else if (ch > 0x1f) {
504 80cabfad bellard
                term_cmd_buf[term_command++ - 1] = ch;
505 80cabfad bellard
                term_cmd_buf[term_command - 1] = '\0';
506 80cabfad bellard
                printf("\r> %s", term_cmd_buf);
507 313aa567 bellard
            }
508 80cabfad bellard
            fflush(stdout);
509 313aa567 bellard
        }
510 80cabfad bellard
    } else if (term_got_escape) {
511 80cabfad bellard
        term_got_escape = 0;
512 80cabfad bellard
        switch(ch) {
513 80cabfad bellard
        case 'h':
514 80cabfad bellard
            term_print_help();
515 313aa567 bellard
            break;
516 80cabfad bellard
        case 'x':
517 80cabfad bellard
            exit(0);
518 313aa567 bellard
            break;
519 80cabfad bellard
        case 's': 
520 80cabfad bellard
            {
521 80cabfad bellard
                int i;
522 80cabfad bellard
                for (i = 0; i < MAX_DISKS; i++) {
523 80cabfad bellard
                    if (bs_table[i])
524 80cabfad bellard
                        bdrv_commit(bs_table[i]);
525 80cabfad bellard
                }
526 80cabfad bellard
            }
527 313aa567 bellard
            break;
528 80cabfad bellard
        case 'b':
529 80cabfad bellard
            serial_receive_break();
530 313aa567 bellard
            break;
531 80cabfad bellard
        case 'c':
532 80cabfad bellard
            printf("> ");
533 80cabfad bellard
            fflush(stdout);
534 80cabfad bellard
            term_command = 1;
535 313aa567 bellard
            break;
536 80cabfad bellard
        case 'd':
537 80cabfad bellard
            cpu_set_log(CPU_LOG_ALL);
538 313aa567 bellard
            break;
539 80cabfad bellard
        case TERM_ESCAPE:
540 80cabfad bellard
            goto send_char;
541 313aa567 bellard
        }
542 80cabfad bellard
    } else if (ch == TERM_ESCAPE) {
543 80cabfad bellard
        term_got_escape = 1;
544 80cabfad bellard
    } else {
545 80cabfad bellard
    send_char:
546 80cabfad bellard
        serial_receive_byte(ch);
547 330d0414 bellard
    }
548 330d0414 bellard
}
549 330d0414 bellard
550 80cabfad bellard
/***********************************************************/
551 80cabfad bellard
/* Linux network device redirector */
552 330d0414 bellard
553 80cabfad bellard
int net_init(void)
554 330d0414 bellard
{
555 80cabfad bellard
    struct ifreq ifr;
556 80cabfad bellard
    int fd, ret, pid, status;
557 80cabfad bellard
    
558 80cabfad bellard
    fd = open("/dev/net/tun", O_RDWR);
559 80cabfad bellard
    if (fd < 0) {
560 80cabfad bellard
        fprintf(stderr, "warning: could not open /dev/net/tun: no virtual network emulation\n");
561 80cabfad bellard
        return -1;
562 330d0414 bellard
    }
563 80cabfad bellard
    memset(&ifr, 0, sizeof(ifr));
564 80cabfad bellard
    ifr.ifr_flags = IFF_TAP | IFF_NO_PI;
565 80cabfad bellard
    pstrcpy(ifr.ifr_name, IFNAMSIZ, "tun%d");
566 80cabfad bellard
    ret = ioctl(fd, TUNSETIFF, (void *) &ifr);
567 80cabfad bellard
    if (ret != 0) {
568 80cabfad bellard
        fprintf(stderr, "warning: could not configure /dev/net/tun: no virtual network emulation\n");
569 80cabfad bellard
        close(fd);
570 80cabfad bellard
        return -1;
571 80cabfad bellard
    }
572 80cabfad bellard
    printf("Connected to host network interface: %s\n", ifr.ifr_name);
573 80cabfad bellard
    fcntl(fd, F_SETFL, O_NONBLOCK);
574 80cabfad bellard
    net_fd = fd;
575 330d0414 bellard
576 80cabfad bellard
    /* try to launch network init script */
577 80cabfad bellard
    pid = fork();
578 80cabfad bellard
    if (pid >= 0) {
579 80cabfad bellard
        if (pid == 0) {
580 80cabfad bellard
            execl(network_script, network_script, ifr.ifr_name, NULL);
581 80cabfad bellard
            exit(1);
582 80cabfad bellard
        }
583 80cabfad bellard
        while (waitpid(pid, &status, 0) != pid);
584 80cabfad bellard
        if (!WIFEXITED(status) ||
585 80cabfad bellard
            WEXITSTATUS(status) != 0) {
586 80cabfad bellard
            fprintf(stderr, "%s: could not launch network script for '%s'\n",
587 80cabfad bellard
                    network_script, ifr.ifr_name);
588 80cabfad bellard
        }
589 330d0414 bellard
    }
590 80cabfad bellard
    return 0;
591 330d0414 bellard
}
592 330d0414 bellard
593 80cabfad bellard
void net_send_packet(int net_fd, const uint8_t *buf, int size)
594 330d0414 bellard
{
595 80cabfad bellard
#ifdef DEBUG_NE2000
596 80cabfad bellard
    printf("NE2000: sending packet size=%d\n", size);
597 c45886db bellard
#endif
598 80cabfad bellard
    write(net_fd, buf, size);
599 80cabfad bellard
}
600 330d0414 bellard
601 330d0414 bellard
/***********************************************************/
602 313aa567 bellard
/* dumb display */
603 313aa567 bellard
604 313aa567 bellard
/* init terminal so that we can grab keys */
605 313aa567 bellard
static struct termios oldtty;
606 313aa567 bellard
607 313aa567 bellard
static void term_exit(void)
608 313aa567 bellard
{
609 313aa567 bellard
    tcsetattr (0, TCSANOW, &oldtty);
610 313aa567 bellard
}
611 313aa567 bellard
612 313aa567 bellard
static void term_init(void)
613 313aa567 bellard
{
614 313aa567 bellard
    struct termios tty;
615 313aa567 bellard
616 313aa567 bellard
    tcgetattr (0, &tty);
617 313aa567 bellard
    oldtty = tty;
618 313aa567 bellard
619 313aa567 bellard
    tty.c_iflag &= ~(IGNBRK|BRKINT|PARMRK|ISTRIP
620 313aa567 bellard
                          |INLCR|IGNCR|ICRNL|IXON);
621 313aa567 bellard
    tty.c_oflag |= OPOST;
622 a20dd508 bellard
    tty.c_lflag &= ~(ECHO|ECHONL|ICANON|IEXTEN);
623 a20dd508 bellard
    /* if graphical mode, we allow Ctrl-C handling */
624 a20dd508 bellard
    if (nographic)
625 a20dd508 bellard
        tty.c_lflag &= ~ISIG;
626 313aa567 bellard
    tty.c_cflag &= ~(CSIZE|PARENB);
627 313aa567 bellard
    tty.c_cflag |= CS8;
628 313aa567 bellard
    tty.c_cc[VMIN] = 1;
629 313aa567 bellard
    tty.c_cc[VTIME] = 0;
630 313aa567 bellard
    
631 313aa567 bellard
    tcsetattr (0, TCSANOW, &tty);
632 313aa567 bellard
633 313aa567 bellard
    atexit(term_exit);
634 313aa567 bellard
635 313aa567 bellard
    fcntl(0, F_SETFL, O_NONBLOCK);
636 313aa567 bellard
}
637 313aa567 bellard
638 313aa567 bellard
static void dumb_update(DisplayState *ds, int x, int y, int w, int h)
639 313aa567 bellard
{
640 313aa567 bellard
}
641 313aa567 bellard
642 313aa567 bellard
static void dumb_resize(DisplayState *ds, int w, int h)
643 313aa567 bellard
{
644 313aa567 bellard
}
645 313aa567 bellard
646 313aa567 bellard
static void dumb_refresh(DisplayState *ds)
647 313aa567 bellard
{
648 313aa567 bellard
    vga_update_display();
649 313aa567 bellard
}
650 313aa567 bellard
651 313aa567 bellard
void dumb_display_init(DisplayState *ds)
652 313aa567 bellard
{
653 313aa567 bellard
    ds->data = NULL;
654 313aa567 bellard
    ds->linesize = 0;
655 313aa567 bellard
    ds->depth = 0;
656 313aa567 bellard
    ds->dpy_update = dumb_update;
657 313aa567 bellard
    ds->dpy_resize = dumb_resize;
658 313aa567 bellard
    ds->dpy_refresh = dumb_refresh;
659 313aa567 bellard
}
660 313aa567 bellard
661 3a51dee6 bellard
#if !defined(CONFIG_SOFTMMU)
662 313aa567 bellard
/***********************************************************/
663 0824d6fc bellard
/* cpu signal handler */
664 0824d6fc bellard
static void host_segv_handler(int host_signum, siginfo_t *info, 
665 0824d6fc bellard
                              void *puc)
666 0824d6fc bellard
{
667 0824d6fc bellard
    if (cpu_signal_handler(host_signum, info, puc))
668 0824d6fc bellard
        return;
669 0824d6fc bellard
    term_exit();
670 0824d6fc bellard
    abort();
671 0824d6fc bellard
}
672 3a51dee6 bellard
#endif
673 0824d6fc bellard
674 0824d6fc bellard
static int timer_irq_pending;
675 87858c89 bellard
static int timer_irq_count;
676 0824d6fc bellard
677 313aa567 bellard
static int timer_ms;
678 313aa567 bellard
static int gui_refresh_pending, gui_refresh_count;
679 313aa567 bellard
680 0824d6fc bellard
static void host_alarm_handler(int host_signum, siginfo_t *info, 
681 0824d6fc bellard
                               void *puc)
682 0824d6fc bellard
{
683 87858c89 bellard
    /* NOTE: since usually the OS asks a 100 Hz clock, there can be
684 87858c89 bellard
       some drift between cpu_get_ticks() and the interrupt time. So
685 87858c89 bellard
       we queue some interrupts to avoid missing some */
686 87858c89 bellard
    timer_irq_count += pit_get_out_edges(&pit_channels[0]);
687 87858c89 bellard
    if (timer_irq_count) {
688 87858c89 bellard
        if (timer_irq_count > 2)
689 87858c89 bellard
            timer_irq_count = 2;
690 87858c89 bellard
        timer_irq_count--;
691 313aa567 bellard
        timer_irq_pending = 1;
692 313aa567 bellard
    }
693 313aa567 bellard
    gui_refresh_count += timer_ms;
694 313aa567 bellard
    if (gui_refresh_count >= GUI_REFRESH_INTERVAL) {
695 313aa567 bellard
        gui_refresh_count = 0;
696 313aa567 bellard
        gui_refresh_pending = 1;
697 313aa567 bellard
    }
698 313aa567 bellard
699 313aa567 bellard
    if (gui_refresh_pending || timer_irq_pending) {
700 87858c89 bellard
        /* just exit from the cpu to have a chance to handle timers */
701 c45886db bellard
        cpu_interrupt(global_env, CPU_INTERRUPT_EXIT);
702 87858c89 bellard
    }
703 0824d6fc bellard
}
704 0824d6fc bellard
705 b4608c04 bellard
/* main execution loop */
706 b4608c04 bellard
707 b4608c04 bellard
CPUState *cpu_gdbstub_get_env(void *opaque)
708 b4608c04 bellard
{
709 b4608c04 bellard
    return global_env;
710 b4608c04 bellard
}
711 b4608c04 bellard
712 4c3a88a2 bellard
int main_loop(void *opaque)
713 b4608c04 bellard
{
714 c45886db bellard
    struct pollfd ufds[3], *pf, *serial_ufd, *gdb_ufd;
715 c45886db bellard
#if defined (TARGET_I386)
716 c45886db bellard
    struct pollfd *net_ufd;
717 c45886db bellard
#endif
718 27c3f2cb bellard
    int ret, n, timeout, serial_ok;
719 b4608c04 bellard
    uint8_t ch;
720 b4608c04 bellard
    CPUState *env = global_env;
721 b4608c04 bellard
722 a20dd508 bellard
    if (!term_inited) {
723 313aa567 bellard
        /* initialize terminal only there so that the user has a
724 313aa567 bellard
           chance to stop QEMU with Ctrl-C before the gdb connection
725 313aa567 bellard
           is launched */
726 313aa567 bellard
        term_inited = 1;
727 313aa567 bellard
        term_init();
728 313aa567 bellard
    }
729 313aa567 bellard
730 27c3f2cb bellard
    serial_ok = 1;
731 34865134 bellard
    cpu_enable_ticks();
732 b4608c04 bellard
    for(;;) {
733 c45886db bellard
#if defined (DO_TB_FLUSH)
734 c45886db bellard
        tb_flush();
735 c45886db bellard
#endif
736 c45886db bellard
        ret = cpu_exec(env);
737 34865134 bellard
        if (reset_requested) {
738 34865134 bellard
            ret = EXCP_INTERRUPT; 
739 cd4c3e88 bellard
            break;
740 34865134 bellard
        }
741 34865134 bellard
        if (ret == EXCP_DEBUG) {
742 34865134 bellard
            ret = EXCP_DEBUG;
743 34865134 bellard
            break;
744 34865134 bellard
        }
745 b4608c04 bellard
        /* if hlt instruction, we wait until the next IRQ */
746 b4608c04 bellard
        if (ret == EXCP_HLT) 
747 b4608c04 bellard
            timeout = 10;
748 b4608c04 bellard
        else
749 b4608c04 bellard
            timeout = 0;
750 b4608c04 bellard
        /* poll any events */
751 b4608c04 bellard
        serial_ufd = NULL;
752 b4608c04 bellard
        pf = ufds;
753 80cabfad bellard
        if (serial_ok && serial_can_receive()) {
754 b4608c04 bellard
            serial_ufd = pf;
755 b4608c04 bellard
            pf->fd = 0;
756 b4608c04 bellard
            pf->events = POLLIN;
757 b4608c04 bellard
            pf++;
758 b4608c04 bellard
        }
759 c45886db bellard
#if defined (TARGET_I386)
760 b4608c04 bellard
        net_ufd = NULL;
761 80cabfad bellard
        if (net_fd > 0 && ne2000_can_receive()) {
762 b4608c04 bellard
            net_ufd = pf;
763 b4608c04 bellard
            pf->fd = net_fd;
764 b4608c04 bellard
            pf->events = POLLIN;
765 b4608c04 bellard
            pf++;
766 b4608c04 bellard
        }
767 c45886db bellard
#endif
768 b4608c04 bellard
        gdb_ufd = NULL;
769 b4608c04 bellard
        if (gdbstub_fd > 0) {
770 b4608c04 bellard
            gdb_ufd = pf;
771 b4608c04 bellard
            pf->fd = gdbstub_fd;
772 b4608c04 bellard
            pf->events = POLLIN;
773 b4608c04 bellard
            pf++;
774 b4608c04 bellard
        }
775 b4608c04 bellard
776 b4608c04 bellard
        ret = poll(ufds, pf - ufds, timeout);
777 b4608c04 bellard
        if (ret > 0) {
778 b4608c04 bellard
            if (serial_ufd && (serial_ufd->revents & POLLIN)) {
779 b4608c04 bellard
                n = read(0, &ch, 1);
780 b4608c04 bellard
                if (n == 1) {
781 80cabfad bellard
                    term_received_byte(ch);
782 27c3f2cb bellard
                } else {
783 27c3f2cb bellard
                    /* Closed, stop polling. */
784 27c3f2cb bellard
                    serial_ok = 0;
785 b4608c04 bellard
                }
786 b4608c04 bellard
            }
787 c45886db bellard
#if defined (TARGET_I386)
788 b4608c04 bellard
            if (net_ufd && (net_ufd->revents & POLLIN)) {
789 b4608c04 bellard
                uint8_t buf[MAX_ETH_FRAME_SIZE];
790 b4608c04 bellard
791 b4608c04 bellard
                n = read(net_fd, buf, MAX_ETH_FRAME_SIZE);
792 b4608c04 bellard
                if (n > 0) {
793 b4608c04 bellard
                    if (n < 60) {
794 b4608c04 bellard
                        memset(buf + n, 0, 60 - n);
795 b4608c04 bellard
                        n = 60;
796 b4608c04 bellard
                    }
797 80cabfad bellard
                    ne2000_receive(buf, n);
798 b4608c04 bellard
                }
799 b4608c04 bellard
            }
800 c45886db bellard
#endif
801 b4608c04 bellard
            if (gdb_ufd && (gdb_ufd->revents & POLLIN)) {
802 b4608c04 bellard
                uint8_t buf[1];
803 b4608c04 bellard
                /* stop emulation if requested by gdb */
804 b4608c04 bellard
                n = read(gdbstub_fd, buf, 1);
805 34865134 bellard
                if (n == 1) {
806 34865134 bellard
                    ret = EXCP_INTERRUPT; 
807 b4608c04 bellard
                    break;
808 34865134 bellard
                }
809 b4608c04 bellard
            }
810 b4608c04 bellard
        }
811 b4608c04 bellard
812 b4608c04 bellard
        /* timer IRQ */
813 b4608c04 bellard
        if (timer_irq_pending) {
814 c45886db bellard
#if defined (TARGET_I386)
815 b4608c04 bellard
            pic_set_irq(0, 1);
816 b4608c04 bellard
            pic_set_irq(0, 0);
817 b4608c04 bellard
            timer_irq_pending = 0;
818 80cabfad bellard
            rtc_timer();
819 c45886db bellard
#endif
820 b4608c04 bellard
        }
821 8dc75d75 bellard
        /* XXX: add explicit timer */
822 8dc75d75 bellard
        SB16_run();
823 8dc75d75 bellard
824 8dc75d75 bellard
        /* run dma transfers, if any */
825 8dc75d75 bellard
        DMA_run();
826 313aa567 bellard
827 313aa567 bellard
        /* VGA */
828 313aa567 bellard
        if (gui_refresh_pending) {
829 313aa567 bellard
            display_state.dpy_refresh(&display_state);
830 313aa567 bellard
            gui_refresh_pending = 0;
831 313aa567 bellard
        }
832 b4608c04 bellard
    }
833 34865134 bellard
    cpu_disable_ticks();
834 34865134 bellard
    return ret;
835 b4608c04 bellard
}
836 b4608c04 bellard
837 0824d6fc bellard
void help(void)
838 0824d6fc bellard
{
839 a20dd508 bellard
    printf("QEMU PC emulator version " QEMU_VERSION ", Copyright (c) 2003 Fabrice Bellard\n"
840 0db63474 bellard
           "usage: %s [options] [disk_image]\n"
841 0824d6fc bellard
           "\n"
842 a20dd508 bellard
           "'disk_image' is a raw hard image image for IDE hard disk 0\n"
843 fc01f7e7 bellard
           "\n"
844 a20dd508 bellard
           "Standard options:\n"
845 c45886db bellard
           "-fda/-fdb file  use 'file' as floppy disk 0/1 image\n"
846 36b486bb bellard
           "-hda/-hdb file  use 'file' as IDE hard disk 0/1 image\n"
847 36b486bb bellard
           "-hdc/-hdd file  use 'file' as IDE hard disk 2/3 image\n"
848 36b486bb bellard
           "-cdrom file     use 'file' as IDE cdrom 2 image\n"
849 6e44ba7f bellard
           "-boot [a|b|c|d] boot on floppy (a, b), hard disk (c) or CD-ROM (d)\n"
850 a20dd508 bellard
           "-snapshot       write to temporary files instead of disk image files\n"
851 a20dd508 bellard
           "-m megs         set virtual RAM size to megs MB\n"
852 a20dd508 bellard
           "-n script       set network init script [default=%s]\n"
853 42f1e0e4 bellard
           "-tun-fd fd      this fd talks to tap/tun, use it.\n"
854 a20dd508 bellard
           "-nographic      disable graphical output\n"
855 a20dd508 bellard
           "\n"
856 a20dd508 bellard
           "Linux boot specific (does not require PC BIOS):\n"
857 a20dd508 bellard
           "-kernel bzImage use 'bzImage' as kernel image\n"
858 a20dd508 bellard
           "-append cmdline use 'cmdline' as kernel command line\n"
859 a20dd508 bellard
           "-initrd file    use 'file' as initial ram disk\n"
860 fc01f7e7 bellard
           "\n"
861 330d0414 bellard
           "Debug/Expert options:\n"
862 a20dd508 bellard
           "-s              wait gdb connection to port %d\n"
863 a20dd508 bellard
           "-p port         change gdb connection port\n"
864 6e44ba7f bellard
           "-d              output log to %s\n"
865 a20dd508 bellard
           "-hdachs c,h,s   force hard disk 0 geometry (usually qemu can guess it)\n"
866 a20dd508 bellard
           "-L path         set the directory for the BIOS and VGA BIOS\n"
867 77fef8c1 bellard
#ifdef USE_CODE_COPY
868 77fef8c1 bellard
           "-no-code-copy   disable code copy acceleration\n"
869 77fef8c1 bellard
#endif
870 77fef8c1 bellard
871 0824d6fc bellard
           "\n"
872 f1510b2c bellard
           "During emulation, use C-a h to get terminal commands:\n",
873 0db63474 bellard
#ifdef CONFIG_SOFTMMU
874 0db63474 bellard
           "qemu",
875 0db63474 bellard
#else
876 0db63474 bellard
           "qemu-fast",
877 0db63474 bellard
#endif
878 0db63474 bellard
           DEFAULT_NETWORK_SCRIPT, 
879 6e44ba7f bellard
           DEFAULT_GDBSTUB_PORT,
880 6e44ba7f bellard
           "/tmp/qemu.log");
881 0824d6fc bellard
    term_print_help();
882 0db63474 bellard
#ifndef CONFIG_SOFTMMU
883 0db63474 bellard
    printf("\n"
884 0db63474 bellard
           "NOTE: this version of QEMU is faster but it needs slightly patched OSes to\n"
885 0db63474 bellard
           "work. Please use the 'qemu' executable to have a more accurate (but slower)\n"
886 0db63474 bellard
           "PC emulation.\n");
887 0db63474 bellard
#endif
888 0824d6fc bellard
    exit(1);
889 0824d6fc bellard
}
890 0824d6fc bellard
891 fc01f7e7 bellard
struct option long_options[] = {
892 fc01f7e7 bellard
    { "initrd", 1, NULL, 0, },
893 fc01f7e7 bellard
    { "hda", 1, NULL, 0, },
894 fc01f7e7 bellard
    { "hdb", 1, NULL, 0, },
895 33e3963e bellard
    { "snapshot", 0, NULL, 0, },
896 330d0414 bellard
    { "hdachs", 1, NULL, 0, },
897 a20dd508 bellard
    { "nographic", 0, NULL, 0, },
898 a20dd508 bellard
    { "kernel", 1, NULL, 0, },
899 a20dd508 bellard
    { "append", 1, NULL, 0, },
900 42f1e0e4 bellard
    { "tun-fd", 1, NULL, 0, },
901 36b486bb bellard
    { "hdc", 1, NULL, 0, },
902 36b486bb bellard
    { "hdd", 1, NULL, 0, },
903 36b486bb bellard
    { "cdrom", 1, NULL, 0, },
904 36b486bb bellard
    { "boot", 1, NULL, 0, },
905 c45886db bellard
    { "fda", 1, NULL, 0, },
906 c45886db bellard
    { "fdb", 1, NULL, 0, },
907 77fef8c1 bellard
    { "no-code-copy", 0, NULL, 0},
908 fc01f7e7 bellard
    { NULL, 0, NULL, 0 },
909 fc01f7e7 bellard
};
910 fc01f7e7 bellard
911 a20dd508 bellard
#ifdef CONFIG_SDL
912 a20dd508 bellard
/* SDL use the pthreads and they modify sigaction. We don't
913 a20dd508 bellard
   want that. */
914 dc887a4d bellard
#if __GLIBC__ > 2 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 2)
915 a20dd508 bellard
extern void __libc_sigaction();
916 a20dd508 bellard
#define sigaction(sig, act, oact) __libc_sigaction(sig, act, oact)
917 a20dd508 bellard
#else
918 a20dd508 bellard
extern void __sigaction();
919 a20dd508 bellard
#define sigaction(sig, act, oact) __sigaction(sig, act, oact)
920 a20dd508 bellard
#endif
921 a20dd508 bellard
#endif /* CONFIG_SDL */
922 a20dd508 bellard
923 77fef8c1 bellard
#if defined (TARGET_I386) && defined(USE_CODE_COPY)
924 77fef8c1 bellard
925 77fef8c1 bellard
/* this stack is only used during signal handling */
926 77fef8c1 bellard
#define SIGNAL_STACK_SIZE 32768
927 77fef8c1 bellard
928 77fef8c1 bellard
static uint8_t *signal_stack;
929 77fef8c1 bellard
930 77fef8c1 bellard
#endif
931 77fef8c1 bellard
932 0824d6fc bellard
int main(int argc, char **argv)
933 0824d6fc bellard
{
934 80cabfad bellard
    int c, i, use_gdbstub, gdbstub_port, long_index;
935 1ccde1cb bellard
    int snapshot, linux_boot;
936 0824d6fc bellard
    struct sigaction act;
937 0824d6fc bellard
    struct itimerval itv;
938 c45886db bellard
    CPUState *env;
939 7f7f9873 bellard
    const char *initrd_filename;
940 c45886db bellard
    const char *hd_filename[MAX_DISKS], *fd_filename[MAX_FD];
941 a20dd508 bellard
    const char *kernel_filename, *kernel_cmdline;
942 313aa567 bellard
    DisplayState *ds = &display_state;
943 313aa567 bellard
944 0824d6fc bellard
    /* we never want that malloc() uses mmap() */
945 0824d6fc bellard
    mallopt(M_MMAP_THRESHOLD, 4096 * 1024);
946 fc01f7e7 bellard
    initrd_filename = NULL;
947 c45886db bellard
    for(i = 0; i < MAX_FD; i++)
948 c45886db bellard
        fd_filename[i] = NULL;
949 fc01f7e7 bellard
    for(i = 0; i < MAX_DISKS; i++)
950 fc01f7e7 bellard
        hd_filename[i] = NULL;
951 1ccde1cb bellard
    ram_size = 32 * 1024 * 1024;
952 313aa567 bellard
    vga_ram_size = VGA_RAM_SIZE;
953 c45886db bellard
#if defined (TARGET_I386)
954 f1510b2c bellard
    pstrcpy(network_script, sizeof(network_script), DEFAULT_NETWORK_SCRIPT);
955 c45886db bellard
#endif
956 b4608c04 bellard
    use_gdbstub = 0;
957 b4608c04 bellard
    gdbstub_port = DEFAULT_GDBSTUB_PORT;
958 33e3963e bellard
    snapshot = 0;
959 a20dd508 bellard
    nographic = 0;
960 a20dd508 bellard
    kernel_filename = NULL;
961 a20dd508 bellard
    kernel_cmdline = "";
962 0824d6fc bellard
    for(;;) {
963 330d0414 bellard
        c = getopt_long_only(argc, argv, "hm:dn:sp:L:", long_options, &long_index);
964 0824d6fc bellard
        if (c == -1)
965 0824d6fc bellard
            break;
966 0824d6fc bellard
        switch(c) {
967 fc01f7e7 bellard
        case 0:
968 fc01f7e7 bellard
            switch(long_index) {
969 fc01f7e7 bellard
            case 0:
970 fc01f7e7 bellard
                initrd_filename = optarg;
971 fc01f7e7 bellard
                break;
972 fc01f7e7 bellard
            case 1:
973 fc01f7e7 bellard
                hd_filename[0] = optarg;
974 fc01f7e7 bellard
                break;
975 fc01f7e7 bellard
            case 2:
976 fc01f7e7 bellard
                hd_filename[1] = optarg;
977 fc01f7e7 bellard
                break;
978 33e3963e bellard
            case 3:
979 33e3963e bellard
                snapshot = 1;
980 33e3963e bellard
                break;
981 330d0414 bellard
            case 4:
982 330d0414 bellard
                {
983 330d0414 bellard
                    int cyls, heads, secs;
984 330d0414 bellard
                    const char *p;
985 330d0414 bellard
                    p = optarg;
986 330d0414 bellard
                    cyls = strtol(p, (char **)&p, 0);
987 330d0414 bellard
                    if (*p != ',')
988 330d0414 bellard
                        goto chs_fail;
989 330d0414 bellard
                    p++;
990 330d0414 bellard
                    heads = strtol(p, (char **)&p, 0);
991 330d0414 bellard
                    if (*p != ',')
992 330d0414 bellard
                        goto chs_fail;
993 330d0414 bellard
                    p++;
994 330d0414 bellard
                    secs = strtol(p, (char **)&p, 0);
995 330d0414 bellard
                    if (*p != '\0')
996 330d0414 bellard
                        goto chs_fail;
997 5391d806 bellard
                    ide_set_geometry(0, cyls, heads, secs);
998 330d0414 bellard
                chs_fail: ;
999 330d0414 bellard
                }
1000 330d0414 bellard
                break;
1001 313aa567 bellard
            case 5:
1002 a20dd508 bellard
                nographic = 1;
1003 a20dd508 bellard
                break;
1004 a20dd508 bellard
            case 6:
1005 a20dd508 bellard
                kernel_filename = optarg;
1006 a20dd508 bellard
                break;
1007 a20dd508 bellard
            case 7:
1008 a20dd508 bellard
                kernel_cmdline = optarg;
1009 313aa567 bellard
                break;
1010 c45886db bellard
#if defined (TARGET_I386)
1011 42f1e0e4 bellard
            case 8:
1012 42f1e0e4 bellard
                net_fd = atoi(optarg);
1013 42f1e0e4 bellard
                break;
1014 c45886db bellard
#endif
1015 36b486bb bellard
            case 9:
1016 36b486bb bellard
                hd_filename[2] = optarg;
1017 36b486bb bellard
                break;
1018 36b486bb bellard
            case 10:
1019 36b486bb bellard
                hd_filename[3] = optarg;
1020 36b486bb bellard
                break;
1021 36b486bb bellard
            case 11:
1022 36b486bb bellard
                hd_filename[2] = optarg;
1023 5391d806 bellard
                ide_set_cdrom(2, 1);
1024 36b486bb bellard
                break;
1025 36b486bb bellard
            case 12:
1026 36b486bb bellard
                boot_device = optarg[0];
1027 c45886db bellard
                if (boot_device != 'a' && boot_device != 'b' &&
1028 c45886db bellard
                    boot_device != 'c' && boot_device != 'd') {
1029 36b486bb bellard
                    fprintf(stderr, "qemu: invalid boot device '%c'\n", boot_device);
1030 36b486bb bellard
                    exit(1);
1031 36b486bb bellard
                }
1032 36b486bb bellard
                break;
1033 c45886db bellard
            case 13:
1034 c45886db bellard
                fd_filename[0] = optarg;
1035 c45886db bellard
                break;
1036 c45886db bellard
            case 14:
1037 c45886db bellard
                fd_filename[1] = optarg;
1038 c45886db bellard
                break;
1039 77fef8c1 bellard
            case 15:
1040 77fef8c1 bellard
                code_copy_enabled = 0;
1041 77fef8c1 bellard
                break;
1042 fc01f7e7 bellard
            }
1043 fc01f7e7 bellard
            break;
1044 0824d6fc bellard
        case 'h':
1045 0824d6fc bellard
            help();
1046 0824d6fc bellard
            break;
1047 0824d6fc bellard
        case 'm':
1048 1ccde1cb bellard
            ram_size = atoi(optarg) * 1024 * 1024;
1049 1ccde1cb bellard
            if (ram_size <= 0)
1050 0824d6fc bellard
                help();
1051 1ccde1cb bellard
            if (ram_size > PHYS_RAM_MAX_SIZE) {
1052 36b486bb bellard
                fprintf(stderr, "qemu: at most %d MB RAM can be simulated\n",
1053 7916e224 bellard
                        PHYS_RAM_MAX_SIZE / (1024 * 1024));
1054 7916e224 bellard
                exit(1);
1055 7916e224 bellard
            }
1056 0824d6fc bellard
            break;
1057 0824d6fc bellard
        case 'd':
1058 34865134 bellard
            cpu_set_log(CPU_LOG_ALL);
1059 0824d6fc bellard
            break;
1060 c45886db bellard
#if defined (TARGET_I386)
1061 f1510b2c bellard
        case 'n':
1062 f1510b2c bellard
            pstrcpy(network_script, sizeof(network_script), optarg);
1063 f1510b2c bellard
            break;
1064 c45886db bellard
#endif
1065 b4608c04 bellard
        case 's':
1066 b4608c04 bellard
            use_gdbstub = 1;
1067 b4608c04 bellard
            break;
1068 b4608c04 bellard
        case 'p':
1069 b4608c04 bellard
            gdbstub_port = atoi(optarg);
1070 b4608c04 bellard
            break;
1071 330d0414 bellard
        case 'L':
1072 5a67135a bellard
            bios_dir = optarg;
1073 330d0414 bellard
            break;
1074 0824d6fc bellard
        }
1075 0824d6fc bellard
    }
1076 330d0414 bellard
1077 a20dd508 bellard
    if (optind < argc) {
1078 a20dd508 bellard
        hd_filename[0] = argv[optind++];
1079 a20dd508 bellard
    }
1080 a20dd508 bellard
1081 a20dd508 bellard
    linux_boot = (kernel_filename != NULL);
1082 330d0414 bellard
        
1083 c45886db bellard
    if (!linux_boot && hd_filename[0] == '\0' && hd_filename[2] == '\0' &&
1084 c45886db bellard
        fd_filename[0] == '\0')
1085 0824d6fc bellard
        help();
1086 8f2b1fb0 bellard
    
1087 8f2b1fb0 bellard
    /* boot to cd by default if no hard disk */
1088 d0309311 bellard
    if (hd_filename[0] == '\0' && boot_device == 'c') {
1089 d0309311 bellard
        if (fd_filename[0] != '\0')
1090 d0309311 bellard
            boot_device = 'a';
1091 d0309311 bellard
        else
1092 d0309311 bellard
            boot_device = 'd';
1093 d0309311 bellard
    }
1094 0824d6fc bellard
1095 dc887a4d bellard
#if !defined(CONFIG_SOFTMMU)
1096 dc887a4d bellard
    /* must avoid mmap() usage of glibc by setting a buffer "by hand" */
1097 dc887a4d bellard
    {
1098 dc887a4d bellard
        static uint8_t stdout_buf[4096];
1099 dc887a4d bellard
        setvbuf(stdout, stdout_buf, _IOLBF, sizeof(stdout_buf));
1100 dc887a4d bellard
    }
1101 dc887a4d bellard
#else
1102 b118d61e bellard
    setvbuf(stdout, NULL, _IOLBF, 0);
1103 dc887a4d bellard
#endif
1104 0824d6fc bellard
1105 f1510b2c bellard
    /* init network tun interface */
1106 c45886db bellard
#if defined (TARGET_I386)
1107 42f1e0e4 bellard
    if (net_fd < 0)
1108 42f1e0e4 bellard
        net_init();
1109 c45886db bellard
#endif
1110 f1510b2c bellard
1111 0824d6fc bellard
    /* init the memory */
1112 1ccde1cb bellard
    phys_ram_size = ram_size + vga_ram_size;
1113 7f7f9873 bellard
1114 7f7f9873 bellard
#ifdef CONFIG_SOFTMMU
1115 1ccde1cb bellard
    phys_ram_base = memalign(TARGET_PAGE_SIZE, phys_ram_size);
1116 7f7f9873 bellard
    if (!phys_ram_base) {
1117 7f7f9873 bellard
        fprintf(stderr, "Could not allocate physical memory\n");
1118 0824d6fc bellard
        exit(1);
1119 0824d6fc bellard
    }
1120 7f7f9873 bellard
#else
1121 7f7f9873 bellard
    /* as we must map the same page at several addresses, we must use
1122 7f7f9873 bellard
       a fd */
1123 7f7f9873 bellard
    {
1124 7f7f9873 bellard
        const char *tmpdir;
1125 7f7f9873 bellard
1126 7f7f9873 bellard
        tmpdir = getenv("QEMU_TMPDIR");
1127 7f7f9873 bellard
        if (!tmpdir)
1128 7f7f9873 bellard
            tmpdir = "/tmp";
1129 7f7f9873 bellard
        snprintf(phys_ram_file, sizeof(phys_ram_file), "%s/vlXXXXXX", tmpdir);
1130 7f7f9873 bellard
        if (mkstemp(phys_ram_file) < 0) {
1131 7f7f9873 bellard
            fprintf(stderr, "Could not create temporary memory file '%s'\n", 
1132 7f7f9873 bellard
                    phys_ram_file);
1133 7f7f9873 bellard
            exit(1);
1134 7f7f9873 bellard
        }
1135 7f7f9873 bellard
        phys_ram_fd = open(phys_ram_file, O_CREAT | O_TRUNC | O_RDWR, 0600);
1136 7f7f9873 bellard
        if (phys_ram_fd < 0) {
1137 7f7f9873 bellard
            fprintf(stderr, "Could not open temporary memory file '%s'\n", 
1138 7f7f9873 bellard
                    phys_ram_file);
1139 7f7f9873 bellard
            exit(1);
1140 7f7f9873 bellard
        }
1141 1ccde1cb bellard
        ftruncate(phys_ram_fd, phys_ram_size);
1142 7f7f9873 bellard
        unlink(phys_ram_file);
1143 1ccde1cb bellard
        phys_ram_base = mmap(get_mmap_addr(phys_ram_size), 
1144 1ccde1cb bellard
                             phys_ram_size, 
1145 7f7f9873 bellard
                             PROT_WRITE | PROT_READ, MAP_SHARED | MAP_FIXED, 
1146 7f7f9873 bellard
                             phys_ram_fd, 0);
1147 7f7f9873 bellard
        if (phys_ram_base == MAP_FAILED) {
1148 7f7f9873 bellard
            fprintf(stderr, "Could not map physical memory\n");
1149 7f7f9873 bellard
            exit(1);
1150 7f7f9873 bellard
        }
1151 7f7f9873 bellard
    }
1152 7f7f9873 bellard
#endif
1153 0824d6fc bellard
1154 33e3963e bellard
    /* open the virtual block devices */
1155 33e3963e bellard
    for(i = 0; i < MAX_DISKS; i++) {
1156 33e3963e bellard
        if (hd_filename[i]) {
1157 33e3963e bellard
            bs_table[i] = bdrv_open(hd_filename[i], snapshot);
1158 33e3963e bellard
            if (!bs_table[i]) {
1159 36b486bb bellard
                fprintf(stderr, "qemu: could not open hard disk image '%s\n",
1160 33e3963e bellard
                        hd_filename[i]);
1161 33e3963e bellard
                exit(1);
1162 33e3963e bellard
            }
1163 33e3963e bellard
        }
1164 33e3963e bellard
    }
1165 33e3963e bellard
1166 330d0414 bellard
    /* init CPU state */
1167 330d0414 bellard
    env = cpu_init();
1168 330d0414 bellard
    global_env = env;
1169 330d0414 bellard
    cpu_single_env = env;
1170 330d0414 bellard
1171 330d0414 bellard
    init_ioports();
1172 80cabfad bellard
    cpu_calibrate_ticks();
1173 0824d6fc bellard
1174 313aa567 bellard
    /* terminal init */
1175 a20dd508 bellard
    if (nographic) {
1176 313aa567 bellard
        dumb_display_init(ds);
1177 313aa567 bellard
    } else {
1178 313aa567 bellard
#ifdef CONFIG_SDL
1179 313aa567 bellard
        sdl_display_init(ds);
1180 313aa567 bellard
#else
1181 313aa567 bellard
        dumb_display_init(ds);
1182 313aa567 bellard
#endif
1183 313aa567 bellard
    }
1184 0824d6fc bellard
1185 80cabfad bellard
#if defined(TARGET_I386)
1186 80cabfad bellard
    pc_init(ram_size, vga_ram_size, boot_device,
1187 80cabfad bellard
            ds, fd_filename, snapshot,
1188 80cabfad bellard
            kernel_filename, kernel_cmdline, initrd_filename);
1189 80cabfad bellard
#elif defined(TARGET_PPC)
1190 80cabfad bellard
    ppc_init();
1191 c45886db bellard
#endif
1192 77fef8c1 bellard
1193 0824d6fc bellard
    /* setup cpu signal handlers for MMU / self modifying code handling */
1194 77fef8c1 bellard
#if !defined(CONFIG_SOFTMMU)
1195 77fef8c1 bellard
1196 77fef8c1 bellard
#if defined (TARGET_I386) && defined(USE_CODE_COPY)
1197 77fef8c1 bellard
    {
1198 77fef8c1 bellard
        stack_t stk;
1199 77fef8c1 bellard
        signal_stack = malloc(SIGNAL_STACK_SIZE);
1200 77fef8c1 bellard
        stk.ss_sp = signal_stack;
1201 77fef8c1 bellard
        stk.ss_size = SIGNAL_STACK_SIZE;
1202 77fef8c1 bellard
        stk.ss_flags = 0;
1203 77fef8c1 bellard
1204 77fef8c1 bellard
        if (sigaltstack(&stk, NULL) < 0) {
1205 77fef8c1 bellard
            perror("sigaltstack");
1206 77fef8c1 bellard
            exit(1);
1207 77fef8c1 bellard
        }
1208 77fef8c1 bellard
    }
1209 77fef8c1 bellard
#endif
1210 77fef8c1 bellard
        
1211 0824d6fc bellard
    sigfillset(&act.sa_mask);
1212 0824d6fc bellard
    act.sa_flags = SA_SIGINFO;
1213 77fef8c1 bellard
#if defined (TARGET_I386) && defined(USE_CODE_COPY)
1214 77fef8c1 bellard
    act.sa_flags |= SA_ONSTACK;
1215 77fef8c1 bellard
#endif
1216 0824d6fc bellard
    act.sa_sigaction = host_segv_handler;
1217 0824d6fc bellard
    sigaction(SIGSEGV, &act, NULL);
1218 0824d6fc bellard
    sigaction(SIGBUS, &act, NULL);
1219 77fef8c1 bellard
#if defined (TARGET_I386) && defined(USE_CODE_COPY)
1220 77fef8c1 bellard
    sigaction(SIGFPE, &act, NULL);
1221 77fef8c1 bellard
#endif
1222 3a51dee6 bellard
#endif
1223 0824d6fc bellard
1224 77fef8c1 bellard
    /* timer signal */
1225 77fef8c1 bellard
    sigfillset(&act.sa_mask);
1226 77fef8c1 bellard
    act.sa_flags = SA_SIGINFO;
1227 77fef8c1 bellard
#if defined (TARGET_I386) && defined(USE_CODE_COPY)
1228 77fef8c1 bellard
    act.sa_flags |= SA_ONSTACK;
1229 77fef8c1 bellard
#endif
1230 0824d6fc bellard
    act.sa_sigaction = host_alarm_handler;
1231 0824d6fc bellard
    sigaction(SIGALRM, &act, NULL);
1232 0824d6fc bellard
1233 0824d6fc bellard
    itv.it_interval.tv_sec = 0;
1234 87858c89 bellard
    itv.it_interval.tv_usec = 1000;
1235 0824d6fc bellard
    itv.it_value.tv_sec = 0;
1236 0824d6fc bellard
    itv.it_value.tv_usec = 10 * 1000;
1237 0824d6fc bellard
    setitimer(ITIMER_REAL, &itv, NULL);
1238 87858c89 bellard
    /* we probe the tick duration of the kernel to inform the user if
1239 87858c89 bellard
       the emulated kernel requested a too high timer frequency */
1240 87858c89 bellard
    getitimer(ITIMER_REAL, &itv);
1241 313aa567 bellard
    timer_ms = itv.it_interval.tv_usec / 1000;
1242 87858c89 bellard
    pit_min_timer_count = ((uint64_t)itv.it_interval.tv_usec * PIT_FREQ) / 
1243 87858c89 bellard
        1000000;
1244 7f7f9873 bellard
1245 b4608c04 bellard
    if (use_gdbstub) {
1246 b4608c04 bellard
        cpu_gdbstub(NULL, main_loop, gdbstub_port);
1247 b4608c04 bellard
    } else {
1248 b4608c04 bellard
        main_loop(NULL);
1249 0824d6fc bellard
    }
1250 0824d6fc bellard
    return 0;
1251 0824d6fc bellard
}