1 /*-
2 * Copyright (c) 1998 Michael Smith <msmith@freebsd.org>
3 * All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
13 *
14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24 * SUCH DAMAGE.
25 */
26
27 #include <sys/cdefs.h>
28 __FBSDID("$FreeBSD: stable/10/sys/boot/i386/libi386/devicename.c 245424 2013-01-14 15:05:22Z sbruno $");
29
30 #include <stand.h>
31 #include <string.h>
32 #include "bootstrap.h"
33 #include "disk.h"
34 #include "libi386.h"
35 #include "../zfs/libzfs.h"
36
37 static int i386_parsedev(struct i386_devdesc **dev, const char *devspec, const char **path);
38
39 /*
40 * Point (dev) at an allocated device specifier for the device matching the
41 * path in (devspec). If it contains an explicit device specification,
42 * use that. If not, use the default device.
43 */
44 int
i386_getdev(void ** vdev,const char * devspec,const char ** path)45 i386_getdev(void **vdev, const char *devspec, const char **path)
46 {
47 struct i386_devdesc **dev = (struct i386_devdesc **)vdev;
48 int rv;
49
50 /*
51 * If it looks like this is just a path and no
52 * device, go with the current device.
53 */
54 if ((devspec == NULL) ||
55 (devspec[0] == '/') ||
56 (strchr(devspec, ':') == NULL)) {
57
58 if (((rv = i386_parsedev(dev, getenv("currdev"), NULL)) == 0) &&
59 (path != NULL))
60 *path = devspec;
61 return(rv);
62 }
63
64 /*
65 * Try to parse the device name off the beginning of the devspec
66 */
67 return(i386_parsedev(dev, devspec, path));
68 }
69
70 /*
71 * Point (dev) at an allocated device specifier matching the string version
72 * at the beginning of (devspec). Return a pointer to the remaining
73 * text in (path).
74 *
75 * In all cases, the beginning of (devspec) is compared to the names
76 * of known devices in the device switch, and then any following text
77 * is parsed according to the rules applied to the device type.
78 *
79 * For disk-type devices, the syntax is:
80 *
81 * disk<unit>[s<slice>][<partition>]:
82 *
83 */
84 static int
i386_parsedev(struct i386_devdesc ** dev,const char * devspec,const char ** path)85 i386_parsedev(struct i386_devdesc **dev, const char *devspec, const char **path)
86 {
87 struct i386_devdesc *idev;
88 struct devsw *dv;
89 int i, unit, err;
90 char *cp;
91 const char *np;
92
93 /* minimum length check */
94 if (strlen(devspec) < 2)
95 return(EINVAL);
96
97 /* look for a device that matches */
98 for (i = 0, dv = NULL; devsw[i] != NULL; i++) {
99 if (!strncmp(devspec, devsw[i]->dv_name, strlen(devsw[i]->dv_name))) {
100 dv = devsw[i];
101 break;
102 }
103 }
104 if (dv == NULL)
105 return(ENOENT);
106 idev = malloc(sizeof(struct i386_devdesc));
107 err = 0;
108 np = (devspec + strlen(dv->dv_name));
109
110 switch(dv->dv_type) {
111 case DEVT_NONE: /* XXX what to do here? Do we care? */
112 break;
113
114 case DEVT_DISK:
115 err = disk_parsedev((struct disk_devdesc *)idev, np, path);
116 if (err != 0)
117 goto fail;
118 break;
119
120 case DEVT_CD:
121 case DEVT_NET:
122 unit = 0;
123
124 if (*np && (*np != ':')) {
125 unit = strtol(np, &cp, 0); /* get unit number if present */
126 if (cp == np) {
127 err = EUNIT;
128 goto fail;
129 }
130 } else {
131 cp = (char *)np;
132 }
133 if (*cp && (*cp != ':')) {
134 err = EINVAL;
135 goto fail;
136 }
137
138 idev->d_unit = unit;
139 if (path != NULL)
140 *path = (*cp == 0) ? cp : cp + 1;
141 break;
142 case DEVT_ZFS:
143 err = zfs_parsedev((struct zfs_devdesc *)idev, np, path);
144 if (err != 0)
145 goto fail;
146 break;
147 default:
148 err = EINVAL;
149 goto fail;
150 }
151 idev->d_dev = dv;
152 idev->d_type = dv->dv_type;
153 if (dev == NULL) {
154 free(idev);
155 } else {
156 *dev = idev;
157 }
158 return(0);
159
160 fail:
161 free(idev);
162 return(err);
163 }
164
165
166 char *
i386_fmtdev(void * vdev)167 i386_fmtdev(void *vdev)
168 {
169 struct i386_devdesc *dev = (struct i386_devdesc *)vdev;
170 static char buf[128]; /* XXX device length constant? */
171
172 switch(dev->d_type) {
173 case DEVT_NONE:
174 strcpy(buf, "(no device)");
175 break;
176
177 case DEVT_CD:
178 case DEVT_NET:
179 sprintf(buf, "%s%d:", dev->d_dev->dv_name, dev->d_unit);
180 break;
181
182 case DEVT_DISK:
183 return (disk_fmtdev(vdev));
184
185 case DEVT_ZFS:
186 return(zfs_fmtdev(vdev));
187 }
188 return(buf);
189 }
190
191
192 /*
193 * Set currdev to suit the value being supplied in (value)
194 */
195 int
i386_setcurrdev(struct env_var * ev,int flags,const void * value)196 i386_setcurrdev(struct env_var *ev, int flags, const void *value)
197 {
198 struct i386_devdesc *ncurr;
199 int rv;
200
201 if ((rv = i386_parsedev(&ncurr, value, NULL)) != 0)
202 return(rv);
203 free(ncurr);
204 env_setenv(ev->ev_name, flags | EV_NOHOOK, value, NULL, NULL);
205 return(0);
206 }
207