sys/arch/pmax/stand/common/devopen.c

   1 /*      $NetBSD: devopen.c,v 1.16 2005/12/11 12:18:39 christos 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(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 }