/*      $NetBSD: scsiconf.c,v 1.306 2024/11/22 06:52:57 mlelstv Exp $   */

/*-
 * Copyright (c) 1998, 1999, 2004 The NetBSD Foundation, Inc.
 * All rights reserved.
 *
 * This code is derived from software contributed to The NetBSD Foundation
 * by Charles M. Hannum; Jason R. Thorpe of the Numerical Aerospace
 * Simulation Facility, NASA Ames Research Center.
 *
 * 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.
 *
 * 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@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/cdefs.h>
__KERNEL_RCSID(0, "$NetBSD: scsiconf.c,v 1.306 2024/11/22 06:52:57 mlelstv Exp $");

#include <sys/param.h>
#include <sys/systm.h>
#include <sys/kernel.h>
#include <sys/proc.h>
#include <sys/kthread.h>
#include <sys/malloc.h>
#include <sys/mutex.h>
#include <sys/once.h>
#include <sys/device.h>
#include <sys/conf.h>
#include <sys/fcntl.h>
#include <sys/scsiio.h>
#include <sys/queue.h>
#include <sys/atomic.h>
#include <sys/kmem.h>

#include <dev/scsipi/scsi_all.h>
#include <dev/scsipi/scsipi_all.h>
#include <dev/scsipi/scsiconf.h>

#include "locators.h"

static const struct scsipi_periphsw scsi_probe_dev = {
        NULL,
        NULL,
        NULL,
        NULL,
};

struct scsi_initq {
        struct scsipi_channel *sc_channel;
        TAILQ_ENTRY(scsi_initq) scsi_initq;
};

static ONCE_DECL(scsi_conf_ctrl);
static TAILQ_HEAD(, scsi_initq) scsi_initq_head;
static kmutex_t                 scsibus_qlock;
static kcondvar_t               scsibus_qcv;

static int      scsi_probe_device(struct scsibus_softc *, int, int);

static int      scsibusmatch(device_t, cfdata_t, void *);
static void     scsibusattach(device_t, device_t, void *);
static int      scsibusdetach(device_t, int flags);
static int      scsibusrescan(device_t, const char *, const int *);
static void     scsidevdetached(device_t, device_t);

CFATTACH_DECL3_NEW(scsibus, sizeof(struct scsibus_softc),
    scsibusmatch, scsibusattach, scsibusdetach, NULL,
    scsibusrescan, scsidevdetached, DVF_DETACH_SHUTDOWN);

extern struct cfdriver scsibus_cd;

static dev_type_open(scsibusopen);
static dev_type_close(scsibusclose);
static dev_type_ioctl(scsibusioctl);

const struct cdevsw scsibus_cdevsw = {
        .d_open = scsibusopen,
        .d_close = scsibusclose,
        .d_read = noread,
        .d_write = nowrite,
        .d_ioctl = scsibusioctl,
        .d_stop = nostop,
        .d_tty = notty,
        .d_poll = nopoll,
        .d_mmap = nommap,
        .d_kqfilter = nokqfilter,
        .d_discard = nodiscard,
        .d_flag = D_OTHER | D_MPSAFE
};

static int      scsibusprint(void *, const char *);
static void     scsibus_discover_thread(void *);
static void     scsibus_config(struct scsibus_softc *);

static int
scsibus_init(void)
{

        TAILQ_INIT(&scsi_initq_head);
        mutex_init(&scsibus_qlock, MUTEX_DEFAULT, IPL_NONE);
        cv_init(&scsibus_qcv, "scsinitq");
        return 0;
}

static int
scsibusmatch(device_t parent, cfdata_t cf, void *aux)
{
        struct scsipi_channel *chan = aux;

        if (SCSIPI_BUSTYPE_TYPE(chan->chan_bustype->bustype_type) !=
            SCSIPI_BUSTYPE_SCSI)
                return 0;

        if (cf->cf_loc[SCSICF_CHANNEL] != chan->chan_channel &&
            cf->cf_loc[SCSICF_CHANNEL] != SCSICF_CHANNEL_DEFAULT)
                return (0);

        return (1);
}

static void
scsibusattach(device_t parent, device_t self, void *aux)
{
        struct scsibus_softc *sc = device_private(self);
        struct scsipi_channel *chan = aux;
        struct scsi_initq *scsi_initq;

        if (!pmf_device_register(self, NULL, NULL))
                aprint_error_dev(self, "couldn't establish power handler\n");

        sc->sc_dev = self;
        sc->sc_channel = chan;
        chan->chan_name = device_xname(sc->sc_dev);

        aprint_naive(": SCSI bus\n");
        aprint_normal(": %d target%s, %d lun%s per target\n",
            chan->chan_ntargets,
            chan->chan_ntargets == 1 ? "" : "s",
            chan->chan_nluns,
            chan->chan_nluns == 1 ? "" : "s");

        /*
         * XXX 
         * newer adapters support more than 256 outstanding commands
         * per periph and don't use the tag (they eventually allocate one
         * internally). Right now scsipi always allocate a tag and
         * is limited to 256 tags, per scsi specs.
         * this should be revisited
         */
        if (chan->chan_flags & SCSIPI_CHAN_OPENINGS) {
                if (chan->chan_max_periph > 256)
                        chan->chan_max_periph = 256;
        } else {
                if (chan->chan_adapter->adapt_max_periph > 256)
                        chan->chan_adapter->adapt_max_periph = 256;
        }

        if (atomic_inc_uint_nv(&chan_running(chan)) == 1)
                mutex_init(chan_mtx(chan), MUTEX_DEFAULT, IPL_BIO);

        cv_init(&chan->chan_cv_thr, "scshut");
        cv_init(&chan->chan_cv_comp, "sccomp");
        cv_init(&chan->chan_cv_xs, "xscmd");

        if (scsipi_adapter_addref(chan->chan_adapter))
                return;

        RUN_ONCE(&scsi_conf_ctrl, scsibus_init);

        /* Initialize the channel structure first */
        chan->chan_init_cb = NULL;
        chan->chan_init_cb_arg = NULL;

        scsi_initq = malloc(sizeof(struct scsi_initq), M_DEVBUF, M_WAITOK);
        scsi_initq->sc_channel = chan;
        TAILQ_INSERT_TAIL(&scsi_initq_head, scsi_initq, scsi_initq);
        config_pending_incr(sc->sc_dev);
        if (scsipi_channel_init(chan)) {
                aprint_error_dev(sc->sc_dev, "failed to init channel\n");
                return;
        }

        /*
         * Create the discover thread
         */
        if (kthread_create(PRI_NONE, 0, NULL, scsibus_discover_thread, sc,
            &chan->chan_dthread, "%s-d", chan->chan_name)) {
                aprint_error_dev(sc->sc_dev, "unable to create discovery "
                    "thread for channel %d\n", chan->chan_channel);
                return;
        }
}

