xref: /netbsd-src/sys/arch/amiga/dev/drsc.c (revision 76dfffe33547c37f8bdd446e3e4ab0f3c16cea4b)
1 /*	$NetBSD: drsc.c,v 1.6 1996/10/13 03:06:52 christos 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 <scsi/scsi_all.h>
45 #include <scsi/scsiconf.h>
46 #include <amiga/amiga/custom.h>
47 #include <amiga/amiga/cc.h>
48 #include <amiga/amiga/device.h>
49 #include <amiga/amiga/isr.h>
50 #include <amiga/dev/siopreg.h>
51 #include <amiga/dev/siopvar.h>
52 #include <amiga/amiga/drcustom.h>
53 
54 void drscattach __P((struct device *, struct device *, void *));
55 int drscmatch __P((struct device *, void *, void *));
56 int drsc_dmaintr __P((struct siop_softc *));
57 #ifdef DEBUG
58 void drsc_dump __P((void));
59 #endif
60 
61 struct scsi_adapter drsc_scsiswitch = {
62 	siop_scsicmd,
63 	siop_minphys,
64 	0,			/* no lun support */
65 	0,			/* no lun support */
66 };
67 
68 struct scsi_device drsc_scsidev = {
69 	NULL,		/* use default error handler */
70 	NULL,		/* do not have a start functio */
71 	NULL,		/* have no async handler */
72 	NULL,		/* Use default done routine */
73 };
74 
75 
76 #ifdef DEBUG
77 #endif
78 
79 struct cfattach drsc_ca = {
80 	sizeof(struct siop_softc),
81 	drscmatch,
82 	drscattach
83 };
84 
85 struct cfdriver drsc_cd = {
86 	NULL, "drsc", DV_DULL, NULL, 0
87 };
88 
89 static struct siop_softc *drsc_softc;
90 
91 /*
92  * One of us is on every DraCo motherboard,
93  */
94 int
95 drscmatch(pdp, match, auxp)
96 	struct device *pdp;
97 	void *match, *auxp;
98 {
99 	struct cfdata *cdp = (struct cfdata *)match;
100 	if (is_draco() && (cdp->cf_unit == 0))
101 		return(1);
102 	return(0);
103 }
104 
105 void
106 drscattach(pdp, dp, auxp)
107 	struct device *pdp, *dp;
108 	void *auxp;
109 {
110 	struct siop_softc *sc;
111 	struct zbus_args *zap;
112 	siop_regmap_p rp;
113 
114 	printf("\n");
115 
116 	zap = auxp;
117 
118 	sc = (struct siop_softc *)dp;
119 	sc->sc_siopp = rp = (siop_regmap_p)(DRCCADDR+NBPG*DRSCSIPG);
120 
121 	/*
122 	 * CTEST7 = TT1
123 	 */
124 	sc->sc_clock_freq = 50;		/* Clock = 50MHz */
125 	sc->sc_ctest7 = 0x02;
126 
127 	alloc_sicallback();
128 
129 	sc->sc_link.channel = SCSI_CHANNEL_ONLY_ONE;
130 	sc->sc_link.adapter_softc = sc;
131 	sc->sc_link.adapter_target = 7;
132 	sc->sc_link.adapter = &drsc_scsiswitch;
133 	sc->sc_link.device = &drsc_scsidev;
134 	sc->sc_link.openings = 2;
135 
136 	siopinitialize(sc);
137 
138 #if 0
139 	sc->sc_isr.isr_intr = drsc_dmaintr;
140 	sc->sc_isr.isr_arg = sc;
141 	sc->sc_isr.isr_ipl = 4;
142 	add_isr(&sc->sc_isr);
143 #else
144 	drsc_softc = sc;
145 	*draco_intpen &= ~DRIRQ_SCSI;
146 	*draco_intena |= DRIRQ_SCSI;
147 #endif
148 	/*
149 	 * attach all scsi units on us
150 	 */
151 	config_found(dp, &sc->sc_link, scsiprint);
152 }
153 
154 /*
155  * Level 4 interrupt processing for the MacroSystem DraCo mainboard
156  * SCSI.  Because the level 4 interrupt is above splbio, the
157  * interrupt status is saved and an sicallback to the level 2 interrupt
158  * handler scheduled.  This way, the actual processing of the interrupt
159  * can be deferred until splbio is unblocked.
160  */
161 
162 void
163 drsc_handler()
164 {
165 	struct siop_softc *sc = drsc_softc;
166 
167 	siop_regmap_p rp;
168 	int istat;
169 
170 	if (sc->sc_flags & SIOP_INTSOFF)
171 		return;		/* interrupts are not active */
172 
173 	rp = sc->sc_siopp;
174 	istat = rp->siop_istat;
175 
176 	if ((istat & (SIOP_ISTAT_SIP | SIOP_ISTAT_DIP)) == 0)
177 		return;
178 
179 	/*
180 	 * save interrupt status, DMA status, and SCSI status 0
181 	 * (may need to deal with stacked interrupts?)
182 	 */
183 	sc->sc_sstat0 = rp->siop_sstat0;
184 	sc->sc_istat = istat;
185 	sc->sc_dstat = rp->siop_dstat;
186 	/*
187 	 * disable interrupts until the callback can process this
188 	 * interrupt.
189 	 */
190 #ifdef DRSC_NOCALLBACK
191 	(void)spl1();
192 	siopintr(sc);
193 #else
194 	rp->siop_sien = 0;
195 	rp->siop_dien = 0;
196 	sc->sc_flags |= SIOP_INTDEFER | SIOP_INTSOFF;
197 	*draco_intpen &= ~DRIRQ_SCSI;
198 #ifdef DEBUG
199 	if (*draco_intpen & DRIRQ_SCSI)
200 		printf("%s: intpen still 0x%x\n", sc->sc_dev.dv_xname,
201 		    *draco_intpen);
202 #endif
203 	add_sicallback((sifunc_t)siopintr, sc, NULL);
204 #endif
205 	return;
206 }
207 
208 #ifdef DEBUG
209 void
210 drsc_dump()
211 {
212 	int i;
213 
214 	for (i = 0; i < drsc_cd.cd_ndevs; ++i)
215 		if (drsc_cd.cd_devs[i])
216 			siop_dump(drsc_cd.cd_devs[i]);
217 }
218 #endif
219