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