devopen.c revision 1.7 1 /* $NetBSD: devopen.c,v 1.7 2005/02/20 13:59:27 tsutsui Exp $ */
2
3 /*-
4 * Copyright (c) 1996, 1997 The NetBSD Foundation, Inc.
5 * All rights reserved.
6 *
7 * This code is derived from software contributed to The NetBSD Foundation
8 * by Jason R. Thorpe.
9 *
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
12 * are met:
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in the
17 * documentation and/or other materials provided with the distribution.
18 * 3. All advertising materials mentioning features or use of this software
19 * must display the following acknowledgement:
20 * This product includes software developed by the NetBSD
21 * Foundation, Inc. and its contributors.
22 * 4. Neither the name of The NetBSD Foundation nor the names of its
23 * contributors may be used to endorse or promote products derived
24 * from this software without specific prior written permission.
25 *
26 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
27 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
28 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
29 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
30 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
31 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
32 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
33 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
34 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
35 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
36 * POSSIBILITY OF SUCH DAMAGE.
37 */
38
39 /*-
40 * Copyright (c) 1993 John Brezak
41 * All rights reserved.
42 *
43 * Redistribution and use in source and binary forms, with or without
44 * modification, are permitted provided that the following conditions
45 * are met:
46 * 1. Redistributions of source code must retain the above copyright
47 * notice, this list of conditions and the following disclaimer.
48 * 2. Redistributions in binary form must reproduce the above copyright
49 * notice, this list of conditions and the following disclaimer in the
50 * documentation and/or other materials provided with the distribution.
51 * 3. The name of the author may not be used to endorse or promote products
52 * derived from this software without specific prior written permission.
53 *
54 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR `AS IS'' AND ANY EXPRESS OR
55 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
56 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
57 * DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT,
58 * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
59 * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
60 * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
61 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
62 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
63 * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
64 * POSSIBILITY OF SUCH DAMAGE.
65 */
66
67 #include <sys/param.h>
68 #include <sys/reboot.h>
69
70 #include <lib/libkern/libkern.h>
71
72 #include <lib/libsa/stand.h>
73 #include <hp300/stand/common/samachdep.h>
74
75 u_int opendev;
76
77 #define ispart(c) ((c) >= 'a' && (c) <= 'h')
78
79 static void usage(void);
80 static int devlookup(const char * ,int);
81 static int devparse(const char *, int *, int*, int*, int*, int*, char **);
82
83 int
84 atoi(char *cp)
85 {
86 int val = 0;
87
88 while (isdigit(*cp))
89 val = val * 10 + (*cp++ - '0');
90 return val;
91 }
92
93 void
94 usage(void)
95 {
96
97 printf("Usage: device(adaptor, controller, drive, partition)file\n"
98 " <device><unit><partitionletter>:file\n");
99 }
100
101 static int
102 devlookup(const char *d, int len)
103 {
104 struct devsw *dp = devsw;
105 int i;
106
107 for (i = 0; i < ndevs; i++, dp++) {
108 if (dp->dv_name && strncmp(dp->dv_name, d, len) == 0) {
109 /*
110 * Set the filesystem and startup up according to
111 * the device being opened.
112 */
113 switch (i) {
114 case 0: /* ct */
115 memcpy(file_system, file_system_rawfs,
116 sizeof(struct fs_ops));
117 break;
118
119 case 2: /* rd */
120 case 4: /* sd */
121 memcpy(file_system, file_system_ufs,
122 sizeof(struct fs_ops));
123 break;
124
125 case 6: /* le */
126 memcpy(file_system, file_system_nfs,
127 sizeof(struct fs_ops));
128 break;
129
130 default:
131 /* Agh! What happened?! */
132 goto bad;
133 }
134 return i;
135 }
136 }
137
138 bad:
139 printf("No such device - Configured devices are:\n");
140 for (dp = devsw, i = 0; i < ndevs; i++, dp++)
141 if (dp->dv_name)
142 printf(" %s", dp->dv_name);
143 printf("\n");
144 errno = ENODEV;
145 return -1;
146 }
147
148 /*
149 * Parse a device spec in one of two forms.
150 *
151 * dev(adapt, ctlr, unit, part)file
152 * [A-Za-z]*[0-9]*[A-Za-z]:file
153 * dev unit part
154 */
155 static int
156 devparse(const char *fname, int *dev, int *adapt, int *ctlr, int *unit,
157 int *part, char **file)
158 {
159 int i;
160 char *s, *args[4];
161
162 /* get device name */
163 for (s = (char *)fname; *s && *s != '/' && *s != ':' && *s != '('; s++)
164 ;
165
166 /* first form */
167 if (*s == '(') {
168 /* lookup device and get index */
169 if ((*dev = devlookup(fname, s - fname)) < 0)
170 goto baddev;
171
172 /* tokenize device ident */
173 args[0] = ++s;
174 for (args[0] = s, i = 1; *s && *s != ')'; s++) {
175 if (*s == ',')
176 args[i++] = ++s;
177 }
178 switch(i) {
179 case 4:
180 *adapt = atoi(args[0]);
181 *ctlr = atoi(args[1]);
182 *unit = atoi(args[2]);
183 *part = atoi(args[3]);
184 break;
185 case 3:
186 *ctlr = atoi(args[0]);
187 *unit = atoi(args[1]);
188 *part = atoi(args[2]);
189 break;
190 case 2:
191 *unit = atoi(args[0]);
192 *part = atoi(args[1]);
193 break;
194 case 1:
195 *part = atoi(args[0]);
196 break;
197 case 0:
198 break;
199 }
200 *file = ++s;
201 }
202
203 /* second form */
204 else if (*s == ':') {
205 int temp;
206
207 /* isolate device */
208 for (s = (char *)fname; *s != ':' && !isdigit(*s); s++);
209
210 /* lookup device and get index */
211 if ((*dev = devlookup(fname, s - fname)) < 0)
212 goto baddev;
213
214 /* isolate unit */
215 if ((temp = atoi(s)) > 255)
216 goto bad;
217 *adapt = temp / 8;
218 *ctlr = temp % 8;
219 for (; isdigit(*s); s++)
220 ;
221
222 /* translate partition */
223 if (!ispart(*s))
224 goto bad;
225
226 *part = *s++ - 'a';
227 if (*s != ':')
228 goto bad;
229 *file = ++s;
230 }
231
232 /* no device present */
233 else
234 *file = (char *)fname;
235
236 /* return the remaining unparsed part as the file to boot */
237 return 0;
238
239 bad:
240 usage();
241
242 baddev:
243 return -1;
244 }
245
246
247 int
248 devopen(struct open_file *f, const char *fname, char **file)
249 {
250 int error;
251 int dev, adapt, ctlr, unit, part;
252 struct devsw *dp = &devsw[0];
253
254 dev = B_TYPE(bootdev);
255 adapt = B_ADAPTOR(bootdev);
256 ctlr = B_CONTROLLER(bootdev);
257 unit = B_UNIT(bootdev);
258 part = B_PARTITION(bootdev);
259
260 if ((error = devparse(fname, &dev, &adapt, &ctlr, &unit, &part, file))
261 != 0)
262 return error;
263
264 /*
265 * Set up filesystem type based on what device we're opening.
266 */
267 switch (dev) {
268 case 0: /* ct */
269 memcpy(file_system, file_system_rawfs, sizeof(struct fs_ops));
270 break;
271
272 case 2: /* rd */
273 case 4: /* sd */
274 memcpy(file_system, file_system_ufs, sizeof(struct fs_ops));
275 break;
276
277 case 6: /* le */
278 memcpy(file_system, file_system_nfs, sizeof(struct fs_ops));
279 break;
280
281 default:
282 /* XXX what else should we do here? */
283 printf("WARNING: BOGUS BOOT DEV TYPE 0x%x!\n", dev);
284 return EIO;
285 }
286
287 dp = &devsw[dev];
288
289 if (!dp->dv_open)
290 return ENODEV;
291
292 f->f_dev = dp;
293
294 if ((error = (*dp->dv_open)(f, adapt, ctlr, part)) == 0) {
295 if ((error =
296 (*punitsw[dev].p_punit)(adapt, ctlr, &unit)) != 0) {
297 goto bad;
298 }
299 opendev = MAKEBOOTDEV(dev, adapt, ctlr, unit, part);
300 return 0;
301 }
302
303 bad:
304 printf("%s(%d,%d,%d,%d): %s\n", devsw[dev].dv_name,
305 adapt, ctlr, unit, part, strerror(error));
306
307 return error;
308 }
309