2 * QEMU disk image utility
4 * Copyright (c) 2003-2008 Fabrice Bellard
6 * Permission is hereby granted, free of charge, to any person obtaining a copy
7 * of this software and associated documentation files (the "Software"), to deal
8 * in the Software without restriction, including without limitation the rights
9 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
10 * copies of the Software, and to permit persons to whom the Software is
11 * furnished to do so, subject to the following conditions:
13 * The above copyright notice and this permission notice shall be included in
14 * all copies or substantial portions of the Software.
16 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
17 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
18 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
19 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
20 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
21 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
24 #include "qapi-visit.h"
25 #include "qapi/qmp-output-visitor.h"
26 #include "qapi/qmp/qjson.h"
27 #include "qemu-common.h"
28 #include "qemu/option.h"
29 #include "qemu/error-report.h"
30 #include "qemu/osdep.h"
31 #include "sysemu/sysemu.h"
32 #include "block/block_int.h"
33 #include "block/qapi.h"
42 typedef struct img_cmd_t
{
44 int (*handler
)(int argc
, char **argv
);
49 OPTION_BACKING_CHAIN
= 257,
52 typedef enum OutputFormat
{
57 /* Default to cache=writeback as data integrity is not important for qemu-tcg. */
58 #define BDRV_O_FLAGS BDRV_O_CACHE_WB
59 #define BDRV_DEFAULT_CACHE "writeback"
61 static void format_print(void *opaque
, const char *name
)
66 /* Please keep in synch with qemu-img.texi */
67 static void help(void)
69 const char *help_msg
=
70 "qemu-img version " QEMU_VERSION
", Copyright (c) 2004-2008 Fabrice Bellard\n"
71 "usage: qemu-img command [command options]\n"
72 "QEMU disk image utility\n"
75 #define DEF(option, callback, arg_string) \
77 #include "qemu-img-cmds.h"
81 "Command parameters:\n"
82 " 'filename' is a disk image filename\n"
83 " 'fmt' is the disk image format. It is guessed automatically in most cases\n"
84 " 'cache' is the cache mode used to write the output disk image, the valid\n"
85 " options are: 'none', 'writeback' (default, except for convert), 'writethrough',\n"
86 " 'directsync' and 'unsafe' (default for convert)\n"
87 " 'size' is the disk image size in bytes. Optional suffixes\n"
88 " 'k' or 'K' (kilobyte, 1024), 'M' (megabyte, 1024k), 'G' (gigabyte, 1024M),\n"
89 " 'T' (terabyte, 1024G), 'P' (petabyte, 1024T) and 'E' (exabyte, 1024P) are\n"
90 " supported. 'b' is ignored.\n"
91 " 'output_filename' is the destination disk image filename\n"
92 " 'output_fmt' is the destination format\n"
93 " 'options' is a comma separated list of format specific options in a\n"
94 " name=value format. Use -o ? for an overview of the options supported by the\n"
96 " 'snapshot_param' is param used for internal snapshot, format\n"
97 " is 'snapshot.id=[ID],snapshot.name=[NAME]', or\n"
99 " 'snapshot_id_or_name' is deprecated, use 'snapshot_param'\n"
101 " '-c' indicates that target image must be compressed (qcow format only)\n"
102 " '-u' enables unsafe rebasing. It is assumed that old and new backing file\n"
103 " match exactly. The image doesn't need a working backing file before\n"
104 " rebasing in this case (useful for renaming the backing file)\n"
105 " '-h' with or without a command shows this help and lists the supported formats\n"
106 " '-p' show progress of command (only certain commands)\n"
107 " '-q' use Quiet mode - do not print any output (except errors)\n"
108 " '-S' indicates the consecutive number of bytes (defaults to 4k) that must\n"
109 " contain only zeros for qemu-img to create a sparse image during\n"
110 " conversion. If the number of bytes is 0, the source will not be scanned for\n"
111 " unallocated or zero sectors, and the destination image will always be\n"
113 " '--output' takes the format in which the output must be done (human or json)\n"
114 " '-n' skips the target volume creation (useful if the volume is created\n"
115 " prior to running qemu-img)\n"
117 "Parameters to check subcommand:\n"
118 " '-r' tries to repair any inconsistencies that are found during the check.\n"
119 " '-r leaks' repairs only cluster leaks, whereas '-r all' fixes all\n"
120 " kinds of errors, with a higher risk of choosing the wrong fix or\n"
121 " hiding corruption that has already occurred.\n"
123 "Parameters to snapshot subcommand:\n"
124 " 'snapshot' is the name of the snapshot to create, apply or delete\n"
125 " '-a' applies a snapshot (revert disk to saved state)\n"
126 " '-c' creates a snapshot\n"
127 " '-d' deletes a snapshot\n"
128 " '-l' lists all snapshots in the given image\n"
130 "Parameters to compare subcommand:\n"
131 " '-f' first image format\n"
132 " '-F' second image format\n"
133 " '-s' run in Strict mode - fail on different image size or sector allocation\n";
135 printf("%s\nSupported formats:", help_msg
);
136 bdrv_iterate_format(format_print
, NULL
);
141 static int GCC_FMT_ATTR(2, 3) qprintf(bool quiet
, const char *fmt
, ...)
147 ret
= vprintf(fmt
, args
);
154 /* XXX: put correct support for win32 */
155 static int read_password(char *buf
, int buf_size
)
158 printf("Password: ");
165 if (i
< (buf_size
- 1))
176 static struct termios oldtty
;
178 static void term_exit(void)
180 tcsetattr (0, TCSANOW
, &oldtty
);
183 static void term_init(void)
190 tty
.c_iflag
&= ~(IGNBRK
|BRKINT
|PARMRK
|ISTRIP
191 |INLCR
|IGNCR
|ICRNL
|IXON
);
192 tty
.c_oflag
|= OPOST
;
193 tty
.c_lflag
&= ~(ECHO
|ECHONL
|ICANON
|IEXTEN
);
194 tty
.c_cflag
&= ~(CSIZE
|PARENB
);
199 tcsetattr (0, TCSANOW
, &tty
);
204 static int read_password(char *buf
, int buf_size
)
209 printf("password: ");
214 ret
= read(0, &ch
, 1);
216 if (errno
== EAGAIN
|| errno
== EINTR
) {
222 } else if (ret
== 0) {
230 if (i
< (buf_size
- 1))
241 static int print_block_option_help(const char *filename
, const char *fmt
)
243 BlockDriver
*drv
, *proto_drv
;
244 QEMUOptionParameter
*create_options
= NULL
;
246 /* Find driver and parse its options */
247 drv
= bdrv_find_format(fmt
);
249 error_report("Unknown file format '%s'", fmt
);
253 proto_drv
= bdrv_find_protocol(filename
, true);
255 error_report("Unknown protocol '%s'", filename
);
259 create_options
= append_option_parameters(create_options
,
260 drv
->create_options
);
261 create_options
= append_option_parameters(create_options
,
262 proto_drv
->create_options
);
263 print_option_help(create_options
);
264 free_option_parameters(create_options
);
268 static BlockDriverState
*bdrv_new_open(const char *filename
,
274 BlockDriverState
*bs
;
277 Error
*local_err
= NULL
;
280 bs
= bdrv_new("image");
283 drv
= bdrv_find_format(fmt
);
285 error_report("Unknown file format '%s'", fmt
);
292 ret
= bdrv_open(&bs
, filename
, NULL
, NULL
, flags
, drv
, &local_err
);
294 error_report("Could not open '%s': %s", filename
,
295 error_get_pretty(local_err
));
296 error_free(local_err
);
300 if (bdrv_is_encrypted(bs
) && require_io
) {
301 qprintf(quiet
, "Disk image '%s' is encrypted.\n", filename
);
302 if (read_password(password
, sizeof(password
)) < 0) {
303 error_report("No password given");
306 if (bdrv_set_key(bs
, password
) < 0) {
307 error_report("invalid password");
317 static int add_old_style_options(const char *fmt
, QEMUOptionParameter
*list
,
318 const char *base_filename
,
319 const char *base_fmt
)
322 if (set_option_parameter(list
, BLOCK_OPT_BACKING_FILE
, base_filename
)) {
323 error_report("Backing file not supported for file format '%s'",
329 if (set_option_parameter(list
, BLOCK_OPT_BACKING_FMT
, base_fmt
)) {
330 error_report("Backing file format not supported for file "
338 static int img_create(int argc
, char **argv
)
341 uint64_t img_size
= -1;
342 const char *fmt
= "raw";
343 const char *base_fmt
= NULL
;
344 const char *filename
;
345 const char *base_filename
= NULL
;
346 char *options
= NULL
;
347 Error
*local_err
= NULL
;
351 c
= getopt(argc
, argv
, "F:b:f:he6o:q");
364 base_filename
= optarg
;
370 error_report("option -e is deprecated, please use \'-o "
371 "encryption\' instead!");
374 error_report("option -6 is deprecated, please use \'-o "
375 "compat6\' instead!");
378 if (!is_valid_option_list(optarg
)) {
379 error_report("Invalid option list: %s", optarg
);
383 options
= g_strdup(optarg
);
385 char *old_options
= options
;
386 options
= g_strdup_printf("%s,%s", options
, optarg
);
396 /* Get the filename */
397 if (optind
>= argc
) {
400 filename
= argv
[optind
++];
402 /* Get image size, if specified */
406 sval
= strtosz_suffix(argv
[optind
++], &end
, STRTOSZ_DEFSUFFIX_B
);
407 if (sval
< 0 || *end
) {
408 if (sval
== -ERANGE
) {
409 error_report("Image size must be less than 8 EiB!");
411 error_report("Invalid image size specified! You may use k, M, "
412 "G, T, P or E suffixes for ");
413 error_report("kilobytes, megabytes, gigabytes, terabytes, "
414 "petabytes and exabytes.");
418 img_size
= (uint64_t)sval
;
420 if (optind
!= argc
) {
424 if (options
&& has_help_option(options
)) {
426 return print_block_option_help(filename
, fmt
);
429 bdrv_img_create(filename
, fmt
, base_filename
, base_fmt
,
430 options
, img_size
, BDRV_O_FLAGS
, &local_err
, quiet
);
432 error_report("%s: %s", filename
, error_get_pretty(local_err
));
433 error_free(local_err
);
445 static void dump_json_image_check(ImageCheck
*check
, bool quiet
)
449 QmpOutputVisitor
*ov
= qmp_output_visitor_new();
451 visit_type_ImageCheck(qmp_output_get_visitor(ov
),
452 &check
, NULL
, &errp
);
453 obj
= qmp_output_get_qobject(ov
);
454 str
= qobject_to_json_pretty(obj
);
456 qprintf(quiet
, "%s\n", qstring_get_str(str
));
458 qmp_output_visitor_cleanup(ov
);
462 static void dump_human_image_check(ImageCheck
*check
, bool quiet
)
464 if (!(check
->corruptions
|| check
->leaks
|| check
->check_errors
)) {
465 qprintf(quiet
, "No errors were found on the image.\n");
467 if (check
->corruptions
) {
468 qprintf(quiet
, "\n%" PRId64
" errors were found on the image.\n"
469 "Data may be corrupted, or further writes to the image "
476 "\n%" PRId64
" leaked clusters were found on the image.\n"
477 "This means waste of disk space, but no harm to data.\n",
481 if (check
->check_errors
) {
484 " internal errors have occurred during the check.\n",
485 check
->check_errors
);
489 if (check
->total_clusters
!= 0 && check
->allocated_clusters
!= 0) {
490 qprintf(quiet
, "%" PRId64
"/%" PRId64
" = %0.2f%% allocated, "
491 "%0.2f%% fragmented, %0.2f%% compressed clusters\n",
492 check
->allocated_clusters
, check
->total_clusters
,
493 check
->allocated_clusters
* 100.0 / check
->total_clusters
,
494 check
->fragmented_clusters
* 100.0 / check
->allocated_clusters
,
495 check
->compressed_clusters
* 100.0 /
496 check
->allocated_clusters
);
499 if (check
->image_end_offset
) {
501 "Image end offset: %" PRId64
"\n", check
->image_end_offset
);
505 static int collect_image_check(BlockDriverState
*bs
,
507 const char *filename
,
512 BdrvCheckResult result
;
514 ret
= bdrv_check(bs
, &result
, fix
);
519 check
->filename
= g_strdup(filename
);
520 check
->format
= g_strdup(bdrv_get_format_name(bs
));
521 check
->check_errors
= result
.check_errors
;
522 check
->corruptions
= result
.corruptions
;
523 check
->has_corruptions
= result
.corruptions
!= 0;
524 check
->leaks
= result
.leaks
;
525 check
->has_leaks
= result
.leaks
!= 0;
526 check
->corruptions_fixed
= result
.corruptions_fixed
;
527 check
->has_corruptions_fixed
= result
.corruptions
!= 0;
528 check
->leaks_fixed
= result
.leaks_fixed
;
529 check
->has_leaks_fixed
= result
.leaks
!= 0;
530 check
->image_end_offset
= result
.image_end_offset
;
531 check
->has_image_end_offset
= result
.image_end_offset
!= 0;
532 check
->total_clusters
= result
.bfi
.total_clusters
;
533 check
->has_total_clusters
= result
.bfi
.total_clusters
!= 0;
534 check
->allocated_clusters
= result
.bfi
.allocated_clusters
;
535 check
->has_allocated_clusters
= result
.bfi
.allocated_clusters
!= 0;
536 check
->fragmented_clusters
= result
.bfi
.fragmented_clusters
;
537 check
->has_fragmented_clusters
= result
.bfi
.fragmented_clusters
!= 0;
538 check
->compressed_clusters
= result
.bfi
.compressed_clusters
;
539 check
->has_compressed_clusters
= result
.bfi
.compressed_clusters
!= 0;
545 * Checks an image for consistency. Exit codes:
547 * 0 - Check completed, image is good
548 * 1 - Check not completed because of internal errors
549 * 2 - Check completed, image is corrupted
550 * 3 - Check completed, image has leaked clusters, but is good otherwise
552 static int img_check(int argc
, char **argv
)
555 OutputFormat output_format
= OFORMAT_HUMAN
;
556 const char *filename
, *fmt
, *output
;
557 BlockDriverState
*bs
;
559 int flags
= BDRV_O_FLAGS
| BDRV_O_CHECK
;
566 int option_index
= 0;
567 static const struct option long_options
[] = {
568 {"help", no_argument
, 0, 'h'},
569 {"format", required_argument
, 0, 'f'},
570 {"repair", no_argument
, 0, 'r'},
571 {"output", required_argument
, 0, OPTION_OUTPUT
},
574 c
= getopt_long(argc
, argv
, "f:hr:q",
575 long_options
, &option_index
);
588 flags
|= BDRV_O_RDWR
;
590 if (!strcmp(optarg
, "leaks")) {
591 fix
= BDRV_FIX_LEAKS
;
592 } else if (!strcmp(optarg
, "all")) {
593 fix
= BDRV_FIX_LEAKS
| BDRV_FIX_ERRORS
;
606 if (optind
!= argc
- 1) {
609 filename
= argv
[optind
++];
611 if (output
&& !strcmp(output
, "json")) {
612 output_format
= OFORMAT_JSON
;
613 } else if (output
&& !strcmp(output
, "human")) {
614 output_format
= OFORMAT_HUMAN
;
616 error_report("--output must be used with human or json as argument.");
620 bs
= bdrv_new_open(filename
, fmt
, flags
, true, quiet
);
625 check
= g_new0(ImageCheck
, 1);
626 ret
= collect_image_check(bs
, check
, filename
, fmt
, fix
);
628 if (ret
== -ENOTSUP
) {
629 if (output_format
== OFORMAT_HUMAN
) {
630 error_report("This image format does not support checks");
636 if (check
->corruptions_fixed
|| check
->leaks_fixed
) {
637 int corruptions_fixed
, leaks_fixed
;
639 leaks_fixed
= check
->leaks_fixed
;
640 corruptions_fixed
= check
->corruptions_fixed
;
642 if (output_format
== OFORMAT_HUMAN
) {
644 "The following inconsistencies were found and repaired:\n\n"
645 " %" PRId64
" leaked clusters\n"
646 " %" PRId64
" corruptions\n\n"
647 "Double checking the fixed image now...\n",
649 check
->corruptions_fixed
);
652 ret
= collect_image_check(bs
, check
, filename
, fmt
, 0);
654 check
->leaks_fixed
= leaks_fixed
;
655 check
->corruptions_fixed
= corruptions_fixed
;
658 switch (output_format
) {
660 dump_human_image_check(check
, quiet
);
663 dump_json_image_check(check
, quiet
);
667 if (ret
|| check
->check_errors
) {
672 if (check
->corruptions
) {
674 } else if (check
->leaks
) {
681 qapi_free_ImageCheck(check
);
687 static int img_commit(int argc
, char **argv
)
690 const char *filename
, *fmt
, *cache
;
691 BlockDriverState
*bs
;
695 cache
= BDRV_DEFAULT_CACHE
;
697 c
= getopt(argc
, argv
, "f:ht:q");
717 if (optind
!= argc
- 1) {
720 filename
= argv
[optind
++];
723 ret
= bdrv_parse_cache_flags(cache
, &flags
);
725 error_report("Invalid cache option: %s", cache
);
729 bs
= bdrv_new_open(filename
, fmt
, flags
, true, quiet
);
733 ret
= bdrv_commit(bs
);
736 qprintf(quiet
, "Image committed.\n");
739 error_report("No disk inserted");
742 error_report("Image is read-only");
745 error_report("Image is already committed");
748 error_report("Error while committing image");
760 * Returns true iff the first sector pointed to by 'buf' contains at least
763 * 'pnum' is set to the number of sectors (including and immediately following
764 * the first one) that are known to be in the same allocated/unallocated state.
766 static int is_allocated_sectors(const uint8_t *buf
, int n
, int *pnum
)
775 is_zero
= buffer_is_zero(buf
, 512);
776 for(i
= 1; i
< n
; i
++) {
778 if (is_zero
!= buffer_is_zero(buf
, 512)) {
787 * Like is_allocated_sectors, but if the buffer starts with a used sector,
788 * up to 'min' consecutive sectors containing zeros are ignored. This avoids
789 * breaking up write requests for only small sparse areas.
791 static int is_allocated_sectors_min(const uint8_t *buf
, int n
, int *pnum
,
795 int num_checked
, num_used
;
801 ret
= is_allocated_sectors(buf
, n
, pnum
);
807 buf
+= BDRV_SECTOR_SIZE
* *pnum
;
809 num_checked
= num_used
;
812 ret
= is_allocated_sectors(buf
, n
, pnum
);
814 buf
+= BDRV_SECTOR_SIZE
* *pnum
;
816 num_checked
+= *pnum
;
818 num_used
= num_checked
;
819 } else if (*pnum
>= min
) {
829 * Compares two buffers sector by sector. Returns 0 if the first sector of both
830 * buffers matches, non-zero otherwise.
832 * pnum is set to the number of sectors (including and immediately following
833 * the first one) that are known to have the same comparison result
835 static int compare_sectors(const uint8_t *buf1
, const uint8_t *buf2
, int n
,
845 res
= !!memcmp(buf1
, buf2
, 512);
846 for(i
= 1; i
< n
; i
++) {
850 if (!!memcmp(buf1
, buf2
, 512) != res
) {
859 #define IO_BUF_SIZE (2 * 1024 * 1024)
861 static int64_t sectors_to_bytes(int64_t sectors
)
863 return sectors
<< BDRV_SECTOR_BITS
;
866 static int64_t sectors_to_process(int64_t total
, int64_t from
)
868 return MIN(total
- from
, IO_BUF_SIZE
>> BDRV_SECTOR_BITS
);
872 * Check if passed sectors are empty (not allocated or contain only 0 bytes)
874 * Returns 0 in case sectors are filled with 0, 1 if sectors contain non-zero
875 * data and negative value on error.
877 * @param bs: Driver used for accessing file
878 * @param sect_num: Number of first sector to check
879 * @param sect_count: Number of sectors to check
880 * @param filename: Name of disk file we are checking (logging purpose)
881 * @param buffer: Allocated buffer for storing read data
882 * @param quiet: Flag for quiet mode
884 static int check_empty_sectors(BlockDriverState
*bs
, int64_t sect_num
,
885 int sect_count
, const char *filename
,
886 uint8_t *buffer
, bool quiet
)
889 ret
= bdrv_read(bs
, sect_num
, buffer
, sect_count
);
891 error_report("Error while reading offset %" PRId64
" of %s: %s",
892 sectors_to_bytes(sect_num
), filename
, strerror(-ret
));
895 ret
= is_allocated_sectors(buffer
, sect_count
, &pnum
);
896 if (ret
|| pnum
!= sect_count
) {
897 qprintf(quiet
, "Content mismatch at offset %" PRId64
"!\n",
898 sectors_to_bytes(ret
? sect_num
: sect_num
+ pnum
));
906 * Compares two images. Exit codes:
908 * 0 - Images are identical
910 * >1 - Error occurred
912 static int img_compare(int argc
, char **argv
)
914 const char *fmt1
= NULL
, *fmt2
= NULL
, *filename1
, *filename2
;
915 BlockDriverState
*bs1
, *bs2
;
916 int64_t total_sectors1
, total_sectors2
;
917 uint8_t *buf1
= NULL
, *buf2
= NULL
;
919 int allocated1
, allocated2
;
920 int ret
= 0; /* return value - 0 Ident, 1 Different, >1 Error */
921 bool progress
= false, quiet
= false, strict
= false;
922 int64_t total_sectors
;
923 int64_t sector_num
= 0;
927 uint64_t progress_base
;
930 c
= getopt(argc
, argv
, "hpf:F:sq");
957 /* Progress is not shown in Quiet mode */
963 if (optind
!= argc
- 2) {
966 filename1
= argv
[optind
++];
967 filename2
= argv
[optind
++];
969 /* Initialize before goto out */
970 qemu_progress_init(progress
, 2.0);
972 bs1
= bdrv_new_open(filename1
, fmt1
, BDRV_O_FLAGS
, true, quiet
);
974 error_report("Can't open file %s", filename1
);
979 bs2
= bdrv_new_open(filename2
, fmt2
, BDRV_O_FLAGS
, true, quiet
);
981 error_report("Can't open file %s", filename2
);
986 buf1
= qemu_blockalign(bs1
, IO_BUF_SIZE
);
987 buf2
= qemu_blockalign(bs2
, IO_BUF_SIZE
);
988 bdrv_get_geometry(bs1
, &bs_sectors
);
989 total_sectors1
= bs_sectors
;
990 bdrv_get_geometry(bs2
, &bs_sectors
);
991 total_sectors2
= bs_sectors
;
992 total_sectors
= MIN(total_sectors1
, total_sectors2
);
993 progress_base
= MAX(total_sectors1
, total_sectors2
);
995 qemu_progress_print(0, 100);
997 if (strict
&& total_sectors1
!= total_sectors2
) {
999 qprintf(quiet
, "Strict mode: Image size mismatch!\n");
1004 nb_sectors
= sectors_to_process(total_sectors
, sector_num
);
1005 if (nb_sectors
<= 0) {
1008 allocated1
= bdrv_is_allocated_above(bs1
, NULL
, sector_num
, nb_sectors
,
1010 if (allocated1
< 0) {
1012 error_report("Sector allocation test failed for %s", filename1
);
1016 allocated2
= bdrv_is_allocated_above(bs2
, NULL
, sector_num
, nb_sectors
,
1018 if (allocated2
< 0) {
1020 error_report("Sector allocation test failed for %s", filename2
);
1023 nb_sectors
= MIN(pnum1
, pnum2
);
1025 if (allocated1
== allocated2
) {
1027 ret
= bdrv_read(bs1
, sector_num
, buf1
, nb_sectors
);
1029 error_report("Error while reading offset %" PRId64
" of %s:"
1030 " %s", sectors_to_bytes(sector_num
), filename1
,
1035 ret
= bdrv_read(bs2
, sector_num
, buf2
, nb_sectors
);
1037 error_report("Error while reading offset %" PRId64
1038 " of %s: %s", sectors_to_bytes(sector_num
),
1039 filename2
, strerror(-ret
));
1043 ret
= compare_sectors(buf1
, buf2
, nb_sectors
, &pnum
);
1044 if (ret
|| pnum
!= nb_sectors
) {
1045 qprintf(quiet
, "Content mismatch at offset %" PRId64
"!\n",
1047 ret
? sector_num
: sector_num
+ pnum
));
1055 qprintf(quiet
, "Strict mode: Offset %" PRId64
1056 " allocation mismatch!\n",
1057 sectors_to_bytes(sector_num
));
1062 ret
= check_empty_sectors(bs1
, sector_num
, nb_sectors
,
1063 filename1
, buf1
, quiet
);
1065 ret
= check_empty_sectors(bs2
, sector_num
, nb_sectors
,
1066 filename2
, buf1
, quiet
);
1070 error_report("Error while reading offset %" PRId64
": %s",
1071 sectors_to_bytes(sector_num
), strerror(-ret
));
1077 sector_num
+= nb_sectors
;
1078 qemu_progress_print(((float) nb_sectors
/ progress_base
)*100, 100);
1081 if (total_sectors1
!= total_sectors2
) {
1082 BlockDriverState
*bs_over
;
1083 int64_t total_sectors_over
;
1084 const char *filename_over
;
1086 qprintf(quiet
, "Warning: Image size mismatch!\n");
1087 if (total_sectors1
> total_sectors2
) {
1088 total_sectors_over
= total_sectors1
;
1090 filename_over
= filename1
;
1092 total_sectors_over
= total_sectors2
;
1094 filename_over
= filename2
;
1098 nb_sectors
= sectors_to_process(total_sectors_over
, sector_num
);
1099 if (nb_sectors
<= 0) {
1102 ret
= bdrv_is_allocated_above(bs_over
, NULL
, sector_num
,
1106 error_report("Sector allocation test failed for %s",
1113 ret
= check_empty_sectors(bs_over
, sector_num
, nb_sectors
,
1114 filename_over
, buf1
, quiet
);
1117 error_report("Error while reading offset %" PRId64
1118 " of %s: %s", sectors_to_bytes(sector_num
),
1119 filename_over
, strerror(-ret
));
1125 sector_num
+= nb_sectors
;
1126 qemu_progress_print(((float) nb_sectors
/ progress_base
)*100, 100);
1130 qprintf(quiet
, "Images are identical.\n");
1140 qemu_progress_end();
1144 static int img_convert(int argc
, char **argv
)
1146 int c
, n
, n1
, bs_n
, bs_i
, compress
, cluster_sectors
, skip_create
;
1148 int progress
= 0, flags
;
1149 const char *fmt
, *out_fmt
, *cache
, *out_baseimg
, *out_filename
;
1150 BlockDriver
*drv
, *proto_drv
;
1151 BlockDriverState
**bs
= NULL
, *out_bs
= NULL
;
1152 int64_t total_sectors
, nb_sectors
, sector_num
, bs_offset
;
1153 uint64_t bs_sectors
;
1154 uint8_t * buf
= NULL
;
1155 size_t bufsectors
= IO_BUF_SIZE
/ BDRV_SECTOR_SIZE
;
1156 const uint8_t *buf1
;
1157 BlockDriverInfo bdi
;
1158 QEMUOptionParameter
*param
= NULL
, *create_options
= NULL
;
1159 QEMUOptionParameter
*out_baseimg_param
;
1160 char *options
= NULL
;
1161 const char *snapshot_name
= NULL
;
1162 int min_sparse
= 8; /* Need at least 4k of zeros for sparse detection */
1164 Error
*local_err
= NULL
;
1165 QemuOpts
*sn_opts
= NULL
;
1167 /* Initialize before goto out */
1168 qemu_progress_init(progress
, 1.0);
1177 c
= getopt(argc
, argv
, "f:O:B:s:hce6o:pS:t:qnl:");
1193 out_baseimg
= optarg
;
1199 error_report("option -e is deprecated, please use \'-o "
1200 "encryption\' instead!");
1204 error_report("option -6 is deprecated, please use \'-o "
1205 "compat6\' instead!");
1209 if (!is_valid_option_list(optarg
)) {
1210 error_report("Invalid option list: %s", optarg
);
1215 options
= g_strdup(optarg
);
1217 char *old_options
= options
;
1218 options
= g_strdup_printf("%s,%s", options
, optarg
);
1219 g_free(old_options
);
1223 snapshot_name
= optarg
;
1226 if (strstart(optarg
, SNAPSHOT_OPT_BASE
, NULL
)) {
1227 sn_opts
= qemu_opts_parse(&internal_snapshot_opts
, optarg
, 0);
1229 error_report("Failed in parsing snapshot param '%s'",
1235 snapshot_name
= optarg
;
1242 sval
= strtosz_suffix(optarg
, &end
, STRTOSZ_DEFSUFFIX_B
);
1243 if (sval
< 0 || *end
) {
1244 error_report("Invalid minimum zero buffer size for sparse output specified");
1249 min_sparse
= sval
/ BDRV_SECTOR_SIZE
;
1271 bs_n
= argc
- optind
- 1;
1276 out_filename
= argv
[argc
- 1];
1278 if (options
&& has_help_option(options
)) {
1279 ret
= print_block_option_help(out_filename
, out_fmt
);
1283 if (bs_n
> 1 && out_baseimg
) {
1284 error_report("-B makes no sense when concatenating multiple input "
1290 qemu_progress_print(0, 100);
1292 bs
= g_malloc0(bs_n
* sizeof(BlockDriverState
*));
1295 for (bs_i
= 0; bs_i
< bs_n
; bs_i
++) {
1296 bs
[bs_i
] = bdrv_new_open(argv
[optind
+ bs_i
], fmt
, BDRV_O_FLAGS
, true,
1299 error_report("Could not open '%s'", argv
[optind
+ bs_i
]);
1303 bdrv_get_geometry(bs
[bs_i
], &bs_sectors
);
1304 total_sectors
+= bs_sectors
;
1308 ret
= bdrv_snapshot_load_tmp(bs
[0],
1309 qemu_opt_get(sn_opts
, SNAPSHOT_OPT_ID
),
1310 qemu_opt_get(sn_opts
, SNAPSHOT_OPT_NAME
),
1312 } else if (snapshot_name
!= NULL
) {
1314 error_report("No support for concatenating multiple snapshot");
1319 bdrv_snapshot_load_tmp_by_id_or_name(bs
[0], snapshot_name
, &local_err
);
1322 error_report("Failed to load snapshot: %s",
1323 error_get_pretty(local_err
));
1324 error_free(local_err
);
1329 /* Find driver and parse its options */
1330 drv
= bdrv_find_format(out_fmt
);
1332 error_report("Unknown file format '%s'", out_fmt
);
1337 proto_drv
= bdrv_find_protocol(out_filename
, true);
1339 error_report("Unknown protocol '%s'", out_filename
);
1344 create_options
= append_option_parameters(create_options
,
1345 drv
->create_options
);
1346 create_options
= append_option_parameters(create_options
,
1347 proto_drv
->create_options
);
1350 param
= parse_option_parameters(options
, create_options
, param
);
1351 if (param
== NULL
) {
1352 error_report("Invalid options for file format '%s'.", out_fmt
);
1357 param
= parse_option_parameters("", create_options
, param
);
1360 set_option_parameter_int(param
, BLOCK_OPT_SIZE
, total_sectors
* 512);
1361 ret
= add_old_style_options(out_fmt
, param
, out_baseimg
, NULL
);
1366 /* Get backing file name if -o backing_file was used */
1367 out_baseimg_param
= get_option_parameter(param
, BLOCK_OPT_BACKING_FILE
);
1368 if (out_baseimg_param
) {
1369 out_baseimg
= out_baseimg_param
->value
.s
;
1372 /* Check if compression is supported */
1374 QEMUOptionParameter
*encryption
=
1375 get_option_parameter(param
, BLOCK_OPT_ENCRYPT
);
1376 QEMUOptionParameter
*preallocation
=
1377 get_option_parameter(param
, BLOCK_OPT_PREALLOC
);
1379 if (!drv
->bdrv_write_compressed
) {
1380 error_report("Compression not supported for this file format");
1385 if (encryption
&& encryption
->value
.n
) {
1386 error_report("Compression and encryption not supported at "
1392 if (preallocation
&& preallocation
->value
.s
1393 && strcmp(preallocation
->value
.s
, "off"))
1395 error_report("Compression and preallocation not supported at "
1403 /* Create the new image */
1404 ret
= bdrv_create(drv
, out_filename
, param
, &local_err
);
1406 error_report("%s: error while converting %s: %s",
1407 out_filename
, out_fmt
, error_get_pretty(local_err
));
1408 error_free(local_err
);
1413 flags
= min_sparse
? (BDRV_O_RDWR
| BDRV_O_UNMAP
) : BDRV_O_RDWR
;
1414 ret
= bdrv_parse_cache_flags(cache
, &flags
);
1416 error_report("Invalid cache option: %s", cache
);
1420 out_bs
= bdrv_new_open(out_filename
, out_fmt
, flags
, true, quiet
);
1428 bdrv_get_geometry(bs
[0], &bs_sectors
);
1430 /* increase bufsectors from the default 4096 (2M) if opt_transfer_length
1431 * or discard_alignment of the out_bs is greater. Limit to 32768 (16MB)
1433 bufsectors
= MIN(32768,
1434 MAX(bufsectors
, MAX(out_bs
->bl
.opt_transfer_length
,
1435 out_bs
->bl
.discard_alignment
))
1438 buf
= qemu_blockalign(out_bs
, bufsectors
* BDRV_SECTOR_SIZE
);
1441 int64_t output_length
= bdrv_getlength(out_bs
);
1442 if (output_length
< 0) {
1443 error_report("unable to get output image length: %s\n",
1444 strerror(-output_length
));
1447 } else if (output_length
< total_sectors
<< BDRV_SECTOR_BITS
) {
1448 error_report("output file is smaller than input file");
1454 cluster_sectors
= 0;
1455 ret
= bdrv_get_info(out_bs
, &bdi
);
1458 error_report("could not get block driver info");
1462 cluster_sectors
= bdi
.cluster_size
/ BDRV_SECTOR_SIZE
;
1466 if (cluster_sectors
<= 0 || cluster_sectors
> bufsectors
) {
1467 error_report("invalid cluster size");
1473 nb_sectors
= total_sectors
;
1480 nb_sectors
= total_sectors
- sector_num
;
1481 if (nb_sectors
<= 0)
1483 if (nb_sectors
>= cluster_sectors
)
1484 n
= cluster_sectors
;
1488 bs_num
= sector_num
- bs_offset
;
1489 assert (bs_num
>= 0);
1492 while (remainder
> 0) {
1494 while (bs_num
== bs_sectors
) {
1496 assert (bs_i
< bs_n
);
1497 bs_offset
+= bs_sectors
;
1498 bdrv_get_geometry(bs
[bs_i
], &bs_sectors
);
1500 /* printf("changing part: sector_num=%" PRId64 ", "
1501 "bs_i=%d, bs_offset=%" PRId64 ", bs_sectors=%" PRId64
1502 "\n", sector_num, bs_i, bs_offset, bs_sectors); */
1504 assert (bs_num
< bs_sectors
);
1506 nlow
= (remainder
> bs_sectors
- bs_num
) ? bs_sectors
- bs_num
: remainder
;
1508 ret
= bdrv_read(bs
[bs_i
], bs_num
, buf2
, nlow
);
1510 error_report("error while reading sector %" PRId64
": %s",
1511 bs_num
, strerror(-ret
));
1520 assert (remainder
== 0);
1522 if (!buffer_is_zero(buf
, n
* BDRV_SECTOR_SIZE
)) {
1523 ret
= bdrv_write_compressed(out_bs
, sector_num
, buf
, n
);
1525 error_report("error while compressing sector %" PRId64
1526 ": %s", sector_num
, strerror(-ret
));
1531 qemu_progress_print(100.0 * sector_num
/ total_sectors
, 0);
1533 /* signal EOF to align */
1534 bdrv_write_compressed(out_bs
, 0, NULL
, 0);
1536 int64_t sectors_to_read
, sectors_read
, sector_num_next_status
;
1537 bool count_allocated_sectors
;
1538 int has_zero_init
= min_sparse
? bdrv_has_zero_init(out_bs
) : 0;
1540 if (!has_zero_init
&& bdrv_can_write_zeroes_with_unmap(out_bs
)) {
1541 ret
= bdrv_make_zero(out_bs
, BDRV_REQ_MAY_UNMAP
);
1548 sectors_to_read
= total_sectors
;
1549 count_allocated_sectors
= progress
&& (out_baseimg
|| has_zero_init
);
1551 sector_num
= 0; // total number of sectors converted so far
1553 sector_num_next_status
= 0;
1556 nb_sectors
= total_sectors
- sector_num
;
1557 if (nb_sectors
<= 0) {
1558 if (count_allocated_sectors
) {
1559 sectors_to_read
= sectors_read
;
1560 count_allocated_sectors
= false;
1567 while (sector_num
- bs_offset
>= bs_sectors
) {
1569 assert (bs_i
< bs_n
);
1570 bs_offset
+= bs_sectors
;
1571 bdrv_get_geometry(bs
[bs_i
], &bs_sectors
);
1572 /* printf("changing part: sector_num=%" PRId64 ", bs_i=%d, "
1573 "bs_offset=%" PRId64 ", bs_sectors=%" PRId64 "\n",
1574 sector_num, bs_i, bs_offset, bs_sectors); */
1577 if ((out_baseimg
|| has_zero_init
) &&
1578 sector_num
>= sector_num_next_status
) {
1579 n
= nb_sectors
> INT_MAX
? INT_MAX
: nb_sectors
;
1580 ret
= bdrv_get_block_status(bs
[bs_i
], sector_num
- bs_offset
,
1583 error_report("error while reading block status of sector %"
1584 PRId64
": %s", sector_num
- bs_offset
,
1588 /* If the output image is zero initialized, we are not working
1589 * on a shared base and the input is zero we can skip the next
1591 if (has_zero_init
&& !out_baseimg
&& (ret
& BDRV_BLOCK_ZERO
)) {
1595 /* If the output image is being created as a copy on write
1596 * image, assume that sectors which are unallocated in the
1597 * input image are present in both the output's and input's
1598 * base images (no need to copy them). */
1600 if (!(ret
& BDRV_BLOCK_DATA
)) {
1604 /* The next 'n1' sectors are allocated in the input image.
1605 * Copy only those as they may be followed by unallocated
1609 /* avoid redundant callouts to get_block_status */
1610 sector_num_next_status
= sector_num
+ n1
;
1613 n
= MIN(nb_sectors
, bufsectors
);
1615 /* round down request length to an aligned sector, but
1616 * do not bother doing this on short requests. They happen
1617 * when we found an all-zero area, and the next sector to
1618 * write will not be sector_num + n. */
1619 if (cluster_sectors
> 0 && n
>= cluster_sectors
) {
1620 int64_t next_aligned_sector
= (sector_num
+ n
);
1621 next_aligned_sector
-= next_aligned_sector
% cluster_sectors
;
1622 if (sector_num
+ n
> next_aligned_sector
) {
1623 n
= next_aligned_sector
- sector_num
;
1627 n
= MIN(n
, bs_sectors
- (sector_num
- bs_offset
));
1630 if (count_allocated_sectors
) {
1636 ret
= bdrv_read(bs
[bs_i
], sector_num
- bs_offset
, buf
, n
);
1638 error_report("error while reading sector %" PRId64
": %s",
1639 sector_num
- bs_offset
, strerror(-ret
));
1642 /* NOTE: at the same time we convert, we do not write zero
1643 sectors to have a chance to compress the image. Ideally, we
1644 should add a specific call to have the info to go faster */
1647 if (!has_zero_init
||
1648 is_allocated_sectors_min(buf1
, n
, &n1
, min_sparse
)) {
1649 ret
= bdrv_write(out_bs
, sector_num
, buf1
, n1
);
1651 error_report("error while writing sector %" PRId64
1652 ": %s", sector_num
, strerror(-ret
));
1660 qemu_progress_print(100.0 * sectors_read
/ sectors_to_read
, 0);
1665 qemu_progress_print(100, 0);
1667 qemu_progress_end();
1668 free_option_parameters(create_options
);
1669 free_option_parameters(param
);
1673 qemu_opts_del(sn_opts
);
1679 for (bs_i
= 0; bs_i
< bs_n
; bs_i
++) {
1681 bdrv_unref(bs
[bs_i
]);
1693 static void dump_snapshots(BlockDriverState
*bs
)
1695 QEMUSnapshotInfo
*sn_tab
, *sn
;
1698 nb_sns
= bdrv_snapshot_list(bs
, &sn_tab
);
1701 printf("Snapshot list:\n");
1702 bdrv_snapshot_dump(fprintf
, stdout
, NULL
);
1704 for(i
= 0; i
< nb_sns
; i
++) {
1706 bdrv_snapshot_dump(fprintf
, stdout
, sn
);
1712 static void dump_json_image_info_list(ImageInfoList
*list
)
1716 QmpOutputVisitor
*ov
= qmp_output_visitor_new();
1718 visit_type_ImageInfoList(qmp_output_get_visitor(ov
),
1719 &list
, NULL
, &errp
);
1720 obj
= qmp_output_get_qobject(ov
);
1721 str
= qobject_to_json_pretty(obj
);
1722 assert(str
!= NULL
);
1723 printf("%s\n", qstring_get_str(str
));
1724 qobject_decref(obj
);
1725 qmp_output_visitor_cleanup(ov
);
1729 static void dump_json_image_info(ImageInfo
*info
)
1733 QmpOutputVisitor
*ov
= qmp_output_visitor_new();
1735 visit_type_ImageInfo(qmp_output_get_visitor(ov
),
1736 &info
, NULL
, &errp
);
1737 obj
= qmp_output_get_qobject(ov
);
1738 str
= qobject_to_json_pretty(obj
);
1739 assert(str
!= NULL
);
1740 printf("%s\n", qstring_get_str(str
));
1741 qobject_decref(obj
);
1742 qmp_output_visitor_cleanup(ov
);
1746 static void dump_human_image_info_list(ImageInfoList
*list
)
1748 ImageInfoList
*elem
;
1751 for (elem
= list
; elem
; elem
= elem
->next
) {
1757 bdrv_image_info_dump(fprintf
, stdout
, elem
->value
);
1761 static gboolean
str_equal_func(gconstpointer a
, gconstpointer b
)
1763 return strcmp(a
, b
) == 0;
1767 * Open an image file chain and return an ImageInfoList
1769 * @filename: topmost image filename
1770 * @fmt: topmost image format (may be NULL to autodetect)
1771 * @chain: true - enumerate entire backing file chain
1772 * false - only topmost image file
1774 * Returns a list of ImageInfo objects or NULL if there was an error opening an
1775 * image file. If there was an error a message will have been printed to
1778 static ImageInfoList
*collect_image_info_list(const char *filename
,
1782 ImageInfoList
*head
= NULL
;
1783 ImageInfoList
**last
= &head
;
1784 GHashTable
*filenames
;
1787 filenames
= g_hash_table_new_full(g_str_hash
, str_equal_func
, NULL
, NULL
);
1790 BlockDriverState
*bs
;
1792 ImageInfoList
*elem
;
1794 if (g_hash_table_lookup_extended(filenames
, filename
, NULL
, NULL
)) {
1795 error_report("Backing file '%s' creates an infinite loop.",
1799 g_hash_table_insert(filenames
, (gpointer
)filename
, NULL
);
1801 bs
= bdrv_new_open(filename
, fmt
, BDRV_O_FLAGS
| BDRV_O_NO_BACKING
,
1807 bdrv_query_image_info(bs
, &info
, &err
);
1809 error_report("%s", error_get_pretty(err
));
1814 elem
= g_new0(ImageInfoList
, 1);
1821 filename
= fmt
= NULL
;
1823 if (info
->has_full_backing_filename
) {
1824 filename
= info
->full_backing_filename
;
1825 } else if (info
->has_backing_filename
) {
1826 filename
= info
->backing_filename
;
1828 if (info
->has_backing_filename_format
) {
1829 fmt
= info
->backing_filename_format
;
1833 g_hash_table_destroy(filenames
);
1837 qapi_free_ImageInfoList(head
);
1838 g_hash_table_destroy(filenames
);
1842 static int img_info(int argc
, char **argv
)
1845 OutputFormat output_format
= OFORMAT_HUMAN
;
1847 const char *filename
, *fmt
, *output
;
1848 ImageInfoList
*list
;
1853 int option_index
= 0;
1854 static const struct option long_options
[] = {
1855 {"help", no_argument
, 0, 'h'},
1856 {"format", required_argument
, 0, 'f'},
1857 {"output", required_argument
, 0, OPTION_OUTPUT
},
1858 {"backing-chain", no_argument
, 0, OPTION_BACKING_CHAIN
},
1861 c
= getopt_long(argc
, argv
, "f:h",
1862 long_options
, &option_index
);
1877 case OPTION_BACKING_CHAIN
:
1882 if (optind
!= argc
- 1) {
1885 filename
= argv
[optind
++];
1887 if (output
&& !strcmp(output
, "json")) {
1888 output_format
= OFORMAT_JSON
;
1889 } else if (output
&& !strcmp(output
, "human")) {
1890 output_format
= OFORMAT_HUMAN
;
1891 } else if (output
) {
1892 error_report("--output must be used with human or json as argument.");
1896 list
= collect_image_info_list(filename
, fmt
, chain
);
1901 switch (output_format
) {
1903 dump_human_image_info_list(list
);
1907 dump_json_image_info_list(list
);
1909 dump_json_image_info(list
->value
);
1914 qapi_free_ImageInfoList(list
);
1919 typedef struct MapEntry
{
1925 BlockDriverState
*bs
;
1928 static void dump_map_entry(OutputFormat output_format
, MapEntry
*e
,
1931 switch (output_format
) {
1933 if ((e
->flags
& BDRV_BLOCK_DATA
) &&
1934 !(e
->flags
& BDRV_BLOCK_OFFSET_VALID
)) {
1935 error_report("File contains external, encrypted or compressed clusters.");
1938 if ((e
->flags
& (BDRV_BLOCK_DATA
|BDRV_BLOCK_ZERO
)) == BDRV_BLOCK_DATA
) {
1939 printf("%#-16"PRIx64
"%#-16"PRIx64
"%#-16"PRIx64
"%s\n",
1940 e
->start
, e
->length
, e
->offset
, e
->bs
->filename
);
1942 /* This format ignores the distinction between 0, ZERO and ZERO|DATA.
1943 * Modify the flags here to allow more coalescing.
1946 (next
->flags
& (BDRV_BLOCK_DATA
|BDRV_BLOCK_ZERO
)) != BDRV_BLOCK_DATA
) {
1947 next
->flags
&= ~BDRV_BLOCK_DATA
;
1948 next
->flags
|= BDRV_BLOCK_ZERO
;
1952 printf("%s{ \"start\": %"PRId64
", \"length\": %"PRId64
", \"depth\": %d,"
1953 " \"zero\": %s, \"data\": %s",
1954 (e
->start
== 0 ? "[" : ",\n"),
1955 e
->start
, e
->length
, e
->depth
,
1956 (e
->flags
& BDRV_BLOCK_ZERO
) ? "true" : "false",
1957 (e
->flags
& BDRV_BLOCK_DATA
) ? "true" : "false");
1958 if (e
->flags
& BDRV_BLOCK_OFFSET_VALID
) {
1959 printf(", \"offset\": %"PRId64
"", e
->offset
);
1970 static int get_block_status(BlockDriverState
*bs
, int64_t sector_num
,
1971 int nb_sectors
, MapEntry
*e
)
1976 /* As an optimization, we could cache the current range of unallocated
1977 * clusters in each file of the chain, and avoid querying the same
1983 ret
= bdrv_get_block_status(bs
, sector_num
, nb_sectors
, &nb_sectors
);
1988 if (ret
& (BDRV_BLOCK_ZERO
|BDRV_BLOCK_DATA
)) {
1991 bs
= bs
->backing_hd
;
2000 e
->start
= sector_num
* BDRV_SECTOR_SIZE
;
2001 e
->length
= nb_sectors
* BDRV_SECTOR_SIZE
;
2002 e
->flags
= ret
& ~BDRV_BLOCK_OFFSET_MASK
;
2003 e
->offset
= ret
& BDRV_BLOCK_OFFSET_MASK
;
2009 static int img_map(int argc
, char **argv
)
2012 OutputFormat output_format
= OFORMAT_HUMAN
;
2013 BlockDriverState
*bs
;
2014 const char *filename
, *fmt
, *output
;
2016 MapEntry curr
= { .length
= 0 }, next
;
2022 int option_index
= 0;
2023 static const struct option long_options
[] = {
2024 {"help", no_argument
, 0, 'h'},
2025 {"format", required_argument
, 0, 'f'},
2026 {"output", required_argument
, 0, OPTION_OUTPUT
},
2029 c
= getopt_long(argc
, argv
, "f:h",
2030 long_options
, &option_index
);
2047 if (optind
>= argc
) {
2050 filename
= argv
[optind
++];
2052 if (output
&& !strcmp(output
, "json")) {
2053 output_format
= OFORMAT_JSON
;
2054 } else if (output
&& !strcmp(output
, "human")) {
2055 output_format
= OFORMAT_HUMAN
;
2056 } else if (output
) {
2057 error_report("--output must be used with human or json as argument.");
2061 bs
= bdrv_new_open(filename
, fmt
, BDRV_O_FLAGS
, true, false);
2066 if (output_format
== OFORMAT_HUMAN
) {
2067 printf("%-16s%-16s%-16s%s\n", "Offset", "Length", "Mapped to", "File");
2070 length
= bdrv_getlength(bs
);
2071 while (curr
.start
+ curr
.length
< length
) {
2072 int64_t nsectors_left
;
2076 sector_num
= (curr
.start
+ curr
.length
) >> BDRV_SECTOR_BITS
;
2078 /* Probe up to 1 GiB at a time. */
2079 nsectors_left
= DIV_ROUND_UP(length
, BDRV_SECTOR_SIZE
) - sector_num
;
2080 n
= MIN(1 << (30 - BDRV_SECTOR_BITS
), nsectors_left
);
2081 ret
= get_block_status(bs
, sector_num
, n
, &next
);
2084 error_report("Could not read file metadata: %s", strerror(-ret
));
2088 if (curr
.length
!= 0 && curr
.flags
== next
.flags
&&
2089 curr
.depth
== next
.depth
&&
2090 ((curr
.flags
& BDRV_BLOCK_OFFSET_VALID
) == 0 ||
2091 curr
.offset
+ curr
.length
== next
.offset
)) {
2092 curr
.length
+= next
.length
;
2096 if (curr
.length
> 0) {
2097 dump_map_entry(output_format
, &curr
, &next
);
2102 dump_map_entry(output_format
, &curr
, NULL
);
2109 #define SNAPSHOT_LIST 1
2110 #define SNAPSHOT_CREATE 2
2111 #define SNAPSHOT_APPLY 3
2112 #define SNAPSHOT_DELETE 4
2114 static int img_snapshot(int argc
, char **argv
)
2116 BlockDriverState
*bs
;
2117 QEMUSnapshotInfo sn
;
2118 char *filename
, *snapshot_name
= NULL
;
2119 int c
, ret
= 0, bdrv_oflags
;
2125 bdrv_oflags
= BDRV_O_FLAGS
| BDRV_O_RDWR
;
2126 /* Parse commandline parameters */
2128 c
= getopt(argc
, argv
, "la:c:d:hq");
2142 action
= SNAPSHOT_LIST
;
2143 bdrv_oflags
&= ~BDRV_O_RDWR
; /* no need for RW */
2150 action
= SNAPSHOT_APPLY
;
2151 snapshot_name
= optarg
;
2158 action
= SNAPSHOT_CREATE
;
2159 snapshot_name
= optarg
;
2166 action
= SNAPSHOT_DELETE
;
2167 snapshot_name
= optarg
;
2175 if (optind
!= argc
- 1) {
2178 filename
= argv
[optind
++];
2180 /* Open the image */
2181 bs
= bdrv_new_open(filename
, NULL
, bdrv_oflags
, true, quiet
);
2186 /* Perform the requested action */
2192 case SNAPSHOT_CREATE
:
2193 memset(&sn
, 0, sizeof(sn
));
2194 pstrcpy(sn
.name
, sizeof(sn
.name
), snapshot_name
);
2196 qemu_gettimeofday(&tv
);
2197 sn
.date_sec
= tv
.tv_sec
;
2198 sn
.date_nsec
= tv
.tv_usec
* 1000;
2200 ret
= bdrv_snapshot_create(bs
, &sn
);
2202 error_report("Could not create snapshot '%s': %d (%s)",
2203 snapshot_name
, ret
, strerror(-ret
));
2207 case SNAPSHOT_APPLY
:
2208 ret
= bdrv_snapshot_goto(bs
, snapshot_name
);
2210 error_report("Could not apply snapshot '%s': %d (%s)",
2211 snapshot_name
, ret
, strerror(-ret
));
2215 case SNAPSHOT_DELETE
:
2216 bdrv_snapshot_delete_by_id_or_name(bs
, snapshot_name
, &err
);
2218 error_report("Could not delete snapshot '%s': (%s)",
2219 snapshot_name
, error_get_pretty(err
));
2234 static int img_rebase(int argc
, char **argv
)
2236 BlockDriverState
*bs
, *bs_old_backing
= NULL
, *bs_new_backing
= NULL
;
2237 BlockDriver
*old_backing_drv
, *new_backing_drv
;
2239 const char *fmt
, *cache
, *out_basefmt
, *out_baseimg
;
2244 Error
*local_err
= NULL
;
2246 /* Parse commandline parameters */
2248 cache
= BDRV_DEFAULT_CACHE
;
2252 c
= getopt(argc
, argv
, "uhf:F:b:pt:q");
2265 out_basefmt
= optarg
;
2268 out_baseimg
= optarg
;
2289 if ((optind
!= argc
- 1) || (!unsafe
&& !out_baseimg
)) {
2292 filename
= argv
[optind
++];
2294 qemu_progress_init(progress
, 2.0);
2295 qemu_progress_print(0, 100);
2297 flags
= BDRV_O_RDWR
| (unsafe
? BDRV_O_NO_BACKING
: 0);
2298 ret
= bdrv_parse_cache_flags(cache
, &flags
);
2300 error_report("Invalid cache option: %s", cache
);
2307 * Ignore the old backing file for unsafe rebase in case we want to correct
2308 * the reference to a renamed or moved backing file.
2310 bs
= bdrv_new_open(filename
, fmt
, flags
, true, quiet
);
2315 /* Find the right drivers for the backing files */
2316 old_backing_drv
= NULL
;
2317 new_backing_drv
= NULL
;
2319 if (!unsafe
&& bs
->backing_format
[0] != '\0') {
2320 old_backing_drv
= bdrv_find_format(bs
->backing_format
);
2321 if (old_backing_drv
== NULL
) {
2322 error_report("Invalid format name: '%s'", bs
->backing_format
);
2328 if (out_basefmt
!= NULL
) {
2329 new_backing_drv
= bdrv_find_format(out_basefmt
);
2330 if (new_backing_drv
== NULL
) {
2331 error_report("Invalid format name: '%s'", out_basefmt
);
2337 /* For safe rebasing we need to compare old and new backing file */
2339 /* Make the compiler happy */
2340 bs_old_backing
= NULL
;
2341 bs_new_backing
= NULL
;
2343 char backing_name
[1024];
2345 bs_old_backing
= bdrv_new("old_backing");
2346 bdrv_get_backing_filename(bs
, backing_name
, sizeof(backing_name
));
2347 ret
= bdrv_open(&bs_old_backing
, backing_name
, NULL
, NULL
, BDRV_O_FLAGS
,
2348 old_backing_drv
, &local_err
);
2350 error_report("Could not open old backing file '%s': %s",
2351 backing_name
, error_get_pretty(local_err
));
2352 error_free(local_err
);
2355 if (out_baseimg
[0]) {
2356 bs_new_backing
= bdrv_new("new_backing");
2357 ret
= bdrv_open(&bs_new_backing
, out_baseimg
, NULL
, NULL
,
2358 BDRV_O_FLAGS
, new_backing_drv
, &local_err
);
2360 error_report("Could not open new backing file '%s': %s",
2361 out_baseimg
, error_get_pretty(local_err
));
2362 error_free(local_err
);
2369 * Check each unallocated cluster in the COW file. If it is unallocated,
2370 * accesses go to the backing file. We must therefore compare this cluster
2371 * in the old and new backing file, and if they differ we need to copy it
2372 * from the old backing file into the COW file.
2374 * If qemu-img crashes during this step, no harm is done. The content of
2375 * the image is the same as the original one at any time.
2378 uint64_t num_sectors
;
2379 uint64_t old_backing_num_sectors
;
2380 uint64_t new_backing_num_sectors
= 0;
2385 float local_progress
= 0;
2387 buf_old
= qemu_blockalign(bs
, IO_BUF_SIZE
);
2388 buf_new
= qemu_blockalign(bs
, IO_BUF_SIZE
);
2390 bdrv_get_geometry(bs
, &num_sectors
);
2391 bdrv_get_geometry(bs_old_backing
, &old_backing_num_sectors
);
2392 if (bs_new_backing
) {
2393 bdrv_get_geometry(bs_new_backing
, &new_backing_num_sectors
);
2396 if (num_sectors
!= 0) {
2397 local_progress
= (float)100 /
2398 (num_sectors
/ MIN(num_sectors
, IO_BUF_SIZE
/ 512));
2401 for (sector
= 0; sector
< num_sectors
; sector
+= n
) {
2403 /* How many sectors can we handle with the next read? */
2404 if (sector
+ (IO_BUF_SIZE
/ 512) <= num_sectors
) {
2405 n
= (IO_BUF_SIZE
/ 512);
2407 n
= num_sectors
- sector
;
2410 /* If the cluster is allocated, we don't need to take action */
2411 ret
= bdrv_is_allocated(bs
, sector
, n
, &n
);
2413 error_report("error while reading image metadata: %s",
2422 * Read old and new backing file and take into consideration that
2423 * backing files may be smaller than the COW image.
2425 if (sector
>= old_backing_num_sectors
) {
2426 memset(buf_old
, 0, n
* BDRV_SECTOR_SIZE
);
2428 if (sector
+ n
> old_backing_num_sectors
) {
2429 n
= old_backing_num_sectors
- sector
;
2432 ret
= bdrv_read(bs_old_backing
, sector
, buf_old
, n
);
2434 error_report("error while reading from old backing file");
2439 if (sector
>= new_backing_num_sectors
|| !bs_new_backing
) {
2440 memset(buf_new
, 0, n
* BDRV_SECTOR_SIZE
);
2442 if (sector
+ n
> new_backing_num_sectors
) {
2443 n
= new_backing_num_sectors
- sector
;
2446 ret
= bdrv_read(bs_new_backing
, sector
, buf_new
, n
);
2448 error_report("error while reading from new backing file");
2453 /* If they differ, we need to write to the COW file */
2454 uint64_t written
= 0;
2456 while (written
< n
) {
2459 if (compare_sectors(buf_old
+ written
* 512,
2460 buf_new
+ written
* 512, n
- written
, &pnum
))
2462 ret
= bdrv_write(bs
, sector
+ written
,
2463 buf_old
+ written
* 512, pnum
);
2465 error_report("Error while writing to COW image: %s",
2473 qemu_progress_print(local_progress
, 100);
2476 qemu_vfree(buf_old
);
2477 qemu_vfree(buf_new
);
2481 * Change the backing file. All clusters that are different from the old
2482 * backing file are overwritten in the COW file now, so the visible content
2483 * doesn't change when we switch the backing file.
2485 if (out_baseimg
&& *out_baseimg
) {
2486 ret
= bdrv_change_backing_file(bs
, out_baseimg
, out_basefmt
);
2488 ret
= bdrv_change_backing_file(bs
, NULL
, NULL
);
2491 if (ret
== -ENOSPC
) {
2492 error_report("Could not change the backing file to '%s': No "
2493 "space left in the file header", out_baseimg
);
2494 } else if (ret
< 0) {
2495 error_report("Could not change the backing file to '%s': %s",
2496 out_baseimg
, strerror(-ret
));
2499 qemu_progress_print(100, 0);
2501 * TODO At this point it is possible to check if any clusters that are
2502 * allocated in the COW file are the same in the backing file. If so, they
2503 * could be dropped from the COW file. Don't do this before switching the
2504 * backing file, in case of a crash this would lead to corruption.
2507 qemu_progress_end();
2510 if (bs_old_backing
!= NULL
) {
2511 bdrv_unref(bs_old_backing
);
2513 if (bs_new_backing
!= NULL
) {
2514 bdrv_unref(bs_new_backing
);
2525 static int img_resize(int argc
, char **argv
)
2527 int c
, ret
, relative
;
2528 const char *filename
, *fmt
, *size
;
2529 int64_t n
, total_size
;
2531 BlockDriverState
*bs
= NULL
;
2533 static QemuOptsList resize_options
= {
2534 .name
= "resize_options",
2535 .head
= QTAILQ_HEAD_INITIALIZER(resize_options
.head
),
2538 .name
= BLOCK_OPT_SIZE
,
2539 .type
= QEMU_OPT_SIZE
,
2540 .help
= "Virtual disk size"
2547 /* Remove size from argv manually so that negative numbers are not treated
2548 * as options by getopt. */
2554 size
= argv
[--argc
];
2556 /* Parse getopt arguments */
2559 c
= getopt(argc
, argv
, "f:hq");
2576 if (optind
!= argc
- 1) {
2579 filename
= argv
[optind
++];
2581 /* Choose grow, shrink, or absolute resize mode */
2597 param
= qemu_opts_create(&resize_options
, NULL
, 0, &error_abort
);
2598 if (qemu_opt_set(param
, BLOCK_OPT_SIZE
, size
)) {
2599 /* Error message already printed when size parsing fails */
2601 qemu_opts_del(param
);
2604 n
= qemu_opt_get_size(param
, BLOCK_OPT_SIZE
, 0);
2605 qemu_opts_del(param
);
2607 bs
= bdrv_new_open(filename
, fmt
, BDRV_O_FLAGS
| BDRV_O_RDWR
, true, quiet
);
2614 total_size
= bdrv_getlength(bs
) + n
* relative
;
2618 if (total_size
<= 0) {
2619 error_report("New image size must be positive");
2624 ret
= bdrv_truncate(bs
, total_size
);
2627 qprintf(quiet
, "Image resized.\n");
2630 error_report("This image does not support resize");
2633 error_report("Image is read-only");
2636 error_report("Error resizing image (%d)", -ret
);
2649 static int img_amend(int argc
, char **argv
)
2652 char *options
= NULL
;
2653 QEMUOptionParameter
*create_options
= NULL
, *options_param
= NULL
;
2654 const char *fmt
= NULL
, *filename
;
2656 BlockDriverState
*bs
= NULL
;
2659 c
= getopt(argc
, argv
, "hqf:o:");
2681 if (optind
!= argc
- 1) {
2689 filename
= argv
[argc
- 1];
2691 bs
= bdrv_new_open(filename
, fmt
, BDRV_O_FLAGS
| BDRV_O_RDWR
, true, quiet
);
2693 error_report("Could not open image '%s'", filename
);
2698 fmt
= bs
->drv
->format_name
;
2700 if (is_help_option(options
)) {
2701 ret
= print_block_option_help(filename
, fmt
);
2705 create_options
= append_option_parameters(create_options
,
2706 bs
->drv
->create_options
);
2707 options_param
= parse_option_parameters(options
, create_options
,
2709 if (options_param
== NULL
) {
2710 error_report("Invalid options for file format '%s'", fmt
);
2715 ret
= bdrv_amend_options(bs
, options_param
);
2717 error_report("Error while amending options: %s", strerror(-ret
));
2725 free_option_parameters(create_options
);
2726 free_option_parameters(options_param
);
2733 static const img_cmd_t img_cmds
[] = {
2734 #define DEF(option, callback, arg_string) \
2735 { option, callback },
2736 #include "qemu-img-cmds.h"
2742 int main(int argc
, char **argv
)
2744 const img_cmd_t
*cmd
;
2745 const char *cmdname
;
2748 signal(SIGPIPE
, SIG_IGN
);
2751 error_set_progname(argv
[0]);
2753 qemu_init_main_loop();
2760 /* find the command */
2761 for(cmd
= img_cmds
; cmd
->name
!= NULL
; cmd
++) {
2762 if (!strcmp(cmdname
, cmd
->name
)) {
2763 return cmd
->handler(argc
, argv
);