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 | */ |
blueswir1 | 511d2b1 | 2009-03-07 15:32:56 +0000 | [diff] [blame] | 24 | #include <dirent.h> |
pbrook | 87ecb68 | 2007-11-17 17:14:51 +0000 | [diff] [blame] | 25 | #include "hw/hw.h" |
Gerd Hoffmann | cae4956 | 2009-06-05 15:53:17 +0100 | [diff] [blame] | 26 | #include "hw/qdev.h" |
pbrook | 87ecb68 | 2007-11-17 17:14:51 +0000 | [diff] [blame] | 27 | #include "hw/usb.h" |
| 28 | #include "hw/pcmcia.h" |
| 29 | #include "hw/pc.h" |
| 30 | #include "hw/pci.h" |
Richard W.M. Jones | 9dd986c | 2009-04-25 13:56:19 +0100 | [diff] [blame] | 31 | #include "hw/watchdog.h" |
pbrook | 87ecb68 | 2007-11-17 17:14:51 +0000 | [diff] [blame] | 32 | #include "gdbstub.h" |
| 33 | #include "net.h" |
| 34 | #include "qemu-char.h" |
| 35 | #include "sysemu.h" |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 36 | #include "monitor.h" |
| 37 | #include "readline.h" |
pbrook | 87ecb68 | 2007-11-17 17:14:51 +0000 | [diff] [blame] | 38 | #include "console.h" |
| 39 | #include "block.h" |
| 40 | #include "audio/audio.h" |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 41 | #include "disas.h" |
aliguori | df751fa | 2008-12-04 20:19:35 +0000 | [diff] [blame] | 42 | #include "balloon.h" |
balrog | c8256f9 | 2008-06-08 22:45:01 +0000 | [diff] [blame] | 43 | #include "qemu-timer.h" |
aliguori | 5bb7910 | 2008-10-13 03:12:02 +0000 | [diff] [blame] | 44 | #include "migration.h" |
aliguori | 7ba1e61 | 2008-11-05 16:04:33 +0000 | [diff] [blame] | 45 | #include "kvm.h" |
aliguori | 76655d6 | 2009-03-06 20:27:37 +0000 | [diff] [blame] | 46 | #include "acl.h" |
Luiz Capitulino | f7188bb | 2009-08-28 15:27:10 -0300 | [diff] [blame] | 47 | #include "qint.h" |
| 48 | #include "qdict.h" |
| 49 | #include "qstring.h" |
ths | 6a5bd30 | 2007-12-03 17:05:38 +0000 | [diff] [blame] | 50 | |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 51 | //#define DEBUG |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 52 | //#define DEBUG_COMPLETION |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 53 | |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 54 | /* |
| 55 | * Supported types: |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 56 | * |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 57 | * 'F' filename |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 58 | * 'B' block device name |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 59 | * 's' string (accept optional quote) |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 60 | * 'i' 32 bit integer |
| 61 | * 'l' target long (32 or 64 bit) |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 62 | * '/' optional gdb-like print format (like "/10x") |
| 63 | * |
Luiz Capitulino | fb46660 | 2009-08-28 15:27:27 -0300 | [diff] [blame] | 64 | * '?' optional type (for all types, except '/') |
| 65 | * '.' other form of optional type (for 'i' and 'l') |
| 66 | * '-' optional parameter (eg. '-f') |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 67 | * |
| 68 | */ |
| 69 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 70 | typedef struct mon_cmd_t { |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 71 | const char *name; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 72 | const char *args_type; |
blueswir1 | a5f1b96 | 2008-08-17 20:21:51 +0000 | [diff] [blame] | 73 | void *handler; |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 74 | const char *params; |
| 75 | const char *help; |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 76 | } mon_cmd_t; |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 77 | |
Mark McLoughlin | f07918f | 2009-07-22 09:11:40 +0100 | [diff] [blame] | 78 | /* file descriptors passed via SCM_RIGHTS */ |
| 79 | typedef struct mon_fd_t mon_fd_t; |
| 80 | struct mon_fd_t { |
| 81 | char *name; |
| 82 | int fd; |
| 83 | LIST_ENTRY(mon_fd_t) next; |
| 84 | }; |
| 85 | |
aliguori | 8712716 | 2009-03-05 23:01:29 +0000 | [diff] [blame] | 86 | struct Monitor { |
| 87 | CharDriverState *chr; |
Gerd Hoffmann | a7aec5d | 2009-09-10 10:58:54 +0200 | [diff] [blame^] | 88 | int mux_out; |
| 89 | int reset_seen; |
aliguori | 731b036 | 2009-03-05 23:01:42 +0000 | [diff] [blame] | 90 | int flags; |
| 91 | int suspend_cnt; |
| 92 | uint8_t outbuf[1024]; |
| 93 | int outbuf_index; |
| 94 | ReadLineState *rs; |
| 95 | CPUState *mon_cpu; |
| 96 | BlockDriverCompletionFunc *password_completion_cb; |
| 97 | void *password_opaque; |
Mark McLoughlin | f07918f | 2009-07-22 09:11:40 +0100 | [diff] [blame] | 98 | LIST_HEAD(,mon_fd_t) fds; |
aliguori | 8712716 | 2009-03-05 23:01:29 +0000 | [diff] [blame] | 99 | LIST_ENTRY(Monitor) entry; |
| 100 | }; |
| 101 | |
| 102 | static LIST_HEAD(mon_list, Monitor) mon_list; |
bellard | 7e2515e | 2004-08-01 21:52:19 +0000 | [diff] [blame] | 103 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 104 | static const mon_cmd_t mon_cmds[]; |
| 105 | static const mon_cmd_t info_cmds[]; |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 106 | |
aliguori | 8712716 | 2009-03-05 23:01:29 +0000 | [diff] [blame] | 107 | Monitor *cur_mon = NULL; |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 108 | |
aliguori | 731b036 | 2009-03-05 23:01:42 +0000 | [diff] [blame] | 109 | static void monitor_command_cb(Monitor *mon, const char *cmdline, |
| 110 | void *opaque); |
aliguori | 83ab795 | 2008-08-19 14:44:22 +0000 | [diff] [blame] | 111 | |
aliguori | 731b036 | 2009-03-05 23:01:42 +0000 | [diff] [blame] | 112 | static void monitor_read_command(Monitor *mon, int show_prompt) |
| 113 | { |
| 114 | readline_start(mon->rs, "(qemu) ", 0, monitor_command_cb, NULL); |
| 115 | if (show_prompt) |
| 116 | readline_show_prompt(mon->rs); |
| 117 | } |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 118 | |
aliguori | cde76ee | 2009-03-05 23:01:51 +0000 | [diff] [blame] | 119 | static int monitor_read_password(Monitor *mon, ReadLineFunc *readline_func, |
| 120 | void *opaque) |
aliguori | bb5fc20 | 2009-03-05 23:01:15 +0000 | [diff] [blame] | 121 | { |
aliguori | cde76ee | 2009-03-05 23:01:51 +0000 | [diff] [blame] | 122 | if (mon->rs) { |
| 123 | readline_start(mon->rs, "Password: ", 1, readline_func, opaque); |
| 124 | /* prompt is printed on return from the command handler */ |
| 125 | return 0; |
| 126 | } else { |
| 127 | monitor_printf(mon, "terminal does not support password prompting\n"); |
| 128 | return -ENOTTY; |
| 129 | } |
aliguori | bb5fc20 | 2009-03-05 23:01:15 +0000 | [diff] [blame] | 130 | } |
| 131 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 132 | void monitor_flush(Monitor *mon) |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 133 | { |
Gerd Hoffmann | a7aec5d | 2009-09-10 10:58:54 +0200 | [diff] [blame^] | 134 | if (mon && mon->outbuf_index != 0 && !mon->mux_out) { |
aliguori | 731b036 | 2009-03-05 23:01:42 +0000 | [diff] [blame] | 135 | qemu_chr_write(mon->chr, mon->outbuf, mon->outbuf_index); |
| 136 | mon->outbuf_index = 0; |
bellard | 7e2515e | 2004-08-01 21:52:19 +0000 | [diff] [blame] | 137 | } |
| 138 | } |
| 139 | |
| 140 | /* flush at every end of line or if the buffer is full */ |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 141 | static void monitor_puts(Monitor *mon, const char *str) |
bellard | 7e2515e | 2004-08-01 21:52:19 +0000 | [diff] [blame] | 142 | { |
ths | 60fe76f | 2007-12-16 03:02:09 +0000 | [diff] [blame] | 143 | char c; |
aliguori | 731b036 | 2009-03-05 23:01:42 +0000 | [diff] [blame] | 144 | |
| 145 | if (!mon) |
| 146 | return; |
| 147 | |
bellard | 7e2515e | 2004-08-01 21:52:19 +0000 | [diff] [blame] | 148 | for(;;) { |
| 149 | c = *str++; |
| 150 | if (c == '\0') |
| 151 | break; |
bellard | 7ba1260 | 2006-07-14 20:26:42 +0000 | [diff] [blame] | 152 | if (c == '\n') |
aliguori | 731b036 | 2009-03-05 23:01:42 +0000 | [diff] [blame] | 153 | mon->outbuf[mon->outbuf_index++] = '\r'; |
| 154 | mon->outbuf[mon->outbuf_index++] = c; |
| 155 | if (mon->outbuf_index >= (sizeof(mon->outbuf) - 1) |
| 156 | || c == '\n') |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 157 | monitor_flush(mon); |
bellard | 7e2515e | 2004-08-01 21:52:19 +0000 | [diff] [blame] | 158 | } |
| 159 | } |
| 160 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 161 | void monitor_vprintf(Monitor *mon, const char *fmt, va_list ap) |
bellard | 7e2515e | 2004-08-01 21:52:19 +0000 | [diff] [blame] | 162 | { |
| 163 | char buf[4096]; |
| 164 | vsnprintf(buf, sizeof(buf), fmt, ap); |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 165 | monitor_puts(mon, buf); |
bellard | 7e2515e | 2004-08-01 21:52:19 +0000 | [diff] [blame] | 166 | } |
| 167 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 168 | void monitor_printf(Monitor *mon, const char *fmt, ...) |
bellard | 7e2515e | 2004-08-01 21:52:19 +0000 | [diff] [blame] | 169 | { |
| 170 | va_list ap; |
| 171 | va_start(ap, fmt); |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 172 | monitor_vprintf(mon, fmt, ap); |
bellard | 7e2515e | 2004-08-01 21:52:19 +0000 | [diff] [blame] | 173 | va_end(ap); |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 174 | } |
| 175 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 176 | void monitor_print_filename(Monitor *mon, const char *filename) |
ths | fef3074 | 2006-12-22 14:11:32 +0000 | [diff] [blame] | 177 | { |
| 178 | int i; |
| 179 | |
| 180 | for (i = 0; filename[i]; i++) { |
aliguori | 28a76be | 2009-03-06 20:27:40 +0000 | [diff] [blame] | 181 | switch (filename[i]) { |
| 182 | case ' ': |
| 183 | case '"': |
| 184 | case '\\': |
| 185 | monitor_printf(mon, "\\%c", filename[i]); |
| 186 | break; |
| 187 | case '\t': |
| 188 | monitor_printf(mon, "\\t"); |
| 189 | break; |
| 190 | case '\r': |
| 191 | monitor_printf(mon, "\\r"); |
| 192 | break; |
| 193 | case '\n': |
| 194 | monitor_printf(mon, "\\n"); |
| 195 | break; |
| 196 | default: |
| 197 | monitor_printf(mon, "%c", filename[i]); |
| 198 | break; |
| 199 | } |
ths | fef3074 | 2006-12-22 14:11:32 +0000 | [diff] [blame] | 200 | } |
| 201 | } |
| 202 | |
bellard | 7fe4848 | 2004-10-09 18:08:01 +0000 | [diff] [blame] | 203 | static int monitor_fprintf(FILE *stream, const char *fmt, ...) |
| 204 | { |
| 205 | va_list ap; |
| 206 | va_start(ap, fmt); |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 207 | monitor_vprintf((Monitor *)stream, fmt, ap); |
bellard | 7fe4848 | 2004-10-09 18:08:01 +0000 | [diff] [blame] | 208 | va_end(ap); |
| 209 | return 0; |
| 210 | } |
| 211 | |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 212 | static int compare_cmd(const char *name, const char *list) |
| 213 | { |
| 214 | const char *p, *pstart; |
| 215 | int len; |
| 216 | len = strlen(name); |
| 217 | p = list; |
| 218 | for(;;) { |
| 219 | pstart = p; |
| 220 | p = strchr(p, '|'); |
| 221 | if (!p) |
| 222 | p = pstart + strlen(pstart); |
| 223 | if ((p - pstart) == len && !memcmp(pstart, name, len)) |
| 224 | return 1; |
| 225 | if (*p == '\0') |
| 226 | break; |
| 227 | p++; |
| 228 | } |
| 229 | return 0; |
| 230 | } |
| 231 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 232 | static void help_cmd_dump(Monitor *mon, const mon_cmd_t *cmds, |
| 233 | const char *prefix, const char *name) |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 234 | { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 235 | const mon_cmd_t *cmd; |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 236 | |
| 237 | for(cmd = cmds; cmd->name != NULL; cmd++) { |
| 238 | if (!name || !strcmp(name, cmd->name)) |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 239 | monitor_printf(mon, "%s%s %s -- %s\n", prefix, cmd->name, |
| 240 | cmd->params, cmd->help); |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 241 | } |
| 242 | } |
| 243 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 244 | static void help_cmd(Monitor *mon, const char *name) |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 245 | { |
| 246 | if (name && !strcmp(name, "info")) { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 247 | help_cmd_dump(mon, info_cmds, "info ", NULL); |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 248 | } else { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 249 | help_cmd_dump(mon, mon_cmds, "", name); |
bellard | f193c79 | 2004-03-21 17:06:25 +0000 | [diff] [blame] | 250 | if (name && !strcmp(name, "log")) { |
blueswir1 | 8662d65 | 2008-10-02 18:32:44 +0000 | [diff] [blame] | 251 | const CPULogItem *item; |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 252 | monitor_printf(mon, "Log items (comma separated):\n"); |
| 253 | monitor_printf(mon, "%-10s %s\n", "none", "remove all logs"); |
bellard | f193c79 | 2004-03-21 17:06:25 +0000 | [diff] [blame] | 254 | for(item = cpu_log_items; item->mask != 0; item++) { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 255 | monitor_printf(mon, "%-10s %s\n", item->name, item->help); |
bellard | f193c79 | 2004-03-21 17:06:25 +0000 | [diff] [blame] | 256 | } |
| 257 | } |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 258 | } |
| 259 | } |
| 260 | |
Luiz Capitulino | d54908a | 2009-08-28 15:27:13 -0300 | [diff] [blame] | 261 | static void do_help_cmd(Monitor *mon, const QDict *qdict) |
Luiz Capitulino | 3818318 | 2009-08-28 15:27:08 -0300 | [diff] [blame] | 262 | { |
Luiz Capitulino | d54908a | 2009-08-28 15:27:13 -0300 | [diff] [blame] | 263 | help_cmd(mon, qdict_get_try_str(qdict, "name")); |
Luiz Capitulino | 3818318 | 2009-08-28 15:27:08 -0300 | [diff] [blame] | 264 | } |
| 265 | |
Luiz Capitulino | d54908a | 2009-08-28 15:27:13 -0300 | [diff] [blame] | 266 | static void do_commit(Monitor *mon, const QDict *qdict) |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 267 | { |
Gerd Hoffmann | 751c6a1 | 2009-07-22 16:42:57 +0200 | [diff] [blame] | 268 | int all_devices; |
| 269 | DriveInfo *dinfo; |
Luiz Capitulino | d54908a | 2009-08-28 15:27:13 -0300 | [diff] [blame] | 270 | const char *device = qdict_get_str(qdict, "device"); |
balrog | 2dc7b60 | 2007-05-24 18:53:22 +0000 | [diff] [blame] | 271 | |
bellard | 7954c73 | 2006-08-01 15:52:40 +0000 | [diff] [blame] | 272 | all_devices = !strcmp(device, "all"); |
Gerd Hoffmann | 751c6a1 | 2009-07-22 16:42:57 +0200 | [diff] [blame] | 273 | TAILQ_FOREACH(dinfo, &drives, next) { |
| 274 | if (!all_devices) |
Luiz Capitulino | 73006d2 | 2009-07-31 15:15:41 -0300 | [diff] [blame] | 275 | if (strcmp(bdrv_get_device_name(dinfo->bdrv), device)) |
Gerd Hoffmann | 751c6a1 | 2009-07-22 16:42:57 +0200 | [diff] [blame] | 276 | continue; |
| 277 | bdrv_commit(dinfo->bdrv); |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 278 | } |
| 279 | } |
| 280 | |
Luiz Capitulino | d54908a | 2009-08-28 15:27:13 -0300 | [diff] [blame] | 281 | static void do_info(Monitor *mon, const QDict *qdict) |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 282 | { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 283 | const mon_cmd_t *cmd; |
Luiz Capitulino | d54908a | 2009-08-28 15:27:13 -0300 | [diff] [blame] | 284 | const char *item = qdict_get_try_str(qdict, "item"); |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 285 | void (*handler)(Monitor *); |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 286 | |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 287 | if (!item) |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 288 | goto help; |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 289 | for(cmd = info_cmds; cmd->name != NULL; cmd++) { |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 290 | if (compare_cmd(item, cmd->name)) |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 291 | goto found; |
| 292 | } |
| 293 | help: |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 294 | help_cmd(mon, "info"); |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 295 | return; |
| 296 | found: |
blueswir1 | a5f1b96 | 2008-08-17 20:21:51 +0000 | [diff] [blame] | 297 | handler = cmd->handler; |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 298 | handler(mon); |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 299 | } |
| 300 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 301 | static void do_info_version(Monitor *mon) |
bellard | 9bc9d1c | 2004-10-10 15:15:51 +0000 | [diff] [blame] | 302 | { |
pbrook | 4a19f1e | 2009-04-07 23:17:49 +0000 | [diff] [blame] | 303 | monitor_printf(mon, "%s\n", QEMU_VERSION QEMU_PKGVERSION); |
bellard | 9bc9d1c | 2004-10-10 15:15:51 +0000 | [diff] [blame] | 304 | } |
| 305 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 306 | static void do_info_name(Monitor *mon) |
ths | c35734b | 2007-03-19 15:17:08 +0000 | [diff] [blame] | 307 | { |
| 308 | if (qemu_name) |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 309 | monitor_printf(mon, "%s\n", qemu_name); |
ths | c35734b | 2007-03-19 15:17:08 +0000 | [diff] [blame] | 310 | } |
| 311 | |
aurel32 | bf4f74c | 2008-12-18 22:42:34 +0000 | [diff] [blame] | 312 | #if defined(TARGET_I386) |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 313 | static void do_info_hpet(Monitor *mon) |
aliguori | 16b29ae | 2008-12-17 23:28:44 +0000 | [diff] [blame] | 314 | { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 315 | monitor_printf(mon, "HPET is %s by QEMU\n", |
| 316 | (no_hpet) ? "disabled" : "enabled"); |
aliguori | 16b29ae | 2008-12-17 23:28:44 +0000 | [diff] [blame] | 317 | } |
aurel32 | bf4f74c | 2008-12-18 22:42:34 +0000 | [diff] [blame] | 318 | #endif |
aliguori | 16b29ae | 2008-12-17 23:28:44 +0000 | [diff] [blame] | 319 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 320 | static void do_info_uuid(Monitor *mon) |
blueswir1 | f1f23ad | 2008-09-18 18:30:20 +0000 | [diff] [blame] | 321 | { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 322 | monitor_printf(mon, UUID_FMT "\n", qemu_uuid[0], qemu_uuid[1], |
| 323 | qemu_uuid[2], qemu_uuid[3], qemu_uuid[4], qemu_uuid[5], |
| 324 | qemu_uuid[6], qemu_uuid[7], qemu_uuid[8], qemu_uuid[9], |
| 325 | qemu_uuid[10], qemu_uuid[11], qemu_uuid[12], qemu_uuid[13], |
| 326 | qemu_uuid[14], qemu_uuid[15]); |
ths | a36e69d | 2007-12-02 05:18:19 +0000 | [diff] [blame] | 327 | } |
| 328 | |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 329 | /* get the current CPU defined by the user */ |
pbrook | 9596ebb | 2007-11-18 01:44:38 +0000 | [diff] [blame] | 330 | static int mon_set_cpu(int cpu_index) |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 331 | { |
| 332 | CPUState *env; |
| 333 | |
| 334 | for(env = first_cpu; env != NULL; env = env->next_cpu) { |
| 335 | if (env->cpu_index == cpu_index) { |
aliguori | 731b036 | 2009-03-05 23:01:42 +0000 | [diff] [blame] | 336 | cur_mon->mon_cpu = env; |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 337 | return 0; |
| 338 | } |
| 339 | } |
| 340 | return -1; |
| 341 | } |
| 342 | |
pbrook | 9596ebb | 2007-11-18 01:44:38 +0000 | [diff] [blame] | 343 | static CPUState *mon_get_cpu(void) |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 344 | { |
aliguori | 731b036 | 2009-03-05 23:01:42 +0000 | [diff] [blame] | 345 | if (!cur_mon->mon_cpu) { |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 346 | mon_set_cpu(0); |
| 347 | } |
Avi Kivity | 4c0960c | 2009-08-17 23:19:53 +0300 | [diff] [blame] | 348 | cpu_synchronize_state(cur_mon->mon_cpu); |
aliguori | 731b036 | 2009-03-05 23:01:42 +0000 | [diff] [blame] | 349 | return cur_mon->mon_cpu; |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 350 | } |
| 351 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 352 | static void do_info_registers(Monitor *mon) |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 353 | { |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 354 | CPUState *env; |
| 355 | env = mon_get_cpu(); |
| 356 | if (!env) |
| 357 | return; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 358 | #ifdef TARGET_I386 |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 359 | cpu_dump_state(env, (FILE *)mon, monitor_fprintf, |
bellard | d24b15a | 2005-07-03 21:28:00 +0000 | [diff] [blame] | 360 | X86_DUMP_FPU); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 361 | #else |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 362 | cpu_dump_state(env, (FILE *)mon, monitor_fprintf, |
bellard | 7fe4848 | 2004-10-09 18:08:01 +0000 | [diff] [blame] | 363 | 0); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 364 | #endif |
| 365 | } |
| 366 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 367 | static void do_info_cpus(Monitor *mon) |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 368 | { |
| 369 | CPUState *env; |
| 370 | |
| 371 | /* just to set the default cpu if not already done */ |
| 372 | mon_get_cpu(); |
| 373 | |
| 374 | for(env = first_cpu; env != NULL; env = env->next_cpu) { |
Avi Kivity | 4c0960c | 2009-08-17 23:19:53 +0300 | [diff] [blame] | 375 | cpu_synchronize_state(env); |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 376 | monitor_printf(mon, "%c CPU #%d:", |
aliguori | 731b036 | 2009-03-05 23:01:42 +0000 | [diff] [blame] | 377 | (env == mon->mon_cpu) ? '*' : ' ', |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 378 | env->cpu_index); |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 379 | #if defined(TARGET_I386) |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 380 | monitor_printf(mon, " pc=0x" TARGET_FMT_lx, |
| 381 | env->eip + env->segs[R_CS].base); |
bellard | e80e1cc | 2005-11-23 22:05:28 +0000 | [diff] [blame] | 382 | #elif defined(TARGET_PPC) |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 383 | monitor_printf(mon, " nip=0x" TARGET_FMT_lx, env->nip); |
bellard | ba3c64f | 2005-12-05 20:31:52 +0000 | [diff] [blame] | 384 | #elif defined(TARGET_SPARC) |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 385 | monitor_printf(mon, " pc=0x" TARGET_FMT_lx " npc=0x" TARGET_FMT_lx, |
| 386 | env->pc, env->npc); |
ths | ead9360 | 2007-09-06 00:18:15 +0000 | [diff] [blame] | 387 | #elif defined(TARGET_MIPS) |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 388 | monitor_printf(mon, " PC=0x" TARGET_FMT_lx, env->active_tc.PC); |
bellard | ce5232c | 2008-05-28 17:14:10 +0000 | [diff] [blame] | 389 | #endif |
ths | ead9360 | 2007-09-06 00:18:15 +0000 | [diff] [blame] | 390 | if (env->halted) |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 391 | monitor_printf(mon, " (halted)"); |
| 392 | monitor_printf(mon, "\n"); |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 393 | } |
| 394 | } |
| 395 | |
Luiz Capitulino | d54908a | 2009-08-28 15:27:13 -0300 | [diff] [blame] | 396 | static void do_cpu_set(Monitor *mon, const QDict *qdict) |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 397 | { |
Luiz Capitulino | d54908a | 2009-08-28 15:27:13 -0300 | [diff] [blame] | 398 | int index = qdict_get_int(qdict, "index"); |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 399 | if (mon_set_cpu(index) < 0) |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 400 | monitor_printf(mon, "Invalid CPU index\n"); |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 401 | } |
| 402 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 403 | static void do_info_jit(Monitor *mon) |
bellard | e3db722 | 2005-01-26 22:00:47 +0000 | [diff] [blame] | 404 | { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 405 | dump_exec_info((FILE *)mon, monitor_fprintf); |
bellard | e3db722 | 2005-01-26 22:00:47 +0000 | [diff] [blame] | 406 | } |
| 407 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 408 | static void do_info_history(Monitor *mon) |
bellard | aa45548 | 2004-04-04 13:07:25 +0000 | [diff] [blame] | 409 | { |
| 410 | int i; |
bellard | 7e2515e | 2004-08-01 21:52:19 +0000 | [diff] [blame] | 411 | const char *str; |
ths | 3b46e62 | 2007-09-17 08:09:54 +0000 | [diff] [blame] | 412 | |
aliguori | cde76ee | 2009-03-05 23:01:51 +0000 | [diff] [blame] | 413 | if (!mon->rs) |
| 414 | return; |
bellard | 7e2515e | 2004-08-01 21:52:19 +0000 | [diff] [blame] | 415 | i = 0; |
| 416 | for(;;) { |
aliguori | 731b036 | 2009-03-05 23:01:42 +0000 | [diff] [blame] | 417 | str = readline_get_history(mon->rs, i); |
bellard | 7e2515e | 2004-08-01 21:52:19 +0000 | [diff] [blame] | 418 | if (!str) |
| 419 | break; |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 420 | monitor_printf(mon, "%d: '%s'\n", i, str); |
bellard | 8e3a9fd | 2004-10-09 17:32:58 +0000 | [diff] [blame] | 421 | i++; |
bellard | aa45548 | 2004-04-04 13:07:25 +0000 | [diff] [blame] | 422 | } |
| 423 | } |
| 424 | |
j_mayer | 76a6625 | 2007-03-07 08:32:30 +0000 | [diff] [blame] | 425 | #if defined(TARGET_PPC) |
| 426 | /* XXX: not implemented in other targets */ |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 427 | static void do_info_cpu_stats(Monitor *mon) |
j_mayer | 76a6625 | 2007-03-07 08:32:30 +0000 | [diff] [blame] | 428 | { |
| 429 | CPUState *env; |
| 430 | |
| 431 | env = mon_get_cpu(); |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 432 | cpu_dump_statistics(env, (FILE *)mon, &monitor_fprintf, 0); |
j_mayer | 76a6625 | 2007-03-07 08:32:30 +0000 | [diff] [blame] | 433 | } |
| 434 | #endif |
| 435 | |
Luiz Capitulino | f96fc8a | 2009-08-28 15:27:12 -0300 | [diff] [blame] | 436 | static void do_quit(Monitor *mon, const QDict *qdict) |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 437 | { |
| 438 | exit(0); |
| 439 | } |
| 440 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 441 | static int eject_device(Monitor *mon, BlockDriverState *bs, int force) |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 442 | { |
| 443 | if (bdrv_is_inserted(bs)) { |
| 444 | if (!force) { |
| 445 | if (!bdrv_is_removable(bs)) { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 446 | monitor_printf(mon, "device is not removable\n"); |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 447 | return -1; |
| 448 | } |
| 449 | if (bdrv_is_locked(bs)) { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 450 | monitor_printf(mon, "device is locked\n"); |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 451 | return -1; |
| 452 | } |
| 453 | } |
| 454 | bdrv_close(bs); |
| 455 | } |
| 456 | return 0; |
| 457 | } |
| 458 | |
Luiz Capitulino | f18c16d | 2009-08-28 15:27:14 -0300 | [diff] [blame] | 459 | static void do_eject(Monitor *mon, const QDict *qdict) |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 460 | { |
| 461 | BlockDriverState *bs; |
Luiz Capitulino | f18c16d | 2009-08-28 15:27:14 -0300 | [diff] [blame] | 462 | int force = qdict_get_int(qdict, "force"); |
| 463 | const char *filename = qdict_get_str(qdict, "filename"); |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 464 | |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 465 | bs = bdrv_find(filename); |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 466 | if (!bs) { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 467 | monitor_printf(mon, "device not found\n"); |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 468 | return; |
| 469 | } |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 470 | eject_device(mon, bs, force); |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 471 | } |
| 472 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 473 | static void do_change_block(Monitor *mon, const char *device, |
| 474 | const char *filename, const char *fmt) |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 475 | { |
| 476 | BlockDriverState *bs; |
aurel32 | 2ecea9b | 2008-06-18 22:10:01 +0000 | [diff] [blame] | 477 | BlockDriver *drv = NULL; |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 478 | |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 479 | bs = bdrv_find(device); |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 480 | if (!bs) { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 481 | monitor_printf(mon, "device not found\n"); |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 482 | return; |
| 483 | } |
aurel32 | 2ecea9b | 2008-06-18 22:10:01 +0000 | [diff] [blame] | 484 | if (fmt) { |
| 485 | drv = bdrv_find_format(fmt); |
| 486 | if (!drv) { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 487 | monitor_printf(mon, "invalid format %s\n", fmt); |
aurel32 | 2ecea9b | 2008-06-18 22:10:01 +0000 | [diff] [blame] | 488 | return; |
| 489 | } |
| 490 | } |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 491 | if (eject_device(mon, bs, 0) < 0) |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 492 | return; |
aurel32 | 2ecea9b | 2008-06-18 22:10:01 +0000 | [diff] [blame] | 493 | bdrv_open2(bs, filename, 0, drv); |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 494 | monitor_read_bdrv_key_start(mon, bs, NULL, NULL); |
aliguori | bb5fc20 | 2009-03-05 23:01:15 +0000 | [diff] [blame] | 495 | } |
| 496 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 497 | static void change_vnc_password_cb(Monitor *mon, const char *password, |
| 498 | void *opaque) |
aliguori | bb5fc20 | 2009-03-05 23:01:15 +0000 | [diff] [blame] | 499 | { |
| 500 | if (vnc_display_password(NULL, password) < 0) |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 501 | monitor_printf(mon, "could not set VNC server password\n"); |
aliguori | bb5fc20 | 2009-03-05 23:01:15 +0000 | [diff] [blame] | 502 | |
aliguori | 731b036 | 2009-03-05 23:01:42 +0000 | [diff] [blame] | 503 | monitor_read_command(mon, 1); |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 504 | } |
| 505 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 506 | static void do_change_vnc(Monitor *mon, const char *target, const char *arg) |
ths | e25a582 | 2007-08-25 01:36:20 +0000 | [diff] [blame] | 507 | { |
ths | 7084851 | 2007-08-25 01:37:05 +0000 | [diff] [blame] | 508 | if (strcmp(target, "passwd") == 0 || |
aliguori | 28a76be | 2009-03-06 20:27:40 +0000 | [diff] [blame] | 509 | strcmp(target, "password") == 0) { |
| 510 | if (arg) { |
aliguori | bb5fc20 | 2009-03-05 23:01:15 +0000 | [diff] [blame] | 511 | char password[9]; |
aliguori | 28a76be | 2009-03-06 20:27:40 +0000 | [diff] [blame] | 512 | strncpy(password, arg, sizeof(password)); |
| 513 | password[sizeof(password) - 1] = '\0'; |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 514 | change_vnc_password_cb(mon, password, NULL); |
aliguori | bb5fc20 | 2009-03-05 23:01:15 +0000 | [diff] [blame] | 515 | } else { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 516 | monitor_read_password(mon, change_vnc_password_cb, NULL); |
aliguori | bb5fc20 | 2009-03-05 23:01:15 +0000 | [diff] [blame] | 517 | } |
ths | 7084851 | 2007-08-25 01:37:05 +0000 | [diff] [blame] | 518 | } else { |
aliguori | 28a76be | 2009-03-06 20:27:40 +0000 | [diff] [blame] | 519 | if (vnc_display_open(NULL, target) < 0) |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 520 | monitor_printf(mon, "could not start VNC server on %s\n", target); |
ths | 7084851 | 2007-08-25 01:37:05 +0000 | [diff] [blame] | 521 | } |
ths | e25a582 | 2007-08-25 01:36:20 +0000 | [diff] [blame] | 522 | } |
| 523 | |
Luiz Capitulino | 1d4daa9 | 2009-08-28 15:27:15 -0300 | [diff] [blame] | 524 | static void do_change(Monitor *mon, const QDict *qdict) |
ths | e25a582 | 2007-08-25 01:36:20 +0000 | [diff] [blame] | 525 | { |
Luiz Capitulino | 1d4daa9 | 2009-08-28 15:27:15 -0300 | [diff] [blame] | 526 | const char *device = qdict_get_str(qdict, "device"); |
| 527 | const char *target = qdict_get_str(qdict, "target"); |
| 528 | const char *arg = qdict_get_try_str(qdict, "arg"); |
ths | e25a582 | 2007-08-25 01:36:20 +0000 | [diff] [blame] | 529 | if (strcmp(device, "vnc") == 0) { |
aliguori | 28a76be | 2009-03-06 20:27:40 +0000 | [diff] [blame] | 530 | do_change_vnc(mon, target, arg); |
ths | e25a582 | 2007-08-25 01:36:20 +0000 | [diff] [blame] | 531 | } else { |
aliguori | 28a76be | 2009-03-06 20:27:40 +0000 | [diff] [blame] | 532 | do_change_block(mon, device, target, arg); |
ths | e25a582 | 2007-08-25 01:36:20 +0000 | [diff] [blame] | 533 | } |
| 534 | } |
| 535 | |
Luiz Capitulino | d54908a | 2009-08-28 15:27:13 -0300 | [diff] [blame] | 536 | static void do_screen_dump(Monitor *mon, const QDict *qdict) |
bellard | 59a983b | 2004-03-17 23:17:16 +0000 | [diff] [blame] | 537 | { |
Luiz Capitulino | d54908a | 2009-08-28 15:27:13 -0300 | [diff] [blame] | 538 | vga_hw_screen_dump(qdict_get_str(qdict, "filename")); |
bellard | 59a983b | 2004-03-17 23:17:16 +0000 | [diff] [blame] | 539 | } |
| 540 | |
Luiz Capitulino | d54908a | 2009-08-28 15:27:13 -0300 | [diff] [blame] | 541 | static void do_logfile(Monitor *mon, const QDict *qdict) |
pbrook | e735b91 | 2007-06-30 13:53:24 +0000 | [diff] [blame] | 542 | { |
Luiz Capitulino | d54908a | 2009-08-28 15:27:13 -0300 | [diff] [blame] | 543 | cpu_set_log_filename(qdict_get_str(qdict, "filename")); |
pbrook | e735b91 | 2007-06-30 13:53:24 +0000 | [diff] [blame] | 544 | } |
| 545 | |
Luiz Capitulino | d54908a | 2009-08-28 15:27:13 -0300 | [diff] [blame] | 546 | static void do_log(Monitor *mon, const QDict *qdict) |
bellard | f193c79 | 2004-03-21 17:06:25 +0000 | [diff] [blame] | 547 | { |
| 548 | int mask; |
Luiz Capitulino | d54908a | 2009-08-28 15:27:13 -0300 | [diff] [blame] | 549 | const char *items = qdict_get_str(qdict, "items"); |
ths | 3b46e62 | 2007-09-17 08:09:54 +0000 | [diff] [blame] | 550 | |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 551 | if (!strcmp(items, "none")) { |
bellard | f193c79 | 2004-03-21 17:06:25 +0000 | [diff] [blame] | 552 | mask = 0; |
| 553 | } else { |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 554 | mask = cpu_str_to_log_mask(items); |
bellard | f193c79 | 2004-03-21 17:06:25 +0000 | [diff] [blame] | 555 | if (!mask) { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 556 | help_cmd(mon, "log"); |
bellard | f193c79 | 2004-03-21 17:06:25 +0000 | [diff] [blame] | 557 | return; |
| 558 | } |
| 559 | } |
| 560 | cpu_set_log(mask); |
| 561 | } |
| 562 | |
Luiz Capitulino | d54908a | 2009-08-28 15:27:13 -0300 | [diff] [blame] | 563 | static void do_singlestep(Monitor *mon, const QDict *qdict) |
aurel32 | 1b530a6 | 2009-04-05 20:08:59 +0000 | [diff] [blame] | 564 | { |
Luiz Capitulino | d54908a | 2009-08-28 15:27:13 -0300 | [diff] [blame] | 565 | const char *option = qdict_get_try_str(qdict, "option"); |
aurel32 | 1b530a6 | 2009-04-05 20:08:59 +0000 | [diff] [blame] | 566 | if (!option || !strcmp(option, "on")) { |
| 567 | singlestep = 1; |
| 568 | } else if (!strcmp(option, "off")) { |
| 569 | singlestep = 0; |
| 570 | } else { |
| 571 | monitor_printf(mon, "unexpected option %s\n", option); |
| 572 | } |
| 573 | } |
| 574 | |
Luiz Capitulino | f96fc8a | 2009-08-28 15:27:12 -0300 | [diff] [blame] | 575 | static void do_stop(Monitor *mon, const QDict *qdict) |
bellard | 8a7ddc3 | 2004-03-31 19:00:16 +0000 | [diff] [blame] | 576 | { |
| 577 | vm_stop(EXCP_INTERRUPT); |
| 578 | } |
| 579 | |
aliguori | bb5fc20 | 2009-03-05 23:01:15 +0000 | [diff] [blame] | 580 | static void encrypted_bdrv_it(void *opaque, BlockDriverState *bs); |
aliguori | c0f4ce7 | 2009-03-05 23:01:01 +0000 | [diff] [blame] | 581 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 582 | struct bdrv_iterate_context { |
| 583 | Monitor *mon; |
| 584 | int err; |
| 585 | }; |
aliguori | c0f4ce7 | 2009-03-05 23:01:01 +0000 | [diff] [blame] | 586 | |
Luiz Capitulino | f96fc8a | 2009-08-28 15:27:12 -0300 | [diff] [blame] | 587 | static void do_cont(Monitor *mon, const QDict *qdict) |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 588 | { |
| 589 | struct bdrv_iterate_context context = { mon, 0 }; |
| 590 | |
| 591 | bdrv_iterate(encrypted_bdrv_it, &context); |
aliguori | c0f4ce7 | 2009-03-05 23:01:01 +0000 | [diff] [blame] | 592 | /* only resume the vm if all keys are set and valid */ |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 593 | if (!context.err) |
aliguori | c0f4ce7 | 2009-03-05 23:01:01 +0000 | [diff] [blame] | 594 | vm_start(); |
bellard | 8a7ddc3 | 2004-03-31 19:00:16 +0000 | [diff] [blame] | 595 | } |
| 596 | |
aliguori | bb5fc20 | 2009-03-05 23:01:15 +0000 | [diff] [blame] | 597 | static void bdrv_key_cb(void *opaque, int err) |
| 598 | { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 599 | Monitor *mon = opaque; |
| 600 | |
aliguori | bb5fc20 | 2009-03-05 23:01:15 +0000 | [diff] [blame] | 601 | /* another key was set successfully, retry to continue */ |
| 602 | if (!err) |
Luiz Capitulino | f96fc8a | 2009-08-28 15:27:12 -0300 | [diff] [blame] | 603 | do_cont(mon, NULL); |
aliguori | bb5fc20 | 2009-03-05 23:01:15 +0000 | [diff] [blame] | 604 | } |
| 605 | |
| 606 | static void encrypted_bdrv_it(void *opaque, BlockDriverState *bs) |
| 607 | { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 608 | struct bdrv_iterate_context *context = opaque; |
aliguori | bb5fc20 | 2009-03-05 23:01:15 +0000 | [diff] [blame] | 609 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 610 | if (!context->err && bdrv_key_required(bs)) { |
| 611 | context->err = -EBUSY; |
| 612 | monitor_read_bdrv_key_start(context->mon, bs, bdrv_key_cb, |
| 613 | context->mon); |
aliguori | bb5fc20 | 2009-03-05 23:01:15 +0000 | [diff] [blame] | 614 | } |
| 615 | } |
| 616 | |
Luiz Capitulino | d54908a | 2009-08-28 15:27:13 -0300 | [diff] [blame] | 617 | static void do_gdbserver(Monitor *mon, const QDict *qdict) |
bellard | 8a7ddc3 | 2004-03-31 19:00:16 +0000 | [diff] [blame] | 618 | { |
Luiz Capitulino | d54908a | 2009-08-28 15:27:13 -0300 | [diff] [blame] | 619 | const char *device = qdict_get_try_str(qdict, "device"); |
aliguori | 59030a8 | 2009-04-05 18:43:41 +0000 | [diff] [blame] | 620 | if (!device) |
| 621 | device = "tcp::" DEFAULT_GDBSTUB_PORT; |
| 622 | if (gdbserver_start(device) < 0) { |
| 623 | monitor_printf(mon, "Could not open gdbserver on device '%s'\n", |
| 624 | device); |
| 625 | } else if (strcmp(device, "none") == 0) { |
aliguori | 36556b2 | 2009-03-28 18:05:53 +0000 | [diff] [blame] | 626 | monitor_printf(mon, "Disabled gdbserver\n"); |
bellard | 8a7ddc3 | 2004-03-31 19:00:16 +0000 | [diff] [blame] | 627 | } else { |
aliguori | 59030a8 | 2009-04-05 18:43:41 +0000 | [diff] [blame] | 628 | monitor_printf(mon, "Waiting for gdb connection on device '%s'\n", |
| 629 | device); |
bellard | 8a7ddc3 | 2004-03-31 19:00:16 +0000 | [diff] [blame] | 630 | } |
| 631 | } |
| 632 | |
Luiz Capitulino | d54908a | 2009-08-28 15:27:13 -0300 | [diff] [blame] | 633 | static void do_watchdog_action(Monitor *mon, const QDict *qdict) |
Richard W.M. Jones | 9dd986c | 2009-04-25 13:56:19 +0100 | [diff] [blame] | 634 | { |
Luiz Capitulino | d54908a | 2009-08-28 15:27:13 -0300 | [diff] [blame] | 635 | const char *action = qdict_get_str(qdict, "action"); |
Richard W.M. Jones | 9dd986c | 2009-04-25 13:56:19 +0100 | [diff] [blame] | 636 | if (select_watchdog_action(action) == -1) { |
| 637 | monitor_printf(mon, "Unknown watchdog action '%s'\n", action); |
| 638 | } |
| 639 | } |
| 640 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 641 | static void monitor_printc(Monitor *mon, int c) |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 642 | { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 643 | monitor_printf(mon, "'"); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 644 | switch(c) { |
| 645 | case '\'': |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 646 | monitor_printf(mon, "\\'"); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 647 | break; |
| 648 | case '\\': |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 649 | monitor_printf(mon, "\\\\"); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 650 | break; |
| 651 | case '\n': |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 652 | monitor_printf(mon, "\\n"); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 653 | break; |
| 654 | case '\r': |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 655 | monitor_printf(mon, "\\r"); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 656 | break; |
| 657 | default: |
| 658 | if (c >= 32 && c <= 126) { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 659 | monitor_printf(mon, "%c", c); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 660 | } else { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 661 | monitor_printf(mon, "\\x%02x", c); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 662 | } |
| 663 | break; |
| 664 | } |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 665 | monitor_printf(mon, "'"); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 666 | } |
| 667 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 668 | static void memory_dump(Monitor *mon, int count, int format, int wsize, |
blueswir1 | 7743e58 | 2007-09-24 18:39:04 +0000 | [diff] [blame] | 669 | target_phys_addr_t addr, int is_physical) |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 670 | { |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 671 | CPUState *env; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 672 | int nb_per_line, l, line_size, i, max_digits, len; |
| 673 | uint8_t buf[16]; |
| 674 | uint64_t v; |
| 675 | |
| 676 | if (format == 'i') { |
| 677 | int flags; |
| 678 | flags = 0; |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 679 | env = mon_get_cpu(); |
| 680 | if (!env && !is_physical) |
| 681 | return; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 682 | #ifdef TARGET_I386 |
bellard | 4c27ba2 | 2004-04-25 18:05:08 +0000 | [diff] [blame] | 683 | if (wsize == 2) { |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 684 | flags = 1; |
bellard | 4c27ba2 | 2004-04-25 18:05:08 +0000 | [diff] [blame] | 685 | } else if (wsize == 4) { |
| 686 | flags = 0; |
| 687 | } else { |
bellard | 6a15fd1 | 2006-04-12 21:07:07 +0000 | [diff] [blame] | 688 | /* as default we use the current CS size */ |
bellard | 4c27ba2 | 2004-04-25 18:05:08 +0000 | [diff] [blame] | 689 | flags = 0; |
bellard | 6a15fd1 | 2006-04-12 21:07:07 +0000 | [diff] [blame] | 690 | if (env) { |
| 691 | #ifdef TARGET_X86_64 |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 692 | if ((env->efer & MSR_EFER_LMA) && |
bellard | 6a15fd1 | 2006-04-12 21:07:07 +0000 | [diff] [blame] | 693 | (env->segs[R_CS].flags & DESC_L_MASK)) |
| 694 | flags = 2; |
| 695 | else |
| 696 | #endif |
| 697 | if (!(env->segs[R_CS].flags & DESC_B_MASK)) |
| 698 | flags = 1; |
| 699 | } |
bellard | 4c27ba2 | 2004-04-25 18:05:08 +0000 | [diff] [blame] | 700 | } |
| 701 | #endif |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 702 | monitor_disas(mon, env, addr, count, is_physical, flags); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 703 | return; |
| 704 | } |
| 705 | |
| 706 | len = wsize * count; |
| 707 | if (wsize == 1) |
| 708 | line_size = 8; |
| 709 | else |
| 710 | line_size = 16; |
| 711 | nb_per_line = line_size / wsize; |
| 712 | max_digits = 0; |
| 713 | |
| 714 | switch(format) { |
| 715 | case 'o': |
| 716 | max_digits = (wsize * 8 + 2) / 3; |
| 717 | break; |
| 718 | default: |
| 719 | case 'x': |
| 720 | max_digits = (wsize * 8) / 4; |
| 721 | break; |
| 722 | case 'u': |
| 723 | case 'd': |
| 724 | max_digits = (wsize * 8 * 10 + 32) / 33; |
| 725 | break; |
| 726 | case 'c': |
| 727 | wsize = 1; |
| 728 | break; |
| 729 | } |
| 730 | |
| 731 | while (len > 0) { |
blueswir1 | 7743e58 | 2007-09-24 18:39:04 +0000 | [diff] [blame] | 732 | if (is_physical) |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 733 | monitor_printf(mon, TARGET_FMT_plx ":", addr); |
blueswir1 | 7743e58 | 2007-09-24 18:39:04 +0000 | [diff] [blame] | 734 | else |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 735 | monitor_printf(mon, TARGET_FMT_lx ":", (target_ulong)addr); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 736 | l = len; |
| 737 | if (l > line_size) |
| 738 | l = line_size; |
| 739 | if (is_physical) { |
| 740 | cpu_physical_memory_rw(addr, buf, l, 0); |
| 741 | } else { |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 742 | env = mon_get_cpu(); |
| 743 | if (!env) |
| 744 | break; |
aliguori | c8f79b6 | 2008-08-18 14:00:20 +0000 | [diff] [blame] | 745 | if (cpu_memory_rw_debug(env, addr, buf, l, 0) < 0) { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 746 | monitor_printf(mon, " Cannot access memory\n"); |
aliguori | c8f79b6 | 2008-08-18 14:00:20 +0000 | [diff] [blame] | 747 | break; |
| 748 | } |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 749 | } |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 750 | i = 0; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 751 | while (i < l) { |
| 752 | switch(wsize) { |
| 753 | default: |
| 754 | case 1: |
| 755 | v = ldub_raw(buf + i); |
| 756 | break; |
| 757 | case 2: |
| 758 | v = lduw_raw(buf + i); |
| 759 | break; |
| 760 | case 4: |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 761 | v = (uint32_t)ldl_raw(buf + i); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 762 | break; |
| 763 | case 8: |
| 764 | v = ldq_raw(buf + i); |
| 765 | break; |
| 766 | } |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 767 | monitor_printf(mon, " "); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 768 | switch(format) { |
| 769 | case 'o': |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 770 | monitor_printf(mon, "%#*" PRIo64, max_digits, v); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 771 | break; |
| 772 | case 'x': |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 773 | monitor_printf(mon, "0x%0*" PRIx64, max_digits, v); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 774 | break; |
| 775 | case 'u': |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 776 | monitor_printf(mon, "%*" PRIu64, max_digits, v); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 777 | break; |
| 778 | case 'd': |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 779 | monitor_printf(mon, "%*" PRId64, max_digits, v); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 780 | break; |
| 781 | case 'c': |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 782 | monitor_printc(mon, v); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 783 | break; |
| 784 | } |
| 785 | i += wsize; |
| 786 | } |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 787 | monitor_printf(mon, "\n"); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 788 | addr += l; |
| 789 | len -= l; |
| 790 | } |
| 791 | } |
| 792 | |
Luiz Capitulino | 1bd1442 | 2009-08-28 15:27:17 -0300 | [diff] [blame] | 793 | static void do_memory_dump(Monitor *mon, const QDict *qdict) |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 794 | { |
Luiz Capitulino | 1bd1442 | 2009-08-28 15:27:17 -0300 | [diff] [blame] | 795 | int count = qdict_get_int(qdict, "count"); |
| 796 | int format = qdict_get_int(qdict, "format"); |
| 797 | int size = qdict_get_int(qdict, "size"); |
| 798 | target_long addr = qdict_get_int(qdict, "addr"); |
| 799 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 800 | memory_dump(mon, count, format, size, addr, 0); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 801 | } |
| 802 | |
Luiz Capitulino | 1bd1442 | 2009-08-28 15:27:17 -0300 | [diff] [blame] | 803 | static void do_physical_memory_dump(Monitor *mon, const QDict *qdict) |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 804 | { |
Luiz Capitulino | 1bd1442 | 2009-08-28 15:27:17 -0300 | [diff] [blame] | 805 | int count = qdict_get_int(qdict, "count"); |
| 806 | int format = qdict_get_int(qdict, "format"); |
| 807 | int size = qdict_get_int(qdict, "size"); |
| 808 | target_phys_addr_t addr = qdict_get_int(qdict, "addr"); |
| 809 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 810 | memory_dump(mon, count, format, size, addr, 1); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 811 | } |
| 812 | |
Luiz Capitulino | 1bd1442 | 2009-08-28 15:27:17 -0300 | [diff] [blame] | 813 | static void do_print(Monitor *mon, const QDict *qdict) |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 814 | { |
Luiz Capitulino | 1bd1442 | 2009-08-28 15:27:17 -0300 | [diff] [blame] | 815 | int format = qdict_get_int(qdict, "format"); |
| 816 | target_phys_addr_t val = qdict_get_int(qdict, "val"); |
| 817 | |
blueswir1 | 7743e58 | 2007-09-24 18:39:04 +0000 | [diff] [blame] | 818 | #if TARGET_PHYS_ADDR_BITS == 32 |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 819 | switch(format) { |
| 820 | case 'o': |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 821 | monitor_printf(mon, "%#o", val); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 822 | break; |
| 823 | case 'x': |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 824 | monitor_printf(mon, "%#x", val); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 825 | break; |
| 826 | case 'u': |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 827 | monitor_printf(mon, "%u", val); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 828 | break; |
| 829 | default: |
| 830 | case 'd': |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 831 | monitor_printf(mon, "%d", val); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 832 | break; |
| 833 | case 'c': |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 834 | monitor_printc(mon, val); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 835 | break; |
| 836 | } |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 837 | #else |
| 838 | switch(format) { |
| 839 | case 'o': |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 840 | monitor_printf(mon, "%#" PRIo64, val); |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 841 | break; |
| 842 | case 'x': |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 843 | monitor_printf(mon, "%#" PRIx64, val); |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 844 | break; |
| 845 | case 'u': |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 846 | monitor_printf(mon, "%" PRIu64, val); |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 847 | break; |
| 848 | default: |
| 849 | case 'd': |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 850 | monitor_printf(mon, "%" PRId64, val); |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 851 | break; |
| 852 | case 'c': |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 853 | monitor_printc(mon, val); |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 854 | break; |
| 855 | } |
| 856 | #endif |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 857 | monitor_printf(mon, "\n"); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 858 | } |
| 859 | |
Luiz Capitulino | afe67ef | 2009-08-28 15:27:16 -0300 | [diff] [blame] | 860 | static void do_memory_save(Monitor *mon, const QDict *qdict) |
bellard | b371dc5 | 2007-01-03 15:20:39 +0000 | [diff] [blame] | 861 | { |
| 862 | FILE *f; |
Luiz Capitulino | afe67ef | 2009-08-28 15:27:16 -0300 | [diff] [blame] | 863 | uint32_t size = qdict_get_int(qdict, "size"); |
| 864 | const char *filename = qdict_get_str(qdict, "filename"); |
| 865 | target_long addr = qdict_get_int(qdict, "val"); |
bellard | b371dc5 | 2007-01-03 15:20:39 +0000 | [diff] [blame] | 866 | uint32_t l; |
| 867 | CPUState *env; |
| 868 | uint8_t buf[1024]; |
| 869 | |
| 870 | env = mon_get_cpu(); |
| 871 | if (!env) |
| 872 | return; |
| 873 | |
| 874 | f = fopen(filename, "wb"); |
| 875 | if (!f) { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 876 | monitor_printf(mon, "could not open '%s'\n", filename); |
bellard | b371dc5 | 2007-01-03 15:20:39 +0000 | [diff] [blame] | 877 | return; |
| 878 | } |
| 879 | while (size != 0) { |
| 880 | l = sizeof(buf); |
| 881 | if (l > size) |
| 882 | l = size; |
| 883 | cpu_memory_rw_debug(env, addr, buf, l, 0); |
| 884 | fwrite(buf, 1, l, f); |
| 885 | addr += l; |
| 886 | size -= l; |
| 887 | } |
| 888 | fclose(f); |
| 889 | } |
| 890 | |
Luiz Capitulino | afe67ef | 2009-08-28 15:27:16 -0300 | [diff] [blame] | 891 | static void do_physical_memory_save(Monitor *mon, const QDict *qdict) |
aurel32 | a8bdf7a | 2008-04-11 21:36:14 +0000 | [diff] [blame] | 892 | { |
| 893 | FILE *f; |
| 894 | uint32_t l; |
| 895 | uint8_t buf[1024]; |
Luiz Capitulino | afe67ef | 2009-08-28 15:27:16 -0300 | [diff] [blame] | 896 | uint32_t size = qdict_get_int(qdict, "size"); |
| 897 | const char *filename = qdict_get_str(qdict, "filename"); |
| 898 | target_phys_addr_t addr = qdict_get_int(qdict, "val"); |
aurel32 | a8bdf7a | 2008-04-11 21:36:14 +0000 | [diff] [blame] | 899 | |
| 900 | f = fopen(filename, "wb"); |
| 901 | if (!f) { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 902 | monitor_printf(mon, "could not open '%s'\n", filename); |
aurel32 | a8bdf7a | 2008-04-11 21:36:14 +0000 | [diff] [blame] | 903 | return; |
| 904 | } |
| 905 | while (size != 0) { |
| 906 | l = sizeof(buf); |
| 907 | if (l > size) |
| 908 | l = size; |
| 909 | cpu_physical_memory_rw(addr, buf, l, 0); |
| 910 | fwrite(buf, 1, l, f); |
| 911 | fflush(f); |
| 912 | addr += l; |
| 913 | size -= l; |
| 914 | } |
| 915 | fclose(f); |
| 916 | } |
| 917 | |
Luiz Capitulino | f18c16d | 2009-08-28 15:27:14 -0300 | [diff] [blame] | 918 | static void do_sum(Monitor *mon, const QDict *qdict) |
bellard | e4cf1ad | 2005-06-04 20:15:57 +0000 | [diff] [blame] | 919 | { |
| 920 | uint32_t addr; |
| 921 | uint8_t buf[1]; |
| 922 | uint16_t sum; |
Luiz Capitulino | f18c16d | 2009-08-28 15:27:14 -0300 | [diff] [blame] | 923 | uint32_t start = qdict_get_int(qdict, "start"); |
| 924 | uint32_t size = qdict_get_int(qdict, "size"); |
bellard | e4cf1ad | 2005-06-04 20:15:57 +0000 | [diff] [blame] | 925 | |
| 926 | sum = 0; |
| 927 | for(addr = start; addr < (start + size); addr++) { |
| 928 | cpu_physical_memory_rw(addr, buf, 1, 0); |
| 929 | /* BSD sum algorithm ('sum' Unix command) */ |
| 930 | sum = (sum >> 1) | (sum << 15); |
| 931 | sum += buf[0]; |
| 932 | } |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 933 | monitor_printf(mon, "%05d\n", sum); |
bellard | e4cf1ad | 2005-06-04 20:15:57 +0000 | [diff] [blame] | 934 | } |
| 935 | |
bellard | a3a91a3 | 2004-06-04 11:06:21 +0000 | [diff] [blame] | 936 | typedef struct { |
| 937 | int keycode; |
| 938 | const char *name; |
| 939 | } KeyDef; |
| 940 | |
| 941 | static const KeyDef key_defs[] = { |
| 942 | { 0x2a, "shift" }, |
| 943 | { 0x36, "shift_r" }, |
ths | 3b46e62 | 2007-09-17 08:09:54 +0000 | [diff] [blame] | 944 | |
bellard | a3a91a3 | 2004-06-04 11:06:21 +0000 | [diff] [blame] | 945 | { 0x38, "alt" }, |
| 946 | { 0xb8, "alt_r" }, |
ths | 2ba27c7 | 2008-08-13 12:54:23 +0000 | [diff] [blame] | 947 | { 0x64, "altgr" }, |
| 948 | { 0xe4, "altgr_r" }, |
bellard | a3a91a3 | 2004-06-04 11:06:21 +0000 | [diff] [blame] | 949 | { 0x1d, "ctrl" }, |
| 950 | { 0x9d, "ctrl_r" }, |
| 951 | |
| 952 | { 0xdd, "menu" }, |
| 953 | |
| 954 | { 0x01, "esc" }, |
| 955 | |
| 956 | { 0x02, "1" }, |
| 957 | { 0x03, "2" }, |
| 958 | { 0x04, "3" }, |
| 959 | { 0x05, "4" }, |
| 960 | { 0x06, "5" }, |
| 961 | { 0x07, "6" }, |
| 962 | { 0x08, "7" }, |
| 963 | { 0x09, "8" }, |
| 964 | { 0x0a, "9" }, |
| 965 | { 0x0b, "0" }, |
bellard | 64866c3 | 2006-05-07 18:03:31 +0000 | [diff] [blame] | 966 | { 0x0c, "minus" }, |
| 967 | { 0x0d, "equal" }, |
bellard | a3a91a3 | 2004-06-04 11:06:21 +0000 | [diff] [blame] | 968 | { 0x0e, "backspace" }, |
| 969 | |
| 970 | { 0x0f, "tab" }, |
| 971 | { 0x10, "q" }, |
| 972 | { 0x11, "w" }, |
| 973 | { 0x12, "e" }, |
| 974 | { 0x13, "r" }, |
| 975 | { 0x14, "t" }, |
| 976 | { 0x15, "y" }, |
| 977 | { 0x16, "u" }, |
| 978 | { 0x17, "i" }, |
| 979 | { 0x18, "o" }, |
| 980 | { 0x19, "p" }, |
| 981 | |
| 982 | { 0x1c, "ret" }, |
| 983 | |
| 984 | { 0x1e, "a" }, |
| 985 | { 0x1f, "s" }, |
| 986 | { 0x20, "d" }, |
| 987 | { 0x21, "f" }, |
| 988 | { 0x22, "g" }, |
| 989 | { 0x23, "h" }, |
| 990 | { 0x24, "j" }, |
| 991 | { 0x25, "k" }, |
| 992 | { 0x26, "l" }, |
| 993 | |
| 994 | { 0x2c, "z" }, |
| 995 | { 0x2d, "x" }, |
| 996 | { 0x2e, "c" }, |
| 997 | { 0x2f, "v" }, |
| 998 | { 0x30, "b" }, |
| 999 | { 0x31, "n" }, |
| 1000 | { 0x32, "m" }, |
aurel32 | 9155fc4 | 2008-10-01 21:46:15 +0000 | [diff] [blame] | 1001 | { 0x33, "comma" }, |
| 1002 | { 0x34, "dot" }, |
| 1003 | { 0x35, "slash" }, |
ths | 3b46e62 | 2007-09-17 08:09:54 +0000 | [diff] [blame] | 1004 | |
balrog | 4d3b6f6 | 2008-02-10 16:33:14 +0000 | [diff] [blame] | 1005 | { 0x37, "asterisk" }, |
| 1006 | |
bellard | a3a91a3 | 2004-06-04 11:06:21 +0000 | [diff] [blame] | 1007 | { 0x39, "spc" }, |
bellard | 00ffa62 | 2004-06-04 13:25:15 +0000 | [diff] [blame] | 1008 | { 0x3a, "caps_lock" }, |
bellard | a3a91a3 | 2004-06-04 11:06:21 +0000 | [diff] [blame] | 1009 | { 0x3b, "f1" }, |
| 1010 | { 0x3c, "f2" }, |
| 1011 | { 0x3d, "f3" }, |
| 1012 | { 0x3e, "f4" }, |
| 1013 | { 0x3f, "f5" }, |
| 1014 | { 0x40, "f6" }, |
| 1015 | { 0x41, "f7" }, |
| 1016 | { 0x42, "f8" }, |
| 1017 | { 0x43, "f9" }, |
| 1018 | { 0x44, "f10" }, |
bellard | 00ffa62 | 2004-06-04 13:25:15 +0000 | [diff] [blame] | 1019 | { 0x45, "num_lock" }, |
bellard | a3a91a3 | 2004-06-04 11:06:21 +0000 | [diff] [blame] | 1020 | { 0x46, "scroll_lock" }, |
| 1021 | |
bellard | 64866c3 | 2006-05-07 18:03:31 +0000 | [diff] [blame] | 1022 | { 0xb5, "kp_divide" }, |
| 1023 | { 0x37, "kp_multiply" }, |
ths | 0cfec83 | 2007-06-23 16:02:43 +0000 | [diff] [blame] | 1024 | { 0x4a, "kp_subtract" }, |
bellard | 64866c3 | 2006-05-07 18:03:31 +0000 | [diff] [blame] | 1025 | { 0x4e, "kp_add" }, |
| 1026 | { 0x9c, "kp_enter" }, |
| 1027 | { 0x53, "kp_decimal" }, |
balrog | f2289cb | 2008-06-04 10:14:16 +0000 | [diff] [blame] | 1028 | { 0x54, "sysrq" }, |
bellard | 64866c3 | 2006-05-07 18:03:31 +0000 | [diff] [blame] | 1029 | |
| 1030 | { 0x52, "kp_0" }, |
| 1031 | { 0x4f, "kp_1" }, |
| 1032 | { 0x50, "kp_2" }, |
| 1033 | { 0x51, "kp_3" }, |
| 1034 | { 0x4b, "kp_4" }, |
| 1035 | { 0x4c, "kp_5" }, |
| 1036 | { 0x4d, "kp_6" }, |
| 1037 | { 0x47, "kp_7" }, |
| 1038 | { 0x48, "kp_8" }, |
| 1039 | { 0x49, "kp_9" }, |
ths | 3b46e62 | 2007-09-17 08:09:54 +0000 | [diff] [blame] | 1040 | |
bellard | a3a91a3 | 2004-06-04 11:06:21 +0000 | [diff] [blame] | 1041 | { 0x56, "<" }, |
| 1042 | |
| 1043 | { 0x57, "f11" }, |
| 1044 | { 0x58, "f12" }, |
| 1045 | |
| 1046 | { 0xb7, "print" }, |
| 1047 | |
| 1048 | { 0xc7, "home" }, |
| 1049 | { 0xc9, "pgup" }, |
| 1050 | { 0xd1, "pgdn" }, |
| 1051 | { 0xcf, "end" }, |
| 1052 | |
| 1053 | { 0xcb, "left" }, |
| 1054 | { 0xc8, "up" }, |
| 1055 | { 0xd0, "down" }, |
| 1056 | { 0xcd, "right" }, |
| 1057 | |
| 1058 | { 0xd2, "insert" }, |
| 1059 | { 0xd3, "delete" }, |
blueswir1 | c0b5b10 | 2008-06-22 07:45:42 +0000 | [diff] [blame] | 1060 | #if defined(TARGET_SPARC) && !defined(TARGET_SPARC64) |
| 1061 | { 0xf0, "stop" }, |
| 1062 | { 0xf1, "again" }, |
| 1063 | { 0xf2, "props" }, |
| 1064 | { 0xf3, "undo" }, |
| 1065 | { 0xf4, "front" }, |
| 1066 | { 0xf5, "copy" }, |
| 1067 | { 0xf6, "open" }, |
| 1068 | { 0xf7, "paste" }, |
| 1069 | { 0xf8, "find" }, |
| 1070 | { 0xf9, "cut" }, |
| 1071 | { 0xfa, "lf" }, |
| 1072 | { 0xfb, "help" }, |
| 1073 | { 0xfc, "meta_l" }, |
| 1074 | { 0xfd, "meta_r" }, |
| 1075 | { 0xfe, "compose" }, |
| 1076 | #endif |
bellard | a3a91a3 | 2004-06-04 11:06:21 +0000 | [diff] [blame] | 1077 | { 0, NULL }, |
| 1078 | }; |
| 1079 | |
| 1080 | static int get_keycode(const char *key) |
| 1081 | { |
| 1082 | const KeyDef *p; |
bellard | 64866c3 | 2006-05-07 18:03:31 +0000 | [diff] [blame] | 1083 | char *endp; |
| 1084 | int ret; |
bellard | a3a91a3 | 2004-06-04 11:06:21 +0000 | [diff] [blame] | 1085 | |
| 1086 | for(p = key_defs; p->name != NULL; p++) { |
| 1087 | if (!strcmp(key, p->name)) |
| 1088 | return p->keycode; |
| 1089 | } |
bellard | 64866c3 | 2006-05-07 18:03:31 +0000 | [diff] [blame] | 1090 | if (strstart(key, "0x", NULL)) { |
| 1091 | ret = strtoul(key, &endp, 0); |
| 1092 | if (*endp == '\0' && ret >= 0x01 && ret <= 0xff) |
| 1093 | return ret; |
| 1094 | } |
bellard | a3a91a3 | 2004-06-04 11:06:21 +0000 | [diff] [blame] | 1095 | return -1; |
| 1096 | } |
| 1097 | |
balrog | c8256f9 | 2008-06-08 22:45:01 +0000 | [diff] [blame] | 1098 | #define MAX_KEYCODES 16 |
| 1099 | static uint8_t keycodes[MAX_KEYCODES]; |
| 1100 | static int nb_pending_keycodes; |
| 1101 | static QEMUTimer *key_timer; |
| 1102 | |
| 1103 | static void release_keys(void *opaque) |
bellard | a3a91a3 | 2004-06-04 11:06:21 +0000 | [diff] [blame] | 1104 | { |
balrog | c8256f9 | 2008-06-08 22:45:01 +0000 | [diff] [blame] | 1105 | int keycode; |
| 1106 | |
| 1107 | while (nb_pending_keycodes > 0) { |
| 1108 | nb_pending_keycodes--; |
| 1109 | keycode = keycodes[nb_pending_keycodes]; |
| 1110 | if (keycode & 0x80) |
| 1111 | kbd_put_keycode(0xe0); |
| 1112 | kbd_put_keycode(keycode | 0x80); |
| 1113 | } |
| 1114 | } |
| 1115 | |
Luiz Capitulino | 1d4daa9 | 2009-08-28 15:27:15 -0300 | [diff] [blame] | 1116 | static void do_sendkey(Monitor *mon, const QDict *qdict) |
balrog | c8256f9 | 2008-06-08 22:45:01 +0000 | [diff] [blame] | 1117 | { |
balrog | 3401c0d | 2008-06-04 10:05:59 +0000 | [diff] [blame] | 1118 | char keyname_buf[16]; |
| 1119 | char *separator; |
| 1120 | int keyname_len, keycode, i; |
Luiz Capitulino | 1d4daa9 | 2009-08-28 15:27:15 -0300 | [diff] [blame] | 1121 | const char *string = qdict_get_str(qdict, "string"); |
| 1122 | int has_hold_time = qdict_haskey(qdict, "hold_time"); |
| 1123 | int hold_time = qdict_get_try_int(qdict, "hold_time", -1); |
ths | 3b46e62 | 2007-09-17 08:09:54 +0000 | [diff] [blame] | 1124 | |
balrog | c8256f9 | 2008-06-08 22:45:01 +0000 | [diff] [blame] | 1125 | if (nb_pending_keycodes > 0) { |
| 1126 | qemu_del_timer(key_timer); |
| 1127 | release_keys(NULL); |
| 1128 | } |
| 1129 | if (!has_hold_time) |
| 1130 | hold_time = 100; |
| 1131 | i = 0; |
balrog | 3401c0d | 2008-06-04 10:05:59 +0000 | [diff] [blame] | 1132 | while (1) { |
| 1133 | separator = strchr(string, '-'); |
| 1134 | keyname_len = separator ? separator - string : strlen(string); |
| 1135 | if (keyname_len > 0) { |
| 1136 | pstrcpy(keyname_buf, sizeof(keyname_buf), string); |
| 1137 | if (keyname_len > sizeof(keyname_buf) - 1) { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 1138 | monitor_printf(mon, "invalid key: '%s...'\n", keyname_buf); |
balrog | 3401c0d | 2008-06-04 10:05:59 +0000 | [diff] [blame] | 1139 | return; |
bellard | a3a91a3 | 2004-06-04 11:06:21 +0000 | [diff] [blame] | 1140 | } |
balrog | c8256f9 | 2008-06-08 22:45:01 +0000 | [diff] [blame] | 1141 | if (i == MAX_KEYCODES) { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 1142 | monitor_printf(mon, "too many keys\n"); |
balrog | 3401c0d | 2008-06-04 10:05:59 +0000 | [diff] [blame] | 1143 | return; |
| 1144 | } |
| 1145 | keyname_buf[keyname_len] = 0; |
| 1146 | keycode = get_keycode(keyname_buf); |
| 1147 | if (keycode < 0) { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 1148 | monitor_printf(mon, "unknown key: '%s'\n", keyname_buf); |
balrog | 3401c0d | 2008-06-04 10:05:59 +0000 | [diff] [blame] | 1149 | return; |
| 1150 | } |
balrog | c8256f9 | 2008-06-08 22:45:01 +0000 | [diff] [blame] | 1151 | keycodes[i++] = keycode; |
bellard | a3a91a3 | 2004-06-04 11:06:21 +0000 | [diff] [blame] | 1152 | } |
balrog | 3401c0d | 2008-06-04 10:05:59 +0000 | [diff] [blame] | 1153 | if (!separator) |
bellard | a3a91a3 | 2004-06-04 11:06:21 +0000 | [diff] [blame] | 1154 | break; |
balrog | 3401c0d | 2008-06-04 10:05:59 +0000 | [diff] [blame] | 1155 | string = separator + 1; |
bellard | a3a91a3 | 2004-06-04 11:06:21 +0000 | [diff] [blame] | 1156 | } |
balrog | c8256f9 | 2008-06-08 22:45:01 +0000 | [diff] [blame] | 1157 | nb_pending_keycodes = i; |
bellard | a3a91a3 | 2004-06-04 11:06:21 +0000 | [diff] [blame] | 1158 | /* key down events */ |
balrog | c8256f9 | 2008-06-08 22:45:01 +0000 | [diff] [blame] | 1159 | for (i = 0; i < nb_pending_keycodes; i++) { |
bellard | a3a91a3 | 2004-06-04 11:06:21 +0000 | [diff] [blame] | 1160 | keycode = keycodes[i]; |
| 1161 | if (keycode & 0x80) |
| 1162 | kbd_put_keycode(0xe0); |
| 1163 | kbd_put_keycode(keycode & 0x7f); |
| 1164 | } |
balrog | c8256f9 | 2008-06-08 22:45:01 +0000 | [diff] [blame] | 1165 | /* delayed key up events */ |
balrog | f227f17 | 2008-06-09 00:03:47 +0000 | [diff] [blame] | 1166 | qemu_mod_timer(key_timer, qemu_get_clock(vm_clock) + |
| 1167 | muldiv64(ticks_per_sec, hold_time, 1000)); |
bellard | a3a91a3 | 2004-06-04 11:06:21 +0000 | [diff] [blame] | 1168 | } |
| 1169 | |
bellard | 13224a8 | 2006-07-14 22:03:35 +0000 | [diff] [blame] | 1170 | static int mouse_button_state; |
| 1171 | |
Luiz Capitulino | 1d4daa9 | 2009-08-28 15:27:15 -0300 | [diff] [blame] | 1172 | static void do_mouse_move(Monitor *mon, const QDict *qdict) |
bellard | 13224a8 | 2006-07-14 22:03:35 +0000 | [diff] [blame] | 1173 | { |
| 1174 | int dx, dy, dz; |
Luiz Capitulino | 1d4daa9 | 2009-08-28 15:27:15 -0300 | [diff] [blame] | 1175 | const char *dx_str = qdict_get_str(qdict, "dx_str"); |
| 1176 | const char *dy_str = qdict_get_str(qdict, "dy_str"); |
| 1177 | const char *dz_str = qdict_get_try_str(qdict, "dz_str"); |
bellard | 13224a8 | 2006-07-14 22:03:35 +0000 | [diff] [blame] | 1178 | dx = strtol(dx_str, NULL, 0); |
| 1179 | dy = strtol(dy_str, NULL, 0); |
| 1180 | dz = 0; |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 1181 | if (dz_str) |
bellard | 13224a8 | 2006-07-14 22:03:35 +0000 | [diff] [blame] | 1182 | dz = strtol(dz_str, NULL, 0); |
| 1183 | kbd_mouse_event(dx, dy, dz, mouse_button_state); |
| 1184 | } |
| 1185 | |
Luiz Capitulino | d54908a | 2009-08-28 15:27:13 -0300 | [diff] [blame] | 1186 | static void do_mouse_button(Monitor *mon, const QDict *qdict) |
bellard | 13224a8 | 2006-07-14 22:03:35 +0000 | [diff] [blame] | 1187 | { |
Luiz Capitulino | d54908a | 2009-08-28 15:27:13 -0300 | [diff] [blame] | 1188 | int button_state = qdict_get_int(qdict, "button_state"); |
bellard | 13224a8 | 2006-07-14 22:03:35 +0000 | [diff] [blame] | 1189 | mouse_button_state = button_state; |
| 1190 | kbd_mouse_event(0, 0, 0, mouse_button_state); |
| 1191 | } |
| 1192 | |
Luiz Capitulino | aa93e39 | 2009-08-28 15:27:18 -0300 | [diff] [blame] | 1193 | static void do_ioport_read(Monitor *mon, const QDict *qdict) |
bellard | 3440557 | 2004-06-08 00:55:58 +0000 | [diff] [blame] | 1194 | { |
Luiz Capitulino | aa93e39 | 2009-08-28 15:27:18 -0300 | [diff] [blame] | 1195 | int size = qdict_get_int(qdict, "size"); |
| 1196 | int addr = qdict_get_int(qdict, "addr"); |
| 1197 | int has_index = qdict_haskey(qdict, "index"); |
bellard | 3440557 | 2004-06-08 00:55:58 +0000 | [diff] [blame] | 1198 | uint32_t val; |
| 1199 | int suffix; |
| 1200 | |
| 1201 | if (has_index) { |
Luiz Capitulino | aa93e39 | 2009-08-28 15:27:18 -0300 | [diff] [blame] | 1202 | int index = qdict_get_int(qdict, "index"); |
Isaku Yamahata | d56dd6c | 2009-07-02 19:32:07 +0900 | [diff] [blame] | 1203 | cpu_outb(NULL, addr & IOPORTS_MASK, index & 0xff); |
bellard | 3440557 | 2004-06-08 00:55:58 +0000 | [diff] [blame] | 1204 | addr++; |
| 1205 | } |
| 1206 | addr &= 0xffff; |
| 1207 | |
| 1208 | switch(size) { |
| 1209 | default: |
| 1210 | case 1: |
| 1211 | val = cpu_inb(NULL, addr); |
| 1212 | suffix = 'b'; |
| 1213 | break; |
| 1214 | case 2: |
| 1215 | val = cpu_inw(NULL, addr); |
| 1216 | suffix = 'w'; |
| 1217 | break; |
| 1218 | case 4: |
| 1219 | val = cpu_inl(NULL, addr); |
| 1220 | suffix = 'l'; |
| 1221 | break; |
| 1222 | } |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 1223 | monitor_printf(mon, "port%c[0x%04x] = %#0*x\n", |
| 1224 | suffix, addr, size * 2, val); |
bellard | 3440557 | 2004-06-08 00:55:58 +0000 | [diff] [blame] | 1225 | } |
bellard | a3a91a3 | 2004-06-04 11:06:21 +0000 | [diff] [blame] | 1226 | |
Luiz Capitulino | 1bd1442 | 2009-08-28 15:27:17 -0300 | [diff] [blame] | 1227 | static void do_ioport_write(Monitor *mon, const QDict *qdict) |
Jan Kiszka | f114784 | 2009-07-14 10:20:11 +0200 | [diff] [blame] | 1228 | { |
Luiz Capitulino | 1bd1442 | 2009-08-28 15:27:17 -0300 | [diff] [blame] | 1229 | int size = qdict_get_int(qdict, "size"); |
| 1230 | int addr = qdict_get_int(qdict, "addr"); |
| 1231 | int val = qdict_get_int(qdict, "val"); |
| 1232 | |
Jan Kiszka | f114784 | 2009-07-14 10:20:11 +0200 | [diff] [blame] | 1233 | addr &= IOPORTS_MASK; |
| 1234 | |
| 1235 | switch (size) { |
| 1236 | default: |
| 1237 | case 1: |
| 1238 | cpu_outb(NULL, addr, val); |
| 1239 | break; |
| 1240 | case 2: |
| 1241 | cpu_outw(NULL, addr, val); |
| 1242 | break; |
| 1243 | case 4: |
| 1244 | cpu_outl(NULL, addr, val); |
| 1245 | break; |
| 1246 | } |
| 1247 | } |
| 1248 | |
Luiz Capitulino | d54908a | 2009-08-28 15:27:13 -0300 | [diff] [blame] | 1249 | static void do_boot_set(Monitor *mon, const QDict *qdict) |
aurel32 | 0ecdffb | 2008-05-04 20:11:34 +0000 | [diff] [blame] | 1250 | { |
| 1251 | int res; |
Luiz Capitulino | d54908a | 2009-08-28 15:27:13 -0300 | [diff] [blame] | 1252 | const char *bootdevice = qdict_get_str(qdict, "bootdevice"); |
aurel32 | 0ecdffb | 2008-05-04 20:11:34 +0000 | [diff] [blame] | 1253 | |
Jan Kiszka | 76e30d0 | 2009-07-02 00:19:02 +0200 | [diff] [blame] | 1254 | res = qemu_boot_set(bootdevice); |
| 1255 | if (res == 0) { |
| 1256 | monitor_printf(mon, "boot device list now set to %s\n", bootdevice); |
| 1257 | } else if (res > 0) { |
| 1258 | monitor_printf(mon, "setting boot device list failed\n"); |
aurel32 | 0ecdffb | 2008-05-04 20:11:34 +0000 | [diff] [blame] | 1259 | } else { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 1260 | monitor_printf(mon, "no function defined to set boot device list for " |
| 1261 | "this architecture\n"); |
aurel32 | 0ecdffb | 2008-05-04 20:11:34 +0000 | [diff] [blame] | 1262 | } |
| 1263 | } |
| 1264 | |
Luiz Capitulino | f96fc8a | 2009-08-28 15:27:12 -0300 | [diff] [blame] | 1265 | static void do_system_reset(Monitor *mon, const QDict *qdict) |
bellard | e4f9082 | 2004-06-20 12:35:44 +0000 | [diff] [blame] | 1266 | { |
| 1267 | qemu_system_reset_request(); |
| 1268 | } |
| 1269 | |
Luiz Capitulino | f96fc8a | 2009-08-28 15:27:12 -0300 | [diff] [blame] | 1270 | static void do_system_powerdown(Monitor *mon, const QDict *qdict) |
bellard | 3475187 | 2005-07-02 14:31:34 +0000 | [diff] [blame] | 1271 | { |
| 1272 | qemu_system_powerdown_request(); |
| 1273 | } |
| 1274 | |
bellard | b86bda5 | 2004-09-18 19:32:46 +0000 | [diff] [blame] | 1275 | #if defined(TARGET_I386) |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 1276 | static void print_pte(Monitor *mon, uint32_t addr, uint32_t pte, uint32_t mask) |
bellard | b86bda5 | 2004-09-18 19:32:46 +0000 | [diff] [blame] | 1277 | { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 1278 | monitor_printf(mon, "%08x: %08x %c%c%c%c%c%c%c%c\n", |
| 1279 | addr, |
| 1280 | pte & mask, |
| 1281 | pte & PG_GLOBAL_MASK ? 'G' : '-', |
| 1282 | pte & PG_PSE_MASK ? 'P' : '-', |
| 1283 | pte & PG_DIRTY_MASK ? 'D' : '-', |
| 1284 | pte & PG_ACCESSED_MASK ? 'A' : '-', |
| 1285 | pte & PG_PCD_MASK ? 'C' : '-', |
| 1286 | pte & PG_PWT_MASK ? 'T' : '-', |
| 1287 | pte & PG_USER_MASK ? 'U' : '-', |
| 1288 | pte & PG_RW_MASK ? 'W' : '-'); |
bellard | b86bda5 | 2004-09-18 19:32:46 +0000 | [diff] [blame] | 1289 | } |
| 1290 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 1291 | static void tlb_info(Monitor *mon) |
bellard | b86bda5 | 2004-09-18 19:32:46 +0000 | [diff] [blame] | 1292 | { |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 1293 | CPUState *env; |
bellard | b86bda5 | 2004-09-18 19:32:46 +0000 | [diff] [blame] | 1294 | int l1, l2; |
| 1295 | uint32_t pgd, pde, pte; |
| 1296 | |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 1297 | env = mon_get_cpu(); |
| 1298 | if (!env) |
| 1299 | return; |
| 1300 | |
bellard | b86bda5 | 2004-09-18 19:32:46 +0000 | [diff] [blame] | 1301 | if (!(env->cr[0] & CR0_PG_MASK)) { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 1302 | monitor_printf(mon, "PG disabled\n"); |
bellard | b86bda5 | 2004-09-18 19:32:46 +0000 | [diff] [blame] | 1303 | return; |
| 1304 | } |
| 1305 | pgd = env->cr[3] & ~0xfff; |
| 1306 | for(l1 = 0; l1 < 1024; l1++) { |
| 1307 | cpu_physical_memory_read(pgd + l1 * 4, (uint8_t *)&pde, 4); |
| 1308 | pde = le32_to_cpu(pde); |
| 1309 | if (pde & PG_PRESENT_MASK) { |
| 1310 | if ((pde & PG_PSE_MASK) && (env->cr[4] & CR4_PSE_MASK)) { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 1311 | print_pte(mon, (l1 << 22), pde, ~((1 << 20) - 1)); |
bellard | b86bda5 | 2004-09-18 19:32:46 +0000 | [diff] [blame] | 1312 | } else { |
| 1313 | for(l2 = 0; l2 < 1024; l2++) { |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 1314 | cpu_physical_memory_read((pde & ~0xfff) + l2 * 4, |
bellard | b86bda5 | 2004-09-18 19:32:46 +0000 | [diff] [blame] | 1315 | (uint8_t *)&pte, 4); |
| 1316 | pte = le32_to_cpu(pte); |
| 1317 | if (pte & PG_PRESENT_MASK) { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 1318 | print_pte(mon, (l1 << 22) + (l2 << 12), |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 1319 | pte & ~PG_PSE_MASK, |
bellard | b86bda5 | 2004-09-18 19:32:46 +0000 | [diff] [blame] | 1320 | ~0xfff); |
| 1321 | } |
| 1322 | } |
| 1323 | } |
| 1324 | } |
| 1325 | } |
| 1326 | } |
| 1327 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 1328 | static void mem_print(Monitor *mon, uint32_t *pstart, int *plast_prot, |
bellard | b86bda5 | 2004-09-18 19:32:46 +0000 | [diff] [blame] | 1329 | uint32_t end, int prot) |
| 1330 | { |
bellard | 9746b15 | 2004-11-11 18:30:24 +0000 | [diff] [blame] | 1331 | int prot1; |
| 1332 | prot1 = *plast_prot; |
| 1333 | if (prot != prot1) { |
bellard | b86bda5 | 2004-09-18 19:32:46 +0000 | [diff] [blame] | 1334 | if (*pstart != -1) { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 1335 | monitor_printf(mon, "%08x-%08x %08x %c%c%c\n", |
| 1336 | *pstart, end, end - *pstart, |
| 1337 | prot1 & PG_USER_MASK ? 'u' : '-', |
| 1338 | 'r', |
| 1339 | prot1 & PG_RW_MASK ? 'w' : '-'); |
bellard | b86bda5 | 2004-09-18 19:32:46 +0000 | [diff] [blame] | 1340 | } |
| 1341 | if (prot != 0) |
| 1342 | *pstart = end; |
| 1343 | else |
| 1344 | *pstart = -1; |
| 1345 | *plast_prot = prot; |
| 1346 | } |
| 1347 | } |
| 1348 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 1349 | static void mem_info(Monitor *mon) |
bellard | b86bda5 | 2004-09-18 19:32:46 +0000 | [diff] [blame] | 1350 | { |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 1351 | CPUState *env; |
bellard | b86bda5 | 2004-09-18 19:32:46 +0000 | [diff] [blame] | 1352 | int l1, l2, prot, last_prot; |
| 1353 | uint32_t pgd, pde, pte, start, end; |
| 1354 | |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 1355 | env = mon_get_cpu(); |
| 1356 | if (!env) |
| 1357 | return; |
| 1358 | |
bellard | b86bda5 | 2004-09-18 19:32:46 +0000 | [diff] [blame] | 1359 | if (!(env->cr[0] & CR0_PG_MASK)) { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 1360 | monitor_printf(mon, "PG disabled\n"); |
bellard | b86bda5 | 2004-09-18 19:32:46 +0000 | [diff] [blame] | 1361 | return; |
| 1362 | } |
| 1363 | pgd = env->cr[3] & ~0xfff; |
| 1364 | last_prot = 0; |
| 1365 | start = -1; |
| 1366 | for(l1 = 0; l1 < 1024; l1++) { |
| 1367 | cpu_physical_memory_read(pgd + l1 * 4, (uint8_t *)&pde, 4); |
| 1368 | pde = le32_to_cpu(pde); |
| 1369 | end = l1 << 22; |
| 1370 | if (pde & PG_PRESENT_MASK) { |
| 1371 | if ((pde & PG_PSE_MASK) && (env->cr[4] & CR4_PSE_MASK)) { |
| 1372 | prot = pde & (PG_USER_MASK | PG_RW_MASK | PG_PRESENT_MASK); |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 1373 | mem_print(mon, &start, &last_prot, end, prot); |
bellard | b86bda5 | 2004-09-18 19:32:46 +0000 | [diff] [blame] | 1374 | } else { |
| 1375 | for(l2 = 0; l2 < 1024; l2++) { |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 1376 | cpu_physical_memory_read((pde & ~0xfff) + l2 * 4, |
bellard | b86bda5 | 2004-09-18 19:32:46 +0000 | [diff] [blame] | 1377 | (uint8_t *)&pte, 4); |
| 1378 | pte = le32_to_cpu(pte); |
| 1379 | end = (l1 << 22) + (l2 << 12); |
| 1380 | if (pte & PG_PRESENT_MASK) { |
| 1381 | prot = pte & (PG_USER_MASK | PG_RW_MASK | PG_PRESENT_MASK); |
| 1382 | } else { |
| 1383 | prot = 0; |
| 1384 | } |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 1385 | mem_print(mon, &start, &last_prot, end, prot); |
bellard | b86bda5 | 2004-09-18 19:32:46 +0000 | [diff] [blame] | 1386 | } |
| 1387 | } |
| 1388 | } else { |
| 1389 | prot = 0; |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 1390 | mem_print(mon, &start, &last_prot, end, prot); |
bellard | b86bda5 | 2004-09-18 19:32:46 +0000 | [diff] [blame] | 1391 | } |
| 1392 | } |
| 1393 | } |
| 1394 | #endif |
| 1395 | |
aurel32 | 7c664e2 | 2009-03-03 06:12:22 +0000 | [diff] [blame] | 1396 | #if defined(TARGET_SH4) |
| 1397 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 1398 | static void print_tlb(Monitor *mon, int idx, tlb_t *tlb) |
aurel32 | 7c664e2 | 2009-03-03 06:12:22 +0000 | [diff] [blame] | 1399 | { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 1400 | monitor_printf(mon, " tlb%i:\t" |
| 1401 | "asid=%hhu vpn=%x\tppn=%x\tsz=%hhu size=%u\t" |
| 1402 | "v=%hhu shared=%hhu cached=%hhu prot=%hhu " |
| 1403 | "dirty=%hhu writethrough=%hhu\n", |
| 1404 | idx, |
| 1405 | tlb->asid, tlb->vpn, tlb->ppn, tlb->sz, tlb->size, |
| 1406 | tlb->v, tlb->sh, tlb->c, tlb->pr, |
| 1407 | tlb->d, tlb->wt); |
aurel32 | 7c664e2 | 2009-03-03 06:12:22 +0000 | [diff] [blame] | 1408 | } |
| 1409 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 1410 | static void tlb_info(Monitor *mon) |
aurel32 | 7c664e2 | 2009-03-03 06:12:22 +0000 | [diff] [blame] | 1411 | { |
| 1412 | CPUState *env = mon_get_cpu(); |
| 1413 | int i; |
| 1414 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 1415 | monitor_printf (mon, "ITLB:\n"); |
aurel32 | 7c664e2 | 2009-03-03 06:12:22 +0000 | [diff] [blame] | 1416 | for (i = 0 ; i < ITLB_SIZE ; i++) |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 1417 | print_tlb (mon, i, &env->itlb[i]); |
| 1418 | monitor_printf (mon, "UTLB:\n"); |
aurel32 | 7c664e2 | 2009-03-03 06:12:22 +0000 | [diff] [blame] | 1419 | for (i = 0 ; i < UTLB_SIZE ; i++) |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 1420 | print_tlb (mon, i, &env->utlb[i]); |
aurel32 | 7c664e2 | 2009-03-03 06:12:22 +0000 | [diff] [blame] | 1421 | } |
| 1422 | |
| 1423 | #endif |
| 1424 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 1425 | static void do_info_kvm(Monitor *mon) |
aliguori | 7ba1e61 | 2008-11-05 16:04:33 +0000 | [diff] [blame] | 1426 | { |
| 1427 | #ifdef CONFIG_KVM |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 1428 | monitor_printf(mon, "kvm support: "); |
aliguori | 7ba1e61 | 2008-11-05 16:04:33 +0000 | [diff] [blame] | 1429 | if (kvm_enabled()) |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 1430 | monitor_printf(mon, "enabled\n"); |
aliguori | 7ba1e61 | 2008-11-05 16:04:33 +0000 | [diff] [blame] | 1431 | else |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 1432 | monitor_printf(mon, "disabled\n"); |
aliguori | 7ba1e61 | 2008-11-05 16:04:33 +0000 | [diff] [blame] | 1433 | #else |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 1434 | monitor_printf(mon, "kvm support: not compiled\n"); |
aliguori | 7ba1e61 | 2008-11-05 16:04:33 +0000 | [diff] [blame] | 1435 | #endif |
| 1436 | } |
| 1437 | |
aliguori | 030ea37 | 2009-04-21 22:30:47 +0000 | [diff] [blame] | 1438 | static void do_info_numa(Monitor *mon) |
| 1439 | { |
aliguori | b28b623 | 2009-04-22 20:20:29 +0000 | [diff] [blame] | 1440 | int i; |
aliguori | 030ea37 | 2009-04-21 22:30:47 +0000 | [diff] [blame] | 1441 | CPUState *env; |
| 1442 | |
| 1443 | monitor_printf(mon, "%d nodes\n", nb_numa_nodes); |
| 1444 | for (i = 0; i < nb_numa_nodes; i++) { |
| 1445 | monitor_printf(mon, "node %d cpus:", i); |
| 1446 | for (env = first_cpu; env != NULL; env = env->next_cpu) { |
| 1447 | if (env->numa_node == i) { |
| 1448 | monitor_printf(mon, " %d", env->cpu_index); |
| 1449 | } |
| 1450 | } |
| 1451 | monitor_printf(mon, "\n"); |
| 1452 | monitor_printf(mon, "node %d size: %" PRId64 " MB\n", i, |
| 1453 | node_mem[i] >> 20); |
| 1454 | } |
| 1455 | } |
| 1456 | |
bellard | 5f1ce94 | 2006-02-08 22:40:15 +0000 | [diff] [blame] | 1457 | #ifdef CONFIG_PROFILER |
| 1458 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 1459 | static void do_info_profile(Monitor *mon) |
bellard | 5f1ce94 | 2006-02-08 22:40:15 +0000 | [diff] [blame] | 1460 | { |
| 1461 | int64_t total; |
| 1462 | total = qemu_time; |
| 1463 | if (total == 0) |
| 1464 | total = 1; |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 1465 | monitor_printf(mon, "async time %" PRId64 " (%0.3f)\n", |
| 1466 | dev_time, dev_time / (double)ticks_per_sec); |
| 1467 | monitor_printf(mon, "qemu time %" PRId64 " (%0.3f)\n", |
| 1468 | qemu_time, qemu_time / (double)ticks_per_sec); |
bellard | 5f1ce94 | 2006-02-08 22:40:15 +0000 | [diff] [blame] | 1469 | qemu_time = 0; |
bellard | 5f1ce94 | 2006-02-08 22:40:15 +0000 | [diff] [blame] | 1470 | dev_time = 0; |
bellard | 5f1ce94 | 2006-02-08 22:40:15 +0000 | [diff] [blame] | 1471 | } |
| 1472 | #else |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 1473 | static void do_info_profile(Monitor *mon) |
bellard | 5f1ce94 | 2006-02-08 22:40:15 +0000 | [diff] [blame] | 1474 | { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 1475 | monitor_printf(mon, "Internal profiler not compiled\n"); |
bellard | 5f1ce94 | 2006-02-08 22:40:15 +0000 | [diff] [blame] | 1476 | } |
| 1477 | #endif |
| 1478 | |
bellard | ec36b69 | 2006-07-16 18:57:03 +0000 | [diff] [blame] | 1479 | /* Capture support */ |
| 1480 | static LIST_HEAD (capture_list_head, CaptureState) capture_head; |
| 1481 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 1482 | static void do_info_capture(Monitor *mon) |
bellard | ec36b69 | 2006-07-16 18:57:03 +0000 | [diff] [blame] | 1483 | { |
| 1484 | int i; |
| 1485 | CaptureState *s; |
| 1486 | |
| 1487 | for (s = capture_head.lh_first, i = 0; s; s = s->entries.le_next, ++i) { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 1488 | monitor_printf(mon, "[%d]: ", i); |
bellard | ec36b69 | 2006-07-16 18:57:03 +0000 | [diff] [blame] | 1489 | s->ops.info (s->opaque); |
| 1490 | } |
| 1491 | } |
| 1492 | |
Blue Swirl | 2313086 | 2009-06-06 08:22:04 +0000 | [diff] [blame] | 1493 | #ifdef HAS_AUDIO |
Luiz Capitulino | d54908a | 2009-08-28 15:27:13 -0300 | [diff] [blame] | 1494 | static void do_stop_capture(Monitor *mon, const QDict *qdict) |
bellard | ec36b69 | 2006-07-16 18:57:03 +0000 | [diff] [blame] | 1495 | { |
| 1496 | int i; |
Luiz Capitulino | d54908a | 2009-08-28 15:27:13 -0300 | [diff] [blame] | 1497 | int n = qdict_get_int(qdict, "n"); |
bellard | ec36b69 | 2006-07-16 18:57:03 +0000 | [diff] [blame] | 1498 | CaptureState *s; |
| 1499 | |
| 1500 | for (s = capture_head.lh_first, i = 0; s; s = s->entries.le_next, ++i) { |
| 1501 | if (i == n) { |
| 1502 | s->ops.destroy (s->opaque); |
| 1503 | LIST_REMOVE (s, entries); |
| 1504 | qemu_free (s); |
| 1505 | return; |
| 1506 | } |
| 1507 | } |
| 1508 | } |
| 1509 | |
Luiz Capitulino | c192548 | 2009-08-28 15:27:19 -0300 | [diff] [blame] | 1510 | static void do_wav_capture(Monitor *mon, const QDict *qdict) |
bellard | ec36b69 | 2006-07-16 18:57:03 +0000 | [diff] [blame] | 1511 | { |
Luiz Capitulino | c192548 | 2009-08-28 15:27:19 -0300 | [diff] [blame] | 1512 | const char *path = qdict_get_str(qdict, "path"); |
| 1513 | int has_freq = qdict_haskey(qdict, "freq"); |
| 1514 | int freq = qdict_get_try_int(qdict, "freq", -1); |
| 1515 | int has_bits = qdict_haskey(qdict, "bits"); |
| 1516 | int bits = qdict_get_try_int(qdict, "bits", -1); |
| 1517 | int has_channels = qdict_haskey(qdict, "nchannels"); |
| 1518 | int nchannels = qdict_get_try_int(qdict, "nchannels", -1); |
bellard | ec36b69 | 2006-07-16 18:57:03 +0000 | [diff] [blame] | 1519 | CaptureState *s; |
| 1520 | |
| 1521 | s = qemu_mallocz (sizeof (*s)); |
bellard | ec36b69 | 2006-07-16 18:57:03 +0000 | [diff] [blame] | 1522 | |
| 1523 | freq = has_freq ? freq : 44100; |
| 1524 | bits = has_bits ? bits : 16; |
| 1525 | nchannels = has_channels ? nchannels : 2; |
| 1526 | |
| 1527 | if (wav_start_capture (s, path, freq, bits, nchannels)) { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 1528 | monitor_printf(mon, "Faied to add wave capture\n"); |
bellard | ec36b69 | 2006-07-16 18:57:03 +0000 | [diff] [blame] | 1529 | qemu_free (s); |
| 1530 | } |
| 1531 | LIST_INSERT_HEAD (&capture_head, s, entries); |
| 1532 | } |
| 1533 | #endif |
| 1534 | |
aurel32 | dc1c0b7 | 2008-04-27 23:52:12 +0000 | [diff] [blame] | 1535 | #if defined(TARGET_I386) |
Luiz Capitulino | d54908a | 2009-08-28 15:27:13 -0300 | [diff] [blame] | 1536 | static void do_inject_nmi(Monitor *mon, const QDict *qdict) |
aurel32 | dc1c0b7 | 2008-04-27 23:52:12 +0000 | [diff] [blame] | 1537 | { |
| 1538 | CPUState *env; |
Luiz Capitulino | d54908a | 2009-08-28 15:27:13 -0300 | [diff] [blame] | 1539 | int cpu_index = qdict_get_int(qdict, "cpu_index"); |
aurel32 | dc1c0b7 | 2008-04-27 23:52:12 +0000 | [diff] [blame] | 1540 | |
| 1541 | for (env = first_cpu; env != NULL; env = env->next_cpu) |
| 1542 | if (env->cpu_index == cpu_index) { |
| 1543 | cpu_interrupt(env, CPU_INTERRUPT_NMI); |
| 1544 | break; |
| 1545 | } |
| 1546 | } |
| 1547 | #endif |
| 1548 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 1549 | static void do_info_status(Monitor *mon) |
aurel32 | 6f9c5ee | 2008-12-18 22:43:56 +0000 | [diff] [blame] | 1550 | { |
aurel32 | 1b530a6 | 2009-04-05 20:08:59 +0000 | [diff] [blame] | 1551 | if (vm_running) { |
| 1552 | if (singlestep) { |
| 1553 | monitor_printf(mon, "VM status: running (single step mode)\n"); |
| 1554 | } else { |
| 1555 | monitor_printf(mon, "VM status: running\n"); |
| 1556 | } |
| 1557 | } else |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 1558 | monitor_printf(mon, "VM status: paused\n"); |
aurel32 | 6f9c5ee | 2008-12-18 22:43:56 +0000 | [diff] [blame] | 1559 | } |
| 1560 | |
| 1561 | |
Luiz Capitulino | d54908a | 2009-08-28 15:27:13 -0300 | [diff] [blame] | 1562 | static void do_balloon(Monitor *mon, const QDict *qdict) |
aliguori | df751fa | 2008-12-04 20:19:35 +0000 | [diff] [blame] | 1563 | { |
Luiz Capitulino | d54908a | 2009-08-28 15:27:13 -0300 | [diff] [blame] | 1564 | int value = qdict_get_int(qdict, "value"); |
aliguori | df751fa | 2008-12-04 20:19:35 +0000 | [diff] [blame] | 1565 | ram_addr_t target = value; |
| 1566 | qemu_balloon(target << 20); |
| 1567 | } |
| 1568 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 1569 | static void do_info_balloon(Monitor *mon) |
aliguori | df751fa | 2008-12-04 20:19:35 +0000 | [diff] [blame] | 1570 | { |
| 1571 | ram_addr_t actual; |
| 1572 | |
| 1573 | actual = qemu_balloon_status(); |
aliguori | bd32208 | 2008-12-04 20:33:06 +0000 | [diff] [blame] | 1574 | if (kvm_enabled() && !kvm_has_sync_mmu()) |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 1575 | monitor_printf(mon, "Using KVM without synchronous MMU, " |
| 1576 | "ballooning disabled\n"); |
aliguori | bd32208 | 2008-12-04 20:33:06 +0000 | [diff] [blame] | 1577 | else if (actual == 0) |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 1578 | monitor_printf(mon, "Ballooning not activated in VM\n"); |
aliguori | df751fa | 2008-12-04 20:19:35 +0000 | [diff] [blame] | 1579 | else |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 1580 | monitor_printf(mon, "balloon: actual=%d\n", (int)(actual >> 20)); |
aliguori | df751fa | 2008-12-04 20:19:35 +0000 | [diff] [blame] | 1581 | } |
| 1582 | |
Jan Kiszka | 15dfcd4 | 2009-06-25 08:22:08 +0200 | [diff] [blame] | 1583 | static qemu_acl *find_acl(Monitor *mon, const char *name) |
aliguori | 76655d6 | 2009-03-06 20:27:37 +0000 | [diff] [blame] | 1584 | { |
Jan Kiszka | 15dfcd4 | 2009-06-25 08:22:08 +0200 | [diff] [blame] | 1585 | qemu_acl *acl = qemu_acl_find(name); |
aliguori | 76655d6 | 2009-03-06 20:27:37 +0000 | [diff] [blame] | 1586 | |
aliguori | 76655d6 | 2009-03-06 20:27:37 +0000 | [diff] [blame] | 1587 | if (!acl) { |
Jan Kiszka | 15dfcd4 | 2009-06-25 08:22:08 +0200 | [diff] [blame] | 1588 | monitor_printf(mon, "acl: unknown list '%s'\n", name); |
aliguori | 76655d6 | 2009-03-06 20:27:37 +0000 | [diff] [blame] | 1589 | } |
Jan Kiszka | 15dfcd4 | 2009-06-25 08:22:08 +0200 | [diff] [blame] | 1590 | return acl; |
| 1591 | } |
aliguori | 76655d6 | 2009-03-06 20:27:37 +0000 | [diff] [blame] | 1592 | |
Luiz Capitulino | d54908a | 2009-08-28 15:27:13 -0300 | [diff] [blame] | 1593 | static void do_acl_show(Monitor *mon, const QDict *qdict) |
Jan Kiszka | 15dfcd4 | 2009-06-25 08:22:08 +0200 | [diff] [blame] | 1594 | { |
Luiz Capitulino | d54908a | 2009-08-28 15:27:13 -0300 | [diff] [blame] | 1595 | const char *aclname = qdict_get_str(qdict, "aclname"); |
Jan Kiszka | 15dfcd4 | 2009-06-25 08:22:08 +0200 | [diff] [blame] | 1596 | qemu_acl *acl = find_acl(mon, aclname); |
| 1597 | qemu_acl_entry *entry; |
| 1598 | int i = 0; |
| 1599 | |
| 1600 | if (acl) { |
aliguori | 28a76be | 2009-03-06 20:27:40 +0000 | [diff] [blame] | 1601 | monitor_printf(mon, "policy: %s\n", |
aliguori | 76655d6 | 2009-03-06 20:27:37 +0000 | [diff] [blame] | 1602 | acl->defaultDeny ? "deny" : "allow"); |
aliguori | 28a76be | 2009-03-06 20:27:40 +0000 | [diff] [blame] | 1603 | TAILQ_FOREACH(entry, &acl->entries, next) { |
| 1604 | i++; |
| 1605 | monitor_printf(mon, "%d: %s %s\n", i, |
Jan Kiszka | 15dfcd4 | 2009-06-25 08:22:08 +0200 | [diff] [blame] | 1606 | entry->deny ? "deny" : "allow", entry->match); |
aliguori | 28a76be | 2009-03-06 20:27:40 +0000 | [diff] [blame] | 1607 | } |
Jan Kiszka | 15dfcd4 | 2009-06-25 08:22:08 +0200 | [diff] [blame] | 1608 | } |
| 1609 | } |
| 1610 | |
Luiz Capitulino | d54908a | 2009-08-28 15:27:13 -0300 | [diff] [blame] | 1611 | static void do_acl_reset(Monitor *mon, const QDict *qdict) |
Jan Kiszka | 15dfcd4 | 2009-06-25 08:22:08 +0200 | [diff] [blame] | 1612 | { |
Luiz Capitulino | d54908a | 2009-08-28 15:27:13 -0300 | [diff] [blame] | 1613 | const char *aclname = qdict_get_str(qdict, "aclname"); |
Jan Kiszka | 15dfcd4 | 2009-06-25 08:22:08 +0200 | [diff] [blame] | 1614 | qemu_acl *acl = find_acl(mon, aclname); |
| 1615 | |
| 1616 | if (acl) { |
aliguori | 28a76be | 2009-03-06 20:27:40 +0000 | [diff] [blame] | 1617 | qemu_acl_reset(acl); |
| 1618 | monitor_printf(mon, "acl: removed all rules\n"); |
Jan Kiszka | 15dfcd4 | 2009-06-25 08:22:08 +0200 | [diff] [blame] | 1619 | } |
| 1620 | } |
aliguori | 76655d6 | 2009-03-06 20:27:37 +0000 | [diff] [blame] | 1621 | |
Luiz Capitulino | f18c16d | 2009-08-28 15:27:14 -0300 | [diff] [blame] | 1622 | static void do_acl_policy(Monitor *mon, const QDict *qdict) |
Jan Kiszka | 15dfcd4 | 2009-06-25 08:22:08 +0200 | [diff] [blame] | 1623 | { |
Luiz Capitulino | f18c16d | 2009-08-28 15:27:14 -0300 | [diff] [blame] | 1624 | const char *aclname = qdict_get_str(qdict, "aclname"); |
| 1625 | const char *policy = qdict_get_str(qdict, "policy"); |
Jan Kiszka | 15dfcd4 | 2009-06-25 08:22:08 +0200 | [diff] [blame] | 1626 | qemu_acl *acl = find_acl(mon, aclname); |
| 1627 | |
| 1628 | if (acl) { |
| 1629 | if (strcmp(policy, "allow") == 0) { |
aliguori | 28a76be | 2009-03-06 20:27:40 +0000 | [diff] [blame] | 1630 | acl->defaultDeny = 0; |
| 1631 | monitor_printf(mon, "acl: policy set to 'allow'\n"); |
Jan Kiszka | 15dfcd4 | 2009-06-25 08:22:08 +0200 | [diff] [blame] | 1632 | } else if (strcmp(policy, "deny") == 0) { |
aliguori | 28a76be | 2009-03-06 20:27:40 +0000 | [diff] [blame] | 1633 | acl->defaultDeny = 1; |
| 1634 | monitor_printf(mon, "acl: policy set to 'deny'\n"); |
| 1635 | } else { |
Jan Kiszka | 15dfcd4 | 2009-06-25 08:22:08 +0200 | [diff] [blame] | 1636 | monitor_printf(mon, "acl: unknown policy '%s', " |
| 1637 | "expected 'deny' or 'allow'\n", policy); |
aliguori | 28a76be | 2009-03-06 20:27:40 +0000 | [diff] [blame] | 1638 | } |
Jan Kiszka | 15dfcd4 | 2009-06-25 08:22:08 +0200 | [diff] [blame] | 1639 | } |
| 1640 | } |
aliguori | 76655d6 | 2009-03-06 20:27:37 +0000 | [diff] [blame] | 1641 | |
Luiz Capitulino | 1bd1442 | 2009-08-28 15:27:17 -0300 | [diff] [blame] | 1642 | static void do_acl_add(Monitor *mon, const QDict *qdict) |
Jan Kiszka | 15dfcd4 | 2009-06-25 08:22:08 +0200 | [diff] [blame] | 1643 | { |
Luiz Capitulino | 1bd1442 | 2009-08-28 15:27:17 -0300 | [diff] [blame] | 1644 | const char *aclname = qdict_get_str(qdict, "aclname"); |
| 1645 | const char *match = qdict_get_str(qdict, "match"); |
| 1646 | const char *policy = qdict_get_str(qdict, "policy"); |
| 1647 | int has_index = qdict_haskey(qdict, "index"); |
| 1648 | int index = qdict_get_try_int(qdict, "index", -1); |
Jan Kiszka | 15dfcd4 | 2009-06-25 08:22:08 +0200 | [diff] [blame] | 1649 | qemu_acl *acl = find_acl(mon, aclname); |
| 1650 | int deny, ret; |
| 1651 | |
| 1652 | if (acl) { |
| 1653 | if (strcmp(policy, "allow") == 0) { |
| 1654 | deny = 0; |
| 1655 | } else if (strcmp(policy, "deny") == 0) { |
| 1656 | deny = 1; |
| 1657 | } else { |
| 1658 | monitor_printf(mon, "acl: unknown policy '%s', " |
| 1659 | "expected 'deny' or 'allow'\n", policy); |
aliguori | 28a76be | 2009-03-06 20:27:40 +0000 | [diff] [blame] | 1660 | return; |
| 1661 | } |
aliguori | 28a76be | 2009-03-06 20:27:40 +0000 | [diff] [blame] | 1662 | if (has_index) |
| 1663 | ret = qemu_acl_insert(acl, deny, match, index); |
| 1664 | else |
| 1665 | ret = qemu_acl_append(acl, deny, match); |
| 1666 | if (ret < 0) |
| 1667 | monitor_printf(mon, "acl: unable to add acl entry\n"); |
| 1668 | else |
| 1669 | monitor_printf(mon, "acl: added rule at position %d\n", ret); |
Jan Kiszka | 15dfcd4 | 2009-06-25 08:22:08 +0200 | [diff] [blame] | 1670 | } |
| 1671 | } |
aliguori | 76655d6 | 2009-03-06 20:27:37 +0000 | [diff] [blame] | 1672 | |
Luiz Capitulino | f18c16d | 2009-08-28 15:27:14 -0300 | [diff] [blame] | 1673 | static void do_acl_remove(Monitor *mon, const QDict *qdict) |
Jan Kiszka | 15dfcd4 | 2009-06-25 08:22:08 +0200 | [diff] [blame] | 1674 | { |
Luiz Capitulino | f18c16d | 2009-08-28 15:27:14 -0300 | [diff] [blame] | 1675 | const char *aclname = qdict_get_str(qdict, "aclname"); |
| 1676 | const char *match = qdict_get_str(qdict, "match"); |
Jan Kiszka | 15dfcd4 | 2009-06-25 08:22:08 +0200 | [diff] [blame] | 1677 | qemu_acl *acl = find_acl(mon, aclname); |
| 1678 | int ret; |
aliguori | 76655d6 | 2009-03-06 20:27:37 +0000 | [diff] [blame] | 1679 | |
Jan Kiszka | 15dfcd4 | 2009-06-25 08:22:08 +0200 | [diff] [blame] | 1680 | if (acl) { |
aliguori | 28a76be | 2009-03-06 20:27:40 +0000 | [diff] [blame] | 1681 | ret = qemu_acl_remove(acl, match); |
| 1682 | if (ret < 0) |
| 1683 | monitor_printf(mon, "acl: no matching acl entry\n"); |
| 1684 | else |
| 1685 | monitor_printf(mon, "acl: removed rule at position %d\n", ret); |
aliguori | 76655d6 | 2009-03-06 20:27:37 +0000 | [diff] [blame] | 1686 | } |
| 1687 | } |
| 1688 | |
Huang Ying | 79c4f6b | 2009-06-23 10:05:14 +0800 | [diff] [blame] | 1689 | #if defined(TARGET_I386) |
Luiz Capitulino | 37b7ad4 | 2009-08-28 15:27:21 -0300 | [diff] [blame] | 1690 | static void do_inject_mce(Monitor *mon, const QDict *qdict) |
Huang Ying | 79c4f6b | 2009-06-23 10:05:14 +0800 | [diff] [blame] | 1691 | { |
| 1692 | CPUState *cenv; |
Luiz Capitulino | 37b7ad4 | 2009-08-28 15:27:21 -0300 | [diff] [blame] | 1693 | int cpu_index = qdict_get_int(qdict, "cpu_index"); |
| 1694 | int bank = qdict_get_int(qdict, "bank"); |
| 1695 | uint64_t status = qdict_get_int(qdict, "status"); |
| 1696 | uint64_t mcg_status = qdict_get_int(qdict, "mcg_status"); |
| 1697 | uint64_t addr = qdict_get_int(qdict, "addr"); |
| 1698 | uint64_t misc = qdict_get_int(qdict, "misc"); |
Huang Ying | 79c4f6b | 2009-06-23 10:05:14 +0800 | [diff] [blame] | 1699 | |
| 1700 | for (cenv = first_cpu; cenv != NULL; cenv = cenv->next_cpu) |
| 1701 | if (cenv->cpu_index == cpu_index && cenv->mcg_cap) { |
| 1702 | cpu_inject_x86_mce(cenv, bank, status, mcg_status, addr, misc); |
| 1703 | break; |
| 1704 | } |
| 1705 | } |
| 1706 | #endif |
| 1707 | |
Luiz Capitulino | d54908a | 2009-08-28 15:27:13 -0300 | [diff] [blame] | 1708 | static void do_getfd(Monitor *mon, const QDict *qdict) |
Mark McLoughlin | f07918f | 2009-07-22 09:11:40 +0100 | [diff] [blame] | 1709 | { |
Luiz Capitulino | d54908a | 2009-08-28 15:27:13 -0300 | [diff] [blame] | 1710 | const char *fdname = qdict_get_str(qdict, "fdname"); |
Mark McLoughlin | f07918f | 2009-07-22 09:11:40 +0100 | [diff] [blame] | 1711 | mon_fd_t *monfd; |
| 1712 | int fd; |
| 1713 | |
| 1714 | fd = qemu_chr_get_msgfd(mon->chr); |
| 1715 | if (fd == -1) { |
| 1716 | monitor_printf(mon, "getfd: no file descriptor supplied via SCM_RIGHTS\n"); |
| 1717 | return; |
| 1718 | } |
| 1719 | |
| 1720 | if (qemu_isdigit(fdname[0])) { |
| 1721 | monitor_printf(mon, "getfd: monitor names may not begin with a number\n"); |
| 1722 | return; |
| 1723 | } |
| 1724 | |
| 1725 | fd = dup(fd); |
| 1726 | if (fd == -1) { |
| 1727 | monitor_printf(mon, "Failed to dup() file descriptor: %s\n", |
| 1728 | strerror(errno)); |
| 1729 | return; |
| 1730 | } |
| 1731 | |
| 1732 | LIST_FOREACH(monfd, &mon->fds, next) { |
| 1733 | if (strcmp(monfd->name, fdname) != 0) { |
| 1734 | continue; |
| 1735 | } |
| 1736 | |
| 1737 | close(monfd->fd); |
| 1738 | monfd->fd = fd; |
| 1739 | return; |
| 1740 | } |
| 1741 | |
| 1742 | monfd = qemu_mallocz(sizeof(mon_fd_t)); |
| 1743 | monfd->name = qemu_strdup(fdname); |
| 1744 | monfd->fd = fd; |
| 1745 | |
| 1746 | LIST_INSERT_HEAD(&mon->fds, monfd, next); |
| 1747 | } |
| 1748 | |
Luiz Capitulino | d54908a | 2009-08-28 15:27:13 -0300 | [diff] [blame] | 1749 | static void do_closefd(Monitor *mon, const QDict *qdict) |
Mark McLoughlin | f07918f | 2009-07-22 09:11:40 +0100 | [diff] [blame] | 1750 | { |
Luiz Capitulino | d54908a | 2009-08-28 15:27:13 -0300 | [diff] [blame] | 1751 | const char *fdname = qdict_get_str(qdict, "fdname"); |
Mark McLoughlin | f07918f | 2009-07-22 09:11:40 +0100 | [diff] [blame] | 1752 | mon_fd_t *monfd; |
| 1753 | |
| 1754 | LIST_FOREACH(monfd, &mon->fds, next) { |
| 1755 | if (strcmp(monfd->name, fdname) != 0) { |
| 1756 | continue; |
| 1757 | } |
| 1758 | |
| 1759 | LIST_REMOVE(monfd, next); |
| 1760 | close(monfd->fd); |
| 1761 | qemu_free(monfd->name); |
| 1762 | qemu_free(monfd); |
| 1763 | return; |
| 1764 | } |
| 1765 | |
| 1766 | monitor_printf(mon, "Failed to find file descriptor named %s\n", |
| 1767 | fdname); |
| 1768 | } |
| 1769 | |
Luiz Capitulino | d54908a | 2009-08-28 15:27:13 -0300 | [diff] [blame] | 1770 | static void do_loadvm(Monitor *mon, const QDict *qdict) |
Juan Quintela | c8d41b2 | 2009-08-20 19:42:21 +0200 | [diff] [blame] | 1771 | { |
| 1772 | int saved_vm_running = vm_running; |
Luiz Capitulino | d54908a | 2009-08-28 15:27:13 -0300 | [diff] [blame] | 1773 | const char *name = qdict_get_str(qdict, "name"); |
Juan Quintela | c8d41b2 | 2009-08-20 19:42:21 +0200 | [diff] [blame] | 1774 | |
| 1775 | vm_stop(0); |
| 1776 | |
Juan Quintela | 05f2401 | 2009-08-20 19:42:22 +0200 | [diff] [blame] | 1777 | if (load_vmstate(mon, name) >= 0 && saved_vm_running) |
Juan Quintela | c8d41b2 | 2009-08-20 19:42:21 +0200 | [diff] [blame] | 1778 | vm_start(); |
| 1779 | } |
| 1780 | |
Mark McLoughlin | 7768e04 | 2009-07-22 09:11:41 +0100 | [diff] [blame] | 1781 | int monitor_get_fd(Monitor *mon, const char *fdname) |
| 1782 | { |
| 1783 | mon_fd_t *monfd; |
| 1784 | |
| 1785 | LIST_FOREACH(monfd, &mon->fds, next) { |
| 1786 | int fd; |
| 1787 | |
| 1788 | if (strcmp(monfd->name, fdname) != 0) { |
| 1789 | continue; |
| 1790 | } |
| 1791 | |
| 1792 | fd = monfd->fd; |
| 1793 | |
| 1794 | /* caller takes ownership of fd */ |
| 1795 | LIST_REMOVE(monfd, next); |
| 1796 | qemu_free(monfd->name); |
| 1797 | qemu_free(monfd); |
| 1798 | |
| 1799 | return fd; |
| 1800 | } |
| 1801 | |
| 1802 | return -1; |
| 1803 | } |
| 1804 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 1805 | static const mon_cmd_t mon_cmds[] = { |
Blue Swirl | 2313086 | 2009-06-06 08:22:04 +0000 | [diff] [blame] | 1806 | #include "qemu-monitor.h" |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 1807 | { NULL, NULL, }, |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 1808 | }; |
| 1809 | |
Blue Swirl | 2313086 | 2009-06-06 08:22:04 +0000 | [diff] [blame] | 1810 | /* Please update qemu-monitor.hx when adding or changing commands */ |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 1811 | static const mon_cmd_t info_cmds[] = { |
bellard | 9bc9d1c | 2004-10-10 15:15:51 +0000 | [diff] [blame] | 1812 | { "version", "", do_info_version, |
blueswir1 | d2c639d | 2009-01-24 18:19:25 +0000 | [diff] [blame] | 1813 | "", "show the version of QEMU" }, |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1814 | { "network", "", do_info_network, |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 1815 | "", "show the network state" }, |
aliguori | 5ccfae1 | 2008-10-31 17:31:29 +0000 | [diff] [blame] | 1816 | { "chardev", "", qemu_chr_info, |
| 1817 | "", "show the character devices" }, |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 1818 | { "block", "", bdrv_info, |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 1819 | "", "show the block devices" }, |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 1820 | { "blockstats", "", bdrv_info_stats, |
ths | a36e69d | 2007-12-02 05:18:19 +0000 | [diff] [blame] | 1821 | "", "show block device statistics" }, |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1822 | { "registers", "", do_info_registers, |
| 1823 | "", "show the cpu registers" }, |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 1824 | { "cpus", "", do_info_cpus, |
| 1825 | "", "show infos for each CPU" }, |
bellard | aa45548 | 2004-04-04 13:07:25 +0000 | [diff] [blame] | 1826 | { "history", "", do_info_history, |
| 1827 | "", "show the command line history", }, |
bellard | 4a0fb71 | 2004-05-21 11:39:07 +0000 | [diff] [blame] | 1828 | { "irq", "", irq_info, |
| 1829 | "", "show the interrupts statistics (if available)", }, |
bellard | 4c27ba2 | 2004-04-25 18:05:08 +0000 | [diff] [blame] | 1830 | { "pic", "", pic_info, |
| 1831 | "", "show i8259 (PIC) state", }, |
bellard | 86e0c04 | 2004-05-20 12:49:21 +0000 | [diff] [blame] | 1832 | { "pci", "", pci_info, |
| 1833 | "", "show PCI info", }, |
aurel32 | 7c664e2 | 2009-03-03 06:12:22 +0000 | [diff] [blame] | 1834 | #if defined(TARGET_I386) || defined(TARGET_SH4) |
bellard | b86bda5 | 2004-09-18 19:32:46 +0000 | [diff] [blame] | 1835 | { "tlb", "", tlb_info, |
| 1836 | "", "show virtual to physical memory mappings", }, |
aurel32 | 7c664e2 | 2009-03-03 06:12:22 +0000 | [diff] [blame] | 1837 | #endif |
| 1838 | #if defined(TARGET_I386) |
bellard | b86bda5 | 2004-09-18 19:32:46 +0000 | [diff] [blame] | 1839 | { "mem", "", mem_info, |
| 1840 | "", "show the active virtual memory mappings", }, |
aliguori | 16b29ae | 2008-12-17 23:28:44 +0000 | [diff] [blame] | 1841 | { "hpet", "", do_info_hpet, |
| 1842 | "", "show state of HPET", }, |
bellard | b86bda5 | 2004-09-18 19:32:46 +0000 | [diff] [blame] | 1843 | #endif |
bellard | e3db722 | 2005-01-26 22:00:47 +0000 | [diff] [blame] | 1844 | { "jit", "", do_info_jit, |
| 1845 | "", "show dynamic compiler info", }, |
aliguori | 7ba1e61 | 2008-11-05 16:04:33 +0000 | [diff] [blame] | 1846 | { "kvm", "", do_info_kvm, |
blueswir1 | d2c639d | 2009-01-24 18:19:25 +0000 | [diff] [blame] | 1847 | "", "show KVM information", }, |
aliguori | 030ea37 | 2009-04-21 22:30:47 +0000 | [diff] [blame] | 1848 | { "numa", "", do_info_numa, |
| 1849 | "", "show NUMA information", }, |
bellard | a594cfb | 2005-11-06 16:13:29 +0000 | [diff] [blame] | 1850 | { "usb", "", usb_info, |
| 1851 | "", "show guest USB devices", }, |
| 1852 | { "usbhost", "", usb_host_info, |
| 1853 | "", "show host USB devices", }, |
bellard | 5f1ce94 | 2006-02-08 22:40:15 +0000 | [diff] [blame] | 1854 | { "profile", "", do_info_profile, |
| 1855 | "", "show profiling information", }, |
bellard | ec36b69 | 2006-07-16 18:57:03 +0000 | [diff] [blame] | 1856 | { "capture", "", do_info_capture, |
bellard | 1710015 | 2006-09-25 21:33:49 +0000 | [diff] [blame] | 1857 | "", "show capture information" }, |
bellard | faea38e | 2006-08-05 21:31:00 +0000 | [diff] [blame] | 1858 | { "snapshots", "", do_info_snapshots, |
bellard | 1710015 | 2006-09-25 21:33:49 +0000 | [diff] [blame] | 1859 | "", "show the currently saved VM snapshots" }, |
aurel32 | 6f9c5ee | 2008-12-18 22:43:56 +0000 | [diff] [blame] | 1860 | { "status", "", do_info_status, |
| 1861 | "", "show the current VM status (running|paused)" }, |
balrog | 201a51f | 2007-04-30 00:51:09 +0000 | [diff] [blame] | 1862 | { "pcmcia", "", pcmcia_info, |
| 1863 | "", "show guest PCMCIA status" }, |
ths | 455204e | 2007-01-05 16:42:13 +0000 | [diff] [blame] | 1864 | { "mice", "", do_info_mice, |
| 1865 | "", "show which guest mouse is receiving events" }, |
bellard | a9ce859 | 2007-02-05 20:20:30 +0000 | [diff] [blame] | 1866 | { "vnc", "", do_info_vnc, |
| 1867 | "", "show the vnc server status"}, |
ths | c35734b | 2007-03-19 15:17:08 +0000 | [diff] [blame] | 1868 | { "name", "", do_info_name, |
| 1869 | "", "show the current VM name" }, |
blueswir1 | f1f23ad | 2008-09-18 18:30:20 +0000 | [diff] [blame] | 1870 | { "uuid", "", do_info_uuid, |
| 1871 | "", "show the current VM UUID" }, |
j_mayer | 76a6625 | 2007-03-07 08:32:30 +0000 | [diff] [blame] | 1872 | #if defined(TARGET_PPC) |
| 1873 | { "cpustats", "", do_info_cpu_stats, |
| 1874 | "", "show CPU statistics", }, |
| 1875 | #endif |
blueswir1 | 31a60e2 | 2007-10-26 18:42:59 +0000 | [diff] [blame] | 1876 | #if defined(CONFIG_SLIRP) |
Jan Kiszka | 6dbe553 | 2009-06-24 14:42:29 +0200 | [diff] [blame] | 1877 | { "usernet", "", do_info_usernet, |
| 1878 | "", "show user network stack connection states", }, |
blueswir1 | 31a60e2 | 2007-10-26 18:42:59 +0000 | [diff] [blame] | 1879 | #endif |
aliguori | 5bb7910 | 2008-10-13 03:12:02 +0000 | [diff] [blame] | 1880 | { "migrate", "", do_info_migrate, "", "show migration status" }, |
aliguori | df751fa | 2008-12-04 20:19:35 +0000 | [diff] [blame] | 1881 | { "balloon", "", do_info_balloon, |
| 1882 | "", "show balloon information" }, |
Gerd Hoffmann | cae4956 | 2009-06-05 15:53:17 +0100 | [diff] [blame] | 1883 | { "qtree", "", do_info_qtree, |
| 1884 | "", "show device tree" }, |
Gerd Hoffmann | f6c64e0 | 2009-08-03 15:03:09 +0200 | [diff] [blame] | 1885 | { "qdm", "", do_info_qdm, |
| 1886 | "", "show qdev device model list" }, |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 1887 | { NULL, NULL, }, |
| 1888 | }; |
| 1889 | |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1890 | /*******************************************************************/ |
| 1891 | |
| 1892 | static const char *pch; |
| 1893 | static jmp_buf expr_env; |
| 1894 | |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 1895 | #define MD_TLONG 0 |
| 1896 | #define MD_I32 1 |
| 1897 | |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1898 | typedef struct MonitorDef { |
| 1899 | const char *name; |
| 1900 | int offset; |
blueswir1 | 8662d65 | 2008-10-02 18:32:44 +0000 | [diff] [blame] | 1901 | target_long (*get_value)(const struct MonitorDef *md, int val); |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 1902 | int type; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1903 | } MonitorDef; |
| 1904 | |
bellard | 57206fd | 2004-04-25 18:54:52 +0000 | [diff] [blame] | 1905 | #if defined(TARGET_I386) |
blueswir1 | 8662d65 | 2008-10-02 18:32:44 +0000 | [diff] [blame] | 1906 | static target_long monitor_get_pc (const struct MonitorDef *md, int val) |
bellard | 57206fd | 2004-04-25 18:54:52 +0000 | [diff] [blame] | 1907 | { |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 1908 | CPUState *env = mon_get_cpu(); |
| 1909 | if (!env) |
| 1910 | return 0; |
| 1911 | return env->eip + env->segs[R_CS].base; |
bellard | 57206fd | 2004-04-25 18:54:52 +0000 | [diff] [blame] | 1912 | } |
| 1913 | #endif |
| 1914 | |
bellard | a541f29 | 2004-04-12 20:39:29 +0000 | [diff] [blame] | 1915 | #if defined(TARGET_PPC) |
blueswir1 | 8662d65 | 2008-10-02 18:32:44 +0000 | [diff] [blame] | 1916 | static target_long monitor_get_ccr (const struct MonitorDef *md, int val) |
bellard | a541f29 | 2004-04-12 20:39:29 +0000 | [diff] [blame] | 1917 | { |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 1918 | CPUState *env = mon_get_cpu(); |
bellard | a541f29 | 2004-04-12 20:39:29 +0000 | [diff] [blame] | 1919 | unsigned int u; |
| 1920 | int i; |
| 1921 | |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 1922 | if (!env) |
| 1923 | return 0; |
| 1924 | |
bellard | a541f29 | 2004-04-12 20:39:29 +0000 | [diff] [blame] | 1925 | u = 0; |
| 1926 | for (i = 0; i < 8; i++) |
aliguori | 28a76be | 2009-03-06 20:27:40 +0000 | [diff] [blame] | 1927 | u |= env->crf[i] << (32 - (4 * i)); |
bellard | a541f29 | 2004-04-12 20:39:29 +0000 | [diff] [blame] | 1928 | |
| 1929 | return u; |
| 1930 | } |
| 1931 | |
blueswir1 | 8662d65 | 2008-10-02 18:32:44 +0000 | [diff] [blame] | 1932 | static target_long monitor_get_msr (const struct MonitorDef *md, int val) |
bellard | a541f29 | 2004-04-12 20:39:29 +0000 | [diff] [blame] | 1933 | { |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 1934 | CPUState *env = mon_get_cpu(); |
| 1935 | if (!env) |
| 1936 | return 0; |
j_mayer | 0411a97 | 2007-10-25 21:35:50 +0000 | [diff] [blame] | 1937 | return env->msr; |
bellard | a541f29 | 2004-04-12 20:39:29 +0000 | [diff] [blame] | 1938 | } |
| 1939 | |
blueswir1 | 8662d65 | 2008-10-02 18:32:44 +0000 | [diff] [blame] | 1940 | static target_long monitor_get_xer (const struct MonitorDef *md, int val) |
bellard | a541f29 | 2004-04-12 20:39:29 +0000 | [diff] [blame] | 1941 | { |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 1942 | CPUState *env = mon_get_cpu(); |
| 1943 | if (!env) |
| 1944 | return 0; |
aurel32 | 3d7b417 | 2008-10-21 11:28:46 +0000 | [diff] [blame] | 1945 | return env->xer; |
bellard | a541f29 | 2004-04-12 20:39:29 +0000 | [diff] [blame] | 1946 | } |
bellard | 9fddaa0 | 2004-05-21 12:59:32 +0000 | [diff] [blame] | 1947 | |
blueswir1 | 8662d65 | 2008-10-02 18:32:44 +0000 | [diff] [blame] | 1948 | static target_long monitor_get_decr (const struct MonitorDef *md, int val) |
bellard | 9fddaa0 | 2004-05-21 12:59:32 +0000 | [diff] [blame] | 1949 | { |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 1950 | CPUState *env = mon_get_cpu(); |
| 1951 | if (!env) |
| 1952 | return 0; |
| 1953 | return cpu_ppc_load_decr(env); |
bellard | 9fddaa0 | 2004-05-21 12:59:32 +0000 | [diff] [blame] | 1954 | } |
| 1955 | |
blueswir1 | 8662d65 | 2008-10-02 18:32:44 +0000 | [diff] [blame] | 1956 | static target_long monitor_get_tbu (const struct MonitorDef *md, int val) |
bellard | 9fddaa0 | 2004-05-21 12:59:32 +0000 | [diff] [blame] | 1957 | { |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 1958 | CPUState *env = mon_get_cpu(); |
| 1959 | if (!env) |
| 1960 | return 0; |
| 1961 | return cpu_ppc_load_tbu(env); |
bellard | 9fddaa0 | 2004-05-21 12:59:32 +0000 | [diff] [blame] | 1962 | } |
| 1963 | |
blueswir1 | 8662d65 | 2008-10-02 18:32:44 +0000 | [diff] [blame] | 1964 | static target_long monitor_get_tbl (const struct MonitorDef *md, int val) |
bellard | 9fddaa0 | 2004-05-21 12:59:32 +0000 | [diff] [blame] | 1965 | { |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 1966 | CPUState *env = mon_get_cpu(); |
| 1967 | if (!env) |
| 1968 | return 0; |
| 1969 | return cpu_ppc_load_tbl(env); |
bellard | 9fddaa0 | 2004-05-21 12:59:32 +0000 | [diff] [blame] | 1970 | } |
bellard | a541f29 | 2004-04-12 20:39:29 +0000 | [diff] [blame] | 1971 | #endif |
| 1972 | |
bellard | e95c8d5 | 2004-09-30 22:22:08 +0000 | [diff] [blame] | 1973 | #if defined(TARGET_SPARC) |
bellard | 7b936c0 | 2005-10-30 17:05:13 +0000 | [diff] [blame] | 1974 | #ifndef TARGET_SPARC64 |
blueswir1 | 8662d65 | 2008-10-02 18:32:44 +0000 | [diff] [blame] | 1975 | static target_long monitor_get_psr (const struct MonitorDef *md, int val) |
bellard | e95c8d5 | 2004-09-30 22:22:08 +0000 | [diff] [blame] | 1976 | { |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 1977 | CPUState *env = mon_get_cpu(); |
| 1978 | if (!env) |
| 1979 | return 0; |
| 1980 | return GET_PSR(env); |
bellard | e95c8d5 | 2004-09-30 22:22:08 +0000 | [diff] [blame] | 1981 | } |
bellard | 7b936c0 | 2005-10-30 17:05:13 +0000 | [diff] [blame] | 1982 | #endif |
bellard | e95c8d5 | 2004-09-30 22:22:08 +0000 | [diff] [blame] | 1983 | |
blueswir1 | 8662d65 | 2008-10-02 18:32:44 +0000 | [diff] [blame] | 1984 | static target_long monitor_get_reg(const struct MonitorDef *md, int val) |
bellard | e95c8d5 | 2004-09-30 22:22:08 +0000 | [diff] [blame] | 1985 | { |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 1986 | CPUState *env = mon_get_cpu(); |
| 1987 | if (!env) |
| 1988 | return 0; |
| 1989 | return env->regwptr[val]; |
bellard | e95c8d5 | 2004-09-30 22:22:08 +0000 | [diff] [blame] | 1990 | } |
| 1991 | #endif |
| 1992 | |
blueswir1 | 8662d65 | 2008-10-02 18:32:44 +0000 | [diff] [blame] | 1993 | static const MonitorDef monitor_defs[] = { |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 1994 | #ifdef TARGET_I386 |
bellard | 57206fd | 2004-04-25 18:54:52 +0000 | [diff] [blame] | 1995 | |
| 1996 | #define SEG(name, seg) \ |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 1997 | { name, offsetof(CPUState, segs[seg].selector), NULL, MD_I32 },\ |
bellard | 57206fd | 2004-04-25 18:54:52 +0000 | [diff] [blame] | 1998 | { name ".base", offsetof(CPUState, segs[seg].base) },\ |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 1999 | { name ".limit", offsetof(CPUState, segs[seg].limit), NULL, MD_I32 }, |
bellard | 57206fd | 2004-04-25 18:54:52 +0000 | [diff] [blame] | 2000 | |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2001 | { "eax", offsetof(CPUState, regs[0]) }, |
| 2002 | { "ecx", offsetof(CPUState, regs[1]) }, |
| 2003 | { "edx", offsetof(CPUState, regs[2]) }, |
| 2004 | { "ebx", offsetof(CPUState, regs[3]) }, |
| 2005 | { "esp|sp", offsetof(CPUState, regs[4]) }, |
| 2006 | { "ebp|fp", offsetof(CPUState, regs[5]) }, |
| 2007 | { "esi", offsetof(CPUState, regs[6]) }, |
bellard | 01038d2 | 2004-09-13 21:36:46 +0000 | [diff] [blame] | 2008 | { "edi", offsetof(CPUState, regs[7]) }, |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 2009 | #ifdef TARGET_X86_64 |
| 2010 | { "r8", offsetof(CPUState, regs[8]) }, |
| 2011 | { "r9", offsetof(CPUState, regs[9]) }, |
| 2012 | { "r10", offsetof(CPUState, regs[10]) }, |
| 2013 | { "r11", offsetof(CPUState, regs[11]) }, |
| 2014 | { "r12", offsetof(CPUState, regs[12]) }, |
| 2015 | { "r13", offsetof(CPUState, regs[13]) }, |
| 2016 | { "r14", offsetof(CPUState, regs[14]) }, |
| 2017 | { "r15", offsetof(CPUState, regs[15]) }, |
| 2018 | #endif |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2019 | { "eflags", offsetof(CPUState, eflags) }, |
bellard | 57206fd | 2004-04-25 18:54:52 +0000 | [diff] [blame] | 2020 | { "eip", offsetof(CPUState, eip) }, |
| 2021 | SEG("cs", R_CS) |
| 2022 | SEG("ds", R_DS) |
| 2023 | SEG("es", R_ES) |
bellard | 01038d2 | 2004-09-13 21:36:46 +0000 | [diff] [blame] | 2024 | SEG("ss", R_SS) |
bellard | 57206fd | 2004-04-25 18:54:52 +0000 | [diff] [blame] | 2025 | SEG("fs", R_FS) |
| 2026 | SEG("gs", R_GS) |
| 2027 | { "pc", 0, monitor_get_pc, }, |
bellard | a541f29 | 2004-04-12 20:39:29 +0000 | [diff] [blame] | 2028 | #elif defined(TARGET_PPC) |
j_mayer | ff937db | 2007-09-19 05:49:13 +0000 | [diff] [blame] | 2029 | /* General purpose registers */ |
bellard | a541f29 | 2004-04-12 20:39:29 +0000 | [diff] [blame] | 2030 | { "r0", offsetof(CPUState, gpr[0]) }, |
| 2031 | { "r1", offsetof(CPUState, gpr[1]) }, |
| 2032 | { "r2", offsetof(CPUState, gpr[2]) }, |
| 2033 | { "r3", offsetof(CPUState, gpr[3]) }, |
| 2034 | { "r4", offsetof(CPUState, gpr[4]) }, |
| 2035 | { "r5", offsetof(CPUState, gpr[5]) }, |
| 2036 | { "r6", offsetof(CPUState, gpr[6]) }, |
| 2037 | { "r7", offsetof(CPUState, gpr[7]) }, |
| 2038 | { "r8", offsetof(CPUState, gpr[8]) }, |
| 2039 | { "r9", offsetof(CPUState, gpr[9]) }, |
| 2040 | { "r10", offsetof(CPUState, gpr[10]) }, |
| 2041 | { "r11", offsetof(CPUState, gpr[11]) }, |
| 2042 | { "r12", offsetof(CPUState, gpr[12]) }, |
| 2043 | { "r13", offsetof(CPUState, gpr[13]) }, |
| 2044 | { "r14", offsetof(CPUState, gpr[14]) }, |
| 2045 | { "r15", offsetof(CPUState, gpr[15]) }, |
| 2046 | { "r16", offsetof(CPUState, gpr[16]) }, |
| 2047 | { "r17", offsetof(CPUState, gpr[17]) }, |
| 2048 | { "r18", offsetof(CPUState, gpr[18]) }, |
| 2049 | { "r19", offsetof(CPUState, gpr[19]) }, |
| 2050 | { "r20", offsetof(CPUState, gpr[20]) }, |
| 2051 | { "r21", offsetof(CPUState, gpr[21]) }, |
| 2052 | { "r22", offsetof(CPUState, gpr[22]) }, |
| 2053 | { "r23", offsetof(CPUState, gpr[23]) }, |
| 2054 | { "r24", offsetof(CPUState, gpr[24]) }, |
| 2055 | { "r25", offsetof(CPUState, gpr[25]) }, |
| 2056 | { "r26", offsetof(CPUState, gpr[26]) }, |
| 2057 | { "r27", offsetof(CPUState, gpr[27]) }, |
| 2058 | { "r28", offsetof(CPUState, gpr[28]) }, |
| 2059 | { "r29", offsetof(CPUState, gpr[29]) }, |
| 2060 | { "r30", offsetof(CPUState, gpr[30]) }, |
| 2061 | { "r31", offsetof(CPUState, gpr[31]) }, |
j_mayer | ff937db | 2007-09-19 05:49:13 +0000 | [diff] [blame] | 2062 | /* Floating point registers */ |
| 2063 | { "f0", offsetof(CPUState, fpr[0]) }, |
| 2064 | { "f1", offsetof(CPUState, fpr[1]) }, |
| 2065 | { "f2", offsetof(CPUState, fpr[2]) }, |
| 2066 | { "f3", offsetof(CPUState, fpr[3]) }, |
| 2067 | { "f4", offsetof(CPUState, fpr[4]) }, |
| 2068 | { "f5", offsetof(CPUState, fpr[5]) }, |
| 2069 | { "f6", offsetof(CPUState, fpr[6]) }, |
| 2070 | { "f7", offsetof(CPUState, fpr[7]) }, |
| 2071 | { "f8", offsetof(CPUState, fpr[8]) }, |
| 2072 | { "f9", offsetof(CPUState, fpr[9]) }, |
| 2073 | { "f10", offsetof(CPUState, fpr[10]) }, |
| 2074 | { "f11", offsetof(CPUState, fpr[11]) }, |
| 2075 | { "f12", offsetof(CPUState, fpr[12]) }, |
| 2076 | { "f13", offsetof(CPUState, fpr[13]) }, |
| 2077 | { "f14", offsetof(CPUState, fpr[14]) }, |
| 2078 | { "f15", offsetof(CPUState, fpr[15]) }, |
| 2079 | { "f16", offsetof(CPUState, fpr[16]) }, |
| 2080 | { "f17", offsetof(CPUState, fpr[17]) }, |
| 2081 | { "f18", offsetof(CPUState, fpr[18]) }, |
| 2082 | { "f19", offsetof(CPUState, fpr[19]) }, |
| 2083 | { "f20", offsetof(CPUState, fpr[20]) }, |
| 2084 | { "f21", offsetof(CPUState, fpr[21]) }, |
| 2085 | { "f22", offsetof(CPUState, fpr[22]) }, |
| 2086 | { "f23", offsetof(CPUState, fpr[23]) }, |
| 2087 | { "f24", offsetof(CPUState, fpr[24]) }, |
| 2088 | { "f25", offsetof(CPUState, fpr[25]) }, |
| 2089 | { "f26", offsetof(CPUState, fpr[26]) }, |
| 2090 | { "f27", offsetof(CPUState, fpr[27]) }, |
| 2091 | { "f28", offsetof(CPUState, fpr[28]) }, |
| 2092 | { "f29", offsetof(CPUState, fpr[29]) }, |
| 2093 | { "f30", offsetof(CPUState, fpr[30]) }, |
| 2094 | { "f31", offsetof(CPUState, fpr[31]) }, |
| 2095 | { "fpscr", offsetof(CPUState, fpscr) }, |
| 2096 | /* Next instruction pointer */ |
bellard | 57206fd | 2004-04-25 18:54:52 +0000 | [diff] [blame] | 2097 | { "nip|pc", offsetof(CPUState, nip) }, |
bellard | a541f29 | 2004-04-12 20:39:29 +0000 | [diff] [blame] | 2098 | { "lr", offsetof(CPUState, lr) }, |
| 2099 | { "ctr", offsetof(CPUState, ctr) }, |
bellard | 9fddaa0 | 2004-05-21 12:59:32 +0000 | [diff] [blame] | 2100 | { "decr", 0, &monitor_get_decr, }, |
bellard | a541f29 | 2004-04-12 20:39:29 +0000 | [diff] [blame] | 2101 | { "ccr", 0, &monitor_get_ccr, }, |
j_mayer | ff937db | 2007-09-19 05:49:13 +0000 | [diff] [blame] | 2102 | /* Machine state register */ |
bellard | a541f29 | 2004-04-12 20:39:29 +0000 | [diff] [blame] | 2103 | { "msr", 0, &monitor_get_msr, }, |
| 2104 | { "xer", 0, &monitor_get_xer, }, |
bellard | 9fddaa0 | 2004-05-21 12:59:32 +0000 | [diff] [blame] | 2105 | { "tbu", 0, &monitor_get_tbu, }, |
| 2106 | { "tbl", 0, &monitor_get_tbl, }, |
j_mayer | ff937db | 2007-09-19 05:49:13 +0000 | [diff] [blame] | 2107 | #if defined(TARGET_PPC64) |
| 2108 | /* Address space register */ |
| 2109 | { "asr", offsetof(CPUState, asr) }, |
| 2110 | #endif |
| 2111 | /* Segment registers */ |
bellard | a541f29 | 2004-04-12 20:39:29 +0000 | [diff] [blame] | 2112 | { "sdr1", offsetof(CPUState, sdr1) }, |
| 2113 | { "sr0", offsetof(CPUState, sr[0]) }, |
| 2114 | { "sr1", offsetof(CPUState, sr[1]) }, |
| 2115 | { "sr2", offsetof(CPUState, sr[2]) }, |
| 2116 | { "sr3", offsetof(CPUState, sr[3]) }, |
| 2117 | { "sr4", offsetof(CPUState, sr[4]) }, |
| 2118 | { "sr5", offsetof(CPUState, sr[5]) }, |
| 2119 | { "sr6", offsetof(CPUState, sr[6]) }, |
| 2120 | { "sr7", offsetof(CPUState, sr[7]) }, |
| 2121 | { "sr8", offsetof(CPUState, sr[8]) }, |
| 2122 | { "sr9", offsetof(CPUState, sr[9]) }, |
| 2123 | { "sr10", offsetof(CPUState, sr[10]) }, |
| 2124 | { "sr11", offsetof(CPUState, sr[11]) }, |
| 2125 | { "sr12", offsetof(CPUState, sr[12]) }, |
| 2126 | { "sr13", offsetof(CPUState, sr[13]) }, |
| 2127 | { "sr14", offsetof(CPUState, sr[14]) }, |
| 2128 | { "sr15", offsetof(CPUState, sr[15]) }, |
| 2129 | /* Too lazy to put BATs and SPRs ... */ |
bellard | e95c8d5 | 2004-09-30 22:22:08 +0000 | [diff] [blame] | 2130 | #elif defined(TARGET_SPARC) |
| 2131 | { "g0", offsetof(CPUState, gregs[0]) }, |
| 2132 | { "g1", offsetof(CPUState, gregs[1]) }, |
| 2133 | { "g2", offsetof(CPUState, gregs[2]) }, |
| 2134 | { "g3", offsetof(CPUState, gregs[3]) }, |
| 2135 | { "g4", offsetof(CPUState, gregs[4]) }, |
| 2136 | { "g5", offsetof(CPUState, gregs[5]) }, |
| 2137 | { "g6", offsetof(CPUState, gregs[6]) }, |
| 2138 | { "g7", offsetof(CPUState, gregs[7]) }, |
| 2139 | { "o0", 0, monitor_get_reg }, |
| 2140 | { "o1", 1, monitor_get_reg }, |
| 2141 | { "o2", 2, monitor_get_reg }, |
| 2142 | { "o3", 3, monitor_get_reg }, |
| 2143 | { "o4", 4, monitor_get_reg }, |
| 2144 | { "o5", 5, monitor_get_reg }, |
| 2145 | { "o6", 6, monitor_get_reg }, |
| 2146 | { "o7", 7, monitor_get_reg }, |
| 2147 | { "l0", 8, monitor_get_reg }, |
| 2148 | { "l1", 9, monitor_get_reg }, |
| 2149 | { "l2", 10, monitor_get_reg }, |
| 2150 | { "l3", 11, monitor_get_reg }, |
| 2151 | { "l4", 12, monitor_get_reg }, |
| 2152 | { "l5", 13, monitor_get_reg }, |
| 2153 | { "l6", 14, monitor_get_reg }, |
| 2154 | { "l7", 15, monitor_get_reg }, |
| 2155 | { "i0", 16, monitor_get_reg }, |
| 2156 | { "i1", 17, monitor_get_reg }, |
| 2157 | { "i2", 18, monitor_get_reg }, |
| 2158 | { "i3", 19, monitor_get_reg }, |
| 2159 | { "i4", 20, monitor_get_reg }, |
| 2160 | { "i5", 21, monitor_get_reg }, |
| 2161 | { "i6", 22, monitor_get_reg }, |
| 2162 | { "i7", 23, monitor_get_reg }, |
| 2163 | { "pc", offsetof(CPUState, pc) }, |
| 2164 | { "npc", offsetof(CPUState, npc) }, |
| 2165 | { "y", offsetof(CPUState, y) }, |
bellard | 7b936c0 | 2005-10-30 17:05:13 +0000 | [diff] [blame] | 2166 | #ifndef TARGET_SPARC64 |
bellard | e95c8d5 | 2004-09-30 22:22:08 +0000 | [diff] [blame] | 2167 | { "psr", 0, &monitor_get_psr, }, |
| 2168 | { "wim", offsetof(CPUState, wim) }, |
bellard | 7b936c0 | 2005-10-30 17:05:13 +0000 | [diff] [blame] | 2169 | #endif |
bellard | e95c8d5 | 2004-09-30 22:22:08 +0000 | [diff] [blame] | 2170 | { "tbr", offsetof(CPUState, tbr) }, |
| 2171 | { "fsr", offsetof(CPUState, fsr) }, |
| 2172 | { "f0", offsetof(CPUState, fpr[0]) }, |
| 2173 | { "f1", offsetof(CPUState, fpr[1]) }, |
| 2174 | { "f2", offsetof(CPUState, fpr[2]) }, |
| 2175 | { "f3", offsetof(CPUState, fpr[3]) }, |
| 2176 | { "f4", offsetof(CPUState, fpr[4]) }, |
| 2177 | { "f5", offsetof(CPUState, fpr[5]) }, |
| 2178 | { "f6", offsetof(CPUState, fpr[6]) }, |
| 2179 | { "f7", offsetof(CPUState, fpr[7]) }, |
| 2180 | { "f8", offsetof(CPUState, fpr[8]) }, |
| 2181 | { "f9", offsetof(CPUState, fpr[9]) }, |
| 2182 | { "f10", offsetof(CPUState, fpr[10]) }, |
| 2183 | { "f11", offsetof(CPUState, fpr[11]) }, |
| 2184 | { "f12", offsetof(CPUState, fpr[12]) }, |
| 2185 | { "f13", offsetof(CPUState, fpr[13]) }, |
| 2186 | { "f14", offsetof(CPUState, fpr[14]) }, |
| 2187 | { "f15", offsetof(CPUState, fpr[15]) }, |
| 2188 | { "f16", offsetof(CPUState, fpr[16]) }, |
| 2189 | { "f17", offsetof(CPUState, fpr[17]) }, |
| 2190 | { "f18", offsetof(CPUState, fpr[18]) }, |
| 2191 | { "f19", offsetof(CPUState, fpr[19]) }, |
| 2192 | { "f20", offsetof(CPUState, fpr[20]) }, |
| 2193 | { "f21", offsetof(CPUState, fpr[21]) }, |
| 2194 | { "f22", offsetof(CPUState, fpr[22]) }, |
| 2195 | { "f23", offsetof(CPUState, fpr[23]) }, |
| 2196 | { "f24", offsetof(CPUState, fpr[24]) }, |
| 2197 | { "f25", offsetof(CPUState, fpr[25]) }, |
| 2198 | { "f26", offsetof(CPUState, fpr[26]) }, |
| 2199 | { "f27", offsetof(CPUState, fpr[27]) }, |
| 2200 | { "f28", offsetof(CPUState, fpr[28]) }, |
| 2201 | { "f29", offsetof(CPUState, fpr[29]) }, |
| 2202 | { "f30", offsetof(CPUState, fpr[30]) }, |
| 2203 | { "f31", offsetof(CPUState, fpr[31]) }, |
bellard | 7b936c0 | 2005-10-30 17:05:13 +0000 | [diff] [blame] | 2204 | #ifdef TARGET_SPARC64 |
| 2205 | { "f32", offsetof(CPUState, fpr[32]) }, |
| 2206 | { "f34", offsetof(CPUState, fpr[34]) }, |
| 2207 | { "f36", offsetof(CPUState, fpr[36]) }, |
| 2208 | { "f38", offsetof(CPUState, fpr[38]) }, |
| 2209 | { "f40", offsetof(CPUState, fpr[40]) }, |
| 2210 | { "f42", offsetof(CPUState, fpr[42]) }, |
| 2211 | { "f44", offsetof(CPUState, fpr[44]) }, |
| 2212 | { "f46", offsetof(CPUState, fpr[46]) }, |
| 2213 | { "f48", offsetof(CPUState, fpr[48]) }, |
| 2214 | { "f50", offsetof(CPUState, fpr[50]) }, |
| 2215 | { "f52", offsetof(CPUState, fpr[52]) }, |
| 2216 | { "f54", offsetof(CPUState, fpr[54]) }, |
| 2217 | { "f56", offsetof(CPUState, fpr[56]) }, |
| 2218 | { "f58", offsetof(CPUState, fpr[58]) }, |
| 2219 | { "f60", offsetof(CPUState, fpr[60]) }, |
| 2220 | { "f62", offsetof(CPUState, fpr[62]) }, |
| 2221 | { "asi", offsetof(CPUState, asi) }, |
| 2222 | { "pstate", offsetof(CPUState, pstate) }, |
| 2223 | { "cansave", offsetof(CPUState, cansave) }, |
| 2224 | { "canrestore", offsetof(CPUState, canrestore) }, |
| 2225 | { "otherwin", offsetof(CPUState, otherwin) }, |
| 2226 | { "wstate", offsetof(CPUState, wstate) }, |
| 2227 | { "cleanwin", offsetof(CPUState, cleanwin) }, |
| 2228 | { "fprs", offsetof(CPUState, fprs) }, |
| 2229 | #endif |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2230 | #endif |
| 2231 | { NULL }, |
| 2232 | }; |
| 2233 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 2234 | static void expr_error(Monitor *mon, const char *msg) |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 2235 | { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 2236 | monitor_printf(mon, "%s\n", msg); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2237 | longjmp(expr_env, 1); |
| 2238 | } |
| 2239 | |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 2240 | /* return 0 if OK, -1 if not found, -2 if no CPU defined */ |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 2241 | static int get_monitor_def(target_long *pval, const char *name) |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2242 | { |
blueswir1 | 8662d65 | 2008-10-02 18:32:44 +0000 | [diff] [blame] | 2243 | const MonitorDef *md; |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 2244 | void *ptr; |
| 2245 | |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2246 | for(md = monitor_defs; md->name != NULL; md++) { |
| 2247 | if (compare_cmd(name, md->name)) { |
| 2248 | if (md->get_value) { |
bellard | e95c8d5 | 2004-09-30 22:22:08 +0000 | [diff] [blame] | 2249 | *pval = md->get_value(md, md->offset); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2250 | } else { |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 2251 | CPUState *env = mon_get_cpu(); |
| 2252 | if (!env) |
| 2253 | return -2; |
| 2254 | ptr = (uint8_t *)env + md->offset; |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 2255 | switch(md->type) { |
| 2256 | case MD_I32: |
| 2257 | *pval = *(int32_t *)ptr; |
| 2258 | break; |
| 2259 | case MD_TLONG: |
| 2260 | *pval = *(target_long *)ptr; |
| 2261 | break; |
| 2262 | default: |
| 2263 | *pval = 0; |
| 2264 | break; |
| 2265 | } |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2266 | } |
| 2267 | return 0; |
| 2268 | } |
| 2269 | } |
| 2270 | return -1; |
| 2271 | } |
| 2272 | |
| 2273 | static void next(void) |
| 2274 | { |
Blue Swirl | 660f11b | 2009-07-31 21:16:51 +0000 | [diff] [blame] | 2275 | if (*pch != '\0') { |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2276 | pch++; |
blueswir1 | cd39008 | 2008-11-16 13:53:32 +0000 | [diff] [blame] | 2277 | while (qemu_isspace(*pch)) |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2278 | pch++; |
| 2279 | } |
| 2280 | } |
| 2281 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 2282 | static int64_t expr_sum(Monitor *mon); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2283 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 2284 | static int64_t expr_unary(Monitor *mon) |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2285 | { |
blueswir1 | c2efc95 | 2007-09-25 17:28:42 +0000 | [diff] [blame] | 2286 | int64_t n; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2287 | char *p; |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 2288 | int ret; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2289 | |
| 2290 | switch(*pch) { |
| 2291 | case '+': |
| 2292 | next(); |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 2293 | n = expr_unary(mon); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2294 | break; |
| 2295 | case '-': |
| 2296 | next(); |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 2297 | n = -expr_unary(mon); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2298 | break; |
| 2299 | case '~': |
| 2300 | next(); |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 2301 | n = ~expr_unary(mon); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2302 | break; |
| 2303 | case '(': |
| 2304 | next(); |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 2305 | n = expr_sum(mon); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2306 | if (*pch != ')') { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 2307 | expr_error(mon, "')' expected"); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2308 | } |
| 2309 | next(); |
| 2310 | break; |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 2311 | case '\'': |
| 2312 | pch++; |
| 2313 | if (*pch == '\0') |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 2314 | expr_error(mon, "character constant expected"); |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 2315 | n = *pch; |
| 2316 | pch++; |
| 2317 | if (*pch != '\'') |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 2318 | expr_error(mon, "missing terminating \' character"); |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 2319 | next(); |
| 2320 | break; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2321 | case '$': |
| 2322 | { |
| 2323 | char buf[128], *q; |
ths | 69b3497 | 2007-12-17 03:15:52 +0000 | [diff] [blame] | 2324 | target_long reg=0; |
ths | 3b46e62 | 2007-09-17 08:09:54 +0000 | [diff] [blame] | 2325 | |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2326 | pch++; |
| 2327 | q = buf; |
| 2328 | while ((*pch >= 'a' && *pch <= 'z') || |
| 2329 | (*pch >= 'A' && *pch <= 'Z') || |
| 2330 | (*pch >= '0' && *pch <= '9') || |
bellard | 57206fd | 2004-04-25 18:54:52 +0000 | [diff] [blame] | 2331 | *pch == '_' || *pch == '.') { |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2332 | if ((q - buf) < sizeof(buf) - 1) |
| 2333 | *q++ = *pch; |
| 2334 | pch++; |
| 2335 | } |
blueswir1 | cd39008 | 2008-11-16 13:53:32 +0000 | [diff] [blame] | 2336 | while (qemu_isspace(*pch)) |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2337 | pch++; |
| 2338 | *q = 0; |
blueswir1 | 7743e58 | 2007-09-24 18:39:04 +0000 | [diff] [blame] | 2339 | ret = get_monitor_def(®, buf); |
bellard | 6a00d60 | 2005-11-21 23:25:50 +0000 | [diff] [blame] | 2340 | if (ret == -1) |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 2341 | expr_error(mon, "unknown register"); |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 2342 | else if (ret == -2) |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 2343 | expr_error(mon, "no cpu defined"); |
blueswir1 | 7743e58 | 2007-09-24 18:39:04 +0000 | [diff] [blame] | 2344 | n = reg; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2345 | } |
| 2346 | break; |
| 2347 | case '\0': |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 2348 | expr_error(mon, "unexpected end of expression"); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2349 | n = 0; |
| 2350 | break; |
| 2351 | default: |
blueswir1 | 7743e58 | 2007-09-24 18:39:04 +0000 | [diff] [blame] | 2352 | #if TARGET_PHYS_ADDR_BITS > 32 |
bellard | 4f4fbf7 | 2006-06-25 18:28:12 +0000 | [diff] [blame] | 2353 | n = strtoull(pch, &p, 0); |
| 2354 | #else |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2355 | n = strtoul(pch, &p, 0); |
bellard | 4f4fbf7 | 2006-06-25 18:28:12 +0000 | [diff] [blame] | 2356 | #endif |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2357 | if (pch == p) { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 2358 | expr_error(mon, "invalid char in expression"); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2359 | } |
| 2360 | pch = p; |
blueswir1 | cd39008 | 2008-11-16 13:53:32 +0000 | [diff] [blame] | 2361 | while (qemu_isspace(*pch)) |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2362 | pch++; |
| 2363 | break; |
| 2364 | } |
| 2365 | return n; |
| 2366 | } |
| 2367 | |
| 2368 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 2369 | static int64_t expr_prod(Monitor *mon) |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2370 | { |
blueswir1 | c2efc95 | 2007-09-25 17:28:42 +0000 | [diff] [blame] | 2371 | int64_t val, val2; |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 2372 | int op; |
ths | 3b46e62 | 2007-09-17 08:09:54 +0000 | [diff] [blame] | 2373 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 2374 | val = expr_unary(mon); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2375 | for(;;) { |
| 2376 | op = *pch; |
| 2377 | if (op != '*' && op != '/' && op != '%') |
| 2378 | break; |
| 2379 | next(); |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 2380 | val2 = expr_unary(mon); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2381 | switch(op) { |
| 2382 | default: |
| 2383 | case '*': |
| 2384 | val *= val2; |
| 2385 | break; |
| 2386 | case '/': |
| 2387 | case '%': |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 2388 | if (val2 == 0) |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 2389 | expr_error(mon, "division by zero"); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2390 | if (op == '/') |
| 2391 | val /= val2; |
| 2392 | else |
| 2393 | val %= val2; |
| 2394 | break; |
| 2395 | } |
| 2396 | } |
| 2397 | return val; |
| 2398 | } |
| 2399 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 2400 | static int64_t expr_logic(Monitor *mon) |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2401 | { |
blueswir1 | c2efc95 | 2007-09-25 17:28:42 +0000 | [diff] [blame] | 2402 | int64_t val, val2; |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 2403 | int op; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2404 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 2405 | val = expr_prod(mon); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2406 | for(;;) { |
| 2407 | op = *pch; |
| 2408 | if (op != '&' && op != '|' && op != '^') |
| 2409 | break; |
| 2410 | next(); |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 2411 | val2 = expr_prod(mon); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2412 | switch(op) { |
| 2413 | default: |
| 2414 | case '&': |
| 2415 | val &= val2; |
| 2416 | break; |
| 2417 | case '|': |
| 2418 | val |= val2; |
| 2419 | break; |
| 2420 | case '^': |
| 2421 | val ^= val2; |
| 2422 | break; |
| 2423 | } |
| 2424 | } |
| 2425 | return val; |
| 2426 | } |
| 2427 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 2428 | static int64_t expr_sum(Monitor *mon) |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2429 | { |
blueswir1 | c2efc95 | 2007-09-25 17:28:42 +0000 | [diff] [blame] | 2430 | int64_t val, val2; |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 2431 | int op; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2432 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 2433 | val = expr_logic(mon); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2434 | for(;;) { |
| 2435 | op = *pch; |
| 2436 | if (op != '+' && op != '-') |
| 2437 | break; |
| 2438 | next(); |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 2439 | val2 = expr_logic(mon); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2440 | if (op == '+') |
| 2441 | val += val2; |
| 2442 | else |
| 2443 | val -= val2; |
| 2444 | } |
| 2445 | return val; |
| 2446 | } |
| 2447 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 2448 | static int get_expr(Monitor *mon, int64_t *pval, const char **pp) |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2449 | { |
| 2450 | pch = *pp; |
| 2451 | if (setjmp(expr_env)) { |
| 2452 | *pp = pch; |
| 2453 | return -1; |
| 2454 | } |
blueswir1 | cd39008 | 2008-11-16 13:53:32 +0000 | [diff] [blame] | 2455 | while (qemu_isspace(*pch)) |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2456 | pch++; |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 2457 | *pval = expr_sum(mon); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2458 | *pp = pch; |
| 2459 | return 0; |
| 2460 | } |
| 2461 | |
| 2462 | static int get_str(char *buf, int buf_size, const char **pp) |
| 2463 | { |
| 2464 | const char *p; |
| 2465 | char *q; |
| 2466 | int c; |
| 2467 | |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 2468 | q = buf; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2469 | p = *pp; |
blueswir1 | cd39008 | 2008-11-16 13:53:32 +0000 | [diff] [blame] | 2470 | while (qemu_isspace(*p)) |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2471 | p++; |
| 2472 | if (*p == '\0') { |
| 2473 | fail: |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 2474 | *q = '\0'; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2475 | *pp = p; |
| 2476 | return -1; |
| 2477 | } |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2478 | if (*p == '\"') { |
| 2479 | p++; |
| 2480 | while (*p != '\0' && *p != '\"') { |
| 2481 | if (*p == '\\') { |
| 2482 | p++; |
| 2483 | c = *p++; |
| 2484 | switch(c) { |
| 2485 | case 'n': |
| 2486 | c = '\n'; |
| 2487 | break; |
| 2488 | case 'r': |
| 2489 | c = '\r'; |
| 2490 | break; |
| 2491 | case '\\': |
| 2492 | case '\'': |
| 2493 | case '\"': |
| 2494 | break; |
| 2495 | default: |
| 2496 | qemu_printf("unsupported escape code: '\\%c'\n", c); |
| 2497 | goto fail; |
| 2498 | } |
| 2499 | if ((q - buf) < buf_size - 1) { |
| 2500 | *q++ = c; |
| 2501 | } |
| 2502 | } else { |
| 2503 | if ((q - buf) < buf_size - 1) { |
| 2504 | *q++ = *p; |
| 2505 | } |
| 2506 | p++; |
| 2507 | } |
| 2508 | } |
| 2509 | if (*p != '\"') { |
bellard | 5b60212 | 2004-05-22 21:41:05 +0000 | [diff] [blame] | 2510 | qemu_printf("unterminated string\n"); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2511 | goto fail; |
| 2512 | } |
| 2513 | p++; |
| 2514 | } else { |
blueswir1 | cd39008 | 2008-11-16 13:53:32 +0000 | [diff] [blame] | 2515 | while (*p != '\0' && !qemu_isspace(*p)) { |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2516 | if ((q - buf) < buf_size - 1) { |
| 2517 | *q++ = *p; |
| 2518 | } |
| 2519 | p++; |
| 2520 | } |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2521 | } |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 2522 | *q = '\0'; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2523 | *pp = p; |
| 2524 | return 0; |
| 2525 | } |
| 2526 | |
Luiz Capitulino | 4590fd8 | 2009-06-09 18:21:30 -0300 | [diff] [blame] | 2527 | /* |
| 2528 | * Store the command-name in cmdname, and return a pointer to |
| 2529 | * the remaining of the command string. |
| 2530 | */ |
| 2531 | static const char *get_command_name(const char *cmdline, |
| 2532 | char *cmdname, size_t nlen) |
| 2533 | { |
| 2534 | size_t len; |
| 2535 | const char *p, *pstart; |
| 2536 | |
| 2537 | p = cmdline; |
| 2538 | while (qemu_isspace(*p)) |
| 2539 | p++; |
| 2540 | if (*p == '\0') |
| 2541 | return NULL; |
| 2542 | pstart = p; |
| 2543 | while (*p != '\0' && *p != '/' && !qemu_isspace(*p)) |
| 2544 | p++; |
| 2545 | len = p - pstart; |
| 2546 | if (len > nlen - 1) |
| 2547 | len = nlen - 1; |
| 2548 | memcpy(cmdname, pstart, len); |
| 2549 | cmdname[len] = '\0'; |
| 2550 | return p; |
| 2551 | } |
| 2552 | |
Luiz Capitulino | 4d76d2b | 2009-08-28 15:27:09 -0300 | [diff] [blame] | 2553 | /** |
| 2554 | * Read key of 'type' into 'key' and return the current |
| 2555 | * 'type' pointer. |
| 2556 | */ |
| 2557 | static char *key_get_info(const char *type, char **key) |
| 2558 | { |
| 2559 | size_t len; |
| 2560 | char *p, *str; |
| 2561 | |
| 2562 | if (*type == ',') |
| 2563 | type++; |
| 2564 | |
| 2565 | p = strchr(type, ':'); |
| 2566 | if (!p) { |
| 2567 | *key = NULL; |
| 2568 | return NULL; |
| 2569 | } |
| 2570 | len = p - type; |
| 2571 | |
| 2572 | str = qemu_malloc(len + 1); |
| 2573 | memcpy(str, type, len); |
| 2574 | str[len] = '\0'; |
| 2575 | |
| 2576 | *key = str; |
| 2577 | return ++p; |
| 2578 | } |
| 2579 | |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2580 | static int default_fmt_format = 'x'; |
| 2581 | static int default_fmt_size = 4; |
| 2582 | |
| 2583 | #define MAX_ARGS 16 |
| 2584 | |
Luiz Capitulino | 55f81d9 | 2009-08-28 15:27:22 -0300 | [diff] [blame] | 2585 | static const mon_cmd_t *monitor_parse_command(Monitor *mon, |
| 2586 | const char *cmdline, |
Luiz Capitulino | 55f81d9 | 2009-08-28 15:27:22 -0300 | [diff] [blame] | 2587 | QDict *qdict) |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2588 | { |
Luiz Capitulino | 4590fd8 | 2009-06-09 18:21:30 -0300 | [diff] [blame] | 2589 | const char *p, *typestr; |
Luiz Capitulino | 5377358 | 2009-08-28 15:27:25 -0300 | [diff] [blame] | 2590 | int c; |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 2591 | const mon_cmd_t *cmd; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2592 | char cmdname[256]; |
| 2593 | char buf[1024]; |
Luiz Capitulino | 4d76d2b | 2009-08-28 15:27:09 -0300 | [diff] [blame] | 2594 | char *key; |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 2595 | |
| 2596 | #ifdef DEBUG |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 2597 | monitor_printf(mon, "command='%s'\n", cmdline); |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 2598 | #endif |
ths | 3b46e62 | 2007-09-17 08:09:54 +0000 | [diff] [blame] | 2599 | |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2600 | /* extract the command name */ |
Luiz Capitulino | 4590fd8 | 2009-06-09 18:21:30 -0300 | [diff] [blame] | 2601 | p = get_command_name(cmdline, cmdname, sizeof(cmdname)); |
| 2602 | if (!p) |
Luiz Capitulino | 55f81d9 | 2009-08-28 15:27:22 -0300 | [diff] [blame] | 2603 | return NULL; |
ths | 3b46e62 | 2007-09-17 08:09:54 +0000 | [diff] [blame] | 2604 | |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2605 | /* find the command */ |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 2606 | for(cmd = mon_cmds; cmd->name != NULL; cmd++) { |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 2607 | if (compare_cmd(cmdname, cmd->name)) |
Luiz Capitulino | d91d9bf | 2009-06-09 18:21:54 -0300 | [diff] [blame] | 2608 | break; |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 2609 | } |
Luiz Capitulino | d91d9bf | 2009-06-09 18:21:54 -0300 | [diff] [blame] | 2610 | |
| 2611 | if (cmd->name == NULL) { |
| 2612 | monitor_printf(mon, "unknown command: '%s'\n", cmdname); |
Luiz Capitulino | 55f81d9 | 2009-08-28 15:27:22 -0300 | [diff] [blame] | 2613 | return NULL; |
Luiz Capitulino | d91d9bf | 2009-06-09 18:21:54 -0300 | [diff] [blame] | 2614 | } |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2615 | |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2616 | /* parse the parameters */ |
| 2617 | typestr = cmd->args_type; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2618 | for(;;) { |
Luiz Capitulino | 4d76d2b | 2009-08-28 15:27:09 -0300 | [diff] [blame] | 2619 | typestr = key_get_info(typestr, &key); |
| 2620 | if (!typestr) |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2621 | break; |
Luiz Capitulino | 4d76d2b | 2009-08-28 15:27:09 -0300 | [diff] [blame] | 2622 | c = *typestr; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2623 | typestr++; |
| 2624 | switch(c) { |
| 2625 | case 'F': |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 2626 | case 'B': |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2627 | case 's': |
| 2628 | { |
| 2629 | int ret; |
ths | 3b46e62 | 2007-09-17 08:09:54 +0000 | [diff] [blame] | 2630 | |
blueswir1 | cd39008 | 2008-11-16 13:53:32 +0000 | [diff] [blame] | 2631 | while (qemu_isspace(*p)) |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2632 | p++; |
| 2633 | if (*typestr == '?') { |
| 2634 | typestr++; |
| 2635 | if (*p == '\0') { |
| 2636 | /* no optional string: NULL argument */ |
Luiz Capitulino | 5377358 | 2009-08-28 15:27:25 -0300 | [diff] [blame] | 2637 | break; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2638 | } |
| 2639 | } |
| 2640 | ret = get_str(buf, sizeof(buf), &p); |
| 2641 | if (ret < 0) { |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 2642 | switch(c) { |
| 2643 | case 'F': |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 2644 | monitor_printf(mon, "%s: filename expected\n", |
| 2645 | cmdname); |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 2646 | break; |
| 2647 | case 'B': |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 2648 | monitor_printf(mon, "%s: block device name expected\n", |
| 2649 | cmdname); |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 2650 | break; |
| 2651 | default: |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 2652 | monitor_printf(mon, "%s: string expected\n", cmdname); |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 2653 | break; |
| 2654 | } |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2655 | goto fail; |
| 2656 | } |
Luiz Capitulino | 5377358 | 2009-08-28 15:27:25 -0300 | [diff] [blame] | 2657 | qdict_put(qdict, key, qstring_from_str(buf)); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2658 | } |
| 2659 | break; |
| 2660 | case '/': |
| 2661 | { |
| 2662 | int count, format, size; |
ths | 3b46e62 | 2007-09-17 08:09:54 +0000 | [diff] [blame] | 2663 | |
blueswir1 | cd39008 | 2008-11-16 13:53:32 +0000 | [diff] [blame] | 2664 | while (qemu_isspace(*p)) |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2665 | p++; |
| 2666 | if (*p == '/') { |
| 2667 | /* format found */ |
| 2668 | p++; |
| 2669 | count = 1; |
blueswir1 | cd39008 | 2008-11-16 13:53:32 +0000 | [diff] [blame] | 2670 | if (qemu_isdigit(*p)) { |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2671 | count = 0; |
blueswir1 | cd39008 | 2008-11-16 13:53:32 +0000 | [diff] [blame] | 2672 | while (qemu_isdigit(*p)) { |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2673 | count = count * 10 + (*p - '0'); |
| 2674 | p++; |
| 2675 | } |
| 2676 | } |
| 2677 | size = -1; |
| 2678 | format = -1; |
| 2679 | for(;;) { |
| 2680 | switch(*p) { |
| 2681 | case 'o': |
| 2682 | case 'd': |
| 2683 | case 'u': |
| 2684 | case 'x': |
| 2685 | case 'i': |
| 2686 | case 'c': |
| 2687 | format = *p++; |
| 2688 | break; |
| 2689 | case 'b': |
| 2690 | size = 1; |
| 2691 | p++; |
| 2692 | break; |
| 2693 | case 'h': |
| 2694 | size = 2; |
| 2695 | p++; |
| 2696 | break; |
| 2697 | case 'w': |
| 2698 | size = 4; |
| 2699 | p++; |
| 2700 | break; |
| 2701 | case 'g': |
| 2702 | case 'L': |
| 2703 | size = 8; |
| 2704 | p++; |
| 2705 | break; |
| 2706 | default: |
| 2707 | goto next; |
| 2708 | } |
| 2709 | } |
| 2710 | next: |
blueswir1 | cd39008 | 2008-11-16 13:53:32 +0000 | [diff] [blame] | 2711 | if (*p != '\0' && !qemu_isspace(*p)) { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 2712 | monitor_printf(mon, "invalid char in format: '%c'\n", |
| 2713 | *p); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2714 | goto fail; |
| 2715 | } |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2716 | if (format < 0) |
| 2717 | format = default_fmt_format; |
bellard | 4c27ba2 | 2004-04-25 18:05:08 +0000 | [diff] [blame] | 2718 | if (format != 'i') { |
| 2719 | /* for 'i', not specifying a size gives -1 as size */ |
| 2720 | if (size < 0) |
| 2721 | size = default_fmt_size; |
aurel32 | e90f009 | 2008-10-01 21:45:51 +0000 | [diff] [blame] | 2722 | default_fmt_size = size; |
bellard | 4c27ba2 | 2004-04-25 18:05:08 +0000 | [diff] [blame] | 2723 | } |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2724 | default_fmt_format = format; |
| 2725 | } else { |
| 2726 | count = 1; |
| 2727 | format = default_fmt_format; |
bellard | 4c27ba2 | 2004-04-25 18:05:08 +0000 | [diff] [blame] | 2728 | if (format != 'i') { |
| 2729 | size = default_fmt_size; |
| 2730 | } else { |
| 2731 | size = -1; |
| 2732 | } |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2733 | } |
Luiz Capitulino | f7188bb | 2009-08-28 15:27:10 -0300 | [diff] [blame] | 2734 | qdict_put(qdict, "count", qint_from_int(count)); |
| 2735 | qdict_put(qdict, "format", qint_from_int(format)); |
| 2736 | qdict_put(qdict, "size", qint_from_int(size)); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2737 | } |
| 2738 | break; |
| 2739 | case 'i': |
bellard | 92a31b1 | 2005-02-10 22:00:52 +0000 | [diff] [blame] | 2740 | case 'l': |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2741 | { |
blueswir1 | c2efc95 | 2007-09-25 17:28:42 +0000 | [diff] [blame] | 2742 | int64_t val; |
blueswir1 | 7743e58 | 2007-09-24 18:39:04 +0000 | [diff] [blame] | 2743 | |
blueswir1 | cd39008 | 2008-11-16 13:53:32 +0000 | [diff] [blame] | 2744 | while (qemu_isspace(*p)) |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2745 | p++; |
bellard | 3440557 | 2004-06-08 00:55:58 +0000 | [diff] [blame] | 2746 | if (*typestr == '?' || *typestr == '.') { |
bellard | 3440557 | 2004-06-08 00:55:58 +0000 | [diff] [blame] | 2747 | if (*typestr == '?') { |
Luiz Capitulino | 5377358 | 2009-08-28 15:27:25 -0300 | [diff] [blame] | 2748 | if (*p == '\0') { |
| 2749 | typestr++; |
| 2750 | break; |
| 2751 | } |
bellard | 3440557 | 2004-06-08 00:55:58 +0000 | [diff] [blame] | 2752 | } else { |
| 2753 | if (*p == '.') { |
| 2754 | p++; |
blueswir1 | cd39008 | 2008-11-16 13:53:32 +0000 | [diff] [blame] | 2755 | while (qemu_isspace(*p)) |
bellard | 3440557 | 2004-06-08 00:55:58 +0000 | [diff] [blame] | 2756 | p++; |
bellard | 3440557 | 2004-06-08 00:55:58 +0000 | [diff] [blame] | 2757 | } else { |
Luiz Capitulino | 5377358 | 2009-08-28 15:27:25 -0300 | [diff] [blame] | 2758 | typestr++; |
| 2759 | break; |
bellard | 3440557 | 2004-06-08 00:55:58 +0000 | [diff] [blame] | 2760 | } |
| 2761 | } |
bellard | 13224a8 | 2006-07-14 22:03:35 +0000 | [diff] [blame] | 2762 | typestr++; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2763 | } |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 2764 | if (get_expr(mon, &val, &p)) |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2765 | goto fail; |
Luiz Capitulino | 675ebef | 2009-08-28 15:27:26 -0300 | [diff] [blame] | 2766 | /* Check if 'i' is greater than 32-bit */ |
| 2767 | if ((c == 'i') && ((val >> 32) & 0xffffffff)) { |
| 2768 | monitor_printf(mon, "\'%s\' has failed: ", cmdname); |
| 2769 | monitor_printf(mon, "integer is for 32-bit values\n"); |
| 2770 | goto fail; |
| 2771 | } |
Luiz Capitulino | 5377358 | 2009-08-28 15:27:25 -0300 | [diff] [blame] | 2772 | qdict_put(qdict, key, qint_from_int(val)); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2773 | } |
| 2774 | break; |
| 2775 | case '-': |
| 2776 | { |
| 2777 | int has_option; |
| 2778 | /* option */ |
ths | 3b46e62 | 2007-09-17 08:09:54 +0000 | [diff] [blame] | 2779 | |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2780 | c = *typestr++; |
| 2781 | if (c == '\0') |
| 2782 | goto bad_type; |
blueswir1 | cd39008 | 2008-11-16 13:53:32 +0000 | [diff] [blame] | 2783 | while (qemu_isspace(*p)) |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2784 | p++; |
| 2785 | has_option = 0; |
| 2786 | if (*p == '-') { |
| 2787 | p++; |
| 2788 | if (*p != c) { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 2789 | monitor_printf(mon, "%s: unsupported option -%c\n", |
| 2790 | cmdname, *p); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2791 | goto fail; |
| 2792 | } |
| 2793 | p++; |
| 2794 | has_option = 1; |
| 2795 | } |
Luiz Capitulino | f7188bb | 2009-08-28 15:27:10 -0300 | [diff] [blame] | 2796 | qdict_put(qdict, key, qint_from_int(has_option)); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2797 | } |
| 2798 | break; |
| 2799 | default: |
| 2800 | bad_type: |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 2801 | monitor_printf(mon, "%s: unknown type '%c'\n", cmdname, c); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2802 | goto fail; |
| 2803 | } |
Luiz Capitulino | 4d76d2b | 2009-08-28 15:27:09 -0300 | [diff] [blame] | 2804 | qemu_free(key); |
| 2805 | key = NULL; |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2806 | } |
| 2807 | /* check that all arguments were parsed */ |
blueswir1 | cd39008 | 2008-11-16 13:53:32 +0000 | [diff] [blame] | 2808 | while (qemu_isspace(*p)) |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2809 | p++; |
| 2810 | if (*p != '\0') { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 2811 | monitor_printf(mon, "%s: extraneous characters at the end of line\n", |
| 2812 | cmdname); |
bellard | 9307c4c | 2004-04-04 12:57:25 +0000 | [diff] [blame] | 2813 | goto fail; |
| 2814 | } |
| 2815 | |
Luiz Capitulino | 55f81d9 | 2009-08-28 15:27:22 -0300 | [diff] [blame] | 2816 | return cmd; |
Gerd Hoffmann | ac7531e | 2009-08-14 10:36:06 +0200 | [diff] [blame] | 2817 | |
Luiz Capitulino | 55f81d9 | 2009-08-28 15:27:22 -0300 | [diff] [blame] | 2818 | fail: |
Luiz Capitulino | 4d76d2b | 2009-08-28 15:27:09 -0300 | [diff] [blame] | 2819 | qemu_free(key); |
Luiz Capitulino | 55f81d9 | 2009-08-28 15:27:22 -0300 | [diff] [blame] | 2820 | return NULL; |
| 2821 | } |
| 2822 | |
| 2823 | static void monitor_handle_command(Monitor *mon, const char *cmdline) |
| 2824 | { |
Luiz Capitulino | 55f81d9 | 2009-08-28 15:27:22 -0300 | [diff] [blame] | 2825 | QDict *qdict; |
| 2826 | const mon_cmd_t *cmd; |
Luiz Capitulino | 55f81d9 | 2009-08-28 15:27:22 -0300 | [diff] [blame] | 2827 | |
| 2828 | qdict = qdict_new(); |
| 2829 | |
Luiz Capitulino | 590fb3b | 2009-08-28 15:27:24 -0300 | [diff] [blame] | 2830 | cmd = monitor_parse_command(mon, cmdline, qdict); |
Luiz Capitulino | 55f81d9 | 2009-08-28 15:27:22 -0300 | [diff] [blame] | 2831 | if (cmd) { |
| 2832 | void (*handler)(Monitor *mon, const QDict *qdict); |
| 2833 | |
| 2834 | qemu_errors_to_mon(mon); |
| 2835 | |
| 2836 | handler = cmd->handler; |
| 2837 | handler(mon, qdict); |
| 2838 | |
| 2839 | qemu_errors_to_previous(); |
| 2840 | } |
| 2841 | |
Luiz Capitulino | f7188bb | 2009-08-28 15:27:10 -0300 | [diff] [blame] | 2842 | QDECREF(qdict); |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 2843 | } |
| 2844 | |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 2845 | static void cmd_completion(const char *name, const char *list) |
| 2846 | { |
| 2847 | const char *p, *pstart; |
| 2848 | char cmd[128]; |
| 2849 | int len; |
| 2850 | |
| 2851 | p = list; |
| 2852 | for(;;) { |
| 2853 | pstart = p; |
| 2854 | p = strchr(p, '|'); |
| 2855 | if (!p) |
| 2856 | p = pstart + strlen(pstart); |
| 2857 | len = p - pstart; |
| 2858 | if (len > sizeof(cmd) - 2) |
| 2859 | len = sizeof(cmd) - 2; |
| 2860 | memcpy(cmd, pstart, len); |
| 2861 | cmd[len] = '\0'; |
| 2862 | if (name[0] == '\0' || !strncmp(name, cmd, strlen(name))) { |
aliguori | 731b036 | 2009-03-05 23:01:42 +0000 | [diff] [blame] | 2863 | readline_add_completion(cur_mon->rs, cmd); |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 2864 | } |
| 2865 | if (*p == '\0') |
| 2866 | break; |
| 2867 | p++; |
| 2868 | } |
| 2869 | } |
| 2870 | |
| 2871 | static void file_completion(const char *input) |
| 2872 | { |
| 2873 | DIR *ffs; |
| 2874 | struct dirent *d; |
| 2875 | char path[1024]; |
| 2876 | char file[1024], file_prefix[1024]; |
| 2877 | int input_path_len; |
| 2878 | const char *p; |
| 2879 | |
ths | 5fafdf2 | 2007-09-16 21:08:06 +0000 | [diff] [blame] | 2880 | p = strrchr(input, '/'); |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 2881 | if (!p) { |
| 2882 | input_path_len = 0; |
| 2883 | pstrcpy(file_prefix, sizeof(file_prefix), input); |
blueswir1 | 363a37d | 2008-08-21 17:58:08 +0000 | [diff] [blame] | 2884 | pstrcpy(path, sizeof(path), "."); |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 2885 | } else { |
| 2886 | input_path_len = p - input + 1; |
| 2887 | memcpy(path, input, input_path_len); |
| 2888 | if (input_path_len > sizeof(path) - 1) |
| 2889 | input_path_len = sizeof(path) - 1; |
| 2890 | path[input_path_len] = '\0'; |
| 2891 | pstrcpy(file_prefix, sizeof(file_prefix), p + 1); |
| 2892 | } |
| 2893 | #ifdef DEBUG_COMPLETION |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 2894 | monitor_printf(cur_mon, "input='%s' path='%s' prefix='%s'\n", |
| 2895 | input, path, file_prefix); |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 2896 | #endif |
| 2897 | ffs = opendir(path); |
| 2898 | if (!ffs) |
| 2899 | return; |
| 2900 | for(;;) { |
| 2901 | struct stat sb; |
| 2902 | d = readdir(ffs); |
| 2903 | if (!d) |
| 2904 | break; |
| 2905 | if (strstart(d->d_name, file_prefix, NULL)) { |
| 2906 | memcpy(file, input, input_path_len); |
blueswir1 | 363a37d | 2008-08-21 17:58:08 +0000 | [diff] [blame] | 2907 | if (input_path_len < sizeof(file)) |
| 2908 | pstrcpy(file + input_path_len, sizeof(file) - input_path_len, |
| 2909 | d->d_name); |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 2910 | /* stat the file to find out if it's a directory. |
| 2911 | * In that case add a slash to speed up typing long paths |
| 2912 | */ |
| 2913 | stat(file, &sb); |
| 2914 | if(S_ISDIR(sb.st_mode)) |
blueswir1 | 363a37d | 2008-08-21 17:58:08 +0000 | [diff] [blame] | 2915 | pstrcat(file, sizeof(file), "/"); |
aliguori | 731b036 | 2009-03-05 23:01:42 +0000 | [diff] [blame] | 2916 | readline_add_completion(cur_mon->rs, file); |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 2917 | } |
| 2918 | } |
| 2919 | closedir(ffs); |
| 2920 | } |
| 2921 | |
aliguori | 51de976 | 2009-03-05 23:00:43 +0000 | [diff] [blame] | 2922 | static void block_completion_it(void *opaque, BlockDriverState *bs) |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 2923 | { |
aliguori | 51de976 | 2009-03-05 23:00:43 +0000 | [diff] [blame] | 2924 | const char *name = bdrv_get_device_name(bs); |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 2925 | const char *input = opaque; |
| 2926 | |
| 2927 | if (input[0] == '\0' || |
| 2928 | !strncmp(name, (char *)input, strlen(input))) { |
aliguori | 731b036 | 2009-03-05 23:01:42 +0000 | [diff] [blame] | 2929 | readline_add_completion(cur_mon->rs, name); |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 2930 | } |
| 2931 | } |
| 2932 | |
| 2933 | /* NOTE: this parser is an approximate form of the real command parser */ |
| 2934 | static void parse_cmdline(const char *cmdline, |
| 2935 | int *pnb_args, char **args) |
| 2936 | { |
| 2937 | const char *p; |
| 2938 | int nb_args, ret; |
| 2939 | char buf[1024]; |
| 2940 | |
| 2941 | p = cmdline; |
| 2942 | nb_args = 0; |
| 2943 | for(;;) { |
blueswir1 | cd39008 | 2008-11-16 13:53:32 +0000 | [diff] [blame] | 2944 | while (qemu_isspace(*p)) |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 2945 | p++; |
| 2946 | if (*p == '\0') |
| 2947 | break; |
| 2948 | if (nb_args >= MAX_ARGS) |
| 2949 | break; |
| 2950 | ret = get_str(buf, sizeof(buf), &p); |
| 2951 | args[nb_args] = qemu_strdup(buf); |
| 2952 | nb_args++; |
| 2953 | if (ret < 0) |
| 2954 | break; |
| 2955 | } |
| 2956 | *pnb_args = nb_args; |
| 2957 | } |
| 2958 | |
Luiz Capitulino | 4d76d2b | 2009-08-28 15:27:09 -0300 | [diff] [blame] | 2959 | static const char *next_arg_type(const char *typestr) |
| 2960 | { |
| 2961 | const char *p = strchr(typestr, ':'); |
| 2962 | return (p != NULL ? ++p : typestr); |
| 2963 | } |
| 2964 | |
aliguori | 4c36ba3 | 2009-03-05 23:01:37 +0000 | [diff] [blame] | 2965 | static void monitor_find_completion(const char *cmdline) |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 2966 | { |
| 2967 | const char *cmdname; |
| 2968 | char *args[MAX_ARGS]; |
| 2969 | int nb_args, i, len; |
| 2970 | const char *ptype, *str; |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 2971 | const mon_cmd_t *cmd; |
bellard | 64866c3 | 2006-05-07 18:03:31 +0000 | [diff] [blame] | 2972 | const KeyDef *key; |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 2973 | |
| 2974 | parse_cmdline(cmdline, &nb_args, args); |
| 2975 | #ifdef DEBUG_COMPLETION |
| 2976 | for(i = 0; i < nb_args; i++) { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 2977 | monitor_printf(cur_mon, "arg%d = '%s'\n", i, (char *)args[i]); |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 2978 | } |
| 2979 | #endif |
| 2980 | |
| 2981 | /* if the line ends with a space, it means we want to complete the |
| 2982 | next arg */ |
| 2983 | len = strlen(cmdline); |
blueswir1 | cd39008 | 2008-11-16 13:53:32 +0000 | [diff] [blame] | 2984 | if (len > 0 && qemu_isspace(cmdline[len - 1])) { |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 2985 | if (nb_args >= MAX_ARGS) |
| 2986 | return; |
| 2987 | args[nb_args++] = qemu_strdup(""); |
| 2988 | } |
| 2989 | if (nb_args <= 1) { |
| 2990 | /* command completion */ |
| 2991 | if (nb_args == 0) |
| 2992 | cmdname = ""; |
| 2993 | else |
| 2994 | cmdname = args[0]; |
aliguori | 731b036 | 2009-03-05 23:01:42 +0000 | [diff] [blame] | 2995 | readline_set_completion_index(cur_mon->rs, strlen(cmdname)); |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 2996 | for(cmd = mon_cmds; cmd->name != NULL; cmd++) { |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 2997 | cmd_completion(cmdname, cmd->name); |
| 2998 | } |
| 2999 | } else { |
| 3000 | /* find the command */ |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 3001 | for(cmd = mon_cmds; cmd->name != NULL; cmd++) { |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 3002 | if (compare_cmd(args[0], cmd->name)) |
| 3003 | goto found; |
| 3004 | } |
| 3005 | return; |
| 3006 | found: |
Luiz Capitulino | 4d76d2b | 2009-08-28 15:27:09 -0300 | [diff] [blame] | 3007 | ptype = next_arg_type(cmd->args_type); |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 3008 | for(i = 0; i < nb_args - 2; i++) { |
| 3009 | if (*ptype != '\0') { |
Luiz Capitulino | 4d76d2b | 2009-08-28 15:27:09 -0300 | [diff] [blame] | 3010 | ptype = next_arg_type(ptype); |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 3011 | while (*ptype == '?') |
Luiz Capitulino | 4d76d2b | 2009-08-28 15:27:09 -0300 | [diff] [blame] | 3012 | ptype = next_arg_type(ptype); |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 3013 | } |
| 3014 | } |
| 3015 | str = args[nb_args - 1]; |
Blue Swirl | 2a1704a | 2009-08-23 20:10:28 +0000 | [diff] [blame] | 3016 | if (*ptype == '-' && ptype[1] != '\0') { |
| 3017 | ptype += 2; |
| 3018 | } |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 3019 | switch(*ptype) { |
| 3020 | case 'F': |
| 3021 | /* file completion */ |
aliguori | 731b036 | 2009-03-05 23:01:42 +0000 | [diff] [blame] | 3022 | readline_set_completion_index(cur_mon->rs, strlen(str)); |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 3023 | file_completion(str); |
| 3024 | break; |
| 3025 | case 'B': |
| 3026 | /* block device name completion */ |
aliguori | 731b036 | 2009-03-05 23:01:42 +0000 | [diff] [blame] | 3027 | readline_set_completion_index(cur_mon->rs, strlen(str)); |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 3028 | bdrv_iterate(block_completion_it, (void *)str); |
| 3029 | break; |
bellard | 7fe4848 | 2004-10-09 18:08:01 +0000 | [diff] [blame] | 3030 | case 's': |
| 3031 | /* XXX: more generic ? */ |
| 3032 | if (!strcmp(cmd->name, "info")) { |
aliguori | 731b036 | 2009-03-05 23:01:42 +0000 | [diff] [blame] | 3033 | readline_set_completion_index(cur_mon->rs, strlen(str)); |
bellard | 7fe4848 | 2004-10-09 18:08:01 +0000 | [diff] [blame] | 3034 | for(cmd = info_cmds; cmd->name != NULL; cmd++) { |
| 3035 | cmd_completion(str, cmd->name); |
| 3036 | } |
bellard | 64866c3 | 2006-05-07 18:03:31 +0000 | [diff] [blame] | 3037 | } else if (!strcmp(cmd->name, "sendkey")) { |
blueswir1 | e600d1e | 2009-03-08 17:42:02 +0000 | [diff] [blame] | 3038 | char *sep = strrchr(str, '-'); |
| 3039 | if (sep) |
| 3040 | str = sep + 1; |
aliguori | 731b036 | 2009-03-05 23:01:42 +0000 | [diff] [blame] | 3041 | readline_set_completion_index(cur_mon->rs, strlen(str)); |
bellard | 64866c3 | 2006-05-07 18:03:31 +0000 | [diff] [blame] | 3042 | for(key = key_defs; key->name != NULL; key++) { |
| 3043 | cmd_completion(str, key->name); |
| 3044 | } |
Jan Kiszka | f3353c6 | 2009-06-25 08:22:02 +0200 | [diff] [blame] | 3045 | } else if (!strcmp(cmd->name, "help|?")) { |
| 3046 | readline_set_completion_index(cur_mon->rs, strlen(str)); |
| 3047 | for (cmd = mon_cmds; cmd->name != NULL; cmd++) { |
| 3048 | cmd_completion(str, cmd->name); |
| 3049 | } |
bellard | 7fe4848 | 2004-10-09 18:08:01 +0000 | [diff] [blame] | 3050 | } |
| 3051 | break; |
bellard | 81d0912 | 2004-07-14 17:21:37 +0000 | [diff] [blame] | 3052 | default: |
| 3053 | break; |
| 3054 | } |
| 3055 | } |
| 3056 | for(i = 0; i < nb_args; i++) |
| 3057 | qemu_free(args[i]); |
| 3058 | } |
| 3059 | |
aliguori | 731b036 | 2009-03-05 23:01:42 +0000 | [diff] [blame] | 3060 | static int monitor_can_read(void *opaque) |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 3061 | { |
aliguori | 731b036 | 2009-03-05 23:01:42 +0000 | [diff] [blame] | 3062 | Monitor *mon = opaque; |
| 3063 | |
| 3064 | return (mon->suspend_cnt == 0) ? 128 : 0; |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 3065 | } |
| 3066 | |
aliguori | 731b036 | 2009-03-05 23:01:42 +0000 | [diff] [blame] | 3067 | static void monitor_read(void *opaque, const uint8_t *buf, int size) |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 3068 | { |
aliguori | 731b036 | 2009-03-05 23:01:42 +0000 | [diff] [blame] | 3069 | Monitor *old_mon = cur_mon; |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 3070 | int i; |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 3071 | |
aliguori | 731b036 | 2009-03-05 23:01:42 +0000 | [diff] [blame] | 3072 | cur_mon = opaque; |
bellard | 7e2515e | 2004-08-01 21:52:19 +0000 | [diff] [blame] | 3073 | |
aliguori | cde76ee | 2009-03-05 23:01:51 +0000 | [diff] [blame] | 3074 | if (cur_mon->rs) { |
| 3075 | for (i = 0; i < size; i++) |
| 3076 | readline_handle_byte(cur_mon->rs, buf[i]); |
| 3077 | } else { |
| 3078 | if (size == 0 || buf[size - 1] != 0) |
| 3079 | monitor_printf(cur_mon, "corrupted command\n"); |
| 3080 | else |
| 3081 | monitor_handle_command(cur_mon, (char *)buf); |
| 3082 | } |
aliguori | 731b036 | 2009-03-05 23:01:42 +0000 | [diff] [blame] | 3083 | |
| 3084 | cur_mon = old_mon; |
| 3085 | } |
aliguori | d8f4460 | 2008-10-06 13:52:44 +0000 | [diff] [blame] | 3086 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 3087 | static void monitor_command_cb(Monitor *mon, const char *cmdline, void *opaque) |
bellard | 7e2515e | 2004-08-01 21:52:19 +0000 | [diff] [blame] | 3088 | { |
aliguori | 731b036 | 2009-03-05 23:01:42 +0000 | [diff] [blame] | 3089 | monitor_suspend(mon); |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 3090 | monitor_handle_command(mon, cmdline); |
aliguori | 731b036 | 2009-03-05 23:01:42 +0000 | [diff] [blame] | 3091 | monitor_resume(mon); |
aliguori | d8f4460 | 2008-10-06 13:52:44 +0000 | [diff] [blame] | 3092 | } |
| 3093 | |
aliguori | cde76ee | 2009-03-05 23:01:51 +0000 | [diff] [blame] | 3094 | int monitor_suspend(Monitor *mon) |
aliguori | d8f4460 | 2008-10-06 13:52:44 +0000 | [diff] [blame] | 3095 | { |
aliguori | cde76ee | 2009-03-05 23:01:51 +0000 | [diff] [blame] | 3096 | if (!mon->rs) |
| 3097 | return -ENOTTY; |
aliguori | 731b036 | 2009-03-05 23:01:42 +0000 | [diff] [blame] | 3098 | mon->suspend_cnt++; |
aliguori | cde76ee | 2009-03-05 23:01:51 +0000 | [diff] [blame] | 3099 | return 0; |
aliguori | d8f4460 | 2008-10-06 13:52:44 +0000 | [diff] [blame] | 3100 | } |
| 3101 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 3102 | void monitor_resume(Monitor *mon) |
aliguori | d8f4460 | 2008-10-06 13:52:44 +0000 | [diff] [blame] | 3103 | { |
aliguori | cde76ee | 2009-03-05 23:01:51 +0000 | [diff] [blame] | 3104 | if (!mon->rs) |
| 3105 | return; |
aliguori | 731b036 | 2009-03-05 23:01:42 +0000 | [diff] [blame] | 3106 | if (--mon->suspend_cnt == 0) |
| 3107 | readline_show_prompt(mon->rs); |
bellard | 7e2515e | 2004-08-01 21:52:19 +0000 | [diff] [blame] | 3108 | } |
| 3109 | |
aliguori | 731b036 | 2009-03-05 23:01:42 +0000 | [diff] [blame] | 3110 | static void monitor_event(void *opaque, int event) |
ths | 86e94de | 2007-01-05 22:01:59 +0000 | [diff] [blame] | 3111 | { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 3112 | Monitor *mon = opaque; |
| 3113 | |
aliguori | 2724b18 | 2009-03-05 23:01:47 +0000 | [diff] [blame] | 3114 | switch (event) { |
| 3115 | case CHR_EVENT_MUX_IN: |
Gerd Hoffmann | a7aec5d | 2009-09-10 10:58:54 +0200 | [diff] [blame^] | 3116 | mon->mux_out = 0; |
| 3117 | if (mon->reset_seen) { |
| 3118 | readline_restart(mon->rs); |
| 3119 | monitor_resume(mon); |
| 3120 | monitor_flush(mon); |
| 3121 | } else { |
| 3122 | mon->suspend_cnt = 0; |
| 3123 | } |
aliguori | 2724b18 | 2009-03-05 23:01:47 +0000 | [diff] [blame] | 3124 | break; |
ths | 86e94de | 2007-01-05 22:01:59 +0000 | [diff] [blame] | 3125 | |
aliguori | 2724b18 | 2009-03-05 23:01:47 +0000 | [diff] [blame] | 3126 | case CHR_EVENT_MUX_OUT: |
Gerd Hoffmann | a7aec5d | 2009-09-10 10:58:54 +0200 | [diff] [blame^] | 3127 | if (mon->reset_seen) { |
| 3128 | if (mon->suspend_cnt == 0) { |
| 3129 | monitor_printf(mon, "\n"); |
| 3130 | } |
| 3131 | monitor_flush(mon); |
| 3132 | monitor_suspend(mon); |
| 3133 | } else { |
| 3134 | mon->suspend_cnt++; |
| 3135 | } |
| 3136 | mon->mux_out = 1; |
aliguori | 2724b18 | 2009-03-05 23:01:47 +0000 | [diff] [blame] | 3137 | break; |
| 3138 | |
| 3139 | case CHR_EVENT_RESET: |
| 3140 | monitor_printf(mon, "QEMU %s monitor - type 'help' for more " |
| 3141 | "information\n", QEMU_VERSION); |
Gerd Hoffmann | a7aec5d | 2009-09-10 10:58:54 +0200 | [diff] [blame^] | 3142 | if (!mon->mux_out) { |
aliguori | 2724b18 | 2009-03-05 23:01:47 +0000 | [diff] [blame] | 3143 | readline_show_prompt(mon->rs); |
Gerd Hoffmann | a7aec5d | 2009-09-10 10:58:54 +0200 | [diff] [blame^] | 3144 | } |
| 3145 | mon->reset_seen = 1; |
aliguori | 2724b18 | 2009-03-05 23:01:47 +0000 | [diff] [blame] | 3146 | break; |
| 3147 | } |
ths | 86e94de | 2007-01-05 22:01:59 +0000 | [diff] [blame] | 3148 | } |
| 3149 | |
aliguori | 76655d6 | 2009-03-06 20:27:37 +0000 | [diff] [blame] | 3150 | |
| 3151 | /* |
| 3152 | * Local variables: |
| 3153 | * c-indent-level: 4 |
| 3154 | * c-basic-offset: 4 |
| 3155 | * tab-width: 8 |
| 3156 | * End: |
| 3157 | */ |
| 3158 | |
aliguori | 731b036 | 2009-03-05 23:01:42 +0000 | [diff] [blame] | 3159 | void monitor_init(CharDriverState *chr, int flags) |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 3160 | { |
aliguori | 731b036 | 2009-03-05 23:01:42 +0000 | [diff] [blame] | 3161 | static int is_first_init = 1; |
aliguori | 8712716 | 2009-03-05 23:01:29 +0000 | [diff] [blame] | 3162 | Monitor *mon; |
ths | 20d8a3e | 2007-02-18 17:04:49 +0000 | [diff] [blame] | 3163 | |
| 3164 | if (is_first_init) { |
balrog | c8256f9 | 2008-06-08 22:45:01 +0000 | [diff] [blame] | 3165 | key_timer = qemu_new_timer(vm_clock, release_keys, NULL); |
ths | 20d8a3e | 2007-02-18 17:04:49 +0000 | [diff] [blame] | 3166 | is_first_init = 0; |
| 3167 | } |
aliguori | 8712716 | 2009-03-05 23:01:29 +0000 | [diff] [blame] | 3168 | |
| 3169 | mon = qemu_mallocz(sizeof(*mon)); |
ths | 20d8a3e | 2007-02-18 17:04:49 +0000 | [diff] [blame] | 3170 | |
aliguori | 8712716 | 2009-03-05 23:01:29 +0000 | [diff] [blame] | 3171 | mon->chr = chr; |
aliguori | 731b036 | 2009-03-05 23:01:42 +0000 | [diff] [blame] | 3172 | mon->flags = flags; |
aliguori | cde76ee | 2009-03-05 23:01:51 +0000 | [diff] [blame] | 3173 | if (flags & MONITOR_USE_READLINE) { |
| 3174 | mon->rs = readline_init(mon, monitor_find_completion); |
| 3175 | monitor_read_command(mon, 0); |
| 3176 | } |
aliguori | 8712716 | 2009-03-05 23:01:29 +0000 | [diff] [blame] | 3177 | |
aliguori | 731b036 | 2009-03-05 23:01:42 +0000 | [diff] [blame] | 3178 | qemu_chr_add_handlers(chr, monitor_can_read, monitor_read, monitor_event, |
| 3179 | mon); |
aliguori | 8712716 | 2009-03-05 23:01:29 +0000 | [diff] [blame] | 3180 | |
| 3181 | LIST_INSERT_HEAD(&mon_list, mon, entry); |
aliguori | 731b036 | 2009-03-05 23:01:42 +0000 | [diff] [blame] | 3182 | if (!cur_mon || (flags & MONITOR_IS_DEFAULT)) |
aliguori | 8712716 | 2009-03-05 23:01:29 +0000 | [diff] [blame] | 3183 | cur_mon = mon; |
bellard | 7e2515e | 2004-08-01 21:52:19 +0000 | [diff] [blame] | 3184 | } |
| 3185 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 3186 | static void bdrv_password_cb(Monitor *mon, const char *password, void *opaque) |
bellard | 7e2515e | 2004-08-01 21:52:19 +0000 | [diff] [blame] | 3187 | { |
aliguori | bb5fc20 | 2009-03-05 23:01:15 +0000 | [diff] [blame] | 3188 | BlockDriverState *bs = opaque; |
| 3189 | int ret = 0; |
bellard | 7e2515e | 2004-08-01 21:52:19 +0000 | [diff] [blame] | 3190 | |
aliguori | bb5fc20 | 2009-03-05 23:01:15 +0000 | [diff] [blame] | 3191 | if (bdrv_set_key(bs, password) != 0) { |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 3192 | monitor_printf(mon, "invalid password\n"); |
aliguori | bb5fc20 | 2009-03-05 23:01:15 +0000 | [diff] [blame] | 3193 | ret = -EPERM; |
bellard | 7e2515e | 2004-08-01 21:52:19 +0000 | [diff] [blame] | 3194 | } |
aliguori | 731b036 | 2009-03-05 23:01:42 +0000 | [diff] [blame] | 3195 | if (mon->password_completion_cb) |
| 3196 | mon->password_completion_cb(mon->password_opaque, ret); |
aliguori | bb5fc20 | 2009-03-05 23:01:15 +0000 | [diff] [blame] | 3197 | |
aliguori | 731b036 | 2009-03-05 23:01:42 +0000 | [diff] [blame] | 3198 | monitor_read_command(mon, 1); |
bellard | 9dc39cb | 2004-03-14 21:38:27 +0000 | [diff] [blame] | 3199 | } |
aliguori | c0f4ce7 | 2009-03-05 23:01:01 +0000 | [diff] [blame] | 3200 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 3201 | void monitor_read_bdrv_key_start(Monitor *mon, BlockDriverState *bs, |
aliguori | bb5fc20 | 2009-03-05 23:01:15 +0000 | [diff] [blame] | 3202 | BlockDriverCompletionFunc *completion_cb, |
| 3203 | void *opaque) |
aliguori | c0f4ce7 | 2009-03-05 23:01:01 +0000 | [diff] [blame] | 3204 | { |
aliguori | cde76ee | 2009-03-05 23:01:51 +0000 | [diff] [blame] | 3205 | int err; |
| 3206 | |
aliguori | bb5fc20 | 2009-03-05 23:01:15 +0000 | [diff] [blame] | 3207 | if (!bdrv_key_required(bs)) { |
| 3208 | if (completion_cb) |
| 3209 | completion_cb(opaque, 0); |
| 3210 | return; |
| 3211 | } |
aliguori | c0f4ce7 | 2009-03-05 23:01:01 +0000 | [diff] [blame] | 3212 | |
aliguori | 376253e | 2009-03-05 23:01:23 +0000 | [diff] [blame] | 3213 | monitor_printf(mon, "%s (%s) is encrypted.\n", bdrv_get_device_name(bs), |
| 3214 | bdrv_get_encrypted_filename(bs)); |
aliguori | bb5fc20 | 2009-03-05 23:01:15 +0000 | [diff] [blame] | 3215 | |
aliguori | 731b036 | 2009-03-05 23:01:42 +0000 | [diff] [blame] | 3216 | mon->password_completion_cb = completion_cb; |
| 3217 | mon->password_opaque = opaque; |
aliguori | bb5fc20 | 2009-03-05 23:01:15 +0000 | [diff] [blame] | 3218 | |
aliguori | cde76ee | 2009-03-05 23:01:51 +0000 | [diff] [blame] | 3219 | err = monitor_read_password(mon, bdrv_password_cb, bs); |
| 3220 | |
| 3221 | if (err && completion_cb) |
| 3222 | completion_cb(opaque, err); |
aliguori | c0f4ce7 | 2009-03-05 23:01:01 +0000 | [diff] [blame] | 3223 | } |
Gerd Hoffmann | ac7531e | 2009-08-14 10:36:06 +0200 | [diff] [blame] | 3224 | |
| 3225 | typedef struct QemuErrorSink QemuErrorSink; |
| 3226 | struct QemuErrorSink { |
| 3227 | enum { |
| 3228 | ERR_SINK_FILE, |
| 3229 | ERR_SINK_MONITOR, |
| 3230 | } dest; |
| 3231 | union { |
| 3232 | FILE *fp; |
| 3233 | Monitor *mon; |
| 3234 | }; |
| 3235 | QemuErrorSink *previous; |
| 3236 | }; |
| 3237 | |
Blue Swirl | 528e93a | 2009-08-31 15:14:40 +0000 | [diff] [blame] | 3238 | static QemuErrorSink *qemu_error_sink; |
Gerd Hoffmann | ac7531e | 2009-08-14 10:36:06 +0200 | [diff] [blame] | 3239 | |
| 3240 | void qemu_errors_to_file(FILE *fp) |
| 3241 | { |
| 3242 | QemuErrorSink *sink; |
| 3243 | |
| 3244 | sink = qemu_mallocz(sizeof(*sink)); |
| 3245 | sink->dest = ERR_SINK_FILE; |
| 3246 | sink->fp = fp; |
| 3247 | sink->previous = qemu_error_sink; |
| 3248 | qemu_error_sink = sink; |
| 3249 | } |
| 3250 | |
| 3251 | void qemu_errors_to_mon(Monitor *mon) |
| 3252 | { |
| 3253 | QemuErrorSink *sink; |
| 3254 | |
| 3255 | sink = qemu_mallocz(sizeof(*sink)); |
| 3256 | sink->dest = ERR_SINK_MONITOR; |
| 3257 | sink->mon = mon; |
| 3258 | sink->previous = qemu_error_sink; |
| 3259 | qemu_error_sink = sink; |
| 3260 | } |
| 3261 | |
| 3262 | void qemu_errors_to_previous(void) |
| 3263 | { |
| 3264 | QemuErrorSink *sink; |
| 3265 | |
| 3266 | assert(qemu_error_sink != NULL); |
| 3267 | sink = qemu_error_sink; |
| 3268 | qemu_error_sink = sink->previous; |
| 3269 | qemu_free(sink); |
| 3270 | } |
| 3271 | |
| 3272 | void qemu_error(const char *fmt, ...) |
| 3273 | { |
| 3274 | va_list args; |
| 3275 | |
| 3276 | assert(qemu_error_sink != NULL); |
| 3277 | switch (qemu_error_sink->dest) { |
| 3278 | case ERR_SINK_FILE: |
| 3279 | va_start(args, fmt); |
| 3280 | vfprintf(qemu_error_sink->fp, fmt, args); |
| 3281 | va_end(args); |
| 3282 | break; |
| 3283 | case ERR_SINK_MONITOR: |
| 3284 | va_start(args, fmt); |
| 3285 | monitor_vprintf(qemu_error_sink->mon, fmt, args); |
| 3286 | va_end(args); |
| 3287 | break; |
| 3288 | } |
| 3289 | } |