bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 1 | /* |
| 2 | * QEMU monitor |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 3 | * |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 4 | * Copyright (c) 2003-2004 Fabrice Bellard |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 5 | * |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 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 | */ |
pbrook | 87ecb68 | 2007-11-17 17:14:51 +0000 | [diff] [blame] | 24 | #include "hw/hw.h" |
| 25 | #include "hw/usb.h" |
| 26 | #include "hw/pcmcia.h" |
| 27 | #include "hw/pc.h" |
| 28 | #include "hw/pci.h" |
| 29 | #include "gdbstub.h" |
| 30 | #include "net.h" |
| 31 | #include "qemu-char.h" |
| 32 | #include "sysemu.h" |
| 33 | #include "console.h" |
| 34 | #include "block.h" |
| 35 | #include "audio/audio.h" |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 36 | #include "disas.h" |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 37 | #include <dirent.h> |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 38 | |
| 39 | //#define DEBUG |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 40 | //#define DEBUG_COMPLETION |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 41 | |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 42 | #ifndef offsetof |
| 43 | #define offsetof(type, field) ((size_t) &((type *)0)->field) |
| 44 | #endif |
| 45 | |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 46 | /* |
| 47 | * Supported types: |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 48 | * |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 49 | * 'F' filename |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 50 | * 'B' block device name |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 51 | * 's' string (accept optional quote) |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 52 | * 'i' 32 bit integer |
| 53 | * 'l' target long (32 or 64 bit) |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 54 | * '/' optional gdb-like print format (like "/10x") |
| 55 | * |
| 56 | * '?' optional type (for 'F', 's' and 'i') |
| 57 | * |
| 58 | */ |
| 59 | |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 60 | typedef struct term_cmd_t { |
| 61 | const char *name; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 62 | const char *args_type; |
| 63 | void (*handler)(); |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 64 | const char *params; |
| 65 | const char *help; |
| 66 | } term_cmd_t; |
| 67 | |
ths | 20d8a3e | 2007-02-18 17:04:49 +0000 | [diff] [blame] | 68 | #define MAX_MON 4 |
| 69 | static CharDriverState *monitor_hd[MAX_MON]; |
ths | 86e94de | 2007-01-05 22:01:59 +0000 | [diff] [blame] | 70 | static int hide_banner; |
bellard | 7e2515e | 2004-08-01 21:52:19 +0000 | [diff] [blame] | 71 | |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 72 | static term_cmd_t term_cmds[]; |
| 73 | static term_cmd_t info_cmds[]; |
| 74 | |
bellard | 7e2515e | 2004-08-01 21:52:19 +0000 | [diff] [blame] | 75 | static char term_outbuf[1024]; |
| 76 | static int term_outbuf_index; |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 77 | |
bellard | 7e2515e | 2004-08-01 21:52:19 +0000 | [diff] [blame] | 78 | static void monitor_start_input(void); |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 79 | |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 80 | CPUState *mon_cpu = NULL; |
| 81 | |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 82 | void term_flush(void) |
| 83 | { |
ths | 20d8a3e | 2007-02-18 17:04:49 +0000 | [diff] [blame] | 84 | int i; |
bellard | 7e2515e | 2004-08-01 21:52:19 +0000 | [diff] [blame] | 85 | if (term_outbuf_index > 0) { |
ths | 20d8a3e | 2007-02-18 17:04:49 +0000 | [diff] [blame] | 86 | for (i = 0; i < MAX_MON; i++) |
| 87 | if (monitor_hd[i] && monitor_hd[i]->focus == 0) |
| 88 | qemu_chr_write(monitor_hd[i], term_outbuf, term_outbuf_index); |
bellard | 7e2515e | 2004-08-01 21:52:19 +0000 | [diff] [blame] | 89 | term_outbuf_index = 0; |
| 90 | } |
| 91 | } |
| 92 | |
| 93 | /* flush at every end of line or if the buffer is full */ |
| 94 | void term_puts(const char *str) |
| 95 | { |
| 96 | int c; |
| 97 | for(;;) { |
| 98 | c = *str++; |
| 99 | if (c == '\0') |
| 100 | break; |
bellard | 7ba1260 | 2006-07-14 20:26:42 +0000 | [diff] [blame] | 101 | if (c == '\n') |
| 102 | term_outbuf[term_outbuf_index++] = '\r'; |
bellard | 7e2515e | 2004-08-01 21:52:19 +0000 | [diff] [blame] | 103 | term_outbuf[term_outbuf_index++] = c; |
bellard | 7ba1260 | 2006-07-14 20:26:42 +0000 | [diff] [blame] | 104 | if (term_outbuf_index >= (sizeof(term_outbuf) - 1) || |
bellard | 7e2515e | 2004-08-01 21:52:19 +0000 | [diff] [blame] | 105 | c == '\n') |
| 106 | term_flush(); |
| 107 | } |
| 108 | } |
| 109 | |
| 110 | void term_vprintf(const char *fmt, va_list ap) |
| 111 | { |
| 112 | char buf[4096]; |
| 113 | vsnprintf(buf, sizeof(buf), fmt, ap); |
| 114 | term_puts(buf); |
| 115 | } |
| 116 | |
| 117 | void term_printf(const char *fmt, ...) |
| 118 | { |
| 119 | va_list ap; |
| 120 | va_start(ap, fmt); |
| 121 | term_vprintf(fmt, ap); |
| 122 | va_end(ap); |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 123 | } |
| 124 | |
ths | fef3074 | 2006-12-22 14:11:32 +0000 | [diff] [blame] | 125 | void term_print_filename(const char *filename) |
| 126 | { |
| 127 | int i; |
| 128 | |
| 129 | for (i = 0; filename[i]; i++) { |
| 130 | switch (filename[i]) { |
| 131 | case ' ': |
| 132 | case '"': |
| 133 | case '\\': |
| 134 | term_printf("\\%c", filename[i]); |
| 135 | break; |
| 136 | case '\t': |
| 137 | term_printf("\\t"); |
| 138 | break; |
| 139 | case '\r': |
| 140 | term_printf("\\r"); |
| 141 | break; |
| 142 | case '\n': |
| 143 | term_printf("\\n"); |
| 144 | break; |
| 145 | default: |
| 146 | term_printf("%c", filename[i]); |
| 147 | break; |
| 148 | } |
| 149 | } |
| 150 | } |
| 151 | |
bellard | 7fe4848 | 2004-10-09 18:08:01 +0000 | [diff] [blame] | 152 | static int monitor_fprintf(FILE *stream, const char *fmt, ...) |
| 153 | { |
| 154 | va_list ap; |
| 155 | va_start(ap, fmt); |
| 156 | term_vprintf(fmt, ap); |
| 157 | va_end(ap); |
| 158 | return 0; |
| 159 | } |
| 160 | |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 161 | static int compare_cmd(const char *name, const char *list) |
| 162 | { |
| 163 | const char *p, *pstart; |
| 164 | int len; |
| 165 | len = strlen(name); |
| 166 | p = list; |
| 167 | for(;;) { |
| 168 | pstart = p; |
| 169 | p = strchr(p, '|'); |
| 170 | if (!p) |
| 171 | p = pstart + strlen(pstart); |
| 172 | if ((p - pstart) == len && !memcmp(pstart, name, len)) |
| 173 | return 1; |
| 174 | if (*p == '\0') |
| 175 | break; |
| 176 | p++; |
| 177 | } |
| 178 | return 0; |
| 179 | } |
| 180 | |
| 181 | static void help_cmd1(term_cmd_t *cmds, const char *prefix, const char *name) |
| 182 | { |
| 183 | term_cmd_t *cmd; |
| 184 | |
| 185 | for(cmd = cmds; cmd->name != NULL; cmd++) { |
| 186 | if (!name || !strcmp(name, cmd->name)) |
| 187 | term_printf("%s%s %s -- %s\n", prefix, cmd->name, cmd->params, cmd->help); |
| 188 | } |
| 189 | } |
| 190 | |
| 191 | static void help_cmd(const char *name) |
| 192 | { |
| 193 | if (name && !strcmp(name, "info")) { |
| 194 | help_cmd1(info_cmds, "info ", NULL); |
| 195 | } else { |
| 196 | help_cmd1(term_cmds, "", name); |
bellard | f193c79 | 2004-03-21 17:06:25 +0000 | [diff] [blame] | 197 | if (name && !strcmp(name, "log")) { |
| 198 | CPULogItem *item; |
| 199 | term_printf("Log items (comma separated):\n"); |
| 200 | term_printf("%-10s %s\n", "none", "remove all logs"); |
| 201 | for(item = cpu_log_items; item->mask != 0; item++) { |
| 202 | term_printf("%-10s %s\n", item->name, item->help); |
| 203 | } |
| 204 | } |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 205 | } |
| 206 | } |
| 207 | |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 208 | static void do_help(const char *name) |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 209 | { |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 210 | help_cmd(name); |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 211 | } |
| 212 | |
bellard | 7954c73 | 2006-08-01 15:52:40 +0000 | [diff] [blame] | 213 | static void do_commit(const char *device) |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 214 | { |
bellard | 7954c73 | 2006-08-01 15:52:40 +0000 | [diff] [blame] | 215 | int i, all_devices; |
balrog | 2dc7b60 | 2007-05-24 18:53:22 +0000 | [diff] [blame] | 216 | |
bellard | 7954c73 | 2006-08-01 15:52:40 +0000 | [diff] [blame] | 217 | all_devices = !strcmp(device, "all"); |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 218 | for (i = 0; i < MAX_DISKS; i++) { |
bellard | 7e2515e | 2004-08-01 21:52:19 +0000 | [diff] [blame] | 219 | if (bs_table[i]) { |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 220 | if (all_devices || |
bellard | 7954c73 | 2006-08-01 15:52:40 +0000 | [diff] [blame] | 221 | !strcmp(bdrv_get_device_name(bs_table[i]), device)) |
| 222 | bdrv_commit(bs_table[i]); |
bellard | 7e2515e | 2004-08-01 21:52:19 +0000 | [diff] [blame] | 223 | } |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 224 | } |
balrog | 2dc7b60 | 2007-05-24 18:53:22 +0000 | [diff] [blame] | 225 | if (mtd_bdrv) |
| 226 | if (all_devices || !strcmp(bdrv_get_device_name(mtd_bdrv), device)) |
| 227 | bdrv_commit(mtd_bdrv); |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 228 | } |
| 229 | |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 230 | static void do_info(const char *item) |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 231 | { |
| 232 | term_cmd_t *cmd; |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 233 | |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 234 | if (!item) |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 235 | goto help; |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 236 | for(cmd = info_cmds; cmd->name != NULL; cmd++) { |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 237 | if (compare_cmd(item, cmd->name)) |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 238 | goto found; |
| 239 | } |
| 240 | help: |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 241 | help_cmd("info"); |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 242 | return; |
| 243 | found: |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 244 | cmd->handler(); |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 245 | } |
| 246 | |
bellard | 9bc9d1c | 2004-10-10 15:15:51 +0000 | [diff] [blame] | 247 | static void do_info_version(void) |
| 248 | { |
| 249 | term_printf("%s\n", QEMU_VERSION); |
| 250 | } |
| 251 | |
ths | c35734b | 2007-03-19 15:17:08 +0000 | [diff] [blame] | 252 | static void do_info_name(void) |
| 253 | { |
| 254 | if (qemu_name) |
| 255 | term_printf("%s\n", qemu_name); |
| 256 | } |
| 257 | |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 258 | static void do_info_block(void) |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 259 | { |
| 260 | bdrv_info(); |
| 261 | } |
| 262 | |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 263 | /* get the current CPU defined by the user */ |
pbrook | 9596ebb | 2007-11-18 01:44:38 +0000 | [diff] [blame^] | 264 | static int mon_set_cpu(int cpu_index) |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 265 | { |
| 266 | CPUState *env; |
| 267 | |
| 268 | for(env = first_cpu; env != NULL; env = env->next_cpu) { |
| 269 | if (env->cpu_index == cpu_index) { |
| 270 | mon_cpu = env; |
| 271 | return 0; |
| 272 | } |
| 273 | } |
| 274 | return -1; |
| 275 | } |
| 276 | |
pbrook | 9596ebb | 2007-11-18 01:44:38 +0000 | [diff] [blame^] | 277 | static CPUState *mon_get_cpu(void) |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 278 | { |
| 279 | if (!mon_cpu) { |
| 280 | mon_set_cpu(0); |
| 281 | } |
| 282 | return mon_cpu; |
| 283 | } |
| 284 | |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 285 | static void do_info_registers(void) |
| 286 | { |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 287 | CPUState *env; |
| 288 | env = mon_get_cpu(); |
| 289 | if (!env) |
| 290 | return; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 291 | #ifdef TARGET_I386 |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 292 | cpu_dump_state(env, NULL, monitor_fprintf, |
bellard | d24b15a | 2005-07-03 21:28:00 +0000 | [diff] [blame] | 293 | X86_DUMP_FPU); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 294 | #else |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 295 | cpu_dump_state(env, NULL, monitor_fprintf, |
bellard | 7fe4848 | 2004-10-09 18:08:01 +0000 | [diff] [blame] | 296 | 0); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 297 | #endif |
| 298 | } |
| 299 | |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 300 | static void do_info_cpus(void) |
| 301 | { |
| 302 | CPUState *env; |
| 303 | |
| 304 | /* just to set the default cpu if not already done */ |
| 305 | mon_get_cpu(); |
| 306 | |
| 307 | for(env = first_cpu; env != NULL; env = env->next_cpu) { |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 308 | term_printf("%c CPU #%d:", |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 309 | (env == mon_cpu) ? '*' : ' ', |
| 310 | env->cpu_index); |
| 311 | #if defined(TARGET_I386) |
| 312 | term_printf(" pc=0x" TARGET_FMT_lx, env->eip + env->segs[R_CS].base); |
bellard | ad49ff9 | 2005-11-23 21:01:33 +0000 | [diff] [blame] | 313 | if (env->hflags & HF_HALTED_MASK) |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 314 | term_printf(" (halted)"); |
bellard | e80e1cc | 2005-11-23 22:05:28 +0000 | [diff] [blame] | 315 | #elif defined(TARGET_PPC) |
| 316 | term_printf(" nip=0x" TARGET_FMT_lx, env->nip); |
bellard | 50443c9 | 2005-11-26 20:15:14 +0000 | [diff] [blame] | 317 | if (env->halted) |
bellard | e80e1cc | 2005-11-23 22:05:28 +0000 | [diff] [blame] | 318 | term_printf(" (halted)"); |
bellard | ba3c64f | 2005-12-05 20:31:52 +0000 | [diff] [blame] | 319 | #elif defined(TARGET_SPARC) |
| 320 | term_printf(" pc=0x" TARGET_FMT_lx " npc=0x" TARGET_FMT_lx, env->pc, env->npc); |
| 321 | if (env->halted) |
| 322 | term_printf(" (halted)"); |
ths | ead9360 | 2007-09-06 00:18:15 +0000 | [diff] [blame] | 323 | #elif defined(TARGET_MIPS) |
| 324 | term_printf(" PC=0x" TARGET_FMT_lx, env->PC[env->current_tc]); |
| 325 | if (env->halted) |
| 326 | term_printf(" (halted)"); |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 327 | #endif |
| 328 | term_printf("\n"); |
| 329 | } |
| 330 | } |
| 331 | |
| 332 | static void do_cpu_set(int index) |
| 333 | { |
| 334 | if (mon_set_cpu(index) < 0) |
| 335 | term_printf("Invalid CPU index\n"); |
| 336 | } |
| 337 | |
bellard | e3db722 | 2005-01-26 22:00:47 +0000 | [diff] [blame] | 338 | static void do_info_jit(void) |
| 339 | { |
| 340 | dump_exec_info(NULL, monitor_fprintf); |
| 341 | } |
| 342 | |
bellard | aa45548 | 2004-04-04 13:07:25 +0000 | [diff] [blame] | 343 | static void do_info_history (void) |
| 344 | { |
| 345 | int i; |
bellard | 7e2515e | 2004-08-01 21:52:19 +0000 | [diff] [blame] | 346 | const char *str; |
ths | 3b46e62 | 2007-09-17 08:09:54 +0000 | [diff] [blame] | 347 | |
bellard | 7e2515e | 2004-08-01 21:52:19 +0000 | [diff] [blame] | 348 | i = 0; |
| 349 | for(;;) { |
| 350 | str = readline_get_history(i); |
| 351 | if (!str) |
| 352 | break; |
| 353 | term_printf("%d: '%s'\n", i, str); |
bellard | 8e3a9fd | 2004-10-09 17:32:58 +0000 | [diff] [blame] | 354 | i++; |
bellard | aa45548 | 2004-04-04 13:07:25 +0000 | [diff] [blame] | 355 | } |
| 356 | } |
| 357 | |
j_mayer | 76a6625 | 2007-03-07 08:32:30 +0000 | [diff] [blame] | 358 | #if defined(TARGET_PPC) |
| 359 | /* XXX: not implemented in other targets */ |
| 360 | static void do_info_cpu_stats (void) |
| 361 | { |
| 362 | CPUState *env; |
| 363 | |
| 364 | env = mon_get_cpu(); |
| 365 | cpu_dump_statistics(env, NULL, &monitor_fprintf, 0); |
| 366 | } |
| 367 | #endif |
| 368 | |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 369 | static void do_quit(void) |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 370 | { |
| 371 | exit(0); |
| 372 | } |
| 373 | |
| 374 | static int eject_device(BlockDriverState *bs, int force) |
| 375 | { |
| 376 | if (bdrv_is_inserted(bs)) { |
| 377 | if (!force) { |
| 378 | if (!bdrv_is_removable(bs)) { |
| 379 | term_printf("device is not removable\n"); |
| 380 | return -1; |
| 381 | } |
| 382 | if (bdrv_is_locked(bs)) { |
| 383 | term_printf("device is locked\n"); |
| 384 | return -1; |
| 385 | } |
| 386 | } |
| 387 | bdrv_close(bs); |
| 388 | } |
| 389 | return 0; |
| 390 | } |
| 391 | |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 392 | static void do_eject(int force, const char *filename) |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 393 | { |
| 394 | BlockDriverState *bs; |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 395 | |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 396 | bs = bdrv_find(filename); |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 397 | if (!bs) { |
| 398 | term_printf("device not found\n"); |
| 399 | return; |
| 400 | } |
| 401 | eject_device(bs, force); |
| 402 | } |
| 403 | |
ths | e25a582 | 2007-08-25 01:36:20 +0000 | [diff] [blame] | 404 | static void do_change_block(const char *device, const char *filename) |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 405 | { |
| 406 | BlockDriverState *bs; |
| 407 | |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 408 | bs = bdrv_find(device); |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 409 | if (!bs) { |
| 410 | term_printf("device not found\n"); |
| 411 | return; |
| 412 | } |
| 413 | if (eject_device(bs, 0) < 0) |
| 414 | return; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 415 | bdrv_open(bs, filename, 0); |
balrog | 2bac601 | 2007-04-30 01:34:31 +0000 | [diff] [blame] | 416 | qemu_key_check(bs, filename); |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 417 | } |
| 418 | |
ths | e25a582 | 2007-08-25 01:36:20 +0000 | [diff] [blame] | 419 | static void do_change_vnc(const char *target) |
| 420 | { |
ths | 7084851 | 2007-08-25 01:37:05 +0000 | [diff] [blame] | 421 | if (strcmp(target, "passwd") == 0 || |
| 422 | strcmp(target, "password") == 0) { |
| 423 | char password[9]; |
| 424 | monitor_readline("Password: ", 1, password, sizeof(password)-1); |
| 425 | password[sizeof(password)-1] = '\0'; |
| 426 | if (vnc_display_password(NULL, password) < 0) |
| 427 | term_printf("could not set VNC server password\n"); |
| 428 | } else { |
| 429 | if (vnc_display_open(NULL, target) < 0) |
| 430 | term_printf("could not start VNC server on %s\n", target); |
| 431 | } |
ths | e25a582 | 2007-08-25 01:36:20 +0000 | [diff] [blame] | 432 | } |
| 433 | |
| 434 | static void do_change(const char *device, const char *target) |
| 435 | { |
| 436 | if (strcmp(device, "vnc") == 0) { |
| 437 | do_change_vnc(target); |
| 438 | } else { |
| 439 | do_change_block(device, target); |
| 440 | } |
| 441 | } |
| 442 | |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 443 | static void do_screen_dump(const char *filename) |
bellard | 59a983b | 2004-03-17 23:17:16 +0000 | [diff] [blame] | 444 | { |
pbrook | 9521989 | 2006-04-09 01:06:34 +0000 | [diff] [blame] | 445 | vga_hw_screen_dump(filename); |
bellard | 59a983b | 2004-03-17 23:17:16 +0000 | [diff] [blame] | 446 | } |
| 447 | |
pbrook | e735b91 | 2007-06-30 13:53:24 +0000 | [diff] [blame] | 448 | static void do_logfile(const char *filename) |
| 449 | { |
| 450 | cpu_set_log_filename(filename); |
| 451 | } |
| 452 | |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 453 | static void do_log(const char *items) |
bellard | f193c79 | 2004-03-21 17:06:25 +0000 | [diff] [blame] | 454 | { |
| 455 | int mask; |
ths | 3b46e62 | 2007-09-17 08:09:54 +0000 | [diff] [blame] | 456 | |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 457 | if (!strcmp(items, "none")) { |
bellard | f193c79 | 2004-03-21 17:06:25 +0000 | [diff] [blame] | 458 | mask = 0; |
| 459 | } else { |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 460 | mask = cpu_str_to_log_mask(items); |
bellard | f193c79 | 2004-03-21 17:06:25 +0000 | [diff] [blame] | 461 | if (!mask) { |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 462 | help_cmd("log"); |
bellard | f193c79 | 2004-03-21 17:06:25 +0000 | [diff] [blame] | 463 | return; |
| 464 | } |
| 465 | } |
| 466 | cpu_set_log(mask); |
| 467 | } |
| 468 | |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 469 | static void do_stop(void) |
bellard | 8a7ddc3 | 2004-03-31 19:00:16 +0000 | [diff] [blame] | 470 | { |
| 471 | vm_stop(EXCP_INTERRUPT); |
| 472 | } |
| 473 | |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 474 | static void do_cont(void) |
bellard | 8a7ddc3 | 2004-03-31 19:00:16 +0000 | [diff] [blame] | 475 | { |
| 476 | vm_start(); |
| 477 | } |
| 478 | |
bellard | 67b915a | 2004-03-31 23:37:16 +0000 | [diff] [blame] | 479 | #ifdef CONFIG_GDBSTUB |
pbrook | cfc3475 | 2007-02-22 01:48:01 +0000 | [diff] [blame] | 480 | static void do_gdbserver(const char *port) |
bellard | 8a7ddc3 | 2004-03-31 19:00:16 +0000 | [diff] [blame] | 481 | { |
pbrook | cfc3475 | 2007-02-22 01:48:01 +0000 | [diff] [blame] | 482 | if (!port) |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 483 | port = DEFAULT_GDBSTUB_PORT; |
pbrook | cfc3475 | 2007-02-22 01:48:01 +0000 | [diff] [blame] | 484 | if (gdbserver_start(port) < 0) { |
| 485 | qemu_printf("Could not open gdbserver socket on port '%s'\n", port); |
bellard | 8a7ddc3 | 2004-03-31 19:00:16 +0000 | [diff] [blame] | 486 | } else { |
pbrook | cfc3475 | 2007-02-22 01:48:01 +0000 | [diff] [blame] | 487 | qemu_printf("Waiting gdb connection on port '%s'\n", port); |
bellard | 8a7ddc3 | 2004-03-31 19:00:16 +0000 | [diff] [blame] | 488 | } |
| 489 | } |
bellard | 67b915a | 2004-03-31 23:37:16 +0000 | [diff] [blame] | 490 | #endif |
bellard | 8a7ddc3 | 2004-03-31 19:00:16 +0000 | [diff] [blame] | 491 | |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 492 | static void term_printc(int c) |
| 493 | { |
| 494 | term_printf("'"); |
| 495 | switch(c) { |
| 496 | case '\'': |
| 497 | term_printf("\\'"); |
| 498 | break; |
| 499 | case '\\': |
| 500 | term_printf("\\\\"); |
| 501 | break; |
| 502 | case '\n': |
| 503 | term_printf("\\n"); |
| 504 | break; |
| 505 | case '\r': |
| 506 | term_printf("\\r"); |
| 507 | break; |
| 508 | default: |
| 509 | if (c >= 32 && c <= 126) { |
| 510 | term_printf("%c", c); |
| 511 | } else { |
| 512 | term_printf("\\x%02x", c); |
| 513 | } |
| 514 | break; |
| 515 | } |
| 516 | term_printf("'"); |
| 517 | } |
| 518 | |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 519 | static void memory_dump(int count, int format, int wsize, |
blueswir1 | 7743e58 | 2007-09-24 18:39:04 +0000 | [diff] [blame] | 520 | target_phys_addr_t addr, int is_physical) |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 521 | { |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 522 | CPUState *env; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 523 | int nb_per_line, l, line_size, i, max_digits, len; |
| 524 | uint8_t buf[16]; |
| 525 | uint64_t v; |
| 526 | |
| 527 | if (format == 'i') { |
| 528 | int flags; |
| 529 | flags = 0; |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 530 | env = mon_get_cpu(); |
| 531 | if (!env && !is_physical) |
| 532 | return; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 533 | #ifdef TARGET_I386 |
bellard | 4c27ba2 | 2004-04-25 18:05:08 +0000 | [diff] [blame] | 534 | if (wsize == 2) { |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 535 | flags = 1; |
bellard | 4c27ba2 | 2004-04-25 18:05:08 +0000 | [diff] [blame] | 536 | } else if (wsize == 4) { |
| 537 | flags = 0; |
| 538 | } else { |
bellard | 6a15fd1 | 2006-04-12 21:07:07 +0000 | [diff] [blame] | 539 | /* as default we use the current CS size */ |
bellard | 4c27ba2 | 2004-04-25 18:05:08 +0000 | [diff] [blame] | 540 | flags = 0; |
bellard | 6a15fd1 | 2006-04-12 21:07:07 +0000 | [diff] [blame] | 541 | if (env) { |
| 542 | #ifdef TARGET_X86_64 |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 543 | if ((env->efer & MSR_EFER_LMA) && |
bellard | 6a15fd1 | 2006-04-12 21:07:07 +0000 | [diff] [blame] | 544 | (env->segs[R_CS].flags & DESC_L_MASK)) |
| 545 | flags = 2; |
| 546 | else |
| 547 | #endif |
| 548 | if (!(env->segs[R_CS].flags & DESC_B_MASK)) |
| 549 | flags = 1; |
| 550 | } |
bellard | 4c27ba2 | 2004-04-25 18:05:08 +0000 | [diff] [blame] | 551 | } |
| 552 | #endif |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 553 | monitor_disas(env, addr, count, is_physical, flags); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 554 | return; |
| 555 | } |
| 556 | |
| 557 | len = wsize * count; |
| 558 | if (wsize == 1) |
| 559 | line_size = 8; |
| 560 | else |
| 561 | line_size = 16; |
| 562 | nb_per_line = line_size / wsize; |
| 563 | max_digits = 0; |
| 564 | |
| 565 | switch(format) { |
| 566 | case 'o': |
| 567 | max_digits = (wsize * 8 + 2) / 3; |
| 568 | break; |
| 569 | default: |
| 570 | case 'x': |
| 571 | max_digits = (wsize * 8) / 4; |
| 572 | break; |
| 573 | case 'u': |
| 574 | case 'd': |
| 575 | max_digits = (wsize * 8 * 10 + 32) / 33; |
| 576 | break; |
| 577 | case 'c': |
| 578 | wsize = 1; |
| 579 | break; |
| 580 | } |
| 581 | |
| 582 | while (len > 0) { |
blueswir1 | 7743e58 | 2007-09-24 18:39:04 +0000 | [diff] [blame] | 583 | if (is_physical) |
| 584 | term_printf(TARGET_FMT_plx ":", addr); |
| 585 | else |
| 586 | term_printf(TARGET_FMT_lx ":", (target_ulong)addr); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 587 | l = len; |
| 588 | if (l > line_size) |
| 589 | l = line_size; |
| 590 | if (is_physical) { |
| 591 | cpu_physical_memory_rw(addr, buf, l, 0); |
| 592 | } else { |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 593 | env = mon_get_cpu(); |
| 594 | if (!env) |
| 595 | break; |
| 596 | cpu_memory_rw_debug(env, addr, buf, l, 0); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 597 | } |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 598 | i = 0; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 599 | while (i < l) { |
| 600 | switch(wsize) { |
| 601 | default: |
| 602 | case 1: |
| 603 | v = ldub_raw(buf + i); |
| 604 | break; |
| 605 | case 2: |
| 606 | v = lduw_raw(buf + i); |
| 607 | break; |
| 608 | case 4: |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 609 | v = (uint32_t)ldl_raw(buf + i); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 610 | break; |
| 611 | case 8: |
| 612 | v = ldq_raw(buf + i); |
| 613 | break; |
| 614 | } |
| 615 | term_printf(" "); |
| 616 | switch(format) { |
| 617 | case 'o': |
bellard | 26a7646 | 2006-06-25 18:15:32 +0000 | [diff] [blame] | 618 | term_printf("%#*" PRIo64, max_digits, v); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 619 | break; |
| 620 | case 'x': |
bellard | 26a7646 | 2006-06-25 18:15:32 +0000 | [diff] [blame] | 621 | term_printf("0x%0*" PRIx64, max_digits, v); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 622 | break; |
| 623 | case 'u': |
bellard | 26a7646 | 2006-06-25 18:15:32 +0000 | [diff] [blame] | 624 | term_printf("%*" PRIu64, max_digits, v); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 625 | break; |
| 626 | case 'd': |
bellard | 26a7646 | 2006-06-25 18:15:32 +0000 | [diff] [blame] | 627 | term_printf("%*" PRId64, max_digits, v); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 628 | break; |
| 629 | case 'c': |
| 630 | term_printc(v); |
| 631 | break; |
| 632 | } |
| 633 | i += wsize; |
| 634 | } |
| 635 | term_printf("\n"); |
| 636 | addr += l; |
| 637 | len -= l; |
| 638 | } |
| 639 | } |
| 640 | |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 641 | #if TARGET_LONG_BITS == 64 |
| 642 | #define GET_TLONG(h, l) (((uint64_t)(h) << 32) | (l)) |
| 643 | #else |
| 644 | #define GET_TLONG(h, l) (l) |
| 645 | #endif |
| 646 | |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 647 | static void do_memory_dump(int count, int format, int size, |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 648 | uint32_t addrh, uint32_t addrl) |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 649 | { |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 650 | target_long addr = GET_TLONG(addrh, addrl); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 651 | memory_dump(count, format, size, addr, 0); |
| 652 | } |
| 653 | |
blueswir1 | 7743e58 | 2007-09-24 18:39:04 +0000 | [diff] [blame] | 654 | #if TARGET_PHYS_ADDR_BITS > 32 |
| 655 | #define GET_TPHYSADDR(h, l) (((uint64_t)(h) << 32) | (l)) |
| 656 | #else |
| 657 | #define GET_TPHYSADDR(h, l) (l) |
| 658 | #endif |
| 659 | |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 660 | static void do_physical_memory_dump(int count, int format, int size, |
| 661 | uint32_t addrh, uint32_t addrl) |
| 662 | |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 663 | { |
blueswir1 | 7743e58 | 2007-09-24 18:39:04 +0000 | [diff] [blame] | 664 | target_phys_addr_t addr = GET_TPHYSADDR(addrh, addrl); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 665 | memory_dump(count, format, size, addr, 1); |
| 666 | } |
| 667 | |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 668 | static void do_print(int count, int format, int size, unsigned int valh, unsigned int vall) |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 669 | { |
blueswir1 | 7743e58 | 2007-09-24 18:39:04 +0000 | [diff] [blame] | 670 | target_phys_addr_t val = GET_TPHYSADDR(valh, vall); |
| 671 | #if TARGET_PHYS_ADDR_BITS == 32 |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 672 | switch(format) { |
| 673 | case 'o': |
| 674 | term_printf("%#o", val); |
| 675 | break; |
| 676 | case 'x': |
| 677 | term_printf("%#x", val); |
| 678 | break; |
| 679 | case 'u': |
| 680 | term_printf("%u", val); |
| 681 | break; |
| 682 | default: |
| 683 | case 'd': |
| 684 | term_printf("%d", val); |
| 685 | break; |
| 686 | case 'c': |
| 687 | term_printc(val); |
| 688 | break; |
| 689 | } |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 690 | #else |
| 691 | switch(format) { |
| 692 | case 'o': |
bellard | 26a7646 | 2006-06-25 18:15:32 +0000 | [diff] [blame] | 693 | term_printf("%#" PRIo64, val); |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 694 | break; |
| 695 | case 'x': |
bellard | 26a7646 | 2006-06-25 18:15:32 +0000 | [diff] [blame] | 696 | term_printf("%#" PRIx64, val); |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 697 | break; |
| 698 | case 'u': |
bellard | 26a7646 | 2006-06-25 18:15:32 +0000 | [diff] [blame] | 699 | term_printf("%" PRIu64, val); |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 700 | break; |
| 701 | default: |
| 702 | case 'd': |
bellard | 26a7646 | 2006-06-25 18:15:32 +0000 | [diff] [blame] | 703 | term_printf("%" PRId64, val); |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 704 | break; |
| 705 | case 'c': |
| 706 | term_printc(val); |
| 707 | break; |
| 708 | } |
| 709 | #endif |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 710 | term_printf("\n"); |
| 711 | } |
| 712 | |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 713 | static void do_memory_save(unsigned int valh, unsigned int vall, |
bellard | b371dc5 | 2007-01-03 15:20:39 +0000 | [diff] [blame] | 714 | uint32_t size, const char *filename) |
| 715 | { |
| 716 | FILE *f; |
| 717 | target_long addr = GET_TLONG(valh, vall); |
| 718 | uint32_t l; |
| 719 | CPUState *env; |
| 720 | uint8_t buf[1024]; |
| 721 | |
| 722 | env = mon_get_cpu(); |
| 723 | if (!env) |
| 724 | return; |
| 725 | |
| 726 | f = fopen(filename, "wb"); |
| 727 | if (!f) { |
| 728 | term_printf("could not open '%s'\n", filename); |
| 729 | return; |
| 730 | } |
| 731 | while (size != 0) { |
| 732 | l = sizeof(buf); |
| 733 | if (l > size) |
| 734 | l = size; |
| 735 | cpu_memory_rw_debug(env, addr, buf, l, 0); |
| 736 | fwrite(buf, 1, l, f); |
| 737 | addr += l; |
| 738 | size -= l; |
| 739 | } |
| 740 | fclose(f); |
| 741 | } |
| 742 | |
bellard | e4cf1ad | 2005-06-04 20:15:57 +0000 | [diff] [blame] | 743 | static void do_sum(uint32_t start, uint32_t size) |
| 744 | { |
| 745 | uint32_t addr; |
| 746 | uint8_t buf[1]; |
| 747 | uint16_t sum; |
| 748 | |
| 749 | sum = 0; |
| 750 | for(addr = start; addr < (start + size); addr++) { |
| 751 | cpu_physical_memory_rw(addr, buf, 1, 0); |
| 752 | /* BSD sum algorithm ('sum' Unix command) */ |
| 753 | sum = (sum >> 1) | (sum << 15); |
| 754 | sum += buf[0]; |
| 755 | } |
| 756 | term_printf("%05d\n", sum); |
| 757 | } |
| 758 | |
bellard | a3a91a3 | 2004-06-04 11:06:21 +0000 | [diff] [blame] | 759 | typedef struct { |
| 760 | int keycode; |
| 761 | const char *name; |
| 762 | } KeyDef; |
| 763 | |
| 764 | static const KeyDef key_defs[] = { |
| 765 | { 0x2a, "shift" }, |
| 766 | { 0x36, "shift_r" }, |
ths | 3b46e62 | 2007-09-17 08:09:54 +0000 | [diff] [blame] | 767 | |
bellard | a3a91a3 | 2004-06-04 11:06:21 +0000 | [diff] [blame] | 768 | { 0x38, "alt" }, |
| 769 | { 0xb8, "alt_r" }, |
| 770 | { 0x1d, "ctrl" }, |
| 771 | { 0x9d, "ctrl_r" }, |
| 772 | |
| 773 | { 0xdd, "menu" }, |
| 774 | |
| 775 | { 0x01, "esc" }, |
| 776 | |
| 777 | { 0x02, "1" }, |
| 778 | { 0x03, "2" }, |
| 779 | { 0x04, "3" }, |
| 780 | { 0x05, "4" }, |
| 781 | { 0x06, "5" }, |
| 782 | { 0x07, "6" }, |
| 783 | { 0x08, "7" }, |
| 784 | { 0x09, "8" }, |
| 785 | { 0x0a, "9" }, |
| 786 | { 0x0b, "0" }, |
bellard | 64866c3 | 2006-05-07 18:03:31 +0000 | [diff] [blame] | 787 | { 0x0c, "minus" }, |
| 788 | { 0x0d, "equal" }, |
bellard | a3a91a3 | 2004-06-04 11:06:21 +0000 | [diff] [blame] | 789 | { 0x0e, "backspace" }, |
| 790 | |
| 791 | { 0x0f, "tab" }, |
| 792 | { 0x10, "q" }, |
| 793 | { 0x11, "w" }, |
| 794 | { 0x12, "e" }, |
| 795 | { 0x13, "r" }, |
| 796 | { 0x14, "t" }, |
| 797 | { 0x15, "y" }, |
| 798 | { 0x16, "u" }, |
| 799 | { 0x17, "i" }, |
| 800 | { 0x18, "o" }, |
| 801 | { 0x19, "p" }, |
| 802 | |
| 803 | { 0x1c, "ret" }, |
| 804 | |
| 805 | { 0x1e, "a" }, |
| 806 | { 0x1f, "s" }, |
| 807 | { 0x20, "d" }, |
| 808 | { 0x21, "f" }, |
| 809 | { 0x22, "g" }, |
| 810 | { 0x23, "h" }, |
| 811 | { 0x24, "j" }, |
| 812 | { 0x25, "k" }, |
| 813 | { 0x26, "l" }, |
| 814 | |
| 815 | { 0x2c, "z" }, |
| 816 | { 0x2d, "x" }, |
| 817 | { 0x2e, "c" }, |
| 818 | { 0x2f, "v" }, |
| 819 | { 0x30, "b" }, |
| 820 | { 0x31, "n" }, |
| 821 | { 0x32, "m" }, |
ths | 3b46e62 | 2007-09-17 08:09:54 +0000 | [diff] [blame] | 822 | |
bellard | a3a91a3 | 2004-06-04 11:06:21 +0000 | [diff] [blame] | 823 | { 0x39, "spc" }, |
bellard | 00ffa62 | 2004-06-04 13:25:15 +0000 | [diff] [blame] | 824 | { 0x3a, "caps_lock" }, |
bellard | a3a91a3 | 2004-06-04 11:06:21 +0000 | [diff] [blame] | 825 | { 0x3b, "f1" }, |
| 826 | { 0x3c, "f2" }, |
| 827 | { 0x3d, "f3" }, |
| 828 | { 0x3e, "f4" }, |
| 829 | { 0x3f, "f5" }, |
| 830 | { 0x40, "f6" }, |
| 831 | { 0x41, "f7" }, |
| 832 | { 0x42, "f8" }, |
| 833 | { 0x43, "f9" }, |
| 834 | { 0x44, "f10" }, |
bellard | 00ffa62 | 2004-06-04 13:25:15 +0000 | [diff] [blame] | 835 | { 0x45, "num_lock" }, |
bellard | a3a91a3 | 2004-06-04 11:06:21 +0000 | [diff] [blame] | 836 | { 0x46, "scroll_lock" }, |
| 837 | |
bellard | 64866c3 | 2006-05-07 18:03:31 +0000 | [diff] [blame] | 838 | { 0xb5, "kp_divide" }, |
| 839 | { 0x37, "kp_multiply" }, |
ths | 0cfec83 | 2007-06-23 16:02:43 +0000 | [diff] [blame] | 840 | { 0x4a, "kp_subtract" }, |
bellard | 64866c3 | 2006-05-07 18:03:31 +0000 | [diff] [blame] | 841 | { 0x4e, "kp_add" }, |
| 842 | { 0x9c, "kp_enter" }, |
| 843 | { 0x53, "kp_decimal" }, |
| 844 | |
| 845 | { 0x52, "kp_0" }, |
| 846 | { 0x4f, "kp_1" }, |
| 847 | { 0x50, "kp_2" }, |
| 848 | { 0x51, "kp_3" }, |
| 849 | { 0x4b, "kp_4" }, |
| 850 | { 0x4c, "kp_5" }, |
| 851 | { 0x4d, "kp_6" }, |
| 852 | { 0x47, "kp_7" }, |
| 853 | { 0x48, "kp_8" }, |
| 854 | { 0x49, "kp_9" }, |
ths | 3b46e62 | 2007-09-17 08:09:54 +0000 | [diff] [blame] | 855 | |
bellard | a3a91a3 | 2004-06-04 11:06:21 +0000 | [diff] [blame] | 856 | { 0x56, "<" }, |
| 857 | |
| 858 | { 0x57, "f11" }, |
| 859 | { 0x58, "f12" }, |
| 860 | |
| 861 | { 0xb7, "print" }, |
| 862 | |
| 863 | { 0xc7, "home" }, |
| 864 | { 0xc9, "pgup" }, |
| 865 | { 0xd1, "pgdn" }, |
| 866 | { 0xcf, "end" }, |
| 867 | |
| 868 | { 0xcb, "left" }, |
| 869 | { 0xc8, "up" }, |
| 870 | { 0xd0, "down" }, |
| 871 | { 0xcd, "right" }, |
| 872 | |
| 873 | { 0xd2, "insert" }, |
| 874 | { 0xd3, "delete" }, |
| 875 | { 0, NULL }, |
| 876 | }; |
| 877 | |
| 878 | static int get_keycode(const char *key) |
| 879 | { |
| 880 | const KeyDef *p; |
bellard | 64866c3 | 2006-05-07 18:03:31 +0000 | [diff] [blame] | 881 | char *endp; |
| 882 | int ret; |
bellard | a3a91a3 | 2004-06-04 11:06:21 +0000 | [diff] [blame] | 883 | |
| 884 | for(p = key_defs; p->name != NULL; p++) { |
| 885 | if (!strcmp(key, p->name)) |
| 886 | return p->keycode; |
| 887 | } |
bellard | 64866c3 | 2006-05-07 18:03:31 +0000 | [diff] [blame] | 888 | if (strstart(key, "0x", NULL)) { |
| 889 | ret = strtoul(key, &endp, 0); |
| 890 | if (*endp == '\0' && ret >= 0x01 && ret <= 0xff) |
| 891 | return ret; |
| 892 | } |
bellard | a3a91a3 | 2004-06-04 11:06:21 +0000 | [diff] [blame] | 893 | return -1; |
| 894 | } |
| 895 | |
| 896 | static void do_send_key(const char *string) |
| 897 | { |
| 898 | char keybuf[16], *q; |
| 899 | uint8_t keycodes[16]; |
| 900 | const char *p; |
| 901 | int nb_keycodes, keycode, i; |
ths | 3b46e62 | 2007-09-17 08:09:54 +0000 | [diff] [blame] | 902 | |
bellard | a3a91a3 | 2004-06-04 11:06:21 +0000 | [diff] [blame] | 903 | nb_keycodes = 0; |
| 904 | p = string; |
| 905 | while (*p != '\0') { |
| 906 | q = keybuf; |
| 907 | while (*p != '\0' && *p != '-') { |
| 908 | if ((q - keybuf) < sizeof(keybuf) - 1) { |
| 909 | *q++ = *p; |
| 910 | } |
| 911 | p++; |
| 912 | } |
| 913 | *q = '\0'; |
| 914 | keycode = get_keycode(keybuf); |
| 915 | if (keycode < 0) { |
| 916 | term_printf("unknown key: '%s'\n", keybuf); |
| 917 | return; |
| 918 | } |
| 919 | keycodes[nb_keycodes++] = keycode; |
| 920 | if (*p == '\0') |
| 921 | break; |
| 922 | p++; |
| 923 | } |
| 924 | /* key down events */ |
| 925 | for(i = 0; i < nb_keycodes; i++) { |
| 926 | keycode = keycodes[i]; |
| 927 | if (keycode & 0x80) |
| 928 | kbd_put_keycode(0xe0); |
| 929 | kbd_put_keycode(keycode & 0x7f); |
| 930 | } |
| 931 | /* key up events */ |
| 932 | for(i = nb_keycodes - 1; i >= 0; i--) { |
| 933 | keycode = keycodes[i]; |
| 934 | if (keycode & 0x80) |
| 935 | kbd_put_keycode(0xe0); |
| 936 | kbd_put_keycode(keycode | 0x80); |
| 937 | } |
| 938 | } |
| 939 | |
bellard | 13224a8 | 2006-07-14 22:03:35 +0000 | [diff] [blame] | 940 | static int mouse_button_state; |
| 941 | |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 942 | static void do_mouse_move(const char *dx_str, const char *dy_str, |
bellard | 13224a8 | 2006-07-14 22:03:35 +0000 | [diff] [blame] | 943 | const char *dz_str) |
| 944 | { |
| 945 | int dx, dy, dz; |
| 946 | dx = strtol(dx_str, NULL, 0); |
| 947 | dy = strtol(dy_str, NULL, 0); |
| 948 | dz = 0; |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 949 | if (dz_str) |
bellard | 13224a8 | 2006-07-14 22:03:35 +0000 | [diff] [blame] | 950 | dz = strtol(dz_str, NULL, 0); |
| 951 | kbd_mouse_event(dx, dy, dz, mouse_button_state); |
| 952 | } |
| 953 | |
| 954 | static void do_mouse_button(int button_state) |
| 955 | { |
| 956 | mouse_button_state = button_state; |
| 957 | kbd_mouse_event(0, 0, 0, mouse_button_state); |
| 958 | } |
| 959 | |
bellard | 3440557 | 2004-06-08 00:55:58 +0000 | [diff] [blame] | 960 | static void do_ioport_read(int count, int format, int size, int addr, int has_index, int index) |
| 961 | { |
| 962 | uint32_t val; |
| 963 | int suffix; |
| 964 | |
| 965 | if (has_index) { |
| 966 | cpu_outb(NULL, addr & 0xffff, index & 0xff); |
| 967 | addr++; |
| 968 | } |
| 969 | addr &= 0xffff; |
| 970 | |
| 971 | switch(size) { |
| 972 | default: |
| 973 | case 1: |
| 974 | val = cpu_inb(NULL, addr); |
| 975 | suffix = 'b'; |
| 976 | break; |
| 977 | case 2: |
| 978 | val = cpu_inw(NULL, addr); |
| 979 | suffix = 'w'; |
| 980 | break; |
| 981 | case 4: |
| 982 | val = cpu_inl(NULL, addr); |
| 983 | suffix = 'l'; |
| 984 | break; |
| 985 | } |
| 986 | term_printf("port%c[0x%04x] = %#0*x\n", |
| 987 | suffix, addr, size * 2, val); |
| 988 | } |
bellard | a3a91a3 | 2004-06-04 11:06:21 +0000 | [diff] [blame] | 989 | |
bellard | e4f9082 | 2004-06-20 12:35:44 +0000 | [diff] [blame] | 990 | static void do_system_reset(void) |
| 991 | { |
| 992 | qemu_system_reset_request(); |
| 993 | } |
| 994 | |
bellard | 3475187 | 2005-07-02 14:31:34 +0000 | [diff] [blame] | 995 | static void do_system_powerdown(void) |
| 996 | { |
| 997 | qemu_system_powerdown_request(); |
| 998 | } |
| 999 | |
bellard | b86bda5 | 2004-09-18 19:32:46 +0000 | [diff] [blame] | 1000 | #if defined(TARGET_I386) |
| 1001 | static void print_pte(uint32_t addr, uint32_t pte, uint32_t mask) |
| 1002 | { |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 1003 | term_printf("%08x: %08x %c%c%c%c%c%c%c%c\n", |
bellard | b86bda5 | 2004-09-18 19:32:46 +0000 | [diff] [blame] | 1004 | addr, |
| 1005 | pte & mask, |
| 1006 | pte & PG_GLOBAL_MASK ? 'G' : '-', |
| 1007 | pte & PG_PSE_MASK ? 'P' : '-', |
| 1008 | pte & PG_DIRTY_MASK ? 'D' : '-', |
| 1009 | pte & PG_ACCESSED_MASK ? 'A' : '-', |
| 1010 | pte & PG_PCD_MASK ? 'C' : '-', |
| 1011 | pte & PG_PWT_MASK ? 'T' : '-', |
| 1012 | pte & PG_USER_MASK ? 'U' : '-', |
| 1013 | pte & PG_RW_MASK ? 'W' : '-'); |
| 1014 | } |
| 1015 | |
| 1016 | static void tlb_info(void) |
| 1017 | { |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 1018 | CPUState *env; |
bellard | b86bda5 | 2004-09-18 19:32:46 +0000 | [diff] [blame] | 1019 | int l1, l2; |
| 1020 | uint32_t pgd, pde, pte; |
| 1021 | |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 1022 | env = mon_get_cpu(); |
| 1023 | if (!env) |
| 1024 | return; |
| 1025 | |
bellard | b86bda5 | 2004-09-18 19:32:46 +0000 | [diff] [blame] | 1026 | if (!(env->cr[0] & CR0_PG_MASK)) { |
| 1027 | term_printf("PG disabled\n"); |
| 1028 | return; |
| 1029 | } |
| 1030 | pgd = env->cr[3] & ~0xfff; |
| 1031 | for(l1 = 0; l1 < 1024; l1++) { |
| 1032 | cpu_physical_memory_read(pgd + l1 * 4, (uint8_t *)&pde, 4); |
| 1033 | pde = le32_to_cpu(pde); |
| 1034 | if (pde & PG_PRESENT_MASK) { |
| 1035 | if ((pde & PG_PSE_MASK) && (env->cr[4] & CR4_PSE_MASK)) { |
| 1036 | print_pte((l1 << 22), pde, ~((1 << 20) - 1)); |
| 1037 | } else { |
| 1038 | for(l2 = 0; l2 < 1024; l2++) { |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 1039 | cpu_physical_memory_read((pde & ~0xfff) + l2 * 4, |
bellard | b86bda5 | 2004-09-18 19:32:46 +0000 | [diff] [blame] | 1040 | (uint8_t *)&pte, 4); |
| 1041 | pte = le32_to_cpu(pte); |
| 1042 | if (pte & PG_PRESENT_MASK) { |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 1043 | print_pte((l1 << 22) + (l2 << 12), |
| 1044 | pte & ~PG_PSE_MASK, |
bellard | b86bda5 | 2004-09-18 19:32:46 +0000 | [diff] [blame] | 1045 | ~0xfff); |
| 1046 | } |
| 1047 | } |
| 1048 | } |
| 1049 | } |
| 1050 | } |
| 1051 | } |
| 1052 | |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 1053 | static void mem_print(uint32_t *pstart, int *plast_prot, |
bellard | b86bda5 | 2004-09-18 19:32:46 +0000 | [diff] [blame] | 1054 | uint32_t end, int prot) |
| 1055 | { |
bellard | 9746b15 | 2004-11-11 18:30:24 +0000 | [diff] [blame] | 1056 | int prot1; |
| 1057 | prot1 = *plast_prot; |
| 1058 | if (prot != prot1) { |
bellard | b86bda5 | 2004-09-18 19:32:46 +0000 | [diff] [blame] | 1059 | if (*pstart != -1) { |
| 1060 | term_printf("%08x-%08x %08x %c%c%c\n", |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 1061 | *pstart, end, end - *pstart, |
bellard | 9746b15 | 2004-11-11 18:30:24 +0000 | [diff] [blame] | 1062 | prot1 & PG_USER_MASK ? 'u' : '-', |
bellard | b86bda5 | 2004-09-18 19:32:46 +0000 | [diff] [blame] | 1063 | 'r', |
bellard | 9746b15 | 2004-11-11 18:30:24 +0000 | [diff] [blame] | 1064 | prot1 & PG_RW_MASK ? 'w' : '-'); |
bellard | b86bda5 | 2004-09-18 19:32:46 +0000 | [diff] [blame] | 1065 | } |
| 1066 | if (prot != 0) |
| 1067 | *pstart = end; |
| 1068 | else |
| 1069 | *pstart = -1; |
| 1070 | *plast_prot = prot; |
| 1071 | } |
| 1072 | } |
| 1073 | |
| 1074 | static void mem_info(void) |
| 1075 | { |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 1076 | CPUState *env; |
bellard | b86bda5 | 2004-09-18 19:32:46 +0000 | [diff] [blame] | 1077 | int l1, l2, prot, last_prot; |
| 1078 | uint32_t pgd, pde, pte, start, end; |
| 1079 | |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 1080 | env = mon_get_cpu(); |
| 1081 | if (!env) |
| 1082 | return; |
| 1083 | |
bellard | b86bda5 | 2004-09-18 19:32:46 +0000 | [diff] [blame] | 1084 | if (!(env->cr[0] & CR0_PG_MASK)) { |
| 1085 | term_printf("PG disabled\n"); |
| 1086 | return; |
| 1087 | } |
| 1088 | pgd = env->cr[3] & ~0xfff; |
| 1089 | last_prot = 0; |
| 1090 | start = -1; |
| 1091 | for(l1 = 0; l1 < 1024; l1++) { |
| 1092 | cpu_physical_memory_read(pgd + l1 * 4, (uint8_t *)&pde, 4); |
| 1093 | pde = le32_to_cpu(pde); |
| 1094 | end = l1 << 22; |
| 1095 | if (pde & PG_PRESENT_MASK) { |
| 1096 | if ((pde & PG_PSE_MASK) && (env->cr[4] & CR4_PSE_MASK)) { |
| 1097 | prot = pde & (PG_USER_MASK | PG_RW_MASK | PG_PRESENT_MASK); |
| 1098 | mem_print(&start, &last_prot, end, prot); |
| 1099 | } else { |
| 1100 | for(l2 = 0; l2 < 1024; l2++) { |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 1101 | cpu_physical_memory_read((pde & ~0xfff) + l2 * 4, |
bellard | b86bda5 | 2004-09-18 19:32:46 +0000 | [diff] [blame] | 1102 | (uint8_t *)&pte, 4); |
| 1103 | pte = le32_to_cpu(pte); |
| 1104 | end = (l1 << 22) + (l2 << 12); |
| 1105 | if (pte & PG_PRESENT_MASK) { |
| 1106 | prot = pte & (PG_USER_MASK | PG_RW_MASK | PG_PRESENT_MASK); |
| 1107 | } else { |
| 1108 | prot = 0; |
| 1109 | } |
| 1110 | mem_print(&start, &last_prot, end, prot); |
| 1111 | } |
| 1112 | } |
| 1113 | } else { |
| 1114 | prot = 0; |
| 1115 | mem_print(&start, &last_prot, end, prot); |
| 1116 | } |
| 1117 | } |
| 1118 | } |
| 1119 | #endif |
| 1120 | |
bellard | 0f4c641 | 2005-07-24 18:10:56 +0000 | [diff] [blame] | 1121 | static void do_info_kqemu(void) |
| 1122 | { |
| 1123 | #ifdef USE_KQEMU |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 1124 | CPUState *env; |
bellard | 0f4c641 | 2005-07-24 18:10:56 +0000 | [diff] [blame] | 1125 | int val; |
| 1126 | val = 0; |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 1127 | env = mon_get_cpu(); |
| 1128 | if (!env) { |
| 1129 | term_printf("No cpu initialized yet"); |
| 1130 | return; |
| 1131 | } |
| 1132 | val = env->kqemu_enabled; |
bellard | 5f1ce94 | 2006-02-08 22:40:15 +0000 | [diff] [blame] | 1133 | term_printf("kqemu support: "); |
| 1134 | switch(val) { |
| 1135 | default: |
| 1136 | case 0: |
| 1137 | term_printf("disabled\n"); |
| 1138 | break; |
| 1139 | case 1: |
| 1140 | term_printf("enabled for user code\n"); |
| 1141 | break; |
| 1142 | case 2: |
| 1143 | term_printf("enabled for user and kernel code\n"); |
| 1144 | break; |
| 1145 | } |
bellard | 0f4c641 | 2005-07-24 18:10:56 +0000 | [diff] [blame] | 1146 | #else |
bellard | 5f1ce94 | 2006-02-08 22:40:15 +0000 | [diff] [blame] | 1147 | term_printf("kqemu support: not compiled\n"); |
bellard | 0f4c641 | 2005-07-24 18:10:56 +0000 | [diff] [blame] | 1148 | #endif |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 1149 | } |
bellard | 0f4c641 | 2005-07-24 18:10:56 +0000 | [diff] [blame] | 1150 | |
bellard | 5f1ce94 | 2006-02-08 22:40:15 +0000 | [diff] [blame] | 1151 | #ifdef CONFIG_PROFILER |
| 1152 | |
| 1153 | int64_t kqemu_time; |
| 1154 | int64_t qemu_time; |
| 1155 | int64_t kqemu_exec_count; |
| 1156 | int64_t dev_time; |
| 1157 | int64_t kqemu_ret_int_count; |
| 1158 | int64_t kqemu_ret_excp_count; |
| 1159 | int64_t kqemu_ret_intr_count; |
| 1160 | |
| 1161 | static void do_info_profile(void) |
| 1162 | { |
| 1163 | int64_t total; |
| 1164 | total = qemu_time; |
| 1165 | if (total == 0) |
| 1166 | total = 1; |
bellard | 26a7646 | 2006-06-25 18:15:32 +0000 | [diff] [blame] | 1167 | term_printf("async time %" PRId64 " (%0.3f)\n", |
bellard | 5f1ce94 | 2006-02-08 22:40:15 +0000 | [diff] [blame] | 1168 | dev_time, dev_time / (double)ticks_per_sec); |
bellard | 26a7646 | 2006-06-25 18:15:32 +0000 | [diff] [blame] | 1169 | term_printf("qemu time %" PRId64 " (%0.3f)\n", |
bellard | 5f1ce94 | 2006-02-08 22:40:15 +0000 | [diff] [blame] | 1170 | qemu_time, qemu_time / (double)ticks_per_sec); |
bellard | 26a7646 | 2006-06-25 18:15:32 +0000 | [diff] [blame] | 1171 | term_printf("kqemu time %" PRId64 " (%0.3f %0.1f%%) count=%" PRId64 " int=%" PRId64 " excp=%" PRId64 " intr=%" PRId64 "\n", |
bellard | 5f1ce94 | 2006-02-08 22:40:15 +0000 | [diff] [blame] | 1172 | kqemu_time, kqemu_time / (double)ticks_per_sec, |
| 1173 | kqemu_time / (double)total * 100.0, |
| 1174 | kqemu_exec_count, |
| 1175 | kqemu_ret_int_count, |
| 1176 | kqemu_ret_excp_count, |
| 1177 | kqemu_ret_intr_count); |
| 1178 | qemu_time = 0; |
| 1179 | kqemu_time = 0; |
| 1180 | kqemu_exec_count = 0; |
| 1181 | dev_time = 0; |
| 1182 | kqemu_ret_int_count = 0; |
| 1183 | kqemu_ret_excp_count = 0; |
| 1184 | kqemu_ret_intr_count = 0; |
| 1185 | #ifdef USE_KQEMU |
| 1186 | kqemu_record_dump(); |
| 1187 | #endif |
| 1188 | } |
| 1189 | #else |
| 1190 | static void do_info_profile(void) |
| 1191 | { |
| 1192 | term_printf("Internal profiler not compiled\n"); |
| 1193 | } |
| 1194 | #endif |
| 1195 | |
bellard | ec36b69 | 2006-07-16 18:57:03 +0000 | [diff] [blame] | 1196 | /* Capture support */ |
| 1197 | static LIST_HEAD (capture_list_head, CaptureState) capture_head; |
| 1198 | |
| 1199 | static void do_info_capture (void) |
| 1200 | { |
| 1201 | int i; |
| 1202 | CaptureState *s; |
| 1203 | |
| 1204 | for (s = capture_head.lh_first, i = 0; s; s = s->entries.le_next, ++i) { |
| 1205 | term_printf ("[%d]: ", i); |
| 1206 | s->ops.info (s->opaque); |
| 1207 | } |
| 1208 | } |
| 1209 | |
| 1210 | static void do_stop_capture (int n) |
| 1211 | { |
| 1212 | int i; |
| 1213 | CaptureState *s; |
| 1214 | |
| 1215 | for (s = capture_head.lh_first, i = 0; s; s = s->entries.le_next, ++i) { |
| 1216 | if (i == n) { |
| 1217 | s->ops.destroy (s->opaque); |
| 1218 | LIST_REMOVE (s, entries); |
| 1219 | qemu_free (s); |
| 1220 | return; |
| 1221 | } |
| 1222 | } |
| 1223 | } |
| 1224 | |
| 1225 | #ifdef HAS_AUDIO |
| 1226 | int wav_start_capture (CaptureState *s, const char *path, int freq, |
| 1227 | int bits, int nchannels); |
| 1228 | |
| 1229 | static void do_wav_capture (const char *path, |
| 1230 | int has_freq, int freq, |
| 1231 | int has_bits, int bits, |
| 1232 | int has_channels, int nchannels) |
| 1233 | { |
| 1234 | CaptureState *s; |
| 1235 | |
| 1236 | s = qemu_mallocz (sizeof (*s)); |
| 1237 | if (!s) { |
| 1238 | term_printf ("Not enough memory to add wave capture\n"); |
| 1239 | return; |
| 1240 | } |
| 1241 | |
| 1242 | freq = has_freq ? freq : 44100; |
| 1243 | bits = has_bits ? bits : 16; |
| 1244 | nchannels = has_channels ? nchannels : 2; |
| 1245 | |
| 1246 | if (wav_start_capture (s, path, freq, bits, nchannels)) { |
| 1247 | term_printf ("Faied to add wave capture\n"); |
| 1248 | qemu_free (s); |
| 1249 | } |
| 1250 | LIST_INSERT_HEAD (&capture_head, s, entries); |
| 1251 | } |
| 1252 | #endif |
| 1253 | |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 1254 | static term_cmd_t term_cmds[] = { |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 1255 | { "help|?", "s?", do_help, |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 1256 | "[cmd]", "show the help" }, |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 1257 | { "commit", "s", do_commit, |
bellard | 7954c73 | 2006-08-01 15:52:40 +0000 | [diff] [blame] | 1258 | "device|all", "commit changes to the disk images (if -snapshot is used) or backing files" }, |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1259 | { "info", "s?", do_info, |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 1260 | "subcommand", "show various information about the system state" }, |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1261 | { "q|quit", "", do_quit, |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 1262 | "", "quit the emulator" }, |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 1263 | { "eject", "-fB", do_eject, |
ths | e598752 | 2007-03-30 18:58:01 +0000 | [diff] [blame] | 1264 | "[-f] device", "eject a removable medium (use -f to force it)" }, |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 1265 | { "change", "BF", do_change, |
ths | e598752 | 2007-03-30 18:58:01 +0000 | [diff] [blame] | 1266 | "device filename", "change a removable medium" }, |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 1267 | { "screendump", "F", do_screen_dump, |
bellard | 59a983b | 2004-03-17 23:17:16 +0000 | [diff] [blame] | 1268 | "filename", "save screen into PPM image 'filename'" }, |
pbrook | e735b91 | 2007-06-30 13:53:24 +0000 | [diff] [blame] | 1269 | { "logfile", "s", do_logfile, |
| 1270 | "filename", "output logs to 'filename'" }, |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1271 | { "log", "s", do_log, |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 1272 | "item1[,...]", "activate logging of the specified items to '/tmp/qemu.log'" }, |
bellard | faea38e | 2006-08-05 21:31:00 +0000 | [diff] [blame] | 1273 | { "savevm", "s?", do_savevm, |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 1274 | "tag|id", "save a VM snapshot. If no tag or id are provided, a new snapshot is created" }, |
bellard | faea38e | 2006-08-05 21:31:00 +0000 | [diff] [blame] | 1275 | { "loadvm", "s", do_loadvm, |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 1276 | "tag|id", "restore a VM snapshot from its tag or id" }, |
bellard | faea38e | 2006-08-05 21:31:00 +0000 | [diff] [blame] | 1277 | { "delvm", "s", do_delvm, |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 1278 | "tag|id", "delete a VM snapshot from its tag or id" }, |
| 1279 | { "stop", "", do_stop, |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1280 | "", "stop emulation", }, |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 1281 | { "c|cont", "", do_cont, |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1282 | "", "resume emulation", }, |
bellard | 67b915a | 2004-03-31 23:37:16 +0000 | [diff] [blame] | 1283 | #ifdef CONFIG_GDBSTUB |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 1284 | { "gdbserver", "s?", do_gdbserver, |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1285 | "[port]", "start gdbserver session (default port=1234)", }, |
bellard | 67b915a | 2004-03-31 23:37:16 +0000 | [diff] [blame] | 1286 | #endif |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 1287 | { "x", "/l", do_memory_dump, |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1288 | "/fmt addr", "virtual memory dump starting at 'addr'", }, |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 1289 | { "xp", "/l", do_physical_memory_dump, |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1290 | "/fmt addr", "physical memory dump starting at 'addr'", }, |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 1291 | { "p|print", "/l", do_print, |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1292 | "/fmt expr", "print expression value (use $reg for CPU register access)", }, |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 1293 | { "i", "/ii.", do_ioport_read, |
bellard | 3440557 | 2004-06-08 00:55:58 +0000 | [diff] [blame] | 1294 | "/fmt addr", "I/O port read" }, |
| 1295 | |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 1296 | { "sendkey", "s", do_send_key, |
bellard | a3a91a3 | 2004-06-04 11:06:21 +0000 | [diff] [blame] | 1297 | "keys", "send keys to the VM (e.g. 'sendkey ctrl-alt-f1')" }, |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 1298 | { "system_reset", "", do_system_reset, |
bellard | e4f9082 | 2004-06-20 12:35:44 +0000 | [diff] [blame] | 1299 | "", "reset the system" }, |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 1300 | { "system_powerdown", "", do_system_powerdown, |
bellard | 3475187 | 2005-07-02 14:31:34 +0000 | [diff] [blame] | 1301 | "", "send system power down event" }, |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 1302 | { "sum", "ii", do_sum, |
bellard | e4cf1ad | 2005-06-04 20:15:57 +0000 | [diff] [blame] | 1303 | "addr size", "compute the checksum of a memory region" }, |
bellard | a594cfb | 2005-11-06 16:13:29 +0000 | [diff] [blame] | 1304 | { "usb_add", "s", do_usb_add, |
| 1305 | "device", "add USB device (e.g. 'host:bus.addr' or 'host:vendor_id:product_id')" }, |
| 1306 | { "usb_del", "s", do_usb_del, |
| 1307 | "device", "remove USB device 'bus.addr'" }, |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 1308 | { "cpu", "i", do_cpu_set, |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 1309 | "index", "set the default CPU" }, |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 1310 | { "mouse_move", "sss?", do_mouse_move, |
bellard | 13224a8 | 2006-07-14 22:03:35 +0000 | [diff] [blame] | 1311 | "dx dy [dz]", "send mouse move events" }, |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 1312 | { "mouse_button", "i", do_mouse_button, |
bellard | 13224a8 | 2006-07-14 22:03:35 +0000 | [diff] [blame] | 1313 | "state", "change mouse button state (1=L, 2=M, 4=R)" }, |
ths | 455204e | 2007-01-05 16:42:13 +0000 | [diff] [blame] | 1314 | { "mouse_set", "i", do_mouse_set, |
| 1315 | "index", "set which mouse device receives events" }, |
bellard | ec36b69 | 2006-07-16 18:57:03 +0000 | [diff] [blame] | 1316 | #ifdef HAS_AUDIO |
| 1317 | { "wavcapture", "si?i?i?", do_wav_capture, |
| 1318 | "path [frequency bits channels]", |
| 1319 | "capture audio to a wave file (default frequency=44100 bits=16 channels=2)" }, |
| 1320 | #endif |
| 1321 | { "stopcapture", "i", do_stop_capture, |
| 1322 | "capture index", "stop capture" }, |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 1323 | { "memsave", "lis", do_memory_save, |
bellard | b371dc5 | 2007-01-03 15:20:39 +0000 | [diff] [blame] | 1324 | "addr size file", "save to disk virtual memory dump starting at 'addr' of size 'size'", }, |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 1325 | { NULL, NULL, }, |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 1326 | }; |
| 1327 | |
| 1328 | static term_cmd_t info_cmds[] = { |
bellard | 9bc9d1c | 2004-10-10 15:15:51 +0000 | [diff] [blame] | 1329 | { "version", "", do_info_version, |
| 1330 | "", "show the version of qemu" }, |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1331 | { "network", "", do_info_network, |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 1332 | "", "show the network state" }, |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1333 | { "block", "", do_info_block, |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 1334 | "", "show the block devices" }, |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1335 | { "registers", "", do_info_registers, |
| 1336 | "", "show the cpu registers" }, |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 1337 | { "cpus", "", do_info_cpus, |
| 1338 | "", "show infos for each CPU" }, |
bellard | aa45548 | 2004-04-04 13:07:25 +0000 | [diff] [blame] | 1339 | { "history", "", do_info_history, |
| 1340 | "", "show the command line history", }, |
bellard | 4a0fb71 | 2004-05-21 11:39:07 +0000 | [diff] [blame] | 1341 | { "irq", "", irq_info, |
| 1342 | "", "show the interrupts statistics (if available)", }, |
bellard | 4c27ba2 | 2004-04-25 18:05:08 +0000 | [diff] [blame] | 1343 | { "pic", "", pic_info, |
| 1344 | "", "show i8259 (PIC) state", }, |
bellard | 86e0c04 | 2004-05-20 12:49:21 +0000 | [diff] [blame] | 1345 | { "pci", "", pci_info, |
| 1346 | "", "show PCI info", }, |
bellard | b86bda5 | 2004-09-18 19:32:46 +0000 | [diff] [blame] | 1347 | #if defined(TARGET_I386) |
| 1348 | { "tlb", "", tlb_info, |
| 1349 | "", "show virtual to physical memory mappings", }, |
| 1350 | { "mem", "", mem_info, |
| 1351 | "", "show the active virtual memory mappings", }, |
| 1352 | #endif |
bellard | e3db722 | 2005-01-26 22:00:47 +0000 | [diff] [blame] | 1353 | { "jit", "", do_info_jit, |
| 1354 | "", "show dynamic compiler info", }, |
bellard | 0f4c641 | 2005-07-24 18:10:56 +0000 | [diff] [blame] | 1355 | { "kqemu", "", do_info_kqemu, |
| 1356 | "", "show kqemu information", }, |
bellard | a594cfb | 2005-11-06 16:13:29 +0000 | [diff] [blame] | 1357 | { "usb", "", usb_info, |
| 1358 | "", "show guest USB devices", }, |
| 1359 | { "usbhost", "", usb_host_info, |
| 1360 | "", "show host USB devices", }, |
bellard | 5f1ce94 | 2006-02-08 22:40:15 +0000 | [diff] [blame] | 1361 | { "profile", "", do_info_profile, |
| 1362 | "", "show profiling information", }, |
bellard | ec36b69 | 2006-07-16 18:57:03 +0000 | [diff] [blame] | 1363 | { "capture", "", do_info_capture, |
bellard | 1710015 | 2006-09-25 21:33:49 +0000 | [diff] [blame] | 1364 | "", "show capture information" }, |
bellard | faea38e | 2006-08-05 21:31:00 +0000 | [diff] [blame] | 1365 | { "snapshots", "", do_info_snapshots, |
bellard | 1710015 | 2006-09-25 21:33:49 +0000 | [diff] [blame] | 1366 | "", "show the currently saved VM snapshots" }, |
balrog | 201a51f | 2007-04-30 00:51:09 +0000 | [diff] [blame] | 1367 | { "pcmcia", "", pcmcia_info, |
| 1368 | "", "show guest PCMCIA status" }, |
ths | 455204e | 2007-01-05 16:42:13 +0000 | [diff] [blame] | 1369 | { "mice", "", do_info_mice, |
| 1370 | "", "show which guest mouse is receiving events" }, |
bellard | a9ce859 | 2007-02-05 20:20:30 +0000 | [diff] [blame] | 1371 | { "vnc", "", do_info_vnc, |
| 1372 | "", "show the vnc server status"}, |
ths | c35734b | 2007-03-19 15:17:08 +0000 | [diff] [blame] | 1373 | { "name", "", do_info_name, |
| 1374 | "", "show the current VM name" }, |
j_mayer | 76a6625 | 2007-03-07 08:32:30 +0000 | [diff] [blame] | 1375 | #if defined(TARGET_PPC) |
| 1376 | { "cpustats", "", do_info_cpu_stats, |
| 1377 | "", "show CPU statistics", }, |
| 1378 | #endif |
blueswir1 | 31a60e2 | 2007-10-26 18:42:59 +0000 | [diff] [blame] | 1379 | #if defined(CONFIG_SLIRP) |
| 1380 | { "slirp", "", do_info_slirp, |
| 1381 | "", "show SLIRP statistics", }, |
| 1382 | #endif |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 1383 | { NULL, NULL, }, |
| 1384 | }; |
| 1385 | |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1386 | /*******************************************************************/ |
| 1387 | |
| 1388 | static const char *pch; |
| 1389 | static jmp_buf expr_env; |
| 1390 | |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 1391 | #define MD_TLONG 0 |
| 1392 | #define MD_I32 1 |
| 1393 | |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1394 | typedef struct MonitorDef { |
| 1395 | const char *name; |
| 1396 | int offset; |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 1397 | target_long (*get_value)(struct MonitorDef *md, int val); |
| 1398 | int type; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1399 | } MonitorDef; |
| 1400 | |
bellard | 57206fd | 2004-04-25 18:54:52 +0000 | [diff] [blame] | 1401 | #if defined(TARGET_I386) |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 1402 | static target_long monitor_get_pc (struct MonitorDef *md, int val) |
bellard | 57206fd | 2004-04-25 18:54:52 +0000 | [diff] [blame] | 1403 | { |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 1404 | CPUState *env = mon_get_cpu(); |
| 1405 | if (!env) |
| 1406 | return 0; |
| 1407 | return env->eip + env->segs[R_CS].base; |
bellard | 57206fd | 2004-04-25 18:54:52 +0000 | [diff] [blame] | 1408 | } |
| 1409 | #endif |
| 1410 | |
bellard | a541f29 | 2004-04-12 20:39:29 +0000 | [diff] [blame] | 1411 | #if defined(TARGET_PPC) |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 1412 | static target_long monitor_get_ccr (struct MonitorDef *md, int val) |
bellard | a541f29 | 2004-04-12 20:39:29 +0000 | [diff] [blame] | 1413 | { |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 1414 | CPUState *env = mon_get_cpu(); |
bellard | a541f29 | 2004-04-12 20:39:29 +0000 | [diff] [blame] | 1415 | unsigned int u; |
| 1416 | int i; |
| 1417 | |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 1418 | if (!env) |
| 1419 | return 0; |
| 1420 | |
bellard | a541f29 | 2004-04-12 20:39:29 +0000 | [diff] [blame] | 1421 | u = 0; |
| 1422 | for (i = 0; i < 8; i++) |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 1423 | u |= env->crf[i] << (32 - (4 * i)); |
bellard | a541f29 | 2004-04-12 20:39:29 +0000 | [diff] [blame] | 1424 | |
| 1425 | return u; |
| 1426 | } |
| 1427 | |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 1428 | static target_long monitor_get_msr (struct MonitorDef *md, int val) |
bellard | a541f29 | 2004-04-12 20:39:29 +0000 | [diff] [blame] | 1429 | { |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 1430 | CPUState *env = mon_get_cpu(); |
| 1431 | if (!env) |
| 1432 | return 0; |
j_mayer | 0411a97 | 2007-10-25 21:35:50 +0000 | [diff] [blame] | 1433 | return env->msr; |
bellard | a541f29 | 2004-04-12 20:39:29 +0000 | [diff] [blame] | 1434 | } |
| 1435 | |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 1436 | static target_long monitor_get_xer (struct MonitorDef *md, int val) |
bellard | a541f29 | 2004-04-12 20:39:29 +0000 | [diff] [blame] | 1437 | { |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 1438 | CPUState *env = mon_get_cpu(); |
| 1439 | if (!env) |
| 1440 | return 0; |
j_mayer | ff937db | 2007-09-19 05:49:13 +0000 | [diff] [blame] | 1441 | return ppc_load_xer(env); |
bellard | a541f29 | 2004-04-12 20:39:29 +0000 | [diff] [blame] | 1442 | } |
bellard | 9fddaa0 | 2004-05-21 12:59:32 +0000 | [diff] [blame] | 1443 | |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 1444 | static target_long monitor_get_decr (struct MonitorDef *md, int val) |
bellard | 9fddaa0 | 2004-05-21 12:59:32 +0000 | [diff] [blame] | 1445 | { |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 1446 | CPUState *env = mon_get_cpu(); |
| 1447 | if (!env) |
| 1448 | return 0; |
| 1449 | return cpu_ppc_load_decr(env); |
bellard | 9fddaa0 | 2004-05-21 12:59:32 +0000 | [diff] [blame] | 1450 | } |
| 1451 | |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 1452 | static target_long monitor_get_tbu (struct MonitorDef *md, int val) |
bellard | 9fddaa0 | 2004-05-21 12:59:32 +0000 | [diff] [blame] | 1453 | { |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 1454 | CPUState *env = mon_get_cpu(); |
| 1455 | if (!env) |
| 1456 | return 0; |
| 1457 | return cpu_ppc_load_tbu(env); |
bellard | 9fddaa0 | 2004-05-21 12:59:32 +0000 | [diff] [blame] | 1458 | } |
| 1459 | |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 1460 | static target_long monitor_get_tbl (struct MonitorDef *md, int val) |
bellard | 9fddaa0 | 2004-05-21 12:59:32 +0000 | [diff] [blame] | 1461 | { |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 1462 | CPUState *env = mon_get_cpu(); |
| 1463 | if (!env) |
| 1464 | return 0; |
| 1465 | return cpu_ppc_load_tbl(env); |
bellard | 9fddaa0 | 2004-05-21 12:59:32 +0000 | [diff] [blame] | 1466 | } |
bellard | a541f29 | 2004-04-12 20:39:29 +0000 | [diff] [blame] | 1467 | #endif |
| 1468 | |
bellard | e95c8d5 | 2004-09-30 22:22:08 +0000 | [diff] [blame] | 1469 | #if defined(TARGET_SPARC) |
bellard | 7b936c0 | 2005-10-30 17:05:13 +0000 | [diff] [blame] | 1470 | #ifndef TARGET_SPARC64 |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 1471 | static target_long monitor_get_psr (struct MonitorDef *md, int val) |
bellard | e95c8d5 | 2004-09-30 22:22:08 +0000 | [diff] [blame] | 1472 | { |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 1473 | CPUState *env = mon_get_cpu(); |
| 1474 | if (!env) |
| 1475 | return 0; |
| 1476 | return GET_PSR(env); |
bellard | e95c8d5 | 2004-09-30 22:22:08 +0000 | [diff] [blame] | 1477 | } |
bellard | 7b936c0 | 2005-10-30 17:05:13 +0000 | [diff] [blame] | 1478 | #endif |
bellard | e95c8d5 | 2004-09-30 22:22:08 +0000 | [diff] [blame] | 1479 | |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 1480 | static target_long monitor_get_reg(struct MonitorDef *md, int val) |
bellard | e95c8d5 | 2004-09-30 22:22:08 +0000 | [diff] [blame] | 1481 | { |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 1482 | CPUState *env = mon_get_cpu(); |
| 1483 | if (!env) |
| 1484 | return 0; |
| 1485 | return env->regwptr[val]; |
bellard | e95c8d5 | 2004-09-30 22:22:08 +0000 | [diff] [blame] | 1486 | } |
| 1487 | #endif |
| 1488 | |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1489 | static MonitorDef monitor_defs[] = { |
| 1490 | #ifdef TARGET_I386 |
bellard | 57206fd | 2004-04-25 18:54:52 +0000 | [diff] [blame] | 1491 | |
| 1492 | #define SEG(name, seg) \ |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 1493 | { name, offsetof(CPUState, segs[seg].selector), NULL, MD_I32 },\ |
bellard | 57206fd | 2004-04-25 18:54:52 +0000 | [diff] [blame] | 1494 | { name ".base", offsetof(CPUState, segs[seg].base) },\ |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 1495 | { name ".limit", offsetof(CPUState, segs[seg].limit), NULL, MD_I32 }, |
bellard | 57206fd | 2004-04-25 18:54:52 +0000 | [diff] [blame] | 1496 | |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1497 | { "eax", offsetof(CPUState, regs[0]) }, |
| 1498 | { "ecx", offsetof(CPUState, regs[1]) }, |
| 1499 | { "edx", offsetof(CPUState, regs[2]) }, |
| 1500 | { "ebx", offsetof(CPUState, regs[3]) }, |
| 1501 | { "esp|sp", offsetof(CPUState, regs[4]) }, |
| 1502 | { "ebp|fp", offsetof(CPUState, regs[5]) }, |
| 1503 | { "esi", offsetof(CPUState, regs[6]) }, |
bellard | 01038d2 | 2004-09-13 21:36:46 +0000 | [diff] [blame] | 1504 | { "edi", offsetof(CPUState, regs[7]) }, |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 1505 | #ifdef TARGET_X86_64 |
| 1506 | { "r8", offsetof(CPUState, regs[8]) }, |
| 1507 | { "r9", offsetof(CPUState, regs[9]) }, |
| 1508 | { "r10", offsetof(CPUState, regs[10]) }, |
| 1509 | { "r11", offsetof(CPUState, regs[11]) }, |
| 1510 | { "r12", offsetof(CPUState, regs[12]) }, |
| 1511 | { "r13", offsetof(CPUState, regs[13]) }, |
| 1512 | { "r14", offsetof(CPUState, regs[14]) }, |
| 1513 | { "r15", offsetof(CPUState, regs[15]) }, |
| 1514 | #endif |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1515 | { "eflags", offsetof(CPUState, eflags) }, |
bellard | 57206fd | 2004-04-25 18:54:52 +0000 | [diff] [blame] | 1516 | { "eip", offsetof(CPUState, eip) }, |
| 1517 | SEG("cs", R_CS) |
| 1518 | SEG("ds", R_DS) |
| 1519 | SEG("es", R_ES) |
bellard | 01038d2 | 2004-09-13 21:36:46 +0000 | [diff] [blame] | 1520 | SEG("ss", R_SS) |
bellard | 57206fd | 2004-04-25 18:54:52 +0000 | [diff] [blame] | 1521 | SEG("fs", R_FS) |
| 1522 | SEG("gs", R_GS) |
| 1523 | { "pc", 0, monitor_get_pc, }, |
bellard | a541f29 | 2004-04-12 20:39:29 +0000 | [diff] [blame] | 1524 | #elif defined(TARGET_PPC) |
j_mayer | ff937db | 2007-09-19 05:49:13 +0000 | [diff] [blame] | 1525 | /* General purpose registers */ |
bellard | a541f29 | 2004-04-12 20:39:29 +0000 | [diff] [blame] | 1526 | { "r0", offsetof(CPUState, gpr[0]) }, |
| 1527 | { "r1", offsetof(CPUState, gpr[1]) }, |
| 1528 | { "r2", offsetof(CPUState, gpr[2]) }, |
| 1529 | { "r3", offsetof(CPUState, gpr[3]) }, |
| 1530 | { "r4", offsetof(CPUState, gpr[4]) }, |
| 1531 | { "r5", offsetof(CPUState, gpr[5]) }, |
| 1532 | { "r6", offsetof(CPUState, gpr[6]) }, |
| 1533 | { "r7", offsetof(CPUState, gpr[7]) }, |
| 1534 | { "r8", offsetof(CPUState, gpr[8]) }, |
| 1535 | { "r9", offsetof(CPUState, gpr[9]) }, |
| 1536 | { "r10", offsetof(CPUState, gpr[10]) }, |
| 1537 | { "r11", offsetof(CPUState, gpr[11]) }, |
| 1538 | { "r12", offsetof(CPUState, gpr[12]) }, |
| 1539 | { "r13", offsetof(CPUState, gpr[13]) }, |
| 1540 | { "r14", offsetof(CPUState, gpr[14]) }, |
| 1541 | { "r15", offsetof(CPUState, gpr[15]) }, |
| 1542 | { "r16", offsetof(CPUState, gpr[16]) }, |
| 1543 | { "r17", offsetof(CPUState, gpr[17]) }, |
| 1544 | { "r18", offsetof(CPUState, gpr[18]) }, |
| 1545 | { "r19", offsetof(CPUState, gpr[19]) }, |
| 1546 | { "r20", offsetof(CPUState, gpr[20]) }, |
| 1547 | { "r21", offsetof(CPUState, gpr[21]) }, |
| 1548 | { "r22", offsetof(CPUState, gpr[22]) }, |
| 1549 | { "r23", offsetof(CPUState, gpr[23]) }, |
| 1550 | { "r24", offsetof(CPUState, gpr[24]) }, |
| 1551 | { "r25", offsetof(CPUState, gpr[25]) }, |
| 1552 | { "r26", offsetof(CPUState, gpr[26]) }, |
| 1553 | { "r27", offsetof(CPUState, gpr[27]) }, |
| 1554 | { "r28", offsetof(CPUState, gpr[28]) }, |
| 1555 | { "r29", offsetof(CPUState, gpr[29]) }, |
| 1556 | { "r30", offsetof(CPUState, gpr[30]) }, |
| 1557 | { "r31", offsetof(CPUState, gpr[31]) }, |
j_mayer | ff937db | 2007-09-19 05:49:13 +0000 | [diff] [blame] | 1558 | /* Floating point registers */ |
| 1559 | { "f0", offsetof(CPUState, fpr[0]) }, |
| 1560 | { "f1", offsetof(CPUState, fpr[1]) }, |
| 1561 | { "f2", offsetof(CPUState, fpr[2]) }, |
| 1562 | { "f3", offsetof(CPUState, fpr[3]) }, |
| 1563 | { "f4", offsetof(CPUState, fpr[4]) }, |
| 1564 | { "f5", offsetof(CPUState, fpr[5]) }, |
| 1565 | { "f6", offsetof(CPUState, fpr[6]) }, |
| 1566 | { "f7", offsetof(CPUState, fpr[7]) }, |
| 1567 | { "f8", offsetof(CPUState, fpr[8]) }, |
| 1568 | { "f9", offsetof(CPUState, fpr[9]) }, |
| 1569 | { "f10", offsetof(CPUState, fpr[10]) }, |
| 1570 | { "f11", offsetof(CPUState, fpr[11]) }, |
| 1571 | { "f12", offsetof(CPUState, fpr[12]) }, |
| 1572 | { "f13", offsetof(CPUState, fpr[13]) }, |
| 1573 | { "f14", offsetof(CPUState, fpr[14]) }, |
| 1574 | { "f15", offsetof(CPUState, fpr[15]) }, |
| 1575 | { "f16", offsetof(CPUState, fpr[16]) }, |
| 1576 | { "f17", offsetof(CPUState, fpr[17]) }, |
| 1577 | { "f18", offsetof(CPUState, fpr[18]) }, |
| 1578 | { "f19", offsetof(CPUState, fpr[19]) }, |
| 1579 | { "f20", offsetof(CPUState, fpr[20]) }, |
| 1580 | { "f21", offsetof(CPUState, fpr[21]) }, |
| 1581 | { "f22", offsetof(CPUState, fpr[22]) }, |
| 1582 | { "f23", offsetof(CPUState, fpr[23]) }, |
| 1583 | { "f24", offsetof(CPUState, fpr[24]) }, |
| 1584 | { "f25", offsetof(CPUState, fpr[25]) }, |
| 1585 | { "f26", offsetof(CPUState, fpr[26]) }, |
| 1586 | { "f27", offsetof(CPUState, fpr[27]) }, |
| 1587 | { "f28", offsetof(CPUState, fpr[28]) }, |
| 1588 | { "f29", offsetof(CPUState, fpr[29]) }, |
| 1589 | { "f30", offsetof(CPUState, fpr[30]) }, |
| 1590 | { "f31", offsetof(CPUState, fpr[31]) }, |
| 1591 | { "fpscr", offsetof(CPUState, fpscr) }, |
| 1592 | /* Next instruction pointer */ |
bellard | 57206fd | 2004-04-25 18:54:52 +0000 | [diff] [blame] | 1593 | { "nip|pc", offsetof(CPUState, nip) }, |
bellard | a541f29 | 2004-04-12 20:39:29 +0000 | [diff] [blame] | 1594 | { "lr", offsetof(CPUState, lr) }, |
| 1595 | { "ctr", offsetof(CPUState, ctr) }, |
bellard | 9fddaa0 | 2004-05-21 12:59:32 +0000 | [diff] [blame] | 1596 | { "decr", 0, &monitor_get_decr, }, |
bellard | a541f29 | 2004-04-12 20:39:29 +0000 | [diff] [blame] | 1597 | { "ccr", 0, &monitor_get_ccr, }, |
j_mayer | ff937db | 2007-09-19 05:49:13 +0000 | [diff] [blame] | 1598 | /* Machine state register */ |
bellard | a541f29 | 2004-04-12 20:39:29 +0000 | [diff] [blame] | 1599 | { "msr", 0, &monitor_get_msr, }, |
| 1600 | { "xer", 0, &monitor_get_xer, }, |
bellard | 9fddaa0 | 2004-05-21 12:59:32 +0000 | [diff] [blame] | 1601 | { "tbu", 0, &monitor_get_tbu, }, |
| 1602 | { "tbl", 0, &monitor_get_tbl, }, |
j_mayer | ff937db | 2007-09-19 05:49:13 +0000 | [diff] [blame] | 1603 | #if defined(TARGET_PPC64) |
| 1604 | /* Address space register */ |
| 1605 | { "asr", offsetof(CPUState, asr) }, |
| 1606 | #endif |
| 1607 | /* Segment registers */ |
bellard | a541f29 | 2004-04-12 20:39:29 +0000 | [diff] [blame] | 1608 | { "sdr1", offsetof(CPUState, sdr1) }, |
| 1609 | { "sr0", offsetof(CPUState, sr[0]) }, |
| 1610 | { "sr1", offsetof(CPUState, sr[1]) }, |
| 1611 | { "sr2", offsetof(CPUState, sr[2]) }, |
| 1612 | { "sr3", offsetof(CPUState, sr[3]) }, |
| 1613 | { "sr4", offsetof(CPUState, sr[4]) }, |
| 1614 | { "sr5", offsetof(CPUState, sr[5]) }, |
| 1615 | { "sr6", offsetof(CPUState, sr[6]) }, |
| 1616 | { "sr7", offsetof(CPUState, sr[7]) }, |
| 1617 | { "sr8", offsetof(CPUState, sr[8]) }, |
| 1618 | { "sr9", offsetof(CPUState, sr[9]) }, |
| 1619 | { "sr10", offsetof(CPUState, sr[10]) }, |
| 1620 | { "sr11", offsetof(CPUState, sr[11]) }, |
| 1621 | { "sr12", offsetof(CPUState, sr[12]) }, |
| 1622 | { "sr13", offsetof(CPUState, sr[13]) }, |
| 1623 | { "sr14", offsetof(CPUState, sr[14]) }, |
| 1624 | { "sr15", offsetof(CPUState, sr[15]) }, |
| 1625 | /* Too lazy to put BATs and SPRs ... */ |
bellard | e95c8d5 | 2004-09-30 22:22:08 +0000 | [diff] [blame] | 1626 | #elif defined(TARGET_SPARC) |
| 1627 | { "g0", offsetof(CPUState, gregs[0]) }, |
| 1628 | { "g1", offsetof(CPUState, gregs[1]) }, |
| 1629 | { "g2", offsetof(CPUState, gregs[2]) }, |
| 1630 | { "g3", offsetof(CPUState, gregs[3]) }, |
| 1631 | { "g4", offsetof(CPUState, gregs[4]) }, |
| 1632 | { "g5", offsetof(CPUState, gregs[5]) }, |
| 1633 | { "g6", offsetof(CPUState, gregs[6]) }, |
| 1634 | { "g7", offsetof(CPUState, gregs[7]) }, |
| 1635 | { "o0", 0, monitor_get_reg }, |
| 1636 | { "o1", 1, monitor_get_reg }, |
| 1637 | { "o2", 2, monitor_get_reg }, |
| 1638 | { "o3", 3, monitor_get_reg }, |
| 1639 | { "o4", 4, monitor_get_reg }, |
| 1640 | { "o5", 5, monitor_get_reg }, |
| 1641 | { "o6", 6, monitor_get_reg }, |
| 1642 | { "o7", 7, monitor_get_reg }, |
| 1643 | { "l0", 8, monitor_get_reg }, |
| 1644 | { "l1", 9, monitor_get_reg }, |
| 1645 | { "l2", 10, monitor_get_reg }, |
| 1646 | { "l3", 11, monitor_get_reg }, |
| 1647 | { "l4", 12, monitor_get_reg }, |
| 1648 | { "l5", 13, monitor_get_reg }, |
| 1649 | { "l6", 14, monitor_get_reg }, |
| 1650 | { "l7", 15, monitor_get_reg }, |
| 1651 | { "i0", 16, monitor_get_reg }, |
| 1652 | { "i1", 17, monitor_get_reg }, |
| 1653 | { "i2", 18, monitor_get_reg }, |
| 1654 | { "i3", 19, monitor_get_reg }, |
| 1655 | { "i4", 20, monitor_get_reg }, |
| 1656 | { "i5", 21, monitor_get_reg }, |
| 1657 | { "i6", 22, monitor_get_reg }, |
| 1658 | { "i7", 23, monitor_get_reg }, |
| 1659 | { "pc", offsetof(CPUState, pc) }, |
| 1660 | { "npc", offsetof(CPUState, npc) }, |
| 1661 | { "y", offsetof(CPUState, y) }, |
bellard | 7b936c0 | 2005-10-30 17:05:13 +0000 | [diff] [blame] | 1662 | #ifndef TARGET_SPARC64 |
bellard | e95c8d5 | 2004-09-30 22:22:08 +0000 | [diff] [blame] | 1663 | { "psr", 0, &monitor_get_psr, }, |
| 1664 | { "wim", offsetof(CPUState, wim) }, |
bellard | 7b936c0 | 2005-10-30 17:05:13 +0000 | [diff] [blame] | 1665 | #endif |
bellard | e95c8d5 | 2004-09-30 22:22:08 +0000 | [diff] [blame] | 1666 | { "tbr", offsetof(CPUState, tbr) }, |
| 1667 | { "fsr", offsetof(CPUState, fsr) }, |
| 1668 | { "f0", offsetof(CPUState, fpr[0]) }, |
| 1669 | { "f1", offsetof(CPUState, fpr[1]) }, |
| 1670 | { "f2", offsetof(CPUState, fpr[2]) }, |
| 1671 | { "f3", offsetof(CPUState, fpr[3]) }, |
| 1672 | { "f4", offsetof(CPUState, fpr[4]) }, |
| 1673 | { "f5", offsetof(CPUState, fpr[5]) }, |
| 1674 | { "f6", offsetof(CPUState, fpr[6]) }, |
| 1675 | { "f7", offsetof(CPUState, fpr[7]) }, |
| 1676 | { "f8", offsetof(CPUState, fpr[8]) }, |
| 1677 | { "f9", offsetof(CPUState, fpr[9]) }, |
| 1678 | { "f10", offsetof(CPUState, fpr[10]) }, |
| 1679 | { "f11", offsetof(CPUState, fpr[11]) }, |
| 1680 | { "f12", offsetof(CPUState, fpr[12]) }, |
| 1681 | { "f13", offsetof(CPUState, fpr[13]) }, |
| 1682 | { "f14", offsetof(CPUState, fpr[14]) }, |
| 1683 | { "f15", offsetof(CPUState, fpr[15]) }, |
| 1684 | { "f16", offsetof(CPUState, fpr[16]) }, |
| 1685 | { "f17", offsetof(CPUState, fpr[17]) }, |
| 1686 | { "f18", offsetof(CPUState, fpr[18]) }, |
| 1687 | { "f19", offsetof(CPUState, fpr[19]) }, |
| 1688 | { "f20", offsetof(CPUState, fpr[20]) }, |
| 1689 | { "f21", offsetof(CPUState, fpr[21]) }, |
| 1690 | { "f22", offsetof(CPUState, fpr[22]) }, |
| 1691 | { "f23", offsetof(CPUState, fpr[23]) }, |
| 1692 | { "f24", offsetof(CPUState, fpr[24]) }, |
| 1693 | { "f25", offsetof(CPUState, fpr[25]) }, |
| 1694 | { "f26", offsetof(CPUState, fpr[26]) }, |
| 1695 | { "f27", offsetof(CPUState, fpr[27]) }, |
| 1696 | { "f28", offsetof(CPUState, fpr[28]) }, |
| 1697 | { "f29", offsetof(CPUState, fpr[29]) }, |
| 1698 | { "f30", offsetof(CPUState, fpr[30]) }, |
| 1699 | { "f31", offsetof(CPUState, fpr[31]) }, |
bellard | 7b936c0 | 2005-10-30 17:05:13 +0000 | [diff] [blame] | 1700 | #ifdef TARGET_SPARC64 |
| 1701 | { "f32", offsetof(CPUState, fpr[32]) }, |
| 1702 | { "f34", offsetof(CPUState, fpr[34]) }, |
| 1703 | { "f36", offsetof(CPUState, fpr[36]) }, |
| 1704 | { "f38", offsetof(CPUState, fpr[38]) }, |
| 1705 | { "f40", offsetof(CPUState, fpr[40]) }, |
| 1706 | { "f42", offsetof(CPUState, fpr[42]) }, |
| 1707 | { "f44", offsetof(CPUState, fpr[44]) }, |
| 1708 | { "f46", offsetof(CPUState, fpr[46]) }, |
| 1709 | { "f48", offsetof(CPUState, fpr[48]) }, |
| 1710 | { "f50", offsetof(CPUState, fpr[50]) }, |
| 1711 | { "f52", offsetof(CPUState, fpr[52]) }, |
| 1712 | { "f54", offsetof(CPUState, fpr[54]) }, |
| 1713 | { "f56", offsetof(CPUState, fpr[56]) }, |
| 1714 | { "f58", offsetof(CPUState, fpr[58]) }, |
| 1715 | { "f60", offsetof(CPUState, fpr[60]) }, |
| 1716 | { "f62", offsetof(CPUState, fpr[62]) }, |
| 1717 | { "asi", offsetof(CPUState, asi) }, |
| 1718 | { "pstate", offsetof(CPUState, pstate) }, |
| 1719 | { "cansave", offsetof(CPUState, cansave) }, |
| 1720 | { "canrestore", offsetof(CPUState, canrestore) }, |
| 1721 | { "otherwin", offsetof(CPUState, otherwin) }, |
| 1722 | { "wstate", offsetof(CPUState, wstate) }, |
| 1723 | { "cleanwin", offsetof(CPUState, cleanwin) }, |
| 1724 | { "fprs", offsetof(CPUState, fprs) }, |
| 1725 | #endif |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1726 | #endif |
| 1727 | { NULL }, |
| 1728 | }; |
| 1729 | |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 1730 | static void expr_error(const char *fmt) |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 1731 | { |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1732 | term_printf(fmt); |
| 1733 | term_printf("\n"); |
| 1734 | longjmp(expr_env, 1); |
| 1735 | } |
| 1736 | |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 1737 | /* return 0 if OK, -1 if not found, -2 if no CPU defined */ |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 1738 | static int get_monitor_def(target_long *pval, const char *name) |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1739 | { |
| 1740 | MonitorDef *md; |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 1741 | void *ptr; |
| 1742 | |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1743 | for(md = monitor_defs; md->name != NULL; md++) { |
| 1744 | if (compare_cmd(name, md->name)) { |
| 1745 | if (md->get_value) { |
bellard | e95c8d5 | 2004-09-30 22:22:08 +0000 | [diff] [blame] | 1746 | *pval = md->get_value(md, md->offset); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1747 | } else { |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 1748 | CPUState *env = mon_get_cpu(); |
| 1749 | if (!env) |
| 1750 | return -2; |
| 1751 | ptr = (uint8_t *)env + md->offset; |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 1752 | switch(md->type) { |
| 1753 | case MD_I32: |
| 1754 | *pval = *(int32_t *)ptr; |
| 1755 | break; |
| 1756 | case MD_TLONG: |
| 1757 | *pval = *(target_long *)ptr; |
| 1758 | break; |
| 1759 | default: |
| 1760 | *pval = 0; |
| 1761 | break; |
| 1762 | } |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1763 | } |
| 1764 | return 0; |
| 1765 | } |
| 1766 | } |
| 1767 | return -1; |
| 1768 | } |
| 1769 | |
| 1770 | static void next(void) |
| 1771 | { |
| 1772 | if (pch != '\0') { |
| 1773 | pch++; |
| 1774 | while (isspace(*pch)) |
| 1775 | pch++; |
| 1776 | } |
| 1777 | } |
| 1778 | |
blueswir1 | c2efc95 | 2007-09-25 17:28:42 +0000 | [diff] [blame] | 1779 | static int64_t expr_sum(void); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1780 | |
blueswir1 | c2efc95 | 2007-09-25 17:28:42 +0000 | [diff] [blame] | 1781 | static int64_t expr_unary(void) |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1782 | { |
blueswir1 | c2efc95 | 2007-09-25 17:28:42 +0000 | [diff] [blame] | 1783 | int64_t n; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1784 | char *p; |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 1785 | int ret; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1786 | |
| 1787 | switch(*pch) { |
| 1788 | case '+': |
| 1789 | next(); |
| 1790 | n = expr_unary(); |
| 1791 | break; |
| 1792 | case '-': |
| 1793 | next(); |
| 1794 | n = -expr_unary(); |
| 1795 | break; |
| 1796 | case '~': |
| 1797 | next(); |
| 1798 | n = ~expr_unary(); |
| 1799 | break; |
| 1800 | case '(': |
| 1801 | next(); |
| 1802 | n = expr_sum(); |
| 1803 | if (*pch != ')') { |
| 1804 | expr_error("')' expected"); |
| 1805 | } |
| 1806 | next(); |
| 1807 | break; |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 1808 | case '\'': |
| 1809 | pch++; |
| 1810 | if (*pch == '\0') |
| 1811 | expr_error("character constant expected"); |
| 1812 | n = *pch; |
| 1813 | pch++; |
| 1814 | if (*pch != '\'') |
| 1815 | expr_error("missing terminating \' character"); |
| 1816 | next(); |
| 1817 | break; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1818 | case '$': |
| 1819 | { |
| 1820 | char buf[128], *q; |
blueswir1 | 7743e58 | 2007-09-24 18:39:04 +0000 | [diff] [blame] | 1821 | target_long reg; |
ths | 3b46e62 | 2007-09-17 08:09:54 +0000 | [diff] [blame] | 1822 | |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1823 | pch++; |
| 1824 | q = buf; |
| 1825 | while ((*pch >= 'a' && *pch <= 'z') || |
| 1826 | (*pch >= 'A' && *pch <= 'Z') || |
| 1827 | (*pch >= '0' && *pch <= '9') || |
bellard | 57206fd | 2004-04-25 18:54:52 +0000 | [diff] [blame] | 1828 | *pch == '_' || *pch == '.') { |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1829 | if ((q - buf) < sizeof(buf) - 1) |
| 1830 | *q++ = *pch; |
| 1831 | pch++; |
| 1832 | } |
| 1833 | while (isspace(*pch)) |
| 1834 | pch++; |
| 1835 | *q = 0; |
blueswir1 | 7743e58 | 2007-09-24 18:39:04 +0000 | [diff] [blame] | 1836 | ret = get_monitor_def(®, buf); |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 1837 | if (ret == -1) |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1838 | expr_error("unknown register"); |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 1839 | else if (ret == -2) |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 1840 | expr_error("no cpu defined"); |
blueswir1 | 7743e58 | 2007-09-24 18:39:04 +0000 | [diff] [blame] | 1841 | n = reg; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1842 | } |
| 1843 | break; |
| 1844 | case '\0': |
| 1845 | expr_error("unexpected end of expression"); |
| 1846 | n = 0; |
| 1847 | break; |
| 1848 | default: |
blueswir1 | 7743e58 | 2007-09-24 18:39:04 +0000 | [diff] [blame] | 1849 | #if TARGET_PHYS_ADDR_BITS > 32 |
bellard | 4f4fbf7 | 2006-06-25 18:28:12 +0000 | [diff] [blame] | 1850 | n = strtoull(pch, &p, 0); |
| 1851 | #else |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1852 | n = strtoul(pch, &p, 0); |
bellard | 4f4fbf7 | 2006-06-25 18:28:12 +0000 | [diff] [blame] | 1853 | #endif |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1854 | if (pch == p) { |
| 1855 | expr_error("invalid char in expression"); |
| 1856 | } |
| 1857 | pch = p; |
| 1858 | while (isspace(*pch)) |
| 1859 | pch++; |
| 1860 | break; |
| 1861 | } |
| 1862 | return n; |
| 1863 | } |
| 1864 | |
| 1865 | |
blueswir1 | c2efc95 | 2007-09-25 17:28:42 +0000 | [diff] [blame] | 1866 | static int64_t expr_prod(void) |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1867 | { |
blueswir1 | c2efc95 | 2007-09-25 17:28:42 +0000 | [diff] [blame] | 1868 | int64_t val, val2; |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 1869 | int op; |
ths | 3b46e62 | 2007-09-17 08:09:54 +0000 | [diff] [blame] | 1870 | |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1871 | val = expr_unary(); |
| 1872 | for(;;) { |
| 1873 | op = *pch; |
| 1874 | if (op != '*' && op != '/' && op != '%') |
| 1875 | break; |
| 1876 | next(); |
| 1877 | val2 = expr_unary(); |
| 1878 | switch(op) { |
| 1879 | default: |
| 1880 | case '*': |
| 1881 | val *= val2; |
| 1882 | break; |
| 1883 | case '/': |
| 1884 | case '%': |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 1885 | if (val2 == 0) |
bellard | 5b60212 | 2004-05-22 21:41:05 +0000 | [diff] [blame] | 1886 | expr_error("division by zero"); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1887 | if (op == '/') |
| 1888 | val /= val2; |
| 1889 | else |
| 1890 | val %= val2; |
| 1891 | break; |
| 1892 | } |
| 1893 | } |
| 1894 | return val; |
| 1895 | } |
| 1896 | |
blueswir1 | c2efc95 | 2007-09-25 17:28:42 +0000 | [diff] [blame] | 1897 | static int64_t expr_logic(void) |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1898 | { |
blueswir1 | c2efc95 | 2007-09-25 17:28:42 +0000 | [diff] [blame] | 1899 | int64_t val, val2; |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 1900 | int op; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1901 | |
| 1902 | val = expr_prod(); |
| 1903 | for(;;) { |
| 1904 | op = *pch; |
| 1905 | if (op != '&' && op != '|' && op != '^') |
| 1906 | break; |
| 1907 | next(); |
| 1908 | val2 = expr_prod(); |
| 1909 | switch(op) { |
| 1910 | default: |
| 1911 | case '&': |
| 1912 | val &= val2; |
| 1913 | break; |
| 1914 | case '|': |
| 1915 | val |= val2; |
| 1916 | break; |
| 1917 | case '^': |
| 1918 | val ^= val2; |
| 1919 | break; |
| 1920 | } |
| 1921 | } |
| 1922 | return val; |
| 1923 | } |
| 1924 | |
blueswir1 | c2efc95 | 2007-09-25 17:28:42 +0000 | [diff] [blame] | 1925 | static int64_t expr_sum(void) |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1926 | { |
blueswir1 | c2efc95 | 2007-09-25 17:28:42 +0000 | [diff] [blame] | 1927 | int64_t val, val2; |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 1928 | int op; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1929 | |
| 1930 | val = expr_logic(); |
| 1931 | for(;;) { |
| 1932 | op = *pch; |
| 1933 | if (op != '+' && op != '-') |
| 1934 | break; |
| 1935 | next(); |
| 1936 | val2 = expr_logic(); |
| 1937 | if (op == '+') |
| 1938 | val += val2; |
| 1939 | else |
| 1940 | val -= val2; |
| 1941 | } |
| 1942 | return val; |
| 1943 | } |
| 1944 | |
blueswir1 | c2efc95 | 2007-09-25 17:28:42 +0000 | [diff] [blame] | 1945 | static int get_expr(int64_t *pval, const char **pp) |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1946 | { |
| 1947 | pch = *pp; |
| 1948 | if (setjmp(expr_env)) { |
| 1949 | *pp = pch; |
| 1950 | return -1; |
| 1951 | } |
| 1952 | while (isspace(*pch)) |
| 1953 | pch++; |
| 1954 | *pval = expr_sum(); |
| 1955 | *pp = pch; |
| 1956 | return 0; |
| 1957 | } |
| 1958 | |
| 1959 | static int get_str(char *buf, int buf_size, const char **pp) |
| 1960 | { |
| 1961 | const char *p; |
| 1962 | char *q; |
| 1963 | int c; |
| 1964 | |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 1965 | q = buf; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1966 | p = *pp; |
| 1967 | while (isspace(*p)) |
| 1968 | p++; |
| 1969 | if (*p == '\0') { |
| 1970 | fail: |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 1971 | *q = '\0'; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1972 | *pp = p; |
| 1973 | return -1; |
| 1974 | } |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1975 | if (*p == '\"') { |
| 1976 | p++; |
| 1977 | while (*p != '\0' && *p != '\"') { |
| 1978 | if (*p == '\\') { |
| 1979 | p++; |
| 1980 | c = *p++; |
| 1981 | switch(c) { |
| 1982 | case 'n': |
| 1983 | c = '\n'; |
| 1984 | break; |
| 1985 | case 'r': |
| 1986 | c = '\r'; |
| 1987 | break; |
| 1988 | case '\\': |
| 1989 | case '\'': |
| 1990 | case '\"': |
| 1991 | break; |
| 1992 | default: |
| 1993 | qemu_printf("unsupported escape code: '\\%c'\n", c); |
| 1994 | goto fail; |
| 1995 | } |
| 1996 | if ((q - buf) < buf_size - 1) { |
| 1997 | *q++ = c; |
| 1998 | } |
| 1999 | } else { |
| 2000 | if ((q - buf) < buf_size - 1) { |
| 2001 | *q++ = *p; |
| 2002 | } |
| 2003 | p++; |
| 2004 | } |
| 2005 | } |
| 2006 | if (*p != '\"') { |
bellard | 5b60212 | 2004-05-22 21:41:05 +0000 | [diff] [blame] | 2007 | qemu_printf("unterminated string\n"); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2008 | goto fail; |
| 2009 | } |
| 2010 | p++; |
| 2011 | } else { |
| 2012 | while (*p != '\0' && !isspace(*p)) { |
| 2013 | if ((q - buf) < buf_size - 1) { |
| 2014 | *q++ = *p; |
| 2015 | } |
| 2016 | p++; |
| 2017 | } |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2018 | } |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 2019 | *q = '\0'; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2020 | *pp = p; |
| 2021 | return 0; |
| 2022 | } |
| 2023 | |
| 2024 | static int default_fmt_format = 'x'; |
| 2025 | static int default_fmt_size = 4; |
| 2026 | |
| 2027 | #define MAX_ARGS 16 |
| 2028 | |
bellard | 7e2515e | 2004-08-01 21:52:19 +0000 | [diff] [blame] | 2029 | static void monitor_handle_command(const char *cmdline) |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2030 | { |
| 2031 | const char *p, *pstart, *typestr; |
| 2032 | char *q; |
| 2033 | int c, nb_args, len, i, has_arg; |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 2034 | term_cmd_t *cmd; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2035 | char cmdname[256]; |
| 2036 | char buf[1024]; |
| 2037 | void *str_allocated[MAX_ARGS]; |
| 2038 | void *args[MAX_ARGS]; |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 2039 | |
| 2040 | #ifdef DEBUG |
| 2041 | term_printf("command='%s'\n", cmdline); |
| 2042 | #endif |
ths | 3b46e62 | 2007-09-17 08:09:54 +0000 | [diff] [blame] | 2043 | |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2044 | /* extract the command name */ |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 2045 | p = cmdline; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2046 | q = cmdname; |
| 2047 | while (isspace(*p)) |
| 2048 | p++; |
| 2049 | if (*p == '\0') |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 2050 | return; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2051 | pstart = p; |
| 2052 | while (*p != '\0' && *p != '/' && !isspace(*p)) |
| 2053 | p++; |
| 2054 | len = p - pstart; |
| 2055 | if (len > sizeof(cmdname) - 1) |
| 2056 | len = sizeof(cmdname) - 1; |
| 2057 | memcpy(cmdname, pstart, len); |
| 2058 | cmdname[len] = '\0'; |
ths | 3b46e62 | 2007-09-17 08:09:54 +0000 | [diff] [blame] | 2059 | |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2060 | /* find the command */ |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 2061 | for(cmd = term_cmds; cmd->name != NULL; cmd++) { |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 2062 | if (compare_cmd(cmdname, cmd->name)) |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 2063 | goto found; |
| 2064 | } |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2065 | term_printf("unknown command: '%s'\n", cmdname); |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 2066 | return; |
| 2067 | found: |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2068 | |
| 2069 | for(i = 0; i < MAX_ARGS; i++) |
| 2070 | str_allocated[i] = NULL; |
ths | 3b46e62 | 2007-09-17 08:09:54 +0000 | [diff] [blame] | 2071 | |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2072 | /* parse the parameters */ |
| 2073 | typestr = cmd->args_type; |
| 2074 | nb_args = 0; |
| 2075 | for(;;) { |
| 2076 | c = *typestr; |
| 2077 | if (c == '\0') |
| 2078 | break; |
| 2079 | typestr++; |
| 2080 | switch(c) { |
| 2081 | case 'F': |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 2082 | case 'B': |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2083 | case 's': |
| 2084 | { |
| 2085 | int ret; |
| 2086 | char *str; |
ths | 3b46e62 | 2007-09-17 08:09:54 +0000 | [diff] [blame] | 2087 | |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 2088 | while (isspace(*p)) |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2089 | p++; |
| 2090 | if (*typestr == '?') { |
| 2091 | typestr++; |
| 2092 | if (*p == '\0') { |
| 2093 | /* no optional string: NULL argument */ |
| 2094 | str = NULL; |
| 2095 | goto add_str; |
| 2096 | } |
| 2097 | } |
| 2098 | ret = get_str(buf, sizeof(buf), &p); |
| 2099 | if (ret < 0) { |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 2100 | switch(c) { |
| 2101 | case 'F': |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2102 | term_printf("%s: filename expected\n", cmdname); |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 2103 | break; |
| 2104 | case 'B': |
| 2105 | term_printf("%s: block device name expected\n", cmdname); |
| 2106 | break; |
| 2107 | default: |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2108 | term_printf("%s: string expected\n", cmdname); |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 2109 | break; |
| 2110 | } |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2111 | goto fail; |
| 2112 | } |
| 2113 | str = qemu_malloc(strlen(buf) + 1); |
| 2114 | strcpy(str, buf); |
| 2115 | str_allocated[nb_args] = str; |
| 2116 | add_str: |
| 2117 | if (nb_args >= MAX_ARGS) { |
| 2118 | error_args: |
| 2119 | term_printf("%s: too many arguments\n", cmdname); |
| 2120 | goto fail; |
| 2121 | } |
| 2122 | args[nb_args++] = str; |
| 2123 | } |
| 2124 | break; |
| 2125 | case '/': |
| 2126 | { |
| 2127 | int count, format, size; |
ths | 3b46e62 | 2007-09-17 08:09:54 +0000 | [diff] [blame] | 2128 | |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2129 | while (isspace(*p)) |
| 2130 | p++; |
| 2131 | if (*p == '/') { |
| 2132 | /* format found */ |
| 2133 | p++; |
| 2134 | count = 1; |
| 2135 | if (isdigit(*p)) { |
| 2136 | count = 0; |
| 2137 | while (isdigit(*p)) { |
| 2138 | count = count * 10 + (*p - '0'); |
| 2139 | p++; |
| 2140 | } |
| 2141 | } |
| 2142 | size = -1; |
| 2143 | format = -1; |
| 2144 | for(;;) { |
| 2145 | switch(*p) { |
| 2146 | case 'o': |
| 2147 | case 'd': |
| 2148 | case 'u': |
| 2149 | case 'x': |
| 2150 | case 'i': |
| 2151 | case 'c': |
| 2152 | format = *p++; |
| 2153 | break; |
| 2154 | case 'b': |
| 2155 | size = 1; |
| 2156 | p++; |
| 2157 | break; |
| 2158 | case 'h': |
| 2159 | size = 2; |
| 2160 | p++; |
| 2161 | break; |
| 2162 | case 'w': |
| 2163 | size = 4; |
| 2164 | p++; |
| 2165 | break; |
| 2166 | case 'g': |
| 2167 | case 'L': |
| 2168 | size = 8; |
| 2169 | p++; |
| 2170 | break; |
| 2171 | default: |
| 2172 | goto next; |
| 2173 | } |
| 2174 | } |
| 2175 | next: |
| 2176 | if (*p != '\0' && !isspace(*p)) { |
| 2177 | term_printf("invalid char in format: '%c'\n", *p); |
| 2178 | goto fail; |
| 2179 | } |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2180 | if (format < 0) |
| 2181 | format = default_fmt_format; |
bellard | 4c27ba2 | 2004-04-25 18:05:08 +0000 | [diff] [blame] | 2182 | if (format != 'i') { |
| 2183 | /* for 'i', not specifying a size gives -1 as size */ |
| 2184 | if (size < 0) |
| 2185 | size = default_fmt_size; |
| 2186 | } |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2187 | default_fmt_size = size; |
| 2188 | default_fmt_format = format; |
| 2189 | } else { |
| 2190 | count = 1; |
| 2191 | format = default_fmt_format; |
bellard | 4c27ba2 | 2004-04-25 18:05:08 +0000 | [diff] [blame] | 2192 | if (format != 'i') { |
| 2193 | size = default_fmt_size; |
| 2194 | } else { |
| 2195 | size = -1; |
| 2196 | } |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2197 | } |
| 2198 | if (nb_args + 3 > MAX_ARGS) |
| 2199 | goto error_args; |
j_mayer | 1c5bf3b | 2007-04-14 12:17:59 +0000 | [diff] [blame] | 2200 | args[nb_args++] = (void*)(long)count; |
| 2201 | args[nb_args++] = (void*)(long)format; |
| 2202 | args[nb_args++] = (void*)(long)size; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2203 | } |
| 2204 | break; |
| 2205 | case 'i': |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 2206 | case 'l': |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2207 | { |
blueswir1 | c2efc95 | 2007-09-25 17:28:42 +0000 | [diff] [blame] | 2208 | int64_t val; |
blueswir1 | 7743e58 | 2007-09-24 18:39:04 +0000 | [diff] [blame] | 2209 | |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 2210 | while (isspace(*p)) |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2211 | p++; |
bellard | 3440557 | 2004-06-08 00:55:58 +0000 | [diff] [blame] | 2212 | if (*typestr == '?' || *typestr == '.') { |
bellard | 3440557 | 2004-06-08 00:55:58 +0000 | [diff] [blame] | 2213 | if (*typestr == '?') { |
| 2214 | if (*p == '\0') |
| 2215 | has_arg = 0; |
| 2216 | else |
| 2217 | has_arg = 1; |
| 2218 | } else { |
| 2219 | if (*p == '.') { |
| 2220 | p++; |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 2221 | while (isspace(*p)) |
bellard | 3440557 | 2004-06-08 00:55:58 +0000 | [diff] [blame] | 2222 | p++; |
| 2223 | has_arg = 1; |
| 2224 | } else { |
| 2225 | has_arg = 0; |
| 2226 | } |
| 2227 | } |
bellard | 13224a8 | 2006-07-14 22:03:35 +0000 | [diff] [blame] | 2228 | typestr++; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2229 | if (nb_args >= MAX_ARGS) |
| 2230 | goto error_args; |
j_mayer | 1c5bf3b | 2007-04-14 12:17:59 +0000 | [diff] [blame] | 2231 | args[nb_args++] = (void *)(long)has_arg; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2232 | if (!has_arg) { |
| 2233 | if (nb_args >= MAX_ARGS) |
| 2234 | goto error_args; |
| 2235 | val = -1; |
| 2236 | goto add_num; |
| 2237 | } |
| 2238 | } |
| 2239 | if (get_expr(&val, &p)) |
| 2240 | goto fail; |
| 2241 | add_num: |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 2242 | if (c == 'i') { |
| 2243 | if (nb_args >= MAX_ARGS) |
| 2244 | goto error_args; |
j_mayer | 1c5bf3b | 2007-04-14 12:17:59 +0000 | [diff] [blame] | 2245 | args[nb_args++] = (void *)(long)val; |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 2246 | } else { |
| 2247 | if ((nb_args + 1) >= MAX_ARGS) |
| 2248 | goto error_args; |
blueswir1 | 7743e58 | 2007-09-24 18:39:04 +0000 | [diff] [blame] | 2249 | #if TARGET_PHYS_ADDR_BITS > 32 |
j_mayer | 1c5bf3b | 2007-04-14 12:17:59 +0000 | [diff] [blame] | 2250 | args[nb_args++] = (void *)(long)((val >> 32) & 0xffffffff); |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 2251 | #else |
| 2252 | args[nb_args++] = (void *)0; |
| 2253 | #endif |
j_mayer | 1c5bf3b | 2007-04-14 12:17:59 +0000 | [diff] [blame] | 2254 | args[nb_args++] = (void *)(long)(val & 0xffffffff); |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 2255 | } |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2256 | } |
| 2257 | break; |
| 2258 | case '-': |
| 2259 | { |
| 2260 | int has_option; |
| 2261 | /* option */ |
ths | 3b46e62 | 2007-09-17 08:09:54 +0000 | [diff] [blame] | 2262 | |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2263 | c = *typestr++; |
| 2264 | if (c == '\0') |
| 2265 | goto bad_type; |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 2266 | while (isspace(*p)) |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2267 | p++; |
| 2268 | has_option = 0; |
| 2269 | if (*p == '-') { |
| 2270 | p++; |
| 2271 | if (*p != c) { |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 2272 | term_printf("%s: unsupported option -%c\n", |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2273 | cmdname, *p); |
| 2274 | goto fail; |
| 2275 | } |
| 2276 | p++; |
| 2277 | has_option = 1; |
| 2278 | } |
| 2279 | if (nb_args >= MAX_ARGS) |
| 2280 | goto error_args; |
j_mayer | 1c5bf3b | 2007-04-14 12:17:59 +0000 | [diff] [blame] | 2281 | args[nb_args++] = (void *)(long)has_option; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2282 | } |
| 2283 | break; |
| 2284 | default: |
| 2285 | bad_type: |
| 2286 | term_printf("%s: unknown type '%c'\n", cmdname, c); |
| 2287 | goto fail; |
| 2288 | } |
| 2289 | } |
| 2290 | /* check that all arguments were parsed */ |
| 2291 | while (isspace(*p)) |
| 2292 | p++; |
| 2293 | if (*p != '\0') { |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 2294 | term_printf("%s: extraneous characters at the end of line\n", |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2295 | cmdname); |
| 2296 | goto fail; |
| 2297 | } |
| 2298 | |
| 2299 | switch(nb_args) { |
| 2300 | case 0: |
| 2301 | cmd->handler(); |
| 2302 | break; |
| 2303 | case 1: |
| 2304 | cmd->handler(args[0]); |
| 2305 | break; |
| 2306 | case 2: |
| 2307 | cmd->handler(args[0], args[1]); |
| 2308 | break; |
| 2309 | case 3: |
| 2310 | cmd->handler(args[0], args[1], args[2]); |
| 2311 | break; |
| 2312 | case 4: |
| 2313 | cmd->handler(args[0], args[1], args[2], args[3]); |
| 2314 | break; |
| 2315 | case 5: |
| 2316 | cmd->handler(args[0], args[1], args[2], args[3], args[4]); |
| 2317 | break; |
bellard | 3440557 | 2004-06-08 00:55:58 +0000 | [diff] [blame] | 2318 | case 6: |
| 2319 | cmd->handler(args[0], args[1], args[2], args[3], args[4], args[5]); |
| 2320 | break; |
bellard | ec36b69 | 2006-07-16 18:57:03 +0000 | [diff] [blame] | 2321 | case 7: |
| 2322 | cmd->handler(args[0], args[1], args[2], args[3], args[4], args[5], args[6]); |
| 2323 | break; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2324 | default: |
| 2325 | term_printf("unsupported number of arguments: %d\n", nb_args); |
| 2326 | goto fail; |
| 2327 | } |
| 2328 | fail: |
| 2329 | for(i = 0; i < MAX_ARGS; i++) |
| 2330 | qemu_free(str_allocated[i]); |
| 2331 | return; |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 2332 | } |
| 2333 | |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 2334 | static void cmd_completion(const char *name, const char *list) |
| 2335 | { |
| 2336 | const char *p, *pstart; |
| 2337 | char cmd[128]; |
| 2338 | int len; |
| 2339 | |
| 2340 | p = list; |
| 2341 | for(;;) { |
| 2342 | pstart = p; |
| 2343 | p = strchr(p, '|'); |
| 2344 | if (!p) |
| 2345 | p = pstart + strlen(pstart); |
| 2346 | len = p - pstart; |
| 2347 | if (len > sizeof(cmd) - 2) |
| 2348 | len = sizeof(cmd) - 2; |
| 2349 | memcpy(cmd, pstart, len); |
| 2350 | cmd[len] = '\0'; |
| 2351 | if (name[0] == '\0' || !strncmp(name, cmd, strlen(name))) { |
| 2352 | add_completion(cmd); |
| 2353 | } |
| 2354 | if (*p == '\0') |
| 2355 | break; |
| 2356 | p++; |
| 2357 | } |
| 2358 | } |
| 2359 | |
| 2360 | static void file_completion(const char *input) |
| 2361 | { |
| 2362 | DIR *ffs; |
| 2363 | struct dirent *d; |
| 2364 | char path[1024]; |
| 2365 | char file[1024], file_prefix[1024]; |
| 2366 | int input_path_len; |
| 2367 | const char *p; |
| 2368 | |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 2369 | p = strrchr(input, '/'); |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 2370 | if (!p) { |
| 2371 | input_path_len = 0; |
| 2372 | pstrcpy(file_prefix, sizeof(file_prefix), input); |
| 2373 | strcpy(path, "."); |
| 2374 | } else { |
| 2375 | input_path_len = p - input + 1; |
| 2376 | memcpy(path, input, input_path_len); |
| 2377 | if (input_path_len > sizeof(path) - 1) |
| 2378 | input_path_len = sizeof(path) - 1; |
| 2379 | path[input_path_len] = '\0'; |
| 2380 | pstrcpy(file_prefix, sizeof(file_prefix), p + 1); |
| 2381 | } |
| 2382 | #ifdef DEBUG_COMPLETION |
| 2383 | term_printf("input='%s' path='%s' prefix='%s'\n", input, path, file_prefix); |
| 2384 | #endif |
| 2385 | ffs = opendir(path); |
| 2386 | if (!ffs) |
| 2387 | return; |
| 2388 | for(;;) { |
| 2389 | struct stat sb; |
| 2390 | d = readdir(ffs); |
| 2391 | if (!d) |
| 2392 | break; |
| 2393 | if (strstart(d->d_name, file_prefix, NULL)) { |
| 2394 | memcpy(file, input, input_path_len); |
| 2395 | strcpy(file + input_path_len, d->d_name); |
| 2396 | /* stat the file to find out if it's a directory. |
| 2397 | * In that case add a slash to speed up typing long paths |
| 2398 | */ |
| 2399 | stat(file, &sb); |
| 2400 | if(S_ISDIR(sb.st_mode)) |
| 2401 | strcat(file, "/"); |
| 2402 | add_completion(file); |
| 2403 | } |
| 2404 | } |
| 2405 | closedir(ffs); |
| 2406 | } |
| 2407 | |
| 2408 | static void block_completion_it(void *opaque, const char *name) |
| 2409 | { |
| 2410 | const char *input = opaque; |
| 2411 | |
| 2412 | if (input[0] == '\0' || |
| 2413 | !strncmp(name, (char *)input, strlen(input))) { |
| 2414 | add_completion(name); |
| 2415 | } |
| 2416 | } |
| 2417 | |
| 2418 | /* NOTE: this parser is an approximate form of the real command parser */ |
| 2419 | static void parse_cmdline(const char *cmdline, |
| 2420 | int *pnb_args, char **args) |
| 2421 | { |
| 2422 | const char *p; |
| 2423 | int nb_args, ret; |
| 2424 | char buf[1024]; |
| 2425 | |
| 2426 | p = cmdline; |
| 2427 | nb_args = 0; |
| 2428 | for(;;) { |
| 2429 | while (isspace(*p)) |
| 2430 | p++; |
| 2431 | if (*p == '\0') |
| 2432 | break; |
| 2433 | if (nb_args >= MAX_ARGS) |
| 2434 | break; |
| 2435 | ret = get_str(buf, sizeof(buf), &p); |
| 2436 | args[nb_args] = qemu_strdup(buf); |
| 2437 | nb_args++; |
| 2438 | if (ret < 0) |
| 2439 | break; |
| 2440 | } |
| 2441 | *pnb_args = nb_args; |
| 2442 | } |
| 2443 | |
bellard | 7e2515e | 2004-08-01 21:52:19 +0000 | [diff] [blame] | 2444 | void readline_find_completion(const char *cmdline) |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 2445 | { |
| 2446 | const char *cmdname; |
| 2447 | char *args[MAX_ARGS]; |
| 2448 | int nb_args, i, len; |
| 2449 | const char *ptype, *str; |
| 2450 | term_cmd_t *cmd; |
bellard | 64866c3 | 2006-05-07 18:03:31 +0000 | [diff] [blame] | 2451 | const KeyDef *key; |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 2452 | |
| 2453 | parse_cmdline(cmdline, &nb_args, args); |
| 2454 | #ifdef DEBUG_COMPLETION |
| 2455 | for(i = 0; i < nb_args; i++) { |
| 2456 | term_printf("arg%d = '%s'\n", i, (char *)args[i]); |
| 2457 | } |
| 2458 | #endif |
| 2459 | |
| 2460 | /* if the line ends with a space, it means we want to complete the |
| 2461 | next arg */ |
| 2462 | len = strlen(cmdline); |
| 2463 | if (len > 0 && isspace(cmdline[len - 1])) { |
| 2464 | if (nb_args >= MAX_ARGS) |
| 2465 | return; |
| 2466 | args[nb_args++] = qemu_strdup(""); |
| 2467 | } |
| 2468 | if (nb_args <= 1) { |
| 2469 | /* command completion */ |
| 2470 | if (nb_args == 0) |
| 2471 | cmdname = ""; |
| 2472 | else |
| 2473 | cmdname = args[0]; |
| 2474 | completion_index = strlen(cmdname); |
| 2475 | for(cmd = term_cmds; cmd->name != NULL; cmd++) { |
| 2476 | cmd_completion(cmdname, cmd->name); |
| 2477 | } |
| 2478 | } else { |
| 2479 | /* find the command */ |
| 2480 | for(cmd = term_cmds; cmd->name != NULL; cmd++) { |
| 2481 | if (compare_cmd(args[0], cmd->name)) |
| 2482 | goto found; |
| 2483 | } |
| 2484 | return; |
| 2485 | found: |
| 2486 | ptype = cmd->args_type; |
| 2487 | for(i = 0; i < nb_args - 2; i++) { |
| 2488 | if (*ptype != '\0') { |
| 2489 | ptype++; |
| 2490 | while (*ptype == '?') |
| 2491 | ptype++; |
| 2492 | } |
| 2493 | } |
| 2494 | str = args[nb_args - 1]; |
| 2495 | switch(*ptype) { |
| 2496 | case 'F': |
| 2497 | /* file completion */ |
| 2498 | completion_index = strlen(str); |
| 2499 | file_completion(str); |
| 2500 | break; |
| 2501 | case 'B': |
| 2502 | /* block device name completion */ |
| 2503 | completion_index = strlen(str); |
| 2504 | bdrv_iterate(block_completion_it, (void *)str); |
| 2505 | break; |
bellard | 7fe4848 | 2004-10-09 18:08:01 +0000 | [diff] [blame] | 2506 | case 's': |
| 2507 | /* XXX: more generic ? */ |
| 2508 | if (!strcmp(cmd->name, "info")) { |
| 2509 | completion_index = strlen(str); |
| 2510 | for(cmd = info_cmds; cmd->name != NULL; cmd++) { |
| 2511 | cmd_completion(str, cmd->name); |
| 2512 | } |
bellard | 64866c3 | 2006-05-07 18:03:31 +0000 | [diff] [blame] | 2513 | } else if (!strcmp(cmd->name, "sendkey")) { |
| 2514 | completion_index = strlen(str); |
| 2515 | for(key = key_defs; key->name != NULL; key++) { |
| 2516 | cmd_completion(str, key->name); |
| 2517 | } |
bellard | 7fe4848 | 2004-10-09 18:08:01 +0000 | [diff] [blame] | 2518 | } |
| 2519 | break; |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 2520 | default: |
| 2521 | break; |
| 2522 | } |
| 2523 | } |
| 2524 | for(i = 0; i < nb_args; i++) |
| 2525 | qemu_free(args[i]); |
| 2526 | } |
| 2527 | |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 2528 | static int term_can_read(void *opaque) |
| 2529 | { |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 2530 | return 128; |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 2531 | } |
| 2532 | |
| 2533 | static void term_read(void *opaque, const uint8_t *buf, int size) |
| 2534 | { |
| 2535 | int i; |
| 2536 | for(i = 0; i < size; i++) |
bellard | 7e2515e | 2004-08-01 21:52:19 +0000 | [diff] [blame] | 2537 | readline_handle_byte(buf[i]); |
| 2538 | } |
| 2539 | |
| 2540 | static void monitor_start_input(void); |
| 2541 | |
| 2542 | static void monitor_handle_command1(void *opaque, const char *cmdline) |
| 2543 | { |
| 2544 | monitor_handle_command(cmdline); |
| 2545 | monitor_start_input(); |
| 2546 | } |
| 2547 | |
| 2548 | static void monitor_start_input(void) |
| 2549 | { |
| 2550 | readline_start("(qemu) ", 0, monitor_handle_command1, NULL); |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 2551 | } |
| 2552 | |
ths | 86e94de | 2007-01-05 22:01:59 +0000 | [diff] [blame] | 2553 | static void term_event(void *opaque, int event) |
| 2554 | { |
| 2555 | if (event != CHR_EVENT_RESET) |
| 2556 | return; |
| 2557 | |
| 2558 | if (!hide_banner) |
| 2559 | term_printf("QEMU %s monitor - type 'help' for more information\n", |
| 2560 | QEMU_VERSION); |
| 2561 | monitor_start_input(); |
| 2562 | } |
| 2563 | |
ths | 20d8a3e | 2007-02-18 17:04:49 +0000 | [diff] [blame] | 2564 | static int is_first_init = 1; |
| 2565 | |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 2566 | void monitor_init(CharDriverState *hd, int show_banner) |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 2567 | { |
ths | 20d8a3e | 2007-02-18 17:04:49 +0000 | [diff] [blame] | 2568 | int i; |
| 2569 | |
| 2570 | if (is_first_init) { |
| 2571 | for (i = 0; i < MAX_MON; i++) { |
| 2572 | monitor_hd[i] = NULL; |
| 2573 | } |
| 2574 | is_first_init = 0; |
| 2575 | } |
| 2576 | for (i = 0; i < MAX_MON; i++) { |
| 2577 | if (monitor_hd[i] == NULL) { |
| 2578 | monitor_hd[i] = hd; |
| 2579 | break; |
| 2580 | } |
| 2581 | } |
| 2582 | |
ths | 86e94de | 2007-01-05 22:01:59 +0000 | [diff] [blame] | 2583 | hide_banner = !show_banner; |
| 2584 | |
pbrook | e5b0bc4 | 2007-01-27 23:46:43 +0000 | [diff] [blame] | 2585 | qemu_chr_add_handlers(hd, term_can_read, term_read, term_event, NULL); |
bellard | 7e2515e | 2004-08-01 21:52:19 +0000 | [diff] [blame] | 2586 | } |
| 2587 | |
| 2588 | /* XXX: use threads ? */ |
| 2589 | /* modal monitor readline */ |
| 2590 | static int monitor_readline_started; |
| 2591 | static char *monitor_readline_buf; |
| 2592 | static int monitor_readline_buf_size; |
| 2593 | |
| 2594 | static void monitor_readline_cb(void *opaque, const char *input) |
| 2595 | { |
| 2596 | pstrcpy(monitor_readline_buf, monitor_readline_buf_size, input); |
| 2597 | monitor_readline_started = 0; |
| 2598 | } |
| 2599 | |
| 2600 | void monitor_readline(const char *prompt, int is_password, |
| 2601 | char *buf, int buf_size) |
| 2602 | { |
ths | 20d8a3e | 2007-02-18 17:04:49 +0000 | [diff] [blame] | 2603 | int i; |
| 2604 | |
bellard | 7e2515e | 2004-08-01 21:52:19 +0000 | [diff] [blame] | 2605 | if (is_password) { |
ths | 20d8a3e | 2007-02-18 17:04:49 +0000 | [diff] [blame] | 2606 | for (i = 0; i < MAX_MON; i++) |
| 2607 | if (monitor_hd[i] && monitor_hd[i]->focus == 0) |
| 2608 | qemu_chr_send_event(monitor_hd[i], CHR_EVENT_FOCUS); |
bellard | 7e2515e | 2004-08-01 21:52:19 +0000 | [diff] [blame] | 2609 | } |
| 2610 | readline_start(prompt, is_password, monitor_readline_cb, NULL); |
| 2611 | monitor_readline_buf = buf; |
| 2612 | monitor_readline_buf_size = buf_size; |
| 2613 | monitor_readline_started = 1; |
| 2614 | while (monitor_readline_started) { |
| 2615 | main_loop_wait(10); |
| 2616 | } |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 2617 | } |