]> git.proxmox.com Git - qemu.git/blame - monitor.c
fixed window switch - fixed caps lock and num lock - simplified keycodes (initial...
[qemu.git] / monitor.c
CommitLineData
9dc39cba
FB
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 */
9dc39cba 24#include "vl.h"
9307c4c1 25#include "disas.h"
9dc39cba
FB
26
27//#define DEBUG
28
9307c4c1
FB
29#ifndef offsetof
30#define offsetof(type, field) ((size_t) &((type *)0)->field)
31#endif
32
9dc39cba 33#define TERM_CMD_BUF_SIZE 4095
aa455485 34#define TERM_MAX_CMDS 64
9dc39cba
FB
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
42static char term_cmd_buf[TERM_CMD_BUF_SIZE + 1];
43static int term_cmd_buf_index;
44static int term_cmd_buf_size;
45static int term_esc_state;
46static int term_esc_param;
47
aa455485
FB
48static char *term_history[TERM_MAX_CMDS];
49static int term_hist_entry;
50
9307c4c1
FB
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
9dc39cba
FB
63typedef struct term_cmd_t {
64 const char *name;
9307c4c1
FB
65 const char *args_type;
66 void (*handler)();
9dc39cba
FB
67 const char *params;
68 const char *help;
69} term_cmd_t;
70
71static term_cmd_t term_cmds[];
72static term_cmd_t info_cmds[];
73
74void 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
82void term_flush(void)
83{
84 fflush(stdout);
85}
86
87static 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
107static 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
117static 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);
f193c797
FB
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 }
9dc39cba
FB
131 }
132}
133
9307c4c1 134static void do_help(const char *name)
9dc39cba 135{
9307c4c1 136 help_cmd(name);
9dc39cba
FB
137}
138
9307c4c1 139static void do_commit(void)
9dc39cba
FB
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
9307c4c1 149static void do_info(const char *item)
9dc39cba
FB
150{
151 term_cmd_t *cmd;
9dc39cba 152
9307c4c1 153 if (!item)
9dc39cba 154 goto help;
9dc39cba 155 for(cmd = info_cmds; cmd->name != NULL; cmd++) {
9307c4c1 156 if (compare_cmd(item, cmd->name))
9dc39cba
FB
157 goto found;
158 }
159 help:
9307c4c1 160 help_cmd("info");
9dc39cba
FB
161 return;
162 found:
9307c4c1 163 cmd->handler();
9dc39cba
FB
164}
165
9307c4c1 166static void do_info_network(void)
9dc39cba
FB
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
9307c4c1 183static void do_info_block(void)
9dc39cba
FB
184{
185 bdrv_info();
186}
187
9307c4c1
FB
188static 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
aa455485
FB
197static 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
9307c4c1 208static void do_quit(void)
9dc39cba
FB
209{
210 exit(0);
211}
212
213static 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
9307c4c1 231static void do_eject(int force, const char *filename)
9dc39cba
FB
232{
233 BlockDriverState *bs;
9dc39cba 234
9307c4c1
FB
235 term_printf("%d %s\n", force, filename);
236
237 bs = bdrv_find(filename);
9dc39cba
FB
238 if (!bs) {
239 term_printf("device not found\n");
240 return;
241 }
242 eject_device(bs, force);
243}
244
9307c4c1 245static void do_change(const char *device, const char *filename)
9dc39cba
FB
246{
247 BlockDriverState *bs;
248
9307c4c1 249 bs = bdrv_find(device);
9dc39cba
FB
250 if (!bs) {
251 term_printf("device not found\n");
252 return;
253 }
254 if (eject_device(bs, 0) < 0)
255 return;
9307c4c1 256 bdrv_open(bs, filename, 0);
9dc39cba
FB
257}
258
9307c4c1 259static void do_screen_dump(const char *filename)
59a983b9 260{
9307c4c1 261 vga_screen_dump(filename);
59a983b9
FB
262}
263
9307c4c1 264static void do_log(const char *items)
f193c797
FB
265{
266 int mask;
267
9307c4c1 268 if (!strcmp(items, "none")) {
f193c797
FB
269 mask = 0;
270 } else {
9307c4c1 271 mask = cpu_str_to_log_mask(items);
f193c797 272 if (!mask) {
9307c4c1 273 help_cmd("log");
f193c797
FB
274 return;
275 }
276 }
277 cpu_set_log(mask);
278}
279
9307c4c1 280static void do_savevm(const char *filename)
8a7ddc38 281{
9307c4c1
FB
282 if (qemu_savevm(filename) < 0)
283 term_printf("I/O error when saving VM to '%s'\n", filename);
8a7ddc38
FB
284}
285
9307c4c1 286static void do_loadvm(const char *filename)
8a7ddc38 287{
9307c4c1
FB
288 if (qemu_loadvm(filename) < 0)
289 term_printf("I/O error when loading VM from '%s'\n", filename);
8a7ddc38
FB
290}
291
9307c4c1 292static void do_stop(void)
8a7ddc38
FB
293{
294 vm_stop(EXCP_INTERRUPT);
295}
296
9307c4c1 297static void do_cont(void)
8a7ddc38
FB
298{
299 vm_start();
300}
301
67b915a5 302#ifdef CONFIG_GDBSTUB
9307c4c1 303static void do_gdbserver(int has_port, int port)
8a7ddc38 304{
9307c4c1
FB
305 if (!has_port)
306 port = DEFAULT_GDBSTUB_PORT;
8a7ddc38
FB
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}
67b915a5 313#endif
8a7ddc38 314
9307c4c1
FB
315static 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
342static 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
4c27ba27 353 if (wsize == 2) {
9307c4c1 354 flags = 1;
4c27ba27
FB
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
9307c4c1
FB
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
446static void do_memory_dump(int count, int format, int size, int addr)
447{
448 memory_dump(count, format, size, addr, 0);
449}
450
451static void do_physical_memory_dump(int count, int format, int size, int addr)
452{
453 memory_dump(count, format, size, addr, 1);
454}
455
456static 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
a3a91a35
FB
479typedef struct {
480 int keycode;
481 const char *name;
482} KeyDef;
483
484static 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
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
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
578static 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
589static 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
9dc39cba 634static term_cmd_t term_cmds[] = {
9307c4c1 635 { "help|?", "s?", do_help,
9dc39cba 636 "[cmd]", "show the help" },
9307c4c1 637 { "commit", "", do_commit,
9dc39cba 638 "", "commit changes to the disk images (if -snapshot is used)" },
9307c4c1 639 { "info", "s?", do_info,
9dc39cba 640 "subcommand", "show various information about the system state" },
9307c4c1 641 { "q|quit", "", do_quit,
9dc39cba 642 "", "quit the emulator" },
9307c4c1 643 { "eject", "-fs", do_eject,
9dc39cba 644 "[-f] device", "eject a removable media (use -f to force it)" },
9307c4c1 645 { "change", "sF", do_change,
9dc39cba 646 "device filename", "change a removable media" },
9307c4c1 647 { "screendump", "F", do_screen_dump,
59a983b9 648 "filename", "save screen into PPM image 'filename'" },
9307c4c1 649 { "log", "s", do_log,
f193c797 650 "item1[,...]", "activate logging of the specified items to '/tmp/qemu.log'" },
9307c4c1 651 { "savevm", "F", do_savevm,
8a7ddc38 652 "filename", "save the whole virtual machine state to 'filename'" },
9307c4c1 653 { "loadvm", "F", do_loadvm,
8a7ddc38 654 "filename", "restore the whole virtual machine state from 'filename'" },
9307c4c1
FB
655 { "stop", "", do_stop,
656 "", "stop emulation", },
657 { "c|cont", "", do_cont,
658 "", "resume emulation", },
67b915a5 659#ifdef CONFIG_GDBSTUB
9307c4c1
FB
660 { "gdbserver", "i?", do_gdbserver,
661 "[port]", "start gdbserver session (default port=1234)", },
67b915a5 662#endif
9307c4c1
FB
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)", },
a3a91a35
FB
669 { "sendkey", "s", do_send_key,
670 "keys", "send keys to the VM (e.g. 'sendkey ctrl-alt-f1')" },
f193c797 671 { NULL, NULL, },
9dc39cba
FB
672};
673
674static term_cmd_t info_cmds[] = {
9307c4c1 675 { "network", "", do_info_network,
9dc39cba 676 "", "show the network state" },
9307c4c1 677 { "block", "", do_info_block,
9dc39cba 678 "", "show the block devices" },
9307c4c1
FB
679 { "registers", "", do_info_registers,
680 "", "show the cpu registers" },
aa455485
FB
681 { "history", "", do_info_history,
682 "", "show the command line history", },
4a0fb71e
FB
683 { "irq", "", irq_info,
684 "", "show the interrupts statistics (if available)", },
4c27ba27
FB
685 { "pic", "", pic_info,
686 "", "show i8259 (PIC) state", },
86e0c048
FB
687 { "pci", "", pci_info,
688 "", "show PCI info", },
9dc39cba
FB
689 { NULL, NULL, },
690};
691
9307c4c1
FB
692/*******************************************************************/
693
694static const char *pch;
695static jmp_buf expr_env;
696
697typedef struct MonitorDef {
698 const char *name;
699 int offset;
700 int (*get_value)(struct MonitorDef *md);
701} MonitorDef;
702
57206fd4
FB
703#if defined(TARGET_I386)
704static 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
a541f297
FB
710#if defined(TARGET_PPC)
711static 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
723static 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
742static 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}
9fddaa0c
FB
749
750uint32_t cpu_ppc_load_decr (CPUState *env);
751static int monitor_get_decr (struct MonitorDef *md)
752{
753 return cpu_ppc_load_decr(cpu_single_env);
754}
755
756uint32_t cpu_ppc_load_tbu (CPUState *env);
757static int monitor_get_tbu (struct MonitorDef *md)
758{
759 return cpu_ppc_load_tbu(cpu_single_env);
760}
761
762uint32_t cpu_ppc_load_tbl (CPUState *env);
763static int monitor_get_tbl (struct MonitorDef *md)
764{
765 return cpu_ppc_load_tbl(cpu_single_env);
766}
a541f297
FB
767#endif
768
9307c4c1
FB
769static MonitorDef monitor_defs[] = {
770#ifdef TARGET_I386
57206fd4
FB
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
9307c4c1
FB
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) },
57206fd4
FB
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, },
a541f297
FB
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]) },
57206fd4 826 { "nip|pc", offsetof(CPUState, nip) },
a541f297
FB
827 { "lr", offsetof(CPUState, lr) },
828 { "ctr", offsetof(CPUState, ctr) },
9fddaa0c 829 { "decr", 0, &monitor_get_decr, },
a541f297
FB
830 { "ccr", 0, &monitor_get_ccr, },
831 { "msr", 0, &monitor_get_msr, },
832 { "xer", 0, &monitor_get_xer, },
9fddaa0c
FB
833 { "tbu", 0, &monitor_get_tbu, },
834 { "tbl", 0, &monitor_get_tbl, },
a541f297
FB
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 ... */
9307c4c1
FB
853#endif
854 { NULL },
855};
856
857static void expr_error(const char *fmt)
9dc39cba 858{
9307c4c1
FB
859 term_printf(fmt);
860 term_printf("\n");
861 longjmp(expr_env, 1);
862}
863
864static 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
880static void next(void)
881{
882 if (pch != '\0') {
883 pch++;
884 while (isspace(*pch))
885 pch++;
886 }
887}
888
889static int expr_sum(void);
890
891static 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') ||
57206fd4 926 *pch == '_' || *pch == '.') {
9307c4c1
FB
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
956static 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)
5b60212f 975 expr_error("division by zero");
9307c4c1
FB
976 if (op == '/')
977 val /= val2;
978 else
979 val %= val2;
980 break;
981 }
982 }
983 return val;
984}
985
986static 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
1013static 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
1032static 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
1046static 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 != '\"') {
5b60212f 1093 qemu_printf("unterminated string\n");
9307c4c1
FB
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
1110static int default_fmt_format = 'x';
1111static int default_fmt_size = 4;
1112
1113#define MAX_ARGS 16
1114
1115static 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;
9dc39cba 1120 term_cmd_t *cmd;
9307c4c1
FB
1121 char cmdname[256];
1122 char buf[1024];
1123 void *str_allocated[MAX_ARGS];
1124 void *args[MAX_ARGS];
9dc39cba
FB
1125
1126#ifdef DEBUG
1127 term_printf("command='%s'\n", cmdline);
1128#endif
1129
9307c4c1 1130 /* extract the command name */
9dc39cba 1131 p = cmdline;
9307c4c1
FB
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;
9dc39cba 1161 for(;;) {
9307c4c1
FB
1162 c = *typestr;
1163 if (c == '\0')
9dc39cba 1164 break;
9307c4c1
FB
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 }
9dc39cba 1202 break;
9307c4c1
FB
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 }
9307c4c1
FB
1258 if (format < 0)
1259 format = default_fmt_format;
4c27ba27
FB
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 }
9307c4c1
FB
1265 default_fmt_size = size;
1266 default_fmt_format = format;
1267 } else {
1268 count = 1;
1269 format = default_fmt_format;
4c27ba27
FB
1270 if (format != 'i') {
1271 size = default_fmt_size;
1272 } else {
1273 size = -1;
1274 }
9307c4c1
FB
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 }
9dc39cba 1282 break;
9307c4c1
FB
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 }
9dc39cba 1343 }
9307c4c1
FB
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;
9dc39cba 1351 }
9307c4c1
FB
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;
9dc39cba 1375 }
9307c4c1
FB
1376 fail:
1377 for(i = 0; i < MAX_ARGS; i++)
1378 qemu_free(str_allocated[i]);
9dc39cba 1379 return;
9dc39cba
FB
1380}
1381
1382static 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
aa455485
FB
1391static void term_print_cmdline (const char *cmdline)
1392{
1393 term_show_prompt();
1394 term_printf(cmdline);
1395 term_flush();
1396}
1397
9dc39cba
FB
1398static 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
1412static 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
1421static 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
1430static 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
1442static void term_backspace(void)
1443{
1444 if (term_cmd_buf_index > 0) {
1445 term_backward_char();
1446 term_delete_char();
1447 }
1448}
1449
1450static void term_bol(void)
1451{
1452 while (term_cmd_buf_index > 0)
1453 term_backward_char();
1454}
1455
1456static void term_eol(void)
1457{
1458 while (term_cmd_buf_index < term_cmd_buf_size)
1459 term_forward_char();
1460}
1461
aa455485
FB
1462static 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
1485static 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
1499static 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
9dc39cba
FB
1548/* return true if command handled */
1549static 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';
aa455485 1563 term_hist_add(term_cmd_buf);
9dc39cba
FB
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;
aa455485
FB
1575 case 155:
1576 term_esc_state = IS_CSI;
1577 break;
9dc39cba
FB
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) {
aa455485
FB
1595 case 'A':
1596 case 'F':
1597 term_up_char();
1598 break;
1599 case 'B':
1600 case 'E':
1601 term_down_char();
1602 break;
9dc39cba
FB
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
1639static int term_got_escape, term_command;
1640
1641void term_print_help(void)
1642{
1643 term_printf("\n"
1644 "C-a h print this help\n"
1645 "C-a x exit emulatior\n"
9dc39cba
FB
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 */
1654static 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;
9dc39cba
FB
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
1707static int term_can_read(void *opaque)
1708{
1709 if (serial_console) {
1710 return serial_can_receive(serial_console);
1711 } else {
f193c797 1712 return 128;
9dc39cba
FB
1713 }
1714}
1715
1716static 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
1723void 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 }
aa455485 1730 term_hist_entry = -1;
8a7ddc38 1731 qemu_add_fd_read_handler(0, term_can_read, term_read, NULL);
9dc39cba 1732}