xref: /netbsd-src/sys/arch/sgimips/hpc/wdsc.c (revision 06be8101a16cc95f40783b3cb7afd12112103a9a)
1 /*	$NetBSD: wdsc.c,v 1.2 2001/11/10 07:32:43 wdk 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 /*
40  * TODO:
41  *    Support for 2nd SCSI controller
42  */
43 
44 #include <sys/param.h>
45 #include <sys/systm.h>
46 #include <sys/kernel.h>
47 #include <sys/device.h>
48 #include <sys/buf.h>
49 
50 #include <dev/scsipi/scsi_all.h>
51 #include <dev/scsipi/scsipi_all.h>
52 #include <dev/scsipi/scsiconf.h>
53 
54 #include <machine/cpu.h>
55 #include <machine/bus.h>
56 #include <machine/autoconf.h>
57 
58 #include <sgimips/hpc/hpcvar.h>
59 #include <sgimips/hpc/hpcreg.h>
60 #include <sgimips/hpc/hpcdma.h>
61 
62 #include <sgimips/hpc/sbicreg.h>
63 #include <sgimips/hpc/sbicvar.h>
64 
65 #include <opt_kgdb.h>
66 #include <sys/kgdb.h>
67 
68 struct wdsc_softc {
69 	struct sbic_softc	sc_sbic; /* 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 void    wdsc_attach __P((struct device *, struct device *, void *));
81 int     wdsc_match  __P((struct device *, struct cfdata *, void *));
82 
83 struct cfattach wdsc_ca = {
84 	sizeof(struct wdsc_softc), wdsc_match, wdsc_attach
85 };
86 
87 extern struct cfdriver wdsc_cd;
88 
89 int     wdsc_dmasetup   __P((struct sbic_softc *, caddr_t *,size_t *,
90 				int, size_t *));
91 int     wdsc_dmago      __P((struct sbic_softc *));
92 void    wdsc_dmastop    __P((struct sbic_softc *));
93 int     wdsc_dmaintr    __P((void *));
94 int     wdsc_scsiintr   __P((void *));
95 
96 #define MAX_SCSI_XFER   (512*1024)
97 #define MAX_SEG_SZ	8192
98 #define	MAX_DMA_SZ	MAX_SCSI_XFER
99 #define	DMA_SEGS	(MAX_DMA_SZ/MAX_SEG_SZ)
100 
101 /*
102  * Match for SCSI devices on the onboard WD33C93 chip
103  */
104 int
105 wdsc_match(pdp, cf, auxp)
106 	struct device *pdp;
107 	struct cfdata *cf;
108 	void *auxp;
109 {
110 	struct hpc_attach_args *haa = auxp;
111 
112 	if (strcmp(haa->ha_name, wdsc_cd.cd_name))
113 		return (0);
114 	return (1);
115 }
116 
117 /*
118  * Attach the wdsc driver
119  */
120 void
121 wdsc_attach(pdp, dp, auxp)
122 	struct device *pdp, *dp;
123 	void *auxp;
124 {
125 	struct sbic_softc *sc = (void *)dp;
126 	struct wdsc_softc *wsc = (void *)dp;
127 	struct hpc_attach_args *haa = auxp;
128 	int err;
129 
130 	sc->sc_regt = haa->ha_iot;
131 	wsc->sc_dmat = haa->ha_dmat;
132 
133 	if ((err = bus_space_subregion(haa->ha_iot, haa->ha_ioh,
134 					HPC_SCSI0_DEVREGS,
135 	     				HPC_SCSI0_DEVREGS_SIZE,
136 	     				&sc->sc_regh)) != 0) {
137 		printf(": unable to map regs, err=%d\n", err);
138 		return;
139 	}
140 
141 	if (bus_dmamap_create(wsc->sc_dmat, MAX_DMA_SZ,
142 			      DMA_SEGS, MAX_SEG_SZ, MAX_SEG_SZ,
143 			      BUS_DMA_WAITOK,
144 			      &wsc->sc_dmamap) != 0) {
145 		printf(": failed to create dmamap\n");
146 		return;
147 	}
148 
149 	sc->sc_dmasetup = wdsc_dmasetup;
150 	sc->sc_dmago    = wdsc_dmago;
151 	sc->sc_dmastop  = wdsc_dmastop;
152 
153 	sc->sc_adapter.adapt_request = sbic_scsi_request;
154 	sc->sc_adapter.adapt_minphys = minphys;
155 
156 	sc->sc_id = 7;			/* Host ID = 7 */
157 	sc->sc_clkfreq = 200;		/* 20MHz Clock */
158 
159 	evcnt_attach_dynamic(&wsc->sc_intrcnt, EVCNT_TYPE_INTR, NULL,
160 			     sc->sc_dev.dv_xname, "intr");
161 
162 	/* XXX: 1 = IRQ_LOCAL0 + 1 */
163 	if ((cpu_intr_establish(1, IPL_BIO, wdsc_scsiintr, sc)) == NULL) {
164 		printf(": unable to establish interrupt!\n");
165 		return;
166 	}
167 
168 	hpcdma_init(haa, &wsc->sc_hpcdma, DMA_SEGS);
169 	sbic_attach(sc);
170 	return;
171 }
172 
173 /*
174  * Prime the hardware for a DMA transfer
175  *
176  * Requires splbio() interrupts to be disabled by the caller
177  */
178 int
179 wdsc_dmasetup(dev, addr, len, datain, dmasize)
180 	struct sbic_softc *dev;
181 	caddr_t *addr;
182 	size_t *len;
183 	int datain;
184 	size_t *dmasize;
185 {
186 	struct wdsc_softc *wsc = (void *)dev;
187 	struct hpc_dma_softc *dsc = &wsc->sc_hpcdma;
188 	int     count, err;
189 	void   *vaddr;
190 
191 	KASSERT((wsc->sc_flags & WDSC_DMA_ACTIVE) == 0);
192 
193 	vaddr = *addr;
194 	count = dsc->sc_dlen = *len;
195 	if (count) {
196 		KASSERT((wsc->sc_flags & WDSC_DMA_MAPLOADED) == 0);
197 
198 		/* Build list of physical addresses for this transfer */
199 		if ((err=bus_dmamap_load(wsc->sc_dmat, wsc->sc_dmamap,
200 				vaddr, count,
201 				NULL /* kernel address */,
202 				BUS_DMA_NOWAIT)) != 0)
203 			panic("%s: bus_dmamap_load err=%d",
204 			      dev->sc_dev.dv_xname, err);
205 
206 		hpcdma_sglist_create(dsc, wsc->sc_dmamap);
207 		wsc->sc_flags |= WDSC_DMA_MAPLOADED;
208 
209 		if (datain) {
210 			dsc->sc_dmacmd = HPC_DMACTL_ACTIVE;
211 			dsc->sc_flags |= HPCDMA_READ;
212 		} else {
213 			dsc->sc_dmacmd = HPC_DMACTL_ACTIVE | HPC_DMACTL_DIR;
214 			dsc->sc_flags &= ~HPCDMA_READ;
215 		}
216 	}
217 	return(count);
218 }
219 
220 /*
221  * Prime the hardware for the next DMA transfer
222  */
223 int
224 wdsc_dmago(dev)
225 	struct sbic_softc *dev;
226 {
227 	struct wdsc_softc *wsc = (void *)dev;
228 	struct hpc_dma_softc *dsc = &wsc->sc_hpcdma;
229 
230 	if (dsc->sc_dlen == 0)
231 		return(0);
232 
233 	KASSERT((wsc->sc_flags & WDSC_DMA_ACTIVE) == 0);
234 	KASSERT((wsc->sc_flags & WDSC_DMA_MAPLOADED));
235 
236 	wsc->sc_flags |= WDSC_DMA_ACTIVE;
237 
238 	bus_dmamap_sync(wsc->sc_dmat, wsc->sc_dmamap, 0,
239 	    		wsc->sc_dmamap->dm_mapsize,
240 			BUS_DMASYNC_PREREAD|BUS_DMASYNC_PREWRITE);
241 
242 	hpcdma_cntl(dsc, dsc->sc_dmacmd);	/* Thunderbirds are go! */
243 
244 	return(wsc->sc_dmamap->dm_mapsize);
245 }
246 
247 /*
248  * Stop DMA and unload active DMA maps
249  */
250 void
251 wdsc_dmastop(dev)
252 	struct sbic_softc *dev;
253 {
254 	struct wdsc_softc *wsc = (void *)dev;
255 	struct hpc_dma_softc *dsc = &wsc->sc_hpcdma;
256 
257 	if (wsc->sc_flags & WDSC_DMA_ACTIVE) {
258 		if (dsc->sc_flags & HPCDMA_READ)
259 			hpcdma_flush(dsc);
260 		hpcdma_cntl(dsc, 0);	/* Stop DMA */
261 		bus_dmamap_sync(wsc->sc_dmat, wsc->sc_dmamap, 0,
262 		    wsc->sc_dmamap->dm_mapsize,
263 		    BUS_DMASYNC_POSTREAD|BUS_DMASYNC_POSTWRITE);
264 	}
265 	if (wsc->sc_flags & WDSC_DMA_MAPLOADED)
266 		bus_dmamap_unload(wsc->sc_dmat, wsc->sc_dmamap);
267 	wsc->sc_flags &= ~(WDSC_DMA_ACTIVE | WDSC_DMA_MAPLOADED);
268 }
269 
270 /*
271  * WD33c93 SCSI controller interrupt
272  */
273 int
274 wdsc_scsiintr(arg)
275 	void *arg;
276 {
277 	struct sbic_softc *dev = arg;
278 	struct wdsc_softc *wsc = arg;
279 	int found;
280 
281 	found = sbic_intr(dev);
282 	if (found)
283 		wsc->sc_intrcnt.ev_count++;
284 	return(found);
285 }
286