static void
scsibus_discover_thread(void *arg)
{
        struct scsibus_softc *sc = arg;

        scsibus_config(sc);
        sc->sc_channel->chan_dthread = NULL;
        kthread_exit(0);
}

static void
scsibus_config(struct scsibus_softc *sc)
{
        struct scsipi_channel *chan = sc->sc_channel;
        struct scsi_initq *scsi_initq;

#ifndef SCSI_DELAY
#define SCSI_DELAY 2
#endif
        if ((chan->chan_flags & SCSIPI_CHAN_NOSETTLE) == 0 &&
            SCSI_DELAY > 0) {
                aprint_normal_dev(sc->sc_dev,
                    "waiting %d seconds for devices to settle...\n",
                    SCSI_DELAY);
                /* ...an identifier we know no one will use... */
                kpause("scsidly", false, SCSI_DELAY * hz, NULL);
        }

        /* Make sure the devices probe in scsibus order to avoid jitter. */
        mutex_enter(&scsibus_qlock);
        for (;;) {
                scsi_initq = TAILQ_FIRST(&scsi_initq_head);
                if (scsi_initq->sc_channel == chan)
                        break;
                cv_wait(&scsibus_qcv, &scsibus_qlock);
        }
        mutex_exit(&scsibus_qlock);

        scsi_probe_bus(sc, -1, -1);

        mutex_enter(&scsibus_qlock);
        TAILQ_REMOVE(&scsi_initq_head, scsi_initq, scsi_initq);
        cv_broadcast(&scsibus_qcv);
        mutex_exit(&scsibus_qlock);

        free(scsi_initq, M_DEVBUF);

        scsipi_adapter_delref(chan->chan_adapter);

        config_pending_decr(sc->sc_dev);
}

static int
scsibusdetach(device_t self, int flags)
{
        struct scsibus_softc *sc = device_private(self);
        struct scsipi_channel *chan = sc->sc_channel;
        int error;

        /*
         * Defer while discovery thread is running
         */
        while (chan->chan_dthread != NULL)
                kpause("scsibusdet", false, hz, NULL);

        /*
         * Detach all of the periphs.
         */
        error = scsipi_target_detach(chan, -1, -1, flags);
        if (error)
                return error;

        pmf_device_deregister(self);

        /*
         * Shut down the channel.
         */
        scsipi_channel_shutdown(chan);

        cv_destroy(&chan->chan_cv_xs);
        cv_destroy(&chan->chan_cv_comp);
        cv_destroy(&chan->chan_cv_thr);

        membar_release();
        if (atomic_dec_uint_nv(&chan_running(chan)) == 0) {
                membar_acquire();
                mutex_destroy(chan_mtx(chan));
        }

        return 0;
}

static int
lun_compar(const void *a, const void *b)
{
        const uint16_t * const la = a, * const lb = b;

        if (*la < *lb)
                return -1;
        if (*la > *lb)
                return 1;
        return 0;
}

static int
scsi_report_luns(struct scsibus_softc *sc, int target,
    uint16_t ** const luns, size_t *nluns)
{
        struct scsi_report_luns replun;
        struct scsi_report_luns_header *rlr;
        struct scsi_report_luns_lun *lunp;

        struct scsipi_channel *chan = sc->sc_channel;
        struct scsipi_inquiry_data inqbuf;
        struct scsipi_periph *periph;
        uint16_t tmp;

        int error;
        size_t i, rlrlen, rlrlenmin;

        memset(&replun, 0, sizeof(replun));

        periph = scsipi_alloc_periph(M_WAITOK);
        periph->periph_channel = chan;
        periph->periph_switch = &scsi_probe_dev;

        periph->periph_target = target;
        periph->periph_lun = 0;
        periph->periph_quirks = chan->chan_defquirks;

        if ((error = scsipi_inquire(periph, &inqbuf,
            XS_CTL_DISCOVERY | XS_CTL_SILENT)))
                goto end2;
        periph->periph_version = inqbuf.version & SID_ANSII;
        if (periph->periph_version < 3) {
                error = ENOTSUP;
                goto end2;
        }

        rlrlen = rlrlenmin = sizeof(*rlr) + sizeof(*lunp) * 1;

again:
        rlr = kmem_zalloc(rlrlen, KM_SLEEP);

        replun.opcode = SCSI_REPORT_LUNS;
        replun.selectreport = SELECTREPORT_NORMAL;
        _lto4b(rlrlen, replun.alloclen);

        error = scsipi_command(periph, (void *)&replun, sizeof(replun),
            (void *)rlr, rlrlen, SCSIPIRETRIES, 10000, NULL,
            XS_CTL_DATA_IN | XS_CTL_DISCOVERY | XS_CTL_SILENT);
        if (error)
                goto end;

        if (sizeof(*rlr) + _4btol(rlr->length) > rlrlen) {
                const size_t old_rlrlen = rlrlen;
                rlrlen = sizeof(*rlr) + uimin(_4btol(rlr->length),
                    16383 * sizeof(*lunp));
                kmem_free(rlr, old_rlrlen);
                rlr = NULL;
                if (rlrlen < rlrlenmin) {
                        error = EIO;
                        goto end;
                }
                goto again;
        }

        KASSERT(nluns != NULL);
        *nluns = (rlrlen - sizeof(*rlr)) / sizeof(*lunp);

        KASSERT(luns != NULL);
        *luns = kmem_alloc(*nluns * sizeof(**luns), KM_SLEEP);

        for (i = 0; i < *nluns; i++) {
                lunp = &((struct scsi_report_luns_lun *)&rlr[1])[i];
                switch (lunp->lun[0] & 0xC0) {
                default:
                        scsi_print_addr(periph);
                        printf("LUN %016"PRIx64" ignored\n", _8btol(lunp->lun));
                        (*luns)[i] = 0;
                        break;
                case 0x40:
                        (*luns)[i] = _2btol(&lunp->lun[0]) & 0x3FFF;
                        break;
                case 0x00:
                        (*luns)[i] = _2btol(&lunp->lun[0]) & 0x00FF;
                        break;
                }
        }

        kheapsort(*luns, *nluns, sizeof(**luns), lun_compar, &tmp);

end:
        if (rlr)
                kmem_free(rlr, rlrlen);
end2:
        scsipi_free_periph(periph);
        return error;
}

