Home | History | Annotate | Line # | Download | only in pci
vioscsi.c revision 1.30
      1  1.30    andvar /*	$NetBSD: vioscsi.c,v 1.30 2022/10/11 22:03:37 andvar Exp $	*/
      2   1.1  christos /*	$OpenBSD: vioscsi.c,v 1.3 2015/03/14 03:38:49 jsg Exp $	*/
      3   1.1  christos 
      4   1.1  christos /*
      5   1.1  christos  * Copyright (c) 2013 Google Inc.
      6   1.1  christos  *
      7   1.1  christos  * Permission to use, copy, modify, and distribute this software for any
      8   1.1  christos  * purpose with or without fee is hereby granted, provided that the above
      9   1.1  christos  * copyright notice and this permission notice appear in all copies.
     10   1.1  christos  *
     11   1.1  christos  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
     12   1.1  christos  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
     13   1.1  christos  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
     14   1.1  christos  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
     15   1.1  christos  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
     16   1.1  christos  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
     17   1.1  christos  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
     18   1.1  christos  */
     19   1.1  christos 
     20   1.1  christos #include <sys/cdefs.h>
     21  1.30    andvar __KERNEL_RCSID(0, "$NetBSD: vioscsi.c,v 1.30 2022/10/11 22:03:37 andvar Exp $");
     22   1.1  christos 
     23   1.1  christos #include <sys/param.h>
     24   1.1  christos #include <sys/systm.h>
     25   1.1  christos #include <sys/device.h>
     26   1.1  christos #include <sys/bus.h>
     27   1.1  christos #include <sys/buf.h>
     28  1.15  jdolecek #include <sys/module.h>
     29   1.1  christos 
     30   1.1  christos #include <dev/pci/vioscsireg.h>
     31   1.1  christos #include <dev/pci/virtiovar.h>
     32   1.1  christos 
     33   1.1  christos #include <dev/scsipi/scsi_all.h>
     34   1.1  christos #include <dev/scsipi/scsiconf.h>
     35   1.1  christos 
     36   1.1  christos #ifdef VIOSCSI_DEBUG
     37   1.1  christos static int vioscsi_debug = 1;
     38   1.1  christos #define DPRINTF(f) do { if (vioscsi_debug) printf f; } while (/*CONSTCOND*/0)
     39   1.1  christos #else
     40   1.1  christos #define DPRINTF(f) ((void)0)
     41   1.1  christos #endif
     42   1.1  christos 
     43   1.1  christos struct vioscsi_req {
     44   1.1  christos 	struct virtio_scsi_req_hdr	 vr_req;
     45   1.1  christos 	struct virtio_scsi_res_hdr	 vr_res;
     46   1.1  christos 	struct scsipi_xfer		*vr_xs;
     47   1.1  christos 	bus_dmamap_t			 vr_control;
     48   1.1  christos 	bus_dmamap_t			 vr_data;
     49   1.1  christos };
     50   1.1  christos 
     51   1.1  christos struct vioscsi_softc {
     52   1.1  christos 	device_t 		 sc_dev;
     53   1.1  christos 	struct scsipi_adapter	 sc_adapter;
     54   1.1  christos 	struct scsipi_channel 	 sc_channel;
     55   1.1  christos 
     56   1.1  christos 	struct virtqueue	 sc_vqs[3];
     57  1.10  jdolecek #define VIOSCSI_VQ_CONTROL	0
     58  1.10  jdolecek #define VIOSCSI_VQ_EVENT	1
     59  1.10  jdolecek #define VIOSCSI_VQ_REQUEST	2
     60  1.10  jdolecek 
     61   1.1  christos 	struct vioscsi_req	*sc_reqs;
     62   1.9  jdolecek 	int			 sc_nreqs;
     63   1.1  christos 	bus_dma_segment_t        sc_reqs_segs[1];
     64   1.1  christos 
     65   1.1  christos 	u_int32_t		 sc_seg_max;
     66  1.15  jdolecek 
     67  1.15  jdolecek 	kmutex_t		 sc_mutex;
     68   1.1  christos };
     69   1.1  christos 
     70  1.28     skrll /*
     71   1.2  christos  * Each block request uses at least two segments - one for the header
     72   1.2  christos  * and one for the status.
     73   1.2  christos */
     74   1.2  christos #define VIRTIO_SCSI_MIN_SEGMENTS 2
     75   1.2  christos 
     76   1.1  christos static int	 vioscsi_match(device_t, cfdata_t, void *);
     77   1.1  christos static void	 vioscsi_attach(device_t, device_t, void *);
     78  1.15  jdolecek static int	 vioscsi_detach(device_t, int);
     79   1.1  christos 
     80   1.1  christos static int	 vioscsi_alloc_reqs(struct vioscsi_softc *,
     81  1.15  jdolecek     struct virtio_softc *, int);
     82  1.12  jdolecek static void	 vioscsi_free_reqs(struct vioscsi_softc *,
     83  1.12  jdolecek     struct virtio_softc *);
     84   1.1  christos static void	 vioscsi_scsipi_request(struct scsipi_channel *,
     85   1.1  christos     scsipi_adapter_req_t, void *);
     86   1.1  christos static int	 vioscsi_vq_done(struct virtqueue *);
     87   1.1  christos static void	 vioscsi_req_done(struct vioscsi_softc *, struct virtio_softc *,
     88  1.19  jdolecek     struct vioscsi_req *, struct virtqueue *, int);
     89   1.1  christos static struct vioscsi_req *vioscsi_req_get(struct vioscsi_softc *);
     90  1.15  jdolecek static void	 vioscsi_bad_target(struct scsipi_xfer *);
     91   1.1  christos 
     92   1.1  christos static const char *const vioscsi_vq_names[] = {
     93   1.1  christos 	"control",
     94   1.1  christos 	"event",
     95   1.1  christos 	"request",
     96   1.1  christos };
     97   1.1  christos 
     98  1.15  jdolecek CFATTACH_DECL3_NEW(vioscsi, sizeof(struct vioscsi_softc),
     99  1.15  jdolecek     vioscsi_match, vioscsi_attach, vioscsi_detach, NULL, NULL, NULL,
    100  1.15  jdolecek     DVF_DETACH_SHUTDOWN);
    101   1.1  christos 
    102   1.1  christos static int
    103   1.1  christos vioscsi_match(device_t parent, cfdata_t match, void *aux)
    104   1.1  christos {
    105  1.12  jdolecek 	struct virtio_attach_args *va = aux;
    106   1.1  christos 
    107  1.25   reinoud 	if (va->sc_childdevid == VIRTIO_DEVICE_ID_SCSI)
    108   1.1  christos 		return 1;
    109  1.12  jdolecek 
    110   1.1  christos 	return 0;
    111   1.1  christos }
    112   1.1  christos 
    113   1.1  christos static void
    114   1.1  christos vioscsi_attach(device_t parent, device_t self, void *aux)
    115   1.1  christos {
    116   1.1  christos 	struct vioscsi_softc *sc = device_private(self);
    117   1.1  christos 	struct virtio_softc *vsc = device_private(parent);
    118   1.1  christos 	struct scsipi_adapter *adapt = &sc->sc_adapter;
    119   1.1  christos 	struct scsipi_channel *chan = &sc->sc_channel;
    120  1.12  jdolecek 	int rv, qsize = 0, i = 0;
    121  1.12  jdolecek 	int ipl = IPL_BIO;
    122   1.1  christos 
    123  1.12  jdolecek 	if (virtio_child(vsc) != NULL) {
    124   1.1  christos 		aprint_error(": parent %s already has a child\n",
    125   1.1  christos 		    device_xname(parent));
    126   1.1  christos 		return;
    127   1.1  christos 	}
    128   1.1  christos 
    129   1.1  christos 	sc->sc_dev = self;
    130   1.1  christos 
    131  1.12  jdolecek 	virtio_child_attach_start(vsc, self, ipl, sc->sc_vqs,
    132  1.25   reinoud 	    NULL, virtio_vq_intr, VIRTIO_F_INTR_MSIX,
    133  1.12  jdolecek 	    0, VIRTIO_COMMON_FLAG_BITS);
    134   1.1  christos 
    135  1.15  jdolecek 	mutex_init(&sc->sc_mutex, MUTEX_DEFAULT, ipl);
    136  1.15  jdolecek 
    137   1.1  christos 	uint32_t cmd_per_lun = virtio_read_device_config_4(vsc,
    138   1.1  christos 	    VIRTIO_SCSI_CONFIG_CMD_PER_LUN);
    139   1.1  christos 
    140   1.1  christos 	uint32_t seg_max = virtio_read_device_config_4(vsc,
    141   1.1  christos 	    VIRTIO_SCSI_CONFIG_SEG_MAX);
    142   1.1  christos 
    143   1.1  christos 	uint16_t max_target = virtio_read_device_config_2(vsc,
    144   1.1  christos 	    VIRTIO_SCSI_CONFIG_MAX_TARGET);
    145   1.1  christos 
    146   1.1  christos 	uint32_t max_lun = virtio_read_device_config_4(vsc,
    147   1.1  christos 	    VIRTIO_SCSI_CONFIG_MAX_LUN);
    148   1.1  christos 
    149   1.1  christos 	sc->sc_seg_max = seg_max;
    150   1.1  christos 
    151  1.15  jdolecek 	for(i=0; i < __arraycount(sc->sc_vqs); i++) {
    152   1.1  christos 		rv = virtio_alloc_vq(vsc, &sc->sc_vqs[i], i, MAXPHYS,
    153  1.17  jdolecek 		    VIRTIO_SCSI_MIN_SEGMENTS + howmany(MAXPHYS, NBPG),
    154  1.15  jdolecek 		    vioscsi_vq_names[i]);
    155   1.1  christos 		if (rv) {
    156   1.1  christos 			aprint_error_dev(sc->sc_dev,
    157  1.15  jdolecek 			    "failed to allocate virtqueue %d\n", i);
    158  1.15  jdolecek 			goto err;
    159   1.1  christos 		}
    160  1.10  jdolecek 
    161  1.10  jdolecek 		if (i == VIOSCSI_VQ_REQUEST)
    162  1.10  jdolecek 			sc->sc_vqs[i].vq_done = vioscsi_vq_done;
    163   1.1  christos 	}
    164   1.1  christos 
    165  1.12  jdolecek 	qsize = sc->sc_vqs[VIOSCSI_VQ_REQUEST].vq_num;
    166  1.15  jdolecek 	if (vioscsi_alloc_reqs(sc, vsc, qsize))
    167  1.15  jdolecek 		goto err;
    168   1.1  christos 
    169  1.12  jdolecek 	aprint_normal_dev(sc->sc_dev,
    170  1.16  christos 	    "cmd_per_lun %u qsize %d seg_max %u max_target %hu"
    171  1.16  christos 	    " max_lun %u\n",
    172  1.12  jdolecek 	    cmd_per_lun, qsize, seg_max, max_target, max_lun);
    173  1.12  jdolecek 
    174  1.12  jdolecek 	if (virtio_child_attach_finish(vsc) != 0)
    175  1.12  jdolecek 		goto err;
    176  1.10  jdolecek 
    177   1.1  christos 	/*
    178   1.1  christos 	 * Fill in the scsipi_adapter.
    179   1.1  christos 	 */
    180   1.1  christos 	memset(adapt, 0, sizeof(*adapt));
    181   1.1  christos 	adapt->adapt_dev = sc->sc_dev;
    182  1.14  jdolecek 	adapt->adapt_nchannels = 1;
    183  1.13  jdolecek 	adapt->adapt_openings = MIN(qsize, cmd_per_lun);
    184   1.1  christos 	adapt->adapt_max_periph = adapt->adapt_openings;
    185   1.1  christos 	adapt->adapt_request = vioscsi_scsipi_request;
    186   1.1  christos 	adapt->adapt_minphys = minphys;
    187   1.1  christos 
    188   1.1  christos 	/*
    189   1.1  christos 	 * Fill in the scsipi_channel.
    190   1.1  christos 	 */
    191   1.1  christos 	memset(chan, 0, sizeof(*chan));
    192   1.1  christos 	chan->chan_adapter = adapt;
    193   1.1  christos 	chan->chan_bustype = &scsi_bustype;
    194   1.1  christos 	chan->chan_channel = 0;
    195  1.29  jakllsch 	chan->chan_ntargets = MIN(1 + max_target, 256);	/* cap reasonably */
    196  1.29  jakllsch 	chan->chan_nluns = MIN(1 + max_lun, 16384);	/* cap reasonably */
    197  1.29  jakllsch 	chan->chan_id = max_target + 1;
    198   1.6     pooka 	chan->chan_flags = SCSIPI_CHAN_NOSETTLE;
    199   1.1  christos 
    200  1.27   thorpej 	config_found(self, &sc->sc_channel, scsiprint, CFARGS_NONE);
    201  1.12  jdolecek 	return;
    202  1.12  jdolecek 
    203  1.12  jdolecek err:
    204  1.12  jdolecek 	if (qsize > 0)
    205  1.12  jdolecek 		vioscsi_free_reqs(sc, vsc);
    206  1.12  jdolecek 
    207  1.12  jdolecek 	for (i=0; i < __arraycount(sc->sc_vqs); i++) {
    208  1.12  jdolecek 		if (sc->sc_vqs[i].vq_num > 0)
    209  1.12  jdolecek 			virtio_free_vq(vsc, &sc->sc_vqs[i]);
    210  1.12  jdolecek 	}
    211  1.12  jdolecek 
    212  1.12  jdolecek 	virtio_child_attach_failed(vsc);
    213  1.15  jdolecek }
    214  1.15  jdolecek 
    215  1.15  jdolecek static int
    216  1.15  jdolecek vioscsi_detach(device_t self, int flags)
    217  1.15  jdolecek {
    218  1.15  jdolecek 	struct vioscsi_softc *sc = device_private(self);
    219  1.15  jdolecek 	struct virtio_softc *vsc = device_private(device_parent(sc->sc_dev));
    220  1.15  jdolecek 	int rc, i;
    221  1.15  jdolecek 
    222  1.15  jdolecek 	/*
    223  1.15  jdolecek 	 * Dequeue all pending finished requests. Must be done
    224  1.15  jdolecek 	 * before we try to detach children so that we process
    225  1.15  jdolecek 	 * their pending requests while they still exist.
    226  1.15  jdolecek 	 */
    227  1.15  jdolecek 	if (sc->sc_vqs[VIOSCSI_VQ_REQUEST].vq_num > 0)
    228  1.15  jdolecek 		vioscsi_vq_done(&sc->sc_vqs[VIOSCSI_VQ_REQUEST]);
    229  1.12  jdolecek 
    230  1.15  jdolecek 	if ((rc = config_detach_children(self, flags)) != 0)
    231  1.15  jdolecek 		return rc;
    232  1.15  jdolecek 
    233  1.15  jdolecek 	virtio_reset(vsc);
    234  1.15  jdolecek 
    235  1.15  jdolecek 	for (i = 0; i < __arraycount(sc->sc_vqs); i++) {
    236  1.15  jdolecek 		if (sc->sc_vqs[i].vq_num > 0)
    237  1.15  jdolecek 			virtio_free_vq(vsc, &sc->sc_vqs[i]);
    238  1.15  jdolecek 	}
    239  1.15  jdolecek 
    240  1.15  jdolecek 	vioscsi_free_reqs(sc, vsc);
    241  1.15  jdolecek 
    242  1.15  jdolecek 	virtio_child_detach(vsc);
    243  1.15  jdolecek 
    244  1.15  jdolecek 	mutex_destroy(&sc->sc_mutex);
    245  1.15  jdolecek 
    246  1.15  jdolecek 	return 0;
    247   1.1  christos }
    248   1.1  christos 
    249   1.1  christos #define XS2DMA(xs) \
    250   1.1  christos     ((((xs)->xs_control & XS_CTL_DATA_IN) ? BUS_DMA_READ : BUS_DMA_WRITE) | \
    251   1.1  christos     (((xs)->xs_control & XS_CTL_NOSLEEP) ? BUS_DMA_NOWAIT : BUS_DMA_WAITOK) | \
    252   1.1  christos     BUS_DMA_STREAMING)
    253   1.1  christos 
    254   1.1  christos #define XS2DMAPRE(xs) (((xs)->xs_control & XS_CTL_DATA_IN) ? \
    255   1.1  christos     BUS_DMASYNC_PREREAD : BUS_DMASYNC_PREWRITE)
    256   1.1  christos 
    257   1.1  christos #define XS2DMAPOST(xs) (((xs)->xs_control & XS_CTL_DATA_IN) ? \
    258   1.1  christos     BUS_DMASYNC_POSTREAD : BUS_DMASYNC_POSTWRITE)
    259   1.1  christos 
    260   1.1  christos static void
    261   1.1  christos vioscsi_scsipi_request(struct scsipi_channel *chan, scsipi_adapter_req_t
    262   1.1  christos     request, void *arg)
    263   1.1  christos {
    264   1.1  christos 	struct vioscsi_softc *sc =
    265   1.1  christos 	    device_private(chan->chan_adapter->adapt_dev);
    266   1.1  christos 	struct virtio_softc *vsc = device_private(device_parent(sc->sc_dev));
    267  1.28     skrll 	struct scsipi_xfer *xs;
    268   1.1  christos 	struct scsipi_periph *periph;
    269   1.1  christos 	struct vioscsi_req *vr;
    270   1.1  christos 	struct virtio_scsi_req_hdr *req;
    271  1.11  jdolecek 	struct virtqueue *vq = &sc->sc_vqs[VIOSCSI_VQ_REQUEST];
    272   1.1  christos 	int slot, error;
    273  1.21      maxv 	bool dopoll;
    274   1.1  christos 
    275   1.1  christos 	DPRINTF(("%s: enter\n", __func__));
    276   1.1  christos 
    277   1.8  jdolecek 	switch (request) {
    278   1.8  jdolecek 	case ADAPTER_REQ_RUN_XFER:
    279   1.8  jdolecek 		break;
    280   1.8  jdolecek 	case ADAPTER_REQ_SET_XFER_MODE:
    281   1.8  jdolecek 	{
    282   1.8  jdolecek 		struct scsipi_xfer_mode *xm = arg;
    283   1.8  jdolecek 		xm->xm_mode = PERIPH_CAP_TQING;
    284   1.8  jdolecek 		xm->xm_period = 0;
    285   1.8  jdolecek 		xm->xm_offset = 0;
    286   1.8  jdolecek 		scsipi_async_event(chan, ASYNC_EVENT_XFER_MODE, xm);
    287   1.8  jdolecek 		return;
    288   1.8  jdolecek 	}
    289   1.8  jdolecek 	default:
    290   1.1  christos 		DPRINTF(("%s: unhandled %d\n", __func__, request));
    291   1.1  christos 		return;
    292   1.1  christos 	}
    293  1.28     skrll 
    294   1.1  christos 	xs = arg;
    295   1.1  christos 	periph = xs->xs_periph;
    296   1.1  christos 
    297   1.1  christos 	/*
    298   1.7  jdolecek 	 * This can happen when we run out of queue slots.
    299   1.1  christos 	 */
    300  1.10  jdolecek 	vr = vioscsi_req_get(sc);
    301   1.1  christos 	if (vr == NULL) {
    302   1.7  jdolecek 		xs->error = XS_RESOURCE_SHORTAGE;
    303   1.7  jdolecek 		scsipi_done(xs);
    304   1.7  jdolecek 		return;
    305   1.1  christos 	}
    306   1.7  jdolecek 
    307   1.1  christos 	req = &vr->vr_req;
    308   1.1  christos 	slot = vr - sc->sc_reqs;
    309   1.1  christos 
    310   1.1  christos 	/*
    311   1.1  christos 	 * "The only supported format for the LUN field is: first byte set to
    312   1.1  christos 	 * 1, second byte set to target, third and fourth byte representing a
    313   1.1  christos 	 * single level LUN structure, followed by four zero bytes."
    314   1.1  christos 	 */
    315  1.15  jdolecek 	if (periph->periph_target >= 256 || periph->periph_lun >= 16384
    316  1.15  jdolecek 	    || periph->periph_target < 0 || periph->periph_lun < 0) {
    317   1.1  christos 		goto stuffup;
    318   1.1  christos 	}
    319  1.15  jdolecek 
    320   1.1  christos 	req->lun[0] = 1;
    321  1.22       kim 	req->lun[1] = periph->periph_target;
    322  1.10  jdolecek 	req->lun[2] = 0x40 | ((periph->periph_lun >> 8) & 0x3F);
    323  1.10  jdolecek 	req->lun[3] = periph->periph_lun & 0xFF;
    324   1.1  christos 	memset(req->lun + 4, 0, 4);
    325  1.15  jdolecek 	DPRINTF(("%s: command %p for %d:%d at slot %d\n", __func__,
    326  1.15  jdolecek 	    xs, periph->periph_target, periph->periph_lun, slot));
    327   1.1  christos 
    328   1.8  jdolecek 	/* tag */
    329   1.8  jdolecek 	switch (XS_CTL_TAGTYPE(xs)) {
    330   1.8  jdolecek 	case XS_CTL_HEAD_TAG:
    331   1.8  jdolecek 		req->task_attr = VIRTIO_SCSI_S_HEAD;
    332   1.8  jdolecek 		break;
    333   1.8  jdolecek 
    334   1.8  jdolecek #if 0	/* XXX */
    335   1.8  jdolecek 	case XS_CTL_ACA_TAG:
    336   1.8  jdolecek 		req->task_attr = VIRTIO_SCSI_S_ACA;
    337   1.8  jdolecek 		break;
    338   1.8  jdolecek #endif
    339   1.8  jdolecek 
    340   1.8  jdolecek 	case XS_CTL_ORDERED_TAG:
    341   1.8  jdolecek 		req->task_attr = VIRTIO_SCSI_S_ORDERED;
    342   1.8  jdolecek 		break;
    343   1.8  jdolecek 
    344   1.8  jdolecek 	case XS_CTL_SIMPLE_TAG:
    345   1.8  jdolecek 	default:
    346   1.8  jdolecek 		req->task_attr = VIRTIO_SCSI_S_SIMPLE;
    347   1.8  jdolecek 		break;
    348   1.8  jdolecek 	}
    349  1.25   reinoud 	req->id = virtio_rw64(vsc, slot);
    350   1.8  jdolecek 
    351   1.2  christos 	if ((size_t)xs->cmdlen > sizeof(req->cdb)) {
    352   1.2  christos 		DPRINTF(("%s: bad cmdlen %zu > %zu\n", __func__,
    353   1.2  christos 		    (size_t)xs->cmdlen, sizeof(req->cdb)));
    354   1.1  christos 		goto stuffup;
    355   1.2  christos 	}
    356   1.2  christos 
    357   1.1  christos 	memset(req->cdb, 0, sizeof(req->cdb));
    358   1.1  christos 	memcpy(req->cdb, xs->cmd, xs->cmdlen);
    359   1.1  christos 
    360  1.12  jdolecek 	error = bus_dmamap_load(virtio_dmat(vsc), vr->vr_data,
    361   1.1  christos 	    xs->data, xs->datalen, NULL, XS2DMA(xs));
    362  1.18  jdolecek 	if (error) {
    363  1.18  jdolecek 		aprint_error_dev(sc->sc_dev, "%s: error %d loading DMA map\n",
    364  1.18  jdolecek 		    __func__, error);
    365  1.18  jdolecek 
    366  1.18  jdolecek 		if (error == ENOMEM || error == EAGAIN) {
    367  1.18  jdolecek 			/*
    368  1.18  jdolecek 			 * Map is allocated with ALLOCNOW, so this should
    369  1.18  jdolecek 			 * actually never ever happen.
    370  1.18  jdolecek 			 */
    371  1.18  jdolecek 			xs->error = XS_RESOURCE_SHORTAGE;
    372  1.18  jdolecek 		} else {
    373  1.11  jdolecek stuffup:
    374  1.18  jdolecek 			/* not a temporary condition */
    375  1.18  jdolecek 			xs->error = XS_DRIVER_STUFFUP;
    376  1.18  jdolecek 		}
    377  1.18  jdolecek 
    378  1.18  jdolecek 		virtio_enqueue_abort(vsc, vq, slot);
    379   1.1  christos 		scsipi_done(xs);
    380   1.1  christos 		return;
    381   1.1  christos 	}
    382   1.1  christos 
    383   1.2  christos 	int nsegs = VIRTIO_SCSI_MIN_SEGMENTS;
    384   1.2  christos 	if ((xs->xs_control & (XS_CTL_DATA_IN|XS_CTL_DATA_OUT)) != 0)
    385   1.2  christos 		nsegs += vr->vr_data->dm_nsegs;
    386   1.2  christos 
    387   1.2  christos 	error = virtio_enqueue_reserve(vsc, vq, slot, nsegs);
    388   1.1  christos 	if (error) {
    389  1.18  jdolecek 		aprint_error_dev(sc->sc_dev, "error reserving %d (nsegs %d)\n",
    390  1.18  jdolecek 		    error, nsegs);
    391  1.12  jdolecek 		bus_dmamap_unload(virtio_dmat(vsc), vr->vr_data);
    392  1.18  jdolecek 		/* slot already freed by virtio_enqueue_reserve() */
    393  1.11  jdolecek 		xs->error = XS_RESOURCE_SHORTAGE;
    394  1.18  jdolecek 		scsipi_done(xs);
    395  1.18  jdolecek 		return;
    396   1.1  christos 	}
    397   1.1  christos 
    398  1.15  jdolecek 	vr->vr_xs = xs;
    399  1.15  jdolecek 
    400  1.12  jdolecek 	bus_dmamap_sync(virtio_dmat(vsc), vr->vr_control,
    401   1.1  christos 	    offsetof(struct vioscsi_req, vr_req),
    402   1.1  christos 	    sizeof(struct virtio_scsi_req_hdr),
    403   1.1  christos 	    BUS_DMASYNC_PREWRITE);
    404  1.12  jdolecek 	bus_dmamap_sync(virtio_dmat(vsc), vr->vr_control,
    405   1.1  christos 	    offsetof(struct vioscsi_req, vr_res),
    406   1.1  christos             sizeof(struct virtio_scsi_res_hdr),
    407   1.1  christos 	    BUS_DMASYNC_PREREAD);
    408   1.2  christos 	if ((xs->xs_control & (XS_CTL_DATA_IN|XS_CTL_DATA_OUT)) != 0)
    409  1.12  jdolecek 		bus_dmamap_sync(virtio_dmat(vsc), vr->vr_data, 0, xs->datalen,
    410   1.2  christos 		    XS2DMAPRE(xs));
    411   1.1  christos 
    412   1.1  christos 	virtio_enqueue_p(vsc, vq, slot, vr->vr_control,
    413   1.1  christos 	    offsetof(struct vioscsi_req, vr_req),
    414   1.1  christos             sizeof(struct virtio_scsi_req_hdr), 1);
    415   1.1  christos 	if (xs->xs_control & XS_CTL_DATA_OUT)
    416   1.1  christos 		virtio_enqueue(vsc, vq, slot, vr->vr_data, 1);
    417   1.1  christos 	virtio_enqueue_p(vsc, vq, slot, vr->vr_control,
    418   1.1  christos 	    offsetof(struct vioscsi_req, vr_res),
    419   1.1  christos             sizeof(struct virtio_scsi_res_hdr), 0);
    420   1.1  christos 	if (xs->xs_control & XS_CTL_DATA_IN)
    421   1.1  christos 		virtio_enqueue(vsc, vq, slot, vr->vr_data, 0);
    422  1.21      maxv 	dopoll = (xs->xs_control & XS_CTL_POLL) != 0;
    423   1.1  christos 	virtio_enqueue_commit(vsc, vq, slot, 1);
    424   1.1  christos 
    425  1.21      maxv 	if (!dopoll)
    426   1.1  christos 		return;
    427   1.1  christos 
    428   1.1  christos 	DPRINTF(("%s: polling...\n", __func__));
    429   1.1  christos 	// XXX: do this better.
    430   1.1  christos 	int timeout = 1000;
    431   1.1  christos 	do {
    432  1.12  jdolecek 		virtio_intrhand(vsc);
    433   1.1  christos 		if (vr->vr_xs != xs)
    434   1.1  christos 			break;
    435   1.1  christos 		delay(1000);
    436   1.1  christos 	} while (--timeout > 0);
    437   1.1  christos 
    438   1.1  christos 	if (vr->vr_xs == xs) {
    439   1.1  christos 		// XXX: Abort!
    440   1.1  christos 		xs->error = XS_TIMEOUT;
    441   1.1  christos 		xs->resid = xs->datalen;
    442   1.1  christos 		DPRINTF(("%s: polling timeout\n", __func__));
    443   1.1  christos 		scsipi_done(xs);
    444   1.1  christos 	}
    445  1.15  jdolecek 	DPRINTF(("%s: command %p done (timeout=%d)\n", __func__,
    446  1.15  jdolecek 	    xs, timeout));
    447   1.1  christos }
    448   1.1  christos 
    449   1.1  christos static void
    450   1.1  christos vioscsi_req_done(struct vioscsi_softc *sc, struct virtio_softc *vsc,
    451  1.19  jdolecek     struct vioscsi_req *vr, struct virtqueue *vq, int slot)
    452   1.1  christos {
    453   1.1  christos 	struct scsipi_xfer *xs = vr->vr_xs;
    454   1.4  christos 	size_t sense_len;
    455   1.1  christos 
    456   1.1  christos 	DPRINTF(("%s: enter\n", __func__));
    457   1.1  christos 
    458  1.12  jdolecek 	bus_dmamap_sync(virtio_dmat(vsc), vr->vr_control,
    459   1.1  christos 	    offsetof(struct vioscsi_req, vr_req),
    460   1.1  christos 	    sizeof(struct virtio_scsi_req_hdr),
    461   1.1  christos 	    BUS_DMASYNC_POSTWRITE);
    462  1.12  jdolecek 	bus_dmamap_sync(virtio_dmat(vsc), vr->vr_control,
    463   1.1  christos 	    offsetof(struct vioscsi_req, vr_res),
    464   1.1  christos 	    sizeof(struct virtio_scsi_res_hdr),
    465   1.1  christos 	    BUS_DMASYNC_POSTREAD);
    466  1.25   reinoud 	if (xs->datalen)
    467  1.25   reinoud 		bus_dmamap_sync(virtio_dmat(vsc), vr->vr_data, 0, xs->datalen,
    468  1.25   reinoud 		    XS2DMAPOST(xs));
    469   1.1  christos 
    470  1.11  jdolecek 	xs->status = vr->vr_res.status;
    471  1.25   reinoud 	xs->resid  = virtio_rw32(vsc, vr->vr_res.residual);
    472  1.11  jdolecek 
    473   1.4  christos 	switch (vr->vr_res.response) {
    474   1.4  christos 	case VIRTIO_SCSI_S_OK:
    475  1.25   reinoud 		sense_len = MIN(sizeof(xs->sense),
    476  1.25   reinoud 				virtio_rw32(vsc, vr->vr_res.sense_len));
    477   1.4  christos 		memcpy(&xs->sense, vr->vr_res.sense, sense_len);
    478   1.4  christos 		xs->error = (sense_len == 0) ? XS_NOERROR : XS_SENSE;
    479   1.4  christos 		break;
    480   1.4  christos 	case VIRTIO_SCSI_S_BAD_TARGET:
    481  1.15  jdolecek 		vioscsi_bad_target(xs);
    482   1.4  christos 		break;
    483   1.4  christos 	default:
    484   1.4  christos 		DPRINTF(("%s: stuffup: %d\n", __func__, vr->vr_res.response));
    485   1.1  christos 		xs->error = XS_DRIVER_STUFFUP;
    486   1.1  christos 		xs->resid = xs->datalen;
    487   1.4  christos 		break;
    488   1.1  christos 	}
    489   1.1  christos 
    490  1.15  jdolecek 	DPRINTF(("%s: command %p done %d, %d, %d\n", __func__,
    491  1.15  jdolecek 	    xs, xs->error, xs->status, xs->resid));
    492   1.1  christos 
    493  1.12  jdolecek 	bus_dmamap_unload(virtio_dmat(vsc), vr->vr_data);
    494   1.1  christos 	vr->vr_xs = NULL;
    495  1.11  jdolecek 
    496  1.19  jdolecek 	virtio_dequeue_commit(vsc, vq, slot);
    497  1.19  jdolecek 
    498  1.15  jdolecek 	mutex_exit(&sc->sc_mutex);
    499   1.1  christos 	scsipi_done(xs);
    500  1.15  jdolecek 	mutex_enter(&sc->sc_mutex);
    501  1.15  jdolecek }
    502  1.15  jdolecek 
    503  1.15  jdolecek static void
    504  1.15  jdolecek vioscsi_bad_target(struct scsipi_xfer *xs)
    505  1.15  jdolecek {
    506  1.15  jdolecek 	struct scsi_sense_data *sense = &xs->sense.scsi_sense;
    507  1.15  jdolecek 
    508  1.15  jdolecek 	DPRINTF(("%s: bad target %d:%d\n", __func__,
    509  1.15  jdolecek 	    xs->xs_periph->periph_target, xs->xs_periph->periph_lun));
    510  1.15  jdolecek 
    511  1.15  jdolecek 	memset(sense, 0, sizeof(*sense));
    512  1.15  jdolecek 	sense->response_code = 0x70;
    513  1.15  jdolecek 	sense->flags = SKEY_ILLEGAL_REQUEST;
    514  1.15  jdolecek 	xs->error = XS_SENSE;
    515  1.15  jdolecek 	xs->status = 0;
    516  1.15  jdolecek 	xs->resid = 0;
    517   1.1  christos }
    518   1.1  christos 
    519   1.1  christos static int
    520   1.1  christos vioscsi_vq_done(struct virtqueue *vq)
    521   1.1  christos {
    522   1.1  christos 	struct virtio_softc *vsc = vq->vq_owner;
    523  1.12  jdolecek 	struct vioscsi_softc *sc = device_private(virtio_child(vsc));
    524   1.1  christos 	int ret = 0;
    525   1.1  christos 
    526  1.15  jdolecek 	DPRINTF(("%s: enter %d\n", __func__, vq->vq_index));
    527  1.15  jdolecek 
    528  1.15  jdolecek 	mutex_enter(&sc->sc_mutex);
    529   1.1  christos 
    530   1.1  christos 	for (;;) {
    531   1.1  christos 		int r, slot;
    532  1.15  jdolecek 
    533   1.1  christos 		r = virtio_dequeue(vsc, vq, &slot, NULL);
    534   1.1  christos 		if (r != 0)
    535   1.1  christos 			break;
    536   1.1  christos 
    537   1.1  christos 		DPRINTF(("%s: slot=%d\n", __func__, slot));
    538  1.11  jdolecek 
    539  1.19  jdolecek 		vioscsi_req_done(sc, vsc, &sc->sc_reqs[slot], vq, slot);
    540  1.11  jdolecek 
    541   1.1  christos 		ret = 1;
    542   1.1  christos 	}
    543   1.1  christos 
    544  1.15  jdolecek 	mutex_exit(&sc->sc_mutex);
    545  1.15  jdolecek 
    546  1.15  jdolecek 	DPRINTF(("%s: exit %d: %d\n", __func__, vq->vq_index, ret));
    547   1.1  christos 
    548   1.1  christos 	return ret;
    549   1.1  christos }
    550   1.1  christos 
    551   1.1  christos static struct vioscsi_req *
    552   1.1  christos vioscsi_req_get(struct vioscsi_softc *sc)
    553   1.1  christos {
    554   1.1  christos 	struct virtio_softc *vsc = device_private(device_parent(sc->sc_dev));
    555  1.10  jdolecek 	struct virtqueue *vq = &sc->sc_vqs[VIOSCSI_VQ_REQUEST];
    556  1.15  jdolecek 	struct vioscsi_req *vr = NULL;
    557   1.1  christos 	int r, slot;
    558   1.1  christos 
    559  1.15  jdolecek 	mutex_enter(&sc->sc_mutex);
    560  1.15  jdolecek 
    561   1.1  christos 	if ((r = virtio_enqueue_prep(vsc, vq, &slot)) != 0) {
    562   1.1  christos 		DPRINTF(("%s: virtio_enqueue_get error %d\n", __func__, r));
    563  1.15  jdolecek 		goto out;
    564   1.1  christos 	}
    565   1.9  jdolecek 	KASSERT(slot < sc->sc_nreqs);
    566   1.1  christos 	vr = &sc->sc_reqs[slot];
    567   1.1  christos 
    568   1.1  christos 	DPRINTF(("%s: %p, %d\n", __func__, vr, slot));
    569   1.1  christos 
    570  1.15  jdolecek out:
    571  1.15  jdolecek 	mutex_exit(&sc->sc_mutex);
    572  1.15  jdolecek 
    573   1.1  christos 	return vr;
    574   1.1  christos }
    575   1.1  christos 
    576  1.15  jdolecek static int
    577   1.1  christos vioscsi_alloc_reqs(struct vioscsi_softc *sc, struct virtio_softc *vsc,
    578  1.15  jdolecek     int qsize)
    579   1.1  christos {
    580   1.1  christos 	size_t allocsize;
    581   1.9  jdolecek 	int r, rsegs, slot;
    582   1.1  christos 	void *vaddr;
    583   1.9  jdolecek 	struct vioscsi_req *vr;
    584   1.1  christos 
    585   1.1  christos 	allocsize = qsize * sizeof(struct vioscsi_req);
    586  1.12  jdolecek 	r = bus_dmamem_alloc(virtio_dmat(vsc), allocsize, 0, 0,
    587   1.1  christos 	    &sc->sc_reqs_segs[0], 1, &rsegs, BUS_DMA_NOWAIT);
    588   1.1  christos 	if (r != 0) {
    589   1.1  christos 		aprint_error_dev(sc->sc_dev,
    590   1.1  christos 		    "%s: bus_dmamem_alloc, size %zu, error %d\n", __func__,
    591   1.1  christos 		    allocsize, r);
    592   1.9  jdolecek 		return r;
    593   1.1  christos 	}
    594  1.12  jdolecek 	r = bus_dmamem_map(virtio_dmat(vsc), &sc->sc_reqs_segs[0], 1,
    595   1.1  christos 	    allocsize, &vaddr, BUS_DMA_NOWAIT);
    596   1.1  christos 	if (r != 0) {
    597   1.1  christos 		aprint_error_dev(sc->sc_dev,
    598   1.1  christos 		    "%s: bus_dmamem_map failed, error %d\n", __func__, r);
    599  1.12  jdolecek 		bus_dmamem_free(virtio_dmat(vsc), &sc->sc_reqs_segs[0], 1);
    600   1.9  jdolecek 		return r;
    601   1.1  christos 	}
    602   1.9  jdolecek 	memset(vaddr, 0, allocsize);
    603   1.9  jdolecek 
    604   1.1  christos 	sc->sc_reqs = vaddr;
    605   1.9  jdolecek 	sc->sc_nreqs = qsize;
    606   1.9  jdolecek 
    607  1.28     skrll 	/* Prepare maps for the requests */
    608   1.9  jdolecek 	for (slot=0; slot < qsize; slot++) {
    609   1.9  jdolecek 		vr = &sc->sc_reqs[slot];
    610   1.9  jdolecek 
    611  1.12  jdolecek 		r = bus_dmamap_create(virtio_dmat(vsc),
    612   1.9  jdolecek 		    offsetof(struct vioscsi_req, vr_xs), 1,
    613   1.9  jdolecek 		    offsetof(struct vioscsi_req, vr_xs), 0,
    614   1.9  jdolecek 		    BUS_DMA_NOWAIT|BUS_DMA_ALLOCNOW, &vr->vr_control);
    615   1.9  jdolecek 		if (r != 0) {
    616   1.9  jdolecek 			aprint_error_dev(sc->sc_dev,
    617  1.30    andvar 		    	    "%s: bus_dmamap_create ctrl failed, error %d\n",
    618   1.9  jdolecek 			    __func__, r);
    619   1.9  jdolecek 			goto cleanup;
    620   1.9  jdolecek 		}
    621   1.9  jdolecek 
    622  1.12  jdolecek 		r = bus_dmamap_create(virtio_dmat(vsc), MAXPHYS, sc->sc_seg_max,
    623   1.9  jdolecek 		    MAXPHYS, 0, BUS_DMA_NOWAIT|BUS_DMA_ALLOCNOW, &vr->vr_data);
    624   1.9  jdolecek 		if (r != 0) {
    625   1.9  jdolecek 			aprint_error_dev(sc->sc_dev,
    626  1.30    andvar 		    	    "%s: bus_dmamap_create data failed, error %d\n",
    627   1.9  jdolecek 			    __func__, r);
    628   1.9  jdolecek 			goto cleanup;
    629   1.9  jdolecek 		}
    630   1.9  jdolecek 
    631  1.12  jdolecek 		r = bus_dmamap_load(virtio_dmat(vsc), vr->vr_control,
    632   1.9  jdolecek 		    vr, offsetof(struct vioscsi_req, vr_xs), NULL,
    633   1.9  jdolecek 		    BUS_DMA_NOWAIT);
    634   1.9  jdolecek 		if (r != 0) {
    635   1.9  jdolecek 			aprint_error_dev(sc->sc_dev,
    636  1.15  jdolecek 		    	    "%s: bus_dmamap_load ctrl error %d\n",
    637   1.9  jdolecek 			    __func__, r);
    638   1.9  jdolecek 			goto cleanup;
    639   1.9  jdolecek 		}
    640   1.9  jdolecek 	}
    641   1.9  jdolecek 
    642   1.1  christos 	return 0;
    643   1.9  jdolecek 
    644   1.9  jdolecek cleanup:
    645   1.9  jdolecek 	for (; slot > 0; slot--) {
    646   1.9  jdolecek 		vr = &sc->sc_reqs[slot];
    647   1.9  jdolecek 
    648   1.9  jdolecek 		if (vr->vr_control) {
    649   1.9  jdolecek 			/* this will also unload the mapping if loaded */
    650  1.12  jdolecek 			bus_dmamap_destroy(virtio_dmat(vsc), vr->vr_control);
    651   1.9  jdolecek 			vr->vr_control = NULL;
    652   1.9  jdolecek 		}
    653   1.9  jdolecek 
    654   1.9  jdolecek 		if (vr->vr_data) {
    655  1.12  jdolecek 			bus_dmamap_destroy(virtio_dmat(vsc), vr->vr_data);
    656   1.9  jdolecek 			vr->vr_data = NULL;
    657   1.9  jdolecek 		}
    658   1.9  jdolecek 	}
    659   1.9  jdolecek 
    660  1.12  jdolecek 	bus_dmamem_unmap(virtio_dmat(vsc), vaddr, allocsize);
    661  1.12  jdolecek 	bus_dmamem_free(virtio_dmat(vsc), &sc->sc_reqs_segs[0], 1);
    662   1.9  jdolecek 
    663   1.9  jdolecek 	return r;
    664   1.1  christos }
    665  1.12  jdolecek 
    666  1.12  jdolecek static void
    667  1.12  jdolecek vioscsi_free_reqs(struct vioscsi_softc *sc, struct virtio_softc *vsc)
    668  1.12  jdolecek {
    669  1.12  jdolecek 	int slot;
    670  1.12  jdolecek 	struct vioscsi_req *vr;
    671  1.12  jdolecek 
    672  1.12  jdolecek 	if (sc->sc_nreqs == 0) {
    673  1.12  jdolecek 		/* Not allocated */
    674  1.12  jdolecek 		return;
    675  1.12  jdolecek 	}
    676  1.12  jdolecek 
    677  1.28     skrll 	/* Free request maps */
    678  1.12  jdolecek 	for (slot=0; slot < sc->sc_nreqs; slot++) {
    679  1.12  jdolecek 		vr = &sc->sc_reqs[slot];
    680  1.12  jdolecek 
    681  1.12  jdolecek 		bus_dmamap_destroy(virtio_dmat(vsc), vr->vr_control);
    682  1.12  jdolecek 		bus_dmamap_destroy(virtio_dmat(vsc), vr->vr_data);
    683  1.12  jdolecek 	}
    684  1.12  jdolecek 
    685  1.12  jdolecek 	bus_dmamem_unmap(virtio_dmat(vsc), sc->sc_reqs,
    686  1.12  jdolecek 			 sc->sc_nreqs * sizeof(struct vioscsi_req));
    687  1.12  jdolecek 	bus_dmamem_free(virtio_dmat(vsc), &sc->sc_reqs_segs[0], 1);
    688  1.12  jdolecek }
    689  1.12  jdolecek 
    690  1.15  jdolecek MODULE(MODULE_CLASS_DRIVER, vioscsi, "virtio");
    691  1.15  jdolecek 
    692  1.15  jdolecek #ifdef _MODULE
    693  1.15  jdolecek #include "ioconf.c"
    694  1.15  jdolecek #endif
    695  1.15  jdolecek 
    696  1.15  jdolecek static int
    697  1.15  jdolecek vioscsi_modcmd(modcmd_t cmd, void *opaque)
    698  1.15  jdolecek {
    699  1.15  jdolecek         int error = 0;
    700  1.15  jdolecek 
    701  1.15  jdolecek #ifdef _MODULE
    702  1.15  jdolecek         switch (cmd) {
    703  1.15  jdolecek         case MODULE_CMD_INIT:
    704  1.15  jdolecek                 error = config_init_component(cfdriver_ioconf_vioscsi,
    705  1.15  jdolecek                     cfattach_ioconf_vioscsi, cfdata_ioconf_vioscsi);
    706  1.15  jdolecek                 break;
    707  1.15  jdolecek         case MODULE_CMD_FINI:
    708  1.15  jdolecek                 error = config_fini_component(cfdriver_ioconf_vioscsi,
    709  1.15  jdolecek                     cfattach_ioconf_vioscsi, cfdata_ioconf_vioscsi);
    710  1.15  jdolecek                 break;
    711  1.15  jdolecek         default:
    712  1.15  jdolecek                 error = ENOTTY;
    713  1.15  jdolecek                 break;
    714  1.15  jdolecek         }
    715  1.15  jdolecek #endif
    716  1.15  jdolecek 
    717  1.15  jdolecek         return error;
    718  1.15  jdolecek }
    719