Home | History | Annotate | Line # | Download | only in podulebus
      1 /*	$NetBSD: esp_podule.c,v 1.1 2013/07/11 13:44:50 kiyohara Exp $	*/
      2 /*
      3  * Copyright (c) 2013 KIYOHARA Takashi
      4  * All rights reserved.
      5  *
      6  * Redistribution and use in source and binary forms, with or without
      7  * modification, are permitted provided that the following conditions
      8  * are met:
      9  * 1. Redistributions of source code must retain the above copyright
     10  *    notice, this list of conditions and the following disclaimer.
     11  * 2. Redistributions in binary form must reproduce the above copyright
     12  *    notice, this list of conditions and the following disclaimer in the
     13  *    documentation and/or other materials provided with the distribution.
     14  *
     15  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     16  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
     17  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
     18  * DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT,
     19  * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
     20  * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
     21  * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     22  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
     23  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
     24  * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     25  * POSSIBILITY OF SUCH DAMAGE.
     26  */
     27 #include <sys/cdefs.h>
     28 __KERNEL_RCSID(0, "$NetBSD: esp_podule.c,v 1.1 2013/07/11 13:44:50 kiyohara Exp $");
     29 
     30 #include <sys/param.h>
     31 #include <sys/buf.h>
     32 #include <sys/bus.h>
     33 #include <sys/device.h>
     34 
     35 #include <dev/scsipi/scsi_all.h>
     36 #include <dev/scsipi/scsipi_all.h>
     37 #include <dev/scsipi/scsiconf.h>
     38 
     39 #include <dev/ic/ncr53c9xreg.h>
     40 #include <dev/ic/ncr53c9xvar.h>
     41 
     42 #include <dev/podulebus/podulebus.h>
     43 #include <dev/podulebus/podules.h>
     44 
     45 struct esp_podule_softc {
     46 	struct ncr53c9x_softc sc_ncr53c9x;
     47 
     48 	bus_space_tag_t sc_iot;
     49 	bus_space_handle_t sc_ioh;
     50 
     51 	struct ncr53c9x_glue sc_esp_glue;
     52 
     53 	int sc_active;			/* Pseudo-DMA state vars */
     54 	int sc_tc;
     55 	int sc_datain;
     56 	size_t sc_dmasize;
     57 	size_t sc_dmatrans;
     58 	uint8_t **sc_dmaaddr;
     59 	size_t *sc_dmalen;
     60 };
     61 
     62 static int esp_podule_match(device_t, cfdata_t, void *);
     63 static void esp_podule_attach(device_t, device_t, void *);
     64 
     65 static int esp_podule_dma_isintr(struct ncr53c9x_softc *);
     66 static void esp_podule_dma_reset(struct ncr53c9x_softc *);
     67 static int esp_podule_dma_intr(struct ncr53c9x_softc *);
     68 static int esp_podule_dma_setup(struct ncr53c9x_softc *, uint8_t **, size_t *,
     69 				int, size_t *);
     70 static void esp_podule_dma_go(struct ncr53c9x_softc *);
     71 static void esp_podule_dma_stop(struct ncr53c9x_softc *);
     72 static int esp_podule_dma_isactive(struct ncr53c9x_softc *);
     73 
     74 static uint8_t castle_read_reg(struct ncr53c9x_softc *, int);
     75 static void castle_write_reg(struct ncr53c9x_softc *, int, uint8_t);
     76 
     77 CFATTACH_DECL_NEW(esp_podule, sizeof(struct esp_podule_softc),
     78     esp_podule_match, esp_podule_attach, NULL, NULL);
     79 
     80 static struct ncr53c9x_glue esp_podule_glue = {
     81 	NULL,
     82 	NULL,
     83 
     84 	esp_podule_dma_isintr,
     85 	esp_podule_dma_reset,
     86 	esp_podule_dma_intr,
     87 	esp_podule_dma_setup,
     88 	esp_podule_dma_go,
     89 	esp_podule_dma_stop,
     90 	esp_podule_dma_isactive,
     91 	NULL
     92 };
     93 
     94 #define PODULE_DEVICE(m, p, read, write) \
     95 	{ MANUFACTURER_ ## m, PODULE_ ## m ## _ ## p, read, write }
     96 static struct {
     97 	int manufacturer;
     98 	int product;
     99 	uint8_t (*read_reg)(struct ncr53c9x_softc *, int);
    100 	void (*write_reg)(struct ncr53c9x_softc *, int, uint8_t);
    101 } devices[] = {
    102 	PODULE_DEVICE(CASTLE, SCSI16, castle_read_reg, castle_write_reg),
    103 };
    104 
    105 
    106 static int
    107 esp_podule_match(device_t parent, cfdata_t cf, void *aux)
    108 {
    109 	struct podulebus_attach_args *pa = aux;
    110 	int i;
    111 
    112 	for (i = 0; i < __arraycount(devices); i++)
    113 		if (pa->pa_manufacturer == devices[i].manufacturer &&
    114 		    pa->pa_product == devices[i].product)
    115 			return 1;
    116 
    117 	return 0;
    118 }
    119 
    120 static void
    121 esp_podule_attach(device_t parent, device_t self, void *aux)
    122 {
    123 	struct esp_podule_softc *esc = device_private(self);
    124 	struct ncr53c9x_softc *sc = &esc->sc_ncr53c9x;
    125 	struct podulebus_attach_args *pa = aux;
    126 	int i;
    127 
    128 	for (i = 0; i < __arraycount(devices); i++)
    129 		if (pa->pa_manufacturer == devices[i].manufacturer &&
    130 		    pa->pa_product == devices[i].product)
    131 			break;
    132 	if (i == __arraycount(devices)) {
    133 		aprint_error(": lost manufacturer 0x%04x, product 0x%04x\n",
    134 		    pa->pa_manufacturer, pa->pa_product);
    135 		return;
    136 	}
    137 
    138 	sc->sc_dev = self;
    139 	esc->sc_esp_glue = esp_podule_glue;
    140 	esc->sc_esp_glue.gl_read_reg = devices[i].read_reg;
    141 	esc->sc_esp_glue.gl_write_reg = devices[i].write_reg;
    142 	sc->sc_glue = &esc->sc_esp_glue;
    143 
    144 	esc->sc_iot = pa->pa_slow_t;
    145 	bus_space_map(esc->sc_iot, pa->pa_slow_base, 0x4000, 0, &esc->sc_ioh);
    146 	sc->sc_freq = 2;	/* XXXX ??? */
    147 
    148 	/* Get current ID */
    149 	sc->sc_id = NCR_READ_REG(sc, NCR_CFG1) & NCRCFG1_BUSID;
    150 
    151 	sc->sc_cfg1 = sc->sc_id;
    152 	sc->sc_cfg2 = NCRCFG2_SCSI2 | NCRCFG2_DREQ | NCRCFG2_FE;
    153 	sc->sc_rev = NCR_VARIANT_NCR53C96;	/* XXXX ??? */
    154 
    155 	sc->sc_minsync = 1000 / sc->sc_freq;
    156 
    157 	sc->sc_maxxfer = 64 * 1024;
    158 
    159 	evcnt_attach_dynamic(&sc->sc_intrcnt, EVCNT_TYPE_INTR, NULL,
    160 	    device_xname(self), "intr");
    161 	podulebus_irq_establish(pa->pa_ih, IPL_BIO, ncr53c9x_intr, sc,
    162 	    &sc->sc_intrcnt);
    163 
    164 	sc->sc_adapter.adapt_minphys = minphys;
    165 	sc->sc_adapter.adapt_request = ncr53c9x_scsipi_request;
    166 	ncr53c9x_attach(sc);
    167 }
    168 
    169 
    170 static int
    171 esp_podule_dma_isintr(struct ncr53c9x_softc *sc)
    172 {
    173 
    174 	return NCR_READ_REG(sc, NCR_STAT) & NCRSTAT_INT;
    175 }
    176 
    177 static void
    178 esp_podule_dma_reset(struct ncr53c9x_softc *sc)
    179 {
    180 	struct esp_podule_softc *esc = (struct esp_podule_softc *)sc;
    181 
    182 	esc->sc_active = 0;
    183 	esc->sc_tc = 0;
    184 }
    185 
    186 static int
    187 esp_podule_dma_intr(struct ncr53c9x_softc *sc)
    188 {
    189 	struct esp_podule_softc *esc = (struct esp_podule_softc *)sc;
    190 	uint8_t *p;
    191 	u_int espphase, espstat, espintr;
    192 	int cnt;
    193 
    194 	if (esc->sc_active == 0) {
    195 		printf("%s: dma_intr--inactive DMA\n",
    196 		    device_xname(sc->sc_dev));
    197 		return -1;
    198 	}
    199 
    200 	if ((sc->sc_espintr & NCRINTR_BS) == 0) {
    201 		esc->sc_active = 0;
    202 		return 0;
    203 	}
    204 
    205 	cnt = *esc->sc_dmalen;
    206 	if (*esc->sc_dmalen == 0) {
    207 		printf("%s: data interrupt, but no count left\n",
    208 		    device_xname(sc->sc_dev));
    209 	}
    210 
    211 	p = *esc->sc_dmaaddr;
    212 	espphase = sc->sc_phase;
    213 	espstat = (u_int)sc->sc_espstat;
    214 	espintr = (u_int)sc->sc_espintr;
    215 	do {
    216 		if (esc->sc_datain) {
    217 			*p++ = NCR_READ_REG(sc, NCR_FIFO);
    218 			cnt--;
    219 			if (espphase == DATA_IN_PHASE)
    220 				NCR_WRITE_REG(sc, NCR_CMD, NCRCMD_TRANS);
    221 			else
    222 				esc->sc_active = 0;
    223 		} else {
    224 			if ((espphase == DATA_OUT_PHASE) ||
    225 			    (espphase == MESSAGE_OUT_PHASE)) {
    226 				NCR_WRITE_REG(sc, NCR_FIFO, *p++);
    227 				cnt--;
    228 				NCR_WRITE_REG(sc, NCR_CMD, NCRCMD_TRANS);
    229 			} else
    230 				esc->sc_active = 0;
    231 		}
    232 
    233 		if (esc->sc_active) {
    234 			while ((NCR_READ_REG(sc, NCR_STAT) & NCRSTAT_INT) == 0)
    235 				;
    236 			espstat = NCR_READ_REG(sc, NCR_STAT);
    237 			espintr = NCR_READ_REG(sc, NCR_INTR);
    238 			espphase = (espintr & NCRINTR_DIS) ?
    239 			    /* Disconnected */ BUSFREE_PHASE :
    240 			    espstat & PHASE_MASK;
    241 		}
    242 	} while (esc->sc_active && espintr);
    243 	sc->sc_phase = espphase;
    244 	sc->sc_espstat = (uint8_t)espstat;
    245 	sc->sc_espintr = (uint8_t)espintr;
    246 	*esc->sc_dmaaddr = p;
    247 	*esc->sc_dmalen = cnt;
    248 
    249 	if (*esc->sc_dmalen == 0)
    250 		esc->sc_tc = NCRSTAT_TC;
    251 	sc->sc_espstat |= esc->sc_tc;
    252 
    253 	return 0;
    254 }
    255 
    256 static int
    257 esp_podule_dma_setup(struct ncr53c9x_softc *sc, uint8_t **addr, size_t *len,
    258 		     int datain, size_t *dmasize)
    259 {
    260 	struct esp_podule_softc *esc = (struct esp_podule_softc *)sc;
    261 
    262 	esc->sc_dmaaddr = addr;
    263 	esc->sc_dmalen = len;
    264 	esc->sc_datain = datain;
    265 	esc->sc_dmasize = *dmasize;
    266 	esc->sc_tc = 0;
    267 
    268 	return 0;
    269 }
    270 
    271 static void
    272 esp_podule_dma_go(struct ncr53c9x_softc *sc)
    273 {
    274 	struct esp_podule_softc *esc = (struct esp_podule_softc *)sc;
    275 
    276 	if (esc->sc_datain == 0) {
    277 		NCR_WRITE_REG(sc, NCR_FIFO, **esc->sc_dmaaddr);
    278 		(*esc->sc_dmalen)--;
    279 		(*esc->sc_dmaaddr)++;
    280 	}
    281 
    282 	esc->sc_active = 1;
    283 }
    284 
    285 static void
    286 esp_podule_dma_stop(struct ncr53c9x_softc *sc)
    287 {
    288 	/* Nothing */
    289 }
    290 
    291 static int
    292 esp_podule_dma_isactive(struct ncr53c9x_softc *sc)
    293 {
    294 	struct esp_podule_softc *esc = (struct esp_podule_softc *)sc;
    295 
    296 	return esc->sc_active;
    297 }
    298 
    299 /*
    300  * Functions for access to Castle SCSI registers.
    301  */
    302 #define CASTLE_ESP_OFFSET	0xf00
    303 #define CASTLE_ESP_READ(sc, r) \
    304     bus_space_read_1((sc)->sc_iot, (sc)->sc_ioh, CASTLE_ESP_OFFSET + ((r) << 2))
    305 #define CASTLE_ESP_WRITE(sc, r, v) \
    306     bus_space_write_1((sc)->sc_iot, (sc)->sc_ioh, \
    307 					CASTLE_ESP_OFFSET + ((r) << 2), (v))
    308 
    309 static uint8_t
    310 castle_read_reg(struct ncr53c9x_softc *sc, int reg)
    311 {
    312 	struct esp_podule_softc *esc = (struct esp_podule_softc *)sc;
    313 	uint8_t val;
    314 
    315 	val = CASTLE_ESP_READ(esc, reg);
    316 	return val;
    317 }
    318 
    319 static void
    320 castle_write_reg(struct ncr53c9x_softc *sc, int reg, uint8_t val)
    321 {
    322 	struct esp_podule_softc *esc = (struct esp_podule_softc *)sc;
    323 
    324 	if (reg == NCR_CMD && val == (NCRCMD_TRANS | NCRCMD_DMA))
    325 		val &= ~NCRCMD_DMA;			/* DMA not support */
    326 	CASTLE_ESP_WRITE(esc, reg, val);
    327 }
    328