static void
scsi_discover_luns(struct scsibus_softc *sc, int target, int minlun, int maxlun)
{
        uint16_t *luns = NULL;  /* XXX gcc */
        size_t nluns = 0;       /* XXX gcc */

        if (scsi_report_luns(sc, target, &luns, &nluns) == 0) {
                for (size_t i = 0; i < nluns; i++)
                        if (luns[i] >= minlun && luns[i] <= maxlun)
                                scsi_probe_device(sc, target, luns[i]);
                kmem_free(luns, sizeof(*luns) * nluns);
                return;
        }

        for (int lun = minlun; lun <= maxlun; lun++) {
                /*
                 * See if there's a device present, and configure it.
                 */
                if (scsi_probe_device(sc, target, lun) == 0)
                        break;
                /* otherwise something says we should look further */
        }
}

/*
 * 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(struct scsibus_softc *sc, int target, int lun)
{
        struct scsipi_channel *chan = sc->sc_channel;
        int maxtarget, mintarget, maxlun, minlun;
        int error;

        if (target == -1) {
                maxtarget = chan->chan_ntargets - 1;
                mintarget = 0;
        } else {
                if (target < 0 || target >= chan->chan_ntargets)
                        return (EINVAL);
                maxtarget = mintarget = target;
        }

        if (lun == -1) {
                maxlun = chan->chan_nluns - 1;
                minlun = 0;
        } else {
                if (lun < 0 || lun >= chan->chan_nluns)
                        return (EINVAL);
                maxlun = minlun = lun;
        }

        /*
         * Some HBAs provide an abstracted view of the bus; give them an
         * opportunity to re-scan it before we do.
         */
        scsipi_adapter_ioctl(chan, SCBUSIOLLSCAN, NULL, 0, curproc);

        if ((error = scsipi_adapter_addref(chan->chan_adapter)) != 0)
                goto ret;
        for (target = mintarget; target <= maxtarget; target++) {
                if (target == chan->chan_id)
                        continue;

                scsi_discover_luns(sc, target, minlun, maxlun);

                /*
                 * Now that we've discovered all of the LUNs on this
                 * I_T Nexus, update the xfer mode for all of them
                 * that we know about.
                 */
                scsipi_set_xfer_mode(chan, target, 1);
        }

        scsipi_adapter_delref(chan->chan_adapter);
ret:
        return (error);
}

static int
scsibusrescan(device_t sc, const char *ifattr, const int *locators)
{

        KASSERT(ifattr && !strcmp(ifattr, "scsibus"));
        KASSERT(locators);

        return (scsi_probe_bus(device_private(sc),
                locators[SCSIBUSCF_TARGET], locators[SCSIBUSCF_LUN]));
}

static void
scsidevdetached(device_t self, device_t child)
{
        struct scsibus_softc *sc = device_private(self);
        struct scsipi_channel *chan = sc->sc_channel;
        struct scsipi_periph *periph;
        int target, lun;

        target = device_locator(child, SCSIBUSCF_TARGET);
        lun = device_locator(child, SCSIBUSCF_LUN);

        mutex_enter(chan_mtx(chan));

        periph = scsipi_lookup_periph_locked(chan, target, lun);
        KASSERT(periph != NULL && periph->periph_dev == child);

        scsipi_remove_periph(chan, periph);
        scsipi_free_periph(periph);

        mutex_exit(chan_mtx(chan));
}

/*
 * 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.
 */
static int
scsibusprint(void *aux, const char *pnp)
{
        struct scsipibus_attach_args *sa = aux;
        struct scsipi_inquiry_pattern *inqbuf;
        u_int8_t type;
        const char *dtype;
        char vendor[33], product[65], revision[17];
        int target, lun;

        if (pnp != NULL)
                aprint_normal("%s", pnp);

        inqbuf = &sa->sa_inqbuf;

        target = sa->sa_periph->periph_target;
        lun = sa->sa_periph->periph_lun;
        type = inqbuf->type & SID_TYPE;

        dtype = scsipi_dtype(type);

        strnvisx(vendor, sizeof(vendor), inqbuf->vendor, 8,
            VIS_TRIM|VIS_SAFE|VIS_OCTAL);
        strnvisx(product, sizeof(product), inqbuf->product, 16,
            VIS_TRIM|VIS_SAFE|VIS_OCTAL);
        strnvisx(revision, sizeof(revision), inqbuf->revision, 4,
            VIS_TRIM|VIS_SAFE|VIS_OCTAL);

        aprint_normal(" target %d lun %d: <%s, %s, %s> %s %s%s",
                      target, lun, vendor, product, revision, dtype,
                      inqbuf->removable ? "removable" : "fixed",
                      (sa->sa_periph->periph_opcs != NULL)
                        ? " timeout-info" : "");

        return (UNCONF);
}

