Merge remote-tracking branch 'remotes/kevin/tags/for-upstream' into staging
[qemu.git] / block / parallels.c
1 /*
2 * Block driver for Parallels disk image format
3 *
4 * Copyright (c) 2007 Alex Beregszaszi
5 *
6 * This code is based on comparing different disk images created by Parallels.
7 *
8 * Permission is hereby granted, free of charge, to any person obtaining a copy
9 * of this software and associated documentation files (the "Software"), to deal
10 * in the Software without restriction, including without limitation the rights
11 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
12 * copies of the Software, and to permit persons to whom the Software is
13 * furnished to do so, subject to the following conditions:
14 *
15 * The above copyright notice and this permission notice shall be included in
16 * all copies or substantial portions of the Software.
17 *
18 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
19 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
20 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
21 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
22 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
23 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
24 * THE SOFTWARE.
25 */
26 #include "qemu-common.h"
27 #include "block/block_int.h"
28 #include "qemu/module.h"
29
30 /**************************************************************/
31
32 #define HEADER_MAGIC "WithoutFreeSpace"
33 #define HEADER_VERSION 2
34 #define HEADER_SIZE 64
35
36 // always little-endian
37 struct parallels_header {
38 char magic[16]; // "WithoutFreeSpace"
39 uint32_t version;
40 uint32_t heads;
41 uint32_t cylinders;
42 uint32_t tracks;
43 uint32_t catalog_entries;
44 uint32_t nb_sectors;
45 char padding[24];
46 } QEMU_PACKED;
47
48 typedef struct BDRVParallelsState {
49 CoMutex lock;
50
51 uint32_t *catalog_bitmap;
52 int catalog_size;
53
54 int tracks;
55 } BDRVParallelsState;
56
57 static int parallels_probe(const uint8_t *buf, int buf_size, const char *filename)
58 {
59 const struct parallels_header *ph = (const void *)buf;
60
61 if (buf_size < HEADER_SIZE)
62 return 0;
63
64 if (!memcmp(ph->magic, HEADER_MAGIC, 16) &&
65 (le32_to_cpu(ph->version) == HEADER_VERSION))
66 return 100;
67
68 return 0;
69 }
70
71 static int parallels_open(BlockDriverState *bs, QDict *options, int flags,
72 Error **errp)
73 {
74 BDRVParallelsState *s = bs->opaque;
75 int i;
76 struct parallels_header ph;
77 int ret;
78
79 bs->read_only = 1; // no write support yet
80
81 ret = bdrv_pread(bs->file, 0, &ph, sizeof(ph));
82 if (ret < 0) {
83 goto fail;
84 }
85
86 if (memcmp(ph.magic, HEADER_MAGIC, 16) ||
87 (le32_to_cpu(ph.version) != HEADER_VERSION)) {
88 error_setg(errp, "Image not in Parallels format");
89 ret = -EINVAL;
90 goto fail;
91 }
92
93 bs->total_sectors = le32_to_cpu(ph.nb_sectors);
94
95 s->tracks = le32_to_cpu(ph.tracks);
96
97 s->catalog_size = le32_to_cpu(ph.catalog_entries);
98 s->catalog_bitmap = g_malloc(s->catalog_size * 4);
99
100 ret = bdrv_pread(bs->file, 64, s->catalog_bitmap, s->catalog_size * 4);
101 if (ret < 0) {
102 goto fail;
103 }
104
105 for (i = 0; i < s->catalog_size; i++)
106 le32_to_cpus(&s->catalog_bitmap[i]);
107
108 qemu_co_mutex_init(&s->lock);
109 return 0;
110
111 fail:
112 g_free(s->catalog_bitmap);
113 return ret;
114 }
115
116 static int64_t seek_to_sector(BlockDriverState *bs, int64_t sector_num)
117 {
118 BDRVParallelsState *s = bs->opaque;
119 uint32_t index, offset;
120
121 index = sector_num / s->tracks;
122 offset = sector_num % s->tracks;
123
124 /* not allocated */
125 if ((index > s->catalog_size) || (s->catalog_bitmap[index] == 0))
126 return -1;
127 return (uint64_t)(s->catalog_bitmap[index] + offset) * 512;
128 }
129
130 static int parallels_read(BlockDriverState *bs, int64_t sector_num,
131 uint8_t *buf, int nb_sectors)
132 {
133 while (nb_sectors > 0) {
134 int64_t position = seek_to_sector(bs, sector_num);
135 if (position >= 0) {
136 if (bdrv_pread(bs->file, position, buf, 512) != 512)
137 return -1;
138 } else {
139 memset(buf, 0, 512);
140 }
141 nb_sectors--;
142 sector_num++;
143 buf += 512;
144 }
145 return 0;
146 }
147
148 static coroutine_fn int parallels_co_read(BlockDriverState *bs, int64_t sector_num,
149 uint8_t *buf, int nb_sectors)
150 {
151 int ret;
152 BDRVParallelsState *s = bs->opaque;
153 qemu_co_mutex_lock(&s->lock);
154 ret = parallels_read(bs, sector_num, buf, nb_sectors);
155 qemu_co_mutex_unlock(&s->lock);
156 return ret;
157 }
158
159 static void parallels_close(BlockDriverState *bs)
160 {
161 BDRVParallelsState *s = bs->opaque;
162 g_free(s->catalog_bitmap);
163 }
164
165 static BlockDriver bdrv_parallels = {
166 .format_name = "parallels",
167 .instance_size = sizeof(BDRVParallelsState),
168 .bdrv_probe = parallels_probe,
169 .bdrv_open = parallels_open,
170 .bdrv_read = parallels_co_read,
171 .bdrv_close = parallels_close,
172 };
173
174 static void bdrv_parallels_init(void)
175 {
176 bdrv_register(&bdrv_parallels);
177 }
178
179 block_init(bdrv_parallels_init);