2 * Human Monitor Interface
4 * Copyright IBM, Corp. 2011
7 * Anthony Liguori <aliguori@us.ibm.com>
9 * This work is licensed under the terms of the GNU GPL, version 2. See
10 * the COPYING file in the top-level directory.
12 * Contributions after 2012-01-13 are licensed under the terms of the
13 * GNU GPL, version 2 or (at your option) any later version.
17 #include "qmp-commands.h"
19 static void hmp_handle_error(Monitor
*mon
, Error
**errp
)
21 if (error_is_set(errp
)) {
22 monitor_printf(mon
, "%s\n", error_get_pretty(*errp
));
27 void hmp_info_name(Monitor
*mon
)
31 info
= qmp_query_name(NULL
);
33 monitor_printf(mon
, "%s\n", info
->name
);
35 qapi_free_NameInfo(info
);
38 void hmp_info_version(Monitor
*mon
)
42 info
= qmp_query_version(NULL
);
44 monitor_printf(mon
, "%" PRId64
".%" PRId64
".%" PRId64
"%s\n",
45 info
->qemu
.major
, info
->qemu
.minor
, info
->qemu
.micro
,
48 qapi_free_VersionInfo(info
);
51 void hmp_info_kvm(Monitor
*mon
)
55 info
= qmp_query_kvm(NULL
);
56 monitor_printf(mon
, "kvm support: ");
58 monitor_printf(mon
, "%s\n", info
->enabled
? "enabled" : "disabled");
60 monitor_printf(mon
, "not compiled\n");
63 qapi_free_KvmInfo(info
);
66 void hmp_info_status(Monitor
*mon
)
70 info
= qmp_query_status(NULL
);
72 monitor_printf(mon
, "VM status: %s%s",
73 info
->running
? "running" : "paused",
74 info
->singlestep
? " (single step mode)" : "");
76 if (!info
->running
&& info
->status
!= RUN_STATE_PAUSED
) {
77 monitor_printf(mon
, " (%s)", RunState_lookup
[info
->status
]);
80 monitor_printf(mon
, "\n");
82 qapi_free_StatusInfo(info
);
85 void hmp_info_uuid(Monitor
*mon
)
89 info
= qmp_query_uuid(NULL
);
90 monitor_printf(mon
, "%s\n", info
->UUID
);
91 qapi_free_UuidInfo(info
);
94 void hmp_info_chardev(Monitor
*mon
)
96 ChardevInfoList
*char_info
, *info
;
98 char_info
= qmp_query_chardev(NULL
);
99 for (info
= char_info
; info
; info
= info
->next
) {
100 monitor_printf(mon
, "%s: filename=%s\n", info
->value
->label
,
101 info
->value
->filename
);
104 qapi_free_ChardevInfoList(char_info
);
107 void hmp_info_mice(Monitor
*mon
)
109 MouseInfoList
*mice_list
, *mouse
;
111 mice_list
= qmp_query_mice(NULL
);
113 monitor_printf(mon
, "No mouse devices connected\n");
117 for (mouse
= mice_list
; mouse
; mouse
= mouse
->next
) {
118 monitor_printf(mon
, "%c Mouse #%" PRId64
": %s%s\n",
119 mouse
->value
->current
? '*' : ' ',
120 mouse
->value
->index
, mouse
->value
->name
,
121 mouse
->value
->absolute
? " (absolute)" : "");
124 qapi_free_MouseInfoList(mice_list
);
127 void hmp_info_migrate(Monitor
*mon
)
131 info
= qmp_query_migrate(NULL
);
133 if (info
->has_status
) {
134 monitor_printf(mon
, "Migration status: %s\n", info
->status
);
138 monitor_printf(mon
, "transferred ram: %" PRIu64
" kbytes\n",
139 info
->ram
->transferred
>> 10);
140 monitor_printf(mon
, "remaining ram: %" PRIu64
" kbytes\n",
141 info
->ram
->remaining
>> 10);
142 monitor_printf(mon
, "total ram: %" PRIu64
" kbytes\n",
143 info
->ram
->total
>> 10);
146 if (info
->has_disk
) {
147 monitor_printf(mon
, "transferred disk: %" PRIu64
" kbytes\n",
148 info
->disk
->transferred
>> 10);
149 monitor_printf(mon
, "remaining disk: %" PRIu64
" kbytes\n",
150 info
->disk
->remaining
>> 10);
151 monitor_printf(mon
, "total disk: %" PRIu64
" kbytes\n",
152 info
->disk
->total
>> 10);
155 qapi_free_MigrationInfo(info
);
158 void hmp_info_cpus(Monitor
*mon
)
160 CpuInfoList
*cpu_list
, *cpu
;
162 cpu_list
= qmp_query_cpus(NULL
);
164 for (cpu
= cpu_list
; cpu
; cpu
= cpu
->next
) {
167 if (cpu
->value
->CPU
== monitor_get_cpu_index()) {
171 monitor_printf(mon
, "%c CPU #%" PRId64
": ", active
, cpu
->value
->CPU
);
173 if (cpu
->value
->has_pc
) {
174 monitor_printf(mon
, "pc=0x%016" PRIx64
, cpu
->value
->pc
);
176 if (cpu
->value
->has_nip
) {
177 monitor_printf(mon
, "nip=0x%016" PRIx64
, cpu
->value
->nip
);
179 if (cpu
->value
->has_npc
) {
180 monitor_printf(mon
, "pc=0x%016" PRIx64
, cpu
->value
->pc
);
181 monitor_printf(mon
, "npc=0x%016" PRIx64
, cpu
->value
->npc
);
183 if (cpu
->value
->has_PC
) {
184 monitor_printf(mon
, "PC=0x%016" PRIx64
, cpu
->value
->PC
);
187 if (cpu
->value
->halted
) {
188 monitor_printf(mon
, " (halted)");
191 monitor_printf(mon
, " thread_id=%" PRId64
"\n", cpu
->value
->thread_id
);
194 qapi_free_CpuInfoList(cpu_list
);
197 void hmp_info_block(Monitor
*mon
)
199 BlockInfoList
*block_list
, *info
;
201 block_list
= qmp_query_block(NULL
);
203 for (info
= block_list
; info
; info
= info
->next
) {
204 monitor_printf(mon
, "%s: removable=%d",
205 info
->value
->device
, info
->value
->removable
);
207 if (info
->value
->removable
) {
208 monitor_printf(mon
, " locked=%d", info
->value
->locked
);
209 monitor_printf(mon
, " tray-open=%d", info
->value
->tray_open
);
212 if (info
->value
->has_io_status
) {
213 monitor_printf(mon
, " io-status=%s",
214 BlockDeviceIoStatus_lookup
[info
->value
->io_status
]);
217 if (info
->value
->has_inserted
) {
218 monitor_printf(mon
, " file=");
219 monitor_print_filename(mon
, info
->value
->inserted
->file
);
221 if (info
->value
->inserted
->has_backing_file
) {
222 monitor_printf(mon
, " backing_file=");
223 monitor_print_filename(mon
, info
->value
->inserted
->backing_file
);
225 monitor_printf(mon
, " ro=%d drv=%s encrypted=%d",
226 info
->value
->inserted
->ro
,
227 info
->value
->inserted
->drv
,
228 info
->value
->inserted
->encrypted
);
230 monitor_printf(mon
, " bps=%" PRId64
" bps_rd=%" PRId64
231 " bps_wr=%" PRId64
" iops=%" PRId64
232 " iops_rd=%" PRId64
" iops_wr=%" PRId64
,
233 info
->value
->inserted
->bps
,
234 info
->value
->inserted
->bps_rd
,
235 info
->value
->inserted
->bps_wr
,
236 info
->value
->inserted
->iops
,
237 info
->value
->inserted
->iops_rd
,
238 info
->value
->inserted
->iops_wr
);
240 monitor_printf(mon
, " [not inserted]");
243 monitor_printf(mon
, "\n");
246 qapi_free_BlockInfoList(block_list
);
249 void hmp_info_blockstats(Monitor
*mon
)
251 BlockStatsList
*stats_list
, *stats
;
253 stats_list
= qmp_query_blockstats(NULL
);
255 for (stats
= stats_list
; stats
; stats
= stats
->next
) {
256 if (!stats
->value
->has_device
) {
260 monitor_printf(mon
, "%s:", stats
->value
->device
);
261 monitor_printf(mon
, " rd_bytes=%" PRId64
263 " rd_operations=%" PRId64
264 " wr_operations=%" PRId64
265 " flush_operations=%" PRId64
266 " wr_total_time_ns=%" PRId64
267 " rd_total_time_ns=%" PRId64
268 " flush_total_time_ns=%" PRId64
270 stats
->value
->stats
->rd_bytes
,
271 stats
->value
->stats
->wr_bytes
,
272 stats
->value
->stats
->rd_operations
,
273 stats
->value
->stats
->wr_operations
,
274 stats
->value
->stats
->flush_operations
,
275 stats
->value
->stats
->wr_total_time_ns
,
276 stats
->value
->stats
->rd_total_time_ns
,
277 stats
->value
->stats
->flush_total_time_ns
);
280 qapi_free_BlockStatsList(stats_list
);
283 void hmp_info_vnc(Monitor
*mon
)
287 VncClientInfoList
*client
;
289 info
= qmp_query_vnc(&err
);
291 monitor_printf(mon
, "%s\n", error_get_pretty(err
));
296 if (!info
->enabled
) {
297 monitor_printf(mon
, "Server: disabled\n");
301 monitor_printf(mon
, "Server:\n");
302 if (info
->has_host
&& info
->has_service
) {
303 monitor_printf(mon
, " address: %s:%s\n", info
->host
, info
->service
);
305 if (info
->has_auth
) {
306 monitor_printf(mon
, " auth: %s\n", info
->auth
);
309 if (!info
->has_clients
|| info
->clients
== NULL
) {
310 monitor_printf(mon
, "Client: none\n");
312 for (client
= info
->clients
; client
; client
= client
->next
) {
313 monitor_printf(mon
, "Client:\n");
314 monitor_printf(mon
, " address: %s:%s\n",
315 client
->value
->host
, client
->value
->service
);
316 monitor_printf(mon
, " x509_dname: %s\n",
317 client
->value
->x509_dname
?
318 client
->value
->x509_dname
: "none");
319 monitor_printf(mon
, " username: %s\n",
320 client
->value
->has_sasl_username
?
321 client
->value
->sasl_username
: "none");
326 qapi_free_VncInfo(info
);
329 void hmp_info_spice(Monitor
*mon
)
331 SpiceChannelList
*chan
;
334 info
= qmp_query_spice(NULL
);
336 if (!info
->enabled
) {
337 monitor_printf(mon
, "Server: disabled\n");
341 monitor_printf(mon
, "Server:\n");
342 if (info
->has_port
) {
343 monitor_printf(mon
, " address: %s:%" PRId64
"\n",
344 info
->host
, info
->port
);
346 if (info
->has_tls_port
) {
347 monitor_printf(mon
, " address: %s:%" PRId64
" [tls]\n",
348 info
->host
, info
->tls_port
);
350 monitor_printf(mon
, " auth: %s\n", info
->auth
);
351 monitor_printf(mon
, " compiled: %s\n", info
->compiled_version
);
353 if (!info
->has_channels
|| info
->channels
== NULL
) {
354 monitor_printf(mon
, "Channels: none\n");
356 for (chan
= info
->channels
; chan
; chan
= chan
->next
) {
357 monitor_printf(mon
, "Channel:\n");
358 monitor_printf(mon
, " address: %s:%s%s\n",
359 chan
->value
->host
, chan
->value
->port
,
360 chan
->value
->tls
? " [tls]" : "");
361 monitor_printf(mon
, " session: %" PRId64
"\n",
362 chan
->value
->connection_id
);
363 monitor_printf(mon
, " channel: %" PRId64
":%" PRId64
"\n",
364 chan
->value
->channel_type
, chan
->value
->channel_id
);
369 qapi_free_SpiceInfo(info
);
372 void hmp_info_balloon(Monitor
*mon
)
377 info
= qmp_query_balloon(&err
);
379 monitor_printf(mon
, "%s\n", error_get_pretty(err
));
384 monitor_printf(mon
, "balloon: actual=%" PRId64
, info
->actual
>> 20);
385 if (info
->has_mem_swapped_in
) {
386 monitor_printf(mon
, " mem_swapped_in=%" PRId64
, info
->mem_swapped_in
);
388 if (info
->has_mem_swapped_out
) {
389 monitor_printf(mon
, " mem_swapped_out=%" PRId64
, info
->mem_swapped_out
);
391 if (info
->has_major_page_faults
) {
392 monitor_printf(mon
, " major_page_faults=%" PRId64
,
393 info
->major_page_faults
);
395 if (info
->has_minor_page_faults
) {
396 monitor_printf(mon
, " minor_page_faults=%" PRId64
,
397 info
->minor_page_faults
);
399 if (info
->has_free_mem
) {
400 monitor_printf(mon
, " free_mem=%" PRId64
, info
->free_mem
);
402 if (info
->has_total_mem
) {
403 monitor_printf(mon
, " total_mem=%" PRId64
, info
->total_mem
);
406 monitor_printf(mon
, "\n");
408 qapi_free_BalloonInfo(info
);
411 static void hmp_info_pci_device(Monitor
*mon
, const PciDeviceInfo
*dev
)
413 PciMemoryRegionList
*region
;
415 monitor_printf(mon
, " Bus %2" PRId64
", ", dev
->bus
);
416 monitor_printf(mon
, "device %3" PRId64
", function %" PRId64
":\n",
417 dev
->slot
, dev
->function
);
418 monitor_printf(mon
, " ");
420 if (dev
->class_info
.has_desc
) {
421 monitor_printf(mon
, "%s", dev
->class_info
.desc
);
423 monitor_printf(mon
, "Class %04" PRId64
, dev
->class_info
.class);
426 monitor_printf(mon
, ": PCI device %04" PRIx64
":%04" PRIx64
"\n",
427 dev
->id
.vendor
, dev
->id
.device
);
430 monitor_printf(mon
, " IRQ %" PRId64
".\n", dev
->irq
);
433 if (dev
->has_pci_bridge
) {
434 monitor_printf(mon
, " BUS %" PRId64
".\n",
435 dev
->pci_bridge
->bus
.number
);
436 monitor_printf(mon
, " secondary bus %" PRId64
".\n",
437 dev
->pci_bridge
->bus
.secondary
);
438 monitor_printf(mon
, " subordinate bus %" PRId64
".\n",
439 dev
->pci_bridge
->bus
.subordinate
);
441 monitor_printf(mon
, " IO range [0x%04"PRIx64
", 0x%04"PRIx64
"]\n",
442 dev
->pci_bridge
->bus
.io_range
->base
,
443 dev
->pci_bridge
->bus
.io_range
->limit
);
446 " memory range [0x%08"PRIx64
", 0x%08"PRIx64
"]\n",
447 dev
->pci_bridge
->bus
.memory_range
->base
,
448 dev
->pci_bridge
->bus
.memory_range
->limit
);
450 monitor_printf(mon
, " prefetchable memory range "
451 "[0x%08"PRIx64
", 0x%08"PRIx64
"]\n",
452 dev
->pci_bridge
->bus
.prefetchable_range
->base
,
453 dev
->pci_bridge
->bus
.prefetchable_range
->limit
);
456 for (region
= dev
->regions
; region
; region
= region
->next
) {
459 addr
= region
->value
->address
;
460 size
= region
->value
->size
;
462 monitor_printf(mon
, " BAR%" PRId64
": ", region
->value
->bar
);
464 if (!strcmp(region
->value
->type
, "io")) {
465 monitor_printf(mon
, "I/O at 0x%04" PRIx64
466 " [0x%04" PRIx64
"].\n",
467 addr
, addr
+ size
- 1);
469 monitor_printf(mon
, "%d bit%s memory at 0x%08" PRIx64
470 " [0x%08" PRIx64
"].\n",
471 region
->value
->mem_type_64
? 64 : 32,
472 region
->value
->prefetch
? " prefetchable" : "",
473 addr
, addr
+ size
- 1);
477 monitor_printf(mon
, " id \"%s\"\n", dev
->qdev_id
);
479 if (dev
->has_pci_bridge
) {
480 if (dev
->pci_bridge
->has_devices
) {
481 PciDeviceInfoList
*cdev
;
482 for (cdev
= dev
->pci_bridge
->devices
; cdev
; cdev
= cdev
->next
) {
483 hmp_info_pci_device(mon
, cdev
->value
);
489 void hmp_info_pci(Monitor
*mon
)
491 PciInfoList
*info_list
, *info
;
494 info_list
= qmp_query_pci(&err
);
496 monitor_printf(mon
, "PCI devices not supported\n");
501 for (info
= info_list
; info
; info
= info
->next
) {
502 PciDeviceInfoList
*dev
;
504 for (dev
= info
->value
->devices
; dev
; dev
= dev
->next
) {
505 hmp_info_pci_device(mon
, dev
->value
);
509 qapi_free_PciInfoList(info_list
);
512 void hmp_quit(Monitor
*mon
, const QDict
*qdict
)
514 monitor_suspend(mon
);
518 void hmp_stop(Monitor
*mon
, const QDict
*qdict
)
523 void hmp_system_reset(Monitor
*mon
, const QDict
*qdict
)
525 qmp_system_reset(NULL
);
528 void hmp_system_powerdown(Monitor
*mon
, const QDict
*qdict
)
530 qmp_system_powerdown(NULL
);
533 void hmp_cpu(Monitor
*mon
, const QDict
*qdict
)
537 /* XXX: drop the monitor_set_cpu() usage when all HMP commands that
538 use it are converted to the QAPI */
539 cpu_index
= qdict_get_int(qdict
, "index");
540 if (monitor_set_cpu(cpu_index
) < 0) {
541 monitor_printf(mon
, "invalid CPU index\n");
545 void hmp_memsave(Monitor
*mon
, const QDict
*qdict
)
547 uint32_t size
= qdict_get_int(qdict
, "size");
548 const char *filename
= qdict_get_str(qdict
, "filename");
549 uint64_t addr
= qdict_get_int(qdict
, "val");
552 qmp_memsave(addr
, size
, filename
, true, monitor_get_cpu_index(), &errp
);
553 hmp_handle_error(mon
, &errp
);
556 void hmp_pmemsave(Monitor
*mon
, const QDict
*qdict
)
558 uint32_t size
= qdict_get_int(qdict
, "size");
559 const char *filename
= qdict_get_str(qdict
, "filename");
560 uint64_t addr
= qdict_get_int(qdict
, "val");
563 qmp_pmemsave(addr
, size
, filename
, &errp
);
564 hmp_handle_error(mon
, &errp
);
567 static void hmp_cont_cb(void *opaque
, int err
)
569 Monitor
*mon
= opaque
;
576 void hmp_cont(Monitor
*mon
, const QDict
*qdict
)
581 if (error_is_set(&errp
)) {
582 if (error_is_type(errp
, QERR_DEVICE_ENCRYPTED
)) {
585 /* The device is encrypted. Ask the user for the password
588 device
= error_get_field(errp
, "device");
589 assert(device
!= NULL
);
591 monitor_read_block_device_key(mon
, device
, hmp_cont_cb
, mon
);
595 hmp_handle_error(mon
, &errp
);
599 void hmp_inject_nmi(Monitor
*mon
, const QDict
*qdict
)
603 qmp_inject_nmi(&errp
);
604 hmp_handle_error(mon
, &errp
);
607 void hmp_set_link(Monitor
*mon
, const QDict
*qdict
)
609 const char *name
= qdict_get_str(qdict
, "name");
610 int up
= qdict_get_bool(qdict
, "up");
613 qmp_set_link(name
, up
, &errp
);
614 hmp_handle_error(mon
, &errp
);
617 void hmp_block_passwd(Monitor
*mon
, const QDict
*qdict
)
619 const char *device
= qdict_get_str(qdict
, "device");
620 const char *password
= qdict_get_str(qdict
, "password");
623 qmp_block_passwd(device
, password
, &errp
);
624 hmp_handle_error(mon
, &errp
);
627 void hmp_balloon(Monitor
*mon
, const QDict
*qdict
)
629 int64_t value
= qdict_get_int(qdict
, "value");
632 qmp_balloon(value
, &errp
);
633 if (error_is_set(&errp
)) {
634 monitor_printf(mon
, "balloon: %s\n", error_get_pretty(errp
));
639 void hmp_block_resize(Monitor
*mon
, const QDict
*qdict
)
641 const char *device
= qdict_get_str(qdict
, "device");
642 int64_t size
= qdict_get_int(qdict
, "size");
645 qmp_block_resize(device
, size
, &errp
);
646 hmp_handle_error(mon
, &errp
);
649 void hmp_snapshot_blkdev(Monitor
*mon
, const QDict
*qdict
)
651 const char *device
= qdict_get_str(qdict
, "device");
652 const char *filename
= qdict_get_try_str(qdict
, "snapshot-file");
653 const char *format
= qdict_get_try_str(qdict
, "format");
657 /* In the future, if 'snapshot-file' is not specified, the snapshot
658 will be taken internally. Today it's actually required. */
659 error_set(&errp
, QERR_MISSING_PARAMETER
, "snapshot-file");
660 hmp_handle_error(mon
, &errp
);
664 qmp_blockdev_snapshot_sync(device
, filename
, !!format
, format
, &errp
);
665 hmp_handle_error(mon
, &errp
);
668 void hmp_migrate_cancel(Monitor
*mon
, const QDict
*qdict
)
670 qmp_migrate_cancel(NULL
);
673 void hmp_migrate_set_downtime(Monitor
*mon
, const QDict
*qdict
)
675 double value
= qdict_get_double(qdict
, "value");
676 qmp_migrate_set_downtime(value
, NULL
);
679 void hmp_migrate_set_speed(Monitor
*mon
, const QDict
*qdict
)
681 int64_t value
= qdict_get_int(qdict
, "value");
682 qmp_migrate_set_speed(value
, NULL
);