devicename.c revision 329175 
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/11/stand/mips/beri/loader/devicename.c 329175 2018-02-12 17:44:35Z kevans $");
29
30#include <stand.h>
31#include <string.h>
32
33#include "bootstrap.h"
34#include "disk.h"
35
36static int	beri_arch_parsedev(struct disk_devdesc **dev,
37		    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 */
44int
45beri_arch_getdev(void **vdev, const char *devspec, const char **path)
46{
47    struct disk_devdesc **dev = (struct disk_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 = beri_arch_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(beri_arch_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 */
84static int
85beri_arch_parsedev(struct disk_devdesc **dev, const char *devspec,
86    const char **path)
87{
88    struct disk_devdesc *idev;
89    struct devsw	*dv;
90    int			i, unit, err;
91    char		*cp;
92    const char		*np;
93
94    /* minimum length check */
95    if (strlen(devspec) < 2)
96	return(EINVAL);
97
98    /* look for a device that matches */
99    for (i = 0, dv = NULL; devsw[i] != NULL; i++) {
100	if (!strncmp(devspec, devsw[i]->dv_name, strlen(devsw[i]->dv_name))) {
101	    dv = devsw[i];
102	    break;
103	}
104    }
105    if (dv == NULL)
106	return(ENOENT);
107    idev = malloc(sizeof(struct disk_devdesc));
108    err = 0;
109    np = (devspec + strlen(dv->dv_name));
110
111    switch(dv->dv_type) {
112    case DEVT_NONE:			/* XXX what to do here?  Do we care? */
113	break;
114
115    case DEVT_DISK:
116	err = disk_parsedev(idev, np, path);
117	if (err != 0)
118	    goto fail;
119	break;
120
121    case DEVT_CD:
122    case DEVT_NET:
123    case DEVT_ZFS:
124	unit = 0;
125
126	if (*np && (*np != ':')) {
127	    unit = strtol(np, &cp, 0);	/* get unit number if present */
128	    if (cp == np) {
129		err = EUNIT;
130		goto fail;
131	    }
132	} else {
133	    err = EUNIT;
134	    goto fail;
135	}
136
137	if (*cp && (*cp != ':')) {
138	    err = EINVAL;
139	    goto fail;
140	}
141
142	idev->d_unit = unit;
143	if (path != NULL)
144	    *path = (*cp == 0) ? cp : cp + 1;
145	break;
146
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
166char *
167beri_arch_fmtdev(void *vdev)
168{
169    struct disk_devdesc	*dev = (struct disk_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	sprintf(buf, "%s%d:", dev->d_dev->dv_name, dev->d_unit);
179	break;
180
181    case DEVT_DISK:
182	return (disk_fmtdev(vdev));
183
184    case DEVT_NET:
185    case DEVT_ZFS:
186	sprintf(buf, "%s%d:", dev->d_dev->dv_name, dev->d_unit);
187	break;
188    }
189    return(buf);
190}
191
192
193/*
194 * Set currdev to suit the value being supplied in (value)
195 */
196int
197beri_arch_setcurrdev(struct env_var *ev, int flags, const void *value)
198{
199    struct disk_devdesc	*ncurr;
200    int			rv;
201
202    if ((rv = beri_arch_parsedev(&ncurr, value, NULL)) != 0)
203	return(rv);
204    free(ncurr);
205    env_setenv(ev->ev_name, flags | EV_NOHOOK, value, NULL, NULL);
206    return(0);
207}
208