1 /*        $NetBSD: devopen.c,v 1.17 2009/03/14 21:04:14 dsl 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
devopen(struct open_file * f,const char * fname,char ** file)45 devopen(struct open_file *f, const char *fname, char **file)
46           /* file:   out */
47 {
48           int ctlr = 0, unit = 0, part = 0;
49           int c, rc;
50           char namebuf[20];
51           const char *cp;
52           char *ncp;
53 #if !defined(LIBSA_SINGLE_DEVICE)
54           int i;
55           struct devsw *dp;
56 #endif
57 
58           cp = fname;
59           ncp = namebuf;
60 
61           /*
62            * look for a string like '5/rz0/netbsd' or '5/rz3f/netbsd
63            * or 3/tftp/netbsd
64            */
65           if ((c = *cp) >= '0' && c <= '9') {
66                     ctlr = c - '0';
67                     /* skip the '/' */
68                     if (*++cp != '/')
69                               return (ENXIO);
70                     cp++;
71                     while ((c = *cp) != '\0') {
72                               if (c == '/')
73                                         break;
74                               if (c >= '0' && c <= '9') {
75                                         /* read unit number */
76                                         unit = c - '0';
77 
78                                         /* look for a partition */
79                                         if ((c = *++cp) >= 'a' && c <= 'h') {
80                                                   part = c - 'a';
81                                                   c = *++cp;
82                                         }
83                                         if (c != '/')
84                                                   return (ENXIO);
85                                         cp++;
86                                         break;
87                               }
88                               if (ncp < namebuf + sizeof(namebuf) - 1)
89                                         *ncp++ = c;
90                               cp++;
91                     }
92           } else {
93                     /* expect a string like 'rz(0,0,0)netbsd' */
94                     while ((c = *cp) != '\0') {
95                               if (c == '(') {
96                                         cp++;
97                                         break;
98                               }
99                               if (ncp < namebuf + sizeof(namebuf) - 1)
100                                         *ncp++ = c;
101                               cp++;
102                     }
103 
104                     /* get controller number */
105                     if ((c = *cp) >= '0' && c <= '9') {
106                               ctlr = c - '0';
107                               c = *++cp;
108                     }
109 
110                     if (c == ',') {
111                               /* get SCSI device number */
112                               if ((c = *++cp) >= '0' && c <= '9') {
113                                         unit = c - '0';
114                                         c = *++cp;
115                               }
116 
117                               if (c == ',') {
118                                         /* get partition number */
119                                         if ((c = *++cp) >= '0' && c <= '9') {
120                                                   part = c - '0';
121                                                   c = *++cp;
122                                         }
123                               }
124                     }
125                     if (c != ')')
126                               return (ENXIO);
127                     cp++;
128           }
129           *ncp = '\0';
130 
131 #ifdef LIBSA_SINGLE_DEVICE
132           rc = DEV_OPEN(dp)(f, ctlr, unit, part);
133 #else /* !LIBSA_SINGLE_DEVICE */
134           for (dp = devsw, i = 0; i < ndevs; dp++, i++)
135                     if (dp->dv_name && strcmp(namebuf, dp->dv_name) == 0)
136                               goto fnd;
137           printf("Unknown device '%s'\nKnown devices are:", namebuf);
138           for (dp = devsw, i = 0; i < ndevs; dp++, i++)
139                     if (dp->dv_name)
140                               printf(" %s", dp->dv_name);
141           printf("\n");
142           return (ENXIO);
143 
144 fnd:
145 #ifdef BOOTNET
146           if (strcmp(namebuf, "tftp") == 0)
147                     rc = (dp->dv_open)(f, namebuf);
148           else
149 #endif /* BOOTNET */
150                     rc = (dp->dv_open)(f, ctlr, unit, part);
151 #endif /* !LIBSA_SINGLE_DEVICE */
152           if (rc)
153                     return (rc);
154 
155 #ifndef LIBSA_SINGLE_DEVICE
156           f->f_dev = dp;
157 #endif
158           if (file && *cp != '\0')
159                     *file = (char *)cp; /* XXX */
160           return (0);
161 }
162