xref: /netbsd-src/sys/arch/pmax/stand/common/devopen.c (revision 23c8222edbfb0f0932d88a8351d3a0cf817dfb9e)
1 /*	$NetBSD: devopen.c,v 1.15 2003/08/07 16:29:15 agc Exp $	*/
2 
3 /*-
4  * Copyright (c) 1992, 1993
5  *	The Regents of the University of California.  All rights reserved.
6  *
7  * This code is derived from software contributed to Berkeley by
8  * Ralph Campbell.
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. Neither the name of the University nor the names of its contributors
19  *    may be used to endorse or promote products derived from this software
20  *    without specific prior written permission.
21  *
22  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
23  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
24  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
25  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
26  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
27  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
28  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
29  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
30  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
31  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32  * SUCH DAMAGE.
33  *
34  *	@(#)devopen.c	8.1 (Berkeley) 6/10/93
35  */
36 
37 #include <lib/libsa/stand.h>
38 #include <lib/libkern/libkern.h>
39 
40 /*
41  * Decode the string 'fname', open the device and return the remaining
42  * file name if any.
43  */
44 int
45 devopen(f, fname, file)
46 	struct open_file *f;
47 	const char *fname;
48 	char **file;	/* out */
49 {
50 	int ctlr = 0, unit = 0, part = 0;
51 	int c, rc;
52 	char namebuf[20];
53 	const char *cp;
54 	char *ncp;
55 #if !defined(LIBSA_SINGLE_DEVICE)
56 	int i;
57 	struct devsw *dp;
58 #endif
59 
60 	cp = fname;
61 	ncp = namebuf;
62 
63 	/*
64 	 * look for a string like '5/rz0/netbsd' or '5/rz3f/netbsd
65 	 * or 3/tftp/netbsd
66 	 */
67 	if ((c = *cp) >= '0' && c <= '9') {
68 		ctlr = c - '0';
69 		/* skip the '/' */
70 		if (*++cp != '/')
71 			return (ENXIO);
72 		cp++;
73 		while ((c = *cp) != '\0') {
74 			if (c == '/')
75 				break;
76 			if (c >= '0' && c <= '9') {
77 				/* read unit number */
78 				unit = c - '0';
79 
80 				/* look for a partition */
81 				if ((c = *++cp) >= 'a' && c <= 'h') {
82 					part = c - 'a';
83 					c = *++cp;
84 				}
85 				if (c != '/')
86 					return (ENXIO);
87 				cp++;
88 				break;
89 			}
90 			if (ncp < namebuf + sizeof(namebuf) - 1)
91 				*ncp++ = c;
92 			cp++;
93 		}
94 	} else {
95 		/* expect a string like 'rz(0,0,0)netbsd' */
96 		while ((c = *cp) != '\0') {
97 			if (c == '(') {
98 				cp++;
99 				break;
100 			}
101 			if (ncp < namebuf + sizeof(namebuf) - 1)
102 				*ncp++ = c;
103 			cp++;
104 		}
105 
106 		/* get controller number */
107 		if ((c = *cp) >= '0' && c <= '9') {
108 			ctlr = c - '0';
109 			c = *++cp;
110 		}
111 
112 		if (c == ',') {
113 			/* get SCSI device number */
114 			if ((c = *++cp) >= '0' && c <= '9') {
115 				unit = c - '0';
116 				c = *++cp;
117 			}
118 
119 			if (c == ',') {
120 				/* get partition number */
121 				if ((c = *++cp) >= '0' && c <= '9') {
122 					part = c - '0';
123 					c = *++cp;
124 				}
125 			}
126 		}
127 		if (c != ')')
128 			return (ENXIO);
129 		cp++;
130 	}
131 	*ncp = '\0';
132 
133 #ifdef LIBSA_SINGLE_DEVICE
134 	rc = DEV_OPEN(dp)(f, ctlr, unit, part);
135 #else /* !LIBSA_SINGLE_DEVICE */
136 	for (dp = devsw, i = 0; i < ndevs; dp++, i++)
137 		if (dp->dv_name && strcmp(namebuf, dp->dv_name) == 0)
138 			goto fnd;
139 	printf("Unknown device '%s'\nKnown devices are:", namebuf);
140 	for (dp = devsw, i = 0; i < ndevs; dp++, i++)
141 		if (dp->dv_name)
142 			printf(" %s", dp->dv_name);
143 	printf("\n");
144 	return (ENXIO);
145 
146 fnd:
147 #ifdef BOOTNET
148 	if (strcmp(namebuf, "tftp") == 0)
149 		rc = (dp->dv_open)(f, namebuf);
150 	else
151 #endif /* BOOTNET */
152 		rc = (dp->dv_open)(f, ctlr, unit, part);
153 #endif /* !LIBSA_SINGLE_DEVICE */
154 	if (rc)
155 		return (rc);
156 
157 #ifndef LIBSA_SINGLE_DEVICE
158 	f->f_dev = dp;
159 #endif
160 	if (file && *cp != '\0')
161 		*file = (char *)cp;	/* XXX */
162 	return (0);
163 }
164