zssc.c revision 1.16 1 /* $NetBSD: zssc.c,v 1.16 1996/04/21 21:12:45 veego 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 int zsscprint __P((void *auxp, char *));
54 void zsscattach __P((struct device *, struct device *, void *));
55 int zsscmatch __P((struct device *, void *, void *));
56 int zssc_dmaintr __P((void *));
57 #ifdef DEBUG
58 void zssc_dump __P((void));
59 #endif
60
61 struct scsi_adapter zssc_scsiswitch = {
62 siop_scsicmd,
63 siop_minphys,
64 0, /* no lun support */
65 0, /* no lun support */
66 };
67
68 struct scsi_device zssc_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 zssc_ca = {
80 sizeof(struct siop_softc), zsscmatch, zsscattach
81 };
82
83 struct cfdriver zssc_cd = {
84 NULL, "zssc", DV_DULL, NULL, 0
85 };
86
87 /*
88 * if we are an PPI Zeus
89 */
90 int
91 zsscmatch(pdp, match, auxp)
92 struct device *pdp;
93 void *match, *auxp;
94 {
95 struct zbus_args *zap;
96
97 zap = auxp;
98 if (zap->manid == 2026 && zap->prodid == 150)
99 return(1);
100 return(0);
101 }
102
103 void
104 zsscattach(pdp, dp, auxp)
105 struct device *pdp, *dp;
106 void *auxp;
107 {
108 struct siop_softc *sc;
109 struct zbus_args *zap;
110 siop_regmap_p rp;
111
112 printf("\n");
113
114 zap = auxp;
115
116 sc = (struct siop_softc *)dp;
117 sc->sc_siopp = rp = zap->va + 0x4000;
118
119 /*
120 * CTEST7 = 00
121 */
122 sc->sc_clock_freq = 66; /* Clock = 66Mhz */
123 sc->sc_ctest7 = 0x00;
124 sc->sc_dcntl = 0x00;
125
126 alloc_sicallback();
127
128 sc->sc_link.adapter_softc = sc;
129 sc->sc_link.adapter_target = 7;
130 sc->sc_link.adapter = &zssc_scsiswitch;
131 sc->sc_link.device = &zssc_scsidev;
132 sc->sc_link.openings = 2;
133
134 siopinitialize(sc);
135
136 sc->sc_isr.isr_intr = zssc_dmaintr;
137 sc->sc_isr.isr_arg = sc;
138 sc->sc_isr.isr_ipl = 6;
139 add_isr(&sc->sc_isr);
140
141 /*
142 * attach all scsi units on us
143 */
144 config_found(dp, &sc->sc_link, zsscprint);
145 }
146
147 /*
148 * print diag if pnp is NULL else just extra
149 */
150 int
151 zsscprint(auxp, pnp)
152 void *auxp;
153 char *pnp;
154 {
155 if (pnp == NULL)
156 return(UNCONF);
157 return(QUIET);
158 }
159
160
161 /*
162 * Level 6 interrupt processing for the Progressive Peripherals Inc
163 * Zeus SCSI. Because the level 6 interrupt is above splbio, the
164 * interrupt status is saved and an sicallback to the level 2 interrupt
165 * handler scheduled. This way, the actual processing of the interrupt
166 * can be deferred until splbio is unblocked.
167 */
168
169 int
170 zssc_dmaintr(arg)
171 void *arg;
172 {
173 struct siop_softc *sc = arg;
174 siop_regmap_p rp;
175 int istat;
176
177 if (sc->sc_flags & SIOP_INTSOFF)
178 return (0); /* interrupts are not active */
179 rp = sc->sc_siopp;
180 istat = rp->siop_istat;
181 if ((istat & (SIOP_ISTAT_SIP | SIOP_ISTAT_DIP)) == 0)
182 return(0);
183 /*
184 * save interrupt status, DMA status, and SCSI status 0
185 * (may need to deal with stacked interrupts?)
186 */
187 sc->sc_sstat0 = rp->siop_sstat0;
188 sc->sc_istat = istat;
189 sc->sc_dstat = rp->siop_dstat;
190 /*
191 * disable interrupts until the callback can process this
192 * interrupt.
193 */
194 rp->siop_sien = 0;
195 rp->siop_dien = 0;
196 sc->sc_flags |= SIOP_INTDEFER | SIOP_INTSOFF;
197 add_sicallback((sifunc_t)siopintr, sc, NULL);
198 return(1);
199 }
200
201 #ifdef DEBUG
202 void
203 zssc_dump()
204 {
205 int i;
206
207 for (i = 0; i < zssc_cd.cd_ndevs; ++i)
208 if (zssc_cd.cd_devs[i])
209 siop_dump(zssc_cd.cd_devs[i]);
210 }
211 #endif
212