/* $OpenBSD: scsiconf.c,v 1.20 1997/01/15 05:50:27 deraadt Exp $ */ /* $NetBSD: scsiconf.c,v 1.57 1996/05/02 01:09:01 neil Exp $ */ /* * Copyright (c) 1994 Charles Hannum. All rights reserved. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * 3. All advertising materials mentioning features or use of this software * must display the following acknowledgement: * This product includes software developed by Charles Hannum. * 4. The name of the author may not be used to endorse or promote products * derived from this software without specific prior written permission. * * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. */ /* * Originally written by Julian Elischer (julian@tfs.com) * for TRW Financial Systems for use under the MACH(2.5) operating system. * * TRW Financial Systems, in accordance with their agreement with Carnegie * Mellon University, makes this software available to CMU to distribute * or use in any manner that they see fit as long as this message is kept with * the software. For this reason TFS also grants any other persons or * organisations permission to use or modify this software. * * TFS supplies this software to be publicly redistributed * on the understanding that TFS is not responsible for the correct * functioning of this software in any circumstances. * * Ported to run under 386BSD by Julian Elischer (julian@tfs.com) Sept 1992 */ #include #include #include #include #include #include #include #if 0 #if NCALS > 0 { T_PROCESSOR, T_FIXED, 1, 0, 0, 0 }, #endif /* NCALS */ #if NBLL > 0 { T_PROCESSOR, T_FIXED, 1, "AEG ", "READER ", "V1.0" }, #endif /* NBLL */ #if NKIL > 0 { T_SCANNER, T_FIXED, 0, "KODAK ", "IL Scanner 900 ", 0 }, #endif /* NKIL */ #endif /* * Declarations */ void scsi_probedev __P((struct scsibus_softc *, int, int)); int scsi_probe_bus __P((int bus, int target, int lun)); struct scsi_device probe_switch = { NULL, NULL, NULL, NULL, }; int scsibusmatch __P((struct device *, void *, void *)); void scsibusattach __P((struct device *, struct device *, void *)); int scsibussubmatch __P((struct device *, void *, void *)); struct cfattach scsibus_ca = { sizeof(struct scsibus_softc), scsibusmatch, scsibusattach }; struct cfdriver scsibus_cd = { NULL, "scsibus", DV_DULL }; int scsidebug_targets = SCSIDEBUG_TARGETS; int scsidebug_luns = SCSIDEBUG_LUNS; int scsidebug_level = SCSIDEBUG_LEVEL; int scsibusprint __P((void *, const char *)); int scsibusmatch(parent, match, aux) struct device *parent; void *match, *aux; { return 1; } /* * The routine called by the adapter boards to get all their * devices configured in. */ void scsibusattach(parent, self, aux) struct device *parent, *self; void *aux; { struct scsibus_softc *sb = (struct scsibus_softc *)self; struct scsi_link *sc_link_proto = aux; int nbytes, i; sc_link_proto->scsibus = sb->sc_dev.dv_unit; sb->adapter_link = sc_link_proto; if (sb->adapter_link->adapter_buswidth == 0) sb->adapter_link->adapter_buswidth = 8; sb->sc_buswidth = sb->adapter_link->adapter_buswidth; printf(": %d targets\n", sb->sc_buswidth); nbytes = sb->sc_buswidth * sizeof(struct scsi_link **); sb->sc_link = (struct scsi_link ***)malloc(nbytes, M_DEVBUF, M_NOWAIT); if (sb->sc_link == NULL) panic("scsibusattach: can't allocate target links"); nbytes = 8 * sizeof(struct scsi_link *); for (i = 0; i <= sb->sc_buswidth; i++) { sb->sc_link[i] = (struct scsi_link **)malloc(nbytes, M_DEVBUF, M_NOWAIT); if (sb->sc_link[i] == NULL) panic("scsibusattach: can't allocate lun links"); bzero(sb->sc_link[i], nbytes); } #if defined(SCSI_DELAY) && SCSI_DELAY > 2 printf("%s: waiting for scsi devices to settle\n", sb->sc_dev.dv_xname); #else /* SCSI_DELAY > 2 */ #undef SCSI_DELAY #define SCSI_DELAY 2 #endif /* SCSI_DELAY */ delay(1000000 * SCSI_DELAY); scsi_probe_bus(sb->sc_dev.dv_unit, -1, -1); } int scsibussubmatch(parent, match, aux) struct device *parent; void *match, *aux; { struct cfdata *cf = match; struct scsibus_attach_args *sa = aux; struct scsi_link *sc_link = sa->sa_sc_link; if (cf->cf_loc[0] != -1 && cf->cf_loc[0] != sc_link->target) return 0; if (cf->cf_loc[1] != -1 && cf->cf_loc[1] != sc_link->lun) return 0; return ((*cf->cf_attach->ca_match)(parent, match, aux)); } /* * Probe the requested scsi bus. It must be already set up. * -1 requests all set up scsi busses. * target and lun optionally narrow the search if not -1 */ int scsi_probe_busses(bus, target, lun) int bus, target, lun; { if (bus == -1) { for (bus = 0; bus < scsibus_cd.cd_ndevs; bus++) if (scsibus_cd.cd_devs[bus]) scsi_probe_bus(bus, target, lun); return 0; } else { return scsi_probe_bus(bus, target, lun); } } /* * Probe the requested scsi bus. It must be already set up. * target and lun optionally narrow the search if not -1 */ int scsi_probe_bus(bus, target, lun) int bus, target, lun; { struct scsibus_softc *scsi; int maxtarget, mintarget, maxlun, minlun; u_int8_t scsi_addr; if (bus < 0 || bus >= scsibus_cd.cd_ndevs) return ENXIO; scsi = scsibus_cd.cd_devs[bus]; if (!scsi) return ENXIO; scsi_addr = scsi->adapter_link->adapter_target; if (target == -1) { maxtarget = scsi->adapter_link->adapter_buswidth - 1; mintarget = 0; } else { if (target < 0 || target >= scsi->adapter_link->adapter_buswidth) return EINVAL; maxtarget = mintarget = target; } if (lun == -1) { maxlun = 7; minlun = 0; } else { if (lun < 0 || lun > 7) return EINVAL; maxlun = minlun = lun; } for (target = mintarget; target <= maxtarget; target++) { if (target == scsi_addr) continue; for (lun = minlun; lun <= maxlun; lun++) { /* * See if there's a device present, and configure it. */ scsi_probedev(scsi, target, lun); if ((scsi->moreluns & (1 << target)) == 0) break; /* otherwise something says we should look further */ } } return 0; } void scsi_strvis(dst, src, len) u_char *dst, *src; int len; { /* Trim leading and trailing blanks and NULs. */ while (len > 0 && (src[0] == ' ' || src[0] == '\0')) ++src, --len; while (len > 0 && (src[len-1] == ' ' || src[len-1] == '\0')) --len; while (len > 0) { if (*src < 0x20 || *src >= 0x80) { /* non-printable characters */ *dst++ = '\\'; *dst++ = ((*src & 0300) >> 6) + '0'; *dst++ = ((*src & 0070) >> 3) + '0'; *dst++ = ((*src & 0007) >> 0) + '0'; } else if (*src == '\\') { /* quote characters */ *dst++ = '\\'; *dst++ = '\\'; } else { /* normal characters */ *dst++ = *src; } ++src, --len; } *dst++ = 0; } struct scsi_quirk_inquiry_pattern { struct scsi_inquiry_pattern pattern; u_int8_t quirks; }; struct scsi_quirk_inquiry_pattern scsi_quirk_patterns[] = { {{T_CDROM, T_REMOV, "CHINON ", "CD-ROM CDS-431 ", ""}, SDEV_NOLUNS}, {{T_CDROM, T_REMOV, "Chinon ", "CD-ROM CDS-525 ", ""}, SDEV_NOLUNS}, {{T_CDROM, T_REMOV, "CHINON ", "CD-ROM CDS-535 ", ""}, SDEV_NOLUNS}, {{T_CDROM, T_REMOV, "DENON ", "DRD-25X ", "V"}, SDEV_NOLUNS}, {{T_CDROM, T_REMOV, "IMS ", "CDD521/10 ", "2.06"}, SDEV_NOLUNS}, {{T_CDROM, T_REMOV, "MATSHITA", "CD-ROM CR-5XX ", "1.0b"}, SDEV_NOLUNS}, {{T_CDROM, T_REMOV, "MEDIAVIS", "CDR-H93MV ", "1.31"}, SDEV_NOLUNS}, {{T_CDROM, T_REMOV, "NEC ", "CD-ROM DRIVE:55 ", ""}, SDEV_NOLUNS}, {{T_CDROM, T_REMOV, "NEC ", "CD-ROM DRIVE:83 ", ""}, SDEV_NOLUNS}, {{T_CDROM, T_REMOV, "NEC ", "CD-ROM DRIVE:84 ", ""}, SDEV_NOLUNS}, {{T_CDROM, T_REMOV, "NEC ", "CD-ROM DRIVE:210", "1.0"}, SDEV_NOLUNS}, {{T_CDROM, T_REMOV, "NEC ", "CD-ROM DRIVE:841", ""}, SDEV_NOLUNS}, {{T_CDROM, T_REMOV, "SONY ", "CD-ROM CDU-541 ", ""}, SDEV_NOLUNS}, {{T_CDROM, T_REMOV, "SONY ", "CD-ROM CDU-55S ", ""}, SDEV_NOLUNS}, {{T_CDROM, T_REMOV, "SONY ", "CD-ROM CDU-8003A", ""}, SDEV_NOLUNS}, {{T_CDROM, T_REMOV, "SONY ", "CD-ROM CDU-8012 ", ""}, SDEV_NOLUNS}, {{T_CDROM, T_REMOV, "TEAC ", "CD-ROM ", "1.06"}, SDEV_NOLUNS}, {{T_CDROM, T_REMOV, "TEAC ", "CD-ROM CD-56S ", "1.0B"}, SDEV_NOLUNS}, {{T_CDROM, T_REMOV, "TEXEL ", "CD-ROM ", "1.06"}, SDEV_NOLUNS}, {{T_CDROM, T_REMOV, "TEXEL ", "CD-ROM DM-XX24 K", "1.10"}, SDEV_NOLUNS}, {{T_CDROM, T_REMOV, "ShinaKen", "CD-ROM DM-3x1S", "1.04"}, SDEV_NOLUNS}, {{T_OPTICAL, T_REMOV, "EPSON ", "OMD-5010 ", "3.08"}, SDEV_NOLUNS}, {{T_OPTICAL, T_REMOV, "FUJITSU", "M2513A", "0800"}, SDEV_NOMODESENSE}, {{T_OPTICAL, T_REMOV, "DELTIS ", "MOS321 ", "3.30"}, SDEV_NOMODESENSE}, {{T_DIRECT, T_FIXED, "DEC ", "RZ55 (C) DEC", ""}, SDEV_AUTOSAVE}, {{T_DIRECT, T_FIXED, "EMULEX ", "MD21/S2 ESDI", "A00"}, SDEV_FORCELUNS}, {{T_DIRECT, T_FIXED, "MAXTOR ", "XT-3280 ", ""}, SDEV_NOLUNS}, {{T_DIRECT, T_FIXED, "MAXTOR ", "XT-4380S ", ""}, SDEV_NOLUNS}, {{T_DIRECT, T_FIXED, "MAXTOR ", "MXT-1240S ", ""}, SDEV_NOLUNS}, {{T_DIRECT, T_FIXED, "MAXTOR ", "XT-4170S ", ""}, SDEV_NOLUNS}, {{T_DIRECT, T_FIXED, "MAXTOR ", "XT-8760S", ""}, SDEV_NOLUNS}, {{T_DIRECT, T_FIXED, "MAXTOR ", "LXT-213S ", ""}, SDEV_NOLUNS}, {{T_DIRECT, T_FIXED, "MAXTOR ", "LXT-213S SUN0207", ""}, SDEV_NOLUNS}, {{T_DIRECT, T_FIXED, "MAXTOR ", "LXT-200S ", ""}, SDEV_NOLUNS}, {{T_DIRECT, T_FIXED, "MST ", "SnapLink ", ""}, SDEV_NOLUNS}, {{T_DIRECT, T_FIXED, "NEC ", "D3847 ", "0307"}, SDEV_NOLUNS}, {{T_DIRECT, T_FIXED, "QUANTUM ", "LPS525S ", ""}, SDEV_NOLUNS}, {{T_DIRECT, T_FIXED, "QUANTUM ", "P105S 910-10-94x", ""}, SDEV_NOLUNS}, {{T_DIRECT, T_FIXED, "QUANTUM ", "PD1225S ", ""}, SDEV_NOLUNS}, {{T_DIRECT, T_FIXED, "QUANTUM ", "PD210S SUN0207", ""}, SDEV_NOLUNS}, {{T_DIRECT, T_FIXED, "RODIME ", "RO3000S ", ""}, SDEV_NOLUNS}, {{T_DIRECT, T_FIXED, "SEAGATE ", "ST157N ", ""}, SDEV_NOLUNS}, {{T_DIRECT, T_FIXED, "SEAGATE ", "ST296 ", ""}, SDEV_NOLUNS}, {{T_DIRECT, T_FIXED, "SEAGATE ", "ST296N ", ""}, SDEV_NOLUNS}, {{T_DIRECT, T_FIXED, "TOSHIBA ", "MK538FB ", "6027"}, SDEV_NOLUNS}, {{T_DIRECT, T_REMOV, "iomega", "jaz 1GB", ""}, SDEV_NOMODESENSE}, {{T_DIRECT, T_REMOV, "IOMEGA", "ZIP 100", ""}, SDEV_NOMODESENSE}, {{T_DIRECT, T_FIXED, "IBM", "0661467", "G"}, SDEV_NOMODESENSE}, /* XXX: QIC-36 tape behind Emulex adapter. Very broken. */ {{T_SEQUENTIAL, T_REMOV, " ", " ", " "}, SDEV_NOLUNS}, {{T_SEQUENTIAL, T_REMOV, "CALIPER ", "CP150 ", ""}, SDEV_NOLUNS}, {{T_SEQUENTIAL, T_REMOV, "EXABYTE ", "EXB-8200 ", ""}, SDEV_NOLUNS}, {{T_SEQUENTIAL, T_REMOV, "SONY ", "SDT-2000 ", "2.09"}, SDEV_NOLUNS}, {{T_SEQUENTIAL, T_REMOV, "SONY ", "SDT-5000 ", "3."}, SDEV_NOSYNCWIDE}, {{T_SEQUENTIAL, T_REMOV, "SONY ", "SDT-5200 ", "3."}, SDEV_NOLUNS}, {{T_SEQUENTIAL, T_REMOV, "TANDBERG", " TDC 3600 ", ""}, SDEV_NOLUNS}, /* Following entry reported as a Tandberg 3600; ref. PR1933 */ {{T_SEQUENTIAL, T_REMOV, "ARCHIVE ", "VIPER 150 21247", ""}, SDEV_NOLUNS}, {{T_SEQUENTIAL, T_REMOV, "WANGTEK ", "5099ES SCSI", ""}, SDEV_NOLUNS}, {{T_SEQUENTIAL, T_REMOV, "WANGTEK ", "5150ES SCSI", ""}, SDEV_NOLUNS}, {{T_SEQUENTIAL, T_REMOV, "WangDAT ", "Model 1300 ", "02.4"}, SDEV_NOSYNCWIDE}, {{T_SEQUENTIAL, T_REMOV, "WangDAT ", "Model 2600 ", "01.7"}, SDEV_NOSYNCWIDE}, {{T_SEQUENTIAL, T_REMOV, "WangDAT ", "Model 3200 ", "02.2"}, SDEV_NOSYNCWIDE}, }; /* * Print out autoconfiguration information for a subdevice. * * This is a slight abuse of 'standard' autoconfiguration semantics, * because 'print' functions don't normally print the colon and * device information. However, in this case that's better than * either printing redundant information before the attach message, * or having the device driver call a special function to print out * the standard device information. */ int scsibusprint(aux, pnp) void *aux; const char *pnp; { struct scsibus_attach_args *sa = aux; struct scsi_inquiry_data *inqbuf; u_int8_t type; boolean removable; char *dtype, *qtype; char vendor[33], product[65], revision[17]; int target, lun; if (pnp != NULL) printf("%s", pnp); inqbuf = sa->sa_inqbuf; target = sa->sa_sc_link->target; lun = sa->sa_sc_link->lun; type = inqbuf->device & SID_TYPE; removable = inqbuf->dev_qual2 & SID_REMOVABLE ? 1 : 0; /* * Figure out basic device type and qualifier. */ dtype = 0; switch (inqbuf->device & SID_QUAL) { case SID_QUAL_LU_OK: qtype = ""; break; case SID_QUAL_LU_OFFLINE: qtype = " offline"; break; case SID_QUAL_RSVD: case SID_QUAL_BAD_LU: panic("scsibusprint: impossible qualifier"); default: qtype = ""; dtype = "vendor-unique"; break; } if (dtype == 0) { switch (type) { case T_DIRECT: dtype = "direct"; break; case T_SEQUENTIAL: dtype = "sequential"; break; case T_PRINTER: dtype = "printer"; break; case T_PROCESSOR: dtype = "processor"; break; case T_CDROM: dtype = "cdrom"; break; case T_WORM: dtype = "worm"; break; case T_SCANNER: dtype = "scanner"; break; case T_OPTICAL: dtype = "optical"; break; case T_CHANGER: dtype = "changer"; break; case T_COMM: dtype = "communication"; break; case T_NODEVICE: panic("scsibusprint: impossible device type"); default: dtype = "unknown"; break; } } scsi_strvis(vendor, inqbuf->vendor, 8); scsi_strvis(product, inqbuf->product, 16); scsi_strvis(revision, inqbuf->revision, 4); printf(" targ %d lun %d: <%s, %s, %s> SCSI%d %d/%s %s%s", target, lun, vendor, product, revision, inqbuf->version & SID_ANSII, type, dtype, removable ? "removable" : "fixed", qtype); return (UNCONF); } /* * given a target and lu, ask the device what * it is, and find the correct driver table * entry. */ void scsi_probedev(scsi, target, lun) struct scsibus_softc *scsi; int target, lun; { struct scsi_link *sc_link; static struct scsi_inquiry_data inqbuf; struct scsi_quirk_inquiry_pattern *finger; int checkdtype, priority; struct scsibus_attach_args sa; struct cfdata *cf; /* Skip this slot if it is already attached. */ if (scsi->sc_link[target][lun]) return; sc_link = malloc(sizeof(*sc_link), M_DEVBUF, M_NOWAIT); *sc_link = *scsi->adapter_link; sc_link->target = target; sc_link->lun = lun; sc_link->device = &probe_switch; sc_link->inquiry_flags = 0; /* * Ask the device what it is */ #ifdef SCSIDEBUG if (((1 << target) & scsidebug_targets) && ((1 << lun) & scsidebug_luns)) sc_link->flags |= scsidebug_level; #endif /* SCSIDEBUG */ (void) scsi_test_unit_ready(sc_link, SCSI_AUTOCONF | SCSI_IGNORE_ILLEGAL_REQUEST | SCSI_IGNORE_NOT_READY | SCSI_IGNORE_MEDIA_CHANGE); #ifdef SCSI_2_DEF /* some devices need to be told to go to SCSI2 */ /* However some just explode if you tell them this.. leave it out */ scsi_change_def(sc_link, SCSI_AUTOCONF | SCSI_SILENT); #endif /* SCSI_2_DEF */ /* Now go ask the device all about itself. */ bzero(&inqbuf, sizeof(inqbuf)); if (scsi_inquire(sc_link, &inqbuf, SCSI_AUTOCONF) != 0) goto bad; { int len = inqbuf.additional_length; while (len < 3) inqbuf.unused[len++] = '\0'; while (len < 3 + 28) inqbuf.unused[len++] = ' '; } finger = (struct scsi_quirk_inquiry_pattern *)scsi_inqmatch(&inqbuf, (caddr_t)scsi_quirk_patterns, sizeof(scsi_quirk_patterns)/sizeof(scsi_quirk_patterns[0]), sizeof(scsi_quirk_patterns[0]), &priority); if (priority != 0) sc_link->quirks |= finger->quirks; if ((inqbuf.version & SID_ANSII) == 0 && (sc_link->quirks & SDEV_FORCELUNS) == 0) sc_link->quirks |= SDEV_NOLUNS; if ((sc_link->quirks & SDEV_NOLUNS) == 0) scsi->moreluns |= (1 << target); /* * Save INQUIRY "flags" (SID_Linked, etc.) for low-level drivers. */ sc_link->inquiry_flags = inqbuf.flags; /* * note what BASIC type of device it is */ if ((inqbuf.dev_qual2 & SID_REMOVABLE) != 0) sc_link->flags |= SDEV_REMOVABLE; /* * Any device qualifier that has the top bit set (qualifier&4 != 0) * is vendor specific and won't match in this switch. * All we do here is throw out bad/negative responses. */ checkdtype = 0; switch (inqbuf.device & SID_QUAL) { case SID_QUAL_LU_OK: case SID_QUAL_LU_OFFLINE: checkdtype = 1; break; case SID_QUAL_RSVD: case SID_QUAL_BAD_LU: goto bad; default: break; } if (checkdtype) { switch (inqbuf.device & SID_TYPE) { case T_DIRECT: case T_SEQUENTIAL: case T_PRINTER: case T_PROCESSOR: case T_CDROM: case T_WORM: case T_SCANNER: case T_OPTICAL: case T_CHANGER: case T_COMM: default: break; case T_NODEVICE: goto bad; } } sa.sa_sc_link = sc_link; sa.sa_inqbuf = &inqbuf; if ((cf = config_search(scsibussubmatch, (struct device *)scsi, &sa)) != 0) { scsi->sc_link[target][lun] = sc_link; config_attach((struct device *)scsi, cf, &sa, scsibusprint); } else { scsibusprint(&sa, scsi->sc_dev.dv_xname); printf(" not configured\n"); goto bad; } return; bad: free(sc_link, M_DEVBUF); return; } /* * Return a priority based on how much of the inquiry data matches * the patterns for the particular driver. */ caddr_t scsi_inqmatch(inqbuf, base, nmatches, matchsize, bestpriority) struct scsi_inquiry_data *inqbuf; caddr_t base; int nmatches, matchsize; int *bestpriority; { u_int8_t type; boolean removable; caddr_t bestmatch; /* Include the qualifier to catch vendor-unique types. */ type = inqbuf->device; removable = inqbuf->dev_qual2 & SID_REMOVABLE ? T_REMOV : T_FIXED; for (*bestpriority = 0, bestmatch = 0; nmatches--; base += matchsize) { struct scsi_inquiry_pattern *match = (void *)base; int priority, len; if (type != match->type) continue; if (removable != match->removable) continue; priority = 2; len = strlen(match->vendor); if (bcmp(inqbuf->vendor, match->vendor, len)) continue; priority += len; len = strlen(match->product); if (bcmp(inqbuf->product, match->product, len)) continue; priority += len; len = strlen(match->revision); if (bcmp(inqbuf->revision, match->revision, len)) continue; priority += len; #if SCSIDEBUG printf("scsi_inqmatch: %d/%d/%d <%s, %s, %s>\n", priority, match->type, match->removable, match->vendor, match->product, match->revision); #endif if (priority > *bestpriority) { *bestpriority = priority; bestmatch = base; } } return (bestmatch); }