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.
16 #include "qemu/osdep.h"
20 #include "sysemu/char.h"
21 #include "sysemu/block-backend.h"
22 #include "sysemu/sysemu.h"
23 #include "qemu/config-file.h"
24 #include "qemu/option.h"
25 #include "qemu/timer.h"
26 #include "qmp-commands.h"
27 #include "qemu/sockets.h"
28 #include "monitor/monitor.h"
29 #include "monitor/qdev.h"
30 #include "qapi/opts-visitor.h"
31 #include "qapi/qmp/qerror.h"
32 #include "qapi/string-output-visitor.h"
33 #include "qapi/util.h"
34 #include "qapi-visit.h"
35 #include "qom/object_interfaces.h"
36 #include "ui/console.h"
37 #include "block/nbd.h"
38 #include "block/qapi.h"
40 #include "qemu/cutils.h"
41 #include "qemu/error-report.h"
42 #include "hw/intc/intc.h"
45 #include <spice/enums.h>
48 static void hmp_handle_error(Monitor
*mon
, Error
**errp
)
52 error_report_err(*errp
);
56 void hmp_info_name(Monitor
*mon
, const QDict
*qdict
)
60 info
= qmp_query_name(NULL
);
62 monitor_printf(mon
, "%s\n", info
->name
);
64 qapi_free_NameInfo(info
);
67 void hmp_info_version(Monitor
*mon
, const QDict
*qdict
)
71 info
= qmp_query_version(NULL
);
73 monitor_printf(mon
, "%" PRId64
".%" PRId64
".%" PRId64
"%s\n",
74 info
->qemu
->major
, info
->qemu
->minor
, info
->qemu
->micro
,
77 qapi_free_VersionInfo(info
);
80 void hmp_info_kvm(Monitor
*mon
, const QDict
*qdict
)
84 info
= qmp_query_kvm(NULL
);
85 monitor_printf(mon
, "kvm support: ");
87 monitor_printf(mon
, "%s\n", info
->enabled
? "enabled" : "disabled");
89 monitor_printf(mon
, "not compiled\n");
92 qapi_free_KvmInfo(info
);
95 void hmp_info_status(Monitor
*mon
, const QDict
*qdict
)
99 info
= qmp_query_status(NULL
);
101 monitor_printf(mon
, "VM status: %s%s",
102 info
->running
? "running" : "paused",
103 info
->singlestep
? " (single step mode)" : "");
105 if (!info
->running
&& info
->status
!= RUN_STATE_PAUSED
) {
106 monitor_printf(mon
, " (%s)", RunState_lookup
[info
->status
]);
109 monitor_printf(mon
, "\n");
111 qapi_free_StatusInfo(info
);
114 void hmp_info_uuid(Monitor
*mon
, const QDict
*qdict
)
118 info
= qmp_query_uuid(NULL
);
119 monitor_printf(mon
, "%s\n", info
->UUID
);
120 qapi_free_UuidInfo(info
);
123 void hmp_info_chardev(Monitor
*mon
, const QDict
*qdict
)
125 ChardevInfoList
*char_info
, *info
;
127 char_info
= qmp_query_chardev(NULL
);
128 for (info
= char_info
; info
; info
= info
->next
) {
129 monitor_printf(mon
, "%s: filename=%s\n", info
->value
->label
,
130 info
->value
->filename
);
133 qapi_free_ChardevInfoList(char_info
);
136 void hmp_info_mice(Monitor
*mon
, const QDict
*qdict
)
138 MouseInfoList
*mice_list
, *mouse
;
140 mice_list
= qmp_query_mice(NULL
);
142 monitor_printf(mon
, "No mouse devices connected\n");
146 for (mouse
= mice_list
; mouse
; mouse
= mouse
->next
) {
147 monitor_printf(mon
, "%c Mouse #%" PRId64
": %s%s\n",
148 mouse
->value
->current
? '*' : ' ',
149 mouse
->value
->index
, mouse
->value
->name
,
150 mouse
->value
->absolute
? " (absolute)" : "");
153 qapi_free_MouseInfoList(mice_list
);
156 void hmp_info_migrate(Monitor
*mon
, const QDict
*qdict
)
159 MigrationCapabilityStatusList
*caps
, *cap
;
161 info
= qmp_query_migrate(NULL
);
162 caps
= qmp_query_migrate_capabilities(NULL
);
164 /* do not display parameters during setup */
165 if (info
->has_status
&& caps
) {
166 monitor_printf(mon
, "capabilities: ");
167 for (cap
= caps
; cap
; cap
= cap
->next
) {
168 monitor_printf(mon
, "%s: %s ",
169 MigrationCapability_lookup
[cap
->value
->capability
],
170 cap
->value
->state
? "on" : "off");
172 monitor_printf(mon
, "\n");
175 if (info
->has_status
) {
176 monitor_printf(mon
, "Migration status: %s",
177 MigrationStatus_lookup
[info
->status
]);
178 if (info
->status
== MIGRATION_STATUS_FAILED
&&
179 info
->has_error_desc
) {
180 monitor_printf(mon
, " (%s)\n", info
->error_desc
);
182 monitor_printf(mon
, "\n");
185 monitor_printf(mon
, "total time: %" PRIu64
" milliseconds\n",
187 if (info
->has_expected_downtime
) {
188 monitor_printf(mon
, "expected downtime: %" PRIu64
" milliseconds\n",
189 info
->expected_downtime
);
191 if (info
->has_downtime
) {
192 monitor_printf(mon
, "downtime: %" PRIu64
" milliseconds\n",
195 if (info
->has_setup_time
) {
196 monitor_printf(mon
, "setup: %" PRIu64
" milliseconds\n",
202 monitor_printf(mon
, "transferred ram: %" PRIu64
" kbytes\n",
203 info
->ram
->transferred
>> 10);
204 monitor_printf(mon
, "throughput: %0.2f mbps\n",
206 monitor_printf(mon
, "remaining ram: %" PRIu64
" kbytes\n",
207 info
->ram
->remaining
>> 10);
208 monitor_printf(mon
, "total ram: %" PRIu64
" kbytes\n",
209 info
->ram
->total
>> 10);
210 monitor_printf(mon
, "duplicate: %" PRIu64
" pages\n",
211 info
->ram
->duplicate
);
212 monitor_printf(mon
, "skipped: %" PRIu64
" pages\n",
214 monitor_printf(mon
, "normal: %" PRIu64
" pages\n",
216 monitor_printf(mon
, "normal bytes: %" PRIu64
" kbytes\n",
217 info
->ram
->normal_bytes
>> 10);
218 monitor_printf(mon
, "dirty sync count: %" PRIu64
"\n",
219 info
->ram
->dirty_sync_count
);
220 monitor_printf(mon
, "page size: %" PRIu64
" kbytes\n",
221 info
->ram
->page_size
>> 10);
223 if (info
->ram
->dirty_pages_rate
) {
224 monitor_printf(mon
, "dirty pages rate: %" PRIu64
" pages\n",
225 info
->ram
->dirty_pages_rate
);
227 if (info
->ram
->postcopy_requests
) {
228 monitor_printf(mon
, "postcopy request count: %" PRIu64
"\n",
229 info
->ram
->postcopy_requests
);
233 if (info
->has_disk
) {
234 monitor_printf(mon
, "transferred disk: %" PRIu64
" kbytes\n",
235 info
->disk
->transferred
>> 10);
236 monitor_printf(mon
, "remaining disk: %" PRIu64
" kbytes\n",
237 info
->disk
->remaining
>> 10);
238 monitor_printf(mon
, "total disk: %" PRIu64
" kbytes\n",
239 info
->disk
->total
>> 10);
242 if (info
->has_xbzrle_cache
) {
243 monitor_printf(mon
, "cache size: %" PRIu64
" bytes\n",
244 info
->xbzrle_cache
->cache_size
);
245 monitor_printf(mon
, "xbzrle transferred: %" PRIu64
" kbytes\n",
246 info
->xbzrle_cache
->bytes
>> 10);
247 monitor_printf(mon
, "xbzrle pages: %" PRIu64
" pages\n",
248 info
->xbzrle_cache
->pages
);
249 monitor_printf(mon
, "xbzrle cache miss: %" PRIu64
"\n",
250 info
->xbzrle_cache
->cache_miss
);
251 monitor_printf(mon
, "xbzrle cache miss rate: %0.2f\n",
252 info
->xbzrle_cache
->cache_miss_rate
);
253 monitor_printf(mon
, "xbzrle overflow : %" PRIu64
"\n",
254 info
->xbzrle_cache
->overflow
);
257 if (info
->has_cpu_throttle_percentage
) {
258 monitor_printf(mon
, "cpu throttle percentage: %" PRIu64
"\n",
259 info
->cpu_throttle_percentage
);
262 qapi_free_MigrationInfo(info
);
263 qapi_free_MigrationCapabilityStatusList(caps
);
266 void hmp_info_migrate_capabilities(Monitor
*mon
, const QDict
*qdict
)
268 MigrationCapabilityStatusList
*caps
, *cap
;
270 caps
= qmp_query_migrate_capabilities(NULL
);
273 for (cap
= caps
; cap
; cap
= cap
->next
) {
274 monitor_printf(mon
, "%s: %s\n",
275 MigrationCapability_lookup
[cap
->value
->capability
],
276 cap
->value
->state
? "on" : "off");
280 qapi_free_MigrationCapabilityStatusList(caps
);
283 void hmp_info_migrate_parameters(Monitor
*mon
, const QDict
*qdict
)
285 MigrationParameters
*params
;
287 params
= qmp_query_migrate_parameters(NULL
);
290 assert(params
->has_compress_level
);
291 monitor_printf(mon
, "%s: %" PRId64
"\n",
292 MigrationParameter_lookup
[MIGRATION_PARAMETER_COMPRESS_LEVEL
],
293 params
->compress_level
);
294 assert(params
->has_compress_threads
);
295 monitor_printf(mon
, "%s: %" PRId64
"\n",
296 MigrationParameter_lookup
[MIGRATION_PARAMETER_COMPRESS_THREADS
],
297 params
->compress_threads
);
298 assert(params
->has_decompress_threads
);
299 monitor_printf(mon
, "%s: %" PRId64
"\n",
300 MigrationParameter_lookup
[MIGRATION_PARAMETER_DECOMPRESS_THREADS
],
301 params
->decompress_threads
);
302 assert(params
->has_cpu_throttle_initial
);
303 monitor_printf(mon
, "%s: %" PRId64
"\n",
304 MigrationParameter_lookup
[MIGRATION_PARAMETER_CPU_THROTTLE_INITIAL
],
305 params
->cpu_throttle_initial
);
306 assert(params
->has_cpu_throttle_increment
);
307 monitor_printf(mon
, "%s: %" PRId64
"\n",
308 MigrationParameter_lookup
[MIGRATION_PARAMETER_CPU_THROTTLE_INCREMENT
],
309 params
->cpu_throttle_increment
);
310 monitor_printf(mon
, "%s: '%s'\n",
311 MigrationParameter_lookup
[MIGRATION_PARAMETER_TLS_CREDS
],
312 params
->has_tls_creds
? params
->tls_creds
: "");
313 monitor_printf(mon
, "%s: '%s'\n",
314 MigrationParameter_lookup
[MIGRATION_PARAMETER_TLS_HOSTNAME
],
315 params
->has_tls_hostname
? params
->tls_hostname
: "");
316 assert(params
->has_max_bandwidth
);
317 monitor_printf(mon
, "%s: %" PRId64
" bytes/second\n",
318 MigrationParameter_lookup
[MIGRATION_PARAMETER_MAX_BANDWIDTH
],
319 params
->max_bandwidth
);
320 assert(params
->has_downtime_limit
);
321 monitor_printf(mon
, "%s: %" PRId64
" milliseconds\n",
322 MigrationParameter_lookup
[MIGRATION_PARAMETER_DOWNTIME_LIMIT
],
323 params
->downtime_limit
);
324 assert(params
->has_x_checkpoint_delay
);
325 monitor_printf(mon
, "%s: %" PRId64
"\n",
326 MigrationParameter_lookup
[MIGRATION_PARAMETER_X_CHECKPOINT_DELAY
],
327 params
->x_checkpoint_delay
);
330 qapi_free_MigrationParameters(params
);
333 void hmp_info_migrate_cache_size(Monitor
*mon
, const QDict
*qdict
)
335 monitor_printf(mon
, "xbzrel cache size: %" PRId64
" kbytes\n",
336 qmp_query_migrate_cache_size(NULL
) >> 10);
339 void hmp_info_cpus(Monitor
*mon
, const QDict
*qdict
)
341 CpuInfoList
*cpu_list
, *cpu
;
343 cpu_list
= qmp_query_cpus(NULL
);
345 for (cpu
= cpu_list
; cpu
; cpu
= cpu
->next
) {
348 if (cpu
->value
->CPU
== monitor_get_cpu_index()) {
352 monitor_printf(mon
, "%c CPU #%" PRId64
":", active
, cpu
->value
->CPU
);
354 switch (cpu
->value
->arch
) {
355 case CPU_INFO_ARCH_X86
:
356 monitor_printf(mon
, " pc=0x%016" PRIx64
, cpu
->value
->u
.x86
.pc
);
358 case CPU_INFO_ARCH_PPC
:
359 monitor_printf(mon
, " nip=0x%016" PRIx64
, cpu
->value
->u
.ppc
.nip
);
361 case CPU_INFO_ARCH_SPARC
:
362 monitor_printf(mon
, " pc=0x%016" PRIx64
,
363 cpu
->value
->u
.q_sparc
.pc
);
364 monitor_printf(mon
, " npc=0x%016" PRIx64
,
365 cpu
->value
->u
.q_sparc
.npc
);
367 case CPU_INFO_ARCH_MIPS
:
368 monitor_printf(mon
, " PC=0x%016" PRIx64
, cpu
->value
->u
.q_mips
.PC
);
370 case CPU_INFO_ARCH_TRICORE
:
371 monitor_printf(mon
, " PC=0x%016" PRIx64
, cpu
->value
->u
.tricore
.PC
);
377 if (cpu
->value
->halted
) {
378 monitor_printf(mon
, " (halted)");
381 monitor_printf(mon
, " thread_id=%" PRId64
"\n", cpu
->value
->thread_id
);
384 qapi_free_CpuInfoList(cpu_list
);
387 static void print_block_info(Monitor
*mon
, BlockInfo
*info
,
388 BlockDeviceInfo
*inserted
, bool verbose
)
390 ImageInfo
*image_info
;
392 assert(!info
|| !info
->has_inserted
|| info
->inserted
== inserted
);
395 monitor_printf(mon
, "%s", info
->device
);
396 if (inserted
&& inserted
->has_node_name
) {
397 monitor_printf(mon
, " (%s)", inserted
->node_name
);
401 monitor_printf(mon
, "%s",
402 inserted
->has_node_name
403 ? inserted
->node_name
408 monitor_printf(mon
, ": %s (%s%s%s)\n",
411 inserted
->ro
? ", read-only" : "",
412 inserted
->encrypted
? ", encrypted" : "");
414 monitor_printf(mon
, ": [not inserted]\n");
418 if (info
->has_io_status
&& info
->io_status
!= BLOCK_DEVICE_IO_STATUS_OK
) {
419 monitor_printf(mon
, " I/O status: %s\n",
420 BlockDeviceIoStatus_lookup
[info
->io_status
]);
423 if (info
->removable
) {
424 monitor_printf(mon
, " Removable device: %slocked, tray %s\n",
425 info
->locked
? "" : "not ",
426 info
->tray_open
? "open" : "closed");
435 monitor_printf(mon
, " Cache mode: %s%s%s\n",
436 inserted
->cache
->writeback
? "writeback" : "writethrough",
437 inserted
->cache
->direct
? ", direct" : "",
438 inserted
->cache
->no_flush
? ", ignore flushes" : "");
440 if (inserted
->has_backing_file
) {
443 "(chain depth: %" PRId64
")\n",
444 inserted
->backing_file
,
445 inserted
->backing_file_depth
);
448 if (inserted
->detect_zeroes
!= BLOCKDEV_DETECT_ZEROES_OPTIONS_OFF
) {
449 monitor_printf(mon
, " Detect zeroes: %s\n",
450 BlockdevDetectZeroesOptions_lookup
[inserted
->detect_zeroes
]);
453 if (inserted
->bps
|| inserted
->bps_rd
|| inserted
->bps_wr
||
454 inserted
->iops
|| inserted
->iops_rd
|| inserted
->iops_wr
)
456 monitor_printf(mon
, " I/O throttling: bps=%" PRId64
457 " bps_rd=%" PRId64
" bps_wr=%" PRId64
459 " bps_rd_max=%" PRId64
460 " bps_wr_max=%" PRId64
461 " iops=%" PRId64
" iops_rd=%" PRId64
464 " iops_rd_max=%" PRId64
465 " iops_wr_max=%" PRId64
466 " iops_size=%" PRId64
472 inserted
->bps_rd_max
,
473 inserted
->bps_wr_max
,
478 inserted
->iops_rd_max
,
479 inserted
->iops_wr_max
,
485 monitor_printf(mon
, "\nImages:\n");
486 image_info
= inserted
->image
;
488 bdrv_image_info_dump((fprintf_function
)monitor_printf
,
490 if (image_info
->has_backing_image
) {
491 image_info
= image_info
->backing_image
;
499 void hmp_info_block(Monitor
*mon
, const QDict
*qdict
)
501 BlockInfoList
*block_list
, *info
;
502 BlockDeviceInfoList
*blockdev_list
, *blockdev
;
503 const char *device
= qdict_get_try_str(qdict
, "device");
504 bool verbose
= qdict_get_try_bool(qdict
, "verbose", false);
505 bool nodes
= qdict_get_try_bool(qdict
, "nodes", false);
506 bool printed
= false;
508 /* Print BlockBackend information */
510 block_list
= qmp_query_block(NULL
);
515 for (info
= block_list
; info
; info
= info
->next
) {
516 if (device
&& strcmp(device
, info
->value
->device
)) {
520 if (info
!= block_list
) {
521 monitor_printf(mon
, "\n");
524 print_block_info(mon
, info
->value
, info
->value
->has_inserted
525 ? info
->value
->inserted
: NULL
,
530 qapi_free_BlockInfoList(block_list
);
532 if ((!device
&& !nodes
) || printed
) {
536 /* Print node information */
537 blockdev_list
= qmp_query_named_block_nodes(NULL
);
538 for (blockdev
= blockdev_list
; blockdev
; blockdev
= blockdev
->next
) {
539 assert(blockdev
->value
->has_node_name
);
540 if (device
&& strcmp(device
, blockdev
->value
->node_name
)) {
544 if (blockdev
!= blockdev_list
) {
545 monitor_printf(mon
, "\n");
548 print_block_info(mon
, NULL
, blockdev
->value
, verbose
);
550 qapi_free_BlockDeviceInfoList(blockdev_list
);
553 void hmp_info_blockstats(Monitor
*mon
, const QDict
*qdict
)
555 BlockStatsList
*stats_list
, *stats
;
557 stats_list
= qmp_query_blockstats(false, false, NULL
);
559 for (stats
= stats_list
; stats
; stats
= stats
->next
) {
560 if (!stats
->value
->has_device
) {
564 monitor_printf(mon
, "%s:", stats
->value
->device
);
565 monitor_printf(mon
, " rd_bytes=%" PRId64
567 " rd_operations=%" PRId64
568 " wr_operations=%" PRId64
569 " flush_operations=%" PRId64
570 " wr_total_time_ns=%" PRId64
571 " rd_total_time_ns=%" PRId64
572 " flush_total_time_ns=%" PRId64
573 " rd_merged=%" PRId64
574 " wr_merged=%" PRId64
575 " idle_time_ns=%" PRId64
577 stats
->value
->stats
->rd_bytes
,
578 stats
->value
->stats
->wr_bytes
,
579 stats
->value
->stats
->rd_operations
,
580 stats
->value
->stats
->wr_operations
,
581 stats
->value
->stats
->flush_operations
,
582 stats
->value
->stats
->wr_total_time_ns
,
583 stats
->value
->stats
->rd_total_time_ns
,
584 stats
->value
->stats
->flush_total_time_ns
,
585 stats
->value
->stats
->rd_merged
,
586 stats
->value
->stats
->wr_merged
,
587 stats
->value
->stats
->idle_time_ns
);
590 qapi_free_BlockStatsList(stats_list
);
593 void hmp_info_vnc(Monitor
*mon
, const QDict
*qdict
)
597 VncClientInfoList
*client
;
599 info
= qmp_query_vnc(&err
);
601 error_report_err(err
);
605 if (!info
->enabled
) {
606 monitor_printf(mon
, "Server: disabled\n");
610 monitor_printf(mon
, "Server:\n");
611 if (info
->has_host
&& info
->has_service
) {
612 monitor_printf(mon
, " address: %s:%s\n", info
->host
, info
->service
);
614 if (info
->has_auth
) {
615 monitor_printf(mon
, " auth: %s\n", info
->auth
);
618 if (!info
->has_clients
|| info
->clients
== NULL
) {
619 monitor_printf(mon
, "Client: none\n");
621 for (client
= info
->clients
; client
; client
= client
->next
) {
622 monitor_printf(mon
, "Client:\n");
623 monitor_printf(mon
, " address: %s:%s\n",
625 client
->value
->service
);
626 monitor_printf(mon
, " x509_dname: %s\n",
627 client
->value
->x509_dname
?
628 client
->value
->x509_dname
: "none");
629 monitor_printf(mon
, " username: %s\n",
630 client
->value
->has_sasl_username
?
631 client
->value
->sasl_username
: "none");
636 qapi_free_VncInfo(info
);
640 void hmp_info_spice(Monitor
*mon
, const QDict
*qdict
)
642 SpiceChannelList
*chan
;
644 const char *channel_name
;
645 const char * const channel_names
[] = {
646 [SPICE_CHANNEL_MAIN
] = "main",
647 [SPICE_CHANNEL_DISPLAY
] = "display",
648 [SPICE_CHANNEL_INPUTS
] = "inputs",
649 [SPICE_CHANNEL_CURSOR
] = "cursor",
650 [SPICE_CHANNEL_PLAYBACK
] = "playback",
651 [SPICE_CHANNEL_RECORD
] = "record",
652 [SPICE_CHANNEL_TUNNEL
] = "tunnel",
653 [SPICE_CHANNEL_SMARTCARD
] = "smartcard",
654 [SPICE_CHANNEL_USBREDIR
] = "usbredir",
655 [SPICE_CHANNEL_PORT
] = "port",
657 /* minimum spice-protocol is 0.12.3, webdav was added in 0.12.7,
658 * no easy way to #ifdef (SPICE_CHANNEL_* is a enum). Disable
659 * as quick fix for build failures with older versions. */
660 [SPICE_CHANNEL_WEBDAV
] = "webdav",
664 info
= qmp_query_spice(NULL
);
666 if (!info
->enabled
) {
667 monitor_printf(mon
, "Server: disabled\n");
671 monitor_printf(mon
, "Server:\n");
672 if (info
->has_port
) {
673 monitor_printf(mon
, " address: %s:%" PRId64
"\n",
674 info
->host
, info
->port
);
676 if (info
->has_tls_port
) {
677 monitor_printf(mon
, " address: %s:%" PRId64
" [tls]\n",
678 info
->host
, info
->tls_port
);
680 monitor_printf(mon
, " migrated: %s\n",
681 info
->migrated
? "true" : "false");
682 monitor_printf(mon
, " auth: %s\n", info
->auth
);
683 monitor_printf(mon
, " compiled: %s\n", info
->compiled_version
);
684 monitor_printf(mon
, " mouse-mode: %s\n",
685 SpiceQueryMouseMode_lookup
[info
->mouse_mode
]);
687 if (!info
->has_channels
|| info
->channels
== NULL
) {
688 monitor_printf(mon
, "Channels: none\n");
690 for (chan
= info
->channels
; chan
; chan
= chan
->next
) {
691 monitor_printf(mon
, "Channel:\n");
692 monitor_printf(mon
, " address: %s:%s%s\n",
693 chan
->value
->host
, chan
->value
->port
,
694 chan
->value
->tls
? " [tls]" : "");
695 monitor_printf(mon
, " session: %" PRId64
"\n",
696 chan
->value
->connection_id
);
697 monitor_printf(mon
, " channel: %" PRId64
":%" PRId64
"\n",
698 chan
->value
->channel_type
, chan
->value
->channel_id
);
700 channel_name
= "unknown";
701 if (chan
->value
->channel_type
> 0 &&
702 chan
->value
->channel_type
< ARRAY_SIZE(channel_names
) &&
703 channel_names
[chan
->value
->channel_type
]) {
704 channel_name
= channel_names
[chan
->value
->channel_type
];
707 monitor_printf(mon
, " channel name: %s\n", channel_name
);
712 qapi_free_SpiceInfo(info
);
716 void hmp_info_balloon(Monitor
*mon
, const QDict
*qdict
)
721 info
= qmp_query_balloon(&err
);
723 error_report_err(err
);
727 monitor_printf(mon
, "balloon: actual=%" PRId64
"\n", info
->actual
>> 20);
729 qapi_free_BalloonInfo(info
);
732 static void hmp_info_pci_device(Monitor
*mon
, const PciDeviceInfo
*dev
)
734 PciMemoryRegionList
*region
;
736 monitor_printf(mon
, " Bus %2" PRId64
", ", dev
->bus
);
737 monitor_printf(mon
, "device %3" PRId64
", function %" PRId64
":\n",
738 dev
->slot
, dev
->function
);
739 monitor_printf(mon
, " ");
741 if (dev
->class_info
->has_desc
) {
742 monitor_printf(mon
, "%s", dev
->class_info
->desc
);
744 monitor_printf(mon
, "Class %04" PRId64
, dev
->class_info
->q_class
);
747 monitor_printf(mon
, ": PCI device %04" PRIx64
":%04" PRIx64
"\n",
748 dev
->id
->vendor
, dev
->id
->device
);
751 monitor_printf(mon
, " IRQ %" PRId64
".\n", dev
->irq
);
754 if (dev
->has_pci_bridge
) {
755 monitor_printf(mon
, " BUS %" PRId64
".\n",
756 dev
->pci_bridge
->bus
->number
);
757 monitor_printf(mon
, " secondary bus %" PRId64
".\n",
758 dev
->pci_bridge
->bus
->secondary
);
759 monitor_printf(mon
, " subordinate bus %" PRId64
".\n",
760 dev
->pci_bridge
->bus
->subordinate
);
762 monitor_printf(mon
, " IO range [0x%04"PRIx64
", 0x%04"PRIx64
"]\n",
763 dev
->pci_bridge
->bus
->io_range
->base
,
764 dev
->pci_bridge
->bus
->io_range
->limit
);
767 " memory range [0x%08"PRIx64
", 0x%08"PRIx64
"]\n",
768 dev
->pci_bridge
->bus
->memory_range
->base
,
769 dev
->pci_bridge
->bus
->memory_range
->limit
);
771 monitor_printf(mon
, " prefetchable memory range "
772 "[0x%08"PRIx64
", 0x%08"PRIx64
"]\n",
773 dev
->pci_bridge
->bus
->prefetchable_range
->base
,
774 dev
->pci_bridge
->bus
->prefetchable_range
->limit
);
777 for (region
= dev
->regions
; region
; region
= region
->next
) {
780 addr
= region
->value
->address
;
781 size
= region
->value
->size
;
783 monitor_printf(mon
, " BAR%" PRId64
": ", region
->value
->bar
);
785 if (!strcmp(region
->value
->type
, "io")) {
786 monitor_printf(mon
, "I/O at 0x%04" PRIx64
787 " [0x%04" PRIx64
"].\n",
788 addr
, addr
+ size
- 1);
790 monitor_printf(mon
, "%d bit%s memory at 0x%08" PRIx64
791 " [0x%08" PRIx64
"].\n",
792 region
->value
->mem_type_64
? 64 : 32,
793 region
->value
->prefetch
? " prefetchable" : "",
794 addr
, addr
+ size
- 1);
798 monitor_printf(mon
, " id \"%s\"\n", dev
->qdev_id
);
800 if (dev
->has_pci_bridge
) {
801 if (dev
->pci_bridge
->has_devices
) {
802 PciDeviceInfoList
*cdev
;
803 for (cdev
= dev
->pci_bridge
->devices
; cdev
; cdev
= cdev
->next
) {
804 hmp_info_pci_device(mon
, cdev
->value
);
810 static int hmp_info_irq_foreach(Object
*obj
, void *opaque
)
812 InterruptStatsProvider
*intc
;
813 InterruptStatsProviderClass
*k
;
814 Monitor
*mon
= opaque
;
816 if (object_dynamic_cast(obj
, TYPE_INTERRUPT_STATS_PROVIDER
)) {
817 intc
= INTERRUPT_STATS_PROVIDER(obj
);
818 k
= INTERRUPT_STATS_PROVIDER_GET_CLASS(obj
);
819 uint64_t *irq_counts
;
820 unsigned int nb_irqs
, i
;
821 if (k
->get_statistics
&&
822 k
->get_statistics(intc
, &irq_counts
, &nb_irqs
)) {
824 monitor_printf(mon
, "IRQ statistics for %s:\n",
825 object_get_typename(obj
));
826 for (i
= 0; i
< nb_irqs
; i
++) {
827 if (irq_counts
[i
] > 0) {
828 monitor_printf(mon
, "%2d: %" PRId64
"\n", i
,
834 monitor_printf(mon
, "IRQ statistics not available for %s.\n",
835 object_get_typename(obj
));
842 void hmp_info_irq(Monitor
*mon
, const QDict
*qdict
)
844 object_child_foreach_recursive(object_get_root(),
845 hmp_info_irq_foreach
, mon
);
848 static int hmp_info_pic_foreach(Object
*obj
, void *opaque
)
850 InterruptStatsProvider
*intc
;
851 InterruptStatsProviderClass
*k
;
852 Monitor
*mon
= opaque
;
854 if (object_dynamic_cast(obj
, TYPE_INTERRUPT_STATS_PROVIDER
)) {
855 intc
= INTERRUPT_STATS_PROVIDER(obj
);
856 k
= INTERRUPT_STATS_PROVIDER_GET_CLASS(obj
);
858 k
->print_info(intc
, mon
);
860 monitor_printf(mon
, "Interrupt controller information not available for %s.\n",
861 object_get_typename(obj
));
868 void hmp_info_pic(Monitor
*mon
, const QDict
*qdict
)
870 object_child_foreach_recursive(object_get_root(),
871 hmp_info_pic_foreach
, mon
);
874 void hmp_info_pci(Monitor
*mon
, const QDict
*qdict
)
876 PciInfoList
*info_list
, *info
;
879 info_list
= qmp_query_pci(&err
);
881 monitor_printf(mon
, "PCI devices not supported\n");
886 for (info
= info_list
; info
; info
= info
->next
) {
887 PciDeviceInfoList
*dev
;
889 for (dev
= info
->value
->devices
; dev
; dev
= dev
->next
) {
890 hmp_info_pci_device(mon
, dev
->value
);
894 qapi_free_PciInfoList(info_list
);
897 void hmp_info_block_jobs(Monitor
*mon
, const QDict
*qdict
)
899 BlockJobInfoList
*list
;
902 list
= qmp_query_block_jobs(&err
);
906 monitor_printf(mon
, "No active jobs\n");
911 if (strcmp(list
->value
->type
, "stream") == 0) {
912 monitor_printf(mon
, "Streaming device %s: Completed %" PRId64
913 " of %" PRId64
" bytes, speed limit %" PRId64
920 monitor_printf(mon
, "Type %s, device %s: Completed %" PRId64
921 " of %" PRId64
" bytes, speed limit %" PRId64
932 qapi_free_BlockJobInfoList(list
);
935 void hmp_info_tpm(Monitor
*mon
, const QDict
*qdict
)
937 TPMInfoList
*info_list
, *info
;
940 TPMPassthroughOptions
*tpo
;
942 info_list
= qmp_query_tpm(&err
);
944 monitor_printf(mon
, "TPM device not supported\n");
950 monitor_printf(mon
, "TPM device:\n");
953 for (info
= info_list
; info
; info
= info
->next
) {
954 TPMInfo
*ti
= info
->value
;
955 monitor_printf(mon
, " tpm%d: model=%s\n",
956 c
, TpmModel_lookup
[ti
->model
]);
958 monitor_printf(mon
, " \\ %s: type=%s",
959 ti
->id
, TpmTypeOptionsKind_lookup
[ti
->options
->type
]);
961 switch (ti
->options
->type
) {
962 case TPM_TYPE_OPTIONS_KIND_PASSTHROUGH
:
963 tpo
= ti
->options
->u
.passthrough
.data
;
964 monitor_printf(mon
, "%s%s%s%s",
965 tpo
->has_path
? ",path=" : "",
966 tpo
->has_path
? tpo
->path
: "",
967 tpo
->has_cancel_path
? ",cancel-path=" : "",
968 tpo
->has_cancel_path
? tpo
->cancel_path
: "");
970 case TPM_TYPE_OPTIONS_KIND__MAX
:
973 monitor_printf(mon
, "\n");
976 qapi_free_TPMInfoList(info_list
);
979 void hmp_quit(Monitor
*mon
, const QDict
*qdict
)
981 monitor_suspend(mon
);
985 void hmp_stop(Monitor
*mon
, const QDict
*qdict
)
990 void hmp_system_reset(Monitor
*mon
, const QDict
*qdict
)
992 qmp_system_reset(NULL
);
995 void hmp_system_powerdown(Monitor
*mon
, const QDict
*qdict
)
997 qmp_system_powerdown(NULL
);
1000 void hmp_cpu(Monitor
*mon
, const QDict
*qdict
)
1004 /* XXX: drop the monitor_set_cpu() usage when all HMP commands that
1005 use it are converted to the QAPI */
1006 cpu_index
= qdict_get_int(qdict
, "index");
1007 if (monitor_set_cpu(cpu_index
) < 0) {
1008 monitor_printf(mon
, "invalid CPU index\n");
1012 void hmp_memsave(Monitor
*mon
, const QDict
*qdict
)
1014 uint32_t size
= qdict_get_int(qdict
, "size");
1015 const char *filename
= qdict_get_str(qdict
, "filename");
1016 uint64_t addr
= qdict_get_int(qdict
, "val");
1018 int cpu_index
= monitor_get_cpu_index();
1020 if (cpu_index
< 0) {
1021 monitor_printf(mon
, "No CPU available\n");
1025 qmp_memsave(addr
, size
, filename
, true, cpu_index
, &err
);
1026 hmp_handle_error(mon
, &err
);
1029 void hmp_pmemsave(Monitor
*mon
, const QDict
*qdict
)
1031 uint32_t size
= qdict_get_int(qdict
, "size");
1032 const char *filename
= qdict_get_str(qdict
, "filename");
1033 uint64_t addr
= qdict_get_int(qdict
, "val");
1036 qmp_pmemsave(addr
, size
, filename
, &err
);
1037 hmp_handle_error(mon
, &err
);
1040 void hmp_ringbuf_write(Monitor
*mon
, const QDict
*qdict
)
1042 const char *chardev
= qdict_get_str(qdict
, "device");
1043 const char *data
= qdict_get_str(qdict
, "data");
1046 qmp_ringbuf_write(chardev
, data
, false, 0, &err
);
1048 hmp_handle_error(mon
, &err
);
1051 void hmp_ringbuf_read(Monitor
*mon
, const QDict
*qdict
)
1053 uint32_t size
= qdict_get_int(qdict
, "size");
1054 const char *chardev
= qdict_get_str(qdict
, "device");
1059 data
= qmp_ringbuf_read(chardev
, size
, false, 0, &err
);
1061 error_report_err(err
);
1065 for (i
= 0; data
[i
]; i
++) {
1066 unsigned char ch
= data
[i
];
1069 monitor_printf(mon
, "\\\\");
1070 } else if ((ch
< 0x20 && ch
!= '\n' && ch
!= '\t') || ch
== 0x7F) {
1071 monitor_printf(mon
, "\\u%04X", ch
);
1073 monitor_printf(mon
, "%c", ch
);
1077 monitor_printf(mon
, "\n");
1081 static void hmp_cont_cb(void *opaque
, int err
)
1088 static bool key_is_missing(const BlockInfo
*bdev
)
1090 return (bdev
->inserted
&& bdev
->inserted
->encryption_key_missing
);
1093 void hmp_cont(Monitor
*mon
, const QDict
*qdict
)
1095 BlockInfoList
*bdev_list
, *bdev
;
1098 bdev_list
= qmp_query_block(NULL
);
1099 for (bdev
= bdev_list
; bdev
; bdev
= bdev
->next
) {
1100 if (key_is_missing(bdev
->value
)) {
1101 monitor_read_block_device_key(mon
, bdev
->value
->device
,
1108 hmp_handle_error(mon
, &err
);
1111 qapi_free_BlockInfoList(bdev_list
);
1114 void hmp_system_wakeup(Monitor
*mon
, const QDict
*qdict
)
1116 qmp_system_wakeup(NULL
);
1119 void hmp_nmi(Monitor
*mon
, const QDict
*qdict
)
1123 qmp_inject_nmi(&err
);
1124 hmp_handle_error(mon
, &err
);
1127 void hmp_set_link(Monitor
*mon
, const QDict
*qdict
)
1129 const char *name
= qdict_get_str(qdict
, "name");
1130 bool up
= qdict_get_bool(qdict
, "up");
1133 qmp_set_link(name
, up
, &err
);
1134 hmp_handle_error(mon
, &err
);
1137 void hmp_block_passwd(Monitor
*mon
, const QDict
*qdict
)
1139 const char *device
= qdict_get_str(qdict
, "device");
1140 const char *password
= qdict_get_str(qdict
, "password");
1143 qmp_block_passwd(true, device
, false, NULL
, password
, &err
);
1144 hmp_handle_error(mon
, &err
);
1147 void hmp_balloon(Monitor
*mon
, const QDict
*qdict
)
1149 int64_t value
= qdict_get_int(qdict
, "value");
1152 qmp_balloon(value
, &err
);
1154 error_report_err(err
);
1158 void hmp_block_resize(Monitor
*mon
, const QDict
*qdict
)
1160 const char *device
= qdict_get_str(qdict
, "device");
1161 int64_t size
= qdict_get_int(qdict
, "size");
1164 qmp_block_resize(true, device
, false, NULL
, size
, &err
);
1165 hmp_handle_error(mon
, &err
);
1168 void hmp_drive_mirror(Monitor
*mon
, const QDict
*qdict
)
1170 const char *filename
= qdict_get_str(qdict
, "target");
1171 const char *format
= qdict_get_try_str(qdict
, "format");
1172 bool reuse
= qdict_get_try_bool(qdict
, "reuse", false);
1173 bool full
= qdict_get_try_bool(qdict
, "full", false);
1175 DriveMirror mirror
= {
1176 .device
= (char *)qdict_get_str(qdict
, "device"),
1177 .target
= (char *)filename
,
1178 .has_format
= !!format
,
1179 .format
= (char *)format
,
1180 .sync
= full
? MIRROR_SYNC_MODE_FULL
: MIRROR_SYNC_MODE_TOP
,
1182 .mode
= reuse
? NEW_IMAGE_MODE_EXISTING
: NEW_IMAGE_MODE_ABSOLUTE_PATHS
,
1187 error_setg(&err
, QERR_MISSING_PARAMETER
, "target");
1188 hmp_handle_error(mon
, &err
);
1191 qmp_drive_mirror(&mirror
, &err
);
1192 hmp_handle_error(mon
, &err
);
1195 void hmp_drive_backup(Monitor
*mon
, const QDict
*qdict
)
1197 const char *device
= qdict_get_str(qdict
, "device");
1198 const char *filename
= qdict_get_str(qdict
, "target");
1199 const char *format
= qdict_get_try_str(qdict
, "format");
1200 bool reuse
= qdict_get_try_bool(qdict
, "reuse", false);
1201 bool full
= qdict_get_try_bool(qdict
, "full", false);
1202 bool compress
= qdict_get_try_bool(qdict
, "compress", false);
1204 DriveBackup backup
= {
1205 .device
= (char *)device
,
1206 .target
= (char *)filename
,
1207 .has_format
= !!format
,
1208 .format
= (char *)format
,
1209 .sync
= full
? MIRROR_SYNC_MODE_FULL
: MIRROR_SYNC_MODE_TOP
,
1211 .mode
= reuse
? NEW_IMAGE_MODE_EXISTING
: NEW_IMAGE_MODE_ABSOLUTE_PATHS
,
1212 .has_compress
= !!compress
,
1213 .compress
= compress
,
1217 error_setg(&err
, QERR_MISSING_PARAMETER
, "target");
1218 hmp_handle_error(mon
, &err
);
1222 qmp_drive_backup(&backup
, &err
);
1223 hmp_handle_error(mon
, &err
);
1226 void hmp_snapshot_blkdev(Monitor
*mon
, const QDict
*qdict
)
1228 const char *device
= qdict_get_str(qdict
, "device");
1229 const char *filename
= qdict_get_try_str(qdict
, "snapshot-file");
1230 const char *format
= qdict_get_try_str(qdict
, "format");
1231 bool reuse
= qdict_get_try_bool(qdict
, "reuse", false);
1232 enum NewImageMode mode
;
1236 /* In the future, if 'snapshot-file' is not specified, the snapshot
1237 will be taken internally. Today it's actually required. */
1238 error_setg(&err
, QERR_MISSING_PARAMETER
, "snapshot-file");
1239 hmp_handle_error(mon
, &err
);
1243 mode
= reuse
? NEW_IMAGE_MODE_EXISTING
: NEW_IMAGE_MODE_ABSOLUTE_PATHS
;
1244 qmp_blockdev_snapshot_sync(true, device
, false, NULL
,
1245 filename
, false, NULL
,
1248 hmp_handle_error(mon
, &err
);
1251 void hmp_snapshot_blkdev_internal(Monitor
*mon
, const QDict
*qdict
)
1253 const char *device
= qdict_get_str(qdict
, "device");
1254 const char *name
= qdict_get_str(qdict
, "name");
1257 qmp_blockdev_snapshot_internal_sync(device
, name
, &err
);
1258 hmp_handle_error(mon
, &err
);
1261 void hmp_snapshot_delete_blkdev_internal(Monitor
*mon
, const QDict
*qdict
)
1263 const char *device
= qdict_get_str(qdict
, "device");
1264 const char *name
= qdict_get_str(qdict
, "name");
1265 const char *id
= qdict_get_try_str(qdict
, "id");
1268 qmp_blockdev_snapshot_delete_internal_sync(device
, !!id
, id
,
1270 hmp_handle_error(mon
, &err
);
1273 void hmp_loadvm(Monitor
*mon
, const QDict
*qdict
)
1275 int saved_vm_running
= runstate_is_running();
1276 const char *name
= qdict_get_str(qdict
, "name");
1278 vm_stop(RUN_STATE_RESTORE_VM
);
1280 if (load_vmstate(name
) == 0 && saved_vm_running
) {
1285 void hmp_savevm(Monitor
*mon
, const QDict
*qdict
)
1287 save_vmstate(qdict_get_try_str(qdict
, "name"));
1290 void hmp_delvm(Monitor
*mon
, const QDict
*qdict
)
1292 BlockDriverState
*bs
;
1294 const char *name
= qdict_get_str(qdict
, "name");
1296 if (bdrv_all_delete_snapshot(name
, &bs
, &err
) < 0) {
1297 error_reportf_err(err
,
1298 "Error while deleting snapshot on device '%s': ",
1299 bdrv_get_device_name(bs
));
1303 void hmp_info_snapshots(Monitor
*mon
, const QDict
*qdict
)
1305 BlockDriverState
*bs
, *bs1
;
1306 BdrvNextIterator it1
;
1307 QEMUSnapshotInfo
*sn_tab
, *sn
;
1308 bool no_snapshot
= true;
1311 int *global_snapshots
;
1312 AioContext
*aio_context
;
1314 typedef struct SnapshotEntry
{
1315 QEMUSnapshotInfo sn
;
1316 QTAILQ_ENTRY(SnapshotEntry
) next
;
1319 typedef struct ImageEntry
{
1320 const char *imagename
;
1321 QTAILQ_ENTRY(ImageEntry
) next
;
1322 QTAILQ_HEAD(, SnapshotEntry
) snapshots
;
1325 QTAILQ_HEAD(, ImageEntry
) image_list
=
1326 QTAILQ_HEAD_INITIALIZER(image_list
);
1328 ImageEntry
*image_entry
, *next_ie
;
1329 SnapshotEntry
*snapshot_entry
;
1331 bs
= bdrv_all_find_vmstate_bs();
1333 monitor_printf(mon
, "No available block device supports snapshots\n");
1336 aio_context
= bdrv_get_aio_context(bs
);
1338 aio_context_acquire(aio_context
);
1339 nb_sns
= bdrv_snapshot_list(bs
, &sn_tab
);
1340 aio_context_release(aio_context
);
1343 monitor_printf(mon
, "bdrv_snapshot_list: error %d\n", nb_sns
);
1347 for (bs1
= bdrv_first(&it1
); bs1
; bs1
= bdrv_next(&it1
)) {
1351 AioContext
*ctx
= bdrv_get_aio_context(bs1
);
1353 aio_context_acquire(ctx
);
1354 if (bdrv_can_snapshot(bs1
)) {
1356 bs1_nb_sns
= bdrv_snapshot_list(bs1
, &sn
);
1357 if (bs1_nb_sns
> 0) {
1358 no_snapshot
= false;
1359 ie
= g_new0(ImageEntry
, 1);
1360 ie
->imagename
= bdrv_get_device_name(bs1
);
1361 QTAILQ_INIT(&ie
->snapshots
);
1362 QTAILQ_INSERT_TAIL(&image_list
, ie
, next
);
1363 for (i
= 0; i
< bs1_nb_sns
; i
++) {
1364 se
= g_new0(SnapshotEntry
, 1);
1366 QTAILQ_INSERT_TAIL(&ie
->snapshots
, se
, next
);
1371 aio_context_release(ctx
);
1375 monitor_printf(mon
, "There is no snapshot available.\n");
1379 global_snapshots
= g_new0(int, nb_sns
);
1381 for (i
= 0; i
< nb_sns
; i
++) {
1382 SnapshotEntry
*next_sn
;
1383 if (bdrv_all_find_snapshot(sn_tab
[i
].name
, &bs1
) == 0) {
1384 global_snapshots
[total
] = i
;
1386 QTAILQ_FOREACH(image_entry
, &image_list
, next
) {
1387 QTAILQ_FOREACH_SAFE(snapshot_entry
, &image_entry
->snapshots
,
1389 if (!strcmp(sn_tab
[i
].name
, snapshot_entry
->sn
.name
)) {
1390 QTAILQ_REMOVE(&image_entry
->snapshots
, snapshot_entry
,
1392 g_free(snapshot_entry
);
1399 monitor_printf(mon
, "List of snapshots present on all disks:\n");
1402 bdrv_snapshot_dump((fprintf_function
)monitor_printf
, mon
, NULL
);
1403 monitor_printf(mon
, "\n");
1404 for (i
= 0; i
< total
; i
++) {
1405 sn
= &sn_tab
[global_snapshots
[i
]];
1406 /* The ID is not guaranteed to be the same on all images, so
1409 pstrcpy(sn
->id_str
, sizeof(sn
->id_str
), "--");
1410 bdrv_snapshot_dump((fprintf_function
)monitor_printf
, mon
, sn
);
1411 monitor_printf(mon
, "\n");
1414 monitor_printf(mon
, "None\n");
1417 QTAILQ_FOREACH(image_entry
, &image_list
, next
) {
1418 if (QTAILQ_EMPTY(&image_entry
->snapshots
)) {
1422 "\nList of partial (non-loadable) snapshots on '%s':\n",
1423 image_entry
->imagename
);
1424 bdrv_snapshot_dump((fprintf_function
)monitor_printf
, mon
, NULL
);
1425 monitor_printf(mon
, "\n");
1426 QTAILQ_FOREACH(snapshot_entry
, &image_entry
->snapshots
, next
) {
1427 bdrv_snapshot_dump((fprintf_function
)monitor_printf
, mon
,
1428 &snapshot_entry
->sn
);
1429 monitor_printf(mon
, "\n");
1433 QTAILQ_FOREACH_SAFE(image_entry
, &image_list
, next
, next_ie
) {
1434 SnapshotEntry
*next_sn
;
1435 QTAILQ_FOREACH_SAFE(snapshot_entry
, &image_entry
->snapshots
, next
,
1437 g_free(snapshot_entry
);
1439 g_free(image_entry
);
1442 g_free(global_snapshots
);
1446 void hmp_migrate_cancel(Monitor
*mon
, const QDict
*qdict
)
1448 qmp_migrate_cancel(NULL
);
1451 void hmp_migrate_incoming(Monitor
*mon
, const QDict
*qdict
)
1454 const char *uri
= qdict_get_str(qdict
, "uri");
1456 qmp_migrate_incoming(uri
, &err
);
1458 hmp_handle_error(mon
, &err
);
1461 /* Kept for backwards compatibility */
1462 void hmp_migrate_set_downtime(Monitor
*mon
, const QDict
*qdict
)
1464 double value
= qdict_get_double(qdict
, "value");
1465 qmp_migrate_set_downtime(value
, NULL
);
1468 void hmp_migrate_set_cache_size(Monitor
*mon
, const QDict
*qdict
)
1470 int64_t value
= qdict_get_int(qdict
, "value");
1473 qmp_migrate_set_cache_size(value
, &err
);
1475 error_report_err(err
);
1480 /* Kept for backwards compatibility */
1481 void hmp_migrate_set_speed(Monitor
*mon
, const QDict
*qdict
)
1483 int64_t value
= qdict_get_int(qdict
, "value");
1484 qmp_migrate_set_speed(value
, NULL
);
1487 void hmp_migrate_set_capability(Monitor
*mon
, const QDict
*qdict
)
1489 const char *cap
= qdict_get_str(qdict
, "capability");
1490 bool state
= qdict_get_bool(qdict
, "state");
1492 MigrationCapabilityStatusList
*caps
= g_malloc0(sizeof(*caps
));
1495 for (i
= 0; i
< MIGRATION_CAPABILITY__MAX
; i
++) {
1496 if (strcmp(cap
, MigrationCapability_lookup
[i
]) == 0) {
1497 caps
->value
= g_malloc0(sizeof(*caps
->value
));
1498 caps
->value
->capability
= i
;
1499 caps
->value
->state
= state
;
1501 qmp_migrate_set_capabilities(caps
, &err
);
1506 if (i
== MIGRATION_CAPABILITY__MAX
) {
1507 error_setg(&err
, QERR_INVALID_PARAMETER
, cap
);
1510 qapi_free_MigrationCapabilityStatusList(caps
);
1513 error_report_err(err
);
1517 void hmp_migrate_set_parameter(Monitor
*mon
, const QDict
*qdict
)
1519 const char *param
= qdict_get_str(qdict
, "parameter");
1520 const char *valuestr
= qdict_get_str(qdict
, "value");
1521 uint64_t valuebw
= 0;
1524 bool use_int_value
= false;
1527 for (i
= 0; i
< MIGRATION_PARAMETER__MAX
; i
++) {
1528 if (strcmp(param
, MigrationParameter_lookup
[i
]) == 0) {
1529 MigrationParameters p
= { 0 };
1531 case MIGRATION_PARAMETER_COMPRESS_LEVEL
:
1532 p
.has_compress_level
= true;
1533 use_int_value
= true;
1535 case MIGRATION_PARAMETER_COMPRESS_THREADS
:
1536 p
.has_compress_threads
= true;
1537 use_int_value
= true;
1539 case MIGRATION_PARAMETER_DECOMPRESS_THREADS
:
1540 p
.has_decompress_threads
= true;
1541 use_int_value
= true;
1543 case MIGRATION_PARAMETER_CPU_THROTTLE_INITIAL
:
1544 p
.has_cpu_throttle_initial
= true;
1545 use_int_value
= true;
1547 case MIGRATION_PARAMETER_CPU_THROTTLE_INCREMENT
:
1548 p
.has_cpu_throttle_increment
= true;
1549 use_int_value
= true;
1551 case MIGRATION_PARAMETER_TLS_CREDS
:
1552 p
.has_tls_creds
= true;
1553 p
.tls_creds
= (char *) valuestr
;
1555 case MIGRATION_PARAMETER_TLS_HOSTNAME
:
1556 p
.has_tls_hostname
= true;
1557 p
.tls_hostname
= (char *) valuestr
;
1559 case MIGRATION_PARAMETER_MAX_BANDWIDTH
:
1560 p
.has_max_bandwidth
= true;
1561 ret
= qemu_strtosz_MiB(valuestr
, NULL
, &valuebw
);
1562 if (ret
< 0 || valuebw
> INT64_MAX
1563 || (size_t)valuebw
!= valuebw
) {
1564 error_setg(&err
, "Invalid size %s", valuestr
);
1567 p
.max_bandwidth
= valuebw
;
1569 case MIGRATION_PARAMETER_DOWNTIME_LIMIT
:
1570 p
.has_downtime_limit
= true;
1571 use_int_value
= true;
1573 case MIGRATION_PARAMETER_X_CHECKPOINT_DELAY
:
1574 p
.has_x_checkpoint_delay
= true;
1575 use_int_value
= true;
1579 if (use_int_value
) {
1580 if (qemu_strtol(valuestr
, NULL
, 10, &valueint
) < 0) {
1581 error_setg(&err
, "Unable to parse '%s' as an int",
1585 /* Set all integers; only one has_FOO will be set, and
1586 * the code ignores the remaining values */
1587 p
.compress_level
= valueint
;
1588 p
.compress_threads
= valueint
;
1589 p
.decompress_threads
= valueint
;
1590 p
.cpu_throttle_initial
= valueint
;
1591 p
.cpu_throttle_increment
= valueint
;
1592 p
.downtime_limit
= valueint
;
1593 p
.x_checkpoint_delay
= valueint
;
1596 qmp_migrate_set_parameters(&p
, &err
);
1601 if (i
== MIGRATION_PARAMETER__MAX
) {
1602 error_setg(&err
, QERR_INVALID_PARAMETER
, param
);
1607 error_report_err(err
);
1611 void hmp_client_migrate_info(Monitor
*mon
, const QDict
*qdict
)
1614 const char *protocol
= qdict_get_str(qdict
, "protocol");
1615 const char *hostname
= qdict_get_str(qdict
, "hostname");
1616 bool has_port
= qdict_haskey(qdict
, "port");
1617 int port
= qdict_get_try_int(qdict
, "port", -1);
1618 bool has_tls_port
= qdict_haskey(qdict
, "tls-port");
1619 int tls_port
= qdict_get_try_int(qdict
, "tls-port", -1);
1620 const char *cert_subject
= qdict_get_try_str(qdict
, "cert-subject");
1622 qmp_client_migrate_info(protocol
, hostname
,
1623 has_port
, port
, has_tls_port
, tls_port
,
1624 !!cert_subject
, cert_subject
, &err
);
1625 hmp_handle_error(mon
, &err
);
1628 void hmp_migrate_start_postcopy(Monitor
*mon
, const QDict
*qdict
)
1631 qmp_migrate_start_postcopy(&err
);
1632 hmp_handle_error(mon
, &err
);
1635 void hmp_x_colo_lost_heartbeat(Monitor
*mon
, const QDict
*qdict
)
1639 qmp_x_colo_lost_heartbeat(&err
);
1640 hmp_handle_error(mon
, &err
);
1643 void hmp_set_password(Monitor
*mon
, const QDict
*qdict
)
1645 const char *protocol
= qdict_get_str(qdict
, "protocol");
1646 const char *password
= qdict_get_str(qdict
, "password");
1647 const char *connected
= qdict_get_try_str(qdict
, "connected");
1650 qmp_set_password(protocol
, password
, !!connected
, connected
, &err
);
1651 hmp_handle_error(mon
, &err
);
1654 void hmp_expire_password(Monitor
*mon
, const QDict
*qdict
)
1656 const char *protocol
= qdict_get_str(qdict
, "protocol");
1657 const char *whenstr
= qdict_get_str(qdict
, "time");
1660 qmp_expire_password(protocol
, whenstr
, &err
);
1661 hmp_handle_error(mon
, &err
);
1664 void hmp_eject(Monitor
*mon
, const QDict
*qdict
)
1666 bool force
= qdict_get_try_bool(qdict
, "force", false);
1667 const char *device
= qdict_get_str(qdict
, "device");
1670 qmp_eject(true, device
, false, NULL
, true, force
, &err
);
1671 hmp_handle_error(mon
, &err
);
1674 static void hmp_change_read_arg(void *opaque
, const char *password
,
1675 void *readline_opaque
)
1677 qmp_change_vnc_password(password
, NULL
);
1678 monitor_read_command(opaque
, 1);
1681 void hmp_change(Monitor
*mon
, const QDict
*qdict
)
1683 const char *device
= qdict_get_str(qdict
, "device");
1684 const char *target
= qdict_get_str(qdict
, "target");
1685 const char *arg
= qdict_get_try_str(qdict
, "arg");
1686 const char *read_only
= qdict_get_try_str(qdict
, "read-only-mode");
1687 BlockdevChangeReadOnlyMode read_only_mode
= 0;
1690 if (strcmp(device
, "vnc") == 0) {
1693 "Parameter 'read-only-mode' is invalid for VNC\n");
1696 if (strcmp(target
, "passwd") == 0 ||
1697 strcmp(target
, "password") == 0) {
1699 monitor_read_password(mon
, hmp_change_read_arg
, NULL
);
1703 qmp_change("vnc", target
, !!arg
, arg
, &err
);
1707 qapi_enum_parse(BlockdevChangeReadOnlyMode_lookup
,
1708 read_only
, BLOCKDEV_CHANGE_READ_ONLY_MODE__MAX
,
1709 BLOCKDEV_CHANGE_READ_ONLY_MODE_RETAIN
, &err
);
1711 hmp_handle_error(mon
, &err
);
1716 qmp_blockdev_change_medium(true, device
, false, NULL
, target
,
1717 !!arg
, arg
, !!read_only
, read_only_mode
,
1720 error_get_class(err
) == ERROR_CLASS_DEVICE_ENCRYPTED
) {
1722 monitor_read_block_device_key(mon
, device
, NULL
, NULL
);
1727 hmp_handle_error(mon
, &err
);
1730 void hmp_block_set_io_throttle(Monitor
*mon
, const QDict
*qdict
)
1733 BlockIOThrottle throttle
= {
1735 .device
= (char *) qdict_get_str(qdict
, "device"),
1736 .bps
= qdict_get_int(qdict
, "bps"),
1737 .bps_rd
= qdict_get_int(qdict
, "bps_rd"),
1738 .bps_wr
= qdict_get_int(qdict
, "bps_wr"),
1739 .iops
= qdict_get_int(qdict
, "iops"),
1740 .iops_rd
= qdict_get_int(qdict
, "iops_rd"),
1741 .iops_wr
= qdict_get_int(qdict
, "iops_wr"),
1744 qmp_block_set_io_throttle(&throttle
, &err
);
1745 hmp_handle_error(mon
, &err
);
1748 void hmp_block_stream(Monitor
*mon
, const QDict
*qdict
)
1750 Error
*error
= NULL
;
1751 const char *device
= qdict_get_str(qdict
, "device");
1752 const char *base
= qdict_get_try_str(qdict
, "base");
1753 int64_t speed
= qdict_get_try_int(qdict
, "speed", 0);
1755 qmp_block_stream(true, device
, device
, base
!= NULL
, base
, false, NULL
,
1756 false, NULL
, qdict_haskey(qdict
, "speed"), speed
,
1757 true, BLOCKDEV_ON_ERROR_REPORT
, &error
);
1759 hmp_handle_error(mon
, &error
);
1762 void hmp_block_job_set_speed(Monitor
*mon
, const QDict
*qdict
)
1764 Error
*error
= NULL
;
1765 const char *device
= qdict_get_str(qdict
, "device");
1766 int64_t value
= qdict_get_int(qdict
, "speed");
1768 qmp_block_job_set_speed(device
, value
, &error
);
1770 hmp_handle_error(mon
, &error
);
1773 void hmp_block_job_cancel(Monitor
*mon
, const QDict
*qdict
)
1775 Error
*error
= NULL
;
1776 const char *device
= qdict_get_str(qdict
, "device");
1777 bool force
= qdict_get_try_bool(qdict
, "force", false);
1779 qmp_block_job_cancel(device
, true, force
, &error
);
1781 hmp_handle_error(mon
, &error
);
1784 void hmp_block_job_pause(Monitor
*mon
, const QDict
*qdict
)
1786 Error
*error
= NULL
;
1787 const char *device
= qdict_get_str(qdict
, "device");
1789 qmp_block_job_pause(device
, &error
);
1791 hmp_handle_error(mon
, &error
);
1794 void hmp_block_job_resume(Monitor
*mon
, const QDict
*qdict
)
1796 Error
*error
= NULL
;
1797 const char *device
= qdict_get_str(qdict
, "device");
1799 qmp_block_job_resume(device
, &error
);
1801 hmp_handle_error(mon
, &error
);
1804 void hmp_block_job_complete(Monitor
*mon
, const QDict
*qdict
)
1806 Error
*error
= NULL
;
1807 const char *device
= qdict_get_str(qdict
, "device");
1809 qmp_block_job_complete(device
, &error
);
1811 hmp_handle_error(mon
, &error
);
1814 typedef struct HMPMigrationStatus
1818 bool is_block_migration
;
1819 } HMPMigrationStatus
;
1821 static void hmp_migrate_status_cb(void *opaque
)
1823 HMPMigrationStatus
*status
= opaque
;
1824 MigrationInfo
*info
;
1826 info
= qmp_query_migrate(NULL
);
1827 if (!info
->has_status
|| info
->status
== MIGRATION_STATUS_ACTIVE
||
1828 info
->status
== MIGRATION_STATUS_SETUP
) {
1829 if (info
->has_disk
) {
1832 if (info
->disk
->remaining
) {
1833 progress
= info
->disk
->transferred
* 100 / info
->disk
->total
;
1838 monitor_printf(status
->mon
, "Completed %d %%\r", progress
);
1839 monitor_flush(status
->mon
);
1842 timer_mod(status
->timer
, qemu_clock_get_ms(QEMU_CLOCK_REALTIME
) + 1000);
1844 if (status
->is_block_migration
) {
1845 monitor_printf(status
->mon
, "\n");
1847 if (info
->has_error_desc
) {
1848 error_report("%s", info
->error_desc
);
1850 monitor_resume(status
->mon
);
1851 timer_del(status
->timer
);
1855 qapi_free_MigrationInfo(info
);
1858 void hmp_migrate(Monitor
*mon
, const QDict
*qdict
)
1860 bool detach
= qdict_get_try_bool(qdict
, "detach", false);
1861 bool blk
= qdict_get_try_bool(qdict
, "blk", false);
1862 bool inc
= qdict_get_try_bool(qdict
, "inc", false);
1863 const char *uri
= qdict_get_str(qdict
, "uri");
1866 qmp_migrate(uri
, !!blk
, blk
, !!inc
, inc
, false, false, &err
);
1868 error_report_err(err
);
1873 HMPMigrationStatus
*status
;
1875 if (monitor_suspend(mon
) < 0) {
1876 monitor_printf(mon
, "terminal does not allow synchronous "
1877 "migration, continuing detached\n");
1881 status
= g_malloc0(sizeof(*status
));
1883 status
->is_block_migration
= blk
|| inc
;
1884 status
->timer
= timer_new_ms(QEMU_CLOCK_REALTIME
, hmp_migrate_status_cb
,
1886 timer_mod(status
->timer
, qemu_clock_get_ms(QEMU_CLOCK_REALTIME
));
1890 void hmp_device_add(Monitor
*mon
, const QDict
*qdict
)
1894 qmp_device_add((QDict
*)qdict
, NULL
, &err
);
1895 hmp_handle_error(mon
, &err
);
1898 void hmp_device_del(Monitor
*mon
, const QDict
*qdict
)
1900 const char *id
= qdict_get_str(qdict
, "id");
1903 qmp_device_del(id
, &err
);
1904 hmp_handle_error(mon
, &err
);
1907 void hmp_dump_guest_memory(Monitor
*mon
, const QDict
*qdict
)
1910 bool paging
= qdict_get_try_bool(qdict
, "paging", false);
1911 bool zlib
= qdict_get_try_bool(qdict
, "zlib", false);
1912 bool lzo
= qdict_get_try_bool(qdict
, "lzo", false);
1913 bool snappy
= qdict_get_try_bool(qdict
, "snappy", false);
1914 const char *file
= qdict_get_str(qdict
, "filename");
1915 bool has_begin
= qdict_haskey(qdict
, "begin");
1916 bool has_length
= qdict_haskey(qdict
, "length");
1917 bool has_detach
= qdict_haskey(qdict
, "detach");
1920 bool detach
= false;
1921 enum DumpGuestMemoryFormat dump_format
= DUMP_GUEST_MEMORY_FORMAT_ELF
;
1924 if (zlib
+ lzo
+ snappy
> 1) {
1925 error_setg(&err
, "only one of '-z|-l|-s' can be set");
1926 hmp_handle_error(mon
, &err
);
1931 dump_format
= DUMP_GUEST_MEMORY_FORMAT_KDUMP_ZLIB
;
1935 dump_format
= DUMP_GUEST_MEMORY_FORMAT_KDUMP_LZO
;
1939 dump_format
= DUMP_GUEST_MEMORY_FORMAT_KDUMP_SNAPPY
;
1943 begin
= qdict_get_int(qdict
, "begin");
1946 length
= qdict_get_int(qdict
, "length");
1949 detach
= qdict_get_bool(qdict
, "detach");
1952 prot
= g_strconcat("file:", file
, NULL
);
1954 qmp_dump_guest_memory(paging
, prot
, true, detach
, has_begin
, begin
,
1955 has_length
, length
, true, dump_format
, &err
);
1956 hmp_handle_error(mon
, &err
);
1960 void hmp_netdev_add(Monitor
*mon
, const QDict
*qdict
)
1965 opts
= qemu_opts_from_qdict(qemu_find_opts("netdev"), qdict
, &err
);
1970 netdev_add(opts
, &err
);
1972 qemu_opts_del(opts
);
1976 hmp_handle_error(mon
, &err
);
1979 void hmp_netdev_del(Monitor
*mon
, const QDict
*qdict
)
1981 const char *id
= qdict_get_str(qdict
, "id");
1984 qmp_netdev_del(id
, &err
);
1985 hmp_handle_error(mon
, &err
);
1988 void hmp_object_add(Monitor
*mon
, const QDict
*qdict
)
1994 opts
= qemu_opts_from_qdict(qemu_find_opts("object"), qdict
, &err
);
1996 hmp_handle_error(mon
, &err
);
2000 obj
= user_creatable_add_opts(opts
, &err
);
2001 qemu_opts_del(opts
);
2004 hmp_handle_error(mon
, &err
);
2011 void hmp_getfd(Monitor
*mon
, const QDict
*qdict
)
2013 const char *fdname
= qdict_get_str(qdict
, "fdname");
2016 qmp_getfd(fdname
, &err
);
2017 hmp_handle_error(mon
, &err
);
2020 void hmp_closefd(Monitor
*mon
, const QDict
*qdict
)
2022 const char *fdname
= qdict_get_str(qdict
, "fdname");
2025 qmp_closefd(fdname
, &err
);
2026 hmp_handle_error(mon
, &err
);
2029 void hmp_sendkey(Monitor
*mon
, const QDict
*qdict
)
2031 const char *keys
= qdict_get_str(qdict
, "keys");
2032 KeyValueList
*keylist
, *head
= NULL
, *tmp
= NULL
;
2033 int has_hold_time
= qdict_haskey(qdict
, "hold-time");
2034 int hold_time
= qdict_get_try_int(qdict
, "hold-time", -1);
2040 separator
= strchr(keys
, '-');
2041 keyname_len
= separator
? separator
- keys
: strlen(keys
);
2043 /* Be compatible with old interface, convert user inputted "<" */
2044 if (keys
[0] == '<' && keyname_len
== 1) {
2049 keylist
= g_malloc0(sizeof(*keylist
));
2050 keylist
->value
= g_malloc0(sizeof(*keylist
->value
));
2056 tmp
->next
= keylist
;
2060 if (strstart(keys
, "0x", NULL
)) {
2062 int value
= strtoul(keys
, &endp
, 0);
2063 assert(endp
<= keys
+ keyname_len
);
2064 if (endp
!= keys
+ keyname_len
) {
2067 keylist
->value
->type
= KEY_VALUE_KIND_NUMBER
;
2068 keylist
->value
->u
.number
.data
= value
;
2070 int idx
= index_from_key(keys
, keyname_len
);
2071 if (idx
== Q_KEY_CODE__MAX
) {
2074 keylist
->value
->type
= KEY_VALUE_KIND_QCODE
;
2075 keylist
->value
->u
.qcode
.data
= idx
;
2081 keys
= separator
+ 1;
2084 qmp_send_key(head
, has_hold_time
, hold_time
, &err
);
2085 hmp_handle_error(mon
, &err
);
2088 qapi_free_KeyValueList(head
);
2092 monitor_printf(mon
, "invalid parameter: %.*s\n", keyname_len
, keys
);
2096 void hmp_screendump(Monitor
*mon
, const QDict
*qdict
)
2098 const char *filename
= qdict_get_str(qdict
, "filename");
2101 qmp_screendump(filename
, &err
);
2102 hmp_handle_error(mon
, &err
);
2105 void hmp_nbd_server_start(Monitor
*mon
, const QDict
*qdict
)
2107 const char *uri
= qdict_get_str(qdict
, "uri");
2108 bool writable
= qdict_get_try_bool(qdict
, "writable", false);
2109 bool all
= qdict_get_try_bool(qdict
, "all", false);
2110 Error
*local_err
= NULL
;
2111 BlockInfoList
*block_list
, *info
;
2112 SocketAddress
*addr
;
2114 if (writable
&& !all
) {
2115 error_setg(&local_err
, "-w only valid together with -a");
2119 /* First check if the address is valid and start the server. */
2120 addr
= socket_parse(uri
, &local_err
);
2121 if (local_err
!= NULL
) {
2125 nbd_server_start(addr
, NULL
, &local_err
);
2126 qapi_free_SocketAddress(addr
);
2127 if (local_err
!= NULL
) {
2135 /* Then try adding all block devices. If one fails, close all and
2138 block_list
= qmp_query_block(NULL
);
2140 for (info
= block_list
; info
; info
= info
->next
) {
2141 if (!info
->value
->has_inserted
) {
2145 qmp_nbd_server_add(info
->value
->device
, true, writable
, &local_err
);
2147 if (local_err
!= NULL
) {
2148 qmp_nbd_server_stop(NULL
);
2153 qapi_free_BlockInfoList(block_list
);
2156 hmp_handle_error(mon
, &local_err
);
2159 void hmp_nbd_server_add(Monitor
*mon
, const QDict
*qdict
)
2161 const char *device
= qdict_get_str(qdict
, "device");
2162 bool writable
= qdict_get_try_bool(qdict
, "writable", false);
2163 Error
*local_err
= NULL
;
2165 qmp_nbd_server_add(device
, true, writable
, &local_err
);
2167 if (local_err
!= NULL
) {
2168 hmp_handle_error(mon
, &local_err
);
2172 void hmp_nbd_server_stop(Monitor
*mon
, const QDict
*qdict
)
2176 qmp_nbd_server_stop(&err
);
2177 hmp_handle_error(mon
, &err
);
2180 void hmp_cpu_add(Monitor
*mon
, const QDict
*qdict
)
2185 cpuid
= qdict_get_int(qdict
, "id");
2186 qmp_cpu_add(cpuid
, &err
);
2187 hmp_handle_error(mon
, &err
);
2190 void hmp_chardev_add(Monitor
*mon
, const QDict
*qdict
)
2192 const char *args
= qdict_get_str(qdict
, "args");
2196 opts
= qemu_opts_parse_noisily(qemu_find_opts("chardev"), args
, true);
2198 error_setg(&err
, "Parsing chardev args failed");
2200 qemu_chr_new_from_opts(opts
, &err
);
2201 qemu_opts_del(opts
);
2203 hmp_handle_error(mon
, &err
);
2206 void hmp_chardev_remove(Monitor
*mon
, const QDict
*qdict
)
2208 Error
*local_err
= NULL
;
2210 qmp_chardev_remove(qdict_get_str(qdict
, "id"), &local_err
);
2211 hmp_handle_error(mon
, &local_err
);
2214 void hmp_qemu_io(Monitor
*mon
, const QDict
*qdict
)
2217 BlockBackend
*local_blk
= NULL
;
2218 AioContext
*aio_context
;
2219 const char* device
= qdict_get_str(qdict
, "device");
2220 const char* command
= qdict_get_str(qdict
, "command");
2224 blk
= blk_by_name(device
);
2226 BlockDriverState
*bs
= bdrv_lookup_bs(NULL
, device
, &err
);
2228 blk
= local_blk
= blk_new(0, BLK_PERM_ALL
);
2229 ret
= blk_insert_bs(blk
, bs
, &err
);
2238 aio_context
= blk_get_aio_context(blk
);
2239 aio_context_acquire(aio_context
);
2242 * Notably absent: Proper permission management. This is sad, but it seems
2243 * almost impossible to achieve without changing the semantics and thereby
2244 * limiting the use cases of the qemu-io HMP command.
2246 * In an ideal world we would unconditionally create a new BlockBackend for
2247 * qemuio_command(), but we have commands like 'reopen' and want them to
2248 * take effect on the exact BlockBackend whose name the user passed instead
2249 * of just on a temporary copy of it.
2251 * Another problem is that deleting the temporary BlockBackend involves
2252 * draining all requests on it first, but some qemu-iotests cases want to
2253 * issue multiple aio_read/write requests and expect them to complete in
2254 * the background while the monitor has already returned.
2256 * This is also what prevents us from saving the original permissions and
2257 * restoring them later: We can't revoke permissions until all requests
2258 * have completed, and we don't know when that is nor can we really let
2259 * anything else run before we have revoken them to avoid race conditions.
2261 * What happens now is that command() in qemu-io-cmds.c can extend the
2262 * permissions if necessary for the qemu-io command. And they simply stay
2263 * extended, possibly resulting in a read-only guest device keeping write
2264 * permissions. Ugly, but it appears to be the lesser evil.
2266 qemuio_command(blk
, command
);
2268 aio_context_release(aio_context
);
2271 blk_unref(local_blk
);
2272 hmp_handle_error(mon
, &err
);
2275 void hmp_object_del(Monitor
*mon
, const QDict
*qdict
)
2277 const char *id
= qdict_get_str(qdict
, "id");
2280 user_creatable_del(id
, &err
);
2281 hmp_handle_error(mon
, &err
);
2284 void hmp_info_memdev(Monitor
*mon
, const QDict
*qdict
)
2287 MemdevList
*memdev_list
= qmp_query_memdev(&err
);
2288 MemdevList
*m
= memdev_list
;
2293 v
= string_output_visitor_new(false, &str
);
2294 visit_type_uint16List(v
, NULL
, &m
->value
->host_nodes
, NULL
);
2295 monitor_printf(mon
, "memory backend: %s\n", m
->value
->id
);
2296 monitor_printf(mon
, " size: %" PRId64
"\n", m
->value
->size
);
2297 monitor_printf(mon
, " merge: %s\n",
2298 m
->value
->merge
? "true" : "false");
2299 monitor_printf(mon
, " dump: %s\n",
2300 m
->value
->dump
? "true" : "false");
2301 monitor_printf(mon
, " prealloc: %s\n",
2302 m
->value
->prealloc
? "true" : "false");
2303 monitor_printf(mon
, " policy: %s\n",
2304 HostMemPolicy_lookup
[m
->value
->policy
]);
2305 visit_complete(v
, &str
);
2306 monitor_printf(mon
, " host nodes: %s\n", str
);
2313 monitor_printf(mon
, "\n");
2315 qapi_free_MemdevList(memdev_list
);
2318 void hmp_info_memory_devices(Monitor
*mon
, const QDict
*qdict
)
2321 MemoryDeviceInfoList
*info_list
= qmp_query_memory_devices(&err
);
2322 MemoryDeviceInfoList
*info
;
2323 MemoryDeviceInfo
*value
;
2324 PCDIMMDeviceInfo
*di
;
2326 for (info
= info_list
; info
; info
= info
->next
) {
2327 value
= info
->value
;
2330 switch (value
->type
) {
2331 case MEMORY_DEVICE_INFO_KIND_DIMM
:
2332 di
= value
->u
.dimm
.data
;
2334 monitor_printf(mon
, "Memory device [%s]: \"%s\"\n",
2335 MemoryDeviceInfoKind_lookup
[value
->type
],
2336 di
->id
? di
->id
: "");
2337 monitor_printf(mon
, " addr: 0x%" PRIx64
"\n", di
->addr
);
2338 monitor_printf(mon
, " slot: %" PRId64
"\n", di
->slot
);
2339 monitor_printf(mon
, " node: %" PRId64
"\n", di
->node
);
2340 monitor_printf(mon
, " size: %" PRIu64
"\n", di
->size
);
2341 monitor_printf(mon
, " memdev: %s\n", di
->memdev
);
2342 monitor_printf(mon
, " hotplugged: %s\n",
2343 di
->hotplugged
? "true" : "false");
2344 monitor_printf(mon
, " hotpluggable: %s\n",
2345 di
->hotpluggable
? "true" : "false");
2353 qapi_free_MemoryDeviceInfoList(info_list
);
2356 void hmp_info_iothreads(Monitor
*mon
, const QDict
*qdict
)
2358 IOThreadInfoList
*info_list
= qmp_query_iothreads(NULL
);
2359 IOThreadInfoList
*info
;
2360 IOThreadInfo
*value
;
2362 for (info
= info_list
; info
; info
= info
->next
) {
2363 value
= info
->value
;
2364 monitor_printf(mon
, "%s:\n", value
->id
);
2365 monitor_printf(mon
, " thread_id=%" PRId64
"\n", value
->thread_id
);
2366 monitor_printf(mon
, " poll-max-ns=%" PRId64
"\n", value
->poll_max_ns
);
2367 monitor_printf(mon
, " poll-grow=%" PRId64
"\n", value
->poll_grow
);
2368 monitor_printf(mon
, " poll-shrink=%" PRId64
"\n", value
->poll_shrink
);
2371 qapi_free_IOThreadInfoList(info_list
);
2374 void hmp_qom_list(Monitor
*mon
, const QDict
*qdict
)
2376 const char *path
= qdict_get_try_str(qdict
, "path");
2377 ObjectPropertyInfoList
*list
;
2381 monitor_printf(mon
, "/\n");
2385 list
= qmp_qom_list(path
, &err
);
2387 ObjectPropertyInfoList
*start
= list
;
2388 while (list
!= NULL
) {
2389 ObjectPropertyInfo
*value
= list
->value
;
2391 monitor_printf(mon
, "%s (%s)\n",
2392 value
->name
, value
->type
);
2395 qapi_free_ObjectPropertyInfoList(start
);
2397 hmp_handle_error(mon
, &err
);
2400 void hmp_qom_set(Monitor
*mon
, const QDict
*qdict
)
2402 const char *path
= qdict_get_str(qdict
, "path");
2403 const char *property
= qdict_get_str(qdict
, "property");
2404 const char *value
= qdict_get_str(qdict
, "value");
2406 bool ambiguous
= false;
2409 obj
= object_resolve_path(path
, &ambiguous
);
2411 error_set(&err
, ERROR_CLASS_DEVICE_NOT_FOUND
,
2412 "Device '%s' not found", path
);
2415 monitor_printf(mon
, "Warning: Path '%s' is ambiguous\n", path
);
2417 object_property_parse(obj
, value
, property
, &err
);
2419 hmp_handle_error(mon
, &err
);
2422 void hmp_rocker(Monitor
*mon
, const QDict
*qdict
)
2424 const char *name
= qdict_get_str(qdict
, "name");
2425 RockerSwitch
*rocker
;
2428 rocker
= qmp_query_rocker(name
, &err
);
2430 hmp_handle_error(mon
, &err
);
2434 monitor_printf(mon
, "name: %s\n", rocker
->name
);
2435 monitor_printf(mon
, "id: 0x%" PRIx64
"\n", rocker
->id
);
2436 monitor_printf(mon
, "ports: %d\n", rocker
->ports
);
2438 qapi_free_RockerSwitch(rocker
);
2441 void hmp_rocker_ports(Monitor
*mon
, const QDict
*qdict
)
2443 RockerPortList
*list
, *port
;
2444 const char *name
= qdict_get_str(qdict
, "name");
2447 list
= qmp_query_rocker_ports(name
, &err
);
2449 hmp_handle_error(mon
, &err
);
2453 monitor_printf(mon
, " ena/ speed/ auto\n");
2454 monitor_printf(mon
, " port link duplex neg?\n");
2456 for (port
= list
; port
; port
= port
->next
) {
2457 monitor_printf(mon
, "%10s %-4s %-3s %2s %-3s\n",
2459 port
->value
->enabled
? port
->value
->link_up
?
2460 "up" : "down" : "!ena",
2461 port
->value
->speed
== 10000 ? "10G" : "??",
2462 port
->value
->duplex
? "FD" : "HD",
2463 port
->value
->autoneg
? "Yes" : "No");
2466 qapi_free_RockerPortList(list
);
2469 void hmp_rocker_of_dpa_flows(Monitor
*mon
, const QDict
*qdict
)
2471 RockerOfDpaFlowList
*list
, *info
;
2472 const char *name
= qdict_get_str(qdict
, "name");
2473 uint32_t tbl_id
= qdict_get_try_int(qdict
, "tbl_id", -1);
2476 list
= qmp_query_rocker_of_dpa_flows(name
, tbl_id
!= -1, tbl_id
, &err
);
2478 hmp_handle_error(mon
, &err
);
2482 monitor_printf(mon
, "prio tbl hits key(mask) --> actions\n");
2484 for (info
= list
; info
; info
= info
->next
) {
2485 RockerOfDpaFlow
*flow
= info
->value
;
2486 RockerOfDpaFlowKey
*key
= flow
->key
;
2487 RockerOfDpaFlowMask
*mask
= flow
->mask
;
2488 RockerOfDpaFlowAction
*action
= flow
->action
;
2491 monitor_printf(mon
, "%-4d %-3d %-4" PRIu64
,
2492 key
->priority
, key
->tbl_id
, flow
->hits
);
2494 monitor_printf(mon
, "%-4d %-3d ",
2495 key
->priority
, key
->tbl_id
);
2498 if (key
->has_in_pport
) {
2499 monitor_printf(mon
, " pport %d", key
->in_pport
);
2500 if (mask
->has_in_pport
) {
2501 monitor_printf(mon
, "(0x%x)", mask
->in_pport
);
2505 if (key
->has_vlan_id
) {
2506 monitor_printf(mon
, " vlan %d",
2507 key
->vlan_id
& VLAN_VID_MASK
);
2508 if (mask
->has_vlan_id
) {
2509 monitor_printf(mon
, "(0x%x)", mask
->vlan_id
);
2513 if (key
->has_tunnel_id
) {
2514 monitor_printf(mon
, " tunnel %d", key
->tunnel_id
);
2515 if (mask
->has_tunnel_id
) {
2516 monitor_printf(mon
, "(0x%x)", mask
->tunnel_id
);
2520 if (key
->has_eth_type
) {
2521 switch (key
->eth_type
) {
2523 monitor_printf(mon
, " ARP");
2526 monitor_printf(mon
, " IP");
2529 monitor_printf(mon
, " IPv6");
2532 monitor_printf(mon
, " LACP");
2535 monitor_printf(mon
, " LLDP");
2538 monitor_printf(mon
, " eth type 0x%04x", key
->eth_type
);
2543 if (key
->has_eth_src
) {
2544 if ((strcmp(key
->eth_src
, "01:00:00:00:00:00") == 0) &&
2545 (mask
->has_eth_src
) &&
2546 (strcmp(mask
->eth_src
, "01:00:00:00:00:00") == 0)) {
2547 monitor_printf(mon
, " src <any mcast/bcast>");
2548 } else if ((strcmp(key
->eth_src
, "00:00:00:00:00:00") == 0) &&
2549 (mask
->has_eth_src
) &&
2550 (strcmp(mask
->eth_src
, "01:00:00:00:00:00") == 0)) {
2551 monitor_printf(mon
, " src <any ucast>");
2553 monitor_printf(mon
, " src %s", key
->eth_src
);
2554 if (mask
->has_eth_src
) {
2555 monitor_printf(mon
, "(%s)", mask
->eth_src
);
2560 if (key
->has_eth_dst
) {
2561 if ((strcmp(key
->eth_dst
, "01:00:00:00:00:00") == 0) &&
2562 (mask
->has_eth_dst
) &&
2563 (strcmp(mask
->eth_dst
, "01:00:00:00:00:00") == 0)) {
2564 monitor_printf(mon
, " dst <any mcast/bcast>");
2565 } else if ((strcmp(key
->eth_dst
, "00:00:00:00:00:00") == 0) &&
2566 (mask
->has_eth_dst
) &&
2567 (strcmp(mask
->eth_dst
, "01:00:00:00:00:00") == 0)) {
2568 monitor_printf(mon
, " dst <any ucast>");
2570 monitor_printf(mon
, " dst %s", key
->eth_dst
);
2571 if (mask
->has_eth_dst
) {
2572 monitor_printf(mon
, "(%s)", mask
->eth_dst
);
2577 if (key
->has_ip_proto
) {
2578 monitor_printf(mon
, " proto %d", key
->ip_proto
);
2579 if (mask
->has_ip_proto
) {
2580 monitor_printf(mon
, "(0x%x)", mask
->ip_proto
);
2584 if (key
->has_ip_tos
) {
2585 monitor_printf(mon
, " TOS %d", key
->ip_tos
);
2586 if (mask
->has_ip_tos
) {
2587 monitor_printf(mon
, "(0x%x)", mask
->ip_tos
);
2591 if (key
->has_ip_dst
) {
2592 monitor_printf(mon
, " dst %s", key
->ip_dst
);
2595 if (action
->has_goto_tbl
|| action
->has_group_id
||
2596 action
->has_new_vlan_id
) {
2597 monitor_printf(mon
, " -->");
2600 if (action
->has_new_vlan_id
) {
2601 monitor_printf(mon
, " apply new vlan %d",
2602 ntohs(action
->new_vlan_id
));
2605 if (action
->has_group_id
) {
2606 monitor_printf(mon
, " write group 0x%08x", action
->group_id
);
2609 if (action
->has_goto_tbl
) {
2610 monitor_printf(mon
, " goto tbl %d", action
->goto_tbl
);
2613 monitor_printf(mon
, "\n");
2616 qapi_free_RockerOfDpaFlowList(list
);
2619 void hmp_rocker_of_dpa_groups(Monitor
*mon
, const QDict
*qdict
)
2621 RockerOfDpaGroupList
*list
, *g
;
2622 const char *name
= qdict_get_str(qdict
, "name");
2623 uint8_t type
= qdict_get_try_int(qdict
, "type", 9);
2627 list
= qmp_query_rocker_of_dpa_groups(name
, type
!= 9, type
, &err
);
2629 hmp_handle_error(mon
, &err
);
2633 monitor_printf(mon
, "id (decode) --> buckets\n");
2635 for (g
= list
; g
; g
= g
->next
) {
2636 RockerOfDpaGroup
*group
= g
->value
;
2638 monitor_printf(mon
, "0x%08x", group
->id
);
2640 monitor_printf(mon
, " (type %s", group
->type
== 0 ? "L2 interface" :
2641 group
->type
== 1 ? "L2 rewrite" :
2642 group
->type
== 2 ? "L3 unicast" :
2643 group
->type
== 3 ? "L2 multicast" :
2644 group
->type
== 4 ? "L2 flood" :
2645 group
->type
== 5 ? "L3 interface" :
2646 group
->type
== 6 ? "L3 multicast" :
2647 group
->type
== 7 ? "L3 ECMP" :
2648 group
->type
== 8 ? "L2 overlay" :
2651 if (group
->has_vlan_id
) {
2652 monitor_printf(mon
, " vlan %d", group
->vlan_id
);
2655 if (group
->has_pport
) {
2656 monitor_printf(mon
, " pport %d", group
->pport
);
2659 if (group
->has_index
) {
2660 monitor_printf(mon
, " index %d", group
->index
);
2663 monitor_printf(mon
, ") -->");
2665 if (group
->has_set_vlan_id
&& group
->set_vlan_id
) {
2667 monitor_printf(mon
, " set vlan %d",
2668 group
->set_vlan_id
& VLAN_VID_MASK
);
2671 if (group
->has_set_eth_src
) {
2674 monitor_printf(mon
, " set");
2676 monitor_printf(mon
, " src %s", group
->set_eth_src
);
2679 if (group
->has_set_eth_dst
) {
2682 monitor_printf(mon
, " set");
2684 monitor_printf(mon
, " dst %s", group
->set_eth_dst
);
2689 if (group
->has_ttl_check
&& group
->ttl_check
) {
2690 monitor_printf(mon
, " check TTL");
2693 if (group
->has_group_id
&& group
->group_id
) {
2694 monitor_printf(mon
, " group id 0x%08x", group
->group_id
);
2697 if (group
->has_pop_vlan
&& group
->pop_vlan
) {
2698 monitor_printf(mon
, " pop vlan");
2701 if (group
->has_out_pport
) {
2702 monitor_printf(mon
, " out pport %d", group
->out_pport
);
2705 if (group
->has_group_ids
) {
2706 struct uint32List
*id
;
2708 monitor_printf(mon
, " groups [");
2709 for (id
= group
->group_ids
; id
; id
= id
->next
) {
2710 monitor_printf(mon
, "0x%08x", id
->value
);
2712 monitor_printf(mon
, ",");
2715 monitor_printf(mon
, "]");
2718 monitor_printf(mon
, "\n");
2721 qapi_free_RockerOfDpaGroupList(list
);
2724 void hmp_info_dump(Monitor
*mon
, const QDict
*qdict
)
2726 DumpQueryResult
*result
= qmp_query_dump(NULL
);
2728 assert(result
&& result
->status
< DUMP_STATUS__MAX
);
2729 monitor_printf(mon
, "Status: %s\n", DumpStatus_lookup
[result
->status
]);
2731 if (result
->status
== DUMP_STATUS_ACTIVE
) {
2733 assert(result
->total
!= 0);
2734 percent
= 100.0 * result
->completed
/ result
->total
;
2735 monitor_printf(mon
, "Finished: %.2f %%\n", percent
);
2738 qapi_free_DumpQueryResult(result
);
2741 void hmp_hotpluggable_cpus(Monitor
*mon
, const QDict
*qdict
)
2744 HotpluggableCPUList
*l
= qmp_query_hotpluggable_cpus(&err
);
2745 HotpluggableCPUList
*saved
= l
;
2746 CpuInstanceProperties
*c
;
2749 hmp_handle_error(mon
, &err
);
2753 monitor_printf(mon
, "Hotpluggable CPUs:\n");
2755 monitor_printf(mon
, " type: \"%s\"\n", l
->value
->type
);
2756 monitor_printf(mon
, " vcpus_count: \"%" PRIu64
"\"\n",
2757 l
->value
->vcpus_count
);
2758 if (l
->value
->has_qom_path
) {
2759 monitor_printf(mon
, " qom_path: \"%s\"\n", l
->value
->qom_path
);
2762 c
= l
->value
->props
;
2763 monitor_printf(mon
, " CPUInstance Properties:\n");
2764 if (c
->has_node_id
) {
2765 monitor_printf(mon
, " node-id: \"%" PRIu64
"\"\n", c
->node_id
);
2767 if (c
->has_socket_id
) {
2768 monitor_printf(mon
, " socket-id: \"%" PRIu64
"\"\n", c
->socket_id
);
2770 if (c
->has_core_id
) {
2771 monitor_printf(mon
, " core-id: \"%" PRIu64
"\"\n", c
->core_id
);
2773 if (c
->has_thread_id
) {
2774 monitor_printf(mon
, " thread-id: \"%" PRIu64
"\"\n", c
->thread_id
);
2780 qapi_free_HotpluggableCPUList(saved
);
2783 void hmp_info_vm_generation_id(Monitor
*mon
, const QDict
*qdict
)
2786 GuidInfo
*info
= qmp_query_vm_generation_id(&err
);
2788 monitor_printf(mon
, "%s\n", info
->guid
);
2790 hmp_handle_error(mon
, &err
);
2791 qapi_free_GuidInfo(info
);