static const struct scsi_quirk_inquiry_pattern scsi_quirk_patterns[] = {
        {{T_DIRECT, T_REMOV,
         "Apple   ", "iPod            ", ""},     PQUIRK_START},
        {{T_CDROM, T_REMOV,
         "CHINON  ", "CD-ROM CDS-431  ", ""},     PQUIRK_NOLUNS},
        {{T_CDROM, T_REMOV,
         "CHINON  ", "CD-ROM CDS-435  ", ""},     PQUIRK_NOLUNS},
        {{T_CDROM, T_REMOV,
         "Chinon  ", "CD-ROM CDS-525  ", ""},     PQUIRK_NOLUNS},
        {{T_CDROM, T_REMOV,
         "CHINON  ", "CD-ROM CDS-535  ", ""},     PQUIRK_NOLUNS},
        {{T_CDROM, T_REMOV,
         "DEC     ", "RRD42   (C) DEC ", ""},     PQUIRK_NOLUNS},
        {{T_CDROM, T_REMOV,
         "DENON   ", "DRD-25X         ", "V"},    PQUIRK_NOLUNS},
        {{T_CDROM, T_REMOV,
         "GENERIC ", "CRD-BP2         ", ""},     PQUIRK_NOLUNS},
        {{T_CDROM, T_REMOV,
         "HP      ", "C4324/C4325     ", ""},     PQUIRK_NOLUNS},
        {{T_CDROM, T_REMOV,
         "IMS     ", "CDD521/10       ", "2.06"}, PQUIRK_NOLUNS},
        {{T_CDROM, T_REMOV,
         "MATSHITA", "CD-ROM CR-5XX   ", "1.0b"}, PQUIRK_NOLUNS},
        {{T_CDROM, T_REMOV,
         "MEDAVIS ", "RENO CD-ROMX2A  ", ""},     PQUIRK_NOLUNS},
        {{T_CDROM, T_REMOV,
         "MEDIAVIS", "CDR-H93MV       ", "1.3"},  PQUIRK_NOLUNS},
        {{T_CDROM, T_REMOV,
         "NEC     ", "CD-ROM DRIVE:502", ""},     PQUIRK_NOLUNS},
        {{T_CDROM, T_REMOV,
         "NEC     ", "CD-ROM DRIVE:55 ", ""},     PQUIRK_NOLUNS},
        {{T_CDROM, T_REMOV,
         "NEC     ", "CD-ROM DRIVE:83 ", ""},     PQUIRK_NOLUNS},
        {{T_CDROM, T_REMOV,
         "NEC     ", "CD-ROM DRIVE:84 ", ""},     PQUIRK_NOLUNS},
        {{T_CDROM, T_REMOV,
         "NEC     ", "CD-ROM DRIVE:841", ""},     PQUIRK_NOLUNS},
        {{T_CDROM, T_REMOV,
         "OLYMPUS ", "CDS620E         ", "1.1d"},
                               PQUIRK_NOLUNS|PQUIRK_NOSYNC|PQUIRK_NOCAPACITY},
        {{T_CDROM, T_REMOV,
         "PIONEER ", "CD-ROM DR-124X  ", "1.01"}, PQUIRK_NOLUNS},
        {{T_CDROM, T_REMOV,
         "PLEXTOR ", "CD-ROM PX-4XCS  ", "1.01"},
                               PQUIRK_NOLUNS|PQUIRK_NOSYNC},
        {{T_CDROM, T_REMOV,
         "SONY    ", "CD-ROM CDU-541  ", ""},     PQUIRK_NOLUNS},
        {{T_CDROM, T_REMOV,
         "SONY    ", "CD-ROM CDU-55S  ", ""},     PQUIRK_NOLUNS},
        {{T_CDROM, T_REMOV,
         "SONY    ", "CD-ROM CDU-561  ", ""},     PQUIRK_NOLUNS},
        {{T_CDROM, T_REMOV,
         "SONY    ", "CD-ROM CDU-76S", ""},
                                PQUIRK_NOLUNS|PQUIRK_NOSYNC|PQUIRK_NOWIDE},
        {{T_CDROM, T_REMOV,
         "SONY    ", "CD-ROM CDU-8003A", ""},     PQUIRK_NOLUNS},
        {{T_CDROM, T_REMOV,
         "SONY    ", "CD-ROM CDU-8012 ", ""},     PQUIRK_NOLUNS},
        {{T_CDROM, T_REMOV,
         "TEAC    ", "CD-ROM          ", "1.06"}, PQUIRK_NOLUNS},
        {{T_CDROM, T_REMOV,
         "TEAC    ", "CD-ROM CD-56S   ", "1.0B"}, PQUIRK_NOLUNS},
        {{T_CDROM, T_REMOV,
         "TEXEL   ", "CD-ROM          ", "1.06"}, PQUIRK_NOLUNS},
        {{T_CDROM, T_REMOV,
         "TEXEL   ", "CD-ROM DM-XX24 K", "1.09"}, PQUIRK_NOLUNS},
        {{T_CDROM, T_REMOV,
         "TEXEL   ", "CD-ROM DM-XX24 K", "1.10"}, PQUIRK_NOLUNS},
        {{T_CDROM, T_REMOV,
         "TOSHIBA ", "XM-4101TASUNSLCD", ""}, PQUIRK_NOLUNS|PQUIRK_NOSYNC},
        /* "IBM CDRM00201     !F" 0724 is an IBM OEM Toshiba XM-4101BME */
        {{T_CDROM, T_REMOV,
         "IBM     ", "CDRM00201     !F", "0724"}, PQUIRK_NOLUNS|PQUIRK_NOSYNC},
        {{T_CDROM, T_REMOV,
         "ShinaKen", "CD-ROM DM-3x1S",   "1.04"}, PQUIRK_NOLUNS},
        {{T_CDROM, T_REMOV,
         "JVC     ", "R2626",            ""},     PQUIRK_NOLUNS},
        {{T_CDROM, T_REMOV,
         "YAMAHA", "CRW8424S",           ""},     PQUIRK_NOLUNS},
        {{T_CDROM, T_REMOV,
         "NEC     ", "CD-ROM DRIVE:222", ""},     PQUIRK_NOLUNS|PQUIRK_NOSYNC},

        {{T_DIRECT, T_FIXED,
         "MICROP  ", "1588-15MBSUN0669", ""},     PQUIRK_AUTOSAVE},
        {{T_DIRECT, T_FIXED,
         "MICROP  ", "2217-15MQ1091501", ""},     PQUIRK_NOSYNCCACHE},
        {{T_OPTICAL, T_REMOV,
         "EPSON   ", "OMD-5010        ", "3.08"}, PQUIRK_NOLUNS},
        {{T_DIRECT, T_FIXED,
         "ADAPTEC ", "AEC-4412BD",       "1.2A"}, PQUIRK_NOMODESENSE},
        {{T_DIRECT, T_FIXED,
         "ADAPTEC ", "ACB-4000",         ""},     PQUIRK_FORCELUNS|PQUIRK_AUTOSAVE|PQUIRK_NOMODESENSE},
        {{T_DIRECT, T_FIXED,
         "DEC     ", "RZ55     (C) DEC", ""},     PQUIRK_AUTOSAVE},
        {{T_DIRECT, T_FIXED,
         "EMULEX  ", "MD21/S2     ESDI", "A00"},
                                PQUIRK_FORCELUNS|PQUIRK_AUTOSAVE},
        {{T_DIRECT, T_FIXED,
         "MICROP",  "1548-15MZ1077801",  "HZ2P"}, PQUIRK_NOTAG},
        {{T_DIRECT, T_FIXED,
         "HP      ", "C372",             ""},     PQUIRK_NOTAG},
        {{T_DIRECT, T_FIXED,
         "IBMRAID ", "0662S",            ""},     PQUIRK_AUTOSAVE},
        {{T_DIRECT, T_FIXED,
         "IBM     ", "0663H",            ""},     PQUIRK_AUTOSAVE},
        {{T_DIRECT, T_FIXED,
         "IBM",      "0664",             ""},     PQUIRK_AUTOSAVE},
        {{T_DIRECT, T_FIXED,
        /* improperly report DT-only sync mode */
         "IBM     ", "DXHS36D",          ""},
                                PQUIRK_CAP_SYNC|PQUIRK_CAP_WIDE16},
        {{T_DIRECT, T_FIXED,
         "IBM     ", "DXHS18Y",          ""},
                                PQUIRK_CAP_SYNC|PQUIRK_CAP_WIDE16},
        {{T_DIRECT, T_FIXED,
         "IBM     ", "H3171-S2",         ""},
                                PQUIRK_NOLUNS|PQUIRK_AUTOSAVE},
        {{T_DIRECT, T_FIXED,
         "IBM     ", "KZ-C",             ""},     PQUIRK_AUTOSAVE},
        /* Broken IBM disk */
        {{T_DIRECT, T_FIXED,
         ""        , "DFRSS2F",          ""},     PQUIRK_AUTOSAVE},
        {{T_DIRECT, T_FIXED,
         "Initio  ", "",                 ""},     PQUIRK_NOBIGMODESENSE},
        {{T_DIRECT, T_FIXED,
         "JMicron ", "Generic         ", ""},     PQUIRK_NOFUA},
        {{T_DIRECT, T_REMOV,
         "MPL     ", "MC-DISK-        ", ""},     PQUIRK_NOLUNS},
        {{T_DIRECT, T_FIXED,
         "MAXTOR  ", "XT-3280         ", ""},     PQUIRK_NOLUNS},
        {{T_DIRECT, T_FIXED,
         "MAXTOR  ", "XT-4380S        ", ""},     PQUIRK_NOLUNS},
        {{T_DIRECT, T_FIXED,
         "MAXTOR  ", "MXT-1240S       ", ""},     PQUIRK_NOLUNS},
        {{T_DIRECT, T_FIXED,
         "MAXTOR  ", "XT-4170S        ", ""},     PQUIRK_NOLUNS},
        {{T_DIRECT, T_FIXED,
         "MAXTOR  ", "XT-8760S",         ""},     PQUIRK_NOLUNS},
        {{T_DIRECT, T_FIXED,
         "MAXTOR  ", "LXT-213S        ", ""},     PQUIRK_NOLUNS},
        {{T_DIRECT, T_FIXED,
         "MAXTOR  ", "LXT-213S SUN0207", ""},     PQUIRK_NOLUNS},
        {{T_DIRECT, T_FIXED,
         "MAXTOR  ", "LXT-200S        ", ""},     PQUIRK_NOLUNS},
        {{T_DIRECT, T_FIXED,
         "MEGADRV ", "EV1000",           ""},     PQUIRK_NOMODESENSE},
        {{T_DIRECT, T_FIXED,
         "MICROP", "1991-27MZ",          ""},     PQUIRK_NOTAG},
        {{T_DIRECT, T_FIXED,
         "MST     ", "SnapLink        ", ""},     PQUIRK_NOLUNS},
        {{T_DIRECT, T_FIXED,
         "NEC     ", "D3847           ", "0307"}, PQUIRK_NOLUNS},
        {{T_CDROM, T_REMOV,
         "PiSCSI  ", "SCSI CD-ROM     ", ""},     PQUIRK_NOREADDISCINFO},
        {{T_DIRECT, T_FIXED,
         "QUANTUM ", "ELS85S          ", ""},     PQUIRK_AUTOSAVE},
        {{T_DIRECT, T_FIXED,
         "QUANTUM ", "LPS525S         ", ""},     PQUIRK_NOLUNS},
        {{T_DIRECT, T_FIXED,
         "QUANTUM ", "P105S 910-10-94x", ""},     PQUIRK_NOLUNS},
        {{T_DIRECT, T_FIXED,
         "QUANTUM ", "PD1225S         ", ""},     PQUIRK_NOLUNS},
        {{T_DIRECT, T_FIXED,
         "QUANTUM ", "PD210S   SUN0207", ""},     PQUIRK_NOLUNS},
        {{T_DIRECT, T_FIXED,
         "QUANTUM ", "ATLAS IV 9 WLS", "0A0A"},   PQUIRK_CAP_NODT},
        {{T_DIRECT, T_FIXED,
         "RODIME  ", "RO3000S         ", ""},     PQUIRK_NOLUNS},
        {{T_DIRECT, T_FIXED,
         "SEAGATE ", "ST125N          ", ""},     PQUIRK_NOLUNS},
        {{T_DIRECT, T_FIXED,
         "SEAGATE ", "ST157N          ", ""},     PQUIRK_NOLUNS},
        {{T_DIRECT, T_FIXED,
         "SEAGATE ", "ST296           ", ""},     PQUIRK_NOLUNS},
        {{T_DIRECT, T_FIXED,
         "SEAGATE ", "ST296N          ", ""},     PQUIRK_NOLUNS},
        {{T_DIRECT, T_FIXED,
         "SEAGATE ", "ST318404LC      ", ""},     PQUIRK_NOLUNS},
        {{T_DIRECT, T_FIXED,
         "SEAGATE ", "ST336753LC      ", ""},     PQUIRK_NOLUNS},
        {{T_DIRECT, T_FIXED,
         "SEAGATE ", "ST336753LW      ", ""},     PQUIRK_NOLUNS},
        {{T_DIRECT, T_FIXED,
         "SEAGATE ", "ST336754LC      ", ""},     PQUIRK_NOLUNS},
        {{T_DIRECT, T_FIXED,
         "SEAGATE ", "ST39236LC       ", ""},     PQUIRK_NOLUNS},
        {{T_DIRECT, T_FIXED,
         "SEAGATE ", "ST15150N        ", ""},     PQUIRK_NOTAG},
        {{T_DIRECT, T_FIXED,
         "SEAGATE ", "ST19171",          ""},     PQUIRK_NOMODESENSE},
        {{T_DIRECT, T_FIXED,
         "SEAGATE ", "ST32430N",         ""},     PQUIRK_CAP_SYNC},
        {{T_DIRECT, T_FIXED,
         "SEAGATE ", "ST34501FC       ", ""},     PQUIRK_NOMODESENSE},
        {{T_DIRECT, T_FIXED,
         "SEAGATE ", "SX910800N",        ""},     PQUIRK_NOTAG},
        {{T_DIRECT, T_FIXED,
         "TOSHIBA ", "MK538FB         ", "6027"}, PQUIRK_NOLUNS},
        {{T_DIRECT, T_FIXED,
         "MICROP  ", "1924",          ""},     PQUIRK_CAP_SYNC},
        {{T_DIRECT, T_FIXED,
         "FUJITSU ", "M2266",         ""},     PQUIRK_CAP_SYNC},
        {{T_DIRECT, T_FIXED,
         "FUJITSU ", "M2624S-512      ", ""},     PQUIRK_CAP_SYNC},
        {{T_DIRECT, T_FIXED,
         "SEAGATE ", "SX336704LC"   , ""}, PQUIRK_CAP_SYNC | PQUIRK_CAP_WIDE16},
        {{T_DIRECT, T_FIXED,
         "SEAGATE ", "SX173404LC",       ""},     PQUIRK_CAP_SYNC | PQUIRK_CAP_WIDE16},
        {{T_DIRECT, T_FIXED,
         "ORACLE",   "BlockVolume",      ""},     PQUIRK_ONLYBIG},

        {{T_DIRECT, T_REMOV,
         "IOMEGA", "ZIP 100",            "J.03"}, PQUIRK_NOLUNS|PQUIRK_NOSYNC},
        {{T_DIRECT, T_REMOV,
         "INSITE", "I325VM",             ""},     PQUIRK_NOLUNS},

        /* XXX: QIC-36 tape behind Emulex adapter.  Very broken. */
        {{T_SEQUENTIAL, T_REMOV,
         "        ", "                ", "    "}, PQUIRK_NOLUNS},
        {{T_SEQUENTIAL, T_REMOV,
         "EMULEX  ", "MT-02 QIC       ", ""},     PQUIRK_NOLUNS},
        {{T_SEQUENTIAL, T_REMOV,
         "CALIPER ", "CP150           ", ""},     PQUIRK_NOLUNS},
        {{T_SEQUENTIAL, T_REMOV,
         "EXABYTE ", "EXB-8200        ", ""},     PQUIRK_NOLUNS},
        {{T_SEQUENTIAL, T_REMOV,
         "SONY    ", "GY-10C          ", ""},     PQUIRK_NOLUNS},
        {{T_SEQUENTIAL, T_REMOV,
         "SONY    ", "SDT-2000        ", "2.09"}, PQUIRK_NOLUNS},
        {{T_SEQUENTIAL, T_REMOV,
         "SONY    ", "SDT-5000        ", "3."},   PQUIRK_NOSYNC|PQUIRK_NOWIDE},
        {{T_SEQUENTIAL, T_REMOV,
         "SONY    ", "SDT-5200        ", "3."},   PQUIRK_NOLUNS},
        {{T_SEQUENTIAL, T_REMOV,
         "TANDBERG", " TDC 3600       ", ""},     PQUIRK_NOLUNS},
        /* Following entry reported as a Tandberg 3600; ref. PR1933 */
        {{T_SEQUENTIAL, T_REMOV,
         "ARCHIVE ", "VIPER 150  21247", ""},     PQUIRK_NOLUNS},
        /* Following entry for a Cipher ST150S; ref. PR4171 */
        {{T_SEQUENTIAL, T_REMOV,
         "ARCHIVE ", "VIPER 1500 21247", "2.2G"}, PQUIRK_NOLUNS},
        {{T_SEQUENTIAL, T_REMOV,
         "ARCHIVE ", "Python 28454-XXX", ""},     PQUIRK_NOLUNS},
        {{T_SEQUENTIAL, T_REMOV,
         "WANGTEK ", "5099ES SCSI",      ""},     PQUIRK_NOLUNS},
        {{T_SEQUENTIAL, T_REMOV,
         "WANGTEK ", "5150ES SCSI",      ""},     PQUIRK_NOLUNS},
        {{T_SEQUENTIAL, T_REMOV,
         "WANGTEK ", "SCSI-36",          ""},     PQUIRK_NOLUNS},
        {{T_SEQUENTIAL, T_REMOV,
         "WangDAT ", "Model 1300      ", "02.4"}, PQUIRK_NOSYNC|PQUIRK_NOWIDE},
        {{T_SEQUENTIAL, T_REMOV,
         "WangDAT ", "Model 2600      ", "01.7"}, PQUIRK_NOSYNC|PQUIRK_NOWIDE},
        {{T_SEQUENTIAL, T_REMOV,
         "WangDAT ", "Model 3200      ", "02.2"}, PQUIRK_NOSYNC|PQUIRK_NOWIDE},
        {{T_SEQUENTIAL, T_REMOV,
         "TEAC    ", "MT-2ST/N50      ", ""},     PQUIRK_NOLUNS},

        {{T_SCANNER, T_FIXED,
         "RICOH   ", "IS60            ", "1R08"}, PQUIRK_NOLUNS},
        {{T_SCANNER, T_FIXED,
         "UMAX    ", "Astra 1200S     ", "V2.9"}, PQUIRK_NOLUNS},
        {{T_SCANNER, T_FIXED,
         "UMAX    ", "Astra 1220S     ", ""},     PQUIRK_NOLUNS},
        {{T_SCANNER, T_FIXED,
         "UMAX    ", "UMAX S-6E       ", "V2.0"}, PQUIRK_NOLUNS},
        {{T_SCANNER, T_FIXED,
         "UMAX    ", "UMAX S-12       ", "V2.1"}, PQUIRK_NOLUNS},
        {{T_SCANNER, T_FIXED,
         "ULTIMA  ", "A6000C          ", ""},     PQUIRK_NOLUNS},
        {{T_PROCESSOR, T_FIXED,
         "ESG-SHV",  "SCA HSBP M15",     ""},     PQUIRK_NOLUNS},
        {{T_PROCESSOR, T_FIXED,
         "SYMBIOS",  "",                 ""},     PQUIRK_NOLUNS},
        {{T_PROCESSOR, T_FIXED,
         "LITRONIC", "PCMCIA          ", ""},     PQUIRK_NOLUNS},
        {{T_CHANGER, T_REMOV,
         "SONY    ", "CDL1100         ", ""},     PQUIRK_NOLUNS},
        {{T_ENCLOSURE, T_FIXED,
         "SUN     ", "SENA            ", ""},     PQUIRK_NOLUNS},
        {{T_CDROM, T_REMOV,
         "SUN     ", "Virtual CDROM   ", ""},     PQUIRK_NOREADDISCINFO},
};

