1*8d7f2e76SPhilippe Mathieu-Daudé /*
2*8d7f2e76SPhilippe Mathieu-Daudé * HMP commands related to run state
3*8d7f2e76SPhilippe Mathieu-Daudé *
4*8d7f2e76SPhilippe Mathieu-Daudé * Copyright IBM, Corp. 2011
5*8d7f2e76SPhilippe Mathieu-Daudé *
6*8d7f2e76SPhilippe Mathieu-Daudé * Authors:
7*8d7f2e76SPhilippe Mathieu-Daudé * Anthony Liguori <aliguori@us.ibm.com>
8*8d7f2e76SPhilippe Mathieu-Daudé *
9*8d7f2e76SPhilippe Mathieu-Daudé * This work is licensed under the terms of the GNU GPL, version 2. See
10*8d7f2e76SPhilippe Mathieu-Daudé * the COPYING file in the top-level directory.
11*8d7f2e76SPhilippe Mathieu-Daudé *
12*8d7f2e76SPhilippe Mathieu-Daudé * Contributions after 2012-01-13 are licensed under the terms of the
13*8d7f2e76SPhilippe Mathieu-Daudé * GNU GPL, version 2 or (at your option) any later version.
14*8d7f2e76SPhilippe Mathieu-Daudé */
15*8d7f2e76SPhilippe Mathieu-Daudé
16*8d7f2e76SPhilippe Mathieu-Daudé #include "qemu/osdep.h"
17*8d7f2e76SPhilippe Mathieu-Daudé #include "exec/cpu-common.h"
18*8d7f2e76SPhilippe Mathieu-Daudé #include "monitor/hmp.h"
19*8d7f2e76SPhilippe Mathieu-Daudé #include "monitor/monitor.h"
20*8d7f2e76SPhilippe Mathieu-Daudé #include "qapi/error.h"
21*8d7f2e76SPhilippe Mathieu-Daudé #include "qapi/qapi-commands-run-state.h"
22*8d7f2e76SPhilippe Mathieu-Daudé #include "qapi/qmp/qdict.h"
23*8d7f2e76SPhilippe Mathieu-Daudé #include "qemu/accel.h"
24*8d7f2e76SPhilippe Mathieu-Daudé
hmp_info_status(Monitor * mon,const QDict * qdict)25*8d7f2e76SPhilippe Mathieu-Daudé void hmp_info_status(Monitor *mon, const QDict *qdict)
26*8d7f2e76SPhilippe Mathieu-Daudé {
27*8d7f2e76SPhilippe Mathieu-Daudé StatusInfo *info;
28*8d7f2e76SPhilippe Mathieu-Daudé
29*8d7f2e76SPhilippe Mathieu-Daudé info = qmp_query_status(NULL);
30*8d7f2e76SPhilippe Mathieu-Daudé
31*8d7f2e76SPhilippe Mathieu-Daudé monitor_printf(mon, "VM status: %s",
32*8d7f2e76SPhilippe Mathieu-Daudé info->running ? "running" : "paused");
33*8d7f2e76SPhilippe Mathieu-Daudé
34*8d7f2e76SPhilippe Mathieu-Daudé if (!info->running && info->status != RUN_STATE_PAUSED) {
35*8d7f2e76SPhilippe Mathieu-Daudé monitor_printf(mon, " (%s)", RunState_str(info->status));
36*8d7f2e76SPhilippe Mathieu-Daudé }
37*8d7f2e76SPhilippe Mathieu-Daudé
38*8d7f2e76SPhilippe Mathieu-Daudé monitor_printf(mon, "\n");
39*8d7f2e76SPhilippe Mathieu-Daudé
40*8d7f2e76SPhilippe Mathieu-Daudé qapi_free_StatusInfo(info);
41*8d7f2e76SPhilippe Mathieu-Daudé }
42*8d7f2e76SPhilippe Mathieu-Daudé
hmp_one_insn_per_tb(Monitor * mon,const QDict * qdict)43*8d7f2e76SPhilippe Mathieu-Daudé void hmp_one_insn_per_tb(Monitor *mon, const QDict *qdict)
44*8d7f2e76SPhilippe Mathieu-Daudé {
45*8d7f2e76SPhilippe Mathieu-Daudé const char *option = qdict_get_try_str(qdict, "option");
46*8d7f2e76SPhilippe Mathieu-Daudé AccelState *accel = current_accel();
47*8d7f2e76SPhilippe Mathieu-Daudé bool newval;
48*8d7f2e76SPhilippe Mathieu-Daudé
49*8d7f2e76SPhilippe Mathieu-Daudé if (!object_property_find(OBJECT(accel), "one-insn-per-tb")) {
50*8d7f2e76SPhilippe Mathieu-Daudé monitor_printf(mon,
51*8d7f2e76SPhilippe Mathieu-Daudé "This accelerator does not support setting one-insn-per-tb\n");
52*8d7f2e76SPhilippe Mathieu-Daudé return;
53*8d7f2e76SPhilippe Mathieu-Daudé }
54*8d7f2e76SPhilippe Mathieu-Daudé
55*8d7f2e76SPhilippe Mathieu-Daudé if (!option || !strcmp(option, "on")) {
56*8d7f2e76SPhilippe Mathieu-Daudé newval = true;
57*8d7f2e76SPhilippe Mathieu-Daudé } else if (!strcmp(option, "off")) {
58*8d7f2e76SPhilippe Mathieu-Daudé newval = false;
59*8d7f2e76SPhilippe Mathieu-Daudé } else {
60*8d7f2e76SPhilippe Mathieu-Daudé monitor_printf(mon, "unexpected option %s\n", option);
61*8d7f2e76SPhilippe Mathieu-Daudé return;
62*8d7f2e76SPhilippe Mathieu-Daudé }
63*8d7f2e76SPhilippe Mathieu-Daudé /* If the property exists then setting it can never fail */
64*8d7f2e76SPhilippe Mathieu-Daudé object_property_set_bool(OBJECT(accel), "one-insn-per-tb",
65*8d7f2e76SPhilippe Mathieu-Daudé newval, &error_abort);
66*8d7f2e76SPhilippe Mathieu-Daudé }
67*8d7f2e76SPhilippe Mathieu-Daudé
hmp_watchdog_action(Monitor * mon,const QDict * qdict)68*8d7f2e76SPhilippe Mathieu-Daudé void hmp_watchdog_action(Monitor *mon, const QDict *qdict)
69*8d7f2e76SPhilippe Mathieu-Daudé {
70*8d7f2e76SPhilippe Mathieu-Daudé Error *err = NULL;
71*8d7f2e76SPhilippe Mathieu-Daudé WatchdogAction action;
72*8d7f2e76SPhilippe Mathieu-Daudé char *qapi_value;
73*8d7f2e76SPhilippe Mathieu-Daudé
74*8d7f2e76SPhilippe Mathieu-Daudé qapi_value = g_ascii_strdown(qdict_get_str(qdict, "action"), -1);
75*8d7f2e76SPhilippe Mathieu-Daudé action = qapi_enum_parse(&WatchdogAction_lookup, qapi_value, -1, &err);
76*8d7f2e76SPhilippe Mathieu-Daudé g_free(qapi_value);
77*8d7f2e76SPhilippe Mathieu-Daudé if (err) {
78*8d7f2e76SPhilippe Mathieu-Daudé hmp_handle_error(mon, err);
79*8d7f2e76SPhilippe Mathieu-Daudé return;
80*8d7f2e76SPhilippe Mathieu-Daudé }
81*8d7f2e76SPhilippe Mathieu-Daudé qmp_watchdog_set_action(action, &error_abort);
82*8d7f2e76SPhilippe Mathieu-Daudé }
83*8d7f2e76SPhilippe Mathieu-Daudé
watchdog_action_completion(ReadLineState * rs,int nb_args,const char * str)84*8d7f2e76SPhilippe Mathieu-Daudé void watchdog_action_completion(ReadLineState *rs, int nb_args, const char *str)
85*8d7f2e76SPhilippe Mathieu-Daudé {
86*8d7f2e76SPhilippe Mathieu-Daudé int i;
87*8d7f2e76SPhilippe Mathieu-Daudé
88*8d7f2e76SPhilippe Mathieu-Daudé if (nb_args != 2) {
89*8d7f2e76SPhilippe Mathieu-Daudé return;
90*8d7f2e76SPhilippe Mathieu-Daudé }
91*8d7f2e76SPhilippe Mathieu-Daudé readline_set_completion_index(rs, strlen(str));
92*8d7f2e76SPhilippe Mathieu-Daudé for (i = 0; i < WATCHDOG_ACTION__MAX; i++) {
93*8d7f2e76SPhilippe Mathieu-Daudé readline_add_completion_of(rs, str, WatchdogAction_str(i));
94*8d7f2e76SPhilippe Mathieu-Daudé }
95*8d7f2e76SPhilippe Mathieu-Daudé }
96