root / block-vmdk.c @ 5fafdf24
History | View | Annotate | Download (25.1 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 | ea2384d3 | bellard | #include "vl.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 | 5fafdf24 | 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 | 5fafdf24 | 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 | 5fafdf24 | ths | |
345 | 5f4da8c0 | ths | strncpy(s->hd->backing_file, p_name, end_name - p_name); |
346 | 5f4da8c0 | ths | if (stat(s->hd->backing_file, &file_buf) != 0) { |
347 | 5f4da8c0 | ths | path_combine(parent_img_name, sizeof(parent_img_name),
|
348 | 5f4da8c0 | ths | filename, s->hd->backing_file); |
349 | 5f4da8c0 | ths | } else {
|
350 | 5f4da8c0 | ths | strcpy(parent_img_name, s->hd->backing_file); |
351 | 5f4da8c0 | ths | } |
352 | 5f4da8c0 | ths | |
353 | 5f4da8c0 | ths | s->hd->backing_hd = bdrv_new("");
|
354 | 5f4da8c0 | ths | if (!s->hd->backing_hd) {
|
355 | 5f4da8c0 | ths | failure:
|
356 | 5f4da8c0 | ths | bdrv_close(s->hd); |
357 | ff1afc72 | bellard | return -1; |
358 | 5f4da8c0 | ths | } |
359 | 630530a6 | ths | parent_open = 1;
|
360 | 630530a6 | ths | if (bdrv_open(s->hd->backing_hd, parent_img_name, BDRV_O_RDONLY) < 0) |
361 | 5f4da8c0 | ths | goto failure;
|
362 | 630530a6 | ths | parent_open = 0;
|
363 | ff1afc72 | bellard | } |
364 | 5f4da8c0 | ths | |
365 | 5f4da8c0 | ths | return 0; |
366 | 5f4da8c0 | ths | } |
367 | 5f4da8c0 | ths | |
368 | 5f4da8c0 | ths | static int vmdk_open(BlockDriverState *bs, const char *filename, int flags) |
369 | 5f4da8c0 | ths | { |
370 | 5f4da8c0 | ths | BDRVVmdkState *s = bs->opaque; |
371 | 5f4da8c0 | ths | uint32_t magic; |
372 | 5f4da8c0 | ths | int l1_size, i, ret;
|
373 | 5f4da8c0 | ths | |
374 | 630530a6 | ths | if (parent_open)
|
375 | 630530a6 | ths | // Parent must be opened as RO.
|
376 | 630530a6 | ths | flags = BDRV_O_RDONLY; |
377 | 630530a6 | ths | fprintf(stderr, "(VMDK) image open: flags=0x%x filename=%s\n", flags, bs->filename);
|
378 | 630530a6 | ths | |
379 | 5f4da8c0 | ths | ret = bdrv_file_open(&s->hd, filename, flags); |
380 | 5f4da8c0 | ths | if (ret < 0) |
381 | 5f4da8c0 | ths | return ret;
|
382 | 5f4da8c0 | ths | if (bdrv_pread(s->hd, 0, &magic, sizeof(magic)) != sizeof(magic)) |
383 | ea2384d3 | bellard | goto fail;
|
384 | 5f4da8c0 | ths | |
385 | 7143c62c | bellard | magic = be32_to_cpu(magic); |
386 | ea2384d3 | bellard | if (magic == VMDK3_MAGIC) {
|
387 | ea2384d3 | bellard | VMDK3Header header; |
388 | 5f4da8c0 | ths | |
389 | 5f4da8c0 | ths | if (bdrv_pread(s->hd, sizeof(magic), &header, sizeof(header)) != sizeof(header)) |
390 | ea2384d3 | bellard | goto fail;
|
391 | ea2384d3 | bellard | s->cluster_sectors = le32_to_cpu(header.granularity); |
392 | ea2384d3 | bellard | s->l2_size = 1 << 9; |
393 | ea2384d3 | bellard | s->l1_size = 1 << 6; |
394 | ea2384d3 | bellard | bs->total_sectors = le32_to_cpu(header.disk_sectors); |
395 | ff1afc72 | bellard | s->l1_table_offset = le32_to_cpu(header.l1dir_offset) << 9;
|
396 | ff1afc72 | bellard | s->l1_backup_table_offset = 0;
|
397 | ea2384d3 | bellard | s->l1_entry_sectors = s->l2_size * s->cluster_sectors; |
398 | ea2384d3 | bellard | } else if (magic == VMDK4_MAGIC) { |
399 | ea2384d3 | bellard | VMDK4Header header; |
400 | 5f4da8c0 | ths | |
401 | 5f4da8c0 | ths | if (bdrv_pread(s->hd, sizeof(magic), &header, sizeof(header)) != sizeof(header)) |
402 | ea2384d3 | bellard | goto fail;
|
403 | bd6ea3c8 | bellard | bs->total_sectors = le64_to_cpu(header.capacity); |
404 | bd6ea3c8 | bellard | s->cluster_sectors = le64_to_cpu(header.granularity); |
405 | ea2384d3 | bellard | s->l2_size = le32_to_cpu(header.num_gtes_per_gte); |
406 | ea2384d3 | bellard | s->l1_entry_sectors = s->l2_size * s->cluster_sectors; |
407 | ea2384d3 | bellard | if (s->l1_entry_sectors <= 0) |
408 | ea2384d3 | bellard | goto fail;
|
409 | 5fafdf24 | ths | s->l1_size = (bs->total_sectors + s->l1_entry_sectors - 1)
|
410 | ea2384d3 | bellard | / s->l1_entry_sectors; |
411 | ff1afc72 | bellard | s->l1_table_offset = le64_to_cpu(header.rgd_offset) << 9;
|
412 | ff1afc72 | bellard | s->l1_backup_table_offset = le64_to_cpu(header.gd_offset) << 9;
|
413 | 5f4da8c0 | ths | |
414 | 630530a6 | ths | if (parent_open)
|
415 | 630530a6 | ths | s->is_parent = 1;
|
416 | 630530a6 | ths | else
|
417 | 630530a6 | ths | s->is_parent = 0;
|
418 | 630530a6 | ths | |
419 | 5f4da8c0 | ths | // try to open parent images, if exist
|
420 | 5f4da8c0 | ths | if (vmdk_parent_open(bs, filename) != 0) |
421 | 5f4da8c0 | ths | goto fail;
|
422 | 5f4da8c0 | ths | // write the CID once after the image creation
|
423 | 5f4da8c0 | ths | s->parent_cid = vmdk_read_cid(bs,1);
|
424 | ea2384d3 | bellard | } else {
|
425 | ea2384d3 | bellard | goto fail;
|
426 | ea2384d3 | bellard | } |
427 | 5f4da8c0 | ths | |
428 | ea2384d3 | bellard | /* read the L1 table */
|
429 | ea2384d3 | bellard | l1_size = s->l1_size * sizeof(uint32_t);
|
430 | ea2384d3 | bellard | s->l1_table = qemu_malloc(l1_size); |
431 | ea2384d3 | bellard | if (!s->l1_table)
|
432 | ea2384d3 | bellard | goto fail;
|
433 | 5f4da8c0 | ths | if (bdrv_pread(s->hd, s->l1_table_offset, s->l1_table, l1_size) != l1_size)
|
434 | ea2384d3 | bellard | goto fail;
|
435 | ea2384d3 | bellard | for(i = 0; i < s->l1_size; i++) { |
436 | ea2384d3 | bellard | le32_to_cpus(&s->l1_table[i]); |
437 | ea2384d3 | bellard | } |
438 | ea2384d3 | bellard | |
439 | ff1afc72 | bellard | if (s->l1_backup_table_offset) {
|
440 | ff1afc72 | bellard | s->l1_backup_table = qemu_malloc(l1_size); |
441 | ff1afc72 | bellard | if (!s->l1_backup_table)
|
442 | ff1afc72 | bellard | goto fail;
|
443 | 5f4da8c0 | ths | if (bdrv_pread(s->hd, s->l1_backup_table_offset, s->l1_backup_table, l1_size) != l1_size)
|
444 | ff1afc72 | bellard | goto fail;
|
445 | ff1afc72 | bellard | for(i = 0; i < s->l1_size; i++) { |
446 | ff1afc72 | bellard | le32_to_cpus(&s->l1_backup_table[i]); |
447 | ff1afc72 | bellard | } |
448 | ff1afc72 | bellard | } |
449 | ff1afc72 | bellard | |
450 | ea2384d3 | bellard | s->l2_cache = qemu_malloc(s->l2_size * L2_CACHE_SIZE * sizeof(uint32_t));
|
451 | ea2384d3 | bellard | if (!s->l2_cache)
|
452 | ea2384d3 | bellard | goto fail;
|
453 | ea2384d3 | bellard | return 0; |
454 | ea2384d3 | bellard | fail:
|
455 | ff1afc72 | bellard | qemu_free(s->l1_backup_table); |
456 | ea2384d3 | bellard | qemu_free(s->l1_table); |
457 | ea2384d3 | bellard | qemu_free(s->l2_cache); |
458 | 5f4da8c0 | ths | bdrv_delete(s->hd); |
459 | ea2384d3 | bellard | return -1; |
460 | ea2384d3 | bellard | } |
461 | ea2384d3 | bellard | |
462 | 630530a6 | ths | static uint64_t get_cluster_offset(BlockDriverState *bs, VmdkMetaData *m_data,
|
463 | 630530a6 | ths | uint64_t offset, int allocate);
|
464 | 5f4da8c0 | ths | |
465 | 5f4da8c0 | ths | static int get_whole_cluster(BlockDriverState *bs, uint64_t cluster_offset, |
466 | 5f4da8c0 | ths | uint64_t offset, int allocate)
|
467 | 5f4da8c0 | ths | { |
468 | 5f4da8c0 | ths | uint64_t parent_cluster_offset; |
469 | 5f4da8c0 | ths | BDRVVmdkState *s = bs->opaque; |
470 | 5f4da8c0 | ths | uint8_t whole_grain[s->cluster_sectors*512]; // 128 sectors * 512 bytes each = grain size 64KB |
471 | 5f4da8c0 | ths | |
472 | 5f4da8c0 | ths | // we will be here if it's first write on non-exist grain(cluster).
|
473 | 5f4da8c0 | ths | // try to read from parent image, if exist
|
474 | 5f4da8c0 | ths | if (s->hd->backing_hd) {
|
475 | 5f4da8c0 | ths | BDRVVmdkState *ps = s->hd->backing_hd->opaque; |
476 | 5f4da8c0 | ths | |
477 | 5f4da8c0 | ths | if (!vmdk_is_cid_valid(bs))
|
478 | 5f4da8c0 | ths | return -1; |
479 | 5f4da8c0 | ths | |
480 | 630530a6 | ths | parent_cluster_offset = get_cluster_offset(s->hd->backing_hd, NULL, offset, allocate);
|
481 | 630530a6 | ths | |
482 | 630530a6 | ths | if (parent_cluster_offset) {
|
483 | 630530a6 | ths | BDRVVmdkState *act_s = activeBDRV.hd->opaque; |
484 | 630530a6 | ths | |
485 | 630530a6 | ths | if (bdrv_pread(ps->hd, parent_cluster_offset, whole_grain, ps->cluster_sectors*512) != ps->cluster_sectors*512) |
486 | 630530a6 | ths | return -1; |
487 | 630530a6 | ths | |
488 | 630530a6 | ths | //Write grain only into the active image
|
489 | 630530a6 | ths | if (bdrv_pwrite(act_s->hd, activeBDRV.cluster_offset << 9, whole_grain, sizeof(whole_grain)) != sizeof(whole_grain)) |
490 | 630530a6 | ths | return -1; |
491 | 630530a6 | ths | } |
492 | 630530a6 | ths | } |
493 | 630530a6 | ths | return 0; |
494 | 630530a6 | ths | } |
495 | 630530a6 | ths | |
496 | 630530a6 | ths | static int vmdk_L2update(BlockDriverState *bs, VmdkMetaData *m_data) |
497 | 630530a6 | ths | { |
498 | 630530a6 | ths | BDRVVmdkState *s = bs->opaque; |
499 | 630530a6 | ths | |
500 | 630530a6 | ths | /* update L2 table */
|
501 | 630530a6 | ths | if (bdrv_pwrite(s->hd, ((int64_t)m_data->l2_offset * 512) + (m_data->l2_index * sizeof(m_data->offset)), |
502 | 630530a6 | ths | &(m_data->offset), sizeof(m_data->offset)) != sizeof(m_data->offset)) |
503 | 630530a6 | ths | return -1; |
504 | 630530a6 | ths | /* update backup L2 table */
|
505 | 630530a6 | ths | if (s->l1_backup_table_offset != 0) { |
506 | 630530a6 | ths | m_data->l2_offset = s->l1_backup_table[m_data->l1_index]; |
507 | 630530a6 | ths | if (bdrv_pwrite(s->hd, ((int64_t)m_data->l2_offset * 512) + (m_data->l2_index * sizeof(m_data->offset)), |
508 | 630530a6 | ths | &(m_data->offset), sizeof(m_data->offset)) != sizeof(m_data->offset)) |
509 | 5f4da8c0 | ths | return -1; |
510 | 5f4da8c0 | ths | } |
511 | 630530a6 | ths | |
512 | 5f4da8c0 | ths | return 0; |
513 | 5f4da8c0 | ths | } |
514 | 5f4da8c0 | ths | |
515 | 630530a6 | ths | static uint64_t get_cluster_offset(BlockDriverState *bs, VmdkMetaData *m_data,
|
516 | ff1afc72 | bellard | uint64_t offset, int allocate)
|
517 | ea2384d3 | bellard | { |
518 | ea2384d3 | bellard | BDRVVmdkState *s = bs->opaque; |
519 | ea2384d3 | bellard | unsigned int l1_index, l2_offset, l2_index; |
520 | ea2384d3 | bellard | int min_index, i, j;
|
521 | 630530a6 | ths | uint32_t min_count, *l2_table, tmp = 0;
|
522 | ea2384d3 | bellard | uint64_t cluster_offset; |
523 | 630530a6 | ths | |
524 | 630530a6 | ths | if (m_data)
|
525 | 630530a6 | ths | m_data->valid = 0;
|
526 | 630530a6 | ths | |
527 | ea2384d3 | bellard | l1_index = (offset >> 9) / s->l1_entry_sectors;
|
528 | ea2384d3 | bellard | if (l1_index >= s->l1_size)
|
529 | ea2384d3 | bellard | return 0; |
530 | ea2384d3 | bellard | l2_offset = s->l1_table[l1_index]; |
531 | ea2384d3 | bellard | if (!l2_offset)
|
532 | ea2384d3 | bellard | return 0; |
533 | ea2384d3 | bellard | for(i = 0; i < L2_CACHE_SIZE; i++) { |
534 | ea2384d3 | bellard | if (l2_offset == s->l2_cache_offsets[i]) {
|
535 | ea2384d3 | bellard | /* increment the hit count */
|
536 | ea2384d3 | bellard | if (++s->l2_cache_counts[i] == 0xffffffff) { |
537 | ea2384d3 | bellard | for(j = 0; j < L2_CACHE_SIZE; j++) { |
538 | ea2384d3 | bellard | s->l2_cache_counts[j] >>= 1;
|
539 | ea2384d3 | bellard | } |
540 | ea2384d3 | bellard | } |
541 | ea2384d3 | bellard | l2_table = s->l2_cache + (i * s->l2_size); |
542 | ea2384d3 | bellard | goto found;
|
543 | ea2384d3 | bellard | } |
544 | ea2384d3 | bellard | } |
545 | ea2384d3 | bellard | /* not found: load a new entry in the least used one */
|
546 | ea2384d3 | bellard | min_index = 0;
|
547 | ea2384d3 | bellard | min_count = 0xffffffff;
|
548 | ea2384d3 | bellard | for(i = 0; i < L2_CACHE_SIZE; i++) { |
549 | ea2384d3 | bellard | if (s->l2_cache_counts[i] < min_count) {
|
550 | ea2384d3 | bellard | min_count = s->l2_cache_counts[i]; |
551 | ea2384d3 | bellard | min_index = i; |
552 | ea2384d3 | bellard | } |
553 | ea2384d3 | bellard | } |
554 | ea2384d3 | bellard | l2_table = s->l2_cache + (min_index * s->l2_size); |
555 | 5fafdf24 | ths | if (bdrv_pread(s->hd, (int64_t)l2_offset * 512, l2_table, s->l2_size * sizeof(uint32_t)) != |
556 | 5f4da8c0 | ths | s->l2_size * sizeof(uint32_t))
|
557 | ea2384d3 | bellard | return 0; |
558 | 5f4da8c0 | ths | |
559 | ea2384d3 | bellard | s->l2_cache_offsets[min_index] = l2_offset; |
560 | ea2384d3 | bellard | s->l2_cache_counts[min_index] = 1;
|
561 | ea2384d3 | bellard | found:
|
562 | ea2384d3 | bellard | l2_index = ((offset >> 9) / s->cluster_sectors) % s->l2_size;
|
563 | ea2384d3 | bellard | cluster_offset = le32_to_cpu(l2_table[l2_index]); |
564 | 630530a6 | ths | |
565 | ff1afc72 | bellard | if (!cluster_offset) {
|
566 | ff1afc72 | bellard | if (!allocate)
|
567 | ff1afc72 | bellard | return 0; |
568 | 630530a6 | ths | // Avoid the L2 tables update for the images that have snapshots.
|
569 | 630530a6 | ths | if (!s->is_parent) {
|
570 | 49140a77 | ths | cluster_offset = bdrv_getlength(s->hd); |
571 | 630530a6 | ths | bdrv_truncate(s->hd, cluster_offset + (s->cluster_sectors << 9));
|
572 | 630530a6 | ths | |
573 | 630530a6 | ths | cluster_offset >>= 9;
|
574 | 630530a6 | ths | tmp = cpu_to_le32(cluster_offset); |
575 | 630530a6 | ths | l2_table[l2_index] = tmp; |
576 | 630530a6 | ths | // Save the active image state
|
577 | 630530a6 | ths | activeBDRV.cluster_offset = cluster_offset; |
578 | 630530a6 | ths | activeBDRV.hd = bs; |
579 | ff1afc72 | bellard | } |
580 | 630530a6 | ths | /* First of all we write grain itself, to avoid race condition
|
581 | 630530a6 | ths | * that may to corrupt the image.
|
582 | 630530a6 | ths | * This problem may occur because of insufficient space on host disk
|
583 | 630530a6 | ths | * or inappropriate VM shutdown.
|
584 | 630530a6 | ths | */
|
585 | 5f4da8c0 | ths | if (get_whole_cluster(bs, cluster_offset, offset, allocate) == -1) |
586 | 5f4da8c0 | ths | return 0; |
587 | 630530a6 | ths | |
588 | 630530a6 | ths | if (m_data) {
|
589 | 630530a6 | ths | m_data->offset = tmp; |
590 | 630530a6 | ths | m_data->l1_index = l1_index; |
591 | 630530a6 | ths | m_data->l2_index = l2_index; |
592 | 630530a6 | ths | m_data->l2_offset = l2_offset; |
593 | 630530a6 | ths | m_data->valid = 1;
|
594 | 630530a6 | ths | } |
595 | ff1afc72 | bellard | } |
596 | ea2384d3 | bellard | cluster_offset <<= 9;
|
597 | ea2384d3 | bellard | return cluster_offset;
|
598 | ea2384d3 | bellard | } |
599 | ea2384d3 | bellard | |
600 | 5fafdf24 | ths | static int vmdk_is_allocated(BlockDriverState *bs, int64_t sector_num, |
601 | ea2384d3 | bellard | int nb_sectors, int *pnum) |
602 | ea2384d3 | bellard | { |
603 | ea2384d3 | bellard | BDRVVmdkState *s = bs->opaque; |
604 | ea2384d3 | bellard | int index_in_cluster, n;
|
605 | ea2384d3 | bellard | uint64_t cluster_offset; |
606 | ea2384d3 | bellard | |
607 | 630530a6 | ths | cluster_offset = get_cluster_offset(bs, NULL, sector_num << 9, 0); |
608 | ea2384d3 | bellard | index_in_cluster = sector_num % s->cluster_sectors; |
609 | ea2384d3 | bellard | n = s->cluster_sectors - index_in_cluster; |
610 | ea2384d3 | bellard | if (n > nb_sectors)
|
611 | ea2384d3 | bellard | n = nb_sectors; |
612 | ea2384d3 | bellard | *pnum = n; |
613 | ea2384d3 | bellard | return (cluster_offset != 0); |
614 | ea2384d3 | bellard | } |
615 | ea2384d3 | bellard | |
616 | 5fafdf24 | ths | static int vmdk_read(BlockDriverState *bs, int64_t sector_num, |
617 | ea2384d3 | bellard | uint8_t *buf, int nb_sectors)
|
618 | ea2384d3 | bellard | { |
619 | ea2384d3 | bellard | BDRVVmdkState *s = bs->opaque; |
620 | 5f4da8c0 | ths | int index_in_cluster, n, ret;
|
621 | ea2384d3 | bellard | uint64_t cluster_offset; |
622 | 5f4da8c0 | ths | |
623 | ea2384d3 | bellard | while (nb_sectors > 0) { |
624 | 630530a6 | ths | cluster_offset = get_cluster_offset(bs, NULL, sector_num << 9, 0); |
625 | ea2384d3 | bellard | index_in_cluster = sector_num % s->cluster_sectors; |
626 | ea2384d3 | bellard | n = s->cluster_sectors - index_in_cluster; |
627 | ea2384d3 | bellard | if (n > nb_sectors)
|
628 | ea2384d3 | bellard | n = nb_sectors; |
629 | ea2384d3 | bellard | if (!cluster_offset) {
|
630 | 5f4da8c0 | ths | // try to read from parent image, if exist
|
631 | 5f4da8c0 | ths | if (s->hd->backing_hd) {
|
632 | 5f4da8c0 | ths | if (!vmdk_is_cid_valid(bs))
|
633 | 5f4da8c0 | ths | return -1; |
634 | 5f4da8c0 | ths | ret = bdrv_read(s->hd->backing_hd, sector_num, buf, n); |
635 | 5f4da8c0 | ths | if (ret < 0) |
636 | 5f4da8c0 | ths | return -1; |
637 | 5f4da8c0 | ths | } else {
|
638 | 5f4da8c0 | ths | memset(buf, 0, 512 * n); |
639 | 5f4da8c0 | ths | } |
640 | ea2384d3 | bellard | } else {
|
641 | 5f4da8c0 | ths | if(bdrv_pread(s->hd, cluster_offset + index_in_cluster * 512, buf, n * 512) != n * 512) |
642 | ea2384d3 | bellard | return -1; |
643 | ea2384d3 | bellard | } |
644 | ea2384d3 | bellard | nb_sectors -= n; |
645 | ea2384d3 | bellard | sector_num += n; |
646 | ea2384d3 | bellard | buf += n * 512;
|
647 | ea2384d3 | bellard | } |
648 | ea2384d3 | bellard | return 0; |
649 | ea2384d3 | bellard | } |
650 | ea2384d3 | bellard | |
651 | 5fafdf24 | ths | static int vmdk_write(BlockDriverState *bs, int64_t sector_num, |
652 | ea2384d3 | bellard | const uint8_t *buf, int nb_sectors) |
653 | ea2384d3 | bellard | { |
654 | ff1afc72 | bellard | BDRVVmdkState *s = bs->opaque; |
655 | 630530a6 | ths | VmdkMetaData m_data; |
656 | 5f4da8c0 | ths | int index_in_cluster, n;
|
657 | ff1afc72 | bellard | uint64_t cluster_offset; |
658 | 5f4da8c0 | ths | static int cid_update = 0; |
659 | ff1afc72 | bellard | |
660 | 630530a6 | ths | if (sector_num > bs->total_sectors) {
|
661 | 630530a6 | ths | fprintf(stderr, |
662 | 81442192 | ths | "(VMDK) Wrong offset: sector_num=0x%llx total_sectors=0x%llx\n",
|
663 | 630530a6 | ths | sector_num, bs->total_sectors); |
664 | 630530a6 | ths | return -1; |
665 | 630530a6 | ths | } |
666 | 630530a6 | ths | |
667 | ff1afc72 | bellard | while (nb_sectors > 0) { |
668 | ff1afc72 | bellard | index_in_cluster = sector_num & (s->cluster_sectors - 1);
|
669 | ff1afc72 | bellard | n = s->cluster_sectors - index_in_cluster; |
670 | ff1afc72 | bellard | if (n > nb_sectors)
|
671 | ff1afc72 | bellard | n = nb_sectors; |
672 | 630530a6 | ths | cluster_offset = get_cluster_offset(bs, &m_data, sector_num << 9, 1); |
673 | ff1afc72 | bellard | if (!cluster_offset)
|
674 | ff1afc72 | bellard | return -1; |
675 | 630530a6 | ths | |
676 | 5f4da8c0 | ths | if (bdrv_pwrite(s->hd, cluster_offset + index_in_cluster * 512, buf, n * 512) != n * 512) |
677 | ff1afc72 | bellard | return -1; |
678 | 630530a6 | ths | if (m_data.valid) {
|
679 | 630530a6 | ths | /* update L2 tables */
|
680 | 630530a6 | ths | if (vmdk_L2update(bs, &m_data) == -1) |
681 | 630530a6 | ths | return -1; |
682 | 630530a6 | ths | } |
683 | ff1afc72 | bellard | nb_sectors -= n; |
684 | ff1afc72 | bellard | sector_num += n; |
685 | ff1afc72 | bellard | buf += n * 512;
|
686 | 5f4da8c0 | ths | |
687 | 5f4da8c0 | ths | // update CID on the first write every time the virtual disk is opened
|
688 | 5f4da8c0 | ths | if (!cid_update) {
|
689 | 5f4da8c0 | ths | vmdk_write_cid(bs, time(NULL));
|
690 | 5f4da8c0 | ths | cid_update++; |
691 | 5f4da8c0 | ths | } |
692 | ff1afc72 | bellard | } |
693 | ff1afc72 | bellard | return 0; |
694 | ea2384d3 | bellard | } |
695 | ea2384d3 | bellard | |
696 | 8979b227 | bellard | static int vmdk_create(const char *filename, int64_t total_size, |
697 | 8979b227 | bellard | const char *backing_file, int flags) |
698 | 8979b227 | bellard | { |
699 | 8979b227 | bellard | int fd, i;
|
700 | 8979b227 | bellard | VMDK4Header header; |
701 | 8979b227 | bellard | uint32_t tmp, magic, grains, gd_size, gt_size, gt_count; |
702 | 8979b227 | bellard | char *desc_template =
|
703 | 8979b227 | bellard | "# Disk DescriptorFile\n"
|
704 | 8979b227 | bellard | "version=1\n"
|
705 | 8979b227 | bellard | "CID=%x\n"
|
706 | 8979b227 | bellard | "parentCID=ffffffff\n"
|
707 | 8979b227 | bellard | "createType=\"monolithicSparse\"\n"
|
708 | 8979b227 | bellard | "\n"
|
709 | 8979b227 | bellard | "# Extent description\n"
|
710 | 8979b227 | bellard | "RW %lu SPARSE \"%s\"\n"
|
711 | 8979b227 | bellard | "\n"
|
712 | 8979b227 | bellard | "# The Disk Data Base \n"
|
713 | 8979b227 | bellard | "#DDB\n"
|
714 | 8979b227 | bellard | "\n"
|
715 | 5f4da8c0 | ths | "ddb.virtualHWVersion = \"4\"\n"
|
716 | 8979b227 | bellard | "ddb.geometry.cylinders = \"%lu\"\n"
|
717 | 8979b227 | bellard | "ddb.geometry.heads = \"16\"\n"
|
718 | 8979b227 | bellard | "ddb.geometry.sectors = \"63\"\n"
|
719 | 8979b227 | bellard | "ddb.adapterType = \"ide\"\n";
|
720 | 8979b227 | bellard | char desc[1024]; |
721 | 8979b227 | bellard | const char *real_filename, *temp_str; |
722 | 8979b227 | bellard | |
723 | 8979b227 | bellard | /* XXX: add support for backing file */
|
724 | 5f4da8c0 | ths | if (backing_file) {
|
725 | 5f4da8c0 | ths | return vmdk_snapshot_create(filename, backing_file);
|
726 | 5f4da8c0 | ths | } |
727 | 8979b227 | bellard | |
728 | 8979b227 | bellard | fd = open(filename, O_WRONLY | O_CREAT | O_TRUNC | O_BINARY | O_LARGEFILE, |
729 | 8979b227 | bellard | 0644);
|
730 | 8979b227 | bellard | if (fd < 0) |
731 | 8979b227 | bellard | return -1; |
732 | 8979b227 | bellard | magic = cpu_to_be32(VMDK4_MAGIC); |
733 | 8979b227 | bellard | memset(&header, 0, sizeof(header)); |
734 | 8979b227 | bellard | header.version = cpu_to_le32(1);
|
735 | 8979b227 | bellard | header.flags = cpu_to_le32(3); /* ?? */ |
736 | 8979b227 | bellard | header.capacity = cpu_to_le64(total_size); |
737 | 8979b227 | bellard | header.granularity = cpu_to_le64(128);
|
738 | 8979b227 | bellard | header.num_gtes_per_gte = cpu_to_le32(512);
|
739 | 8979b227 | bellard | |
740 | 8979b227 | bellard | grains = (total_size + header.granularity - 1) / header.granularity;
|
741 | 8979b227 | bellard | gt_size = ((header.num_gtes_per_gte * sizeof(uint32_t)) + 511) >> 9; |
742 | 8979b227 | bellard | gt_count = (grains + header.num_gtes_per_gte - 1) / header.num_gtes_per_gte;
|
743 | 8979b227 | bellard | gd_size = (gt_count * sizeof(uint32_t) + 511) >> 9; |
744 | 8979b227 | bellard | |
745 | 8979b227 | bellard | header.desc_offset = 1;
|
746 | 8979b227 | bellard | header.desc_size = 20;
|
747 | 8979b227 | bellard | header.rgd_offset = header.desc_offset + header.desc_size; |
748 | 8979b227 | bellard | header.gd_offset = header.rgd_offset + gd_size + (gt_size * gt_count); |
749 | 8979b227 | bellard | header.grain_offset = |
750 | 8979b227 | bellard | ((header.gd_offset + gd_size + (gt_size * gt_count) + |
751 | 8979b227 | bellard | header.granularity - 1) / header.granularity) *
|
752 | 8979b227 | bellard | header.granularity; |
753 | 8979b227 | bellard | |
754 | 8979b227 | bellard | header.desc_offset = cpu_to_le64(header.desc_offset); |
755 | 8979b227 | bellard | header.desc_size = cpu_to_le64(header.desc_size); |
756 | 8979b227 | bellard | header.rgd_offset = cpu_to_le64(header.rgd_offset); |
757 | 8979b227 | bellard | header.gd_offset = cpu_to_le64(header.gd_offset); |
758 | 8979b227 | bellard | header.grain_offset = cpu_to_le64(header.grain_offset); |
759 | 8979b227 | bellard | |
760 | 8979b227 | bellard | header.check_bytes[0] = 0xa; |
761 | 8979b227 | bellard | header.check_bytes[1] = 0x20; |
762 | 8979b227 | bellard | header.check_bytes[2] = 0xd; |
763 | 8979b227 | bellard | header.check_bytes[3] = 0xa; |
764 | 5fafdf24 | ths | |
765 | 5fafdf24 | ths | /* write all the data */
|
766 | 8979b227 | bellard | write(fd, &magic, sizeof(magic));
|
767 | 8979b227 | bellard | write(fd, &header, sizeof(header));
|
768 | 8979b227 | bellard | |
769 | 8979b227 | bellard | ftruncate(fd, header.grain_offset << 9);
|
770 | 8979b227 | bellard | |
771 | 8979b227 | bellard | /* write grain directory */
|
772 | 8979b227 | bellard | lseek(fd, le64_to_cpu(header.rgd_offset) << 9, SEEK_SET);
|
773 | 8979b227 | bellard | for (i = 0, tmp = header.rgd_offset + gd_size; |
774 | 8979b227 | bellard | i < gt_count; i++, tmp += gt_size) |
775 | 8979b227 | bellard | write(fd, &tmp, sizeof(tmp));
|
776 | 5fafdf24 | ths | |
777 | 8979b227 | bellard | /* write backup grain directory */
|
778 | 8979b227 | bellard | lseek(fd, le64_to_cpu(header.gd_offset) << 9, SEEK_SET);
|
779 | 8979b227 | bellard | for (i = 0, tmp = header.gd_offset + gd_size; |
780 | 8979b227 | bellard | i < gt_count; i++, tmp += gt_size) |
781 | 8979b227 | bellard | write(fd, &tmp, sizeof(tmp));
|
782 | 8979b227 | bellard | |
783 | 8979b227 | bellard | /* compose the descriptor */
|
784 | 8979b227 | bellard | real_filename = filename; |
785 | 8979b227 | bellard | if ((temp_str = strrchr(real_filename, '\\')) != NULL) |
786 | 8979b227 | bellard | real_filename = temp_str + 1;
|
787 | 8979b227 | bellard | if ((temp_str = strrchr(real_filename, '/')) != NULL) |
788 | 8979b227 | bellard | real_filename = temp_str + 1;
|
789 | 8979b227 | bellard | if ((temp_str = strrchr(real_filename, ':')) != NULL) |
790 | 8979b227 | bellard | real_filename = temp_str + 1;
|
791 | 8979b227 | bellard | sprintf(desc, desc_template, time(NULL), (unsigned long)total_size, |
792 | 8979b227 | bellard | real_filename, total_size / (63 * 16)); |
793 | 8979b227 | bellard | |
794 | 8979b227 | bellard | /* write the descriptor */
|
795 | 8979b227 | bellard | lseek(fd, le64_to_cpu(header.desc_offset) << 9, SEEK_SET);
|
796 | 8979b227 | bellard | write(fd, desc, strlen(desc)); |
797 | 8979b227 | bellard | |
798 | 8979b227 | bellard | close(fd); |
799 | 8979b227 | bellard | return 0; |
800 | 8979b227 | bellard | } |
801 | 8979b227 | bellard | |
802 | e2731add | bellard | static void vmdk_close(BlockDriverState *bs) |
803 | ea2384d3 | bellard | { |
804 | ea2384d3 | bellard | BDRVVmdkState *s = bs->opaque; |
805 | 5f4da8c0 | ths | |
806 | ea2384d3 | bellard | qemu_free(s->l1_table); |
807 | ea2384d3 | bellard | qemu_free(s->l2_cache); |
808 | 5f4da8c0 | ths | bdrv_delete(s->hd); |
809 | 5f4da8c0 | ths | // try to close parent image, if exist
|
810 | 5f4da8c0 | ths | vmdk_parent_close(s->hd); |
811 | ea2384d3 | bellard | } |
812 | ea2384d3 | bellard | |
813 | 7a6cba61 | pbrook | static void vmdk_flush(BlockDriverState *bs) |
814 | 7a6cba61 | pbrook | { |
815 | 7a6cba61 | pbrook | BDRVVmdkState *s = bs->opaque; |
816 | 5f4da8c0 | ths | bdrv_flush(s->hd); |
817 | 7a6cba61 | pbrook | } |
818 | 7a6cba61 | pbrook | |
819 | ea2384d3 | bellard | BlockDriver bdrv_vmdk = { |
820 | ea2384d3 | bellard | "vmdk",
|
821 | ea2384d3 | bellard | sizeof(BDRVVmdkState),
|
822 | ea2384d3 | bellard | vmdk_probe, |
823 | ea2384d3 | bellard | vmdk_open, |
824 | ea2384d3 | bellard | vmdk_read, |
825 | ea2384d3 | bellard | vmdk_write, |
826 | ea2384d3 | bellard | vmdk_close, |
827 | 8979b227 | bellard | vmdk_create, |
828 | 7a6cba61 | pbrook | vmdk_flush, |
829 | ea2384d3 | bellard | vmdk_is_allocated, |
830 | ea2384d3 | bellard | }; |