2 * Copyright (c) 2008 Marcel Moolenaar
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
9 * 1. Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
11 * 2. Redistributions in binary form must reproduce the above copyright
12 * notice, this list of conditions and the following disclaimer in the
13 * documentation and/or other materials provided with the distribution.
15 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
16 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
17 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
18 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
19 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
20 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
21 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
22 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
23 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
24 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27 #include <sys/cdefs.h>
28 __FBSDID("$FreeBSD$");
30 #include <sys/param.h>
32 #include <sys/endian.h>
33 #include <sys/kernel.h>
35 #include <sys/limits.h>
37 #include <sys/malloc.h>
38 #include <sys/mutex.h>
39 #include <sys/queue.h>
41 #include <sys/systm.h>
42 #include <sys/sysctl.h>
44 #include <geom/geom.h>
45 #include <geom/part/g_part.h>
47 #include "g_part_if.h"
49 FEATURE(geom_part_vtoc8, "GEOM partitioning class for SMI VTOC8 disk labels");
51 struct g_part_vtoc8_table {
52 struct g_part_table base;
57 static int g_part_vtoc8_add(struct g_part_table *, struct g_part_entry *,
58 struct g_part_parms *);
59 static int g_part_vtoc8_create(struct g_part_table *, struct g_part_parms *);
60 static int g_part_vtoc8_destroy(struct g_part_table *, struct g_part_parms *);
61 static void g_part_vtoc8_dumpconf(struct g_part_table *,
62 struct g_part_entry *, struct sbuf *, const char *);
63 static int g_part_vtoc8_dumpto(struct g_part_table *, struct g_part_entry *);
64 static int g_part_vtoc8_modify(struct g_part_table *, struct g_part_entry *,
65 struct g_part_parms *);
66 static const char *g_part_vtoc8_name(struct g_part_table *,
67 struct g_part_entry *, char *, size_t);
68 static int g_part_vtoc8_probe(struct g_part_table *, struct g_consumer *);
69 static int g_part_vtoc8_read(struct g_part_table *, struct g_consumer *);
70 static const char *g_part_vtoc8_type(struct g_part_table *,
71 struct g_part_entry *, char *, size_t);
72 static int g_part_vtoc8_write(struct g_part_table *, struct g_consumer *);
73 static int g_part_vtoc8_resize(struct g_part_table *, struct g_part_entry *,
74 struct g_part_parms *);
76 static kobj_method_t g_part_vtoc8_methods[] = {
77 KOBJMETHOD(g_part_add, g_part_vtoc8_add),
78 KOBJMETHOD(g_part_create, g_part_vtoc8_create),
79 KOBJMETHOD(g_part_destroy, g_part_vtoc8_destroy),
80 KOBJMETHOD(g_part_dumpconf, g_part_vtoc8_dumpconf),
81 KOBJMETHOD(g_part_dumpto, g_part_vtoc8_dumpto),
82 KOBJMETHOD(g_part_modify, g_part_vtoc8_modify),
83 KOBJMETHOD(g_part_resize, g_part_vtoc8_resize),
84 KOBJMETHOD(g_part_name, g_part_vtoc8_name),
85 KOBJMETHOD(g_part_probe, g_part_vtoc8_probe),
86 KOBJMETHOD(g_part_read, g_part_vtoc8_read),
87 KOBJMETHOD(g_part_type, g_part_vtoc8_type),
88 KOBJMETHOD(g_part_write, g_part_vtoc8_write),
92 static struct g_part_scheme g_part_vtoc8_scheme = {
95 sizeof(struct g_part_vtoc8_table),
96 .gps_entrysz = sizeof(struct g_part_entry),
97 .gps_minent = VTOC8_NPARTS,
98 .gps_maxent = VTOC8_NPARTS,
100 G_PART_SCHEME_DECLARE(g_part_vtoc8);
103 vtoc8_parse_type(const char *type, uint16_t *tag)
109 if (type[0] == '!') {
110 lt = strtol(type + 1, &endp, 0);
111 if (type[1] == '\0' || *endp != '\0' || lt <= 0 ||
117 alias = g_part_alias_name(G_PART_ALIAS_FREEBSD_NANDFS);
118 if (!strcasecmp(type, alias)) {
119 *tag = VTOC_TAG_FREEBSD_NANDFS;
122 alias = g_part_alias_name(G_PART_ALIAS_FREEBSD_SWAP);
123 if (!strcasecmp(type, alias)) {
124 *tag = VTOC_TAG_FREEBSD_SWAP;
127 alias = g_part_alias_name(G_PART_ALIAS_FREEBSD_UFS);
128 if (!strcasecmp(type, alias)) {
129 *tag = VTOC_TAG_FREEBSD_UFS;
132 alias = g_part_alias_name(G_PART_ALIAS_FREEBSD_VINUM);
133 if (!strcasecmp(type, alias)) {
134 *tag = VTOC_TAG_FREEBSD_VINUM;
137 alias = g_part_alias_name(G_PART_ALIAS_FREEBSD_ZFS);
138 if (!strcasecmp(type, alias)) {
139 *tag = VTOC_TAG_FREEBSD_ZFS;
146 g_part_vtoc8_add(struct g_part_table *basetable, struct g_part_entry *entry,
147 struct g_part_parms *gpp)
149 struct g_part_vtoc8_table *table;
151 uint64_t start, size;
154 if (gpp->gpp_parms & G_PART_PARM_LABEL)
157 error = vtoc8_parse_type(gpp->gpp_type, &tag);
161 table = (struct g_part_vtoc8_table *)basetable;
162 index = entry->gpe_index - 1;
164 start = gpp->gpp_start;
165 size = gpp->gpp_size;
166 if (start % table->secpercyl) {
167 size = size - table->secpercyl + (start % table->secpercyl);
168 start = start - (start % table->secpercyl) + table->secpercyl;
170 if (size % table->secpercyl)
171 size = size - (size % table->secpercyl);
172 if (size < table->secpercyl)
175 KASSERT(entry->gpe_start <= start, (__func__));
176 KASSERT(entry->gpe_end >= start + size - 1, (__func__));
177 entry->gpe_start = start;
178 entry->gpe_end = start + size - 1;
180 be16enc(&table->vtoc.part[index].tag, tag);
181 be16enc(&table->vtoc.part[index].flag, 0);
182 be32enc(&table->vtoc.timestamp[index], 0);
183 be32enc(&table->vtoc.map[index].cyl, start / table->secpercyl);
184 be32enc(&table->vtoc.map[index].nblks, size);
189 g_part_vtoc8_create(struct g_part_table *basetable, struct g_part_parms *gpp)
191 struct g_provider *pp;
192 struct g_part_entry *entry;
193 struct g_part_vtoc8_table *table;
195 uint32_t acyls, ncyls, pcyls;
197 pp = gpp->gpp_provider;
199 if (pp->sectorsize < sizeof(struct vtoc8))
201 if (pp->sectorsize > sizeof(struct vtoc8))
204 table = (struct g_part_vtoc8_table *)basetable;
206 msize = MIN(pp->mediasize / pp->sectorsize, UINT32_MAX);
207 table->secpercyl = basetable->gpt_sectors * basetable->gpt_heads;
208 pcyls = msize / table->secpercyl;
210 ncyls = pcyls - acyls;
211 msize = ncyls * table->secpercyl;
213 sprintf(table->vtoc.ascii, "FreeBSD%lldM cyl %u alt %u hd %u sec %u",
214 (long long)(msize / 2048), ncyls, acyls, basetable->gpt_heads,
215 basetable->gpt_sectors);
216 be32enc(&table->vtoc.version, VTOC_VERSION);
217 be16enc(&table->vtoc.nparts, VTOC8_NPARTS);
218 be32enc(&table->vtoc.sanity, VTOC_SANITY);
219 be16enc(&table->vtoc.rpm, 3600);
220 be16enc(&table->vtoc.physcyls, pcyls);
221 be16enc(&table->vtoc.ncyls, ncyls);
222 be16enc(&table->vtoc.altcyls, acyls);
223 be16enc(&table->vtoc.nheads, basetable->gpt_heads);
224 be16enc(&table->vtoc.nsecs, basetable->gpt_sectors);
225 be16enc(&table->vtoc.magic, VTOC_MAGIC);
227 basetable->gpt_first = 0;
228 basetable->gpt_last = msize - 1;
229 basetable->gpt_isleaf = 1;
231 entry = g_part_new_entry(basetable, VTOC_RAW_PART + 1,
232 basetable->gpt_first, basetable->gpt_last);
233 entry->gpe_internal = 1;
234 be16enc(&table->vtoc.part[VTOC_RAW_PART].tag, VTOC_TAG_BACKUP);
235 be32enc(&table->vtoc.map[VTOC_RAW_PART].nblks, msize);
240 g_part_vtoc8_destroy(struct g_part_table *basetable, struct g_part_parms *gpp)
243 /* Wipe the first sector to clear the partitioning. */
244 basetable->gpt_smhead |= 1;
249 g_part_vtoc8_dumpconf(struct g_part_table *basetable,
250 struct g_part_entry *entry, struct sbuf *sb, const char *indent)
252 struct g_part_vtoc8_table *table;
254 table = (struct g_part_vtoc8_table *)basetable;
255 if (indent == NULL) {
256 /* conftxt: libdisk compatibility */
257 sbuf_printf(sb, " xs SUN sc %u hd %u alt %u",
258 be16dec(&table->vtoc.nsecs), be16dec(&table->vtoc.nheads),
259 be16dec(&table->vtoc.altcyls));
260 } else if (entry != NULL) {
261 /* confxml: partition entry information */
262 sbuf_printf(sb, "%s<rawtype>%u</rawtype>\n", indent,
263 be16dec(&table->vtoc.part[entry->gpe_index - 1].tag));
265 /* confxml: scheme information */
270 g_part_vtoc8_dumpto(struct g_part_table *basetable,
271 struct g_part_entry *entry)
273 struct g_part_vtoc8_table *table;
277 * Allow dumping to a swap partition or a partition that
280 table = (struct g_part_vtoc8_table *)basetable;
281 tag = be16dec(&table->vtoc.part[entry->gpe_index - 1].tag);
282 return ((tag == 0 || tag == VTOC_TAG_FREEBSD_SWAP ||
283 tag == VTOC_TAG_SWAP) ? 1 : 0);
287 g_part_vtoc8_modify(struct g_part_table *basetable,
288 struct g_part_entry *entry, struct g_part_parms *gpp)
290 struct g_part_vtoc8_table *table;
294 if (gpp->gpp_parms & G_PART_PARM_LABEL)
297 table = (struct g_part_vtoc8_table *)basetable;
298 if (gpp->gpp_parms & G_PART_PARM_TYPE) {
299 error = vtoc8_parse_type(gpp->gpp_type, &tag);
303 be16enc(&table->vtoc.part[entry->gpe_index - 1].tag, tag);
309 vtoc8_set_rawsize(struct g_part_table *basetable, struct g_provider *pp)
311 struct g_part_vtoc8_table *table;
312 struct g_part_entry *baseentry;
314 uint32_t acyls, ncyls, pcyls;
316 table = (struct g_part_vtoc8_table *)basetable;
317 msize = MIN(pp->mediasize / pp->sectorsize, UINT32_MAX);
318 pcyls = msize / table->secpercyl;
319 if (pcyls > UINT16_MAX)
321 acyls = be16dec(&table->vtoc.altcyls);
322 ncyls = pcyls - acyls;
323 msize = ncyls * table->secpercyl;
324 basetable->gpt_last = msize - 1;
326 bzero(table->vtoc.ascii, sizeof(table->vtoc.ascii));
327 sprintf(table->vtoc.ascii, "FreeBSD%lldM cyl %u alt %u hd %u sec %u",
328 (long long)(msize / 2048), ncyls, acyls, basetable->gpt_heads,
329 basetable->gpt_sectors);
330 be16enc(&table->vtoc.physcyls, pcyls);
331 be16enc(&table->vtoc.ncyls, ncyls);
332 be32enc(&table->vtoc.map[VTOC_RAW_PART].nblks, msize);
333 if (be32dec(&table->vtoc.sanity) == VTOC_SANITY)
334 be16enc(&table->vtoc.part[VTOC_RAW_PART].tag, VTOC_TAG_BACKUP);
335 LIST_FOREACH(baseentry, &basetable->gpt_entry, gpe_entry) {
336 if (baseentry->gpe_index == VTOC_RAW_PART + 1) {
337 baseentry->gpe_end = basetable->gpt_last;
345 g_part_vtoc8_resize(struct g_part_table *basetable,
346 struct g_part_entry *entry, struct g_part_parms *gpp)
348 struct g_part_vtoc8_table *table;
349 struct g_provider *pp;
353 pp = LIST_FIRST(&basetable->gpt_gp->consumer)->provider;
354 return (vtoc8_set_rawsize(basetable, pp));
356 table = (struct g_part_vtoc8_table *)basetable;
357 size = gpp->gpp_size;
358 if (size % table->secpercyl)
359 size = size - (size % table->secpercyl);
360 if (size < table->secpercyl)
363 entry->gpe_end = entry->gpe_start + size - 1;
364 be32enc(&table->vtoc.map[entry->gpe_index - 1].nblks, size);
370 g_part_vtoc8_name(struct g_part_table *table, struct g_part_entry *baseentry,
371 char *buf, size_t bufsz)
374 snprintf(buf, bufsz, "%c", 'a' + baseentry->gpe_index - 1);
379 g_part_vtoc8_probe(struct g_part_table *table, struct g_consumer *cp)
381 struct g_provider *pp;
384 uint16_t cksum, magic;
388 /* Sanity-check the provider. */
389 if (pp->sectorsize != sizeof(struct vtoc8))
392 /* Check that there's a disklabel. */
393 buf = g_read_data(cp, 0, pp->sectorsize, &error);
397 res = ENXIO; /* Assume mismatch */
399 /* Check the magic */
400 magic = be16dec(buf + offsetof(struct vtoc8, magic));
401 if (magic != VTOC_MAGIC)
406 for (ofs = 0; ofs < sizeof(struct vtoc8); ofs += 2)
407 cksum ^= be16dec(buf + ofs);
411 res = G_PART_PROBE_PRI_NORM;
419 g_part_vtoc8_read(struct g_part_table *basetable, struct g_consumer *cp)
421 struct g_provider *pp;
422 struct g_part_vtoc8_table *table;
423 struct g_part_entry *entry;
426 uint64_t offset, size;
427 u_int cyls, heads, sectors;
428 int error, index, withtags;
432 buf = g_read_data(cp, 0, pp->sectorsize, &error);
436 table = (struct g_part_vtoc8_table *)basetable;
437 bcopy(buf, &table->vtoc, sizeof(table->vtoc));
440 msize = MIN(pp->mediasize / pp->sectorsize, UINT32_MAX);
441 sectors = be16dec(&table->vtoc.nsecs);
444 if (sectors != basetable->gpt_sectors && !basetable->gpt_fixgeom) {
445 g_part_geometry_heads(msize, sectors, &chs, &heads);
447 basetable->gpt_sectors = sectors;
448 basetable->gpt_heads = heads;
452 heads = be16dec(&table->vtoc.nheads);
455 if (heads != basetable->gpt_heads && !basetable->gpt_fixgeom)
456 basetable->gpt_heads = heads;
458 * Except for ATA disks > 32GB, Solaris uses the native geometry
459 * as reported by the target for the labels while da(4) typically
460 * uses a synthetic one so we don't complain too loudly if these
461 * geometries don't match.
463 if (bootverbose && (sectors != basetable->gpt_sectors ||
464 heads != basetable->gpt_heads))
465 printf("GEOM: %s: geometry does not match VTOC8 label "
466 "(label: %uh,%us GEOM: %uh,%us).\n", pp->name, heads,
467 sectors, basetable->gpt_heads, basetable->gpt_sectors);
469 table->secpercyl = heads * sectors;
470 cyls = be16dec(&table->vtoc.ncyls);
471 chs = cyls * table->secpercyl;
472 if (chs < 1 || chs > msize)
475 basetable->gpt_first = 0;
476 basetable->gpt_last = chs - 1;
477 basetable->gpt_isleaf = 1;
479 withtags = (be32dec(&table->vtoc.sanity) == VTOC_SANITY) ? 1 : 0;
481 printf("GEOM: %s: adding VTOC8 information.\n", pp->name);
482 be32enc(&table->vtoc.version, VTOC_VERSION);
483 bzero(&table->vtoc.volume, VTOC_VOLUME_LEN);
484 be16enc(&table->vtoc.nparts, VTOC8_NPARTS);
485 bzero(&table->vtoc.part, sizeof(table->vtoc.part));
486 be32enc(&table->vtoc.sanity, VTOC_SANITY);
489 basetable->gpt_entries = be16dec(&table->vtoc.nparts);
490 if (basetable->gpt_entries < g_part_vtoc8_scheme.gps_minent ||
491 basetable->gpt_entries > g_part_vtoc8_scheme.gps_maxent)
494 for (index = basetable->gpt_entries - 1; index >= 0; index--) {
495 offset = be32dec(&table->vtoc.map[index].cyl) *
497 size = be32dec(&table->vtoc.map[index].nblks);
501 tag = be16dec(&table->vtoc.part[index].tag);
503 tag = (index == VTOC_RAW_PART)
505 : VTOC_TAG_UNASSIGNED;
507 if (index == VTOC_RAW_PART && tag != VTOC_TAG_BACKUP)
509 if (index != VTOC_RAW_PART && tag == VTOC_TAG_BACKUP)
511 entry = g_part_new_entry(basetable, index + 1, offset,
513 if (tag == VTOC_TAG_BACKUP)
514 entry->gpe_internal = 1;
517 be16enc(&table->vtoc.part[index].tag, tag);
523 printf("GEOM: %s: invalid VTOC8 label.\n", pp->name);
528 g_part_vtoc8_type(struct g_part_table *basetable, struct g_part_entry *entry,
529 char *buf, size_t bufsz)
531 struct g_part_vtoc8_table *table;
534 table = (struct g_part_vtoc8_table *)basetable;
535 tag = be16dec(&table->vtoc.part[entry->gpe_index - 1].tag);
536 if (tag == VTOC_TAG_FREEBSD_NANDFS)
537 return (g_part_alias_name(G_PART_ALIAS_FREEBSD_NANDFS));
538 if (tag == VTOC_TAG_FREEBSD_SWAP)
539 return (g_part_alias_name(G_PART_ALIAS_FREEBSD_SWAP));
540 if (tag == VTOC_TAG_FREEBSD_UFS)
541 return (g_part_alias_name(G_PART_ALIAS_FREEBSD_UFS));
542 if (tag == VTOC_TAG_FREEBSD_VINUM)
543 return (g_part_alias_name(G_PART_ALIAS_FREEBSD_VINUM));
544 if (tag == VTOC_TAG_FREEBSD_ZFS)
545 return (g_part_alias_name(G_PART_ALIAS_FREEBSD_ZFS));
546 snprintf(buf, bufsz, "!%d", tag);
551 g_part_vtoc8_write(struct g_part_table *basetable, struct g_consumer *cp)
553 struct g_provider *pp;
554 struct g_part_entry *entry;
555 struct g_part_vtoc8_table *table;
558 int error, index, match, offset;
561 table = (struct g_part_vtoc8_table *)basetable;
562 entry = LIST_FIRST(&basetable->gpt_entry);
563 for (index = 0; index < basetable->gpt_entries; index++) {
564 match = (entry != NULL && index == entry->gpe_index - 1)
567 if (entry->gpe_deleted) {
568 be16enc(&table->vtoc.part[index].tag, 0);
569 be16enc(&table->vtoc.part[index].flag, 0);
570 be32enc(&table->vtoc.map[index].cyl, 0);
571 be32enc(&table->vtoc.map[index].nblks, 0);
573 entry = LIST_NEXT(entry, gpe_entry);
577 /* Calculate checksum. */
579 p = (void *)&table->vtoc;
580 for (offset = 0; offset < sizeof(table->vtoc) - 2; offset += 2)
581 sum ^= be16dec(p + offset);
582 be16enc(&table->vtoc.cksum, sum);
584 error = g_write_data(cp, 0, p, pp->sectorsize);