xref: /netbsd-src/sys/arch/amiga/dev/drsc.c (revision 1ca5c1b28139779176bd5c13ad7c5f25c0bcd5f8)
1 /*	$NetBSD: drsc.c,v 1.18 2001/04/25 17:53:07 bouyer Exp $	*/
2 
3 /*
4  * Copyright (c) 1996 Ignatios Souvatzis
5  * Copyright (c) 1994 Michael L. Hitch
6  * Copyright (c) 1982, 1990 The Regents of the University of California.
7  * All rights reserved.
8  *
9  * Redistribution and use in source and binary forms, with or without
10  * modification, are permitted provided that the following conditions
11  * are met:
12  * 1. Redistributions of source code must retain the above copyright
13  *    notice, this list of conditions and the following disclaimer.
14  * 2. Redistributions in binary form must reproduce the above copyright
15  *    notice, this list of conditions and the following disclaimer in the
16  *    documentation and/or other materials provided with the distribution.
17  * 3. All advertising materials mentioning features or use of this software
18  *    must display the following acknowledgement:
19  *	This product includes software developed by the University of
20  *	California, Berkeley and its contributors.
21  * 4. Neither the name of the University nor the names of its contributors
22  *    may be used to endorse or promote products derived from this software
23  *    without specific prior written permission.
24  *
25  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
26  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
27  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
28  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
29  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
30  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
31  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
32  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
33  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
34  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
35  * SUCH DAMAGE.
36  *
37  *	@(#)dma.c
38  */
39 
40 #include <sys/param.h>
41 #include <sys/systm.h>
42 #include <sys/kernel.h>
43 #include <sys/device.h>
44 #include <dev/scsipi/scsi_all.h>
45 #include <dev/scsipi/scsipi_all.h>
46 #include <dev/scsipi/scsiconf.h>
47 #include <amiga/amiga/custom.h>
48 #include <amiga/amiga/cc.h>
49 #include <amiga/amiga/device.h>
50 #include <amiga/amiga/isr.h>
51 #include <amiga/dev/siopreg.h>
52 #include <amiga/dev/siopvar.h>
53 #include <amiga/amiga/drcustom.h>
54 
55 #include <machine/cpu.h>	/* is_xxx(), */
56 
57 void drscattach __P((struct device *, struct device *, void *));
58 int drscmatch __P((struct device *, struct cfdata *, void *));
59 int drsc_dmaintr __P((struct siop_softc *));
60 #ifdef DEBUG
61 void drsc_dump __P((void));
62 #endif
63 
64 #ifdef DEBUG
65 #endif
66 
67 struct cfattach drsc_ca = {
68 	sizeof(struct siop_softc),
69 	drscmatch,
70 	drscattach
71 };
72 
73 static struct siop_softc *drsc_softc;
74 
75 /*
76  * One of us is on every DraCo motherboard,
77  */
78 int
79 drscmatch(pdp, cfp, auxp)
80 	struct device *pdp;
81 	struct cfdata *cfp;
82 	void *auxp;
83 {
84 	static int drsc_matched = 0;
85 
86 	/* Allow only one instance. */
87 	if (!is_draco() || !matchname(auxp, "drsc") || drsc_matched)
88 		return (0);
89 
90 	drsc_matched = 1;
91 	return(1);
92 }
93 
94 void
95 drscattach(pdp, dp, auxp)
96 	struct device *pdp, *dp;
97 	void *auxp;
98 {
99 	struct siop_softc *sc = (struct siop_softc *)dp;
100 	struct zbus_args *zap;
101 	siop_regmap_p rp;
102 	struct scsipi_adapter *adapt = &sc->sc_adapter;
103 	struct scsipi_channel *chan = &sc->sc_channel;
104 
105 	printf("\n");
106 
107 	zap = auxp;
108 
109 	sc->sc_siopp = rp = (siop_regmap_p)(DRCCADDR+NBPG*DRSCSIPG);
110 
111 	/*
112 	 * CTEST7 = TT1
113 	 */
114 	sc->sc_clock_freq = 50;		/* Clock = 50MHz */
115 	sc->sc_ctest7 = 0x02;
116 
117 	alloc_sicallback();
118 
119 	/*
120 	 * Fill in the scsipi_adapter.
121 	 */
122 	memset(adapt, 0, sizeof(*adapt));
123 	adapt->adapt_dev = &sc->sc_dev;
124 	adapt->adapt_nchannels = 1;
125 	adapt->adapt_openings = 7;
126 	adapt->adapt_max_periph = 1;
127 	adapt->adapt_request = siop_scsipi_request;
128 	adapt->adapt_minphys = siop_minphys;
129 
130 	/*
131 	 * Fill in the scsipi_channel.
132 	 */
133 	memset(chan, 0, sizeof(*chan));
134 	chan->chan_adapter = adapt;
135 	chan->chan_bustype = &scsi_bustype;
136 	chan->chan_channel = 0;
137 	chan->chan_ntargets = 8;
138 	chan->chan_nluns = 8;
139 	chan->chan_id = 7;
140 
141 	siopinitialize(sc);
142 
143 #if 0
144 	sc->sc_isr.isr_intr = drsc_dmaintr;
145 	sc->sc_isr.isr_arg = sc;
146 	sc->sc_isr.isr_ipl = 4;
147 	add_isr(&sc->sc_isr);
148 #else
149 	drsc_softc = sc;
150 	single_inst_bclr_b(*draco_intpen, DRIRQ_SCSI);
151 	single_inst_bset_b(*draco_intena, DRIRQ_SCSI);
152 #endif
153 	/*
154 	 * attach all scsi units on us
155 	 */
156 	config_found(dp, chan, scsiprint);
157 }
158 
159 /*
160  * Level 4 interrupt processing for the MacroSystem DraCo mainboard
161  * SCSI.  Because the level 4 interrupt is above splbio, the
162  * interrupt status is saved and an sicallback to the level 2 interrupt
163  * handler scheduled.  This way, the actual processing of the interrupt
164  * can be deferred until splbio is unblocked.
165  */
166 
167 void
168 drsc_handler()
169 {
170 	struct siop_softc *sc = drsc_softc;
171 
172 	siop_regmap_p rp;
173 	int istat;
174 
175 	if (sc->sc_flags & SIOP_INTSOFF)
176 		return;		/* interrupts are not active */
177 
178 	rp = sc->sc_siopp;
179 	istat = rp->siop_istat;
180 
181 	if ((istat & (SIOP_ISTAT_SIP | SIOP_ISTAT_DIP)) == 0)
182 		return;
183 
184 	/*
185 	 * save interrupt status, DMA status, and SCSI status 0
186 	 * (may need to deal with stacked interrupts?)
187 	 */
188 	sc->sc_sstat0 = rp->siop_sstat0;
189 	sc->sc_istat = istat;
190 	sc->sc_dstat = rp->siop_dstat;
191 	/*
192 	 * disable interrupts until the callback can process this
193 	 * interrupt.
194 	 */
195 #ifdef DRSC_NOCALLBACK
196 	(void)spl1();
197 	siopintr(sc);
198 #else
199 	rp->siop_sien = 0;
200 	rp->siop_dien = 0;
201 	sc->sc_flags |= SIOP_INTDEFER | SIOP_INTSOFF;
202 	single_inst_bclr_b(*draco_intpen, DRIRQ_SCSI);
203 #ifdef DEBUG
204 	if (*draco_intpen & DRIRQ_SCSI)
205 		printf("%s: intpen still 0x%x\n", sc->sc_dev.dv_xname,
206 		    *draco_intpen);
207 #endif
208 	add_sicallback((sifunc_t)siopintr, sc, NULL);
209 #endif
210 	return;
211 }
212 
213 #ifdef DEBUG
214 void
215 drsc_dump()
216 {
217 	extern struct cfdriver drsc_cd;
218 	int i;
219 
220 	for (i = 0; i < drsc_cd.cd_ndevs; ++i)
221 		if (drsc_cd.cd_devs[i])
222 			siop_dump(drsc_cd.cd_devs[i]);
223 }
224 #endif
225