/*
 * given a target and lun, ask the device what
 * it is, and find the correct driver table
 * entry.
 */
static int
scsi_probe_device(struct scsibus_softc *sc, int target, int lun)
{
        struct scsipi_channel *chan = sc->sc_channel;
        struct scsipi_periph *periph;
        struct scsipi_inquiry_data inqbuf;
        const struct scsi_quirk_inquiry_pattern *finger;
        int checkdtype, priority, docontinue, quirks;
        struct scsipibus_attach_args sa;
        cfdata_t cf;
        int locs[SCSIBUSCF_NLOCS];

        /*
         * Assume no more LUNs to search after this one.
         * If we successfully get Inquiry data and after
         * merging quirks we find we can probe for more
         * LUNs, we will.
         */
        docontinue = 0;

        /* Skip this slot if it is already attached. */
        if (scsipi_lookup_periph(chan, target, lun) != NULL)
                return (docontinue);

        periph = scsipi_alloc_periph(M_WAITOK);
        periph->periph_channel = chan;
        periph->periph_switch = &scsi_probe_dev;

        periph->periph_target = target;
        periph->periph_lun = lun;
        periph->periph_quirks = chan->chan_defquirks;

#ifdef SCSIPI_DEBUG
        if (SCSIPI_DEBUG_TYPE == SCSIPI_BUSTYPE_SCSI &&
            SCSIPI_DEBUG_TARGET == target &&
            SCSIPI_DEBUG_LUN == lun)
                periph->periph_dbflags |= SCSIPI_DEBUG_FLAGS;
#endif

        /*
         * Ask the device what it is
         */

#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(periph, XS_CTL_DISCOVERY | XS_CTL_SILENT);
#endif /* SCSI_2_DEF */

        /* Now go ask the device all about itself. */
        memset(&inqbuf, 0, sizeof(inqbuf));
        {
                u_int8_t *extension = &inqbuf.flags1;
                int len = 0;
                while (len < 3)
                        extension[len++] = '\0';
                while (len < 3 + 28)
                        extension[len++] = ' ';
                while (len < 3 + 28 + 20)
                        extension[len++] = '\0';
                while (len < 3 + 28 + 20 + 1)
                        extension[len++] = '\0';
                while (len < 3 + 28 + 20 + 1 + 1)
                        extension[len++] = '\0';
                while (len < 3 + 28 + 20 + 1 + 1 + (8*2))
                        extension[len++] = ' ';
        }
        if (scsipi_inquire(periph, &inqbuf, XS_CTL_DISCOVERY | XS_CTL_SILENT))
                goto bad;

        periph->periph_type = inqbuf.device & SID_TYPE;
        if (inqbuf.dev_qual2 & SID_REMOVABLE)
                periph->periph_flags |= PERIPH_REMOVABLE;
        periph->periph_version = inqbuf.version & SID_ANSII;

        /*
         * 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_PRESENT:
                checkdtype = 1;
                break;

        case SID_QUAL_LU_NOTPRESENT:
        case SID_QUAL_reserved:
        case SID_QUAL_LU_NOT_SUPP:
                goto bad;

        default:
                break;
        }

        /* Let the adapter driver handle the device separately if it wants. */
        if (chan->chan_adapter->adapt_accesschk != NULL &&
            (*chan->chan_adapter->adapt_accesschk)(periph, &sa.sa_inqbuf))
                goto bad;

        if (checkdtype) {
                switch (periph->periph_type) {
                case T_DIRECT:
                case T_SEQUENTIAL:
                case T_PRINTER:
                case T_PROCESSOR:
                case T_WORM:
                case T_CDROM:
                case T_SCANNER:
                case T_OPTICAL:
                case T_CHANGER:
                case T_COMM:
                case T_IT8_1:
                case T_IT8_2:
                case T_STORARRAY:
                case T_ENCLOSURE:
                case T_SIMPLE_DIRECT:
                case T_OPTIC_CARD_RW:
                case T_OBJECT_STORED:
                default:
                        break;
                case T_NODEVICE:
                        goto bad;
                }
        }

        sa.sa_periph = periph;
        sa.sa_inqbuf.type = inqbuf.device;
        sa.sa_inqbuf.removable = inqbuf.dev_qual2 & SID_REMOVABLE ?
            T_REMOV : T_FIXED;
        sa.sa_inqbuf.vendor = inqbuf.vendor;
        sa.sa_inqbuf.product = inqbuf.product;
        sa.sa_inqbuf.revision = inqbuf.revision;
        sa.scsipi_info.scsi_version = inqbuf.version;
        sa.sa_inqptr = &inqbuf;

        finger = scsipi_inqmatch(
            &sa.sa_inqbuf, scsi_quirk_patterns,
            sizeof(scsi_quirk_patterns)/sizeof(scsi_quirk_patterns[0]),
            sizeof(scsi_quirk_patterns[0]), &priority);

        if (finger != NULL)
                quirks = finger->quirks;
        else
                quirks = 0;

        /*
         * Determine the operating mode capabilities of the device.
         */
        if (periph->periph_version >= 2) {
                if ((inqbuf.flags3 & SID_CmdQue) != 0 &&
                    (quirks & PQUIRK_NOTAG) == 0)
                        periph->periph_cap |= PERIPH_CAP_TQING;
                if ((inqbuf.flags3 & SID_Linked) != 0)
                        periph->periph_cap |= PERIPH_CAP_LINKCMDS;
                if ((inqbuf.flags3 & SID_Sync) != 0 &&
                    (quirks & PQUIRK_NOSYNC) == 0)
                        periph->periph_cap |= PERIPH_CAP_SYNC;
                if ((inqbuf.flags3 & SID_WBus16) != 0 &&
                    (quirks & PQUIRK_NOWIDE) == 0)
                        periph->periph_cap |= PERIPH_CAP_WIDE16;
                if ((inqbuf.flags3 & SID_WBus32) != 0 &&
                    (quirks & PQUIRK_NOWIDE) == 0)
                        periph->periph_cap |= PERIPH_CAP_WIDE32;
                if ((inqbuf.flags3 & SID_SftRe) != 0)
                        periph->periph_cap |= PERIPH_CAP_SFTRESET;
                if ((inqbuf.flags3 & SID_RelAdr) != 0)
                        periph->periph_cap |= PERIPH_CAP_RELADR;
                /* SPC-2 */
                if (periph->periph_version >= 3 &&
                    !(quirks & PQUIRK_CAP_NODT)){
                        /*
                         * Report ST clocking though CAP_WIDExx/CAP_SYNC.
                         * If the device only supports DT, clear these
                         * flags (DT implies SYNC and WIDE)
                         */
                        switch (inqbuf.flags4 & SID_Clocking) {
                        case SID_CLOCKING_DT_ONLY:
                                periph->periph_cap &=
                                    ~(PERIPH_CAP_SYNC |
                                      PERIPH_CAP_WIDE16 |
                                      PERIPH_CAP_WIDE32);
                                /* FALLTHROUGH */
                        case SID_CLOCKING_SD_DT:
                                periph->periph_cap |= PERIPH_CAP_DT;
                                break;
                        default: /* ST only or invalid */
                                /* nothing to do */
                                break;
                        }
                }
                if (periph->periph_version >= 3) {
                        if (inqbuf.flags4 & SID_IUS)
                                periph->periph_cap |= PERIPH_CAP_IUS;
                        if (inqbuf.flags4 & SID_QAS)
                                periph->periph_cap |= PERIPH_CAP_QAS;
                }
        }
        if (quirks & PQUIRK_CAP_SYNC)
                periph->periph_cap |= PERIPH_CAP_SYNC;
        if (quirks & PQUIRK_CAP_WIDE16)
                periph->periph_cap |= PERIPH_CAP_WIDE16;

        /*
         * Now apply any quirks from the table.
         */
        periph->periph_quirks |= quirks;
        if (periph->periph_version == 0 &&
            (periph->periph_quirks & PQUIRK_FORCELUNS) == 0)
                periph->periph_quirks |= PQUIRK_NOLUNS;

        if ((periph->periph_quirks & PQUIRK_NOLUNS) == 0)
                docontinue = 1;

        locs[SCSIBUSCF_TARGET] = target;
        locs[SCSIBUSCF_LUN] = lun;

        KERNEL_LOCK(1, NULL);
        if ((cf = config_search(sc->sc_dev, &sa,
                                CFARGS(.submatch = config_stdsubmatch,
                                       .locators = locs))) != NULL) {
                scsipi_insert_periph(chan, periph);

                /*
                 * Determine supported opcodes and timeouts if available.
                 * Only do this on peripherals reporting SCSI version 3
                 * or greater - this command isn't in the SCSI-2 spec. and
                 * it causes either timeouts or peripherals disappearing
                 * when sent to some SCSI-1 or SCSI-2 peripherals.
                 */
                if (periph->periph_version >= 3)
                        scsipi_get_opcodeinfo(periph);

                /*
                 * XXX Can't assign periph_dev here, because we'll
                 * XXX need it before config_attach() returns.  Must
                 * XXX assign it in periph driver.
                 */
                config_attach(sc->sc_dev, cf, &sa, scsibusprint,
                    CFARGS(.locators = locs));
                KERNEL_UNLOCK_ONE(NULL);
        } else {
                scsibusprint(&sa, device_xname(sc->sc_dev));
                aprint_normal(" not configured\n");
                KERNEL_UNLOCK_ONE(NULL);
                goto bad;
        }

        return (docontinue);

bad:
        scsipi_free_periph(periph);
        return (docontinue);
}

