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.
18 #include "char/char.h"
19 #include "qemu/option.h"
20 #include "qemu/timer.h"
21 #include "qmp-commands.h"
22 #include "qemu/sockets.h"
23 #include "monitor/monitor.h"
24 #include "ui/console.h"
26 static void hmp_handle_error(Monitor
*mon
, Error
**errp
)
28 if (error_is_set(errp
)) {
29 monitor_printf(mon
, "%s\n", error_get_pretty(*errp
));
34 void hmp_info_name(Monitor
*mon
, const QDict
*qdict
)
38 info
= qmp_query_name(NULL
);
40 monitor_printf(mon
, "%s\n", info
->name
);
42 qapi_free_NameInfo(info
);
45 void hmp_info_version(Monitor
*mon
, const QDict
*qdict
)
49 info
= qmp_query_version(NULL
);
51 monitor_printf(mon
, "%" PRId64
".%" PRId64
".%" PRId64
"%s\n",
52 info
->qemu
.major
, info
->qemu
.minor
, info
->qemu
.micro
,
55 qapi_free_VersionInfo(info
);
58 void hmp_info_kvm(Monitor
*mon
, const QDict
*qdict
)
62 info
= qmp_query_kvm(NULL
);
63 monitor_printf(mon
, "kvm support: ");
65 monitor_printf(mon
, "%s\n", info
->enabled
? "enabled" : "disabled");
67 monitor_printf(mon
, "not compiled\n");
70 qapi_free_KvmInfo(info
);
73 void hmp_info_status(Monitor
*mon
, const QDict
*qdict
)
77 info
= qmp_query_status(NULL
);
79 monitor_printf(mon
, "VM status: %s%s",
80 info
->running
? "running" : "paused",
81 info
->singlestep
? " (single step mode)" : "");
83 if (!info
->running
&& info
->status
!= RUN_STATE_PAUSED
) {
84 monitor_printf(mon
, " (%s)", RunState_lookup
[info
->status
]);
87 monitor_printf(mon
, "\n");
89 qapi_free_StatusInfo(info
);
92 void hmp_info_uuid(Monitor
*mon
, const QDict
*qdict
)
96 info
= qmp_query_uuid(NULL
);
97 monitor_printf(mon
, "%s\n", info
->UUID
);
98 qapi_free_UuidInfo(info
);
101 void hmp_info_chardev(Monitor
*mon
, const QDict
*qdict
)
103 ChardevInfoList
*char_info
, *info
;
105 char_info
= qmp_query_chardev(NULL
);
106 for (info
= char_info
; info
; info
= info
->next
) {
107 monitor_printf(mon
, "%s: filename=%s\n", info
->value
->label
,
108 info
->value
->filename
);
111 qapi_free_ChardevInfoList(char_info
);
114 void hmp_info_mice(Monitor
*mon
, const QDict
*qdict
)
116 MouseInfoList
*mice_list
, *mouse
;
118 mice_list
= qmp_query_mice(NULL
);
120 monitor_printf(mon
, "No mouse devices connected\n");
124 for (mouse
= mice_list
; mouse
; mouse
= mouse
->next
) {
125 monitor_printf(mon
, "%c Mouse #%" PRId64
": %s%s\n",
126 mouse
->value
->current
? '*' : ' ',
127 mouse
->value
->index
, mouse
->value
->name
,
128 mouse
->value
->absolute
? " (absolute)" : "");
131 qapi_free_MouseInfoList(mice_list
);
134 void hmp_info_migrate(Monitor
*mon
, const QDict
*qdict
)
137 MigrationCapabilityStatusList
*caps
, *cap
;
139 info
= qmp_query_migrate(NULL
);
140 caps
= qmp_query_migrate_capabilities(NULL
);
142 /* do not display parameters during setup */
143 if (info
->has_status
&& caps
) {
144 monitor_printf(mon
, "capabilities: ");
145 for (cap
= caps
; cap
; cap
= cap
->next
) {
146 monitor_printf(mon
, "%s: %s ",
147 MigrationCapability_lookup
[cap
->value
->capability
],
148 cap
->value
->state
? "on" : "off");
150 monitor_printf(mon
, "\n");
153 if (info
->has_status
) {
154 monitor_printf(mon
, "Migration status: %s\n", info
->status
);
155 monitor_printf(mon
, "total time: %" PRIu64
" milliseconds\n",
157 if (info
->has_expected_downtime
) {
158 monitor_printf(mon
, "expected downtime: %" PRIu64
" milliseconds\n",
159 info
->expected_downtime
);
161 if (info
->has_downtime
) {
162 monitor_printf(mon
, "downtime: %" PRIu64
" milliseconds\n",
168 monitor_printf(mon
, "transferred ram: %" PRIu64
" kbytes\n",
169 info
->ram
->transferred
>> 10);
170 monitor_printf(mon
, "remaining ram: %" PRIu64
" kbytes\n",
171 info
->ram
->remaining
>> 10);
172 monitor_printf(mon
, "total ram: %" PRIu64
" kbytes\n",
173 info
->ram
->total
>> 10);
174 monitor_printf(mon
, "duplicate: %" PRIu64
" pages\n",
175 info
->ram
->duplicate
);
176 monitor_printf(mon
, "normal: %" PRIu64
" pages\n",
178 monitor_printf(mon
, "normal bytes: %" PRIu64
" kbytes\n",
179 info
->ram
->normal_bytes
>> 10);
180 if (info
->ram
->dirty_pages_rate
) {
181 monitor_printf(mon
, "dirty pages rate: %" PRIu64
" pages\n",
182 info
->ram
->dirty_pages_rate
);
186 if (info
->has_disk
) {
187 monitor_printf(mon
, "transferred disk: %" PRIu64
" kbytes\n",
188 info
->disk
->transferred
>> 10);
189 monitor_printf(mon
, "remaining disk: %" PRIu64
" kbytes\n",
190 info
->disk
->remaining
>> 10);
191 monitor_printf(mon
, "total disk: %" PRIu64
" kbytes\n",
192 info
->disk
->total
>> 10);
195 if (info
->has_xbzrle_cache
) {
196 monitor_printf(mon
, "cache size: %" PRIu64
" bytes\n",
197 info
->xbzrle_cache
->cache_size
);
198 monitor_printf(mon
, "xbzrle transferred: %" PRIu64
" kbytes\n",
199 info
->xbzrle_cache
->bytes
>> 10);
200 monitor_printf(mon
, "xbzrle pages: %" PRIu64
" pages\n",
201 info
->xbzrle_cache
->pages
);
202 monitor_printf(mon
, "xbzrle cache miss: %" PRIu64
"\n",
203 info
->xbzrle_cache
->cache_miss
);
204 monitor_printf(mon
, "xbzrle overflow : %" PRIu64
"\n",
205 info
->xbzrle_cache
->overflow
);
208 qapi_free_MigrationInfo(info
);
209 qapi_free_MigrationCapabilityStatusList(caps
);
212 void hmp_info_migrate_capabilities(Monitor
*mon
, const QDict
*qdict
)
214 MigrationCapabilityStatusList
*caps
, *cap
;
216 caps
= qmp_query_migrate_capabilities(NULL
);
219 monitor_printf(mon
, "capabilities: ");
220 for (cap
= caps
; cap
; cap
= cap
->next
) {
221 monitor_printf(mon
, "%s: %s ",
222 MigrationCapability_lookup
[cap
->value
->capability
],
223 cap
->value
->state
? "on" : "off");
225 monitor_printf(mon
, "\n");
228 qapi_free_MigrationCapabilityStatusList(caps
);
231 void hmp_info_migrate_cache_size(Monitor
*mon
, const QDict
*qdict
)
233 monitor_printf(mon
, "xbzrel cache size: %" PRId64
" kbytes\n",
234 qmp_query_migrate_cache_size(NULL
) >> 10);
237 void hmp_info_cpus(Monitor
*mon
, const QDict
*qdict
)
239 CpuInfoList
*cpu_list
, *cpu
;
241 cpu_list
= qmp_query_cpus(NULL
);
243 for (cpu
= cpu_list
; cpu
; cpu
= cpu
->next
) {
246 if (cpu
->value
->CPU
== monitor_get_cpu_index()) {
250 monitor_printf(mon
, "%c CPU #%" PRId64
":", active
, cpu
->value
->CPU
);
252 if (cpu
->value
->has_pc
) {
253 monitor_printf(mon
, " pc=0x%016" PRIx64
, cpu
->value
->pc
);
255 if (cpu
->value
->has_nip
) {
256 monitor_printf(mon
, " nip=0x%016" PRIx64
, cpu
->value
->nip
);
258 if (cpu
->value
->has_npc
) {
259 monitor_printf(mon
, " npc=0x%016" PRIx64
, cpu
->value
->npc
);
261 if (cpu
->value
->has_PC
) {
262 monitor_printf(mon
, " PC=0x%016" PRIx64
, cpu
->value
->PC
);
265 if (cpu
->value
->halted
) {
266 monitor_printf(mon
, " (halted)");
269 monitor_printf(mon
, " thread_id=%" PRId64
"\n", cpu
->value
->thread_id
);
272 qapi_free_CpuInfoList(cpu_list
);
275 void hmp_info_block(Monitor
*mon
, const QDict
*qdict
)
277 BlockInfoList
*block_list
, *info
;
279 block_list
= qmp_query_block(NULL
);
281 for (info
= block_list
; info
; info
= info
->next
) {
282 monitor_printf(mon
, "%s: removable=%d",
283 info
->value
->device
, info
->value
->removable
);
285 if (info
->value
->removable
) {
286 monitor_printf(mon
, " locked=%d", info
->value
->locked
);
287 monitor_printf(mon
, " tray-open=%d", info
->value
->tray_open
);
290 if (info
->value
->has_io_status
) {
291 monitor_printf(mon
, " io-status=%s",
292 BlockDeviceIoStatus_lookup
[info
->value
->io_status
]);
295 if (info
->value
->has_inserted
) {
296 monitor_printf(mon
, " file=");
297 monitor_print_filename(mon
, info
->value
->inserted
->file
);
299 if (info
->value
->inserted
->has_backing_file
) {
300 monitor_printf(mon
, " backing_file=");
301 monitor_print_filename(mon
, info
->value
->inserted
->backing_file
);
302 monitor_printf(mon
, " backing_file_depth=%" PRId64
,
303 info
->value
->inserted
->backing_file_depth
);
305 monitor_printf(mon
, " ro=%d drv=%s encrypted=%d",
306 info
->value
->inserted
->ro
,
307 info
->value
->inserted
->drv
,
308 info
->value
->inserted
->encrypted
);
310 monitor_printf(mon
, " bps=%" PRId64
" bps_rd=%" PRId64
311 " bps_wr=%" PRId64
" iops=%" PRId64
312 " iops_rd=%" PRId64
" iops_wr=%" PRId64
,
313 info
->value
->inserted
->bps
,
314 info
->value
->inserted
->bps_rd
,
315 info
->value
->inserted
->bps_wr
,
316 info
->value
->inserted
->iops
,
317 info
->value
->inserted
->iops_rd
,
318 info
->value
->inserted
->iops_wr
);
320 monitor_printf(mon
, " [not inserted]");
323 monitor_printf(mon
, "\n");
326 qapi_free_BlockInfoList(block_list
);
329 void hmp_info_blockstats(Monitor
*mon
, const QDict
*qdict
)
331 BlockStatsList
*stats_list
, *stats
;
333 stats_list
= qmp_query_blockstats(NULL
);
335 for (stats
= stats_list
; stats
; stats
= stats
->next
) {
336 if (!stats
->value
->has_device
) {
340 monitor_printf(mon
, "%s:", stats
->value
->device
);
341 monitor_printf(mon
, " rd_bytes=%" PRId64
343 " rd_operations=%" PRId64
344 " wr_operations=%" PRId64
345 " flush_operations=%" PRId64
346 " wr_total_time_ns=%" PRId64
347 " rd_total_time_ns=%" PRId64
348 " flush_total_time_ns=%" PRId64
350 stats
->value
->stats
->rd_bytes
,
351 stats
->value
->stats
->wr_bytes
,
352 stats
->value
->stats
->rd_operations
,
353 stats
->value
->stats
->wr_operations
,
354 stats
->value
->stats
->flush_operations
,
355 stats
->value
->stats
->wr_total_time_ns
,
356 stats
->value
->stats
->rd_total_time_ns
,
357 stats
->value
->stats
->flush_total_time_ns
);
360 qapi_free_BlockStatsList(stats_list
);
363 void hmp_info_vnc(Monitor
*mon
, const QDict
*qdict
)
367 VncClientInfoList
*client
;
369 info
= qmp_query_vnc(&err
);
371 monitor_printf(mon
, "%s\n", error_get_pretty(err
));
376 if (!info
->enabled
) {
377 monitor_printf(mon
, "Server: disabled\n");
381 monitor_printf(mon
, "Server:\n");
382 if (info
->has_host
&& info
->has_service
) {
383 monitor_printf(mon
, " address: %s:%s\n", info
->host
, info
->service
);
385 if (info
->has_auth
) {
386 monitor_printf(mon
, " auth: %s\n", info
->auth
);
389 if (!info
->has_clients
|| info
->clients
== NULL
) {
390 monitor_printf(mon
, "Client: none\n");
392 for (client
= info
->clients
; client
; client
= client
->next
) {
393 monitor_printf(mon
, "Client:\n");
394 monitor_printf(mon
, " address: %s:%s\n",
395 client
->value
->host
, client
->value
->service
);
396 monitor_printf(mon
, " x509_dname: %s\n",
397 client
->value
->x509_dname
?
398 client
->value
->x509_dname
: "none");
399 monitor_printf(mon
, " username: %s\n",
400 client
->value
->has_sasl_username
?
401 client
->value
->sasl_username
: "none");
406 qapi_free_VncInfo(info
);
409 void hmp_info_spice(Monitor
*mon
, const QDict
*qdict
)
411 SpiceChannelList
*chan
;
414 info
= qmp_query_spice(NULL
);
416 if (!info
->enabled
) {
417 monitor_printf(mon
, "Server: disabled\n");
421 monitor_printf(mon
, "Server:\n");
422 if (info
->has_port
) {
423 monitor_printf(mon
, " address: %s:%" PRId64
"\n",
424 info
->host
, info
->port
);
426 if (info
->has_tls_port
) {
427 monitor_printf(mon
, " address: %s:%" PRId64
" [tls]\n",
428 info
->host
, info
->tls_port
);
430 monitor_printf(mon
, " migrated: %s\n",
431 info
->migrated
? "true" : "false");
432 monitor_printf(mon
, " auth: %s\n", info
->auth
);
433 monitor_printf(mon
, " compiled: %s\n", info
->compiled_version
);
434 monitor_printf(mon
, " mouse-mode: %s\n",
435 SpiceQueryMouseMode_lookup
[info
->mouse_mode
]);
437 if (!info
->has_channels
|| info
->channels
== NULL
) {
438 monitor_printf(mon
, "Channels: none\n");
440 for (chan
= info
->channels
; chan
; chan
= chan
->next
) {
441 monitor_printf(mon
, "Channel:\n");
442 monitor_printf(mon
, " address: %s:%s%s\n",
443 chan
->value
->host
, chan
->value
->port
,
444 chan
->value
->tls
? " [tls]" : "");
445 monitor_printf(mon
, " session: %" PRId64
"\n",
446 chan
->value
->connection_id
);
447 monitor_printf(mon
, " channel: %" PRId64
":%" PRId64
"\n",
448 chan
->value
->channel_type
, chan
->value
->channel_id
);
453 qapi_free_SpiceInfo(info
);
456 void hmp_info_balloon(Monitor
*mon
, const QDict
*qdict
)
461 info
= qmp_query_balloon(&err
);
463 monitor_printf(mon
, "%s\n", error_get_pretty(err
));
468 monitor_printf(mon
, "balloon: actual=%" PRId64
"\n", info
->actual
>> 20);
470 qapi_free_BalloonInfo(info
);
473 static void hmp_info_pci_device(Monitor
*mon
, const PciDeviceInfo
*dev
)
475 PciMemoryRegionList
*region
;
477 monitor_printf(mon
, " Bus %2" PRId64
", ", dev
->bus
);
478 monitor_printf(mon
, "device %3" PRId64
", function %" PRId64
":\n",
479 dev
->slot
, dev
->function
);
480 monitor_printf(mon
, " ");
482 if (dev
->class_info
.has_desc
) {
483 monitor_printf(mon
, "%s", dev
->class_info
.desc
);
485 monitor_printf(mon
, "Class %04" PRId64
, dev
->class_info
.class);
488 monitor_printf(mon
, ": PCI device %04" PRIx64
":%04" PRIx64
"\n",
489 dev
->id
.vendor
, dev
->id
.device
);
492 monitor_printf(mon
, " IRQ %" PRId64
".\n", dev
->irq
);
495 if (dev
->has_pci_bridge
) {
496 monitor_printf(mon
, " BUS %" PRId64
".\n",
497 dev
->pci_bridge
->bus
.number
);
498 monitor_printf(mon
, " secondary bus %" PRId64
".\n",
499 dev
->pci_bridge
->bus
.secondary
);
500 monitor_printf(mon
, " subordinate bus %" PRId64
".\n",
501 dev
->pci_bridge
->bus
.subordinate
);
503 monitor_printf(mon
, " IO range [0x%04"PRIx64
", 0x%04"PRIx64
"]\n",
504 dev
->pci_bridge
->bus
.io_range
->base
,
505 dev
->pci_bridge
->bus
.io_range
->limit
);
508 " memory range [0x%08"PRIx64
", 0x%08"PRIx64
"]\n",
509 dev
->pci_bridge
->bus
.memory_range
->base
,
510 dev
->pci_bridge
->bus
.memory_range
->limit
);
512 monitor_printf(mon
, " prefetchable memory range "
513 "[0x%08"PRIx64
", 0x%08"PRIx64
"]\n",
514 dev
->pci_bridge
->bus
.prefetchable_range
->base
,
515 dev
->pci_bridge
->bus
.prefetchable_range
->limit
);
518 for (region
= dev
->regions
; region
; region
= region
->next
) {
521 addr
= region
->value
->address
;
522 size
= region
->value
->size
;
524 monitor_printf(mon
, " BAR%" PRId64
": ", region
->value
->bar
);
526 if (!strcmp(region
->value
->type
, "io")) {
527 monitor_printf(mon
, "I/O at 0x%04" PRIx64
528 " [0x%04" PRIx64
"].\n",
529 addr
, addr
+ size
- 1);
531 monitor_printf(mon
, "%d bit%s memory at 0x%08" PRIx64
532 " [0x%08" PRIx64
"].\n",
533 region
->value
->mem_type_64
? 64 : 32,
534 region
->value
->prefetch
? " prefetchable" : "",
535 addr
, addr
+ size
- 1);
539 monitor_printf(mon
, " id \"%s\"\n", dev
->qdev_id
);
541 if (dev
->has_pci_bridge
) {
542 if (dev
->pci_bridge
->has_devices
) {
543 PciDeviceInfoList
*cdev
;
544 for (cdev
= dev
->pci_bridge
->devices
; cdev
; cdev
= cdev
->next
) {
545 hmp_info_pci_device(mon
, cdev
->value
);
551 void hmp_info_pci(Monitor
*mon
, const QDict
*qdict
)
553 PciInfoList
*info_list
, *info
;
556 info_list
= qmp_query_pci(&err
);
558 monitor_printf(mon
, "PCI devices not supported\n");
563 for (info
= info_list
; info
; info
= info
->next
) {
564 PciDeviceInfoList
*dev
;
566 for (dev
= info
->value
->devices
; dev
; dev
= dev
->next
) {
567 hmp_info_pci_device(mon
, dev
->value
);
571 qapi_free_PciInfoList(info_list
);
574 void hmp_info_block_jobs(Monitor
*mon
, const QDict
*qdict
)
576 BlockJobInfoList
*list
;
579 list
= qmp_query_block_jobs(&err
);
583 monitor_printf(mon
, "No active jobs\n");
588 if (strcmp(list
->value
->type
, "stream") == 0) {
589 monitor_printf(mon
, "Streaming device %s: Completed %" PRId64
590 " of %" PRId64
" bytes, speed limit %" PRId64
597 monitor_printf(mon
, "Type %s, device %s: Completed %" PRId64
598 " of %" PRId64
" bytes, speed limit %" PRId64
610 void hmp_quit(Monitor
*mon
, const QDict
*qdict
)
612 monitor_suspend(mon
);
616 void hmp_stop(Monitor
*mon
, const QDict
*qdict
)
621 void hmp_system_reset(Monitor
*mon
, const QDict
*qdict
)
623 qmp_system_reset(NULL
);
626 void hmp_system_powerdown(Monitor
*mon
, const QDict
*qdict
)
628 qmp_system_powerdown(NULL
);
631 void hmp_cpu(Monitor
*mon
, const QDict
*qdict
)
635 /* XXX: drop the monitor_set_cpu() usage when all HMP commands that
636 use it are converted to the QAPI */
637 cpu_index
= qdict_get_int(qdict
, "index");
638 if (monitor_set_cpu(cpu_index
) < 0) {
639 monitor_printf(mon
, "invalid CPU index\n");
643 void hmp_memsave(Monitor
*mon
, const QDict
*qdict
)
645 uint32_t size
= qdict_get_int(qdict
, "size");
646 const char *filename
= qdict_get_str(qdict
, "filename");
647 uint64_t addr
= qdict_get_int(qdict
, "val");
650 qmp_memsave(addr
, size
, filename
, true, monitor_get_cpu_index(), &errp
);
651 hmp_handle_error(mon
, &errp
);
654 void hmp_pmemsave(Monitor
*mon
, const QDict
*qdict
)
656 uint32_t size
= qdict_get_int(qdict
, "size");
657 const char *filename
= qdict_get_str(qdict
, "filename");
658 uint64_t addr
= qdict_get_int(qdict
, "val");
661 qmp_pmemsave(addr
, size
, filename
, &errp
);
662 hmp_handle_error(mon
, &errp
);
665 void hmp_memchar_write(Monitor
*mon
, const QDict
*qdict
)
667 const char *chardev
= qdict_get_str(qdict
, "device");
668 const char *data
= qdict_get_str(qdict
, "data");
671 qmp_memchar_write(chardev
, data
, false, 0, &errp
);
673 hmp_handle_error(mon
, &errp
);
676 void hmp_memchar_read(Monitor
*mon
, const QDict
*qdict
)
678 uint32_t size
= qdict_get_int(qdict
, "size");
679 const char *chardev
= qdict_get_str(qdict
, "device");
680 MemCharRead
*meminfo
;
683 meminfo
= qmp_memchar_read(chardev
, size
, false, 0, &errp
);
685 monitor_printf(mon
, "%s\n", error_get_pretty(errp
));
690 if (meminfo
->count
> 0) {
691 monitor_printf(mon
, "%s\n", meminfo
->data
);
694 qapi_free_MemCharRead(meminfo
);
697 static void hmp_cont_cb(void *opaque
, int err
)
704 static bool key_is_missing(const BlockInfo
*bdev
)
706 return (bdev
->inserted
&& bdev
->inserted
->encryption_key_missing
);
709 void hmp_cont(Monitor
*mon
, const QDict
*qdict
)
711 BlockInfoList
*bdev_list
, *bdev
;
714 bdev_list
= qmp_query_block(NULL
);
715 for (bdev
= bdev_list
; bdev
; bdev
= bdev
->next
) {
716 if (key_is_missing(bdev
->value
)) {
717 monitor_read_block_device_key(mon
, bdev
->value
->device
,
724 hmp_handle_error(mon
, &errp
);
727 qapi_free_BlockInfoList(bdev_list
);
730 void hmp_system_wakeup(Monitor
*mon
, const QDict
*qdict
)
732 qmp_system_wakeup(NULL
);
735 void hmp_inject_nmi(Monitor
*mon
, const QDict
*qdict
)
739 qmp_inject_nmi(&errp
);
740 hmp_handle_error(mon
, &errp
);
743 void hmp_set_link(Monitor
*mon
, const QDict
*qdict
)
745 const char *name
= qdict_get_str(qdict
, "name");
746 int up
= qdict_get_bool(qdict
, "up");
749 qmp_set_link(name
, up
, &errp
);
750 hmp_handle_error(mon
, &errp
);
753 void hmp_block_passwd(Monitor
*mon
, const QDict
*qdict
)
755 const char *device
= qdict_get_str(qdict
, "device");
756 const char *password
= qdict_get_str(qdict
, "password");
759 qmp_block_passwd(device
, password
, &errp
);
760 hmp_handle_error(mon
, &errp
);
763 void hmp_balloon(Monitor
*mon
, const QDict
*qdict
)
765 int64_t value
= qdict_get_int(qdict
, "value");
768 qmp_balloon(value
, &errp
);
769 if (error_is_set(&errp
)) {
770 monitor_printf(mon
, "balloon: %s\n", error_get_pretty(errp
));
775 void hmp_block_resize(Monitor
*mon
, const QDict
*qdict
)
777 const char *device
= qdict_get_str(qdict
, "device");
778 int64_t size
= qdict_get_int(qdict
, "size");
781 qmp_block_resize(device
, size
, &errp
);
782 hmp_handle_error(mon
, &errp
);
785 void hmp_drive_mirror(Monitor
*mon
, const QDict
*qdict
)
787 const char *device
= qdict_get_str(qdict
, "device");
788 const char *filename
= qdict_get_str(qdict
, "target");
789 const char *format
= qdict_get_try_str(qdict
, "format");
790 int reuse
= qdict_get_try_bool(qdict
, "reuse", 0);
791 int full
= qdict_get_try_bool(qdict
, "full", 0);
792 enum NewImageMode mode
;
796 error_set(&errp
, QERR_MISSING_PARAMETER
, "target");
797 hmp_handle_error(mon
, &errp
);
802 mode
= NEW_IMAGE_MODE_EXISTING
;
804 mode
= NEW_IMAGE_MODE_ABSOLUTE_PATHS
;
807 qmp_drive_mirror(device
, filename
, !!format
, format
,
808 full
? MIRROR_SYNC_MODE_FULL
: MIRROR_SYNC_MODE_TOP
,
809 true, mode
, false, 0, false, 0, false, 0,
810 false, 0, false, 0, &errp
);
811 hmp_handle_error(mon
, &errp
);
814 void hmp_snapshot_blkdev(Monitor
*mon
, const QDict
*qdict
)
816 const char *device
= qdict_get_str(qdict
, "device");
817 const char *filename
= qdict_get_try_str(qdict
, "snapshot-file");
818 const char *format
= qdict_get_try_str(qdict
, "format");
819 int reuse
= qdict_get_try_bool(qdict
, "reuse", 0);
820 enum NewImageMode mode
;
824 /* In the future, if 'snapshot-file' is not specified, the snapshot
825 will be taken internally. Today it's actually required. */
826 error_set(&errp
, QERR_MISSING_PARAMETER
, "snapshot-file");
827 hmp_handle_error(mon
, &errp
);
831 mode
= reuse
? NEW_IMAGE_MODE_EXISTING
: NEW_IMAGE_MODE_ABSOLUTE_PATHS
;
832 qmp_blockdev_snapshot_sync(device
, filename
, !!format
, format
,
834 hmp_handle_error(mon
, &errp
);
837 void hmp_migrate_cancel(Monitor
*mon
, const QDict
*qdict
)
839 qmp_migrate_cancel(NULL
);
842 void hmp_migrate_set_downtime(Monitor
*mon
, const QDict
*qdict
)
844 double value
= qdict_get_double(qdict
, "value");
845 qmp_migrate_set_downtime(value
, NULL
);
848 void hmp_migrate_set_cache_size(Monitor
*mon
, const QDict
*qdict
)
850 int64_t value
= qdict_get_int(qdict
, "value");
853 qmp_migrate_set_cache_size(value
, &err
);
855 monitor_printf(mon
, "%s\n", error_get_pretty(err
));
861 void hmp_migrate_set_speed(Monitor
*mon
, const QDict
*qdict
)
863 int64_t value
= qdict_get_int(qdict
, "value");
864 qmp_migrate_set_speed(value
, NULL
);
867 void hmp_migrate_set_capability(Monitor
*mon
, const QDict
*qdict
)
869 const char *cap
= qdict_get_str(qdict
, "capability");
870 bool state
= qdict_get_bool(qdict
, "state");
872 MigrationCapabilityStatusList
*caps
= g_malloc0(sizeof(*caps
));
875 for (i
= 0; i
< MIGRATION_CAPABILITY_MAX
; i
++) {
876 if (strcmp(cap
, MigrationCapability_lookup
[i
]) == 0) {
877 caps
->value
= g_malloc0(sizeof(*caps
->value
));
878 caps
->value
->capability
= i
;
879 caps
->value
->state
= state
;
881 qmp_migrate_set_capabilities(caps
, &err
);
886 if (i
== MIGRATION_CAPABILITY_MAX
) {
887 error_set(&err
, QERR_INVALID_PARAMETER
, cap
);
890 qapi_free_MigrationCapabilityStatusList(caps
);
893 monitor_printf(mon
, "migrate_set_capability: %s\n",
894 error_get_pretty(err
));
899 void hmp_set_password(Monitor
*mon
, const QDict
*qdict
)
901 const char *protocol
= qdict_get_str(qdict
, "protocol");
902 const char *password
= qdict_get_str(qdict
, "password");
903 const char *connected
= qdict_get_try_str(qdict
, "connected");
906 qmp_set_password(protocol
, password
, !!connected
, connected
, &err
);
907 hmp_handle_error(mon
, &err
);
910 void hmp_expire_password(Monitor
*mon
, const QDict
*qdict
)
912 const char *protocol
= qdict_get_str(qdict
, "protocol");
913 const char *whenstr
= qdict_get_str(qdict
, "time");
916 qmp_expire_password(protocol
, whenstr
, &err
);
917 hmp_handle_error(mon
, &err
);
920 void hmp_eject(Monitor
*mon
, const QDict
*qdict
)
922 int force
= qdict_get_try_bool(qdict
, "force", 0);
923 const char *device
= qdict_get_str(qdict
, "device");
926 qmp_eject(device
, true, force
, &err
);
927 hmp_handle_error(mon
, &err
);
930 static void hmp_change_read_arg(Monitor
*mon
, const char *password
,
933 qmp_change_vnc_password(password
, NULL
);
934 monitor_read_command(mon
, 1);
937 void hmp_change(Monitor
*mon
, const QDict
*qdict
)
939 const char *device
= qdict_get_str(qdict
, "device");
940 const char *target
= qdict_get_str(qdict
, "target");
941 const char *arg
= qdict_get_try_str(qdict
, "arg");
944 if (strcmp(device
, "vnc") == 0 &&
945 (strcmp(target
, "passwd") == 0 ||
946 strcmp(target
, "password") == 0)) {
948 monitor_read_password(mon
, hmp_change_read_arg
, NULL
);
953 qmp_change(device
, target
, !!arg
, arg
, &err
);
954 if (error_is_set(&err
) &&
955 error_get_class(err
) == ERROR_CLASS_DEVICE_ENCRYPTED
) {
957 monitor_read_block_device_key(mon
, device
, NULL
, NULL
);
960 hmp_handle_error(mon
, &err
);
963 void hmp_block_set_io_throttle(Monitor
*mon
, const QDict
*qdict
)
967 qmp_block_set_io_throttle(qdict_get_str(qdict
, "device"),
968 qdict_get_int(qdict
, "bps"),
969 qdict_get_int(qdict
, "bps_rd"),
970 qdict_get_int(qdict
, "bps_wr"),
971 qdict_get_int(qdict
, "iops"),
972 qdict_get_int(qdict
, "iops_rd"),
973 qdict_get_int(qdict
, "iops_wr"), &err
);
974 hmp_handle_error(mon
, &err
);
977 void hmp_block_stream(Monitor
*mon
, const QDict
*qdict
)
980 const char *device
= qdict_get_str(qdict
, "device");
981 const char *base
= qdict_get_try_str(qdict
, "base");
982 int64_t speed
= qdict_get_try_int(qdict
, "speed", 0);
984 qmp_block_stream(device
, base
!= NULL
, base
,
985 qdict_haskey(qdict
, "speed"), speed
,
986 BLOCKDEV_ON_ERROR_REPORT
, true, &error
);
988 hmp_handle_error(mon
, &error
);
991 void hmp_block_job_set_speed(Monitor
*mon
, const QDict
*qdict
)
994 const char *device
= qdict_get_str(qdict
, "device");
995 int64_t value
= qdict_get_int(qdict
, "speed");
997 qmp_block_job_set_speed(device
, value
, &error
);
999 hmp_handle_error(mon
, &error
);
1002 void hmp_block_job_cancel(Monitor
*mon
, const QDict
*qdict
)
1004 Error
*error
= NULL
;
1005 const char *device
= qdict_get_str(qdict
, "device");
1006 bool force
= qdict_get_try_bool(qdict
, "force", 0);
1008 qmp_block_job_cancel(device
, true, force
, &error
);
1010 hmp_handle_error(mon
, &error
);
1013 void hmp_block_job_pause(Monitor
*mon
, const QDict
*qdict
)
1015 Error
*error
= NULL
;
1016 const char *device
= qdict_get_str(qdict
, "device");
1018 qmp_block_job_pause(device
, &error
);
1020 hmp_handle_error(mon
, &error
);
1023 void hmp_block_job_resume(Monitor
*mon
, const QDict
*qdict
)
1025 Error
*error
= NULL
;
1026 const char *device
= qdict_get_str(qdict
, "device");
1028 qmp_block_job_resume(device
, &error
);
1030 hmp_handle_error(mon
, &error
);
1033 void hmp_block_job_complete(Monitor
*mon
, const QDict
*qdict
)
1035 Error
*error
= NULL
;
1036 const char *device
= qdict_get_str(qdict
, "device");
1038 qmp_block_job_complete(device
, &error
);
1040 hmp_handle_error(mon
, &error
);
1043 typedef struct MigrationStatus
1047 bool is_block_migration
;
1050 static void hmp_migrate_status_cb(void *opaque
)
1052 MigrationStatus
*status
= opaque
;
1053 MigrationInfo
*info
;
1055 info
= qmp_query_migrate(NULL
);
1056 if (!info
->has_status
|| strcmp(info
->status
, "active") == 0) {
1057 if (info
->has_disk
) {
1060 if (info
->disk
->remaining
) {
1061 progress
= info
->disk
->transferred
* 100 / info
->disk
->total
;
1066 monitor_printf(status
->mon
, "Completed %d %%\r", progress
);
1067 monitor_flush(status
->mon
);
1070 qemu_mod_timer(status
->timer
, qemu_get_clock_ms(rt_clock
) + 1000);
1072 if (status
->is_block_migration
) {
1073 monitor_printf(status
->mon
, "\n");
1075 monitor_resume(status
->mon
);
1076 qemu_del_timer(status
->timer
);
1080 qapi_free_MigrationInfo(info
);
1083 void hmp_migrate(Monitor
*mon
, const QDict
*qdict
)
1085 int detach
= qdict_get_try_bool(qdict
, "detach", 0);
1086 int blk
= qdict_get_try_bool(qdict
, "blk", 0);
1087 int inc
= qdict_get_try_bool(qdict
, "inc", 0);
1088 const char *uri
= qdict_get_str(qdict
, "uri");
1091 qmp_migrate(uri
, !!blk
, blk
, !!inc
, inc
, false, false, &err
);
1093 monitor_printf(mon
, "migrate: %s\n", error_get_pretty(err
));
1099 MigrationStatus
*status
;
1101 if (monitor_suspend(mon
) < 0) {
1102 monitor_printf(mon
, "terminal does not allow synchronous "
1103 "migration, continuing detached\n");
1107 status
= g_malloc0(sizeof(*status
));
1109 status
->is_block_migration
= blk
|| inc
;
1110 status
->timer
= qemu_new_timer_ms(rt_clock
, hmp_migrate_status_cb
,
1112 qemu_mod_timer(status
->timer
, qemu_get_clock_ms(rt_clock
));
1116 void hmp_device_del(Monitor
*mon
, const QDict
*qdict
)
1118 const char *id
= qdict_get_str(qdict
, "id");
1121 qmp_device_del(id
, &err
);
1122 hmp_handle_error(mon
, &err
);
1125 void hmp_dump_guest_memory(Monitor
*mon
, const QDict
*qdict
)
1128 int paging
= qdict_get_try_bool(qdict
, "paging", 0);
1129 const char *file
= qdict_get_str(qdict
, "filename");
1130 bool has_begin
= qdict_haskey(qdict
, "begin");
1131 bool has_length
= qdict_haskey(qdict
, "length");
1137 begin
= qdict_get_int(qdict
, "begin");
1140 length
= qdict_get_int(qdict
, "length");
1143 prot
= g_strconcat("file:", file
, NULL
);
1145 qmp_dump_guest_memory(paging
, prot
, has_begin
, begin
, has_length
, length
,
1147 hmp_handle_error(mon
, &errp
);
1151 void hmp_netdev_add(Monitor
*mon
, const QDict
*qdict
)
1156 opts
= qemu_opts_from_qdict(qemu_find_opts("netdev"), qdict
, &err
);
1157 if (error_is_set(&err
)) {
1161 netdev_add(opts
, &err
);
1162 if (error_is_set(&err
)) {
1163 qemu_opts_del(opts
);
1167 hmp_handle_error(mon
, &err
);
1170 void hmp_netdev_del(Monitor
*mon
, const QDict
*qdict
)
1172 const char *id
= qdict_get_str(qdict
, "id");
1175 qmp_netdev_del(id
, &err
);
1176 hmp_handle_error(mon
, &err
);
1179 void hmp_getfd(Monitor
*mon
, const QDict
*qdict
)
1181 const char *fdname
= qdict_get_str(qdict
, "fdname");
1184 qmp_getfd(fdname
, &errp
);
1185 hmp_handle_error(mon
, &errp
);
1188 void hmp_closefd(Monitor
*mon
, const QDict
*qdict
)
1190 const char *fdname
= qdict_get_str(qdict
, "fdname");
1193 qmp_closefd(fdname
, &errp
);
1194 hmp_handle_error(mon
, &errp
);
1197 void hmp_send_key(Monitor
*mon
, const QDict
*qdict
)
1199 const char *keys
= qdict_get_str(qdict
, "keys");
1200 KeyValueList
*keylist
, *head
= NULL
, *tmp
= NULL
;
1201 int has_hold_time
= qdict_haskey(qdict
, "hold-time");
1202 int hold_time
= qdict_get_try_int(qdict
, "hold-time", -1);
1204 char keyname_buf
[16];
1209 separator
= strchr(keys
, '-');
1210 keyname_len
= separator
? separator
- keys
: strlen(keys
);
1211 pstrcpy(keyname_buf
, sizeof(keyname_buf
), keys
);
1213 /* Be compatible with old interface, convert user inputted "<" */
1214 if (!strncmp(keyname_buf
, "<", 1) && keyname_len
== 1) {
1215 pstrcpy(keyname_buf
, sizeof(keyname_buf
), "less");
1218 keyname_buf
[keyname_len
] = 0;
1220 keylist
= g_malloc0(sizeof(*keylist
));
1221 keylist
->value
= g_malloc0(sizeof(*keylist
->value
));
1227 tmp
->next
= keylist
;
1231 if (strstart(keyname_buf
, "0x", NULL
)) {
1233 int value
= strtoul(keyname_buf
, &endp
, 0);
1234 if (*endp
!= '\0') {
1237 keylist
->value
->kind
= KEY_VALUE_KIND_NUMBER
;
1238 keylist
->value
->number
= value
;
1240 int idx
= index_from_key(keyname_buf
);
1241 if (idx
== Q_KEY_CODE_MAX
) {
1244 keylist
->value
->kind
= KEY_VALUE_KIND_QCODE
;
1245 keylist
->value
->qcode
= idx
;
1251 keys
= separator
+ 1;
1254 qmp_send_key(head
, has_hold_time
, hold_time
, &err
);
1255 hmp_handle_error(mon
, &err
);
1258 qapi_free_KeyValueList(head
);
1262 monitor_printf(mon
, "invalid parameter: %s\n", keyname_buf
);
1266 void hmp_screen_dump(Monitor
*mon
, const QDict
*qdict
)
1268 const char *filename
= qdict_get_str(qdict
, "filename");
1271 qmp_screendump(filename
, &err
);
1272 hmp_handle_error(mon
, &err
);
1275 void hmp_nbd_server_start(Monitor
*mon
, const QDict
*qdict
)
1277 const char *uri
= qdict_get_str(qdict
, "uri");
1278 int writable
= qdict_get_try_bool(qdict
, "writable", 0);
1279 int all
= qdict_get_try_bool(qdict
, "all", 0);
1280 Error
*local_err
= NULL
;
1281 BlockInfoList
*block_list
, *info
;
1282 SocketAddress
*addr
;
1284 if (writable
&& !all
) {
1285 error_setg(&local_err
, "-w only valid together with -a");
1289 /* First check if the address is valid and start the server. */
1290 addr
= socket_parse(uri
, &local_err
);
1291 if (local_err
!= NULL
) {
1295 qmp_nbd_server_start(addr
, &local_err
);
1296 qapi_free_SocketAddress(addr
);
1297 if (local_err
!= NULL
) {
1305 /* Then try adding all block devices. If one fails, close all and
1308 block_list
= qmp_query_block(NULL
);
1310 for (info
= block_list
; info
; info
= info
->next
) {
1311 if (!info
->value
->has_inserted
) {
1315 qmp_nbd_server_add(info
->value
->device
, true, writable
, &local_err
);
1317 if (local_err
!= NULL
) {
1318 qmp_nbd_server_stop(NULL
);
1323 qapi_free_BlockInfoList(block_list
);
1326 hmp_handle_error(mon
, &local_err
);
1329 void hmp_nbd_server_add(Monitor
*mon
, const QDict
*qdict
)
1331 const char *device
= qdict_get_str(qdict
, "device");
1332 int writable
= qdict_get_try_bool(qdict
, "writable", 0);
1333 Error
*local_err
= NULL
;
1335 qmp_nbd_server_add(device
, true, writable
, &local_err
);
1337 if (local_err
!= NULL
) {
1338 hmp_handle_error(mon
, &local_err
);
1342 void hmp_nbd_server_stop(Monitor
*mon
, const QDict
*qdict
)
1346 qmp_nbd_server_stop(&errp
);
1347 hmp_handle_error(mon
, &errp
);
1350 void hmp_chardev_add(Monitor
*mon
, const QDict
*qdict
)
1352 const char *args
= qdict_get_str(qdict
, "args");
1356 opts
= qemu_opts_parse(qemu_find_opts("chardev"), args
, 1);
1358 error_setg(&err
, "Parsing chardev args failed\n");
1360 qemu_chr_new_from_opts(opts
, NULL
, &err
);
1362 hmp_handle_error(mon
, &err
);
1365 void hmp_chardev_remove(Monitor
*mon
, const QDict
*qdict
)
1367 Error
*local_err
= NULL
;
1369 qmp_chardev_remove(qdict_get_str(qdict
, "id"), &local_err
);
1370 hmp_handle_error(mon
, &local_err
);