2 * Copyright (c) 2014 Juniper Networks, Inc.
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27 #include <sys/cdefs.h>
28 __FBSDID("$FreeBSD$");
30 #include <sys/errno.h>
42 #define VMDK_IMAGE_ROUND 1048576
43 #define VMDK_MIN_GRAIN_SIZE 8192
44 #define VMDK_SECTOR_SIZE 512
48 #define VMDK_MAGIC 0x564d444b
50 #define VMDK_VERSION 1
52 #define VMDK_FLAGS_NL_TEST (1 << 0)
53 #define VMDK_FLAGS_RGT_USED (1 << 1)
54 #define VMDK_FLAGS_COMPRESSED (1 << 16)
55 #define VMDK_FLAGS_MARKERS (1 << 17)
61 #define VMDK_NGTES 512
67 #define VMDK_NL_TEST 0x0a200d0a
69 #define VMDK_COMPRESS_NONE 0
70 #define VMDK_COMPRESS_DEFLATE 1
72 } __attribute__((__packed__));
74 static const char desc_fmt[] =
75 "# Disk DescriptorFile\n"
78 "parentCID=ffffffff\n"
79 "createType=\"monolithicSparse\"\n"
80 "# Extent description\n"
81 "RW %ju SPARSE \"%s\"\n"
82 "# The Disk Data Base\n"
84 "ddb.adapterType = \"ide\"\n"
85 "ddb.geometry.cylinders = \"%u\"\n"
86 "ddb.geometry.heads = \"%u\"\n"
87 "ddb.geometry.sectors = \"%u\"\n";
89 static uint64_t grainsz;
92 vmdk_resize(lba_t imgsz)
96 imagesz = imgsz * secsz;
97 imagesz = (imagesz + VMDK_IMAGE_ROUND - 1) & ~(VMDK_IMAGE_ROUND - 1);
98 grainsz = (blksz < VMDK_MIN_GRAIN_SIZE) ? VMDK_MIN_GRAIN_SIZE : blksz;
101 fprintf(stderr, "VMDK: image size = %ju, grain size = %ju\n",
102 (uintmax_t)imagesz, (uintmax_t)grainsz);
104 grainsz /= VMDK_SECTOR_SIZE;
105 return (image_set_size(imagesz / secsz));
111 struct vmdk_header hdr;
112 uint32_t *gt, *gd, *rgd;
116 lba_t blkofs, blkcnt;
118 uint32_t sec, cursec;
119 int error, desc_len, n, ngrains, ngts;
121 imagesz = (image_get_size() * secsz) / VMDK_SECTOR_SIZE;
123 memset(&hdr, 0, sizeof(hdr));
124 le32enc(&hdr.magic, VMDK_MAGIC);
125 le32enc(&hdr.version, VMDK_VERSION);
126 le32enc(&hdr.flags, VMDK_FLAGS_NL_TEST | VMDK_FLAGS_RGT_USED);
127 le64enc(&hdr.capacity, imagesz);
128 le64enc(&hdr.grain_size, grainsz);
130 n = asprintf(&desc, desc_fmt, 1 /*version*/, 0 /*CID*/,
131 (uintmax_t)imagesz /*size*/, "" /*name*/,
132 ncyls /*cylinders*/, nheads /*heads*/, nsecs /*sectors*/);
136 desc_len = (n + VMDK_SECTOR_SIZE - 1) & ~(VMDK_SECTOR_SIZE - 1);
137 desc = realloc(desc, desc_len);
138 memset(desc + n, 0, desc_len - n);
140 le64enc(&hdr.desc_offset, 1);
141 le64enc(&hdr.desc_size, desc_len / VMDK_SECTOR_SIZE);
142 le32enc(&hdr.ngtes, VMDK_NGTES);
144 sec = desc_len / VMDK_SECTOR_SIZE + 1;
146 ngrains = imagesz / grainsz;
147 ngts = (ngrains + VMDK_NGTES - 1) / VMDK_NGTES;
148 gdsz = (ngts * sizeof(uint32_t) + VMDK_SECTOR_SIZE - 1) &
149 ~(VMDK_SECTOR_SIZE - 1);
151 gd = calloc(1, gdsz);
156 le64enc(&hdr.gd_offset, sec);
157 sec += gdsz / VMDK_SECTOR_SIZE;
158 for (n = 0; n < ngts; n++) {
159 le32enc(gd + n, sec);
160 sec += VMDK_NGTES * sizeof(uint32_t) / VMDK_SECTOR_SIZE;
163 rgd = calloc(1, gdsz);
169 le64enc(&hdr.rgd_offset, sec);
170 sec += gdsz / VMDK_SECTOR_SIZE;
171 for (n = 0; n < ngts; n++) {
172 le32enc(rgd + n, sec);
173 sec += VMDK_NGTES * sizeof(uint32_t) / VMDK_SECTOR_SIZE;
176 sec = (sec + grainsz - 1) & ~(grainsz - 1);
179 fprintf(stderr, "VMDK: overhead = %ju\n",
180 (uintmax_t)(sec * VMDK_SECTOR_SIZE));
182 le64enc(&hdr.overhead, sec);
183 be32enc(&hdr.nl_test, VMDK_NL_TEST);
185 gt = calloc(ngts, VMDK_NGTES * sizeof(uint32_t));
192 gtsz = ngts * VMDK_NGTES * sizeof(uint32_t);
195 blkcnt = (grainsz * VMDK_SECTOR_SIZE) / secsz;
196 for (n = 0; n < ngrains; n++) {
198 if (image_data(blkofs, blkcnt)) {
199 le32enc(gt + n, cursec);
205 if (!error && sparse_write(fd, &hdr, VMDK_SECTOR_SIZE) < 0)
207 if (!error && sparse_write(fd, desc, desc_len) < 0)
209 if (!error && sparse_write(fd, gd, gdsz) < 0)
211 if (!error && sparse_write(fd, gt, gtsz) < 0)
213 if (!error && sparse_write(fd, rgd, gdsz) < 0)
215 if (!error && sparse_write(fd, gt, gtsz) < 0)
224 cur = VMDK_SECTOR_SIZE + desc_len + (gdsz + gtsz) * 2;
225 lim = sec * VMDK_SECTOR_SIZE;
227 buf = calloc(1, VMDK_SECTOR_SIZE);
230 while (!error && cur < lim) {
231 if (sparse_write(fd, buf, VMDK_SECTOR_SIZE) < 0)
233 cur += VMDK_SECTOR_SIZE;
241 blkcnt = (grainsz * VMDK_SECTOR_SIZE) / secsz;
242 for (n = 0; n < ngrains; n++) {
244 if (image_data(blkofs, blkcnt)) {
245 error = image_copyout_region(fd, blkofs, blkcnt);
250 return (image_copyout_done(fd));
253 static struct mkimg_format vmdk_format = {
255 .description = "Virtual Machine Disk",
256 .resize = vmdk_resize,
260 FORMAT_DEFINE(vmdk_format);