550 lines
14 KiB
C
550 lines
14 KiB
C
/* $NetBSD: scsiconf.c,v 1.28 1995/04/04 05:44:32 mycroft 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 <sys/types.h>
|
|
#include <sys/param.h>
|
|
#include <sys/systm.h>
|
|
#include <sys/malloc.h>
|
|
#include <sys/device.h>
|
|
|
|
#include <scsi/scsi_all.h>
|
|
#include <scsi/scsiconf.h>
|
|
|
|
#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 *));
|
|
|
|
struct cfdriver scsibuscd = {
|
|
NULL, "scsibus", scsibusmatch, scsibusattach, DV_DULL,
|
|
sizeof(struct scsibus_softc)
|
|
};
|
|
|
|
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;
|
|
|
|
sc_link_proto->scsibus = sb->sc_dev.dv_unit;
|
|
sb->adapter_link = sc_link_proto;
|
|
printf("\n");
|
|
|
|
#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_driver->cd_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 < scsibuscd.cd_ndevs; bus++)
|
|
if (scsibuscd.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 >= scsibuscd.cd_ndevs)
|
|
return ENXIO;
|
|
scsi = scsibuscd.cd_devs[bus];
|
|
if (!scsi)
|
|
return ENXIO;
|
|
|
|
scsi_addr = scsi->adapter_link->adapter_target;
|
|
|
|
if (target == -1) {
|
|
maxtarget = 7;
|
|
mintarget = 0;
|
|
} else {
|
|
if (target < 0 || target > 7)
|
|
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. */
|
|
while (len > 0 && src[0] == ' ')
|
|
++src, --len;
|
|
while (len > 0 && src[len-1] == ' ')
|
|
--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 ", "H42", SDEV_NOLUNS},
|
|
{T_CDROM, T_REMOV,
|
|
"CHINON ", "CD-ROM CDS-535 ", "Q14", 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,
|
|
"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: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,
|
|
"TEAC ", "CD-ROM ", "1.06", SDEV_NOLUNS},
|
|
{T_CDROM, T_REMOV,
|
|
"TEXEL ", "CD-ROM ", "1.06", SDEV_NOLUNS},
|
|
{T_CDROM, T_REMOV,
|
|
"MEDIAVIS", "CDR-H93MV ", "1.31", SDEV_NOLUNS},
|
|
|
|
{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 SUN0207", "", SDEV_NOLUNS},
|
|
{T_DIRECT, T_FIXED,
|
|
"RODIME ", "RO3000S ", "2.33", SDEV_NOLUNS},
|
|
{T_DIRECT, T_FIXED,
|
|
"SEAGATE ", "ST157N ", "\004|j", SDEV_NOLUNS},
|
|
{T_DIRECT, T_FIXED,
|
|
"SEAGATE ", "ST296 ", "921", SDEV_NOLUNS},
|
|
{T_DIRECT, T_FIXED,
|
|
"QUANTUM ", "LPS525S ", "3110", SDEV_NOLUNS},
|
|
{T_DIRECT, T_FIXED,
|
|
"QUANTUM ", "PD1225S ", "3110", 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,
|
|
"TANDBERG", " TDC 3600 ", "", SDEV_NOLUNS},
|
|
|
|
{T_SEQUENTIAL, T_REMOV,
|
|
"SONY ", "SDT-5000 ", "3.17", SDEV_NOSYNCWIDE},
|
|
{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},
|
|
};
|
|
|
|
/*
|
|
* 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 priority;
|
|
u_int8_t type;
|
|
boolean removable;
|
|
char *dtype, *qtype;
|
|
char vendor[33], product[65], revision[17];
|
|
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;
|
|
|
|
/*
|
|
* Ask the device what it is
|
|
*/
|
|
#ifdef SCSIDEBUG
|
|
if (target == DEBUGTARGET && lun == DEBUGLUN)
|
|
sc_link->flags |= DEBUGLEVEL;
|
|
#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_NOLUNS;
|
|
|
|
if ((sc_link->quirks & SDEV_NOLUNS) == 0)
|
|
scsi->moreluns |= (1 << target);
|
|
|
|
/*
|
|
* note what BASIC type of device it is
|
|
*/
|
|
type = inqbuf.device & SID_TYPE;
|
|
removable = inqbuf.dev_qual2 & SID_REMOVABLE ? 1 : 0;
|
|
|
|
if (removable)
|
|
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.
|
|
*/
|
|
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:
|
|
goto bad;
|
|
|
|
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:
|
|
goto bad;
|
|
default:
|
|
dtype = "unknown";
|
|
break;
|
|
}
|
|
}
|
|
|
|
scsi_strvis(vendor, inqbuf.vendor, 8);
|
|
scsi_strvis(product, inqbuf.product, 16);
|
|
scsi_strvis(revision, inqbuf.revision, 4);
|
|
|
|
printf("%s targ %d lun %d: <%s, %s, %s> SCSI%d %d/%s %s%s\n",
|
|
((struct device *)sc_link->adapter_softc)->dv_xname,
|
|
target, lun, vendor, product, revision,
|
|
inqbuf.version & SID_ANSII, type, dtype,
|
|
removable ? "removable" : "fixed", qtype);
|
|
|
|
sa.sa_sc_link = sc_link;
|
|
sa.sa_inqbuf = &inqbuf;
|
|
|
|
if ((cf = config_search(scsibussubmatch, (struct device *)scsi, &sa)) != 0) {
|
|
config_attach((struct device *)scsi, cf, &sa, NULL);
|
|
scsi->sc_link[target][lun] = sc_link;
|
|
} else
|
|
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 0
|
|
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);
|
|
}
|