mgnsc.c revision 1.22 1 /* $NetBSD: mgnsc.c,v 1.22 1996/10/13 03:07:24 christos Exp $ */
2
3 /*
4 * Copyright (c) 1994 Michael L. Hitch
5 * Copyright (c) 1982, 1990 The Regents of the University of California.
6 * All rights reserved.
7 *
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
10 * are met:
11 * 1. Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
16 * 3. All advertising materials mentioning features or use of this software
17 * must display the following acknowledgement:
18 * This product includes software developed by the University of
19 * California, Berkeley and its contributors.
20 * 4. Neither the name of the University nor the names of its contributors
21 * may be used to endorse or promote products derived from this software
22 * without specific prior written permission.
23 *
24 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
25 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
26 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
27 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
28 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
29 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
30 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
31 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
32 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
33 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
34 * SUCH DAMAGE.
35 *
36 * @(#)dma.c
37 */
38
39 #include <sys/param.h>
40 #include <sys/systm.h>
41 #include <sys/kernel.h>
42 #include <sys/device.h>
43 #include <scsi/scsi_all.h>
44 #include <scsi/scsiconf.h>
45 #include <amiga/amiga/custom.h>
46 #include <amiga/amiga/cc.h>
47 #include <amiga/amiga/device.h>
48 #include <amiga/amiga/isr.h>
49 #include <amiga/dev/siopreg.h>
50 #include <amiga/dev/siopvar.h>
51 #include <amiga/dev/zbusvar.h>
52
53 void mgnscattach __P((struct device *, struct device *, void *));
54 int mgnscmatch __P((struct device *, void *, void *));
55 int mgnsc_dmaintr __P((void *));
56 #ifdef DEBUG
57 void mgnsc_dump __P((void));
58 #endif
59
60 struct scsi_adapter mgnsc_scsiswitch = {
61 siop_scsicmd,
62 siop_minphys,
63 0, /* no lun support */
64 0, /* no lun support */
65 };
66
67 struct scsi_device mgnsc_scsidev = {
68 NULL, /* use default error handler */
69 NULL, /* do not have a start functio */
70 NULL, /* have no async handler */
71 NULL, /* Use default done routine */
72 };
73
74
75 #ifdef DEBUG
76 #endif
77
78 struct cfattach mgnsc_ca = {
79 sizeof(struct siop_softc), mgnscmatch, mgnscattach
80 };
81
82 struct cfdriver mgnsc_cd = {
83 NULL, "mgnsc", DV_DULL, NULL, 0
84 };
85
86 /*
87 * if we are a CSA Magnum 40 SCSI
88 */
89 int
90 mgnscmatch(pdp, match, auxp)
91 struct device *pdp;
92 void *match, *auxp;
93 {
94 struct zbus_args *zap;
95
96 zap = auxp;
97 if (zap->manid == 1058 && zap->prodid == 17)
98 return(1);
99 return(0);
100 }
101
102 void
103 mgnscattach(pdp, dp, auxp)
104 struct device *pdp, *dp;
105 void *auxp;
106 {
107 struct siop_softc *sc;
108 struct zbus_args *zap;
109 siop_regmap_p rp;
110
111 printf("\n");
112 zap = auxp;
113
114 sc = (struct siop_softc *)dp;
115 sc->sc_siopp = rp = zap->va + 0x8000;
116
117 /*
118 * CTEST7 = TT1
119 */
120 sc->sc_clock_freq = 33; /* Clock = 33Mhz */
121 sc->sc_ctest7 = SIOP_CTEST7_TT1;
122 sc->sc_dcntl = 0x00;
123
124 alloc_sicallback();
125
126 sc->sc_link.channel = SCSI_CHANNEL_ONLY_ONE;
127 sc->sc_link.adapter_softc = sc;
128 sc->sc_link.adapter_target = 7;
129 sc->sc_link.adapter = &mgnsc_scsiswitch;
130 sc->sc_link.device = &mgnsc_scsidev;
131 sc->sc_link.openings = 2;
132
133 siopinitialize(sc);
134
135 sc->sc_isr.isr_intr = mgnsc_dmaintr;
136 sc->sc_isr.isr_arg = sc;
137 sc->sc_isr.isr_ipl = 6;
138 add_isr (&sc->sc_isr);
139
140 /*
141 * attach all scsi units on us
142 */
143 config_found(dp, &sc->sc_link, scsiprint);
144 }
145
146 /*
147 * Level 6 interrupt processing for the Magnum/40 SCSI. Because the
148 * level 6 interrupt is above splbio, the interrupt status is saved
149 * and an sicallback to the level 2 interrupt handler scheduled.
150 * This way, the actual processing of the interrupt can be deferred
151 * until splbio is unblocked.
152 */
153
154 int
155 mgnsc_dmaintr(arg)
156 void *arg;
157 {
158 struct siop_softc *sc = arg;
159 siop_regmap_p rp;
160 u_char istat;
161
162 if (sc->sc_flags & SIOP_INTSOFF)
163 return (0); /* interrupts are not active */
164 rp = sc->sc_siopp;
165 istat = rp->siop_istat;
166 if ((istat & (SIOP_ISTAT_SIP | SIOP_ISTAT_DIP)) == 0)
167 return (0);
168 /*
169 * save interrupt status, DMA status, and SCSI status 0
170 * (may need to deal with stacked interrupts?)
171 */
172 sc->sc_sstat0 = rp->siop_sstat0;
173 sc->sc_istat = istat;
174 sc->sc_dstat = rp->siop_dstat;
175 /*
176 * disable interrupts until the callback can process this
177 * interrupt.
178 */
179 rp->siop_sien = 0;
180 rp->siop_dien = 0;
181 sc->sc_flags |= SIOP_INTDEFER | SIOP_INTSOFF;
182 add_sicallback((sifunc_t)siopintr, sc, NULL);
183 return (1);
184 }
185
186 #ifdef DEBUG
187 void
188 mgnsc_dump()
189 {
190 int i;
191
192 for (i = 0; i < mgnsc_cd.cd_ndevs; ++i)
193 if (mgnsc_cd.cd_devs[i])
194 siop_dump(mgnsc_cd.cd_devs[i]);
195 }
196 #endif
197