1/*
2 * Copyright (c) 1999, 2008 Apple Inc. All rights reserved.
3 *
4 * @APPLE_LICENSE_HEADER_START@
5 *
6 * This file contains Original Code and/or Modifications of Original Code
7 * as defined in and that are subject to the Apple Public Source License
8 * Version 2.0 (the 'License'). You may not use this file except in
9 * compliance with the License. Please obtain a copy of the License at
10 * http://www.opensource.apple.com/apsl/ and read it before using this
11 * file.
12 *
13 * The Original Code and all software distributed under the License are
14 * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
15 * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
16 * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
17 * FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
18 * Please see the License for the specific language governing rights and
19 * limitations under the License.
20 *
21 * @APPLE_LICENSE_HEADER_END@
22 */
23/*
24 * Copyright (c) 1983, 1987, 1993
25 *	The Regents of the University of California.  All rights reserved.
26 *
27 * Redistribution and use in source and binary forms, with or without
28 * modification, are permitted provided that the following conditions
29 * are met:
30 * 1. Redistributions of source code must retain the above copyright
31 *    notice, this list of conditions and the following disclaimer.
32 * 2. Redistributions in binary form must reproduce the above copyright
33 *    notice, this list of conditions and the following disclaimer in the
34 *    documentation and/or other materials provided with the distribution.
35 * 3. All advertising materials mentioning features or use of this software
36 *    must display the following acknowledgement:
37 *	This product includes software developed by the University of
38 *	California, Berkeley and its contributors.
39 * 4. Neither the name of the University nor the names of its contributors
40 *    may be used to endorse or promote products derived from this software
41 *    without specific prior written permission.
42 *
43 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
44 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
45 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
46 * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
47 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
48 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
49 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
50 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
51 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
52 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
53 * SUCH DAMAGE.
54 */
55
56
57#include <sys/param.h>
58#include <sys/time.h>
59#define DKTYPENAMES
60#include <sys/disklabel.h>
61/* from ufs/ffs/fs.h */
62#define BBSIZE		8192
63#define SBSIZE		8192
64
65#include <errno.h>
66#include <fcntl.h>
67#include <stdio.h>
68#include <stdlib.h>
69#include <string.h>
70#include <unistd.h>
71#include <ctype.h>
72
73#ifdef unused
74static int	error(int);
75#endif // unused
76static int	gettype(char *, char **);
77
78struct disklabel *
79getdiskbyname(const char *name)
80{
81	static struct disklabel *dp = NULL;
82	struct partition *pp;
83	char	*buf;
84	char  	*db_array[2] = { _PATH_DISKTAB, 0 };
85	char	*cp, *cq;	/* can't be register */
86	char	p, max, psize[3], pbsize[3],
87		pfsize[3], poffset[3], ptype[3];
88	u_int32_t *dx;
89
90	if (cgetent(&buf, db_array, (char *) name) < 0)
91		return NULL;
92
93	if (dp == NULL) {
94		dp = malloc(sizeof(struct disklabel));
95		if (dp == NULL) {
96			return NULL;
97		}
98	}
99	memset(dp, 0, sizeof(struct disklabel));
100
101	/*
102	 * typename
103	 */
104	cq = dp->d_typename;
105	cp = buf;
106	while (cq < dp->d_typename + sizeof(dp->d_typename) - 1 &&
107	    (*cq = *cp) && *cq != '|' && *cq != ':')
108		cq++, cp++;
109	*cq = '\0';
110	/*
111	 * boot name (optional)  xxboot, bootxx
112	 */
113	cgetstr(buf, "b0", &dp->d_boot0);
114	cgetstr(buf, "b1", &dp->d_boot1);
115
116	if (cgetstr(buf, "ty", &cq) > 0 && strcmp(cq, "removable") == 0)
117		dp->d_flags |= D_REMOVABLE;
118	else  if (cq && strcmp(cq, "simulated") == 0)
119		dp->d_flags |= D_RAMDISK;
120	if (cgetcap(buf, "sf", ':') != NULL)
121		dp->d_flags |= D_BADSECT;
122
123#define getnumdflt(field, dname, dflt) \
124        { long f; (field) = (cgetnum(buf, dname, &f) == -1) ? (dflt) : f; }
125
126	getnumdflt(dp->d_secsize, "se", DEV_BSIZE);
127	cgetnum(buf, "nt",(long *) &dp->d_ntracks);
128	cgetnum(buf, "ns",(long *) &dp->d_nsectors);
129	cgetnum(buf, "nc",(long *) &dp->d_ncylinders);
130
131	if (cgetstr(buf, "dt", &cq) > 0)
132		dp->d_type = gettype(cq, dktypenames);
133	else
134		getnumdflt(dp->d_type, "dt", 0);
135	getnumdflt(dp->d_secpercyl, "sc", dp->d_nsectors * dp->d_ntracks);
136	getnumdflt(dp->d_secperunit, "su", dp->d_secpercyl * dp->d_ncylinders);
137	getnumdflt(dp->d_rpm, "rm", 3600);
138	getnumdflt(dp->d_interleave, "il", 1);
139	getnumdflt(dp->d_trackskew, "sk", 0);
140	getnumdflt(dp->d_cylskew, "cs", 0);
141	getnumdflt(dp->d_headswitch, "hs", 0);
142	getnumdflt(dp->d_trkseek, "ts", 0);
143	getnumdflt(dp->d_bbsize, "bs", BBSIZE);
144	getnumdflt(dp->d_sbsize, "sb", SBSIZE);
145	strcpy(psize, "px");
146	strcpy(pbsize, "bx");
147	strcpy(pfsize, "fx");
148	strcpy(poffset, "ox");
149	strcpy(ptype, "tx");
150	max = 'a' - 1;
151	pp = &dp->d_partitions[0];
152	for (p = 'a'; p < 'a' + MAXPARTITIONS; p++, pp++) {
153		psize[1] = pbsize[1] = pfsize[1] = poffset[1] = ptype[1] = p;
154		if (cgetnum(buf, psize,(long *) &pp->p_size) == -1)
155			pp->p_size = 0;
156		else {
157			cgetnum(buf, poffset, (long *) &pp->p_offset);
158			getnumdflt(pp->p_fsize, pfsize, 0);
159			if (pp->p_fsize) {
160				long bsize;
161
162				if (cgetnum(buf, pbsize, &bsize) == 0)
163					pp->p_frag = bsize / pp->p_fsize;
164				else
165					pp->p_frag = 8;
166			}
167			getnumdflt(pp->p_fstype, ptype, 0);
168			if (pp->p_fstype == 0 && cgetstr(buf, ptype, &cq) > 0)
169				pp->p_fstype = gettype(cq, fstypenames);
170			max = p;
171		}
172	}
173	dp->d_npartitions = max + 1 - 'a';
174	(void)strcpy(psize, "dx");
175	dx = dp->d_drivedata;
176	for (p = '0'; p < '0' + NDDATA; p++, dx++) {
177		psize[1] = p;
178		getnumdflt(*dx, psize, 0);
179	}
180	dp->d_magic = DISKMAGIC;
181	dp->d_magic2 = DISKMAGIC;
182	free(buf);
183	return (dp);
184}
185
186static int
187gettype(t, names)
188	char *t;
189	char **names;
190{
191	register char **nm;
192
193	for (nm = names; *nm; nm++)
194		if (strcasecmp(t, *nm) == 0)
195			return (nm - names);
196	if (isdigit(*t))
197		return (atoi(t));
198	return (0);
199}
200
201#ifdef unused
202static int
203error(err)
204	int err;
205{
206	char *p;
207
208	(void)write(STDERR_FILENO, "disktab: ", 9);
209	(void)write(STDERR_FILENO, _PATH_DISKTAB, sizeof(_PATH_DISKTAB) - 1);
210	(void)write(STDERR_FILENO, ": ", 2);
211	p = strerror(err);
212	(void)write(STDERR_FILENO, p, strlen(p));
213	(void)write(STDERR_FILENO, "\n", 1);
214}
215#endif // unused
216