blob: 195a0b0071f63f62ef2264eb9b750cf2bf5f2f99 [file] [log] [blame]
/*
* QEMU monitor
*
* Copyright (c) 2003-2004 Fabrice Bellard
*
* Permission is hereby granted, free of charge, to any person obtaining a copy
* of this software and associated documentation files (the "Software"), to deal
* in the Software without restriction, including without limitation the rights
* to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
* copies of the Software, and to permit persons to whom the Software is
* furnished to do so, subject to the following conditions:
*
* The above copyright notice and this permission notice shall be included in
* all copies or substantial portions of the Software.
*
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
* IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
* FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
* THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
* LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
* OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
* THE SOFTWARE.
*/
#include <stdlib.h>
#include <stdio.h>
#include <stdarg.h>
#include <string.h>
#include <getopt.h>
#include <inttypes.h>
#include <unistd.h>
#include <sys/mman.h>
#include <fcntl.h>
#include <signal.h>
#include <time.h>
#include <sys/time.h>
#include <malloc.h>
#include <termios.h>
#include <sys/poll.h>
#include <errno.h>
#include <ctype.h>
#include "cpu.h"
#include "vl.h"
//#define DEBUG
#define TERM_CMD_BUF_SIZE 4095
#define MAX_ARGS 64
#define IS_NORM 0
#define IS_ESC 1
#define IS_CSI 2
#define printf do_not_use_printf
static char term_cmd_buf[TERM_CMD_BUF_SIZE + 1];
static int term_cmd_buf_index;
static int term_cmd_buf_size;
static int term_esc_state;
static int term_esc_param;
typedef struct term_cmd_t {
const char *name;
void (*handler)(int argc, const char **argv);
const char *params;
const char *help;
} term_cmd_t;
static term_cmd_t term_cmds[];
static term_cmd_t info_cmds[];
void term_printf(const char *fmt, ...)
{
va_list ap;
va_start(ap, fmt);
vprintf(fmt, ap);
va_end(ap);
}
void term_flush(void)
{
fflush(stdout);
}
static int compare_cmd(const char *name, const char *list)
{
const char *p, *pstart;
int len;
len = strlen(name);
p = list;
for(;;) {
pstart = p;
p = strchr(p, '|');
if (!p)
p = pstart + strlen(pstart);
if ((p - pstart) == len && !memcmp(pstart, name, len))
return 1;
if (*p == '\0')
break;
p++;
}
return 0;
}
static void help_cmd1(term_cmd_t *cmds, const char *prefix, const char *name)
{
term_cmd_t *cmd;
for(cmd = cmds; cmd->name != NULL; cmd++) {
if (!name || !strcmp(name, cmd->name))
term_printf("%s%s %s -- %s\n", prefix, cmd->name, cmd->params, cmd->help);
}
}
static void help_cmd(const char *name)
{
if (name && !strcmp(name, "info")) {
help_cmd1(info_cmds, "info ", NULL);
} else {
help_cmd1(term_cmds, "", name);
}
}
static void do_help(int argc, const char **argv)
{
help_cmd(argv[1]);
}
static void do_commit(int argc, const char **argv)
{
int i;
for (i = 0; i < MAX_DISKS; i++) {
if (bs_table[i])
bdrv_commit(bs_table[i]);
}
}
static void do_info(int argc, const char **argv)
{
term_cmd_t *cmd;
const char *item;
if (argc < 2)
goto help;
item = argv[1];
for(cmd = info_cmds; cmd->name != NULL; cmd++) {
if (compare_cmd(argv[1], cmd->name))
goto found;
}
help:
help_cmd(argv[0]);
return;
found:
cmd->handler(argc, argv);
}
static void do_info_network(int argc, const char **argv)
{
int i, j;
NetDriverState *nd;
for(i = 0; i < nb_nics; i++) {
nd = &nd_table[i];
term_printf("%d: ifname=%s macaddr=", i, nd->ifname);
for(j = 0; j < 6; j++) {
if (j > 0)
term_printf(":");
term_printf("%02x", nd->macaddr[j]);
}
term_printf("\n");
}
}
static void do_info_block(int argc, const char **argv)
{
bdrv_info();
}
static void do_quit(int argc, const char **argv)
{
exit(0);
}
static int eject_device(BlockDriverState *bs, int force)
{
if (bdrv_is_inserted(bs)) {
if (!force) {
if (!bdrv_is_removable(bs)) {
term_printf("device is not removable\n");
return -1;
}
if (bdrv_is_locked(bs)) {
term_printf("device is locked\n");
return -1;
}
}
bdrv_close(bs);
}
return 0;
}
static void do_eject(int argc, const char **argv)
{
BlockDriverState *bs;
const char **parg;
int force;
parg = argv + 1;
if (!*parg) {
fail:
help_cmd(argv[0]);
return;
}
force = 0;
if (!strcmp(*parg, "-f")) {
force = 1;
parg++;
}
if (!*parg)
goto fail;
bs = bdrv_find(*parg);
if (!bs) {
term_printf("device not found\n");
return;
}
eject_device(bs, force);
}
static void do_change(int argc, const char **argv)
{
BlockDriverState *bs;
if (argc != 3) {
help_cmd(argv[0]);
return;
}
bs = bdrv_find(argv[1]);
if (!bs) {
term_printf("device not found\n");
return;
}
if (eject_device(bs, 0) < 0)
return;
bdrv_open(bs, argv[2], 0);
}
static void do_screen_dump(int argc, const char **argv)
{
if (argc != 2) {
help_cmd(argv[0]);
return;
}
vga_screen_dump(argv[1]);
}
static term_cmd_t term_cmds[] = {
{ "help|?", do_help,
"[cmd]", "show the help" },
{ "commit", do_commit,
"", "commit changes to the disk images (if -snapshot is used)" },
{ "info", do_info,
"subcommand", "show various information about the system state" },
{ "q|quit", do_quit,
"", "quit the emulator" },
{ "eject", do_eject,
"[-f] device", "eject a removable media (use -f to force it)" },
{ "change", do_change,
"device filename", "change a removable media" },
{ "screendump", do_screen_dump,
"filename", "save screen into PPM image 'filename'" },
{ NULL, NULL, },
};
static term_cmd_t info_cmds[] = {
{ "network", do_info_network,
"", "show the network state" },
{ "block", do_info_block,
"", "show the block devices" },
{ NULL, NULL, },
};
static void term_handle_command(char *cmdline)
{
char *p, *pstart;
int argc;
const char *args[MAX_ARGS + 1];
term_cmd_t *cmd;
#ifdef DEBUG
term_printf("command='%s'\n", cmdline);
#endif
/* split command in words */
argc = 0;
p = cmdline;
for(;;) {
while (isspace(*p))
p++;
if (*p == '\0')
break;
pstart = p;
while (*p != '\0' && !isspace(*p))
p++;
args[argc] = pstart;
argc++;
if (argc >= MAX_ARGS)
break;
if (*p == '\0')
break;
*p++ = '\0';
}
args[argc] = NULL;
#ifdef DEBUG
for(i=0;i<argc;i++) {
term_printf(" '%s'", args[i]);
}
term_printf("\n");
#endif
if (argc <= 0)
return;
for(cmd = term_cmds; cmd->name != NULL; cmd++) {
if (compare_cmd(args[0], cmd->name))
goto found;
}
term_printf("unknown command: '%s'\n", args[0]);
return;
found:
cmd->handler(argc, args);
}
static void term_show_prompt(void)
{
term_printf("(qemu) ");
fflush(stdout);
term_cmd_buf_index = 0;
term_cmd_buf_size = 0;
term_esc_state = IS_NORM;
}
static void term_insert_char(int ch)
{
if (term_cmd_buf_index < TERM_CMD_BUF_SIZE) {
memmove(term_cmd_buf + term_cmd_buf_index + 1,
term_cmd_buf + term_cmd_buf_index,
term_cmd_buf_size - term_cmd_buf_index);
term_cmd_buf[term_cmd_buf_index] = ch;
term_cmd_buf_size++;
term_printf("\033[@%c", ch);
term_cmd_buf_index++;
term_flush();
}
}
static void term_backward_char(void)
{
if (term_cmd_buf_index > 0) {
term_cmd_buf_index--;
term_printf("\033[D");
term_flush();
}
}
static void term_forward_char(void)
{
if (term_cmd_buf_index < term_cmd_buf_size) {
term_cmd_buf_index++;
term_printf("\033[C");
term_flush();
}
}
static void term_delete_char(void)
{
if (term_cmd_buf_index < term_cmd_buf_size) {
memmove(term_cmd_buf + term_cmd_buf_index,
term_cmd_buf + term_cmd_buf_index + 1,
term_cmd_buf_size - term_cmd_buf_index - 1);
term_printf("\033[P");
term_cmd_buf_size--;
term_flush();
}
}
static void term_backspace(void)
{
if (term_cmd_buf_index > 0) {
term_backward_char();
term_delete_char();
}
}
static void term_bol(void)
{
while (term_cmd_buf_index > 0)
term_backward_char();
}
static void term_eol(void)
{
while (term_cmd_buf_index < term_cmd_buf_size)
term_forward_char();
}
/* return true if command handled */
static void term_handle_byte(int ch)
{
switch(term_esc_state) {
case IS_NORM:
switch(ch) {
case 1:
term_bol();
break;
case 5:
term_eol();
break;
case 10:
case 13:
term_cmd_buf[term_cmd_buf_size] = '\0';
term_printf("\n");
term_handle_command(term_cmd_buf);
term_show_prompt();
break;
case 27:
term_esc_state = IS_ESC;
break;
case 127:
case 8:
term_backspace();
break;
default:
if (ch >= 32) {
term_insert_char(ch);
}
break;
}
break;
case IS_ESC:
if (ch == '[') {
term_esc_state = IS_CSI;
term_esc_param = 0;
} else {
term_esc_state = IS_NORM;
}
break;
case IS_CSI:
switch(ch) {
case 'D':
term_backward_char();
break;
case 'C':
term_forward_char();
break;
case '0' ... '9':
term_esc_param = term_esc_param * 10 + (ch - '0');
goto the_end;
case '~':
switch(term_esc_param) {
case 1:
term_bol();
break;
case 3:
term_delete_char();
break;
case 4:
term_eol();
break;
}
break;
default:
break;
}
term_esc_state = IS_NORM;
the_end:
break;
}
}
/*************************************************************/
/* serial console support */
#define TERM_ESCAPE 0x01 /* ctrl-a is used for escape */
static int term_got_escape, term_command;
void term_print_help(void)
{
term_printf("\n"
"C-a h print this help\n"
"C-a x exit emulatior\n"
"C-a d switch on/off debug log\n"
"C-a s save disk data back to file (if -snapshot)\n"
"C-a b send break (magic sysrq)\n"
"C-a c switch between console and monitor\n"
"C-a C-a send C-a\n"
);
}
/* called when a char is received */
static void term_received_byte(int ch)
{
if (!serial_console) {
/* if no serial console, handle every command */
term_handle_byte(ch);
} else {
if (term_got_escape) {
term_got_escape = 0;
switch(ch) {
case 'h':
term_print_help();
break;
case 'x':
exit(0);
break;
case 's':
{
int i;
for (i = 0; i < MAX_DISKS; i++) {
if (bs_table[i])
bdrv_commit(bs_table[i]);
}
}
break;
case 'b':
if (serial_console)
serial_receive_break(serial_console);
break;
case 'c':
if (!term_command) {
term_show_prompt();
term_command = 1;
} else {
term_command = 0;
}
break;
case 'd':
cpu_set_log(CPU_LOG_ALL);
break;
case TERM_ESCAPE:
goto send_char;
}
} else if (ch == TERM_ESCAPE) {
term_got_escape = 1;
} else {
send_char:
if (term_command) {
term_handle_byte(ch);
} else {
if (serial_console)
serial_receive_byte(serial_console, ch);
}
}
}
}
static int term_can_read(void *opaque)
{
if (serial_console) {
return serial_can_receive(serial_console);
} else {
return 1;
}
}
static void term_read(void *opaque, const uint8_t *buf, int size)
{
int i;
for(i = 0; i < size; i++)
term_received_byte(buf[i]);
}
void monitor_init(void)
{
if (!serial_console) {
term_printf("QEMU %s monitor - type 'help' for more information\n",
QEMU_VERSION);
term_show_prompt();
}
add_fd_read_handler(0, term_can_read, term_read, NULL);
}