usr/src/boot/sys/boot/uboot/lib/devicename.c

   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
  29 #include <stand.h>
  30 #include <string.h>
  31
  32 #include "bootstrap.h"
  33 #include "disk.h"
  34 #include "libuboot.h"
  35
  36 static int uboot_parsedev(struct uboot_devdesc **dev, const char *devspec,
  37     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
  45 uboot_getdev(void **vdev, const char *devspec, const char **path)
  46 {
  47         struct uboot_devdesc **dev = (struct uboot_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) || (devspec[0] == '/') ||
  55             (strchr(devspec, ':') == NULL)) {
  56
  57                 if (((rv = uboot_parsedev(dev, getenv("currdev"), NULL)) == 0)
  58                     && (path != NULL))
  59                 *path = devspec;
  60                 return(rv);
  61         }
  62
  63         /*
  64          * Try to parse the device name off the beginning of the devspec.
  65          */
  66         return (uboot_parsedev(dev, devspec, path));
  67 }
  68
  69 /*
  70  * Point (dev) at an allocated device specifier matching the string version
  71  * at the beginning of (devspec).  Return a pointer to the remaining
  72  * text in (path).
  73  *
  74  * In all cases, the beginning of (devspec) is compared to the names
  75  * of known devices in the device switch, and then any following text
  76  * is parsed according to the rules applied to the device type.
  77  *
  78  * For disk-type devices, the syntax is:
  79  *
  80  * disk<unit>[<partition>]:
  81  *
  82  */
  83 static int
  84 uboot_parsedev(struct uboot_devdesc **dev, const char *devspec,
  85     const char **path)
  86 {
  87         struct uboot_devdesc *idev;
  88         struct devsw *dv;
  89         char *cp;
  90         const char *np;
  91         int i, unit, err;
  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,
 100                     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 uboot_devdesc));
 108         err = 0;
 109         np = (devspec + strlen(dv->dv_name));
 110
 111         switch(dv->dv_type) {
 112         case DEVT_NONE:
 113                 break;
 114
 115 #ifdef LOADER_DISK_SUPPORT
 116         case DEVT_DISK:
 117                 err = disk_parsedev((struct disk_devdesc *)idev, np, path);
 118                 if (err != 0)
 119                         goto fail;
 120                 break;
 121 #endif
 122
 123         case DEVT_NET:
 124                 unit = 0;
 125
 126                 if (*np && (*np != ':')) {
 127                         /* get unit number if present */
 128                         unit = strtol(np, &cp, 0);
 129                         if (cp == np) {
 130                                 err = EUNIT;
 131                                 goto fail;
 132                         }
 133                 }
 134                 if (*cp && (*cp != ':')) {
 135                         err = EINVAL;
 136                         goto fail;
 137                 }
 138                 idev->dd.d_unit = unit;
 139
 140                 if (path != NULL)
 141                         *path = (*cp == 0) ? cp : cp + 1;
 142                 break;
 143
 144         default:
 145                 err = EINVAL;
 146                 goto fail;
 147         }
 148         idev->dd.d_dev = dv;
 149         if (dev == NULL) {
 150                 free(idev);
 151         } else {
 152                 *dev = idev;
 153         }
 154         return (0);
 155
 156 fail:
 157         free(idev);
 158         return (err);
 159 }
 160
 161
 162 char *
 163 uboot_fmtdev(void *vdev)
 164 {
 165         struct uboot_devdesc *dev = (struct uboot_devdesc *)vdev;
 166         static char buf[128];
 167
 168         switch(dev->dd.d_dev->dv_type) {
 169         case DEVT_NONE:
 170                 strcpy(buf, "(no device)");
 171                 break;
 172
 173         case DEVT_DISK:
 174 #ifdef LOADER_DISK_SUPPORT
 175                 return (disk_fmtdev(vdev));
 176 #endif
 177
 178         case DEVT_NET:
 179                 sprintf(buf, "%s%d:", dev->dd.d_dev->dv_name, dev->dd.d_unit);
 180                 break;
 181         }
 182         return(buf);
 183 }
 184
 185 /*
 186  * Set currdev to suit the value being supplied in (value).
 187  */
 188 int
 189 uboot_setcurrdev(struct env_var *ev, int flags, const void *value)
 190 {
 191         struct uboot_devdesc *ncurr;
 192         int rv;
 193
 194         if ((rv = uboot_parsedev(&ncurr, value, NULL)) != 0)
 195                 return (rv);
 196         free(ncurr);
 197         env_setenv(ev->ev_name, flags | EV_NOHOOK, value, NULL, NULL);
 198         return (0);
 199 }