xref: /netbsd-src/sys/arch/sgimips/hpc/wdsc.c (revision 946379e7b37692fc43f68eb0d1c10daa0a7f3b6c)
1 /*	$NetBSD: wdsc.c,v 1.34 2015/02/18 16:47:58 macallan Exp $	*/
2 
3 /*
4  * Copyright (c) 2001 Wayne Knowles
5  * All rights reserved.
6  *
7  * This code is derived from software contributed to The NetBSD Foundation
8  * by Wayne Knowles
9  *
10  * Redistribution and use in source and binary forms, with or without
11  * modification, are permitted provided that the following conditions
12  * are met:
13  * 1. Redistributions of source code must retain the above copyright
14  *    notice, this list of conditions and the following disclaimer.
15  * 2. Redistributions in binary form must reproduce the above copyright
16  *    notice, this list of conditions and the following disclaimer in the
17  *    documentation and/or other materials provided with the distribution.
18  * 3. All advertising materials mentioning features or use of this software
19  *    must display the following acknowledgement:
20  *        This product includes software developed by the NetBSD
21  *        Foundation, Inc. and its contributors.
22  * 4. Neither the name of The NetBSD Foundation nor the names of its
23  *    contributors may be used to endorse or promote products derived
24  *    from this software without specific prior written permission.
25  *
26  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
27  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
28  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
29  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
30  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
31  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
32  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
33  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
34  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
35  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
36  * POSSIBILITY OF SUCH DAMAGE.
37  */
38 
39 #include <sys/cdefs.h>
40 __KERNEL_RCSID(0, "$NetBSD: wdsc.c,v 1.34 2015/02/18 16:47:58 macallan Exp $");
41 
42 #include <sys/param.h>
43 #include <sys/systm.h>
44 #include <sys/kernel.h>
45 #include <sys/device.h>
46 #include <sys/buf.h>
47 
48 #include <dev/scsipi/scsi_all.h>
49 #include <dev/scsipi/scsipi_all.h>
50 #include <dev/scsipi/scsiconf.h>
51 
52 #include <machine/cpu.h>
53 #include <sys/bus.h>
54 #include <machine/autoconf.h>
55 #include <machine/machtype.h>
56 #include <machine/sysconf.h>
57 
58 #include <sgimips/hpc/hpcvar.h>
59 #include <sgimips/hpc/hpcreg.h>
60 #include <sgimips/hpc/hpcdma.h>
61 
62 #include <dev/ic/wd33c93reg.h>
63 #include <dev/ic/wd33c93var.h>
64 
65 #include <opt_kgdb.h>
66 #include <sys/kgdb.h>
67 
68 struct wdsc_softc {
69 	struct wd33c93_softc	sc_wd33c93; /* Must be first */
70 	struct evcnt		sc_intrcnt; /* Interrupt counter */
71 	bus_dma_tag_t		sc_dmat;
72 	bus_dmamap_t		sc_dmamap;
73 	int			sc_flags;
74 #define	WDSC_DMA_ACTIVE			0x1
75 #define	WDSC_DMA_MAPLOADED		0x2
76 	struct hpc_dma_softc	sc_hpcdma;
77 };
78 
79 
80 int	wdsc_match(device_t, cfdata_t, void *);
81 void	wdsc_attach(device_t, device_t, void *);
82 
83 CFATTACH_DECL_NEW(wdsc, sizeof(struct wdsc_softc),
84     wdsc_match, wdsc_attach, NULL, NULL);
85 
86 int	wdsc_dmasetup(struct wd33c93_softc *, void ** ,size_t *, int, size_t *);
87 int	wdsc_dmago(struct wd33c93_softc *);
88 void	wdsc_dmastop(struct wd33c93_softc *);
89 void	wdsc_reset(struct wd33c93_softc *);
90 int	wdsc_dmaintr(void *);
91 int	wdsc_scsiintr(void *);
92 
93 /*
94  * Match for SCSI devices on the onboard and GIO32 adapter WD33C93 chips
95  */
96 int
97 wdsc_match(device_t parent, cfdata_t cf, void *aux)
98 {
99 	struct hpc_attach_args *haa = aux;
100 
101 	if (strcmp(haa->ha_name, cf->cf_name) == 0) {
102 		vaddr_t reset, asr, reg;
103 
104 		reset = MIPS_PHYS_TO_KSEG1(haa->ha_sh + haa->ha_dmaoff +
105 		    haa->hpc_regs->scsi0_ctl);
106 		asr = MIPS_PHYS_TO_KSEG1(haa->ha_sh + haa->ha_devoff);
107 
108 		if (platform.badaddr((void *)reset, sizeof(reset)))
109 			return 0;
110 
111 		*(volatile uint32_t *)reset = haa->hpc_regs->scsi_dmactl_reset;
112 		delay(1000);
113 		*(volatile uint32_t *)reset = 0x0;
114 
115 		if (platform.badaddr((void *)asr, sizeof(asr)))
116 			return 0;
117 
118 		reg = *(volatile uint32_t *)asr;
119 		if (haa->hpc_regs->revision == 3) {
120 			if ((reg & 0xff) == SBIC_ASR_INT)
121 				return 1;
122 		} else {
123 			if (((reg >> 8) & 0xff) == SBIC_ASR_INT)
124 				return 1;
125 		}
126 	}
127 
128 	return 0;
129 }
130 
131 /*
132  * Attach the wdsc driver
133  */
134 void
135 wdsc_attach(device_t parent, device_t self, void *aux)
136 {
137 	struct wdsc_softc *wsc = device_private(self);
138 	struct wd33c93_softc *sc = &wsc->sc_wd33c93;
139 	struct hpc_attach_args *haa = aux;
140 	int err;
141 
142 	sc->sc_dev = self;
143 	sc->sc_regt = haa->ha_st;
144 	wsc->sc_dmat = haa->ha_dmat;
145 
146 	wsc->sc_hpcdma.hpc = haa->hpc_regs;
147 
148 	if ((err = bus_space_subregion(haa->ha_st, haa->ha_sh,
149 	    haa->ha_devoff + 0 + 3, 1, &sc->sc_asr_regh)) != 0) {
150 		printf(": unable to map asr reg, err=%d\n", err);
151 		return;
152 	}
153 
154 	if ((err = bus_space_subregion(haa->ha_st, haa->ha_sh,
155 	    haa->ha_devoff + 4 + 3,  1, &sc->sc_data_regh)) != 0) {
156 		printf(": unable to map data reg, err=%d\n", err);
157 		return;
158 	}
159 
160 	if (bus_dmamap_create(wsc->sc_dmat, MAXPHYS,
161 	    wsc->sc_hpcdma.hpc->scsi_dma_segs,
162 	    wsc->sc_hpcdma.hpc->scsi_dma_segs_size,
163 	    wsc->sc_hpcdma.hpc->scsi_dma_segs_size,
164 	    BUS_DMA_WAITOK, &wsc->sc_dmamap) != 0) {
165 		printf(": failed to create dmamap\n");
166 		return;
167 	}
168 
169 	sc->sc_dmasetup = wdsc_dmasetup;
170 	sc->sc_dmago    = wdsc_dmago;
171 	sc->sc_dmastop  = wdsc_dmastop;
172 	sc->sc_reset	= wdsc_reset;
173 
174 	sc->sc_adapter.adapt_request = wd33c93_scsi_request;
175 	sc->sc_adapter.adapt_minphys = minphys;
176 
177 	sc->sc_id = 0;					/* Host ID = 0 */
178 	sc->sc_clkfreq = 200;				/* 20MHz */
179 	sc->sc_dmamode = SBIC_CTL_BURST_DMA;
180 
181 	evcnt_attach_dynamic(&wsc->sc_intrcnt, EVCNT_TYPE_INTR, NULL,
182 	    device_xname(sc->sc_dev), "intr");
183 
184 	if ((cpu_intr_establish(haa->ha_irq, IPL_BIO,
185 	     wdsc_scsiintr, wsc)) == NULL) {
186 		printf(": unable to establish interrupt!\n");
187 		return;
188 	}
189 
190 	hpcdma_init(haa, &wsc->sc_hpcdma, wsc->sc_hpcdma.hpc->scsi_dma_segs);
191 	wd33c93_attach(sc);
192 }
193 
194 /*
195  * Prime the hardware for a DMA transfer
196  *
197  * Requires splbio() interrupts to be disabled by the caller
198  */
199 int
200 wdsc_dmasetup(struct wd33c93_softc *sc, void **addr, size_t *len, int datain,
201     size_t *dmasize)
202 {
203 	struct wdsc_softc *wsc = (struct wdsc_softc *)sc;
204 	struct hpc_dma_softc *dsc = &wsc->sc_hpcdma;
205 	int count, err;
206 	void *vaddr;
207 
208 	KASSERT((wsc->sc_flags & WDSC_DMA_ACTIVE) == 0);
209 
210 	vaddr = *addr;
211 	count = dsc->sc_dlen = *len;
212 	if (count) {
213 		KASSERT((wsc->sc_flags & WDSC_DMA_MAPLOADED) == 0);
214 
215 		/* Build list of physical addresses for this transfer */
216 		if ((err = bus_dmamap_load(wsc->sc_dmat, wsc->sc_dmamap,
217 		    vaddr, count, NULL /* kernel address */,
218 		    BUS_DMA_NOWAIT)) != 0)
219 			panic("%s: bus_dmamap_load err=%d",
220 			    device_xname(sc->sc_dev), err);
221 
222 		hpcdma_sglist_create(dsc, wsc->sc_dmamap);
223 		wsc->sc_flags |= WDSC_DMA_MAPLOADED;
224 
225 		if (datain) {
226 			dsc->sc_dmacmd =
227 			    wsc->sc_hpcdma.hpc->scsi_dma_datain_cmd;
228 			dsc->sc_flags |= HPCDMA_READ;
229 		} else {
230 			dsc->sc_dmacmd =
231 			    wsc->sc_hpcdma.hpc->scsi_dma_dataout_cmd;
232 			dsc->sc_flags &= ~HPCDMA_READ;
233 		}
234 	}
235 	return count;
236 }
237 
238 /*
239  * Prime the hardware for the next DMA transfer
240  */
241 int
242 wdsc_dmago(struct wd33c93_softc *sc)
243 {
244 	struct wdsc_softc *wsc = (struct wdsc_softc *)sc;
245 	struct hpc_dma_softc *dsc = &wsc->sc_hpcdma;
246 
247 	if (dsc->sc_dlen == 0)
248 		return 0;
249 
250 	KASSERT((wsc->sc_flags & WDSC_DMA_ACTIVE) == 0);
251 	KASSERT((wsc->sc_flags & WDSC_DMA_MAPLOADED));
252 
253 	wsc->sc_flags |= WDSC_DMA_ACTIVE;
254 
255 	bus_dmamap_sync(wsc->sc_dmat, wsc->sc_dmamap,
256 	    0, wsc->sc_dmamap->dm_mapsize,
257 	    (dsc->sc_flags & HPCDMA_READ) ?
258 	    BUS_DMASYNC_PREREAD : BUS_DMASYNC_PREWRITE);
259 
260 	hpcdma_cntl(dsc, dsc->sc_dmacmd);	/* Thunderbirds are go! */
261 
262 	return wsc->sc_dmamap->dm_mapsize;
263 }
264 
265 /*
266  * Stop DMA and unload active DMA maps
267  */
268 void
269 wdsc_dmastop(struct wd33c93_softc *sc)
270 {
271 	struct wdsc_softc *wsc = (struct wdsc_softc *)sc;
272 	struct hpc_dma_softc *dsc = &wsc->sc_hpcdma;
273 
274 	if (wsc->sc_flags & WDSC_DMA_ACTIVE) {
275 		if (dsc->sc_flags & HPCDMA_READ)
276 			hpcdma_flush(dsc);
277 		hpcdma_cntl(dsc, 0);	/* Stop DMA */
278 		bus_dmamap_sync(wsc->sc_dmat, wsc->sc_dmamap,
279 		    0, wsc->sc_dmamap->dm_mapsize,
280 		    (dsc->sc_flags & HPCDMA_READ) ?
281 		    BUS_DMASYNC_POSTREAD : BUS_DMASYNC_POSTWRITE);
282 	}
283 	if (wsc->sc_flags & WDSC_DMA_MAPLOADED)
284 		bus_dmamap_unload(wsc->sc_dmat, wsc->sc_dmamap);
285 	wsc->sc_flags &= ~(WDSC_DMA_ACTIVE | WDSC_DMA_MAPLOADED);
286 }
287 
288 /*
289  * Reset the controller.
290  */
291 void
292 wdsc_reset(struct wd33c93_softc *sc)
293 {
294 	struct wdsc_softc *wsc = (struct wdsc_softc *)sc;
295 	struct hpc_dma_softc *dsc = &wsc->sc_hpcdma;
296 
297 	hpcdma_reset(dsc);
298 }
299 
300 /*
301  * WD33c93 SCSI controller interrupt
302  */
303 int
304 wdsc_scsiintr(void *arg)
305 {
306 	struct wdsc_softc *wsc = arg;
307 	struct wd33c93_softc *sc = &wsc->sc_wd33c93;
308 	int found;
309 
310 	found = wd33c93_intr(sc);
311 	if (found)
312 		wsc->sc_intrcnt.ev_count++;
313 	return found;
314 }
315