1 /* 2 * Block driver for Parallels disk image format 3 * 4 * Copyright (c) 2007 Alex Beregszaszi 5 * Copyright (c) 2015 Denis V. Lunev <den@openvz.org> 6 * 7 * This code was originally based on comparing different disk images created 8 * by Parallels. Currently it is based on opened OpenVZ sources 9 * available at 10 * http://git.openvz.org/?p=ploop;a=summary 11 * 12 * Permission is hereby granted, free of charge, to any person obtaining a copy 13 * of this software and associated documentation files (the "Software"), to deal 14 * in the Software without restriction, including without limitation the rights 15 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell 16 * copies of the Software, and to permit persons to whom the Software is 17 * furnished to do so, subject to the following conditions: 18 * 19 * The above copyright notice and this permission notice shall be included in 20 * all copies or substantial portions of the Software. 21 * 22 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR 23 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, 24 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL 25 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER 26 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, 27 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN 28 * THE SOFTWARE. 29 */ 30 #include "qemu/osdep.h" 31 #include "qapi/error.h" 32 #include "qemu-common.h" 33 #include "block/block_int.h" 34 #include "sysemu/block-backend.h" 35 #include "qemu/module.h" 36 #include "qemu/bswap.h" 37 #include "qemu/bitmap.h" 38 #include "qapi/util.h" 39 40 /**************************************************************/ 41 42 #define HEADER_MAGIC "WithoutFreeSpace" 43 #define HEADER_MAGIC2 "WithouFreSpacExt" 44 #define HEADER_VERSION 2 45 #define HEADER_INUSE_MAGIC (0x746F6E59) 46 47 #define DEFAULT_CLUSTER_SIZE 1048576 /* 1 MiB */ 48 49 50 // always little-endian 51 typedef struct ParallelsHeader { 52 char magic[16]; // "WithoutFreeSpace" 53 uint32_t version; 54 uint32_t heads; 55 uint32_t cylinders; 56 uint32_t tracks; 57 uint32_t bat_entries; 58 uint64_t nb_sectors; 59 uint32_t inuse; 60 uint32_t data_off; 61 char padding[12]; 62 } QEMU_PACKED ParallelsHeader; 63 64 65 typedef enum ParallelsPreallocMode { 66 PRL_PREALLOC_MODE_FALLOCATE = 0, 67 PRL_PREALLOC_MODE_TRUNCATE = 1, 68 PRL_PREALLOC_MODE__MAX = 2, 69 } ParallelsPreallocMode; 70 71 static const char *prealloc_mode_lookup[] = { 72 "falloc", 73 "truncate", 74 NULL, 75 }; 76 77 78 typedef struct BDRVParallelsState { 79 /** Locking is conservative, the lock protects 80 * - image file extending (truncate, fallocate) 81 * - any access to block allocation table 82 */ 83 CoMutex lock; 84 85 ParallelsHeader *header; 86 uint32_t header_size; 87 bool header_unclean; 88 89 unsigned long *bat_dirty_bmap; 90 unsigned int bat_dirty_block; 91 92 uint32_t *bat_bitmap; 93 unsigned int bat_size; 94 95 int64_t data_end; 96 uint64_t prealloc_size; 97 ParallelsPreallocMode prealloc_mode; 98 99 unsigned int tracks; 100 101 unsigned int off_multiplier; 102 } BDRVParallelsState; 103 104 105 #define PARALLELS_OPT_PREALLOC_MODE "prealloc-mode" 106 #define PARALLELS_OPT_PREALLOC_SIZE "prealloc-size" 107 108 static QemuOptsList parallels_runtime_opts = { 109 .name = "parallels", 110 .head = QTAILQ_HEAD_INITIALIZER(parallels_runtime_opts.head), 111 .desc = { 112 { 113 .name = PARALLELS_OPT_PREALLOC_SIZE, 114 .type = QEMU_OPT_SIZE, 115 .help = "Preallocation size on image expansion", 116 .def_value_str = "128MiB", 117 }, 118 { 119 .name = PARALLELS_OPT_PREALLOC_MODE, 120 .type = QEMU_OPT_STRING, 121 .help = "Preallocation mode on image expansion " 122 "(allowed values: falloc, truncate)", 123 .def_value_str = "falloc", 124 }, 125 { /* end of list */ }, 126 }, 127 }; 128 129 130 static int64_t bat2sect(BDRVParallelsState *s, uint32_t idx) 131 { 132 return (uint64_t)le32_to_cpu(s->bat_bitmap[idx]) * s->off_multiplier; 133 } 134 135 static uint32_t bat_entry_off(uint32_t idx) 136 { 137 return sizeof(ParallelsHeader) + sizeof(uint32_t) * idx; 138 } 139 140 static int64_t seek_to_sector(BDRVParallelsState *s, int64_t sector_num) 141 { 142 uint32_t index, offset; 143 144 index = sector_num / s->tracks; 145 offset = sector_num % s->tracks; 146 147 /* not allocated */ 148 if ((index >= s->bat_size) || (s->bat_bitmap[index] == 0)) { 149 return -1; 150 } 151 return bat2sect(s, index) + offset; 152 } 153 154 static int cluster_remainder(BDRVParallelsState *s, int64_t sector_num, 155 int nb_sectors) 156 { 157 int ret = s->tracks - sector_num % s->tracks; 158 return MIN(nb_sectors, ret); 159 } 160 161 static int64_t block_status(BDRVParallelsState *s, int64_t sector_num, 162 int nb_sectors, int *pnum) 163 { 164 int64_t start_off = -2, prev_end_off = -2; 165 166 *pnum = 0; 167 while (nb_sectors > 0 || start_off == -2) { 168 int64_t offset = seek_to_sector(s, sector_num); 169 int to_end; 170 171 if (start_off == -2) { 172 start_off = offset; 173 prev_end_off = offset; 174 } else if (offset != prev_end_off) { 175 break; 176 } 177 178 to_end = cluster_remainder(s, sector_num, nb_sectors); 179 nb_sectors -= to_end; 180 sector_num += to_end; 181 *pnum += to_end; 182 183 if (offset > 0) { 184 prev_end_off += to_end; 185 } 186 } 187 return start_off; 188 } 189 190 static int64_t allocate_clusters(BlockDriverState *bs, int64_t sector_num, 191 int nb_sectors, int *pnum) 192 { 193 BDRVParallelsState *s = bs->opaque; 194 uint32_t idx, to_allocate, i; 195 int64_t pos, space; 196 197 pos = block_status(s, sector_num, nb_sectors, pnum); 198 if (pos > 0) { 199 return pos; 200 } 201 202 idx = sector_num / s->tracks; 203 if (idx >= s->bat_size) { 204 return -EINVAL; 205 } 206 207 to_allocate = DIV_ROUND_UP(sector_num + *pnum, s->tracks) - idx; 208 space = to_allocate * s->tracks; 209 if (s->data_end + space > bdrv_getlength(bs->file->bs) >> BDRV_SECTOR_BITS) { 210 int ret; 211 space += s->prealloc_size; 212 if (s->prealloc_mode == PRL_PREALLOC_MODE_FALLOCATE) { 213 ret = bdrv_pwrite_zeroes(bs->file, 214 s->data_end << BDRV_SECTOR_BITS, 215 space << BDRV_SECTOR_BITS, 0); 216 } else { 217 ret = bdrv_truncate(bs->file->bs, 218 (s->data_end + space) << BDRV_SECTOR_BITS); 219 } 220 if (ret < 0) { 221 return ret; 222 } 223 } 224 225 for (i = 0; i < to_allocate; i++) { 226 s->bat_bitmap[idx + i] = cpu_to_le32(s->data_end / s->off_multiplier); 227 s->data_end += s->tracks; 228 bitmap_set(s->bat_dirty_bmap, 229 bat_entry_off(idx + i) / s->bat_dirty_block, 1); 230 } 231 232 return bat2sect(s, idx) + sector_num % s->tracks; 233 } 234 235 236 static coroutine_fn int parallels_co_flush_to_os(BlockDriverState *bs) 237 { 238 BDRVParallelsState *s = bs->opaque; 239 unsigned long size = DIV_ROUND_UP(s->header_size, s->bat_dirty_block); 240 unsigned long bit; 241 242 qemu_co_mutex_lock(&s->lock); 243 244 bit = find_first_bit(s->bat_dirty_bmap, size); 245 while (bit < size) { 246 uint32_t off = bit * s->bat_dirty_block; 247 uint32_t to_write = s->bat_dirty_block; 248 int ret; 249 250 if (off + to_write > s->header_size) { 251 to_write = s->header_size - off; 252 } 253 ret = bdrv_pwrite(bs->file, off, (uint8_t *)s->header + off, 254 to_write); 255 if (ret < 0) { 256 qemu_co_mutex_unlock(&s->lock); 257 return ret; 258 } 259 bit = find_next_bit(s->bat_dirty_bmap, size, bit + 1); 260 } 261 bitmap_zero(s->bat_dirty_bmap, size); 262 263 qemu_co_mutex_unlock(&s->lock); 264 return 0; 265 } 266 267 268 static int64_t coroutine_fn parallels_co_get_block_status(BlockDriverState *bs, 269 int64_t sector_num, int nb_sectors, int *pnum, BlockDriverState **file) 270 { 271 BDRVParallelsState *s = bs->opaque; 272 int64_t offset; 273 274 qemu_co_mutex_lock(&s->lock); 275 offset = block_status(s, sector_num, nb_sectors, pnum); 276 qemu_co_mutex_unlock(&s->lock); 277 278 if (offset < 0) { 279 return 0; 280 } 281 282 *file = bs->file->bs; 283 return (offset << BDRV_SECTOR_BITS) | 284 BDRV_BLOCK_DATA | BDRV_BLOCK_OFFSET_VALID; 285 } 286 287 static coroutine_fn int parallels_co_writev(BlockDriverState *bs, 288 int64_t sector_num, int nb_sectors, QEMUIOVector *qiov) 289 { 290 BDRVParallelsState *s = bs->opaque; 291 uint64_t bytes_done = 0; 292 QEMUIOVector hd_qiov; 293 int ret = 0; 294 295 qemu_iovec_init(&hd_qiov, qiov->niov); 296 297 while (nb_sectors > 0) { 298 int64_t position; 299 int n, nbytes; 300 301 qemu_co_mutex_lock(&s->lock); 302 position = allocate_clusters(bs, sector_num, nb_sectors, &n); 303 qemu_co_mutex_unlock(&s->lock); 304 if (position < 0) { 305 ret = (int)position; 306 break; 307 } 308 309 nbytes = n << BDRV_SECTOR_BITS; 310 311 qemu_iovec_reset(&hd_qiov); 312 qemu_iovec_concat(&hd_qiov, qiov, bytes_done, nbytes); 313 314 ret = bdrv_co_writev(bs->file, position, n, &hd_qiov); 315 if (ret < 0) { 316 break; 317 } 318 319 nb_sectors -= n; 320 sector_num += n; 321 bytes_done += nbytes; 322 } 323 324 qemu_iovec_destroy(&hd_qiov); 325 return ret; 326 } 327 328 static coroutine_fn int parallels_co_readv(BlockDriverState *bs, 329 int64_t sector_num, int nb_sectors, QEMUIOVector *qiov) 330 { 331 BDRVParallelsState *s = bs->opaque; 332 uint64_t bytes_done = 0; 333 QEMUIOVector hd_qiov; 334 int ret = 0; 335 336 qemu_iovec_init(&hd_qiov, qiov->niov); 337 338 while (nb_sectors > 0) { 339 int64_t position; 340 int n, nbytes; 341 342 qemu_co_mutex_lock(&s->lock); 343 position = block_status(s, sector_num, nb_sectors, &n); 344 qemu_co_mutex_unlock(&s->lock); 345 346 nbytes = n << BDRV_SECTOR_BITS; 347 348 if (position < 0) { 349 qemu_iovec_memset(qiov, bytes_done, 0, nbytes); 350 } else { 351 qemu_iovec_reset(&hd_qiov); 352 qemu_iovec_concat(&hd_qiov, qiov, bytes_done, nbytes); 353 354 ret = bdrv_co_readv(bs->file, position, n, &hd_qiov); 355 if (ret < 0) { 356 break; 357 } 358 } 359 360 nb_sectors -= n; 361 sector_num += n; 362 bytes_done += nbytes; 363 } 364 365 qemu_iovec_destroy(&hd_qiov); 366 return ret; 367 } 368 369 370 static int parallels_check(BlockDriverState *bs, BdrvCheckResult *res, 371 BdrvCheckMode fix) 372 { 373 BDRVParallelsState *s = bs->opaque; 374 int64_t size, prev_off, high_off; 375 int ret; 376 uint32_t i; 377 bool flush_bat = false; 378 int cluster_size = s->tracks << BDRV_SECTOR_BITS; 379 380 size = bdrv_getlength(bs->file->bs); 381 if (size < 0) { 382 res->check_errors++; 383 return size; 384 } 385 386 if (s->header_unclean) { 387 fprintf(stderr, "%s image was not closed correctly\n", 388 fix & BDRV_FIX_ERRORS ? "Repairing" : "ERROR"); 389 res->corruptions++; 390 if (fix & BDRV_FIX_ERRORS) { 391 /* parallels_close will do the job right */ 392 res->corruptions_fixed++; 393 s->header_unclean = false; 394 } 395 } 396 397 res->bfi.total_clusters = s->bat_size; 398 res->bfi.compressed_clusters = 0; /* compression is not supported */ 399 400 high_off = 0; 401 prev_off = 0; 402 for (i = 0; i < s->bat_size; i++) { 403 int64_t off = bat2sect(s, i) << BDRV_SECTOR_BITS; 404 if (off == 0) { 405 prev_off = 0; 406 continue; 407 } 408 409 /* cluster outside the image */ 410 if (off > size) { 411 fprintf(stderr, "%s cluster %u is outside image\n", 412 fix & BDRV_FIX_ERRORS ? "Repairing" : "ERROR", i); 413 res->corruptions++; 414 if (fix & BDRV_FIX_ERRORS) { 415 prev_off = 0; 416 s->bat_bitmap[i] = 0; 417 res->corruptions_fixed++; 418 flush_bat = true; 419 continue; 420 } 421 } 422 423 res->bfi.allocated_clusters++; 424 if (off > high_off) { 425 high_off = off; 426 } 427 428 if (prev_off != 0 && (prev_off + cluster_size) != off) { 429 res->bfi.fragmented_clusters++; 430 } 431 prev_off = off; 432 } 433 434 if (flush_bat) { 435 ret = bdrv_pwrite_sync(bs->file, 0, s->header, s->header_size); 436 if (ret < 0) { 437 res->check_errors++; 438 return ret; 439 } 440 } 441 442 res->image_end_offset = high_off + cluster_size; 443 if (size > res->image_end_offset) { 444 int64_t count; 445 count = DIV_ROUND_UP(size - res->image_end_offset, cluster_size); 446 fprintf(stderr, "%s space leaked at the end of the image %" PRId64 "\n", 447 fix & BDRV_FIX_LEAKS ? "Repairing" : "ERROR", 448 size - res->image_end_offset); 449 res->leaks += count; 450 if (fix & BDRV_FIX_LEAKS) { 451 ret = bdrv_truncate(bs->file->bs, res->image_end_offset); 452 if (ret < 0) { 453 res->check_errors++; 454 return ret; 455 } 456 res->leaks_fixed += count; 457 } 458 } 459 460 return 0; 461 } 462 463 464 static int parallels_create(const char *filename, QemuOpts *opts, Error **errp) 465 { 466 int64_t total_size, cl_size; 467 uint8_t tmp[BDRV_SECTOR_SIZE]; 468 Error *local_err = NULL; 469 BlockBackend *file; 470 uint32_t bat_entries, bat_sectors; 471 ParallelsHeader header; 472 int ret; 473 474 total_size = ROUND_UP(qemu_opt_get_size_del(opts, BLOCK_OPT_SIZE, 0), 475 BDRV_SECTOR_SIZE); 476 cl_size = ROUND_UP(qemu_opt_get_size_del(opts, BLOCK_OPT_CLUSTER_SIZE, 477 DEFAULT_CLUSTER_SIZE), BDRV_SECTOR_SIZE); 478 479 ret = bdrv_create_file(filename, opts, &local_err); 480 if (ret < 0) { 481 error_propagate(errp, local_err); 482 return ret; 483 } 484 485 file = blk_new_open(filename, NULL, NULL, 486 BDRV_O_RDWR | BDRV_O_PROTOCOL, &local_err); 487 if (file == NULL) { 488 error_propagate(errp, local_err); 489 return -EIO; 490 } 491 492 blk_set_allow_write_beyond_eof(file, true); 493 494 ret = blk_truncate(file, 0); 495 if (ret < 0) { 496 goto exit; 497 } 498 499 bat_entries = DIV_ROUND_UP(total_size, cl_size); 500 bat_sectors = DIV_ROUND_UP(bat_entry_off(bat_entries), cl_size); 501 bat_sectors = (bat_sectors * cl_size) >> BDRV_SECTOR_BITS; 502 503 memset(&header, 0, sizeof(header)); 504 memcpy(header.magic, HEADER_MAGIC2, sizeof(header.magic)); 505 header.version = cpu_to_le32(HEADER_VERSION); 506 /* don't care much about geometry, it is not used on image level */ 507 header.heads = cpu_to_le32(16); 508 header.cylinders = cpu_to_le32(total_size / BDRV_SECTOR_SIZE / 16 / 32); 509 header.tracks = cpu_to_le32(cl_size >> BDRV_SECTOR_BITS); 510 header.bat_entries = cpu_to_le32(bat_entries); 511 header.nb_sectors = cpu_to_le64(DIV_ROUND_UP(total_size, BDRV_SECTOR_SIZE)); 512 header.data_off = cpu_to_le32(bat_sectors); 513 514 /* write all the data */ 515 memset(tmp, 0, sizeof(tmp)); 516 memcpy(tmp, &header, sizeof(header)); 517 518 ret = blk_pwrite(file, 0, tmp, BDRV_SECTOR_SIZE, 0); 519 if (ret < 0) { 520 goto exit; 521 } 522 ret = blk_pwrite_zeroes(file, BDRV_SECTOR_SIZE, 523 (bat_sectors - 1) << BDRV_SECTOR_BITS, 0); 524 if (ret < 0) { 525 goto exit; 526 } 527 ret = 0; 528 529 done: 530 blk_unref(file); 531 return ret; 532 533 exit: 534 error_setg_errno(errp, -ret, "Failed to create Parallels image"); 535 goto done; 536 } 537 538 539 static int parallels_probe(const uint8_t *buf, int buf_size, 540 const char *filename) 541 { 542 const ParallelsHeader *ph = (const void *)buf; 543 544 if (buf_size < sizeof(ParallelsHeader)) { 545 return 0; 546 } 547 548 if ((!memcmp(ph->magic, HEADER_MAGIC, 16) || 549 !memcmp(ph->magic, HEADER_MAGIC2, 16)) && 550 (le32_to_cpu(ph->version) == HEADER_VERSION)) { 551 return 100; 552 } 553 554 return 0; 555 } 556 557 static int parallels_update_header(BlockDriverState *bs) 558 { 559 BDRVParallelsState *s = bs->opaque; 560 unsigned size = MAX(bdrv_opt_mem_align(bs->file->bs), 561 sizeof(ParallelsHeader)); 562 563 if (size > s->header_size) { 564 size = s->header_size; 565 } 566 return bdrv_pwrite_sync(bs->file, 0, s->header, size); 567 } 568 569 static int parallels_open(BlockDriverState *bs, QDict *options, int flags, 570 Error **errp) 571 { 572 BDRVParallelsState *s = bs->opaque; 573 ParallelsHeader ph; 574 int ret, size, i; 575 QemuOpts *opts = NULL; 576 Error *local_err = NULL; 577 char *buf; 578 579 ret = bdrv_pread(bs->file, 0, &ph, sizeof(ph)); 580 if (ret < 0) { 581 goto fail; 582 } 583 584 bs->total_sectors = le64_to_cpu(ph.nb_sectors); 585 586 if (le32_to_cpu(ph.version) != HEADER_VERSION) { 587 goto fail_format; 588 } 589 if (!memcmp(ph.magic, HEADER_MAGIC, 16)) { 590 s->off_multiplier = 1; 591 bs->total_sectors = 0xffffffff & bs->total_sectors; 592 } else if (!memcmp(ph.magic, HEADER_MAGIC2, 16)) { 593 s->off_multiplier = le32_to_cpu(ph.tracks); 594 } else { 595 goto fail_format; 596 } 597 598 s->tracks = le32_to_cpu(ph.tracks); 599 if (s->tracks == 0) { 600 error_setg(errp, "Invalid image: Zero sectors per track"); 601 ret = -EINVAL; 602 goto fail; 603 } 604 if (s->tracks > INT32_MAX/513) { 605 error_setg(errp, "Invalid image: Too big cluster"); 606 ret = -EFBIG; 607 goto fail; 608 } 609 610 s->bat_size = le32_to_cpu(ph.bat_entries); 611 if (s->bat_size > INT_MAX / sizeof(uint32_t)) { 612 error_setg(errp, "Catalog too large"); 613 ret = -EFBIG; 614 goto fail; 615 } 616 617 size = bat_entry_off(s->bat_size); 618 s->header_size = ROUND_UP(size, bdrv_opt_mem_align(bs->file->bs)); 619 s->header = qemu_try_blockalign(bs->file->bs, s->header_size); 620 if (s->header == NULL) { 621 ret = -ENOMEM; 622 goto fail; 623 } 624 s->data_end = le32_to_cpu(ph.data_off); 625 if (s->data_end == 0) { 626 s->data_end = ROUND_UP(bat_entry_off(s->bat_size), BDRV_SECTOR_SIZE); 627 } 628 if (s->data_end < s->header_size) { 629 /* there is not enough unused space to fit to block align between BAT 630 and actual data. We can't avoid read-modify-write... */ 631 s->header_size = size; 632 } 633 634 ret = bdrv_pread(bs->file, 0, s->header, s->header_size); 635 if (ret < 0) { 636 goto fail; 637 } 638 s->bat_bitmap = (uint32_t *)(s->header + 1); 639 640 for (i = 0; i < s->bat_size; i++) { 641 int64_t off = bat2sect(s, i); 642 if (off >= s->data_end) { 643 s->data_end = off + s->tracks; 644 } 645 } 646 647 if (le32_to_cpu(ph.inuse) == HEADER_INUSE_MAGIC) { 648 /* Image was not closed correctly. The check is mandatory */ 649 s->header_unclean = true; 650 if ((flags & BDRV_O_RDWR) && !(flags & BDRV_O_CHECK)) { 651 error_setg(errp, "parallels: Image was not closed correctly; " 652 "cannot be opened read/write"); 653 ret = -EACCES; 654 goto fail; 655 } 656 } 657 658 opts = qemu_opts_create(¶llels_runtime_opts, NULL, 0, &local_err); 659 if (local_err != NULL) { 660 goto fail_options; 661 } 662 663 qemu_opts_absorb_qdict(opts, options, &local_err); 664 if (local_err != NULL) { 665 goto fail_options; 666 } 667 668 s->prealloc_size = 669 qemu_opt_get_size_del(opts, PARALLELS_OPT_PREALLOC_SIZE, 0); 670 s->prealloc_size = MAX(s->tracks, s->prealloc_size >> BDRV_SECTOR_BITS); 671 buf = qemu_opt_get_del(opts, PARALLELS_OPT_PREALLOC_MODE); 672 s->prealloc_mode = qapi_enum_parse(prealloc_mode_lookup, buf, 673 PRL_PREALLOC_MODE__MAX, PRL_PREALLOC_MODE_FALLOCATE, &local_err); 674 g_free(buf); 675 if (local_err != NULL) { 676 goto fail_options; 677 } 678 if (!bdrv_has_zero_init(bs->file->bs) || 679 bdrv_truncate(bs->file->bs, bdrv_getlength(bs->file->bs)) != 0) { 680 s->prealloc_mode = PRL_PREALLOC_MODE_FALLOCATE; 681 } 682 683 if (flags & BDRV_O_RDWR) { 684 s->header->inuse = cpu_to_le32(HEADER_INUSE_MAGIC); 685 ret = parallels_update_header(bs); 686 if (ret < 0) { 687 goto fail; 688 } 689 } 690 691 s->bat_dirty_block = 4 * getpagesize(); 692 s->bat_dirty_bmap = 693 bitmap_new(DIV_ROUND_UP(s->header_size, s->bat_dirty_block)); 694 695 qemu_co_mutex_init(&s->lock); 696 return 0; 697 698 fail_format: 699 error_setg(errp, "Image not in Parallels format"); 700 ret = -EINVAL; 701 fail: 702 qemu_vfree(s->header); 703 return ret; 704 705 fail_options: 706 error_propagate(errp, local_err); 707 ret = -EINVAL; 708 goto fail; 709 } 710 711 712 static void parallels_close(BlockDriverState *bs) 713 { 714 BDRVParallelsState *s = bs->opaque; 715 716 if (bs->open_flags & BDRV_O_RDWR) { 717 s->header->inuse = 0; 718 parallels_update_header(bs); 719 } 720 721 if (bs->open_flags & BDRV_O_RDWR) { 722 bdrv_truncate(bs->file->bs, s->data_end << BDRV_SECTOR_BITS); 723 } 724 725 g_free(s->bat_dirty_bmap); 726 qemu_vfree(s->header); 727 } 728 729 static QemuOptsList parallels_create_opts = { 730 .name = "parallels-create-opts", 731 .head = QTAILQ_HEAD_INITIALIZER(parallels_create_opts.head), 732 .desc = { 733 { 734 .name = BLOCK_OPT_SIZE, 735 .type = QEMU_OPT_SIZE, 736 .help = "Virtual disk size", 737 }, 738 { 739 .name = BLOCK_OPT_CLUSTER_SIZE, 740 .type = QEMU_OPT_SIZE, 741 .help = "Parallels image cluster size", 742 .def_value_str = stringify(DEFAULT_CLUSTER_SIZE), 743 }, 744 { /* end of list */ } 745 } 746 }; 747 748 static BlockDriver bdrv_parallels = { 749 .format_name = "parallels", 750 .instance_size = sizeof(BDRVParallelsState), 751 .bdrv_probe = parallels_probe, 752 .bdrv_open = parallels_open, 753 .bdrv_close = parallels_close, 754 .bdrv_co_get_block_status = parallels_co_get_block_status, 755 .bdrv_has_zero_init = bdrv_has_zero_init_1, 756 .bdrv_co_flush_to_os = parallels_co_flush_to_os, 757 .bdrv_co_readv = parallels_co_readv, 758 .bdrv_co_writev = parallels_co_writev, 759 760 .bdrv_create = parallels_create, 761 .bdrv_check = parallels_check, 762 .create_opts = ¶llels_create_opts, 763 }; 764 765 static void bdrv_parallels_init(void) 766 { 767 bdrv_register(&bdrv_parallels); 768 } 769 770 block_init(bdrv_parallels_init); 771