]>
Commit | Line | Data |
---|---|---|
1 | /* | |
2 | * QEMU monitor | |
3 | * | |
4 | * Copyright (c) 2003-2004 Fabrice Bellard | |
5 | * | |
6 | * Permission is hereby granted, free of charge, to any person obtaining a copy | |
7 | * of this software and associated documentation files (the "Software"), to deal | |
8 | * in the Software without restriction, including without limitation the rights | |
9 | * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell | |
10 | * copies of the Software, and to permit persons to whom the Software is | |
11 | * furnished to do so, subject to the following conditions: | |
12 | * | |
13 | * The above copyright notice and this permission notice shall be included in | |
14 | * all copies or substantial portions of the Software. | |
15 | * | |
16 | * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR | |
17 | * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, | |
18 | * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL | |
19 | * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER | |
20 | * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, | |
21 | * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN | |
22 | * THE SOFTWARE. | |
23 | */ | |
24 | #include "vl.h" | |
25 | #include "disas.h" | |
26 | ||
27 | //#define DEBUG | |
28 | ||
29 | #ifndef offsetof | |
30 | #define offsetof(type, field) ((size_t) &((type *)0)->field) | |
31 | #endif | |
32 | ||
33 | #define TERM_CMD_BUF_SIZE 4095 | |
34 | #define TERM_MAX_CMDS 64 | |
35 | ||
36 | #define IS_NORM 0 | |
37 | #define IS_ESC 1 | |
38 | #define IS_CSI 2 | |
39 | ||
40 | #define printf do_not_use_printf | |
41 | ||
42 | static char term_cmd_buf[TERM_CMD_BUF_SIZE + 1]; | |
43 | static int term_cmd_buf_index; | |
44 | static int term_cmd_buf_size; | |
45 | static int term_esc_state; | |
46 | static int term_esc_param; | |
47 | ||
48 | static char *term_history[TERM_MAX_CMDS]; | |
49 | static int term_hist_entry; | |
50 | ||
51 | /* | |
52 | * Supported types: | |
53 | * | |
54 | * 'F' filename | |
55 | * 's' string (accept optional quote) | |
56 | * 'i' integer | |
57 | * '/' optional gdb-like print format (like "/10x") | |
58 | * | |
59 | * '?' optional type (for 'F', 's' and 'i') | |
60 | * | |
61 | */ | |
62 | ||
63 | typedef struct term_cmd_t { | |
64 | const char *name; | |
65 | const char *args_type; | |
66 | void (*handler)(); | |
67 | const char *params; | |
68 | const char *help; | |
69 | } term_cmd_t; | |
70 | ||
71 | static term_cmd_t term_cmds[]; | |
72 | static term_cmd_t info_cmds[]; | |
73 | ||
74 | void term_printf(const char *fmt, ...) | |
75 | { | |
76 | va_list ap; | |
77 | va_start(ap, fmt); | |
78 | vprintf(fmt, ap); | |
79 | va_end(ap); | |
80 | } | |
81 | ||
82 | void term_flush(void) | |
83 | { | |
84 | fflush(stdout); | |
85 | } | |
86 | ||
87 | static int compare_cmd(const char *name, const char *list) | |
88 | { | |
89 | const char *p, *pstart; | |
90 | int len; | |
91 | len = strlen(name); | |
92 | p = list; | |
93 | for(;;) { | |
94 | pstart = p; | |
95 | p = strchr(p, '|'); | |
96 | if (!p) | |
97 | p = pstart + strlen(pstart); | |
98 | if ((p - pstart) == len && !memcmp(pstart, name, len)) | |
99 | return 1; | |
100 | if (*p == '\0') | |
101 | break; | |
102 | p++; | |
103 | } | |
104 | return 0; | |
105 | } | |
106 | ||
107 | static void help_cmd1(term_cmd_t *cmds, const char *prefix, const char *name) | |
108 | { | |
109 | term_cmd_t *cmd; | |
110 | ||
111 | for(cmd = cmds; cmd->name != NULL; cmd++) { | |
112 | if (!name || !strcmp(name, cmd->name)) | |
113 | term_printf("%s%s %s -- %s\n", prefix, cmd->name, cmd->params, cmd->help); | |
114 | } | |
115 | } | |
116 | ||
117 | static void help_cmd(const char *name) | |
118 | { | |
119 | if (name && !strcmp(name, "info")) { | |
120 | help_cmd1(info_cmds, "info ", NULL); | |
121 | } else { | |
122 | help_cmd1(term_cmds, "", name); | |
123 | if (name && !strcmp(name, "log")) { | |
124 | CPULogItem *item; | |
125 | term_printf("Log items (comma separated):\n"); | |
126 | term_printf("%-10s %s\n", "none", "remove all logs"); | |
127 | for(item = cpu_log_items; item->mask != 0; item++) { | |
128 | term_printf("%-10s %s\n", item->name, item->help); | |
129 | } | |
130 | } | |
131 | } | |
132 | } | |
133 | ||
134 | static void do_help(const char *name) | |
135 | { | |
136 | help_cmd(name); | |
137 | } | |
138 | ||
139 | static void do_commit(void) | |
140 | { | |
141 | int i; | |
142 | ||
143 | for (i = 0; i < MAX_DISKS; i++) { | |
144 | if (bs_table[i]) | |
145 | bdrv_commit(bs_table[i]); | |
146 | } | |
147 | } | |
148 | ||
149 | static void do_info(const char *item) | |
150 | { | |
151 | term_cmd_t *cmd; | |
152 | ||
153 | if (!item) | |
154 | goto help; | |
155 | for(cmd = info_cmds; cmd->name != NULL; cmd++) { | |
156 | if (compare_cmd(item, cmd->name)) | |
157 | goto found; | |
158 | } | |
159 | help: | |
160 | help_cmd("info"); | |
161 | return; | |
162 | found: | |
163 | cmd->handler(); | |
164 | } | |
165 | ||
166 | static void do_info_network(void) | |
167 | { | |
168 | int i, j; | |
169 | NetDriverState *nd; | |
170 | ||
171 | for(i = 0; i < nb_nics; i++) { | |
172 | nd = &nd_table[i]; | |
173 | term_printf("%d: ifname=%s macaddr=", i, nd->ifname); | |
174 | for(j = 0; j < 6; j++) { | |
175 | if (j > 0) | |
176 | term_printf(":"); | |
177 | term_printf("%02x", nd->macaddr[j]); | |
178 | } | |
179 | term_printf("\n"); | |
180 | } | |
181 | } | |
182 | ||
183 | static void do_info_block(void) | |
184 | { | |
185 | bdrv_info(); | |
186 | } | |
187 | ||
188 | static void do_info_registers(void) | |
189 | { | |
190 | #ifdef TARGET_I386 | |
191 | cpu_dump_state(cpu_single_env, stdout, X86_DUMP_FPU | X86_DUMP_CCOP); | |
192 | #else | |
193 | cpu_dump_state(cpu_single_env, stdout, 0); | |
194 | #endif | |
195 | } | |
196 | ||
197 | static void do_info_history (void) | |
198 | { | |
199 | int i; | |
200 | ||
201 | for (i = 0; i < TERM_MAX_CMDS; i++) { | |
202 | if (term_history[i] == NULL) | |
203 | break; | |
204 | term_printf("%d: '%s'\n", i, term_history[i]); | |
205 | } | |
206 | } | |
207 | ||
208 | static void do_quit(void) | |
209 | { | |
210 | exit(0); | |
211 | } | |
212 | ||
213 | static int eject_device(BlockDriverState *bs, int force) | |
214 | { | |
215 | if (bdrv_is_inserted(bs)) { | |
216 | if (!force) { | |
217 | if (!bdrv_is_removable(bs)) { | |
218 | term_printf("device is not removable\n"); | |
219 | return -1; | |
220 | } | |
221 | if (bdrv_is_locked(bs)) { | |
222 | term_printf("device is locked\n"); | |
223 | return -1; | |
224 | } | |
225 | } | |
226 | bdrv_close(bs); | |
227 | } | |
228 | return 0; | |
229 | } | |
230 | ||
231 | static void do_eject(int force, const char *filename) | |
232 | { | |
233 | BlockDriverState *bs; | |
234 | ||
235 | term_printf("%d %s\n", force, filename); | |
236 | ||
237 | bs = bdrv_find(filename); | |
238 | if (!bs) { | |
239 | term_printf("device not found\n"); | |
240 | return; | |
241 | } | |
242 | eject_device(bs, force); | |
243 | } | |
244 | ||
245 | static void do_change(const char *device, const char *filename) | |
246 | { | |
247 | BlockDriverState *bs; | |
248 | ||
249 | bs = bdrv_find(device); | |
250 | if (!bs) { | |
251 | term_printf("device not found\n"); | |
252 | return; | |
253 | } | |
254 | if (eject_device(bs, 0) < 0) | |
255 | return; | |
256 | bdrv_open(bs, filename, 0); | |
257 | } | |
258 | ||
259 | static void do_screen_dump(const char *filename) | |
260 | { | |
261 | vga_screen_dump(filename); | |
262 | } | |
263 | ||
264 | static void do_log(const char *items) | |
265 | { | |
266 | int mask; | |
267 | ||
268 | if (!strcmp(items, "none")) { | |
269 | mask = 0; | |
270 | } else { | |
271 | mask = cpu_str_to_log_mask(items); | |
272 | if (!mask) { | |
273 | help_cmd("log"); | |
274 | return; | |
275 | } | |
276 | } | |
277 | cpu_set_log(mask); | |
278 | } | |
279 | ||
280 | static void do_savevm(const char *filename) | |
281 | { | |
282 | if (qemu_savevm(filename) < 0) | |
283 | term_printf("I/O error when saving VM to '%s'\n", filename); | |
284 | } | |
285 | ||
286 | static void do_loadvm(const char *filename) | |
287 | { | |
288 | if (qemu_loadvm(filename) < 0) | |
289 | term_printf("I/O error when loading VM from '%s'\n", filename); | |
290 | } | |
291 | ||
292 | static void do_stop(void) | |
293 | { | |
294 | vm_stop(EXCP_INTERRUPT); | |
295 | } | |
296 | ||
297 | static void do_cont(void) | |
298 | { | |
299 | vm_start(); | |
300 | } | |
301 | ||
302 | #ifdef CONFIG_GDBSTUB | |
303 | static void do_gdbserver(int has_port, int port) | |
304 | { | |
305 | if (!has_port) | |
306 | port = DEFAULT_GDBSTUB_PORT; | |
307 | if (gdbserver_start(port) < 0) { | |
308 | qemu_printf("Could not open gdbserver socket on port %d\n", port); | |
309 | } else { | |
310 | qemu_printf("Waiting gdb connection on port %d\n", port); | |
311 | } | |
312 | } | |
313 | #endif | |
314 | ||
315 | static void term_printc(int c) | |
316 | { | |
317 | term_printf("'"); | |
318 | switch(c) { | |
319 | case '\'': | |
320 | term_printf("\\'"); | |
321 | break; | |
322 | case '\\': | |
323 | term_printf("\\\\"); | |
324 | break; | |
325 | case '\n': | |
326 | term_printf("\\n"); | |
327 | break; | |
328 | case '\r': | |
329 | term_printf("\\r"); | |
330 | break; | |
331 | default: | |
332 | if (c >= 32 && c <= 126) { | |
333 | term_printf("%c", c); | |
334 | } else { | |
335 | term_printf("\\x%02x", c); | |
336 | } | |
337 | break; | |
338 | } | |
339 | term_printf("'"); | |
340 | } | |
341 | ||
342 | static void memory_dump(int count, int format, int wsize, | |
343 | target_ulong addr, int is_physical) | |
344 | { | |
345 | int nb_per_line, l, line_size, i, max_digits, len; | |
346 | uint8_t buf[16]; | |
347 | uint64_t v; | |
348 | ||
349 | if (format == 'i') { | |
350 | int flags; | |
351 | flags = 0; | |
352 | #ifdef TARGET_I386 | |
353 | if (wsize == 2) { | |
354 | flags = 1; | |
355 | } else if (wsize == 4) { | |
356 | flags = 0; | |
357 | } else { | |
358 | /* as default we use the current CS size */ | |
359 | flags = 0; | |
360 | if (!(cpu_single_env->segs[R_CS].flags & DESC_B_MASK)) | |
361 | flags = 1; | |
362 | } | |
363 | #endif | |
364 | monitor_disas(addr, count, is_physical, flags); | |
365 | return; | |
366 | } | |
367 | ||
368 | len = wsize * count; | |
369 | if (wsize == 1) | |
370 | line_size = 8; | |
371 | else | |
372 | line_size = 16; | |
373 | nb_per_line = line_size / wsize; | |
374 | max_digits = 0; | |
375 | ||
376 | switch(format) { | |
377 | case 'o': | |
378 | max_digits = (wsize * 8 + 2) / 3; | |
379 | break; | |
380 | default: | |
381 | case 'x': | |
382 | max_digits = (wsize * 8) / 4; | |
383 | break; | |
384 | case 'u': | |
385 | case 'd': | |
386 | max_digits = (wsize * 8 * 10 + 32) / 33; | |
387 | break; | |
388 | case 'c': | |
389 | wsize = 1; | |
390 | break; | |
391 | } | |
392 | ||
393 | while (len > 0) { | |
394 | term_printf("0x%08x:", addr); | |
395 | l = len; | |
396 | if (l > line_size) | |
397 | l = line_size; | |
398 | if (is_physical) { | |
399 | cpu_physical_memory_rw(addr, buf, l, 0); | |
400 | } else { | |
401 | cpu_memory_rw_debug(cpu_single_env, addr, buf, l, 0); | |
402 | } | |
403 | i = 0; | |
404 | while (i < l) { | |
405 | switch(wsize) { | |
406 | default: | |
407 | case 1: | |
408 | v = ldub_raw(buf + i); | |
409 | break; | |
410 | case 2: | |
411 | v = lduw_raw(buf + i); | |
412 | break; | |
413 | case 4: | |
414 | v = ldl_raw(buf + i); | |
415 | break; | |
416 | case 8: | |
417 | v = ldq_raw(buf + i); | |
418 | break; | |
419 | } | |
420 | term_printf(" "); | |
421 | switch(format) { | |
422 | case 'o': | |
423 | term_printf("%#*llo", max_digits, v); | |
424 | break; | |
425 | case 'x': | |
426 | term_printf("0x%0*llx", max_digits, v); | |
427 | break; | |
428 | case 'u': | |
429 | term_printf("%*llu", max_digits, v); | |
430 | break; | |
431 | case 'd': | |
432 | term_printf("%*lld", max_digits, v); | |
433 | break; | |
434 | case 'c': | |
435 | term_printc(v); | |
436 | break; | |
437 | } | |
438 | i += wsize; | |
439 | } | |
440 | term_printf("\n"); | |
441 | addr += l; | |
442 | len -= l; | |
443 | } | |
444 | } | |
445 | ||
446 | static void do_memory_dump(int count, int format, int size, int addr) | |
447 | { | |
448 | memory_dump(count, format, size, addr, 0); | |
449 | } | |
450 | ||
451 | static void do_physical_memory_dump(int count, int format, int size, int addr) | |
452 | { | |
453 | memory_dump(count, format, size, addr, 1); | |
454 | } | |
455 | ||
456 | static void do_print(int count, int format, int size, int val) | |
457 | { | |
458 | switch(format) { | |
459 | case 'o': | |
460 | term_printf("%#o", val); | |
461 | break; | |
462 | case 'x': | |
463 | term_printf("%#x", val); | |
464 | break; | |
465 | case 'u': | |
466 | term_printf("%u", val); | |
467 | break; | |
468 | default: | |
469 | case 'd': | |
470 | term_printf("%d", val); | |
471 | break; | |
472 | case 'c': | |
473 | term_printc(val); | |
474 | break; | |
475 | } | |
476 | term_printf("\n"); | |
477 | } | |
478 | ||
479 | typedef struct { | |
480 | int keycode; | |
481 | const char *name; | |
482 | } KeyDef; | |
483 | ||
484 | static const KeyDef key_defs[] = { | |
485 | { 0x2a, "shift" }, | |
486 | { 0x36, "shift_r" }, | |
487 | ||
488 | { 0x38, "alt" }, | |
489 | { 0xb8, "alt_r" }, | |
490 | { 0x1d, "ctrl" }, | |
491 | { 0x9d, "ctrl_r" }, | |
492 | ||
493 | { 0xdd, "menu" }, | |
494 | ||
495 | { 0x01, "esc" }, | |
496 | ||
497 | { 0x02, "1" }, | |
498 | { 0x03, "2" }, | |
499 | { 0x04, "3" }, | |
500 | { 0x05, "4" }, | |
501 | { 0x06, "5" }, | |
502 | { 0x07, "6" }, | |
503 | { 0x08, "7" }, | |
504 | { 0x09, "8" }, | |
505 | { 0x0a, "9" }, | |
506 | { 0x0b, "0" }, | |
507 | { 0x0e, "backspace" }, | |
508 | ||
509 | { 0x0f, "tab" }, | |
510 | { 0x10, "q" }, | |
511 | { 0x11, "w" }, | |
512 | { 0x12, "e" }, | |
513 | { 0x13, "r" }, | |
514 | { 0x14, "t" }, | |
515 | { 0x15, "y" }, | |
516 | { 0x16, "u" }, | |
517 | { 0x17, "i" }, | |
518 | { 0x18, "o" }, | |
519 | { 0x19, "p" }, | |
520 | ||
521 | { 0x1c, "ret" }, | |
522 | ||
523 | { 0x1e, "a" }, | |
524 | { 0x1f, "s" }, | |
525 | { 0x20, "d" }, | |
526 | { 0x21, "f" }, | |
527 | { 0x22, "g" }, | |
528 | { 0x23, "h" }, | |
529 | { 0x24, "j" }, | |
530 | { 0x25, "k" }, | |
531 | { 0x26, "l" }, | |
532 | ||
533 | { 0x2c, "z" }, | |
534 | { 0x2d, "x" }, | |
535 | { 0x2e, "c" }, | |
536 | { 0x2f, "v" }, | |
537 | { 0x30, "b" }, | |
538 | { 0x31, "n" }, | |
539 | { 0x32, "m" }, | |
540 | ||
541 | { 0x39, "spc" }, | |
542 | { 0x3a, "caps_lock" }, | |
543 | { 0x3b, "f1" }, | |
544 | { 0x3c, "f2" }, | |
545 | { 0x3d, "f3" }, | |
546 | { 0x3e, "f4" }, | |
547 | { 0x3f, "f5" }, | |
548 | { 0x40, "f6" }, | |
549 | { 0x41, "f7" }, | |
550 | { 0x42, "f8" }, | |
551 | { 0x43, "f9" }, | |
552 | { 0x44, "f10" }, | |
553 | { 0x45, "num_lock" }, | |
554 | { 0x46, "scroll_lock" }, | |
555 | ||
556 | { 0x56, "<" }, | |
557 | ||
558 | { 0x57, "f11" }, | |
559 | { 0x58, "f12" }, | |
560 | ||
561 | { 0xb7, "print" }, | |
562 | ||
563 | { 0xc7, "home" }, | |
564 | { 0xc9, "pgup" }, | |
565 | { 0xd1, "pgdn" }, | |
566 | { 0xcf, "end" }, | |
567 | ||
568 | { 0xcb, "left" }, | |
569 | { 0xc8, "up" }, | |
570 | { 0xd0, "down" }, | |
571 | { 0xcd, "right" }, | |
572 | ||
573 | { 0xd2, "insert" }, | |
574 | { 0xd3, "delete" }, | |
575 | { 0, NULL }, | |
576 | }; | |
577 | ||
578 | static int get_keycode(const char *key) | |
579 | { | |
580 | const KeyDef *p; | |
581 | ||
582 | for(p = key_defs; p->name != NULL; p++) { | |
583 | if (!strcmp(key, p->name)) | |
584 | return p->keycode; | |
585 | } | |
586 | return -1; | |
587 | } | |
588 | ||
589 | static void do_send_key(const char *string) | |
590 | { | |
591 | char keybuf[16], *q; | |
592 | uint8_t keycodes[16]; | |
593 | const char *p; | |
594 | int nb_keycodes, keycode, i; | |
595 | ||
596 | nb_keycodes = 0; | |
597 | p = string; | |
598 | while (*p != '\0') { | |
599 | q = keybuf; | |
600 | while (*p != '\0' && *p != '-') { | |
601 | if ((q - keybuf) < sizeof(keybuf) - 1) { | |
602 | *q++ = *p; | |
603 | } | |
604 | p++; | |
605 | } | |
606 | *q = '\0'; | |
607 | keycode = get_keycode(keybuf); | |
608 | if (keycode < 0) { | |
609 | term_printf("unknown key: '%s'\n", keybuf); | |
610 | return; | |
611 | } | |
612 | keycodes[nb_keycodes++] = keycode; | |
613 | if (*p == '\0') | |
614 | break; | |
615 | p++; | |
616 | } | |
617 | /* key down events */ | |
618 | for(i = 0; i < nb_keycodes; i++) { | |
619 | keycode = keycodes[i]; | |
620 | if (keycode & 0x80) | |
621 | kbd_put_keycode(0xe0); | |
622 | kbd_put_keycode(keycode & 0x7f); | |
623 | } | |
624 | /* key up events */ | |
625 | for(i = nb_keycodes - 1; i >= 0; i--) { | |
626 | keycode = keycodes[i]; | |
627 | if (keycode & 0x80) | |
628 | kbd_put_keycode(0xe0); | |
629 | kbd_put_keycode(keycode | 0x80); | |
630 | } | |
631 | } | |
632 | ||
633 | ||
634 | static term_cmd_t term_cmds[] = { | |
635 | { "help|?", "s?", do_help, | |
636 | "[cmd]", "show the help" }, | |
637 | { "commit", "", do_commit, | |
638 | "", "commit changes to the disk images (if -snapshot is used)" }, | |
639 | { "info", "s?", do_info, | |
640 | "subcommand", "show various information about the system state" }, | |
641 | { "q|quit", "", do_quit, | |
642 | "", "quit the emulator" }, | |
643 | { "eject", "-fs", do_eject, | |
644 | "[-f] device", "eject a removable media (use -f to force it)" }, | |
645 | { "change", "sF", do_change, | |
646 | "device filename", "change a removable media" }, | |
647 | { "screendump", "F", do_screen_dump, | |
648 | "filename", "save screen into PPM image 'filename'" }, | |
649 | { "log", "s", do_log, | |
650 | "item1[,...]", "activate logging of the specified items to '/tmp/qemu.log'" }, | |
651 | { "savevm", "F", do_savevm, | |
652 | "filename", "save the whole virtual machine state to 'filename'" }, | |
653 | { "loadvm", "F", do_loadvm, | |
654 | "filename", "restore the whole virtual machine state from 'filename'" }, | |
655 | { "stop", "", do_stop, | |
656 | "", "stop emulation", }, | |
657 | { "c|cont", "", do_cont, | |
658 | "", "resume emulation", }, | |
659 | #ifdef CONFIG_GDBSTUB | |
660 | { "gdbserver", "i?", do_gdbserver, | |
661 | "[port]", "start gdbserver session (default port=1234)", }, | |
662 | #endif | |
663 | { "x", "/i", do_memory_dump, | |
664 | "/fmt addr", "virtual memory dump starting at 'addr'", }, | |
665 | { "xp", "/i", do_physical_memory_dump, | |
666 | "/fmt addr", "physical memory dump starting at 'addr'", }, | |
667 | { "p|print", "/i", do_print, | |
668 | "/fmt expr", "print expression value (use $reg for CPU register access)", }, | |
669 | { "sendkey", "s", do_send_key, | |
670 | "keys", "send keys to the VM (e.g. 'sendkey ctrl-alt-f1')" }, | |
671 | { NULL, NULL, }, | |
672 | }; | |
673 | ||
674 | static term_cmd_t info_cmds[] = { | |
675 | { "network", "", do_info_network, | |
676 | "", "show the network state" }, | |
677 | { "block", "", do_info_block, | |
678 | "", "show the block devices" }, | |
679 | { "registers", "", do_info_registers, | |
680 | "", "show the cpu registers" }, | |
681 | { "history", "", do_info_history, | |
682 | "", "show the command line history", }, | |
683 | { "irq", "", irq_info, | |
684 | "", "show the interrupts statistics (if available)", }, | |
685 | { "pic", "", pic_info, | |
686 | "", "show i8259 (PIC) state", }, | |
687 | { "pci", "", pci_info, | |
688 | "", "show PCI info", }, | |
689 | { NULL, NULL, }, | |
690 | }; | |
691 | ||
692 | /*******************************************************************/ | |
693 | ||
694 | static const char *pch; | |
695 | static jmp_buf expr_env; | |
696 | ||
697 | typedef struct MonitorDef { | |
698 | const char *name; | |
699 | int offset; | |
700 | int (*get_value)(struct MonitorDef *md); | |
701 | } MonitorDef; | |
702 | ||
703 | #if defined(TARGET_I386) | |
704 | static int monitor_get_pc (struct MonitorDef *md) | |
705 | { | |
706 | return cpu_single_env->eip + (long)cpu_single_env->segs[R_CS].base; | |
707 | } | |
708 | #endif | |
709 | ||
710 | #if defined(TARGET_PPC) | |
711 | static int monitor_get_ccr (struct MonitorDef *md) | |
712 | { | |
713 | unsigned int u; | |
714 | int i; | |
715 | ||
716 | u = 0; | |
717 | for (i = 0; i < 8; i++) | |
718 | u |= cpu_single_env->crf[i] << (32 - (4 * i)); | |
719 | ||
720 | return u; | |
721 | } | |
722 | ||
723 | static int monitor_get_msr (struct MonitorDef *md) | |
724 | { | |
725 | return (cpu_single_env->msr[MSR_POW] << MSR_POW) | | |
726 | (cpu_single_env->msr[MSR_ILE] << MSR_ILE) | | |
727 | (cpu_single_env->msr[MSR_EE] << MSR_EE) | | |
728 | (cpu_single_env->msr[MSR_PR] << MSR_PR) | | |
729 | (cpu_single_env->msr[MSR_FP] << MSR_FP) | | |
730 | (cpu_single_env->msr[MSR_ME] << MSR_ME) | | |
731 | (cpu_single_env->msr[MSR_FE0] << MSR_FE0) | | |
732 | (cpu_single_env->msr[MSR_SE] << MSR_SE) | | |
733 | (cpu_single_env->msr[MSR_BE] << MSR_BE) | | |
734 | (cpu_single_env->msr[MSR_FE1] << MSR_FE1) | | |
735 | (cpu_single_env->msr[MSR_IP] << MSR_IP) | | |
736 | (cpu_single_env->msr[MSR_IR] << MSR_IR) | | |
737 | (cpu_single_env->msr[MSR_DR] << MSR_DR) | | |
738 | (cpu_single_env->msr[MSR_RI] << MSR_RI) | | |
739 | (cpu_single_env->msr[MSR_LE] << MSR_LE); | |
740 | } | |
741 | ||
742 | static int monitor_get_xer (struct MonitorDef *md) | |
743 | { | |
744 | return (cpu_single_env->xer[XER_SO] << XER_SO) | | |
745 | (cpu_single_env->xer[XER_OV] << XER_OV) | | |
746 | (cpu_single_env->xer[XER_CA] << XER_CA) | | |
747 | (cpu_single_env->xer[XER_BC] << XER_BC); | |
748 | } | |
749 | ||
750 | uint32_t cpu_ppc_load_decr (CPUState *env); | |
751 | static int monitor_get_decr (struct MonitorDef *md) | |
752 | { | |
753 | return cpu_ppc_load_decr(cpu_single_env); | |
754 | } | |
755 | ||
756 | uint32_t cpu_ppc_load_tbu (CPUState *env); | |
757 | static int monitor_get_tbu (struct MonitorDef *md) | |
758 | { | |
759 | return cpu_ppc_load_tbu(cpu_single_env); | |
760 | } | |
761 | ||
762 | uint32_t cpu_ppc_load_tbl (CPUState *env); | |
763 | static int monitor_get_tbl (struct MonitorDef *md) | |
764 | { | |
765 | return cpu_ppc_load_tbl(cpu_single_env); | |
766 | } | |
767 | #endif | |
768 | ||
769 | static MonitorDef monitor_defs[] = { | |
770 | #ifdef TARGET_I386 | |
771 | ||
772 | #define SEG(name, seg) \ | |
773 | { name, offsetof(CPUState, segs[seg].selector) },\ | |
774 | { name ".base", offsetof(CPUState, segs[seg].base) },\ | |
775 | { name ".limit", offsetof(CPUState, segs[seg].limit) }, | |
776 | ||
777 | { "eax", offsetof(CPUState, regs[0]) }, | |
778 | { "ecx", offsetof(CPUState, regs[1]) }, | |
779 | { "edx", offsetof(CPUState, regs[2]) }, | |
780 | { "ebx", offsetof(CPUState, regs[3]) }, | |
781 | { "esp|sp", offsetof(CPUState, regs[4]) }, | |
782 | { "ebp|fp", offsetof(CPUState, regs[5]) }, | |
783 | { "esi", offsetof(CPUState, regs[6]) }, | |
784 | { "esi", offsetof(CPUState, regs[7]) }, | |
785 | { "eflags", offsetof(CPUState, eflags) }, | |
786 | { "eip", offsetof(CPUState, eip) }, | |
787 | SEG("cs", R_CS) | |
788 | SEG("ds", R_DS) | |
789 | SEG("es", R_ES) | |
790 | SEG("fs", R_FS) | |
791 | SEG("gs", R_GS) | |
792 | { "pc", 0, monitor_get_pc, }, | |
793 | #elif defined(TARGET_PPC) | |
794 | { "r0", offsetof(CPUState, gpr[0]) }, | |
795 | { "r1", offsetof(CPUState, gpr[1]) }, | |
796 | { "r2", offsetof(CPUState, gpr[2]) }, | |
797 | { "r3", offsetof(CPUState, gpr[3]) }, | |
798 | { "r4", offsetof(CPUState, gpr[4]) }, | |
799 | { "r5", offsetof(CPUState, gpr[5]) }, | |
800 | { "r6", offsetof(CPUState, gpr[6]) }, | |
801 | { "r7", offsetof(CPUState, gpr[7]) }, | |
802 | { "r8", offsetof(CPUState, gpr[8]) }, | |
803 | { "r9", offsetof(CPUState, gpr[9]) }, | |
804 | { "r10", offsetof(CPUState, gpr[10]) }, | |
805 | { "r11", offsetof(CPUState, gpr[11]) }, | |
806 | { "r12", offsetof(CPUState, gpr[12]) }, | |
807 | { "r13", offsetof(CPUState, gpr[13]) }, | |
808 | { "r14", offsetof(CPUState, gpr[14]) }, | |
809 | { "r15", offsetof(CPUState, gpr[15]) }, | |
810 | { "r16", offsetof(CPUState, gpr[16]) }, | |
811 | { "r17", offsetof(CPUState, gpr[17]) }, | |
812 | { "r18", offsetof(CPUState, gpr[18]) }, | |
813 | { "r19", offsetof(CPUState, gpr[19]) }, | |
814 | { "r20", offsetof(CPUState, gpr[20]) }, | |
815 | { "r21", offsetof(CPUState, gpr[21]) }, | |
816 | { "r22", offsetof(CPUState, gpr[22]) }, | |
817 | { "r23", offsetof(CPUState, gpr[23]) }, | |
818 | { "r24", offsetof(CPUState, gpr[24]) }, | |
819 | { "r25", offsetof(CPUState, gpr[25]) }, | |
820 | { "r26", offsetof(CPUState, gpr[26]) }, | |
821 | { "r27", offsetof(CPUState, gpr[27]) }, | |
822 | { "r28", offsetof(CPUState, gpr[28]) }, | |
823 | { "r29", offsetof(CPUState, gpr[29]) }, | |
824 | { "r30", offsetof(CPUState, gpr[30]) }, | |
825 | { "r31", offsetof(CPUState, gpr[31]) }, | |
826 | { "nip|pc", offsetof(CPUState, nip) }, | |
827 | { "lr", offsetof(CPUState, lr) }, | |
828 | { "ctr", offsetof(CPUState, ctr) }, | |
829 | { "decr", 0, &monitor_get_decr, }, | |
830 | { "ccr", 0, &monitor_get_ccr, }, | |
831 | { "msr", 0, &monitor_get_msr, }, | |
832 | { "xer", 0, &monitor_get_xer, }, | |
833 | { "tbu", 0, &monitor_get_tbu, }, | |
834 | { "tbl", 0, &monitor_get_tbl, }, | |
835 | { "sdr1", offsetof(CPUState, sdr1) }, | |
836 | { "sr0", offsetof(CPUState, sr[0]) }, | |
837 | { "sr1", offsetof(CPUState, sr[1]) }, | |
838 | { "sr2", offsetof(CPUState, sr[2]) }, | |
839 | { "sr3", offsetof(CPUState, sr[3]) }, | |
840 | { "sr4", offsetof(CPUState, sr[4]) }, | |
841 | { "sr5", offsetof(CPUState, sr[5]) }, | |
842 | { "sr6", offsetof(CPUState, sr[6]) }, | |
843 | { "sr7", offsetof(CPUState, sr[7]) }, | |
844 | { "sr8", offsetof(CPUState, sr[8]) }, | |
845 | { "sr9", offsetof(CPUState, sr[9]) }, | |
846 | { "sr10", offsetof(CPUState, sr[10]) }, | |
847 | { "sr11", offsetof(CPUState, sr[11]) }, | |
848 | { "sr12", offsetof(CPUState, sr[12]) }, | |
849 | { "sr13", offsetof(CPUState, sr[13]) }, | |
850 | { "sr14", offsetof(CPUState, sr[14]) }, | |
851 | { "sr15", offsetof(CPUState, sr[15]) }, | |
852 | /* Too lazy to put BATs and SPRs ... */ | |
853 | #endif | |
854 | { NULL }, | |
855 | }; | |
856 | ||
857 | static void expr_error(const char *fmt) | |
858 | { | |
859 | term_printf(fmt); | |
860 | term_printf("\n"); | |
861 | longjmp(expr_env, 1); | |
862 | } | |
863 | ||
864 | static int get_monitor_def(int *pval, const char *name) | |
865 | { | |
866 | MonitorDef *md; | |
867 | for(md = monitor_defs; md->name != NULL; md++) { | |
868 | if (compare_cmd(name, md->name)) { | |
869 | if (md->get_value) { | |
870 | *pval = md->get_value(md); | |
871 | } else { | |
872 | *pval = *(uint32_t *)((uint8_t *)cpu_single_env + md->offset); | |
873 | } | |
874 | return 0; | |
875 | } | |
876 | } | |
877 | return -1; | |
878 | } | |
879 | ||
880 | static void next(void) | |
881 | { | |
882 | if (pch != '\0') { | |
883 | pch++; | |
884 | while (isspace(*pch)) | |
885 | pch++; | |
886 | } | |
887 | } | |
888 | ||
889 | static int expr_sum(void); | |
890 | ||
891 | static int expr_unary(void) | |
892 | { | |
893 | int n; | |
894 | char *p; | |
895 | ||
896 | switch(*pch) { | |
897 | case '+': | |
898 | next(); | |
899 | n = expr_unary(); | |
900 | break; | |
901 | case '-': | |
902 | next(); | |
903 | n = -expr_unary(); | |
904 | break; | |
905 | case '~': | |
906 | next(); | |
907 | n = ~expr_unary(); | |
908 | break; | |
909 | case '(': | |
910 | next(); | |
911 | n = expr_sum(); | |
912 | if (*pch != ')') { | |
913 | expr_error("')' expected"); | |
914 | } | |
915 | next(); | |
916 | break; | |
917 | case '$': | |
918 | { | |
919 | char buf[128], *q; | |
920 | ||
921 | pch++; | |
922 | q = buf; | |
923 | while ((*pch >= 'a' && *pch <= 'z') || | |
924 | (*pch >= 'A' && *pch <= 'Z') || | |
925 | (*pch >= '0' && *pch <= '9') || | |
926 | *pch == '_' || *pch == '.') { | |
927 | if ((q - buf) < sizeof(buf) - 1) | |
928 | *q++ = *pch; | |
929 | pch++; | |
930 | } | |
931 | while (isspace(*pch)) | |
932 | pch++; | |
933 | *q = 0; | |
934 | if (get_monitor_def(&n, buf)) | |
935 | expr_error("unknown register"); | |
936 | } | |
937 | break; | |
938 | case '\0': | |
939 | expr_error("unexpected end of expression"); | |
940 | n = 0; | |
941 | break; | |
942 | default: | |
943 | n = strtoul(pch, &p, 0); | |
944 | if (pch == p) { | |
945 | expr_error("invalid char in expression"); | |
946 | } | |
947 | pch = p; | |
948 | while (isspace(*pch)) | |
949 | pch++; | |
950 | break; | |
951 | } | |
952 | return n; | |
953 | } | |
954 | ||
955 | ||
956 | static int expr_prod(void) | |
957 | { | |
958 | int val, val2, op; | |
959 | ||
960 | val = expr_unary(); | |
961 | for(;;) { | |
962 | op = *pch; | |
963 | if (op != '*' && op != '/' && op != '%') | |
964 | break; | |
965 | next(); | |
966 | val2 = expr_unary(); | |
967 | switch(op) { | |
968 | default: | |
969 | case '*': | |
970 | val *= val2; | |
971 | break; | |
972 | case '/': | |
973 | case '%': | |
974 | if (val2 == 0) | |
975 | expr_error("division by zero"); | |
976 | if (op == '/') | |
977 | val /= val2; | |
978 | else | |
979 | val %= val2; | |
980 | break; | |
981 | } | |
982 | } | |
983 | return val; | |
984 | } | |
985 | ||
986 | static int expr_logic(void) | |
987 | { | |
988 | int val, val2, op; | |
989 | ||
990 | val = expr_prod(); | |
991 | for(;;) { | |
992 | op = *pch; | |
993 | if (op != '&' && op != '|' && op != '^') | |
994 | break; | |
995 | next(); | |
996 | val2 = expr_prod(); | |
997 | switch(op) { | |
998 | default: | |
999 | case '&': | |
1000 | val &= val2; | |
1001 | break; | |
1002 | case '|': | |
1003 | val |= val2; | |
1004 | break; | |
1005 | case '^': | |
1006 | val ^= val2; | |
1007 | break; | |
1008 | } | |
1009 | } | |
1010 | return val; | |
1011 | } | |
1012 | ||
1013 | static int expr_sum(void) | |
1014 | { | |
1015 | int val, val2, op; | |
1016 | ||
1017 | val = expr_logic(); | |
1018 | for(;;) { | |
1019 | op = *pch; | |
1020 | if (op != '+' && op != '-') | |
1021 | break; | |
1022 | next(); | |
1023 | val2 = expr_logic(); | |
1024 | if (op == '+') | |
1025 | val += val2; | |
1026 | else | |
1027 | val -= val2; | |
1028 | } | |
1029 | return val; | |
1030 | } | |
1031 | ||
1032 | static int get_expr(int *pval, const char **pp) | |
1033 | { | |
1034 | pch = *pp; | |
1035 | if (setjmp(expr_env)) { | |
1036 | *pp = pch; | |
1037 | return -1; | |
1038 | } | |
1039 | while (isspace(*pch)) | |
1040 | pch++; | |
1041 | *pval = expr_sum(); | |
1042 | *pp = pch; | |
1043 | return 0; | |
1044 | } | |
1045 | ||
1046 | static int get_str(char *buf, int buf_size, const char **pp) | |
1047 | { | |
1048 | const char *p; | |
1049 | char *q; | |
1050 | int c; | |
1051 | ||
1052 | p = *pp; | |
1053 | while (isspace(*p)) | |
1054 | p++; | |
1055 | if (*p == '\0') { | |
1056 | fail: | |
1057 | *pp = p; | |
1058 | return -1; | |
1059 | } | |
1060 | q = buf; | |
1061 | if (*p == '\"') { | |
1062 | p++; | |
1063 | while (*p != '\0' && *p != '\"') { | |
1064 | if (*p == '\\') { | |
1065 | p++; | |
1066 | c = *p++; | |
1067 | switch(c) { | |
1068 | case 'n': | |
1069 | c = '\n'; | |
1070 | break; | |
1071 | case 'r': | |
1072 | c = '\r'; | |
1073 | break; | |
1074 | case '\\': | |
1075 | case '\'': | |
1076 | case '\"': | |
1077 | break; | |
1078 | default: | |
1079 | qemu_printf("unsupported escape code: '\\%c'\n", c); | |
1080 | goto fail; | |
1081 | } | |
1082 | if ((q - buf) < buf_size - 1) { | |
1083 | *q++ = c; | |
1084 | } | |
1085 | } else { | |
1086 | if ((q - buf) < buf_size - 1) { | |
1087 | *q++ = *p; | |
1088 | } | |
1089 | p++; | |
1090 | } | |
1091 | } | |
1092 | if (*p != '\"') { | |
1093 | qemu_printf("unterminated string\n"); | |
1094 | goto fail; | |
1095 | } | |
1096 | p++; | |
1097 | } else { | |
1098 | while (*p != '\0' && !isspace(*p)) { | |
1099 | if ((q - buf) < buf_size - 1) { | |
1100 | *q++ = *p; | |
1101 | } | |
1102 | p++; | |
1103 | } | |
1104 | *q = '\0'; | |
1105 | } | |
1106 | *pp = p; | |
1107 | return 0; | |
1108 | } | |
1109 | ||
1110 | static int default_fmt_format = 'x'; | |
1111 | static int default_fmt_size = 4; | |
1112 | ||
1113 | #define MAX_ARGS 16 | |
1114 | ||
1115 | static void term_handle_command(const char *cmdline) | |
1116 | { | |
1117 | const char *p, *pstart, *typestr; | |
1118 | char *q; | |
1119 | int c, nb_args, len, i, has_arg; | |
1120 | term_cmd_t *cmd; | |
1121 | char cmdname[256]; | |
1122 | char buf[1024]; | |
1123 | void *str_allocated[MAX_ARGS]; | |
1124 | void *args[MAX_ARGS]; | |
1125 | ||
1126 | #ifdef DEBUG | |
1127 | term_printf("command='%s'\n", cmdline); | |
1128 | #endif | |
1129 | ||
1130 | /* extract the command name */ | |
1131 | p = cmdline; | |
1132 | q = cmdname; | |
1133 | while (isspace(*p)) | |
1134 | p++; | |
1135 | if (*p == '\0') | |
1136 | return; | |
1137 | pstart = p; | |
1138 | while (*p != '\0' && *p != '/' && !isspace(*p)) | |
1139 | p++; | |
1140 | len = p - pstart; | |
1141 | if (len > sizeof(cmdname) - 1) | |
1142 | len = sizeof(cmdname) - 1; | |
1143 | memcpy(cmdname, pstart, len); | |
1144 | cmdname[len] = '\0'; | |
1145 | ||
1146 | /* find the command */ | |
1147 | for(cmd = term_cmds; cmd->name != NULL; cmd++) { | |
1148 | if (compare_cmd(cmdname, cmd->name)) | |
1149 | goto found; | |
1150 | } | |
1151 | term_printf("unknown command: '%s'\n", cmdname); | |
1152 | return; | |
1153 | found: | |
1154 | ||
1155 | for(i = 0; i < MAX_ARGS; i++) | |
1156 | str_allocated[i] = NULL; | |
1157 | ||
1158 | /* parse the parameters */ | |
1159 | typestr = cmd->args_type; | |
1160 | nb_args = 0; | |
1161 | for(;;) { | |
1162 | c = *typestr; | |
1163 | if (c == '\0') | |
1164 | break; | |
1165 | typestr++; | |
1166 | switch(c) { | |
1167 | case 'F': | |
1168 | case 's': | |
1169 | { | |
1170 | int ret; | |
1171 | char *str; | |
1172 | ||
1173 | while (isspace(*p)) | |
1174 | p++; | |
1175 | if (*typestr == '?') { | |
1176 | typestr++; | |
1177 | if (*p == '\0') { | |
1178 | /* no optional string: NULL argument */ | |
1179 | str = NULL; | |
1180 | goto add_str; | |
1181 | } | |
1182 | } | |
1183 | ret = get_str(buf, sizeof(buf), &p); | |
1184 | if (ret < 0) { | |
1185 | if (c == 'F') | |
1186 | term_printf("%s: filename expected\n", cmdname); | |
1187 | else | |
1188 | term_printf("%s: string expected\n", cmdname); | |
1189 | goto fail; | |
1190 | } | |
1191 | str = qemu_malloc(strlen(buf) + 1); | |
1192 | strcpy(str, buf); | |
1193 | str_allocated[nb_args] = str; | |
1194 | add_str: | |
1195 | if (nb_args >= MAX_ARGS) { | |
1196 | error_args: | |
1197 | term_printf("%s: too many arguments\n", cmdname); | |
1198 | goto fail; | |
1199 | } | |
1200 | args[nb_args++] = str; | |
1201 | } | |
1202 | break; | |
1203 | case '/': | |
1204 | { | |
1205 | int count, format, size; | |
1206 | ||
1207 | while (isspace(*p)) | |
1208 | p++; | |
1209 | if (*p == '/') { | |
1210 | /* format found */ | |
1211 | p++; | |
1212 | count = 1; | |
1213 | if (isdigit(*p)) { | |
1214 | count = 0; | |
1215 | while (isdigit(*p)) { | |
1216 | count = count * 10 + (*p - '0'); | |
1217 | p++; | |
1218 | } | |
1219 | } | |
1220 | size = -1; | |
1221 | format = -1; | |
1222 | for(;;) { | |
1223 | switch(*p) { | |
1224 | case 'o': | |
1225 | case 'd': | |
1226 | case 'u': | |
1227 | case 'x': | |
1228 | case 'i': | |
1229 | case 'c': | |
1230 | format = *p++; | |
1231 | break; | |
1232 | case 'b': | |
1233 | size = 1; | |
1234 | p++; | |
1235 | break; | |
1236 | case 'h': | |
1237 | size = 2; | |
1238 | p++; | |
1239 | break; | |
1240 | case 'w': | |
1241 | size = 4; | |
1242 | p++; | |
1243 | break; | |
1244 | case 'g': | |
1245 | case 'L': | |
1246 | size = 8; | |
1247 | p++; | |
1248 | break; | |
1249 | default: | |
1250 | goto next; | |
1251 | } | |
1252 | } | |
1253 | next: | |
1254 | if (*p != '\0' && !isspace(*p)) { | |
1255 | term_printf("invalid char in format: '%c'\n", *p); | |
1256 | goto fail; | |
1257 | } | |
1258 | if (format < 0) | |
1259 | format = default_fmt_format; | |
1260 | if (format != 'i') { | |
1261 | /* for 'i', not specifying a size gives -1 as size */ | |
1262 | if (size < 0) | |
1263 | size = default_fmt_size; | |
1264 | } | |
1265 | default_fmt_size = size; | |
1266 | default_fmt_format = format; | |
1267 | } else { | |
1268 | count = 1; | |
1269 | format = default_fmt_format; | |
1270 | if (format != 'i') { | |
1271 | size = default_fmt_size; | |
1272 | } else { | |
1273 | size = -1; | |
1274 | } | |
1275 | } | |
1276 | if (nb_args + 3 > MAX_ARGS) | |
1277 | goto error_args; | |
1278 | args[nb_args++] = (void*)count; | |
1279 | args[nb_args++] = (void*)format; | |
1280 | args[nb_args++] = (void*)size; | |
1281 | } | |
1282 | break; | |
1283 | case 'i': | |
1284 | { | |
1285 | int val; | |
1286 | while (isspace(*p)) | |
1287 | p++; | |
1288 | if (*typestr == '?') { | |
1289 | typestr++; | |
1290 | if (*p == '\0') | |
1291 | has_arg = 0; | |
1292 | else | |
1293 | has_arg = 1; | |
1294 | if (nb_args >= MAX_ARGS) | |
1295 | goto error_args; | |
1296 | args[nb_args++] = (void *)has_arg; | |
1297 | if (!has_arg) { | |
1298 | if (nb_args >= MAX_ARGS) | |
1299 | goto error_args; | |
1300 | val = -1; | |
1301 | goto add_num; | |
1302 | } | |
1303 | } | |
1304 | if (get_expr(&val, &p)) | |
1305 | goto fail; | |
1306 | add_num: | |
1307 | if (nb_args >= MAX_ARGS) | |
1308 | goto error_args; | |
1309 | args[nb_args++] = (void *)val; | |
1310 | } | |
1311 | break; | |
1312 | case '-': | |
1313 | { | |
1314 | int has_option; | |
1315 | /* option */ | |
1316 | ||
1317 | c = *typestr++; | |
1318 | if (c == '\0') | |
1319 | goto bad_type; | |
1320 | while (isspace(*p)) | |
1321 | p++; | |
1322 | has_option = 0; | |
1323 | if (*p == '-') { | |
1324 | p++; | |
1325 | if (*p != c) { | |
1326 | term_printf("%s: unsupported option -%c\n", | |
1327 | cmdname, *p); | |
1328 | goto fail; | |
1329 | } | |
1330 | p++; | |
1331 | has_option = 1; | |
1332 | } | |
1333 | if (nb_args >= MAX_ARGS) | |
1334 | goto error_args; | |
1335 | args[nb_args++] = (void *)has_option; | |
1336 | } | |
1337 | break; | |
1338 | default: | |
1339 | bad_type: | |
1340 | term_printf("%s: unknown type '%c'\n", cmdname, c); | |
1341 | goto fail; | |
1342 | } | |
1343 | } | |
1344 | /* check that all arguments were parsed */ | |
1345 | while (isspace(*p)) | |
1346 | p++; | |
1347 | if (*p != '\0') { | |
1348 | term_printf("%s: extraneous characters at the end of line\n", | |
1349 | cmdname); | |
1350 | goto fail; | |
1351 | } | |
1352 | ||
1353 | switch(nb_args) { | |
1354 | case 0: | |
1355 | cmd->handler(); | |
1356 | break; | |
1357 | case 1: | |
1358 | cmd->handler(args[0]); | |
1359 | break; | |
1360 | case 2: | |
1361 | cmd->handler(args[0], args[1]); | |
1362 | break; | |
1363 | case 3: | |
1364 | cmd->handler(args[0], args[1], args[2]); | |
1365 | break; | |
1366 | case 4: | |
1367 | cmd->handler(args[0], args[1], args[2], args[3]); | |
1368 | break; | |
1369 | case 5: | |
1370 | cmd->handler(args[0], args[1], args[2], args[3], args[4]); | |
1371 | break; | |
1372 | default: | |
1373 | term_printf("unsupported number of arguments: %d\n", nb_args); | |
1374 | goto fail; | |
1375 | } | |
1376 | fail: | |
1377 | for(i = 0; i < MAX_ARGS; i++) | |
1378 | qemu_free(str_allocated[i]); | |
1379 | return; | |
1380 | } | |
1381 | ||
1382 | static void term_show_prompt(void) | |
1383 | { | |
1384 | term_printf("(qemu) "); | |
1385 | fflush(stdout); | |
1386 | term_cmd_buf_index = 0; | |
1387 | term_cmd_buf_size = 0; | |
1388 | term_esc_state = IS_NORM; | |
1389 | } | |
1390 | ||
1391 | static void term_print_cmdline (const char *cmdline) | |
1392 | { | |
1393 | term_show_prompt(); | |
1394 | term_printf(cmdline); | |
1395 | term_flush(); | |
1396 | } | |
1397 | ||
1398 | static void term_insert_char(int ch) | |
1399 | { | |
1400 | if (term_cmd_buf_index < TERM_CMD_BUF_SIZE) { | |
1401 | memmove(term_cmd_buf + term_cmd_buf_index + 1, | |
1402 | term_cmd_buf + term_cmd_buf_index, | |
1403 | term_cmd_buf_size - term_cmd_buf_index); | |
1404 | term_cmd_buf[term_cmd_buf_index] = ch; | |
1405 | term_cmd_buf_size++; | |
1406 | term_printf("\033[@%c", ch); | |
1407 | term_cmd_buf_index++; | |
1408 | term_flush(); | |
1409 | } | |
1410 | } | |
1411 | ||
1412 | static void term_backward_char(void) | |
1413 | { | |
1414 | if (term_cmd_buf_index > 0) { | |
1415 | term_cmd_buf_index--; | |
1416 | term_printf("\033[D"); | |
1417 | term_flush(); | |
1418 | } | |
1419 | } | |
1420 | ||
1421 | static void term_forward_char(void) | |
1422 | { | |
1423 | if (term_cmd_buf_index < term_cmd_buf_size) { | |
1424 | term_cmd_buf_index++; | |
1425 | term_printf("\033[C"); | |
1426 | term_flush(); | |
1427 | } | |
1428 | } | |
1429 | ||
1430 | static void term_delete_char(void) | |
1431 | { | |
1432 | if (term_cmd_buf_index < term_cmd_buf_size) { | |
1433 | memmove(term_cmd_buf + term_cmd_buf_index, | |
1434 | term_cmd_buf + term_cmd_buf_index + 1, | |
1435 | term_cmd_buf_size - term_cmd_buf_index - 1); | |
1436 | term_printf("\033[P"); | |
1437 | term_cmd_buf_size--; | |
1438 | term_flush(); | |
1439 | } | |
1440 | } | |
1441 | ||
1442 | static void term_backspace(void) | |
1443 | { | |
1444 | if (term_cmd_buf_index > 0) { | |
1445 | term_backward_char(); | |
1446 | term_delete_char(); | |
1447 | } | |
1448 | } | |
1449 | ||
1450 | static void term_bol(void) | |
1451 | { | |
1452 | while (term_cmd_buf_index > 0) | |
1453 | term_backward_char(); | |
1454 | } | |
1455 | ||
1456 | static void term_eol(void) | |
1457 | { | |
1458 | while (term_cmd_buf_index < term_cmd_buf_size) | |
1459 | term_forward_char(); | |
1460 | } | |
1461 | ||
1462 | static void term_up_char(void) | |
1463 | { | |
1464 | int idx; | |
1465 | ||
1466 | if (term_hist_entry == 0) | |
1467 | return; | |
1468 | if (term_hist_entry == -1) { | |
1469 | /* Find latest entry */ | |
1470 | for (idx = 0; idx < TERM_MAX_CMDS; idx++) { | |
1471 | if (term_history[idx] == NULL) | |
1472 | break; | |
1473 | } | |
1474 | term_hist_entry = idx; | |
1475 | } | |
1476 | term_hist_entry--; | |
1477 | if (term_hist_entry >= 0) { | |
1478 | strcpy(term_cmd_buf, term_history[term_hist_entry]); | |
1479 | term_printf("\n"); | |
1480 | term_print_cmdline(term_cmd_buf); | |
1481 | term_cmd_buf_index = term_cmd_buf_size = strlen(term_cmd_buf); | |
1482 | } | |
1483 | } | |
1484 | ||
1485 | static void term_down_char(void) | |
1486 | { | |
1487 | if (term_hist_entry == TERM_MAX_CMDS - 1 || term_hist_entry == -1) | |
1488 | return; | |
1489 | if (term_history[++term_hist_entry] != NULL) { | |
1490 | strcpy(term_cmd_buf, term_history[term_hist_entry]); | |
1491 | } else { | |
1492 | term_hist_entry = -1; | |
1493 | } | |
1494 | term_printf("\n"); | |
1495 | term_print_cmdline(term_cmd_buf); | |
1496 | term_cmd_buf_index = term_cmd_buf_size = strlen(term_cmd_buf); | |
1497 | } | |
1498 | ||
1499 | static void term_hist_add(const char *cmdline) | |
1500 | { | |
1501 | char *hist_entry, *new_entry; | |
1502 | int idx; | |
1503 | ||
1504 | if (cmdline[0] == '\0') | |
1505 | return; | |
1506 | new_entry = NULL; | |
1507 | if (term_hist_entry != -1) { | |
1508 | /* We were editing an existing history entry: replace it */ | |
1509 | hist_entry = term_history[term_hist_entry]; | |
1510 | idx = term_hist_entry; | |
1511 | if (strcmp(hist_entry, cmdline) == 0) { | |
1512 | goto same_entry; | |
1513 | } | |
1514 | } | |
1515 | /* Search cmdline in history buffers */ | |
1516 | for (idx = 0; idx < TERM_MAX_CMDS; idx++) { | |
1517 | hist_entry = term_history[idx]; | |
1518 | if (hist_entry == NULL) | |
1519 | break; | |
1520 | if (strcmp(hist_entry, cmdline) == 0) { | |
1521 | same_entry: | |
1522 | new_entry = hist_entry; | |
1523 | /* Put this entry at the end of history */ | |
1524 | memmove(&term_history[idx], &term_history[idx + 1], | |
1525 | &term_history[TERM_MAX_CMDS] - &term_history[idx + 1]); | |
1526 | term_history[TERM_MAX_CMDS - 1] = NULL; | |
1527 | for (; idx < TERM_MAX_CMDS; idx++) { | |
1528 | if (term_history[idx] == NULL) | |
1529 | break; | |
1530 | } | |
1531 | break; | |
1532 | } | |
1533 | } | |
1534 | if (idx == TERM_MAX_CMDS) { | |
1535 | /* Need to get one free slot */ | |
1536 | free(term_history[0]); | |
1537 | memcpy(term_history, &term_history[1], | |
1538 | &term_history[TERM_MAX_CMDS] - &term_history[1]); | |
1539 | term_history[TERM_MAX_CMDS - 1] = NULL; | |
1540 | idx = TERM_MAX_CMDS - 1; | |
1541 | } | |
1542 | if (new_entry == NULL) | |
1543 | new_entry = strdup(cmdline); | |
1544 | term_history[idx] = new_entry; | |
1545 | term_hist_entry = -1; | |
1546 | } | |
1547 | ||
1548 | /* return true if command handled */ | |
1549 | static void term_handle_byte(int ch) | |
1550 | { | |
1551 | switch(term_esc_state) { | |
1552 | case IS_NORM: | |
1553 | switch(ch) { | |
1554 | case 1: | |
1555 | term_bol(); | |
1556 | break; | |
1557 | case 5: | |
1558 | term_eol(); | |
1559 | break; | |
1560 | case 10: | |
1561 | case 13: | |
1562 | term_cmd_buf[term_cmd_buf_size] = '\0'; | |
1563 | term_hist_add(term_cmd_buf); | |
1564 | term_printf("\n"); | |
1565 | term_handle_command(term_cmd_buf); | |
1566 | term_show_prompt(); | |
1567 | break; | |
1568 | case 27: | |
1569 | term_esc_state = IS_ESC; | |
1570 | break; | |
1571 | case 127: | |
1572 | case 8: | |
1573 | term_backspace(); | |
1574 | break; | |
1575 | case 155: | |
1576 | term_esc_state = IS_CSI; | |
1577 | break; | |
1578 | default: | |
1579 | if (ch >= 32) { | |
1580 | term_insert_char(ch); | |
1581 | } | |
1582 | break; | |
1583 | } | |
1584 | break; | |
1585 | case IS_ESC: | |
1586 | if (ch == '[') { | |
1587 | term_esc_state = IS_CSI; | |
1588 | term_esc_param = 0; | |
1589 | } else { | |
1590 | term_esc_state = IS_NORM; | |
1591 | } | |
1592 | break; | |
1593 | case IS_CSI: | |
1594 | switch(ch) { | |
1595 | case 'A': | |
1596 | case 'F': | |
1597 | term_up_char(); | |
1598 | break; | |
1599 | case 'B': | |
1600 | case 'E': | |
1601 | term_down_char(); | |
1602 | break; | |
1603 | case 'D': | |
1604 | term_backward_char(); | |
1605 | break; | |
1606 | case 'C': | |
1607 | term_forward_char(); | |
1608 | break; | |
1609 | case '0' ... '9': | |
1610 | term_esc_param = term_esc_param * 10 + (ch - '0'); | |
1611 | goto the_end; | |
1612 | case '~': | |
1613 | switch(term_esc_param) { | |
1614 | case 1: | |
1615 | term_bol(); | |
1616 | break; | |
1617 | case 3: | |
1618 | term_delete_char(); | |
1619 | break; | |
1620 | case 4: | |
1621 | term_eol(); | |
1622 | break; | |
1623 | } | |
1624 | break; | |
1625 | default: | |
1626 | break; | |
1627 | } | |
1628 | term_esc_state = IS_NORM; | |
1629 | the_end: | |
1630 | break; | |
1631 | } | |
1632 | } | |
1633 | ||
1634 | /*************************************************************/ | |
1635 | /* serial console support */ | |
1636 | ||
1637 | #define TERM_ESCAPE 0x01 /* ctrl-a is used for escape */ | |
1638 | ||
1639 | static int term_got_escape, term_command; | |
1640 | ||
1641 | void term_print_help(void) | |
1642 | { | |
1643 | term_printf("\n" | |
1644 | "C-a h print this help\n" | |
1645 | "C-a x exit emulatior\n" | |
1646 | "C-a s save disk data back to file (if -snapshot)\n" | |
1647 | "C-a b send break (magic sysrq)\n" | |
1648 | "C-a c switch between console and monitor\n" | |
1649 | "C-a C-a send C-a\n" | |
1650 | ); | |
1651 | } | |
1652 | ||
1653 | /* called when a char is received */ | |
1654 | static void term_received_byte(int ch) | |
1655 | { | |
1656 | if (!serial_console) { | |
1657 | /* if no serial console, handle every command */ | |
1658 | term_handle_byte(ch); | |
1659 | } else { | |
1660 | if (term_got_escape) { | |
1661 | term_got_escape = 0; | |
1662 | switch(ch) { | |
1663 | case 'h': | |
1664 | term_print_help(); | |
1665 | break; | |
1666 | case 'x': | |
1667 | exit(0); | |
1668 | break; | |
1669 | case 's': | |
1670 | { | |
1671 | int i; | |
1672 | for (i = 0; i < MAX_DISKS; i++) { | |
1673 | if (bs_table[i]) | |
1674 | bdrv_commit(bs_table[i]); | |
1675 | } | |
1676 | } | |
1677 | break; | |
1678 | case 'b': | |
1679 | if (serial_console) | |
1680 | serial_receive_break(serial_console); | |
1681 | break; | |
1682 | case 'c': | |
1683 | if (!term_command) { | |
1684 | term_show_prompt(); | |
1685 | term_command = 1; | |
1686 | } else { | |
1687 | term_command = 0; | |
1688 | } | |
1689 | break; | |
1690 | case TERM_ESCAPE: | |
1691 | goto send_char; | |
1692 | } | |
1693 | } else if (ch == TERM_ESCAPE) { | |
1694 | term_got_escape = 1; | |
1695 | } else { | |
1696 | send_char: | |
1697 | if (term_command) { | |
1698 | term_handle_byte(ch); | |
1699 | } else { | |
1700 | if (serial_console) | |
1701 | serial_receive_byte(serial_console, ch); | |
1702 | } | |
1703 | } | |
1704 | } | |
1705 | } | |
1706 | ||
1707 | static int term_can_read(void *opaque) | |
1708 | { | |
1709 | if (serial_console) { | |
1710 | return serial_can_receive(serial_console); | |
1711 | } else { | |
1712 | return 128; | |
1713 | } | |
1714 | } | |
1715 | ||
1716 | static void term_read(void *opaque, const uint8_t *buf, int size) | |
1717 | { | |
1718 | int i; | |
1719 | for(i = 0; i < size; i++) | |
1720 | term_received_byte(buf[i]); | |
1721 | } | |
1722 | ||
1723 | void monitor_init(void) | |
1724 | { | |
1725 | if (!serial_console) { | |
1726 | term_printf("QEMU %s monitor - type 'help' for more information\n", | |
1727 | QEMU_VERSION); | |
1728 | term_show_prompt(); | |
1729 | } | |
1730 | term_hist_entry = -1; | |
1731 | qemu_add_fd_read_handler(0, term_can_read, term_read, NULL); | |
1732 | } |