/* $NetBSD: sd_scsi.c,v 1.26 2002/10/04 03:43:06 soren Exp $ */ /*- * Copyright (c) 1998 The NetBSD Foundation, Inc. * All rights reserved. * * This code is derived from software contributed to The NetBSD Foundation * by Charles M. Hannum. * * 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 the NetBSD * Foundation, Inc. and its contributors. * 4. Neither the name of The NetBSD Foundation nor the names of its * contributors may be used to endorse or promote products derived * from this software without specific prior written permission. * * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS * ``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 FOUNDATION OR CONTRIBUTORS * 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@dialix.oz.au) * 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@dialix.oz.au) Sept 1992 */ #include __KERNEL_RCSID(0, "$NetBSD: sd_scsi.c,v 1.26 2002/10/04 03:43:06 soren Exp $"); #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include int sd_scsibus_match __P((struct device *, struct cfdata *, void *)); void sd_scsibus_attach __P((struct device *, struct device *, void *)); CFATTACH_DECL(sd_scsibus, sizeof(struct sd_softc), sd_scsibus_match, sd_scsibus_attach, sddetach, sdactivate); struct scsipi_inquiry_pattern sd_scsibus_patterns[] = { {T_DIRECT, T_FIXED, "", "", ""}, {T_DIRECT, T_REMOV, "", "", ""}, {T_OPTICAL, T_FIXED, "", "", ""}, {T_OPTICAL, T_REMOV, "", "", ""}, }; struct sd_scsibus_mode_sense_data { struct scsipi_mode_header header; struct scsi_blk_desc blk_desc; union scsi_disk_pages pages; }; static int sd_scsibus_mode_sense __P((struct sd_softc *, struct sd_scsibus_mode_sense_data *, int, int)); static int sd_scsibus_get_parms __P((struct sd_softc *, struct disk_parms *, int)); static int sd_scsibus_get_optparms __P((struct sd_softc *, struct disk_parms *, int)); static int sd_scsibus_flush __P((struct sd_softc *, int)); static int sd_scsibus_getcache __P((struct sd_softc *, int *)); static int sd_scsibus_setcache __P((struct sd_softc *, int)); const struct sd_ops sd_scsibus_ops = { sd_scsibus_get_parms, sd_scsibus_flush, sd_scsibus_getcache, sd_scsibus_setcache, }; int sd_scsibus_match(parent, match, aux) struct device *parent; struct cfdata *match; void *aux; { struct scsipibus_attach_args *sa = aux; int priority; if (scsipi_periph_bustype(sa->sa_periph) != SCSIPI_BUSTYPE_SCSI) return (0); (void)scsipi_inqmatch(&sa->sa_inqbuf, (caddr_t)sd_scsibus_patterns, sizeof(sd_scsibus_patterns) / sizeof(sd_scsibus_patterns[0]), sizeof(sd_scsibus_patterns[0]), &priority); return (priority); } /* * The routine called by the low level scsi routine when it discovers * a device suitable for this driver. */ void sd_scsibus_attach(parent, self, aux) struct device *parent, *self; void *aux; { struct sd_softc *sd = (void *)self; struct scsipibus_attach_args *sa = aux; struct scsipi_periph *periph = sa->sa_periph; SC_DEBUG(periph, SCSIPI_DB2, ("sd_scsibus_attach: ")); sd->type = (sa->sa_inqbuf.type & SID_TYPE); scsipi_strvis(sd->name, 16, sa->sa_inqbuf.product, 16); /* * Note if this device is ancient. This is used in sdminphys(). */ if (periph->periph_version == 0) sd->flags |= SDF_ANCIENT; sdattach(parent, sd, periph, &sd_scsibus_ops); } static int sd_scsibus_mode_sense(sd, scsipi_sense, page, flags) struct sd_softc *sd; struct sd_scsibus_mode_sense_data *scsipi_sense; int page, flags; { /* * Make sure the sense buffer is clean before we do * the mode sense, so that checks for bogus values of * 0 will work in case the mode sense fails. */ memset(scsipi_sense, 0, sizeof(*scsipi_sense)); if ((sd->sc_periph->periph_quirks & PQUIRK_ONLYBIG) && !(sd->sc_periph->periph_quirks & PQUIRK_NOBIGMODESENSE)) { return scsipi_mode_sense_big(sd->sc_periph, 0, page, (struct scsipi_mode_header_big*)&scsipi_sense->header, sizeof(*scsipi_sense), flags | XS_CTL_SILENT | XS_CTL_DATA_ONSTACK, SDRETRIES, 6000); } else { return scsipi_mode_sense(sd->sc_periph, 0, page, &scsipi_sense->header, sizeof(*scsipi_sense), flags | XS_CTL_SILENT | XS_CTL_DATA_ONSTACK, SDRETRIES, 6000); } } static int sd_scsibus_get_optparms(sd, dp, flags) struct sd_softc *sd; struct disk_parms *dp; int flags; { struct sd_scsibus_mode_sense_data scsipi_sense; u_long sectors; int error; dp->blksize = 512; if ((sectors = scsipi_size(sd->sc_periph, flags)) == 0) return (SDGP_RESULT_OFFLINE); /* XXX? */ /* XXX * It is better to get the following params from the * mode sense page 6 only (optical device parameter page). * However, there are stupid optical devices which does NOT * support the page 6. Ghaa.... */ error = scsipi_mode_sense(sd->sc_periph, 0, 0x3f, &scsipi_sense.header, sizeof(struct scsipi_mode_header) + sizeof(struct scsi_blk_desc), flags | XS_CTL_DATA_ONSTACK, SDRETRIES, 6000); if (error != 0) return (SDGP_RESULT_OFFLINE); /* XXX? */ dp->blksize = _3btol(scsipi_sense.blk_desc.blklen); if (dp->blksize == 0) dp->blksize = 512; /* * Create a pseudo-geometry. */ dp->heads = 64; dp->sectors = 32; dp->cyls = sectors / (dp->heads * dp->sectors); dp->disksize = sectors; return (SDGP_RESULT_OK); } /* * Get the scsi driver to send a full inquiry to the * device and use the * results to fill out the disk parameter structure. */ static int sd_scsibus_get_parms(sd, dp, flags) struct sd_softc *sd; struct disk_parms *dp; int flags; { struct sd_scsibus_mode_sense_data scsipi_sense; u_long sectors; int page; int error; dp->rot_rate = 3600; /* XXX any way of getting this? */ /* * If offline, the SDEV_MEDIA_LOADED flag will be * cleared by the caller if necessary. */ if (sd->type == T_OPTICAL) return (sd_scsibus_get_optparms(sd, dp, flags)); if ((error = sd_scsibus_mode_sense(sd, &scsipi_sense, page = 4, flags)) == 0) { SC_DEBUG(sd->sc_periph, SCSIPI_DB3, ("%d cyls, %d heads, %d precomp, %d red_write, %d land_zone\n", _3btol(scsipi_sense.pages.rigid_geometry.ncyl), scsipi_sense.pages.rigid_geometry.nheads, _2btol(scsipi_sense.pages.rigid_geometry.st_cyl_wp), _2btol(scsipi_sense.pages.rigid_geometry.st_cyl_rwc), _2btol(scsipi_sense.pages.rigid_geometry.land_zone))); /* * KLUDGE!! (for zone recorded disks) * give a number of sectors so that sec * trks * cyls * is <= disk_size * can lead to wasted space! THINK ABOUT THIS ! */ dp->heads = scsipi_sense.pages.rigid_geometry.nheads; dp->cyls = _3btol(scsipi_sense.pages.rigid_geometry.ncyl); dp->blksize = _3btol(scsipi_sense.blk_desc.blklen); if (dp->heads == 0 || dp->cyls == 0) goto fake_it; if (dp->blksize == 0) dp->blksize = 512; sectors = scsipi_size(sd->sc_periph, flags); dp->disksize = sectors; sectors /= (dp->heads * dp->cyls); dp->sectors = sectors; /* XXX dubious on SCSI */ return (SDGP_RESULT_OK); } if ((error = sd_scsibus_mode_sense(sd, &scsipi_sense, page = 5, flags)) == 0) { dp->heads = scsipi_sense.pages.flex_geometry.nheads; dp->cyls = _2btol(scsipi_sense.pages.flex_geometry.ncyl); dp->blksize = _3btol(scsipi_sense.blk_desc.blklen); dp->sectors = scsipi_sense.pages.flex_geometry.ph_sec_tr; dp->disksize = dp->heads * dp->cyls * dp->sectors; if (dp->disksize == 0) goto fake_it; if (dp->blksize == 0) dp->blksize = 512; return (SDGP_RESULT_OK); } fake_it: if ((sd->sc_periph->periph_quirks & PQUIRK_NOMODESENSE) == 0) { if (error == 0) printf("%s: mode sense (%d) returned nonsense", sd->sc_dev.dv_xname, page); else printf("%s: could not mode sense (4/5)", sd->sc_dev.dv_xname); printf("; using fictitious geometry\n"); } /* * use adaptec standard fictitious geometry * this depends on which controller (e.g. 1542C is * different. but we have to put SOMETHING here..) */ sectors = scsipi_size(sd->sc_periph, flags); if (sectors == 0) return (SDGP_RESULT_OFFLINE); /* XXX? */ dp->blksize = 512; dp->disksize = sectors; /* Try calling driver's method for figuring out geometry. */ if (sd->sc_periph->periph_channel->chan_adapter->adapt_getgeom == NULL || !(*sd->sc_periph->periph_channel->chan_adapter->adapt_getgeom) (sd->sc_periph, dp, sectors)) { /* * Use adaptec standard fictitious geometry * this depends on which controller (e.g. 1542C is * different. but we have to put SOMETHING here..) */ dp->heads = 64; dp->sectors = 32; dp->cyls = sectors / (64 * 32); } return (SDGP_RESULT_OK); } static int sd_scsibus_flush(sd, flags) struct sd_softc *sd; int flags; { struct scsipi_periph *periph = sd->sc_periph; struct scsi_synchronize_cache sync_cmd; /* * If the device is SCSI-2, issue a SYNCHRONIZE CACHE. * We issue with address 0 length 0, which should be * interpreted by the device as "all remaining blocks * starting at address 0". We ignore ILLEGAL REQUEST * in the event that the command is not supported by * the device, and poll for completion so that we know * that the cache has actually been flushed. * * Unless, that is, the device can't handle the SYNCHRONIZE CACHE * command, as indicated by our quirks flags. * * XXX What about older devices? */ if (periph->periph_version >= 2 && (periph->periph_quirks & PQUIRK_NOSYNCCACHE) == 0) { sd->flags |= SDF_FLUSHING; memset(&sync_cmd, 0, sizeof(sync_cmd)); sync_cmd.opcode = SCSI_SYNCHRONIZE_CACHE; return(scsipi_command(periph, (struct scsipi_generic *)&sync_cmd, sizeof(sync_cmd), NULL, 0, SDRETRIES, 100000, NULL, flags|XS_CTL_IGNORE_ILLEGAL_REQUEST)); } else return(0); } int sd_scsibus_getcache(sd, bitsp) struct sd_softc *sd; int *bitsp; { struct scsipi_periph *periph = sd->sc_periph; struct sd_scsibus_mode_sense_data scsipi_sense; int error, bits = 0; if (periph->periph_version < 2) return (EOPNOTSUPP); error = sd_scsibus_mode_sense(sd, &scsipi_sense, 8, 0); if (error) return (error); if ((scsipi_sense.pages.caching_params.flags & CACHING_RCD) == 0) bits |= DKCACHE_READ; if (scsipi_sense.pages.caching_params.flags & CACHING_WCE) bits |= DKCACHE_WRITE; if (scsipi_sense.pages.caching_params.pg_code & PGCODE_PS) bits |= DKCACHE_SAVE; error = sd_scsibus_mode_sense(sd, &scsipi_sense, SMS_PAGE_CTRL_CHANGEABLE|8, 0); if (error == 0) { if (scsipi_sense.pages.caching_params.flags & CACHING_RCD) bits |= DKCACHE_RCHANGE; if (scsipi_sense.pages.caching_params.flags & CACHING_WCE) bits |= DKCACHE_WCHANGE; } *bitsp = bits; return (0); } int sd_scsibus_setcache(sd, bits) struct sd_softc *sd; int bits; { struct scsipi_periph *periph = sd->sc_periph; struct sd_scsibus_mode_sense_data scsipi_sense; int error, size; uint8_t oflags, byte2 = 0; if (periph->periph_version < 2) return (EOPNOTSUPP); error = sd_scsibus_mode_sense(sd, &scsipi_sense, 8, 0); if (error) return (error); oflags = scsipi_sense.pages.caching_params.flags; if (bits & DKCACHE_READ) scsipi_sense.pages.caching_params.flags &= ~CACHING_RCD; else scsipi_sense.pages.caching_params.flags |= CACHING_RCD; if (bits & DKCACHE_WRITE) scsipi_sense.pages.caching_params.flags |= CACHING_WCE; else scsipi_sense.pages.caching_params.flags &= ~CACHING_WCE; if (oflags == scsipi_sense.pages.caching_params.flags) return (0); scsipi_sense.pages.caching_params.pg_code &= PGCODE_MASK; if (bits & DKCACHE_SAVE) byte2 |= SMS_SP; size = sizeof(scsipi_sense.header) + sizeof(scsipi_sense.blk_desc) + sizeof(struct scsipi_mode_page_header) + scsipi_sense.pages.caching_params.pg_length; if ((sd->sc_periph->periph_quirks & PQUIRK_ONLYBIG) && !(sd->sc_periph->periph_quirks & PQUIRK_NOBIGMODESENSE)) { scsipi_sense.header.data_length = 0; /* 2nd length byte in BIG header */ scsipi_sense.header.medium_type = 0; error = scsipi_mode_select_big(sd->sc_periph, SMS_PF, (struct scsipi_mode_header_big*)&scsipi_sense.header, size, /* XS_CTL_SILENT | */ XS_CTL_DATA_ONSTACK, SDRETRIES, 10000); } else { scsipi_sense.header.data_length = 0; error = scsipi_mode_select(sd->sc_periph, SMS_PF, &scsipi_sense.header, size, /* XS_CTL_SILENT | */ XS_CTL_DATA_ONSTACK, SDRETRIES, 10000); } return (error); }