xref: /openbsd/sbin/fdisk/part.c (revision dda28197)
1 /*	$OpenBSD: part.c,v 1.77 2017/03/26 00:22:49 sobrado Exp $	*/
2 
3 /*
4  * Copyright (c) 1997 Tobias Weingartner
5  *
6  * Permission to use, copy, modify, and distribute this software for any
7  * purpose with or without fee is hereby granted, provided that the above
8  * copyright notice and this permission notice appear in all copies.
9  *
10  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
11  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
12  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
13  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
14  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
15  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
16  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
17  */
18 
19 #include <sys/types.h>
20 #include <sys/disklabel.h>
21 
22 #include <err.h>
23 #include <stdio.h>
24 #include <stdlib.h>
25 #include <string.h>
26 #include <uuid.h>
27 
28 #include "disk.h"
29 #include "misc.h"
30 #include "part.h"
31 
32 int	PRT_check_chs(struct prt *partn);
33 
34 static const struct part_type {
35 	int	type;
36 	char	sname[14];
37 	char	guid[37];
38 } part_types[] = {
39 	{ 0x00, "unused      ", "00000000-0000-0000-0000-000000000000" },
40 	{ 0x01, "FAT12       ", "ebd0a0a2-b9e5-4433-87c0-68b6b72699c7" },
41 	{ 0x02, "XENIX /     "},   /* XENIX / filesystem */
42 	{ 0x03, "XENIX /usr  "},   /* XENIX /usr filesystem */
43 	{ 0x04, "FAT16S      ", "ebd0a0a2-b9e5-4433-87c0-68b6b72699c7" },
44 	{ 0x05, "Extended DOS"},   /* Extended DOS */
45 	{ 0x06, "FAT16B      ", "ebd0a0a2-b9e5-4433-87c0-68b6b72699c7" },
46 	{ 0x07, "NTFS        ", "ebd0a0a2-b9e5-4433-87c0-68b6b72699c7" },
47 	{ 0x08, "AIX fs      "},   /* AIX filesystem */
48 	{ 0x09, "AIX/Coherent"},   /* AIX boot partition or Coherent */
49 	{ 0x0A, "OS/2 Bootmgr"},   /* OS/2 Boot Manager or OPUS */
50 	{ 0x0B, "FAT32       ", "ebd0a0a2-b9e5-4433-87c0-68b6b72699c7" },
51 	{ 0x0C, "FAT32L      ", "ebd0a0a2-b9e5-4433-87c0-68b6b72699c7" },
52 	{ 0x0E, "FAT16L      ", "ebd0a0a2-b9e5-4433-87c0-68b6b72699c7" },
53 	{ 0x0F, "Extended LBA"},   /* Extended DOS LBA-mapped */
54 	{ 0x10, "OPUS        "},   /* OPUS */
55 	{ 0x11, "OS/2 hidden ", "ebd0a0a2-b9e5-4433-87c0-68b6b72699c7" },
56 	{ 0x12, "Compaq Diag."},   /* Compaq Diagnostics */
57 	{ 0x14, "OS/2 hidden ", "ebd0a0a2-b9e5-4433-87c0-68b6b72699c7" },
58 	{ 0x16, "OS/2 hidden ", "ebd0a0a2-b9e5-4433-87c0-68b6b72699c7" },
59 	{ 0x17, "OS/2 hidden ", "ebd0a0a2-b9e5-4433-87c0-68b6b72699c7" },
60 	{ 0x18, "AST swap    "},   /* AST Windows swapfile */
61 	{ 0x19, "Willowtech  "},   /* Willowtech Photon coS */
62 	{ 0x1C, "ThinkPad Rec", "ebd0a0a2-b9e5-4433-87c0-68b6b72699c7" },
63 	{ 0x24, "NEC DOS     "},   /* NEC DOS */
64 	{ 0x27, "Win Recovery", "de94bba4-06d1-4d40-a16a-bfd50179d6ac" },
65 	{ 0x20, "Willowsoft  "},   /* Willowsoft OFS1 */
66 	{ 0x38, "Theos       "},   /* Theos */
67 	{ 0x39, "Plan 9      "},   /* Plan 9 */
68 	{ 0x40, "VENIX 286   "},   /* VENIX 286 or LynxOS */
69 	{ 0x41, "Lin/Minux DR"},   /* Linux/MINIX (sharing disk with DRDOS) or Personal RISC boot */
70 	{ 0x42, "LinuxSwap DR", "af9b60a0-1431-4f62-bc68-3311714a69ad" },
71 	{ 0x43, "Linux DR    "},   /* Linux native (sharing disk with DRDOS) */
72 	{ 0x4D, "QNX 4.2 Pri "},   /* QNX 4.2 Primary */
73 	{ 0x4E, "QNX 4.2 Sec "},   /* QNX 4.2 Secondary */
74 	{ 0x4F, "QNX 4.2 Ter "},   /* QNX 4.2 Tertiary */
75 	{ 0x50, "DM          "},   /* DM (disk manager) */
76 	{ 0x51, "DM          "},   /* DM6 Aux1 (or Novell) */
77 	{ 0x52, "CP/M or SysV"},   /* CP/M or Microport SysV/AT */
78 	{ 0x53, "DM          "},   /* DM6 Aux3 */
79 	{ 0x54, "Ontrack     "},   /* Ontrack */
80 	{ 0x55, "EZ-Drive    "},   /* EZ-Drive (disk manager) */
81 	{ 0x56, "Golden Bow  "},   /* Golden Bow (disk manager) */
82 	{ 0x5C, "Priam       "},   /* Priam Edisk (disk manager) */
83 	{ 0x61, "SpeedStor   "},   /* SpeedStor */
84 	{ 0x63, "ISC, HURD, *"},   /* ISC, System V/386, GNU HURD or Mach */
85 	{ 0x64, "NetWare 2.xx"},   /* Novell NetWare 2.xx */
86 	{ 0x65, "NetWare 3.xx"},   /* Novell NetWare 3.xx */
87 	{ 0x66, "NetWare 386 "},   /* Novell 386 NetWare */
88 	{ 0x67, "Novell      "},   /* Novell */
89 	{ 0x68, "Novell      "},   /* Novell */
90 	{ 0x69, "Novell      "},   /* Novell */
91 	{ 0x70, "DiskSecure  "},   /* DiskSecure Multi-Boot */
92 	{ 0x75, "PCIX        "},   /* PCIX */
93 	{ 0x7f, "ChromeKernel", "fe3a2a5d-4f32-41a7-b725-accc3285a309" },
94 	{ 0x80, "Minix (old) "},   /* Minix 1.1 ... 1.4a */
95 	{ 0x81, "Minix (new) "},   /* Minix 1.4b ... 1.5.10 */
96 	{ 0x82, "Linux swap  ", "0657fd6d-a4ab-43c4-84e5-0933c84b4f4f" },
97 	{ 0x83, "Linux files*", "0fc63daf-8483-4772-8e79-3d69d8477de4" },
98 	{ 0x84, "OS/2 hidden "},   /* OS/2 hidden C: drive */
99 	{ 0x85, "Linux ext.  "},   /* Linux extended */
100 	{ 0x86, "NT FAT VS   "},   /* NT FAT volume set */
101 	{ 0x87, "NTFS VS     "},   /* NTFS volume set or HPFS mirrored */
102 	{ 0x8E, "Linux LVM   ", "e6d6d379-f507-44c2-a23c-238f2a3df928" },
103 	{ 0x93, "Amoeba FS   "},   /* Amoeba filesystem */
104 	{ 0x94, "Amoeba BBT  "},   /* Amoeba bad block table */
105 	{ 0x99, "Mylex       "},   /* Mylex EISA SCSI */
106 	{ 0x9F, "BSDI        "},   /* BSDI BSD/OS */
107 	{ 0xA0, "NotebookSave"},   /* Phoenix NoteBIOS save-to-disk */
108 	{ 0xA5, "FreeBSD     ", "516e7cb4-6ecf-11d6-8ff8-00022d09712b" },
109 	{ 0xA6, "OpenBSD     ", "824cc7a0-36a8-11e3-890a-952519ad3f61" },
110 	{ 0xA7, "NEXTSTEP    "},   /* NEXTSTEP */
111 	{ 0xA8, "MacOS X     ", "55465300-0000-11aa-aa11-00306543ecac" },
112 	{ 0xA9, "NetBSD      ", "516e7cb4-6ecf-11d6-8ff8-00022d09712b" },
113 	{ 0xAB, "MacOS X boot", "426f6f74-0000-11aa-aa11-00306543ecac" },
114 	{ 0xAF, "MacOS X HFS+", "48465300-0000-11aa-aa11-00306543ecac" },
115 	{ 0xB7, "BSDI filesy*"},   /* BSDI BSD/386 filesystem */
116 	{ 0xB8, "BSDI swap   "},   /* BSDI BSD/386 swap */
117 	{ 0xBF, "Solaris     ", "6a85cf4d-1dd2-11b2-99a6-080020736631" },
118 	{ 0xC0, "CTOS        "},   /* CTOS */
119 	{ 0xC1, "DRDOSs FAT12"},   /* DRDOS/sec (FAT-12) */
120 	{ 0xC4, "DRDOSs < 32M"},   /* DRDOS/sec (FAT-16, < 32M) */
121 	{ 0xC6, "DRDOSs >=32M"},   /* DRDOS/sec (FAT-16, >= 32M) */
122 	{ 0xC7, "HPFS Disbled"},   /* Syrinx (Cyrnix?) or HPFS disabled */
123 	{ 0xDB, "CPM/C.DOS/C*"},   /* Concurrent CPM or C.DOS or CTOS */
124 	{ 0xDE, "Dell Maint  "},   /* Dell maintenance partition */
125 	{ 0xE1, "SpeedStor   "},   /* DOS access or SpeedStor 12-bit FAT extended partition */
126 	{ 0xE3, "SpeedStor   "},   /* DOS R/O or SpeedStor or Storage Dimensions */
127 	{ 0xE4, "SpeedStor   "},   /* SpeedStor 16-bit FAT extended partition < 1024 cyl. */
128 	{ 0xEB, "BeOS/i386   ", "42465331-3ba3-10f1-802a-4861696b7521" },
129 	{ 0xEE, "EFI GPT     "},   /* EFI Protective Partition */
130 	{ 0xEF, "EFI Sys     ", "c12a7328-f81f-11d2-ba4b-00a0c93ec93b" },
131 	{ 0xF1, "SpeedStor   "},   /* SpeedStor or Storage Dimensions */
132 	{ 0xF2, "DOS 3.3+ Sec"},   /* DOS 3.3+ Secondary */
133 	{ 0xF4, "SpeedStor   "},   /* SpeedStor >1024 cyl. or LANstep or IBM PS/2 IML */
134 	{ 0xFF, "Xenix BBT   "},   /* Xenix Bad Block Table */
135 };
136 
137 void
138 PRT_printall(void)
139 {
140 	int i, idrows;
141 
142 	idrows = ((sizeof(part_types)/sizeof(struct part_type))+3)/4;
143 
144 	printf("Choose from the following Partition id values:\n");
145 	for (i = 0; i < idrows; i++) {
146 		printf("%02X %s   %02X %s   %02X %s",
147 		    part_types[i].type, part_types[i].sname,
148 		    part_types[i+idrows].type, part_types[i+idrows].sname,
149 		    part_types[i+idrows*2].type, part_types[i+idrows*2].sname);
150 		if ((i+idrows*3) < (sizeof(part_types)/sizeof(struct part_type))) {
151 			printf("   %02X %s\n",
152 			    part_types[i+idrows*3].type,
153 			    part_types[i+idrows*3].sname);
154 		} else
155 			printf( "\n" );
156 	}
157 }
158 
159 const char *
160 PRT_ascii_id(int id)
161 {
162 	static char unknown[] = "<Unknown ID>";
163 	int i;
164 
165 	for (i = 0; i < sizeof(part_types)/sizeof(struct part_type); i++) {
166 		if (part_types[i].type == id)
167 			return (part_types[i].sname);
168 	}
169 
170 	return (unknown);
171 }
172 
173 void
174 PRT_parse(struct dos_partition *prt, off_t offset, off_t reloff,
175     struct prt *partn)
176 {
177 	off_t off;
178 	u_int32_t t;
179 
180 	partn->flag = prt->dp_flag;
181 	partn->shead = prt->dp_shd;
182 
183 	partn->ssect = (prt->dp_ssect) & 0x3F;
184 	partn->scyl = ((prt->dp_ssect << 2) & 0xFF00) | prt->dp_scyl;
185 
186 	partn->id = prt->dp_typ;
187 	partn->ehead = prt->dp_ehd;
188 	partn->esect = (prt->dp_esect) & 0x3F;
189 	partn->ecyl = ((prt->dp_esect << 2) & 0xFF00) | prt->dp_ecyl;
190 
191 	if ((partn->id == DOSPTYP_EXTEND) || (partn->id == DOSPTYP_EXTENDL))
192 		off = reloff;
193 	else
194 		off = offset;
195 
196 #if 0 /* XXX */
197 	partn->bs = letoh32(prt->dp_start) + off;
198 	partn->ns = letoh32(prt->dp_size);
199 #else
200 	memcpy(&t, &prt->dp_start, sizeof(u_int32_t));
201 	partn->bs = letoh32(t) + off;
202 	memcpy(&t, &prt->dp_size, sizeof(u_int32_t));
203 	partn->ns = letoh32(t);
204 #endif
205 
206 	PRT_fix_CHS(partn);
207 }
208 
209 int
210 PRT_check_chs(struct prt *partn)
211 {
212 	if ( (partn->shead > 255) ||
213 		(partn->ssect >63) ||
214 		(partn->scyl > 1023) ||
215 		(partn->ehead >255) ||
216 		(partn->esect >63) ||
217 		(partn->ecyl > 1023) )
218 	{
219 		return (0);
220 	}
221 	return (1);
222 }
223 
224 void
225 PRT_make(struct prt *partn, off_t offset, off_t reloff,
226     struct dos_partition *prt)
227 {
228 	off_t off;
229 	u_int32_t ecsave, scsave;
230 	u_int64_t t;
231 
232 	/* Save (and restore below) cylinder info we may fiddle with. */
233 	scsave = partn->scyl;
234 	ecsave = partn->ecyl;
235 
236 	if ((partn->scyl > 1023) || (partn->ecyl > 1023)) {
237 		partn->scyl = (partn->scyl > 1023)? 1023: partn->scyl;
238 		partn->ecyl = (partn->ecyl > 1023)? 1023: partn->ecyl;
239 	}
240 	if ((partn->id == DOSPTYP_EXTEND) || (partn->id == DOSPTYP_EXTENDL))
241 		off = reloff;
242 	else
243 		off = offset;
244 
245 	if (PRT_check_chs(partn)) {
246 		prt->dp_shd = partn->shead & 0xFF;
247 		prt->dp_ssect = (partn->ssect & 0x3F) |
248 		    ((partn->scyl & 0x300) >> 2);
249 		prt->dp_scyl = partn->scyl & 0xFF;
250 		prt->dp_ehd = partn->ehead & 0xFF;
251 		prt->dp_esect = (partn->esect & 0x3F) |
252 		    ((partn->ecyl & 0x300) >> 2);
253 		prt->dp_ecyl = partn->ecyl & 0xFF;
254 	} else {
255 		memset(prt, 0xFF, sizeof(*prt));
256 	}
257 
258 	prt->dp_flag = partn->flag & 0xFF;
259 	prt->dp_typ = partn->id & 0xFF;
260 
261 	t = htole64(partn->bs - off);
262 	memcpy(&prt->dp_start, &t, sizeof(u_int32_t));
263 	t = htole64(partn->ns);
264 	memcpy(&prt->dp_size, &t, sizeof(u_int32_t));
265 
266 	partn->scyl = scsave;
267 	partn->ecyl = ecsave;
268 }
269 
270 void
271 PRT_print(int num, struct prt *partn, char *units)
272 {
273 	const int secsize = unit_types[SECTORS].conversion;
274 	double size;
275 	int i;
276 
277 	i = unit_lookup(units);
278 
279 	if (partn == NULL) {
280 		printf("            Starting         Ending    "
281 		    "     LBA Info:\n");
282 		printf(" #: id      C   H   S -      C   H   S "
283 		    "[       start:        size ]\n");
284 		printf("---------------------------------------"
285 		    "----------------------------------------\n");
286 	} else {
287 		size = ((double)partn->ns * secsize) / unit_types[i].conversion;
288 		printf("%c%1d: %.2X %6u %3u %3u - %6u %3u %3u "
289 		    "[%12llu:%12.0f%s] %s\n",
290 		    (partn->flag == DOSACTIVE)?'*':' ',
291 		    num, partn->id,
292 		    partn->scyl, partn->shead, partn->ssect,
293 		    partn->ecyl, partn->ehead, partn->esect,
294 		    partn->bs, size,
295 		    unit_types[i].abbr,
296 		    PRT_ascii_id(partn->id));
297 	}
298 }
299 
300 void
301 PRT_fix_BN(struct prt *part, int pn)
302 {
303 	u_int32_t spt, tpc, spc;
304 	u_int32_t start = 0;
305 	u_int32_t end = 0;
306 
307 	/* Zero out entry if not used */
308 	if (part->id == DOSPTYP_UNUSED) {
309 		memset(part, 0, sizeof(*part));
310 		return;
311 	}
312 
313 	/* Disk geometry. */
314 	spt = disk.sectors;
315 	tpc = disk.heads;
316 	spc = spt * tpc;
317 
318 	start += part->scyl * spc;
319 	start += part->shead * spt;
320 	start += part->ssect - 1;
321 
322 	end += part->ecyl * spc;
323 	end += part->ehead * spt;
324 	end += part->esect - 1;
325 
326 	/* XXX - Should handle this... */
327 	if (start > end)
328 		warnx("Start of partition #%d after end!", pn);
329 
330 	part->bs = start;
331 	part->ns = (end - start) + 1;
332 }
333 
334 void
335 PRT_fix_CHS(struct prt *part)
336 {
337 	u_int32_t spt, tpc, spc;
338 	u_int32_t start, end, size;
339 	u_int32_t cyl, head, sect;
340 
341 	/* Zero out entry if not used */
342 	if (part->id == DOSPTYP_UNUSED || part->ns == 0) {
343 		memset(part, 0, sizeof(*part));
344 		return;
345 	}
346 
347 	/* Disk geometry. */
348 	spt = disk.sectors;
349 	tpc = disk.heads;
350 	spc = spt * tpc;
351 
352 	start = part->bs;
353 	size = part->ns;
354 	end = (start + size) - 1;
355 
356 	/* Figure out starting CHS values */
357 	cyl = (start / spc); start -= (cyl * spc);
358 	head = (start / spt); start -= (head * spt);
359 	sect = (start + 1);
360 
361 	part->scyl = cyl;
362 	part->shead = head;
363 	part->ssect = sect;
364 
365 	/* Figure out ending CHS values */
366 	cyl = (end / spc); end -= (cyl * spc);
367 	head = (end / spt); end -= (head * spt);
368 	sect = (end + 1);
369 
370 	part->ecyl = cyl;
371 	part->ehead = head;
372 	part->esect = sect;
373 }
374 
375 char *
376 PRT_uuid_to_typename(struct uuid *uuid)
377 {
378 	static char partition_type[37];	/* Room for a GUID if needed. */
379 	char *uuidstr = NULL;
380 	int i, entries, status;
381 
382 	memset(partition_type, 0, sizeof(partition_type));
383 
384 	uuid_to_string(uuid, &uuidstr, &status);
385 	if (status != uuid_s_ok)
386 		goto done;
387 
388 	entries = sizeof(part_types) / sizeof(struct part_type);
389 
390 	for (i = 0; i < entries; i++) {
391 		if (memcmp(part_types[i].guid, uuidstr,
392 		    sizeof(part_types[i].guid)) == 0)
393 			break;
394 	}
395 
396 	if (i < entries)
397 		strlcpy(partition_type, part_types[i].sname,
398 		    sizeof(partition_type));
399 	else
400 		strlcpy(partition_type, uuidstr, sizeof(partition_type));
401 
402 done:
403 	free(uuidstr);
404 
405 	return (partition_type);
406 }
407 
408 int
409 PRT_uuid_to_type(struct uuid *uuid)
410 {
411 	char *uuidstr;
412 	int entries, i, status, type;
413 
414 	type = 0;
415 
416 	uuid_to_string(uuid, &uuidstr, &status);
417 	if (status != uuid_s_ok)
418 		goto done;
419 
420 	entries = sizeof(part_types) / sizeof(struct part_type);
421 	for (i = 0; i < entries; i++) {
422 		if (memcmp(part_types[i].guid, uuidstr,
423 		    sizeof(part_types[i].guid)) == 0) {
424 			type = part_types[i].type;
425 			break;
426 		}
427 	}
428 
429 done:
430 	free(uuidstr);
431 	return (type);
432 }
433 
434 struct uuid *
435 PRT_type_to_uuid(int type)
436 {
437 	static struct uuid guid;
438 	int i, entries, status = uuid_s_ok;
439 
440 	memset(&guid, 0, sizeof(guid));
441 
442 	entries = sizeof(part_types) / sizeof(struct part_type);
443 
444 	for (i = 0; i < entries; i++) {
445 		if (part_types[i].type == type)
446 			break;
447 	}
448 	if (i < entries)
449 		uuid_from_string(part_types[i].guid, &guid, &status);
450 	if (i == entries || status != uuid_s_ok)
451 		uuid_from_string(part_types[0].guid, &guid, &status);
452 
453 	return (&guid);
454 }
455