devopen.c revision 1.2 1 /* $NetBSD: devopen.c,v 1.2 1997/10/04 17:20:17 thorpej 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/libsa/stand.h>
71 #include <hp300/stand/common/samachdep.h>
72
73 u_int opendev;
74
75 #define ispart(c) ((c) >= 'a' && (c) <= 'h')
76
77 atoi(char *cp)
78 {
79 int val = 0;
80 while(isdigit(*cp))
81 val = val * 10 + (*cp++ - '0');
82 return(val);
83 }
84
85 usage()
86 {
87 printf("\
88 Usage: device(adaptor, controller, drive, partition)file\n\
89 <device><unit><partitionletter>:file\n\
90 ");
91 }
92
93 devlookup(d, len)
94 const char *d;
95 int len;
96 {
97 struct devsw *dp = devsw;
98 int i;
99
100 for (i = 0; i < ndevs; i++, dp++) {
101 if (dp->dv_name && strncmp(dp->dv_name, d, len) == 0) {
102 /*
103 * Set the filesystem and startup up according to the device
104 * being opened.
105 */
106 switch (i) {
107 case 0: /* ct */
108 bcopy(file_system_rawfs, file_system, sizeof(struct fs_ops));
109 break;
110
111 case 2: /* rd */
112 case 4: /* sd */
113 bcopy(file_system_ufs, file_system, sizeof(struct fs_ops));
114 break;
115
116 case 6: /* le */
117 bcopy(file_system_nfs, file_system, sizeof(struct fs_ops));
118 break;
119
120 default:
121 /* Agh! What happened?! */
122 goto bad;
123 }
124 return(i);
125 }
126 }
127
128 bad:
129 printf("No such device - Configured devices are:\n");
130 for (dp = devsw, i = 0; i < ndevs; i++, dp++)
131 if (dp->dv_name)
132 printf(" %s", dp->dv_name);
133 printf("\n");
134 errno = ENODEV;
135 return(-1);
136 }
137
138 /*
139 * Parse a device spec in one of two forms.
140 *
141 * dev(adapt, ctlr, unit, part)file
142 * [A-Za-z]*[0-9]*[A-Za-z]:file
143 * dev unit part
144 */
145 devparse(fname, dev, adapt, ctlr, unit, part, file)
146 const char *fname;
147 int *dev, *adapt, *ctlr, *unit, *part;
148 char **file;
149 {
150 int *argp, i;
151 char *s, *args[4];
152
153 /* get device name and make lower case */
154 for (s = (char *)fname; *s && *s != '/' && *s != ':' && *s != '('; s++)
155 if (isupper(*s)) *s = tolower(*s);
156
157 /* first form */
158 if (*s == '(') {
159 /* lookup device and get index */
160 if ((*dev = devlookup(fname, s - fname)) < 0)
161 goto baddev;
162
163 /* tokenize device ident */
164 args[0] = ++s;
165 for (args[0] = s, i = 1; *s && *s != ')'; s++) {
166 if (*s == ',')
167 args[i++] = ++s;
168 }
169 switch(i) {
170 case 4:
171 *adapt = atoi(args[0]);
172 *ctlr = atoi(args[1]);
173 *unit = atoi(args[2]);
174 *part = atoi(args[3]);
175 break;
176 case 3:
177 *ctlr = atoi(args[0]);
178 *unit = atoi(args[1]);
179 *part = atoi(args[2]);
180 break;
181 case 2:
182 *unit = atoi(args[0]);
183 *part = atoi(args[1]);
184 break;
185 case 1:
186 *part = atoi(args[0]);
187 break;
188 case 0:
189 break;
190 }
191 *file = ++s;
192 }
193
194 /* second form */
195 else if (*s == ':') {
196 int temp;
197
198 /* isolate device */
199 for (s = (char *)fname; *s != ':' && !isdigit(*s); s++);
200
201 /* lookup device and get index */
202 if ((*dev = devlookup(fname, s - fname)) < 0)
203 goto baddev;
204
205 /* isolate unit */
206 if ((temp = atoi(s)) > 255)
207 goto bad;
208 *adapt = temp / 8;
209 *ctlr = temp % 8;
210 for (; isdigit(*s); s++);
211
212 /* translate partition */
213 if (!ispart(*s))
214 goto bad;
215
216 *part = *s++ - 'a';
217 if (*s != ':')
218 goto bad;
219 *file = ++s;
220 }
221
222 /* no device present */
223 else
224 *file = (char *)fname;
225
226 /* return the remaining unparsed part as the file to boot */
227 return(0);
228
229 bad:
230 usage();
231
232 baddev:
233 return(-1);
234 }
235
236
237 devopen(f, fname, file)
238 struct open_file *f;
239 const char *fname;
240 char **file;
241 {
242 int n, error;
243 int dev, adapt, ctlr, unit, part;
244 struct devsw *dp = &devsw[0];
245
246 dev = B_TYPE(bootdev);
247 adapt = B_ADAPTOR(bootdev);
248 ctlr = B_CONTROLLER(bootdev);
249 unit = B_UNIT(bootdev);
250 part = B_PARTITION(bootdev);
251
252 if (error = devparse(fname, &dev, &adapt, &ctlr, &unit, &part, file))
253 return(error);
254
255 /*
256 * Set up filesystem type based on what device we're opening.
257 */
258 switch (dev) {
259 case 0: /* ct */
260 bcopy(file_system_rawfs, file_system, sizeof(struct fs_ops));
261 break;
262
263 case 2: /* rd */
264 case 4: /* sd */
265 bcopy(file_system_ufs, file_system, sizeof(struct fs_ops));
266 break;
267
268 case 6: /* le */
269 bcopy(file_system_nfs, file_system, sizeof(struct fs_ops));
270 break;
271
272 default:
273 /* XXX what else should we do here? */
274 printf("WARNING: BOGUS BOOT DEV TYPE 0x%x!\n", dev);
275 return (EIO);
276 }
277
278 dp = &devsw[dev];
279
280 if (!dp->dv_open)
281 return(ENODEV);
282
283 f->f_dev = dp;
284
285 if ((error = (*dp->dv_open)(f, adapt, ctlr, part)) == 0) {
286 if ((error =
287 (*punitsw[dev].p_punit)(adapt, ctlr, &unit)) != 0) {
288 goto bad;
289 }
290 opendev = MAKEBOOTDEV(dev, adapt, ctlr, unit, part);
291 return(0);
292 }
293
294 bad:
295 printf("%s(%d,%d,%d,%d): %s\n", devsw[dev].dv_name,
296 adapt, ctlr, unit, part, strerror(error));
297
298 return(error);
299 }
300