1/*-
2 * SPDX-License-Identifier: BSD-2-Clause-FreeBSD
3 *
4 * Copyright (c) 2007, 2008 Marcel Moolenaar
5 * All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 *
11 * 1. Redistributions of source code must retain the above copyright
12 *    notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 *    notice, this list of conditions and the following disclaimer in the
15 *    documentation and/or other materials provided with the distribution.
16 *
17 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
18 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27 */
28
29#include <sys/cdefs.h>
30__FBSDID("$FreeBSD$");
31
32#include <sys/param.h>
33#include <sys/bio.h>
34#include <sys/diskmbr.h>
35#include <sys/endian.h>
36#include <sys/kernel.h>
37#include <sys/kobj.h>
38#include <sys/limits.h>
39#include <sys/lock.h>
40#include <sys/malloc.h>
41#include <sys/mutex.h>
42#include <sys/queue.h>
43#include <sys/sbuf.h>
44#include <sys/systm.h>
45#include <sys/sysctl.h>
46#include <geom/geom.h>
47#include <geom/geom_int.h>
48#include <geom/part/g_part.h>
49
50#include "g_part_if.h"
51
52FEATURE(geom_part_mbr, "GEOM partitioning class for MBR support");
53
54SYSCTL_DECL(_kern_geom_part);
55static SYSCTL_NODE(_kern_geom_part, OID_AUTO, mbr,
56    CTLFLAG_RW | CTLFLAG_MPSAFE, 0,
57    "GEOM_PART_MBR Master Boot Record");
58
59static u_int enforce_chs = 0;
60SYSCTL_UINT(_kern_geom_part_mbr, OID_AUTO, enforce_chs,
61    CTLFLAG_RWTUN, &enforce_chs, 0, "Enforce alignment to CHS addressing");
62
63#define	MBRSIZE		512
64
65struct g_part_mbr_table {
66	struct g_part_table	base;
67	u_char		mbr[MBRSIZE];
68};
69
70struct g_part_mbr_entry {
71	struct g_part_entry	base;
72	struct dos_partition ent;
73};
74
75static int g_part_mbr_add(struct g_part_table *, struct g_part_entry *,
76    struct g_part_parms *);
77static int g_part_mbr_bootcode(struct g_part_table *, struct g_part_parms *);
78static int g_part_mbr_create(struct g_part_table *, struct g_part_parms *);
79static int g_part_mbr_destroy(struct g_part_table *, struct g_part_parms *);
80static void g_part_mbr_dumpconf(struct g_part_table *, struct g_part_entry *,
81    struct sbuf *, const char *);
82static int g_part_mbr_dumpto(struct g_part_table *, struct g_part_entry *);
83static int g_part_mbr_modify(struct g_part_table *, struct g_part_entry *,
84    struct g_part_parms *);
85static const char *g_part_mbr_name(struct g_part_table *, struct g_part_entry *,
86    char *, size_t);
87static int g_part_mbr_probe(struct g_part_table *, struct g_consumer *);
88static int g_part_mbr_read(struct g_part_table *, struct g_consumer *);
89static int g_part_mbr_setunset(struct g_part_table *, struct g_part_entry *,
90    const char *, unsigned int);
91static const char *g_part_mbr_type(struct g_part_table *, struct g_part_entry *,
92    char *, size_t);
93static int g_part_mbr_write(struct g_part_table *, struct g_consumer *);
94static int g_part_mbr_resize(struct g_part_table *, struct g_part_entry *,
95    struct g_part_parms *);
96
97static kobj_method_t g_part_mbr_methods[] = {
98	KOBJMETHOD(g_part_add,		g_part_mbr_add),
99	KOBJMETHOD(g_part_bootcode,	g_part_mbr_bootcode),
100	KOBJMETHOD(g_part_create,	g_part_mbr_create),
101	KOBJMETHOD(g_part_destroy,	g_part_mbr_destroy),
102	KOBJMETHOD(g_part_dumpconf,	g_part_mbr_dumpconf),
103	KOBJMETHOD(g_part_dumpto,	g_part_mbr_dumpto),
104	KOBJMETHOD(g_part_modify,	g_part_mbr_modify),
105	KOBJMETHOD(g_part_resize,	g_part_mbr_resize),
106	KOBJMETHOD(g_part_name,		g_part_mbr_name),
107	KOBJMETHOD(g_part_probe,	g_part_mbr_probe),
108	KOBJMETHOD(g_part_read,		g_part_mbr_read),
109	KOBJMETHOD(g_part_setunset,	g_part_mbr_setunset),
110	KOBJMETHOD(g_part_type,		g_part_mbr_type),
111	KOBJMETHOD(g_part_write,	g_part_mbr_write),
112	{ 0, 0 }
113};
114
115static struct g_part_scheme g_part_mbr_scheme = {
116	"MBR",
117	g_part_mbr_methods,
118	sizeof(struct g_part_mbr_table),
119	.gps_entrysz = sizeof(struct g_part_mbr_entry),
120	.gps_minent = NDOSPART,
121	.gps_maxent = NDOSPART,
122	.gps_bootcodesz = MBRSIZE,
123};
124G_PART_SCHEME_DECLARE(g_part_mbr);
125MODULE_VERSION(geom_part_mbr, 0);
126
127static struct g_part_mbr_alias {
128	u_char		typ;
129	int		alias;
130} mbr_alias_match[] = {
131	{ DOSPTYP_386BSD,	G_PART_ALIAS_FREEBSD },
132	{ DOSPTYP_APPLE_BOOT,	G_PART_ALIAS_APPLE_BOOT },
133	{ DOSPTYP_APPLE_UFS,	G_PART_ALIAS_APPLE_UFS },
134	{ DOSPTYP_EFI,		G_PART_ALIAS_EFI },
135	{ DOSPTYP_EXT,		G_PART_ALIAS_EBR },
136	{ DOSPTYP_EXTLBA,	G_PART_ALIAS_EBR },
137	{ DOSPTYP_FAT16,	G_PART_ALIAS_MS_FAT16 },
138	{ DOSPTYP_FAT32,	G_PART_ALIAS_MS_FAT32 },
139	{ DOSPTYP_FAT32LBA,	G_PART_ALIAS_MS_FAT32LBA },
140	{ DOSPTYP_HFS,		G_PART_ALIAS_APPLE_HFS },
141	{ DOSPTYP_LDM,		G_PART_ALIAS_MS_LDM_DATA },
142	{ DOSPTYP_LINLVM,	G_PART_ALIAS_LINUX_LVM },
143	{ DOSPTYP_LINRAID,	G_PART_ALIAS_LINUX_RAID },
144	{ DOSPTYP_LINSWP,	G_PART_ALIAS_LINUX_SWAP },
145	{ DOSPTYP_LINUX,	G_PART_ALIAS_LINUX_DATA },
146	{ DOSPTYP_NTFS,		G_PART_ALIAS_MS_NTFS },
147	{ DOSPTYP_PPCBOOT,	G_PART_ALIAS_PREP_BOOT },
148	{ DOSPTYP_VMFS,		G_PART_ALIAS_VMFS },
149	{ DOSPTYP_VMKDIAG,	G_PART_ALIAS_VMKDIAG },
150};
151
152static int
153mbr_parse_type(const char *type, u_char *dp_typ)
154{
155	const char *alias;
156	char *endp;
157	long lt;
158	int i;
159
160	if (type[0] == '!') {
161		lt = strtol(type + 1, &endp, 0);
162		if (type[1] == '\0' || *endp != '\0' || lt <= 0 || lt >= 256)
163			return (EINVAL);
164		*dp_typ = (u_char)lt;
165		return (0);
166	}
167	for (i = 0; i < nitems(mbr_alias_match); i++) {
168		alias = g_part_alias_name(mbr_alias_match[i].alias);
169		if (strcasecmp(type, alias) == 0) {
170			*dp_typ = mbr_alias_match[i].typ;
171			return (0);
172		}
173	}
174	return (EINVAL);
175}
176
177static int
178mbr_probe_bpb(u_char *bpb)
179{
180	uint16_t secsz;
181	uint8_t clstsz;
182
183#define PO2(x)	((x & (x - 1)) == 0)
184	secsz = le16dec(bpb);
185	if (secsz < 512 || secsz > 4096 || !PO2(secsz))
186		return (0);
187	clstsz = bpb[2];
188	if (clstsz < 1 || clstsz > 128 || !PO2(clstsz))
189		return (0);
190#undef PO2
191
192	return (1);
193}
194
195static void
196mbr_set_chs(struct g_part_table *table, uint32_t lba, u_char *cylp, u_char *hdp,
197    u_char *secp)
198{
199	uint32_t cyl, hd, sec;
200
201	sec = lba % table->gpt_sectors + 1;
202	lba /= table->gpt_sectors;
203	hd = lba % table->gpt_heads;
204	lba /= table->gpt_heads;
205	cyl = lba;
206	if (cyl > 1023)
207		sec = hd = cyl = ~0;
208
209	*cylp = cyl & 0xff;
210	*hdp = hd & 0xff;
211	*secp = (sec & 0x3f) | ((cyl >> 2) & 0xc0);
212}
213
214static int
215mbr_align(struct g_part_table *basetable, uint32_t *start, uint32_t *size)
216{
217	uint32_t sectors;
218
219	if (enforce_chs == 0)
220		return (0);
221	sectors = basetable->gpt_sectors;
222	if (*size < sectors)
223		return (EINVAL);
224	if (start != NULL && (*start % sectors)) {
225		*size += (*start % sectors) - sectors;
226		*start -= (*start % sectors) - sectors;
227	}
228	if (*size % sectors)
229		*size -= (*size % sectors);
230	if (*size < sectors)
231		return (EINVAL);
232	return (0);
233}
234
235static int
236g_part_mbr_add(struct g_part_table *basetable, struct g_part_entry *baseentry,
237    struct g_part_parms *gpp)
238{
239	struct g_part_mbr_entry *entry;
240	uint32_t start, size;
241
242	if (gpp->gpp_parms & G_PART_PARM_LABEL)
243		return (EINVAL);
244
245	entry = (struct g_part_mbr_entry *)baseentry;
246	start = gpp->gpp_start;
247	size = gpp->gpp_size;
248	if (mbr_align(basetable, &start, &size) != 0)
249		return (EINVAL);
250	if (baseentry->gpe_deleted)
251		bzero(&entry->ent, sizeof(entry->ent));
252
253	KASSERT(baseentry->gpe_start <= start, ("%s", __func__));
254	KASSERT(baseentry->gpe_end >= start + size - 1, ("%s", __func__));
255	baseentry->gpe_start = start;
256	baseentry->gpe_end = start + size - 1;
257	entry->ent.dp_start = start;
258	entry->ent.dp_size = size;
259	mbr_set_chs(basetable, baseentry->gpe_start, &entry->ent.dp_scyl,
260	    &entry->ent.dp_shd, &entry->ent.dp_ssect);
261	mbr_set_chs(basetable, baseentry->gpe_end, &entry->ent.dp_ecyl,
262	    &entry->ent.dp_ehd, &entry->ent.dp_esect);
263	return (mbr_parse_type(gpp->gpp_type, &entry->ent.dp_typ));
264}
265
266static int
267g_part_mbr_bootcode(struct g_part_table *basetable, struct g_part_parms *gpp)
268{
269	struct g_part_mbr_table *table;
270	uint32_t dsn;
271
272	if (gpp->gpp_codesize != MBRSIZE)
273		return (ENODEV);
274
275	table = (struct g_part_mbr_table *)basetable;
276	dsn = *(uint32_t *)(table->mbr + DOSDSNOFF);
277	bcopy(gpp->gpp_codeptr, table->mbr, DOSPARTOFF);
278	if (dsn != 0 && !gpp->gpp_skip_dsn)
279		*(uint32_t *)(table->mbr + DOSDSNOFF) = dsn;
280	return (0);
281}
282
283static int
284g_part_mbr_create(struct g_part_table *basetable, struct g_part_parms *gpp)
285{
286	struct g_provider *pp;
287	struct g_part_mbr_table *table;
288
289	pp = gpp->gpp_provider;
290	if (pp->sectorsize < MBRSIZE)
291		return (ENOSPC);
292
293	basetable->gpt_first = basetable->gpt_sectors;
294	basetable->gpt_last = MIN(pp->mediasize / pp->sectorsize,
295	    UINT32_MAX) - 1;
296
297	table = (struct g_part_mbr_table *)basetable;
298	le16enc(table->mbr + DOSMAGICOFFSET, DOSMAGIC);
299	return (0);
300}
301
302static int
303g_part_mbr_destroy(struct g_part_table *basetable, struct g_part_parms *gpp)
304{
305
306	/* Wipe the first sector to clear the partitioning. */
307	basetable->gpt_smhead |= 1;
308	return (0);
309}
310
311static void
312g_part_mbr_dumpconf(struct g_part_table *basetable, struct g_part_entry *baseentry,
313    struct sbuf *sb, const char *indent)
314{
315	struct g_part_mbr_entry *entry;
316	struct g_part_mbr_table *table;
317	uint32_t dsn;
318
319	table = (struct g_part_mbr_table *)basetable;
320	entry = (struct g_part_mbr_entry *)baseentry;
321	if (indent == NULL) {
322		/* conftxt: libdisk compatibility */
323		sbuf_printf(sb, " xs MBR xt %u", entry->ent.dp_typ);
324	} else if (entry != NULL) {
325		/* confxml: partition entry information */
326		sbuf_printf(sb, "%s<rawtype>%u</rawtype>\n", indent,
327		    entry->ent.dp_typ);
328		if (entry->ent.dp_flag & 0x80)
329			sbuf_printf(sb, "%s<attrib>active</attrib>\n", indent);
330		dsn = le32dec(table->mbr + DOSDSNOFF);
331		sbuf_printf(sb, "%s<efimedia>HD(%d,MBR,%#08x,%#jx,%#jx)", indent,
332		    entry->base.gpe_index, dsn, (intmax_t)entry->base.gpe_start,
333		    (intmax_t)(entry->base.gpe_end - entry->base.gpe_start + 1));
334		sbuf_cat(sb, "</efimedia>\n");
335	} else {
336		/* confxml: scheme information */
337	}
338}
339
340static int
341g_part_mbr_dumpto(struct g_part_table *table, struct g_part_entry *baseentry)
342{
343	struct g_part_mbr_entry *entry;
344
345	/* Allow dumping to a FreeBSD partition or Linux swap partition only. */
346	entry = (struct g_part_mbr_entry *)baseentry;
347	return ((entry->ent.dp_typ == DOSPTYP_386BSD ||
348	    entry->ent.dp_typ == DOSPTYP_LINSWP) ? 1 : 0);
349}
350
351static int
352g_part_mbr_modify(struct g_part_table *basetable,
353    struct g_part_entry *baseentry, struct g_part_parms *gpp)
354{
355	struct g_part_mbr_entry *entry;
356
357	if (gpp->gpp_parms & G_PART_PARM_LABEL)
358		return (EINVAL);
359
360	entry = (struct g_part_mbr_entry *)baseentry;
361	if (gpp->gpp_parms & G_PART_PARM_TYPE)
362		return (mbr_parse_type(gpp->gpp_type, &entry->ent.dp_typ));
363	return (0);
364}
365
366static int
367g_part_mbr_resize(struct g_part_table *basetable,
368    struct g_part_entry *baseentry, struct g_part_parms *gpp)
369{
370	struct g_part_mbr_entry *entry;
371	struct g_provider *pp;
372	uint32_t size;
373
374	if (baseentry == NULL) {
375		pp = LIST_FIRST(&basetable->gpt_gp->consumer)->provider;
376		basetable->gpt_last = MIN(pp->mediasize / pp->sectorsize,
377		    UINT32_MAX) - 1;
378		return (0);
379	}
380	size = gpp->gpp_size;
381	if (mbr_align(basetable, NULL, &size) != 0)
382		return (EINVAL);
383	/* XXX: prevent unexpected shrinking. */
384	pp = baseentry->gpe_pp;
385	if ((g_debugflags & G_F_FOOTSHOOTING) == 0 && size < gpp->gpp_size &&
386	    pp->mediasize / pp->sectorsize > size)
387		return (EBUSY);
388	entry = (struct g_part_mbr_entry *)baseentry;
389	baseentry->gpe_end = baseentry->gpe_start + size - 1;
390	entry->ent.dp_size = size;
391	mbr_set_chs(basetable, baseentry->gpe_end, &entry->ent.dp_ecyl,
392	    &entry->ent.dp_ehd, &entry->ent.dp_esect);
393	return (0);
394}
395
396static const char *
397g_part_mbr_name(struct g_part_table *table, struct g_part_entry *baseentry,
398    char *buf, size_t bufsz)
399{
400
401	snprintf(buf, bufsz, "s%d", baseentry->gpe_index);
402	return (buf);
403}
404
405static int
406g_part_mbr_probe(struct g_part_table *table, struct g_consumer *cp)
407{
408	char psn[8];
409	struct g_provider *pp;
410	u_char *buf, *p;
411	int error, index, res, sum;
412	uint16_t magic;
413
414	pp = cp->provider;
415
416	/* Sanity-check the provider. */
417	if (pp->sectorsize < MBRSIZE || pp->mediasize < pp->sectorsize)
418		return (ENOSPC);
419	if (pp->sectorsize > 4096)
420		return (ENXIO);
421
422	/* We don't nest under an MBR (see EBR instead). */
423	error = g_getattr("PART::scheme", cp, &psn);
424	if (error == 0 && strcmp(psn, g_part_mbr_scheme.name) == 0)
425		return (ELOOP);
426
427	/* Check that there's a MBR. */
428	buf = g_read_data(cp, 0L, pp->sectorsize, &error);
429	if (buf == NULL)
430		return (error);
431
432	/* We goto out on mismatch. */
433	res = ENXIO;
434
435	magic = le16dec(buf + DOSMAGICOFFSET);
436	if (magic != DOSMAGIC)
437		goto out;
438
439	for (index = 0; index < NDOSPART; index++) {
440		p = buf + DOSPARTOFF + index * DOSPARTSIZE;
441		if (p[0] != 0 && p[0] != 0x80)
442			goto out;
443	}
444
445	/*
446	 * If the partition table does not consist of all zeroes,
447	 * assume we have a MBR. If it's all zeroes, we could have
448	 * a boot sector. For example, a boot sector that doesn't
449	 * have boot code -- common on non-i386 hardware. In that
450	 * case we check if we have a possible BPB. If so, then we
451	 * assume we have a boot sector instead.
452	 */
453	sum = 0;
454	for (index = 0; index < NDOSPART * DOSPARTSIZE; index++)
455		sum += buf[DOSPARTOFF + index];
456	if (sum != 0 || !mbr_probe_bpb(buf + 0x0b))
457		res = G_PART_PROBE_PRI_NORM;
458
459 out:
460	g_free(buf);
461	return (res);
462}
463
464static int
465g_part_mbr_read(struct g_part_table *basetable, struct g_consumer *cp)
466{
467	struct dos_partition ent;
468	struct g_provider *pp;
469	struct g_part_mbr_table *table;
470	struct g_part_mbr_entry *entry;
471	u_char *buf, *p;
472	off_t chs, msize, first;
473	u_int sectors, heads;
474	int error, index;
475
476	pp = cp->provider;
477	table = (struct g_part_mbr_table *)basetable;
478	first = basetable->gpt_sectors;
479	msize = MIN(pp->mediasize / pp->sectorsize, UINT32_MAX);
480
481	buf = g_read_data(cp, 0L, pp->sectorsize, &error);
482	if (buf == NULL)
483		return (error);
484
485	bcopy(buf, table->mbr, sizeof(table->mbr));
486	for (index = NDOSPART - 1; index >= 0; index--) {
487		p = buf + DOSPARTOFF + index * DOSPARTSIZE;
488		ent.dp_flag = p[0];
489		ent.dp_shd = p[1];
490		ent.dp_ssect = p[2];
491		ent.dp_scyl = p[3];
492		ent.dp_typ = p[4];
493		ent.dp_ehd = p[5];
494		ent.dp_esect = p[6];
495		ent.dp_ecyl = p[7];
496		ent.dp_start = le32dec(p + 8);
497		ent.dp_size = le32dec(p + 12);
498		if (ent.dp_typ == 0 || ent.dp_typ == DOSPTYP_PMBR)
499			continue;
500		if (ent.dp_start == 0 || ent.dp_size == 0)
501			continue;
502		sectors = ent.dp_esect & 0x3f;
503		if (sectors > basetable->gpt_sectors &&
504		    !basetable->gpt_fixgeom) {
505			g_part_geometry_heads(msize, sectors, &chs, &heads);
506			if (chs != 0) {
507				basetable->gpt_sectors = sectors;
508				basetable->gpt_heads = heads;
509			}
510		}
511		if (ent.dp_start < first)
512			first = ent.dp_start;
513		entry = (struct g_part_mbr_entry *)g_part_new_entry(basetable,
514		    index + 1, ent.dp_start, ent.dp_start + ent.dp_size - 1);
515		entry->ent = ent;
516	}
517
518	basetable->gpt_entries = NDOSPART;
519	basetable->gpt_first = basetable->gpt_sectors;
520	basetable->gpt_last = msize - 1;
521
522	if (first < basetable->gpt_first)
523		basetable->gpt_first = 1;
524
525	g_free(buf);
526	return (0);
527}
528
529static int
530g_part_mbr_setunset(struct g_part_table *table, struct g_part_entry *baseentry,
531    const char *attrib, unsigned int set)
532{
533	struct g_part_entry *iter;
534	struct g_part_mbr_entry *entry;
535	int changed;
536
537	if (baseentry == NULL)
538		return (ENODEV);
539	if (strcasecmp(attrib, "active") != 0)
540		return (EINVAL);
541
542	/* Only one entry can have the active attribute. */
543	LIST_FOREACH(iter, &table->gpt_entry, gpe_entry) {
544		if (iter->gpe_deleted)
545			continue;
546		changed = 0;
547		entry = (struct g_part_mbr_entry *)iter;
548		if (iter == baseentry) {
549			if (set && (entry->ent.dp_flag & 0x80) == 0) {
550				entry->ent.dp_flag |= 0x80;
551				changed = 1;
552			} else if (!set && (entry->ent.dp_flag & 0x80)) {
553				entry->ent.dp_flag &= ~0x80;
554				changed = 1;
555			}
556		} else {
557			if (set && (entry->ent.dp_flag & 0x80)) {
558				entry->ent.dp_flag &= ~0x80;
559				changed = 1;
560			}
561		}
562		if (changed && !iter->gpe_created)
563			iter->gpe_modified = 1;
564	}
565	return (0);
566}
567
568static const char *
569g_part_mbr_type(struct g_part_table *basetable, struct g_part_entry *baseentry,
570    char *buf, size_t bufsz)
571{
572	struct g_part_mbr_entry *entry;
573	int i;
574
575	entry = (struct g_part_mbr_entry *)baseentry;
576	for (i = 0; i < nitems(mbr_alias_match); i++) {
577		if (mbr_alias_match[i].typ == entry->ent.dp_typ)
578			return (g_part_alias_name(mbr_alias_match[i].alias));
579	}
580	snprintf(buf, bufsz, "!%d", entry->ent.dp_typ);
581	return (buf);
582}
583
584static int
585g_part_mbr_write(struct g_part_table *basetable, struct g_consumer *cp)
586{
587	struct g_part_entry *baseentry;
588	struct g_part_mbr_entry *entry;
589	struct g_part_mbr_table *table;
590	u_char *p;
591	int error, index;
592
593	table = (struct g_part_mbr_table *)basetable;
594	baseentry = LIST_FIRST(&basetable->gpt_entry);
595	for (index = 1; index <= basetable->gpt_entries; index++) {
596		p = table->mbr + DOSPARTOFF + (index - 1) * DOSPARTSIZE;
597		entry = (baseentry != NULL && index == baseentry->gpe_index)
598		    ? (struct g_part_mbr_entry *)baseentry : NULL;
599		if (entry != NULL && !baseentry->gpe_deleted) {
600			p[0] = entry->ent.dp_flag;
601			p[1] = entry->ent.dp_shd;
602			p[2] = entry->ent.dp_ssect;
603			p[3] = entry->ent.dp_scyl;
604			p[4] = entry->ent.dp_typ;
605			p[5] = entry->ent.dp_ehd;
606			p[6] = entry->ent.dp_esect;
607			p[7] = entry->ent.dp_ecyl;
608			le32enc(p + 8, entry->ent.dp_start);
609			le32enc(p + 12, entry->ent.dp_size);
610		} else
611			bzero(p, DOSPARTSIZE);
612
613		if (entry != NULL)
614			baseentry = LIST_NEXT(baseentry, gpe_entry);
615	}
616
617	error = g_write_data(cp, 0, table->mbr, cp->provider->sectorsize);
618	return (error);
619}
620