/****** Entry points for user control of the SCSI bus. ******/

static int
scsibusopen(dev_t dev, int flag, int fmt,
    struct lwp *l)
{
        struct scsibus_softc *sc;
        int error, unit = minor(dev);

        sc = device_lookup_private(&scsibus_cd, unit);
        if (sc == NULL)
                return (ENXIO);

        if (sc->sc_flags & SCSIBUSF_OPEN)
                return (EBUSY);

        if ((error = scsipi_adapter_addref(sc->sc_channel->chan_adapter)) != 0)
                return (error);

        sc->sc_flags |= SCSIBUSF_OPEN;

        return (0);
}

static int
scsibusclose(dev_t dev, int flag, int fmt,
    struct lwp *l)
{
        struct scsibus_softc *sc;

        sc = device_lookup_private(&scsibus_cd, minor(dev));
        scsipi_adapter_delref(sc->sc_channel->chan_adapter);

        sc->sc_flags &= ~SCSIBUSF_OPEN;

        return (0);
}

static int
scsibusioctl(dev_t dev, u_long cmd, void *addr, int flag, struct lwp *l)
{
        struct scsibus_softc *sc;
        struct scsipi_channel *chan;
        int error;

        sc = device_lookup_private(&scsibus_cd, minor(dev));
        chan = sc->sc_channel;

        /*
         * Enforce write permission for ioctls that change the
         * state of the bus.  Host adapter specific ioctls must
         * be checked by the adapter driver.
         */
        switch (cmd) {
        case SCBUSIOSCAN:
        case SCBUSIODETACH:
        case SCBUSIORESET:
                if ((flag & FWRITE) == 0)
                        return (EBADF);
        }

        switch (cmd) {
        case SCBUSIOSCAN:
            {
                struct scbusioscan_args *a =
                    (struct scbusioscan_args *)addr;

                error = scsi_probe_bus(sc, a->sa_target, a->sa_lun);
                break;
            }

        case SCBUSIODETACH:
            {
                struct scbusiodetach_args *a =
                    (struct scbusiodetach_args *)addr;

                error = scsipi_target_detach(chan, a->sa_target, a->sa_lun, 0);
                break;
            }


        case SCBUSIORESET:
                /* FALLTHROUGH */
        default:
                error = scsipi_adapter_ioctl(chan, cmd, addr, flag, l->l_proc);
                break;
        }

        return (error);
}