root / block-vmdk.c @ 9b686843
History | View | Annotate | Download (25.2 kB)
1 | ea2384d3 | bellard | /*
|
---|---|---|---|
2 | ea2384d3 | bellard | * Block driver for the VMDK format
|
3 | 5fafdf24 | ths | *
|
4 | ea2384d3 | bellard | * Copyright (c) 2004 Fabrice Bellard
|
5 | ff1afc72 | bellard | * Copyright (c) 2005 Filip Navara
|
6 | 5fafdf24 | ths | *
|
7 | ea2384d3 | bellard | * Permission is hereby granted, free of charge, to any person obtaining a copy
|
8 | ea2384d3 | bellard | * of this software and associated documentation files (the "Software"), to deal
|
9 | ea2384d3 | bellard | * in the Software without restriction, including without limitation the rights
|
10 | ea2384d3 | bellard | * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
|
11 | ea2384d3 | bellard | * copies of the Software, and to permit persons to whom the Software is
|
12 | ea2384d3 | bellard | * furnished to do so, subject to the following conditions:
|
13 | ea2384d3 | bellard | *
|
14 | ea2384d3 | bellard | * The above copyright notice and this permission notice shall be included in
|
15 | ea2384d3 | bellard | * all copies or substantial portions of the Software.
|
16 | ea2384d3 | bellard | *
|
17 | ea2384d3 | bellard | * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
18 | ea2384d3 | bellard | * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
19 | ea2384d3 | bellard | * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
|
20 | ea2384d3 | bellard | * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
|
21 | ea2384d3 | bellard | * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
|
22 | ea2384d3 | bellard | * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
|
23 | ea2384d3 | bellard | * THE SOFTWARE.
|
24 | ea2384d3 | bellard | */
|
25 | 5f4da8c0 | ths | |
26 | faf07963 | pbrook | #include "qemu-common.h" |
27 | ea2384d3 | bellard | #include "block_int.h" |
28 | ea2384d3 | bellard | |
29 | ea2384d3 | bellard | #define VMDK3_MAGIC (('C' << 24) | ('O' << 16) | ('W' << 8) | 'D') |
30 | ea2384d3 | bellard | #define VMDK4_MAGIC (('K' << 24) | ('D' << 16) | ('M' << 8) | 'V') |
31 | ea2384d3 | bellard | |
32 | ea2384d3 | bellard | typedef struct { |
33 | ea2384d3 | bellard | uint32_t version; |
34 | ea2384d3 | bellard | uint32_t flags; |
35 | ea2384d3 | bellard | uint32_t disk_sectors; |
36 | ea2384d3 | bellard | uint32_t granularity; |
37 | ea2384d3 | bellard | uint32_t l1dir_offset; |
38 | ea2384d3 | bellard | uint32_t l1dir_size; |
39 | ea2384d3 | bellard | uint32_t file_sectors; |
40 | ea2384d3 | bellard | uint32_t cylinders; |
41 | ea2384d3 | bellard | uint32_t heads; |
42 | ea2384d3 | bellard | uint32_t sectors_per_track; |
43 | ea2384d3 | bellard | } VMDK3Header; |
44 | ea2384d3 | bellard | |
45 | ea2384d3 | bellard | typedef struct { |
46 | ea2384d3 | bellard | uint32_t version; |
47 | ea2384d3 | bellard | uint32_t flags; |
48 | ea2384d3 | bellard | int64_t capacity; |
49 | ea2384d3 | bellard | int64_t granularity; |
50 | ea2384d3 | bellard | int64_t desc_offset; |
51 | ea2384d3 | bellard | int64_t desc_size; |
52 | ea2384d3 | bellard | int32_t num_gtes_per_gte; |
53 | ea2384d3 | bellard | int64_t rgd_offset; |
54 | ea2384d3 | bellard | int64_t gd_offset; |
55 | ea2384d3 | bellard | int64_t grain_offset; |
56 | ea2384d3 | bellard | char filler[1]; |
57 | ea2384d3 | bellard | char check_bytes[4]; |
58 | ff1afc72 | bellard | } __attribute__((packed)) VMDK4Header; |
59 | ea2384d3 | bellard | |
60 | ea2384d3 | bellard | #define L2_CACHE_SIZE 16 |
61 | ea2384d3 | bellard | |
62 | ea2384d3 | bellard | typedef struct BDRVVmdkState { |
63 | 5f4da8c0 | ths | BlockDriverState *hd; |
64 | ea2384d3 | bellard | int64_t l1_table_offset; |
65 | ff1afc72 | bellard | int64_t l1_backup_table_offset; |
66 | ea2384d3 | bellard | uint32_t *l1_table; |
67 | ff1afc72 | bellard | uint32_t *l1_backup_table; |
68 | ea2384d3 | bellard | unsigned int l1_size; |
69 | ea2384d3 | bellard | uint32_t l1_entry_sectors; |
70 | ea2384d3 | bellard | |
71 | ea2384d3 | bellard | unsigned int l2_size; |
72 | ea2384d3 | bellard | uint32_t *l2_cache; |
73 | ea2384d3 | bellard | uint32_t l2_cache_offsets[L2_CACHE_SIZE]; |
74 | ea2384d3 | bellard | uint32_t l2_cache_counts[L2_CACHE_SIZE]; |
75 | ea2384d3 | bellard | |
76 | ea2384d3 | bellard | unsigned int cluster_sectors; |
77 | 5f4da8c0 | ths | uint32_t parent_cid; |
78 | 630530a6 | ths | int is_parent;
|
79 | ea2384d3 | bellard | } BDRVVmdkState; |
80 | ea2384d3 | bellard | |
81 | 630530a6 | ths | typedef struct VmdkMetaData { |
82 | 630530a6 | ths | uint32_t offset; |
83 | 630530a6 | ths | unsigned int l1_index; |
84 | 630530a6 | ths | unsigned int l2_index; |
85 | 630530a6 | ths | unsigned int l2_offset; |
86 | 630530a6 | ths | int valid;
|
87 | 630530a6 | ths | } VmdkMetaData; |
88 | 630530a6 | ths | |
89 | 630530a6 | ths | typedef struct ActiveBDRVState{ |
90 | 630530a6 | ths | BlockDriverState *hd; // active image handler
|
91 | 630530a6 | ths | uint64_t cluster_offset; // current write offset
|
92 | 630530a6 | ths | }ActiveBDRVState; |
93 | 630530a6 | ths | |
94 | 630530a6 | ths | static ActiveBDRVState activeBDRV;
|
95 | 630530a6 | ths | |
96 | 630530a6 | ths | |
97 | ea2384d3 | bellard | static int vmdk_probe(const uint8_t *buf, int buf_size, const char *filename) |
98 | ea2384d3 | bellard | { |
99 | ea2384d3 | bellard | uint32_t magic; |
100 | ea2384d3 | bellard | |
101 | ea2384d3 | bellard | if (buf_size < 4) |
102 | ea2384d3 | bellard | return 0; |
103 | ea2384d3 | bellard | magic = be32_to_cpu(*(uint32_t *)buf); |
104 | ea2384d3 | bellard | if (magic == VMDK3_MAGIC ||
|
105 | ea2384d3 | bellard | magic == VMDK4_MAGIC) |
106 | ea2384d3 | bellard | return 100; |
107 | ea2384d3 | bellard | else
|
108 | ea2384d3 | bellard | return 0; |
109 | ea2384d3 | bellard | } |
110 | ea2384d3 | bellard | |
111 | 5f4da8c0 | ths | #define CHECK_CID 1 |
112 | 5f4da8c0 | ths | |
113 | 3b46e624 | ths | #define SECTOR_SIZE 512 |
114 | 5f4da8c0 | ths | #define DESC_SIZE 20*SECTOR_SIZE // 20 sectors of 512 bytes each |
115 | 5fafdf24 | ths | #define HEADER_SIZE 512 // first sector of 512 bytes |
116 | 5f4da8c0 | ths | |
117 | 5f4da8c0 | ths | static uint32_t vmdk_read_cid(BlockDriverState *bs, int parent) |
118 | ea2384d3 | bellard | { |
119 | ea2384d3 | bellard | BDRVVmdkState *s = bs->opaque; |
120 | 5f4da8c0 | ths | char desc[DESC_SIZE];
|
121 | 5f4da8c0 | ths | uint32_t cid; |
122 | 5fafdf24 | ths | char *p_name, *cid_str;
|
123 | 5f4da8c0 | ths | size_t cid_str_size; |
124 | 5f4da8c0 | ths | |
125 | 5f4da8c0 | ths | /* the descriptor offset = 0x200 */
|
126 | 5f4da8c0 | ths | if (bdrv_pread(s->hd, 0x200, desc, DESC_SIZE) != DESC_SIZE) |
127 | 5f4da8c0 | ths | return 0; |
128 | 5f4da8c0 | ths | |
129 | 5f4da8c0 | ths | if (parent) {
|
130 | 5f4da8c0 | ths | cid_str = "parentCID";
|
131 | 5f4da8c0 | ths | cid_str_size = sizeof("parentCID"); |
132 | 5f4da8c0 | ths | } else {
|
133 | 5f4da8c0 | ths | cid_str = "CID";
|
134 | 5f4da8c0 | ths | cid_str_size = sizeof("CID"); |
135 | 5f4da8c0 | ths | } |
136 | 5f4da8c0 | ths | |
137 | 5f4da8c0 | ths | if ((p_name = strstr(desc,cid_str)) != 0) { |
138 | 5f4da8c0 | ths | p_name += cid_str_size; |
139 | 5f4da8c0 | ths | sscanf(p_name,"%x",&cid);
|
140 | 5f4da8c0 | ths | } |
141 | 5f4da8c0 | ths | |
142 | 5f4da8c0 | ths | return cid;
|
143 | 5f4da8c0 | ths | } |
144 | 5f4da8c0 | ths | |
145 | 5f4da8c0 | ths | static int vmdk_write_cid(BlockDriverState *bs, uint32_t cid) |
146 | 5f4da8c0 | ths | { |
147 | 5f4da8c0 | ths | BDRVVmdkState *s = bs->opaque; |
148 | 5f4da8c0 | ths | char desc[DESC_SIZE], tmp_desc[DESC_SIZE];
|
149 | 5f4da8c0 | ths | char *p_name, *tmp_str;
|
150 | 5f4da8c0 | ths | |
151 | 5f4da8c0 | ths | /* the descriptor offset = 0x200 */
|
152 | 5f4da8c0 | ths | if (bdrv_pread(s->hd, 0x200, desc, DESC_SIZE) != DESC_SIZE) |
153 | 5f4da8c0 | ths | return -1; |
154 | 5f4da8c0 | ths | |
155 | 5f4da8c0 | ths | tmp_str = strstr(desc,"parentCID");
|
156 | 5f4da8c0 | ths | strcpy(tmp_desc, tmp_str); |
157 | 5f4da8c0 | ths | if ((p_name = strstr(desc,"CID")) != 0) { |
158 | 5f4da8c0 | ths | p_name += sizeof("CID"); |
159 | 5f4da8c0 | ths | sprintf(p_name,"%x\n",cid);
|
160 | 5f4da8c0 | ths | strcat(desc,tmp_desc); |
161 | 5f4da8c0 | ths | } |
162 | 5f4da8c0 | ths | |
163 | 5f4da8c0 | ths | if (bdrv_pwrite(s->hd, 0x200, desc, DESC_SIZE) != DESC_SIZE) |
164 | 5f4da8c0 | ths | return -1; |
165 | 5f4da8c0 | ths | return 0; |
166 | 5f4da8c0 | ths | } |
167 | 5f4da8c0 | ths | |
168 | 5f4da8c0 | ths | static int vmdk_is_cid_valid(BlockDriverState *bs) |
169 | 5f4da8c0 | ths | { |
170 | 5f4da8c0 | ths | #ifdef CHECK_CID
|
171 | 5f4da8c0 | ths | BDRVVmdkState *s = bs->opaque; |
172 | 5f4da8c0 | ths | BlockDriverState *p_bs = s->hd->backing_hd; |
173 | 5f4da8c0 | ths | uint32_t cur_pcid; |
174 | 5f4da8c0 | ths | |
175 | 5f4da8c0 | ths | if (p_bs) {
|
176 | 5f4da8c0 | ths | cur_pcid = vmdk_read_cid(p_bs,0);
|
177 | 5f4da8c0 | ths | if (s->parent_cid != cur_pcid)
|
178 | 5f4da8c0 | ths | // CID not valid
|
179 | 5f4da8c0 | ths | return 0; |
180 | 5f4da8c0 | ths | } |
181 | 5f4da8c0 | ths | #endif
|
182 | 5f4da8c0 | ths | // CID valid
|
183 | 5f4da8c0 | ths | return 1; |
184 | 5f4da8c0 | ths | } |
185 | 5f4da8c0 | ths | |
186 | 5f4da8c0 | ths | static int vmdk_snapshot_create(const char *filename, const char *backing_file) |
187 | 5f4da8c0 | ths | { |
188 | 5f4da8c0 | ths | int snp_fd, p_fd;
|
189 | 5f4da8c0 | ths | uint32_t p_cid; |
190 | 5fafdf24 | ths | char *p_name, *gd_buf, *rgd_buf;
|
191 | 5f4da8c0 | ths | const char *real_filename, *temp_str; |
192 | 5f4da8c0 | ths | VMDK4Header header; |
193 | 5f4da8c0 | ths | uint32_t gde_entries, gd_size; |
194 | 5f4da8c0 | ths | int64_t gd_offset, rgd_offset, capacity, gt_size; |
195 | 5f4da8c0 | ths | char p_desc[DESC_SIZE], s_desc[DESC_SIZE], hdr[HEADER_SIZE];
|
196 | 5f4da8c0 | ths | char *desc_template =
|
197 | 5f4da8c0 | ths | "# Disk DescriptorFile\n"
|
198 | 5f4da8c0 | ths | "version=1\n"
|
199 | 5f4da8c0 | ths | "CID=%x\n"
|
200 | 5f4da8c0 | ths | "parentCID=%x\n"
|
201 | 5f4da8c0 | ths | "createType=\"monolithicSparse\"\n"
|
202 | 5f4da8c0 | ths | "parentFileNameHint=\"%s\"\n"
|
203 | 5f4da8c0 | ths | "\n"
|
204 | 5f4da8c0 | ths | "# Extent description\n"
|
205 | 5f4da8c0 | ths | "RW %lu SPARSE \"%s\"\n"
|
206 | 5f4da8c0 | ths | "\n"
|
207 | 5f4da8c0 | ths | "# The Disk Data Base \n"
|
208 | 5f4da8c0 | ths | "#DDB\n"
|
209 | 5f4da8c0 | ths | "\n";
|
210 | 5f4da8c0 | ths | |
211 | 5f4da8c0 | ths | snp_fd = open(filename, O_RDWR | O_CREAT | O_TRUNC | O_BINARY | O_LARGEFILE, 0644);
|
212 | 5f4da8c0 | ths | if (snp_fd < 0) |
213 | 5f4da8c0 | ths | return -1; |
214 | 5f4da8c0 | ths | p_fd = open(backing_file, O_RDONLY | O_BINARY | O_LARGEFILE); |
215 | 5f4da8c0 | ths | if (p_fd < 0) { |
216 | 5f4da8c0 | ths | close(snp_fd); |
217 | 5f4da8c0 | ths | return -1; |
218 | 5f4da8c0 | ths | } |
219 | 5f4da8c0 | ths | |
220 | 5f4da8c0 | ths | /* read the header */
|
221 | 5f4da8c0 | ths | if (lseek(p_fd, 0x0, SEEK_SET) == -1) |
222 | 5f4da8c0 | ths | goto fail;
|
223 | 5f4da8c0 | ths | if (read(p_fd, hdr, HEADER_SIZE) != HEADER_SIZE)
|
224 | 5f4da8c0 | ths | goto fail;
|
225 | 5f4da8c0 | ths | |
226 | 5f4da8c0 | ths | /* write the header */
|
227 | 5f4da8c0 | ths | if (lseek(snp_fd, 0x0, SEEK_SET) == -1) |
228 | 5f4da8c0 | ths | goto fail;
|
229 | 5f4da8c0 | ths | if (write(snp_fd, hdr, HEADER_SIZE) == -1) |
230 | 5f4da8c0 | ths | goto fail;
|
231 | 5f4da8c0 | ths | |
232 | 5f4da8c0 | ths | memset(&header, 0, sizeof(header)); |
233 | 5f4da8c0 | ths | memcpy(&header,&hdr[4], sizeof(header)); // skip the VMDK4_MAGIC |
234 | 5f4da8c0 | ths | |
235 | 5f4da8c0 | ths | ftruncate(snp_fd, header.grain_offset << 9);
|
236 | 5f4da8c0 | ths | /* the descriptor offset = 0x200 */
|
237 | 5f4da8c0 | ths | if (lseek(p_fd, 0x200, SEEK_SET) == -1) |
238 | 5f4da8c0 | ths | goto fail;
|
239 | 5f4da8c0 | ths | if (read(p_fd, p_desc, DESC_SIZE) != DESC_SIZE)
|
240 | 5f4da8c0 | ths | goto fail;
|
241 | 5f4da8c0 | ths | |
242 | 5f4da8c0 | ths | if ((p_name = strstr(p_desc,"CID")) != 0) { |
243 | 5f4da8c0 | ths | p_name += sizeof("CID"); |
244 | 5f4da8c0 | ths | sscanf(p_name,"%x",&p_cid);
|
245 | 5f4da8c0 | ths | } |
246 | 5f4da8c0 | ths | |
247 | 5f4da8c0 | ths | real_filename = filename; |
248 | 5f4da8c0 | ths | if ((temp_str = strrchr(real_filename, '\\')) != NULL) |
249 | 5f4da8c0 | ths | real_filename = temp_str + 1;
|
250 | 5f4da8c0 | ths | if ((temp_str = strrchr(real_filename, '/')) != NULL) |
251 | 5f4da8c0 | ths | real_filename = temp_str + 1;
|
252 | 5f4da8c0 | ths | if ((temp_str = strrchr(real_filename, ':')) != NULL) |
253 | 5f4da8c0 | ths | real_filename = temp_str + 1;
|
254 | 5f4da8c0 | ths | |
255 | 5f4da8c0 | ths | sprintf(s_desc, desc_template, p_cid, p_cid, backing_file |
256 | 5f4da8c0 | ths | , (uint32_t)header.capacity, real_filename); |
257 | 5f4da8c0 | ths | |
258 | 5f4da8c0 | ths | /* write the descriptor */
|
259 | 5f4da8c0 | ths | if (lseek(snp_fd, 0x200, SEEK_SET) == -1) |
260 | 5f4da8c0 | ths | goto fail;
|
261 | 5f4da8c0 | ths | if (write(snp_fd, s_desc, strlen(s_desc)) == -1) |
262 | 5f4da8c0 | ths | goto fail;
|
263 | ea2384d3 | bellard | |
264 | 5f4da8c0 | ths | gd_offset = header.gd_offset * SECTOR_SIZE; // offset of GD table
|
265 | 5f4da8c0 | ths | rgd_offset = header.rgd_offset * SECTOR_SIZE; // offset of RGD table
|
266 | 5f4da8c0 | ths | capacity = header.capacity * SECTOR_SIZE; // Extent size
|
267 | 5f4da8c0 | ths | /*
|
268 | 5f4da8c0 | ths | * Each GDE span 32M disk, means:
|
269 | 5f4da8c0 | ths | * 512 GTE per GT, each GTE points to grain
|
270 | 5f4da8c0 | ths | */
|
271 | 5f4da8c0 | ths | gt_size = (int64_t)header.num_gtes_per_gte * header.granularity * SECTOR_SIZE; |
272 | 5f4da8c0 | ths | if (!gt_size)
|
273 | 5f4da8c0 | ths | goto fail;
|
274 | 5fafdf24 | ths | gde_entries = (uint32_t)(capacity / gt_size); // number of gde/rgde
|
275 | 5f4da8c0 | ths | gd_size = gde_entries * sizeof(uint32_t);
|
276 | 5f4da8c0 | ths | |
277 | 5f4da8c0 | ths | /* write RGD */
|
278 | 5f4da8c0 | ths | rgd_buf = qemu_malloc(gd_size); |
279 | 5f4da8c0 | ths | if (!rgd_buf)
|
280 | 5f4da8c0 | ths | goto fail;
|
281 | 5f4da8c0 | ths | if (lseek(p_fd, rgd_offset, SEEK_SET) == -1) |
282 | 5f4da8c0 | ths | goto fail_rgd;
|
283 | 5f4da8c0 | ths | if (read(p_fd, rgd_buf, gd_size) != gd_size)
|
284 | 5f4da8c0 | ths | goto fail_rgd;
|
285 | 5f4da8c0 | ths | if (lseek(snp_fd, rgd_offset, SEEK_SET) == -1) |
286 | 5f4da8c0 | ths | goto fail_rgd;
|
287 | 5f4da8c0 | ths | if (write(snp_fd, rgd_buf, gd_size) == -1) |
288 | 5f4da8c0 | ths | goto fail_rgd;
|
289 | 5f4da8c0 | ths | qemu_free(rgd_buf); |
290 | 5f4da8c0 | ths | |
291 | 5f4da8c0 | ths | /* write GD */
|
292 | 5f4da8c0 | ths | gd_buf = qemu_malloc(gd_size); |
293 | 5f4da8c0 | ths | if (!gd_buf)
|
294 | 5f4da8c0 | ths | goto fail_rgd;
|
295 | 5f4da8c0 | ths | if (lseek(p_fd, gd_offset, SEEK_SET) == -1) |
296 | 5f4da8c0 | ths | goto fail_gd;
|
297 | 5f4da8c0 | ths | if (read(p_fd, gd_buf, gd_size) != gd_size)
|
298 | 5f4da8c0 | ths | goto fail_gd;
|
299 | 5f4da8c0 | ths | if (lseek(snp_fd, gd_offset, SEEK_SET) == -1) |
300 | 5f4da8c0 | ths | goto fail_gd;
|
301 | 5f4da8c0 | ths | if (write(snp_fd, gd_buf, gd_size) == -1) |
302 | 5f4da8c0 | ths | goto fail_gd;
|
303 | 5f4da8c0 | ths | qemu_free(gd_buf); |
304 | 5f4da8c0 | ths | |
305 | 5f4da8c0 | ths | close(p_fd); |
306 | 5f4da8c0 | ths | close(snp_fd); |
307 | 5f4da8c0 | ths | return 0; |
308 | 5f4da8c0 | ths | |
309 | 5f4da8c0 | ths | fail_gd:
|
310 | 5f4da8c0 | ths | qemu_free(gd_buf); |
311 | 3b46e624 | ths | fail_rgd:
|
312 | 5f4da8c0 | ths | qemu_free(rgd_buf); |
313 | 5f4da8c0 | ths | fail:
|
314 | 5f4da8c0 | ths | close(p_fd); |
315 | 5f4da8c0 | ths | close(snp_fd); |
316 | 5f4da8c0 | ths | return -1; |
317 | 5f4da8c0 | ths | } |
318 | 5f4da8c0 | ths | |
319 | 5f4da8c0 | ths | static void vmdk_parent_close(BlockDriverState *bs) |
320 | 5f4da8c0 | ths | { |
321 | 5f4da8c0 | ths | if (bs->backing_hd)
|
322 | 5f4da8c0 | ths | bdrv_close(bs->backing_hd); |
323 | 5f4da8c0 | ths | } |
324 | 5f4da8c0 | ths | |
325 | 630530a6 | ths | int parent_open = 0; |
326 | 5f4da8c0 | ths | static int vmdk_parent_open(BlockDriverState *bs, const char * filename) |
327 | 5f4da8c0 | ths | { |
328 | 5f4da8c0 | ths | BDRVVmdkState *s = bs->opaque; |
329 | 5fafdf24 | ths | char *p_name;
|
330 | 5f4da8c0 | ths | char desc[DESC_SIZE];
|
331 | 5f4da8c0 | ths | char parent_img_name[1024]; |
332 | 5f4da8c0 | ths | |
333 | 5f4da8c0 | ths | /* the descriptor offset = 0x200 */
|
334 | 5f4da8c0 | ths | if (bdrv_pread(s->hd, 0x200, desc, DESC_SIZE) != DESC_SIZE) |
335 | 5f4da8c0 | ths | return -1; |
336 | 5f4da8c0 | ths | |
337 | 5f4da8c0 | ths | if ((p_name = strstr(desc,"parentFileNameHint")) != 0) { |
338 | 5f4da8c0 | ths | char *end_name;
|
339 | 5f4da8c0 | ths | struct stat file_buf;
|
340 | 5f4da8c0 | ths | |
341 | 5f4da8c0 | ths | p_name += sizeof("parentFileNameHint") + 1; |
342 | 5f4da8c0 | ths | if ((end_name = strchr(p_name,'\"')) == 0) |
343 | 5f4da8c0 | ths | return -1; |
344 | b34d259a | balrog | if ((end_name - p_name) > sizeof (s->hd->backing_file) - 1) |
345 | b34d259a | balrog | return -1; |
346 | 3b46e624 | ths | |
347 | 5f4da8c0 | ths | strncpy(s->hd->backing_file, p_name, end_name - p_name); |
348 | 5f4da8c0 | ths | if (stat(s->hd->backing_file, &file_buf) != 0) { |
349 | 5f4da8c0 | ths | path_combine(parent_img_name, sizeof(parent_img_name),
|
350 | 5f4da8c0 | ths | filename, s->hd->backing_file); |
351 | 5f4da8c0 | ths | } else {
|
352 | 5f4da8c0 | ths | strcpy(parent_img_name, s->hd->backing_file); |
353 | 5f4da8c0 | ths | } |
354 | 5f4da8c0 | ths | |
355 | 5f4da8c0 | ths | s->hd->backing_hd = bdrv_new("");
|
356 | 5f4da8c0 | ths | if (!s->hd->backing_hd) {
|
357 | 5f4da8c0 | ths | failure:
|
358 | 5f4da8c0 | ths | bdrv_close(s->hd); |
359 | ff1afc72 | bellard | return -1; |
360 | 5f4da8c0 | ths | } |
361 | 630530a6 | ths | parent_open = 1;
|
362 | 630530a6 | ths | if (bdrv_open(s->hd->backing_hd, parent_img_name, BDRV_O_RDONLY) < 0) |
363 | 5f4da8c0 | ths | goto failure;
|
364 | 630530a6 | ths | parent_open = 0;
|
365 | ff1afc72 | bellard | } |
366 | 5f4da8c0 | ths | |
367 | 5f4da8c0 | ths | return 0; |
368 | 5f4da8c0 | ths | } |
369 | 5f4da8c0 | ths | |
370 | 5f4da8c0 | ths | static int vmdk_open(BlockDriverState *bs, const char *filename, int flags) |
371 | 5f4da8c0 | ths | { |
372 | 5f4da8c0 | ths | BDRVVmdkState *s = bs->opaque; |
373 | 5f4da8c0 | ths | uint32_t magic; |
374 | 5f4da8c0 | ths | int l1_size, i, ret;
|
375 | 5f4da8c0 | ths | |
376 | 630530a6 | ths | if (parent_open)
|
377 | 630530a6 | ths | // Parent must be opened as RO.
|
378 | 630530a6 | ths | flags = BDRV_O_RDONLY; |
379 | 630530a6 | ths | fprintf(stderr, "(VMDK) image open: flags=0x%x filename=%s\n", flags, bs->filename);
|
380 | 630530a6 | ths | |
381 | b5eff355 | aurel32 | ret = bdrv_file_open(&s->hd, filename, flags); |
382 | 5f4da8c0 | ths | if (ret < 0) |
383 | 5f4da8c0 | ths | return ret;
|
384 | 5f4da8c0 | ths | if (bdrv_pread(s->hd, 0, &magic, sizeof(magic)) != sizeof(magic)) |
385 | ea2384d3 | bellard | goto fail;
|
386 | 5f4da8c0 | ths | |
387 | 7143c62c | bellard | magic = be32_to_cpu(magic); |
388 | ea2384d3 | bellard | if (magic == VMDK3_MAGIC) {
|
389 | ea2384d3 | bellard | VMDK3Header header; |
390 | 5f4da8c0 | ths | |
391 | 5f4da8c0 | ths | if (bdrv_pread(s->hd, sizeof(magic), &header, sizeof(header)) != sizeof(header)) |
392 | ea2384d3 | bellard | goto fail;
|
393 | ea2384d3 | bellard | s->cluster_sectors = le32_to_cpu(header.granularity); |
394 | ea2384d3 | bellard | s->l2_size = 1 << 9; |
395 | ea2384d3 | bellard | s->l1_size = 1 << 6; |
396 | ea2384d3 | bellard | bs->total_sectors = le32_to_cpu(header.disk_sectors); |
397 | ff1afc72 | bellard | s->l1_table_offset = le32_to_cpu(header.l1dir_offset) << 9;
|
398 | ff1afc72 | bellard | s->l1_backup_table_offset = 0;
|
399 | ea2384d3 | bellard | s->l1_entry_sectors = s->l2_size * s->cluster_sectors; |
400 | ea2384d3 | bellard | } else if (magic == VMDK4_MAGIC) { |
401 | ea2384d3 | bellard | VMDK4Header header; |
402 | 5f4da8c0 | ths | |
403 | 5f4da8c0 | ths | if (bdrv_pread(s->hd, sizeof(magic), &header, sizeof(header)) != sizeof(header)) |
404 | ea2384d3 | bellard | goto fail;
|
405 | bd6ea3c8 | bellard | bs->total_sectors = le64_to_cpu(header.capacity); |
406 | bd6ea3c8 | bellard | s->cluster_sectors = le64_to_cpu(header.granularity); |
407 | ea2384d3 | bellard | s->l2_size = le32_to_cpu(header.num_gtes_per_gte); |
408 | ea2384d3 | bellard | s->l1_entry_sectors = s->l2_size * s->cluster_sectors; |
409 | ea2384d3 | bellard | if (s->l1_entry_sectors <= 0) |
410 | ea2384d3 | bellard | goto fail;
|
411 | 5fafdf24 | ths | s->l1_size = (bs->total_sectors + s->l1_entry_sectors - 1)
|
412 | ea2384d3 | bellard | / s->l1_entry_sectors; |
413 | ff1afc72 | bellard | s->l1_table_offset = le64_to_cpu(header.rgd_offset) << 9;
|
414 | ff1afc72 | bellard | s->l1_backup_table_offset = le64_to_cpu(header.gd_offset) << 9;
|
415 | 5f4da8c0 | ths | |
416 | 630530a6 | ths | if (parent_open)
|
417 | 630530a6 | ths | s->is_parent = 1;
|
418 | 630530a6 | ths | else
|
419 | 630530a6 | ths | s->is_parent = 0;
|
420 | 630530a6 | ths | |
421 | 5f4da8c0 | ths | // try to open parent images, if exist
|
422 | 5f4da8c0 | ths | if (vmdk_parent_open(bs, filename) != 0) |
423 | 5f4da8c0 | ths | goto fail;
|
424 | 5f4da8c0 | ths | // write the CID once after the image creation
|
425 | 5f4da8c0 | ths | s->parent_cid = vmdk_read_cid(bs,1);
|
426 | ea2384d3 | bellard | } else {
|
427 | ea2384d3 | bellard | goto fail;
|
428 | ea2384d3 | bellard | } |
429 | 5f4da8c0 | ths | |
430 | ea2384d3 | bellard | /* read the L1 table */
|
431 | ea2384d3 | bellard | l1_size = s->l1_size * sizeof(uint32_t);
|
432 | ea2384d3 | bellard | s->l1_table = qemu_malloc(l1_size); |
433 | ea2384d3 | bellard | if (!s->l1_table)
|
434 | ea2384d3 | bellard | goto fail;
|
435 | 5f4da8c0 | ths | if (bdrv_pread(s->hd, s->l1_table_offset, s->l1_table, l1_size) != l1_size)
|
436 | ea2384d3 | bellard | goto fail;
|
437 | ea2384d3 | bellard | for(i = 0; i < s->l1_size; i++) { |
438 | ea2384d3 | bellard | le32_to_cpus(&s->l1_table[i]); |
439 | ea2384d3 | bellard | } |
440 | ea2384d3 | bellard | |
441 | ff1afc72 | bellard | if (s->l1_backup_table_offset) {
|
442 | ff1afc72 | bellard | s->l1_backup_table = qemu_malloc(l1_size); |
443 | ff1afc72 | bellard | if (!s->l1_backup_table)
|
444 | ff1afc72 | bellard | goto fail;
|
445 | 5f4da8c0 | ths | if (bdrv_pread(s->hd, s->l1_backup_table_offset, s->l1_backup_table, l1_size) != l1_size)
|
446 | ff1afc72 | bellard | goto fail;
|
447 | ff1afc72 | bellard | for(i = 0; i < s->l1_size; i++) { |
448 | ff1afc72 | bellard | le32_to_cpus(&s->l1_backup_table[i]); |
449 | ff1afc72 | bellard | } |
450 | ff1afc72 | bellard | } |
451 | ff1afc72 | bellard | |
452 | ea2384d3 | bellard | s->l2_cache = qemu_malloc(s->l2_size * L2_CACHE_SIZE * sizeof(uint32_t));
|
453 | ea2384d3 | bellard | if (!s->l2_cache)
|
454 | ea2384d3 | bellard | goto fail;
|
455 | ea2384d3 | bellard | return 0; |
456 | ea2384d3 | bellard | fail:
|
457 | ff1afc72 | bellard | qemu_free(s->l1_backup_table); |
458 | ea2384d3 | bellard | qemu_free(s->l1_table); |
459 | ea2384d3 | bellard | qemu_free(s->l2_cache); |
460 | 5f4da8c0 | ths | bdrv_delete(s->hd); |
461 | ea2384d3 | bellard | return -1; |
462 | ea2384d3 | bellard | } |
463 | ea2384d3 | bellard | |
464 | 630530a6 | ths | static uint64_t get_cluster_offset(BlockDriverState *bs, VmdkMetaData *m_data,
|
465 | 630530a6 | ths | uint64_t offset, int allocate);
|
466 | 5f4da8c0 | ths | |
467 | 5f4da8c0 | ths | static int get_whole_cluster(BlockDriverState *bs, uint64_t cluster_offset, |
468 | 5f4da8c0 | ths | uint64_t offset, int allocate)
|
469 | 5f4da8c0 | ths | { |
470 | 5f4da8c0 | ths | uint64_t parent_cluster_offset; |
471 | 5f4da8c0 | ths | BDRVVmdkState *s = bs->opaque; |
472 | 5f4da8c0 | ths | uint8_t whole_grain[s->cluster_sectors*512]; // 128 sectors * 512 bytes each = grain size 64KB |
473 | 5f4da8c0 | ths | |
474 | 5f4da8c0 | ths | // we will be here if it's first write on non-exist grain(cluster).
|
475 | 5f4da8c0 | ths | // try to read from parent image, if exist
|
476 | 5f4da8c0 | ths | if (s->hd->backing_hd) {
|
477 | 5f4da8c0 | ths | BDRVVmdkState *ps = s->hd->backing_hd->opaque; |
478 | 5f4da8c0 | ths | |
479 | 5f4da8c0 | ths | if (!vmdk_is_cid_valid(bs))
|
480 | 5f4da8c0 | ths | return -1; |
481 | 5f4da8c0 | ths | |
482 | 630530a6 | ths | parent_cluster_offset = get_cluster_offset(s->hd->backing_hd, NULL, offset, allocate);
|
483 | 630530a6 | ths | |
484 | 630530a6 | ths | if (parent_cluster_offset) {
|
485 | 630530a6 | ths | BDRVVmdkState *act_s = activeBDRV.hd->opaque; |
486 | 630530a6 | ths | |
487 | 630530a6 | ths | if (bdrv_pread(ps->hd, parent_cluster_offset, whole_grain, ps->cluster_sectors*512) != ps->cluster_sectors*512) |
488 | 630530a6 | ths | return -1; |
489 | 630530a6 | ths | |
490 | 630530a6 | ths | //Write grain only into the active image
|
491 | 630530a6 | ths | if (bdrv_pwrite(act_s->hd, activeBDRV.cluster_offset << 9, whole_grain, sizeof(whole_grain)) != sizeof(whole_grain)) |
492 | 630530a6 | ths | return -1; |
493 | 630530a6 | ths | } |
494 | 630530a6 | ths | } |
495 | 630530a6 | ths | return 0; |
496 | 630530a6 | ths | } |
497 | 630530a6 | ths | |
498 | 630530a6 | ths | static int vmdk_L2update(BlockDriverState *bs, VmdkMetaData *m_data) |
499 | 630530a6 | ths | { |
500 | 630530a6 | ths | BDRVVmdkState *s = bs->opaque; |
501 | 630530a6 | ths | |
502 | 630530a6 | ths | /* update L2 table */
|
503 | 630530a6 | ths | if (bdrv_pwrite(s->hd, ((int64_t)m_data->l2_offset * 512) + (m_data->l2_index * sizeof(m_data->offset)), |
504 | 630530a6 | ths | &(m_data->offset), sizeof(m_data->offset)) != sizeof(m_data->offset)) |
505 | 630530a6 | ths | return -1; |
506 | 630530a6 | ths | /* update backup L2 table */
|
507 | 630530a6 | ths | if (s->l1_backup_table_offset != 0) { |
508 | 630530a6 | ths | m_data->l2_offset = s->l1_backup_table[m_data->l1_index]; |
509 | 630530a6 | ths | if (bdrv_pwrite(s->hd, ((int64_t)m_data->l2_offset * 512) + (m_data->l2_index * sizeof(m_data->offset)), |
510 | 630530a6 | ths | &(m_data->offset), sizeof(m_data->offset)) != sizeof(m_data->offset)) |
511 | 5f4da8c0 | ths | return -1; |
512 | 5f4da8c0 | ths | } |
513 | 630530a6 | ths | |
514 | 5f4da8c0 | ths | return 0; |
515 | 5f4da8c0 | ths | } |
516 | 5f4da8c0 | ths | |
517 | 630530a6 | ths | static uint64_t get_cluster_offset(BlockDriverState *bs, VmdkMetaData *m_data,
|
518 | ff1afc72 | bellard | uint64_t offset, int allocate)
|
519 | ea2384d3 | bellard | { |
520 | ea2384d3 | bellard | BDRVVmdkState *s = bs->opaque; |
521 | ea2384d3 | bellard | unsigned int l1_index, l2_offset, l2_index; |
522 | ea2384d3 | bellard | int min_index, i, j;
|
523 | 630530a6 | ths | uint32_t min_count, *l2_table, tmp = 0;
|
524 | ea2384d3 | bellard | uint64_t cluster_offset; |
525 | 630530a6 | ths | |
526 | 630530a6 | ths | if (m_data)
|
527 | 630530a6 | ths | m_data->valid = 0;
|
528 | 630530a6 | ths | |
529 | ea2384d3 | bellard | l1_index = (offset >> 9) / s->l1_entry_sectors;
|
530 | ea2384d3 | bellard | if (l1_index >= s->l1_size)
|
531 | ea2384d3 | bellard | return 0; |
532 | ea2384d3 | bellard | l2_offset = s->l1_table[l1_index]; |
533 | ea2384d3 | bellard | if (!l2_offset)
|
534 | ea2384d3 | bellard | return 0; |
535 | ea2384d3 | bellard | for(i = 0; i < L2_CACHE_SIZE; i++) { |
536 | ea2384d3 | bellard | if (l2_offset == s->l2_cache_offsets[i]) {
|
537 | ea2384d3 | bellard | /* increment the hit count */
|
538 | ea2384d3 | bellard | if (++s->l2_cache_counts[i] == 0xffffffff) { |
539 | ea2384d3 | bellard | for(j = 0; j < L2_CACHE_SIZE; j++) { |
540 | ea2384d3 | bellard | s->l2_cache_counts[j] >>= 1;
|
541 | ea2384d3 | bellard | } |
542 | ea2384d3 | bellard | } |
543 | ea2384d3 | bellard | l2_table = s->l2_cache + (i * s->l2_size); |
544 | ea2384d3 | bellard | goto found;
|
545 | ea2384d3 | bellard | } |
546 | ea2384d3 | bellard | } |
547 | ea2384d3 | bellard | /* not found: load a new entry in the least used one */
|
548 | ea2384d3 | bellard | min_index = 0;
|
549 | ea2384d3 | bellard | min_count = 0xffffffff;
|
550 | ea2384d3 | bellard | for(i = 0; i < L2_CACHE_SIZE; i++) { |
551 | ea2384d3 | bellard | if (s->l2_cache_counts[i] < min_count) {
|
552 | ea2384d3 | bellard | min_count = s->l2_cache_counts[i]; |
553 | ea2384d3 | bellard | min_index = i; |
554 | ea2384d3 | bellard | } |
555 | ea2384d3 | bellard | } |
556 | ea2384d3 | bellard | l2_table = s->l2_cache + (min_index * s->l2_size); |
557 | 5fafdf24 | ths | if (bdrv_pread(s->hd, (int64_t)l2_offset * 512, l2_table, s->l2_size * sizeof(uint32_t)) != |
558 | 5f4da8c0 | ths | s->l2_size * sizeof(uint32_t))
|
559 | ea2384d3 | bellard | return 0; |
560 | 5f4da8c0 | ths | |
561 | ea2384d3 | bellard | s->l2_cache_offsets[min_index] = l2_offset; |
562 | ea2384d3 | bellard | s->l2_cache_counts[min_index] = 1;
|
563 | ea2384d3 | bellard | found:
|
564 | ea2384d3 | bellard | l2_index = ((offset >> 9) / s->cluster_sectors) % s->l2_size;
|
565 | ea2384d3 | bellard | cluster_offset = le32_to_cpu(l2_table[l2_index]); |
566 | 630530a6 | ths | |
567 | ff1afc72 | bellard | if (!cluster_offset) {
|
568 | ff1afc72 | bellard | if (!allocate)
|
569 | ff1afc72 | bellard | return 0; |
570 | 630530a6 | ths | // Avoid the L2 tables update for the images that have snapshots.
|
571 | 630530a6 | ths | if (!s->is_parent) {
|
572 | 49140a77 | ths | cluster_offset = bdrv_getlength(s->hd); |
573 | 630530a6 | ths | bdrv_truncate(s->hd, cluster_offset + (s->cluster_sectors << 9));
|
574 | 630530a6 | ths | |
575 | 630530a6 | ths | cluster_offset >>= 9;
|
576 | 630530a6 | ths | tmp = cpu_to_le32(cluster_offset); |
577 | 630530a6 | ths | l2_table[l2_index] = tmp; |
578 | 630530a6 | ths | // Save the active image state
|
579 | 630530a6 | ths | activeBDRV.cluster_offset = cluster_offset; |
580 | 630530a6 | ths | activeBDRV.hd = bs; |
581 | ff1afc72 | bellard | } |
582 | 630530a6 | ths | /* First of all we write grain itself, to avoid race condition
|
583 | 630530a6 | ths | * that may to corrupt the image.
|
584 | 630530a6 | ths | * This problem may occur because of insufficient space on host disk
|
585 | 630530a6 | ths | * or inappropriate VM shutdown.
|
586 | 630530a6 | ths | */
|
587 | 5f4da8c0 | ths | if (get_whole_cluster(bs, cluster_offset, offset, allocate) == -1) |
588 | 5f4da8c0 | ths | return 0; |
589 | 630530a6 | ths | |
590 | 630530a6 | ths | if (m_data) {
|
591 | 630530a6 | ths | m_data->offset = tmp; |
592 | 630530a6 | ths | m_data->l1_index = l1_index; |
593 | 630530a6 | ths | m_data->l2_index = l2_index; |
594 | 630530a6 | ths | m_data->l2_offset = l2_offset; |
595 | 630530a6 | ths | m_data->valid = 1;
|
596 | 630530a6 | ths | } |
597 | ff1afc72 | bellard | } |
598 | ea2384d3 | bellard | cluster_offset <<= 9;
|
599 | ea2384d3 | bellard | return cluster_offset;
|
600 | ea2384d3 | bellard | } |
601 | ea2384d3 | bellard | |
602 | 5fafdf24 | ths | static int vmdk_is_allocated(BlockDriverState *bs, int64_t sector_num, |
603 | ea2384d3 | bellard | int nb_sectors, int *pnum) |
604 | ea2384d3 | bellard | { |
605 | ea2384d3 | bellard | BDRVVmdkState *s = bs->opaque; |
606 | ea2384d3 | bellard | int index_in_cluster, n;
|
607 | ea2384d3 | bellard | uint64_t cluster_offset; |
608 | ea2384d3 | bellard | |
609 | 630530a6 | ths | cluster_offset = get_cluster_offset(bs, NULL, sector_num << 9, 0); |
610 | ea2384d3 | bellard | index_in_cluster = sector_num % s->cluster_sectors; |
611 | ea2384d3 | bellard | n = s->cluster_sectors - index_in_cluster; |
612 | ea2384d3 | bellard | if (n > nb_sectors)
|
613 | ea2384d3 | bellard | n = nb_sectors; |
614 | ea2384d3 | bellard | *pnum = n; |
615 | ea2384d3 | bellard | return (cluster_offset != 0); |
616 | ea2384d3 | bellard | } |
617 | ea2384d3 | bellard | |
618 | 5fafdf24 | ths | static int vmdk_read(BlockDriverState *bs, int64_t sector_num, |
619 | ea2384d3 | bellard | uint8_t *buf, int nb_sectors)
|
620 | ea2384d3 | bellard | { |
621 | ea2384d3 | bellard | BDRVVmdkState *s = bs->opaque; |
622 | 5f4da8c0 | ths | int index_in_cluster, n, ret;
|
623 | ea2384d3 | bellard | uint64_t cluster_offset; |
624 | 5f4da8c0 | ths | |
625 | ea2384d3 | bellard | while (nb_sectors > 0) { |
626 | 630530a6 | ths | cluster_offset = get_cluster_offset(bs, NULL, sector_num << 9, 0); |
627 | ea2384d3 | bellard | index_in_cluster = sector_num % s->cluster_sectors; |
628 | ea2384d3 | bellard | n = s->cluster_sectors - index_in_cluster; |
629 | ea2384d3 | bellard | if (n > nb_sectors)
|
630 | ea2384d3 | bellard | n = nb_sectors; |
631 | ea2384d3 | bellard | if (!cluster_offset) {
|
632 | 5f4da8c0 | ths | // try to read from parent image, if exist
|
633 | 5f4da8c0 | ths | if (s->hd->backing_hd) {
|
634 | 5f4da8c0 | ths | if (!vmdk_is_cid_valid(bs))
|
635 | 5f4da8c0 | ths | return -1; |
636 | 5f4da8c0 | ths | ret = bdrv_read(s->hd->backing_hd, sector_num, buf, n); |
637 | 5f4da8c0 | ths | if (ret < 0) |
638 | 5f4da8c0 | ths | return -1; |
639 | 5f4da8c0 | ths | } else {
|
640 | 5f4da8c0 | ths | memset(buf, 0, 512 * n); |
641 | 5f4da8c0 | ths | } |
642 | ea2384d3 | bellard | } else {
|
643 | 5f4da8c0 | ths | if(bdrv_pread(s->hd, cluster_offset + index_in_cluster * 512, buf, n * 512) != n * 512) |
644 | ea2384d3 | bellard | return -1; |
645 | ea2384d3 | bellard | } |
646 | ea2384d3 | bellard | nb_sectors -= n; |
647 | ea2384d3 | bellard | sector_num += n; |
648 | ea2384d3 | bellard | buf += n * 512;
|
649 | ea2384d3 | bellard | } |
650 | ea2384d3 | bellard | return 0; |
651 | ea2384d3 | bellard | } |
652 | ea2384d3 | bellard | |
653 | 5fafdf24 | ths | static int vmdk_write(BlockDriverState *bs, int64_t sector_num, |
654 | ea2384d3 | bellard | const uint8_t *buf, int nb_sectors) |
655 | ea2384d3 | bellard | { |
656 | ff1afc72 | bellard | BDRVVmdkState *s = bs->opaque; |
657 | 630530a6 | ths | VmdkMetaData m_data; |
658 | 5f4da8c0 | ths | int index_in_cluster, n;
|
659 | ff1afc72 | bellard | uint64_t cluster_offset; |
660 | 5f4da8c0 | ths | static int cid_update = 0; |
661 | ff1afc72 | bellard | |
662 | 630530a6 | ths | if (sector_num > bs->total_sectors) {
|
663 | 630530a6 | ths | fprintf(stderr, |
664 | 92868412 | j_mayer | "(VMDK) Wrong offset: sector_num=0x%" PRIx64
|
665 | 92868412 | j_mayer | " total_sectors=0x%" PRIx64 "\n", |
666 | 630530a6 | ths | sector_num, bs->total_sectors); |
667 | 630530a6 | ths | return -1; |
668 | 630530a6 | ths | } |
669 | 630530a6 | ths | |
670 | ff1afc72 | bellard | while (nb_sectors > 0) { |
671 | ff1afc72 | bellard | index_in_cluster = sector_num & (s->cluster_sectors - 1);
|
672 | ff1afc72 | bellard | n = s->cluster_sectors - index_in_cluster; |
673 | ff1afc72 | bellard | if (n > nb_sectors)
|
674 | ff1afc72 | bellard | n = nb_sectors; |
675 | 630530a6 | ths | cluster_offset = get_cluster_offset(bs, &m_data, sector_num << 9, 1); |
676 | ff1afc72 | bellard | if (!cluster_offset)
|
677 | ff1afc72 | bellard | return -1; |
678 | 630530a6 | ths | |
679 | 5f4da8c0 | ths | if (bdrv_pwrite(s->hd, cluster_offset + index_in_cluster * 512, buf, n * 512) != n * 512) |
680 | ff1afc72 | bellard | return -1; |
681 | 630530a6 | ths | if (m_data.valid) {
|
682 | 630530a6 | ths | /* update L2 tables */
|
683 | 630530a6 | ths | if (vmdk_L2update(bs, &m_data) == -1) |
684 | 630530a6 | ths | return -1; |
685 | 630530a6 | ths | } |
686 | ff1afc72 | bellard | nb_sectors -= n; |
687 | ff1afc72 | bellard | sector_num += n; |
688 | ff1afc72 | bellard | buf += n * 512;
|
689 | 5f4da8c0 | ths | |
690 | 5f4da8c0 | ths | // update CID on the first write every time the virtual disk is opened
|
691 | 5f4da8c0 | ths | if (!cid_update) {
|
692 | 5f4da8c0 | ths | vmdk_write_cid(bs, time(NULL));
|
693 | 5f4da8c0 | ths | cid_update++; |
694 | 5f4da8c0 | ths | } |
695 | ff1afc72 | bellard | } |
696 | ff1afc72 | bellard | return 0; |
697 | ea2384d3 | bellard | } |
698 | ea2384d3 | bellard | |
699 | 8979b227 | bellard | static int vmdk_create(const char *filename, int64_t total_size, |
700 | 8979b227 | bellard | const char *backing_file, int flags) |
701 | 8979b227 | bellard | { |
702 | 8979b227 | bellard | int fd, i;
|
703 | 8979b227 | bellard | VMDK4Header header; |
704 | 8979b227 | bellard | uint32_t tmp, magic, grains, gd_size, gt_size, gt_count; |
705 | 8979b227 | bellard | char *desc_template =
|
706 | 8979b227 | bellard | "# Disk DescriptorFile\n"
|
707 | 8979b227 | bellard | "version=1\n"
|
708 | 8979b227 | bellard | "CID=%x\n"
|
709 | 8979b227 | bellard | "parentCID=ffffffff\n"
|
710 | 8979b227 | bellard | "createType=\"monolithicSparse\"\n"
|
711 | 8979b227 | bellard | "\n"
|
712 | 8979b227 | bellard | "# Extent description\n"
|
713 | 8979b227 | bellard | "RW %lu SPARSE \"%s\"\n"
|
714 | 8979b227 | bellard | "\n"
|
715 | 8979b227 | bellard | "# The Disk Data Base \n"
|
716 | 8979b227 | bellard | "#DDB\n"
|
717 | 8979b227 | bellard | "\n"
|
718 | ec36ba14 | ths | "ddb.virtualHWVersion = \"%d\"\n"
|
719 | 8979b227 | bellard | "ddb.geometry.cylinders = \"%lu\"\n"
|
720 | 8979b227 | bellard | "ddb.geometry.heads = \"16\"\n"
|
721 | 8979b227 | bellard | "ddb.geometry.sectors = \"63\"\n"
|
722 | 8979b227 | bellard | "ddb.adapterType = \"ide\"\n";
|
723 | 8979b227 | bellard | char desc[1024]; |
724 | 8979b227 | bellard | const char *real_filename, *temp_str; |
725 | 8979b227 | bellard | |
726 | 8979b227 | bellard | /* XXX: add support for backing file */
|
727 | 5f4da8c0 | ths | if (backing_file) {
|
728 | 5f4da8c0 | ths | return vmdk_snapshot_create(filename, backing_file);
|
729 | 5f4da8c0 | ths | } |
730 | 8979b227 | bellard | |
731 | 8979b227 | bellard | fd = open(filename, O_WRONLY | O_CREAT | O_TRUNC | O_BINARY | O_LARGEFILE, |
732 | 8979b227 | bellard | 0644);
|
733 | 8979b227 | bellard | if (fd < 0) |
734 | 8979b227 | bellard | return -1; |
735 | 8979b227 | bellard | magic = cpu_to_be32(VMDK4_MAGIC); |
736 | 8979b227 | bellard | memset(&header, 0, sizeof(header)); |
737 | 8979b227 | bellard | header.version = cpu_to_le32(1);
|
738 | 8979b227 | bellard | header.flags = cpu_to_le32(3); /* ?? */ |
739 | 8979b227 | bellard | header.capacity = cpu_to_le64(total_size); |
740 | 8979b227 | bellard | header.granularity = cpu_to_le64(128);
|
741 | 8979b227 | bellard | header.num_gtes_per_gte = cpu_to_le32(512);
|
742 | 8979b227 | bellard | |
743 | 8979b227 | bellard | grains = (total_size + header.granularity - 1) / header.granularity;
|
744 | 8979b227 | bellard | gt_size = ((header.num_gtes_per_gte * sizeof(uint32_t)) + 511) >> 9; |
745 | 8979b227 | bellard | gt_count = (grains + header.num_gtes_per_gte - 1) / header.num_gtes_per_gte;
|
746 | 8979b227 | bellard | gd_size = (gt_count * sizeof(uint32_t) + 511) >> 9; |
747 | 8979b227 | bellard | |
748 | 8979b227 | bellard | header.desc_offset = 1;
|
749 | 8979b227 | bellard | header.desc_size = 20;
|
750 | 8979b227 | bellard | header.rgd_offset = header.desc_offset + header.desc_size; |
751 | 8979b227 | bellard | header.gd_offset = header.rgd_offset + gd_size + (gt_size * gt_count); |
752 | 8979b227 | bellard | header.grain_offset = |
753 | 8979b227 | bellard | ((header.gd_offset + gd_size + (gt_size * gt_count) + |
754 | 8979b227 | bellard | header.granularity - 1) / header.granularity) *
|
755 | 8979b227 | bellard | header.granularity; |
756 | 8979b227 | bellard | |
757 | 8979b227 | bellard | header.desc_offset = cpu_to_le64(header.desc_offset); |
758 | 8979b227 | bellard | header.desc_size = cpu_to_le64(header.desc_size); |
759 | 8979b227 | bellard | header.rgd_offset = cpu_to_le64(header.rgd_offset); |
760 | 8979b227 | bellard | header.gd_offset = cpu_to_le64(header.gd_offset); |
761 | 8979b227 | bellard | header.grain_offset = cpu_to_le64(header.grain_offset); |
762 | 8979b227 | bellard | |
763 | 8979b227 | bellard | header.check_bytes[0] = 0xa; |
764 | 8979b227 | bellard | header.check_bytes[1] = 0x20; |
765 | 8979b227 | bellard | header.check_bytes[2] = 0xd; |
766 | 8979b227 | bellard | header.check_bytes[3] = 0xa; |
767 | 3b46e624 | ths | |
768 | 3b46e624 | ths | /* write all the data */
|
769 | 8979b227 | bellard | write(fd, &magic, sizeof(magic));
|
770 | 8979b227 | bellard | write(fd, &header, sizeof(header));
|
771 | 8979b227 | bellard | |
772 | 8979b227 | bellard | ftruncate(fd, header.grain_offset << 9);
|
773 | 8979b227 | bellard | |
774 | 8979b227 | bellard | /* write grain directory */
|
775 | 8979b227 | bellard | lseek(fd, le64_to_cpu(header.rgd_offset) << 9, SEEK_SET);
|
776 | 8979b227 | bellard | for (i = 0, tmp = header.rgd_offset + gd_size; |
777 | 8979b227 | bellard | i < gt_count; i++, tmp += gt_size) |
778 | 8979b227 | bellard | write(fd, &tmp, sizeof(tmp));
|
779 | 3b46e624 | ths | |
780 | 8979b227 | bellard | /* write backup grain directory */
|
781 | 8979b227 | bellard | lseek(fd, le64_to_cpu(header.gd_offset) << 9, SEEK_SET);
|
782 | 8979b227 | bellard | for (i = 0, tmp = header.gd_offset + gd_size; |
783 | 8979b227 | bellard | i < gt_count; i++, tmp += gt_size) |
784 | 8979b227 | bellard | write(fd, &tmp, sizeof(tmp));
|
785 | 8979b227 | bellard | |
786 | 8979b227 | bellard | /* compose the descriptor */
|
787 | 8979b227 | bellard | real_filename = filename; |
788 | 8979b227 | bellard | if ((temp_str = strrchr(real_filename, '\\')) != NULL) |
789 | 8979b227 | bellard | real_filename = temp_str + 1;
|
790 | 8979b227 | bellard | if ((temp_str = strrchr(real_filename, '/')) != NULL) |
791 | 8979b227 | bellard | real_filename = temp_str + 1;
|
792 | 8979b227 | bellard | if ((temp_str = strrchr(real_filename, ':')) != NULL) |
793 | 8979b227 | bellard | real_filename = temp_str + 1;
|
794 | 8979b227 | bellard | sprintf(desc, desc_template, time(NULL), (unsigned long)total_size, |
795 | ec36ba14 | ths | real_filename, (flags & BLOCK_FLAG_COMPAT6 ? 6 : 4), total_size / (63 * 16)); |
796 | 8979b227 | bellard | |
797 | 8979b227 | bellard | /* write the descriptor */
|
798 | 8979b227 | bellard | lseek(fd, le64_to_cpu(header.desc_offset) << 9, SEEK_SET);
|
799 | 8979b227 | bellard | write(fd, desc, strlen(desc)); |
800 | 8979b227 | bellard | |
801 | 8979b227 | bellard | close(fd); |
802 | 8979b227 | bellard | return 0; |
803 | 8979b227 | bellard | } |
804 | 8979b227 | bellard | |
805 | e2731add | bellard | static void vmdk_close(BlockDriverState *bs) |
806 | ea2384d3 | bellard | { |
807 | ea2384d3 | bellard | BDRVVmdkState *s = bs->opaque; |
808 | 5f4da8c0 | ths | |
809 | ea2384d3 | bellard | qemu_free(s->l1_table); |
810 | ea2384d3 | bellard | qemu_free(s->l2_cache); |
811 | 5f4da8c0 | ths | // try to close parent image, if exist
|
812 | 5f4da8c0 | ths | vmdk_parent_close(s->hd); |
813 | 5cbdd273 | ths | bdrv_delete(s->hd); |
814 | ea2384d3 | bellard | } |
815 | ea2384d3 | bellard | |
816 | 7a6cba61 | pbrook | static void vmdk_flush(BlockDriverState *bs) |
817 | 7a6cba61 | pbrook | { |
818 | 7a6cba61 | pbrook | BDRVVmdkState *s = bs->opaque; |
819 | 5f4da8c0 | ths | bdrv_flush(s->hd); |
820 | 7a6cba61 | pbrook | } |
821 | 7a6cba61 | pbrook | |
822 | ea2384d3 | bellard | BlockDriver bdrv_vmdk = { |
823 | ea2384d3 | bellard | "vmdk",
|
824 | ea2384d3 | bellard | sizeof(BDRVVmdkState),
|
825 | ea2384d3 | bellard | vmdk_probe, |
826 | ea2384d3 | bellard | vmdk_open, |
827 | ea2384d3 | bellard | vmdk_read, |
828 | ea2384d3 | bellard | vmdk_write, |
829 | ea2384d3 | bellard | vmdk_close, |
830 | 8979b227 | bellard | vmdk_create, |
831 | 7a6cba61 | pbrook | vmdk_flush, |
832 | ea2384d3 | bellard | vmdk_is_allocated, |
833 | ea2384d3 | bellard | }; |