afsc.c revision 1.9 1 /* $NetBSD: afsc.c,v 1.9 1995/10/05 12:41:09 chopps 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 afscprint __P((void *auxp, char *));
54 void afscattach __P((struct device *, struct device *, void *));
55 int afscmatch __P((struct device *, struct cfdata *, void *));
56 int siopintr __P((struct siop_softc *));
57 int afsc_dmaintr __P((struct siop_softc *));
58
59 struct scsi_adapter afsc_scsiswitch = {
60 siop_scsicmd,
61 siop_minphys,
62 0, /* no lun support */
63 0, /* no lun support */
64 };
65
66 struct scsi_device afsc_scsidev = {
67 NULL, /* use default error handler */
68 NULL, /* do not have a start functio */
69 NULL, /* have no async handler */
70 NULL, /* Use default done routine */
71 };
72
73
74 #ifdef DEBUG
75 #endif
76
77 struct cfdriver afsccd = {
78 NULL, "afsc", (cfmatch_t)afscmatch, afscattach,
79 DV_DULL, sizeof(struct siop_softc), NULL, 0 };
80 struct cfdriver aftsccd = {
81 NULL, "afsc", (cfmatch_t)afscmatch, afscattach,
82 DV_DULL, sizeof(struct siop_softc), NULL, 0 };
83
84 /*
85 * if we are a Commodore Amiga A4091 or possibly an A4000T
86 */
87 int
88 afscmatch(pdp, cdp, auxp)
89 struct device *pdp;
90 struct cfdata *cdp;
91 void *auxp;
92 {
93 struct zbus_args *zap;
94 siop_regmap_p rp;
95 u_long temp, scratch;
96
97 zap = auxp;
98 if (zap->manid == 514 && zap->prodid == 84)
99 return(1); /* It's an A4091 SCSI card */
100 if (!is_a4000() || !matchname(auxp, "afsc"))
101 return(0); /* Not on an A4000 or not A4000T SCSI */
102 #ifdef DEBUG
103 printf("afscmatch: probing for A4000T\n");
104 #endif
105 rp = ztwomap(0xdd0040);
106 if (badaddr(&rp->siop_scratch) || badaddr(&rp->siop_temp)) {
107 #ifdef DEBUG
108 printf("afscmatch: A4000T probed bad address\n");
109 #endif
110 return(0);
111 }
112 scratch = rp->siop_scratch;
113 temp = rp->siop_temp;
114 rp->siop_scratch = 0xdeadbeef;
115 rp->siop_temp = 0xaaaa5555;
116 #ifdef DEBUG
117 printf("afscmatch: probe %x %x %x %X\n", scratch, temp,
118 rp->siop_scratch, rp->siop_temp);
119 #endif
120 if (rp->siop_scratch != 0xdeadbeef || rp->siop_temp != 0xaaaa5555)
121 return(0);
122 rp->siop_scratch = scratch;
123 rp->siop_temp = temp;
124 if (rp->siop_scratch != scratch || rp->siop_temp != temp)
125 return(0);
126 return(1);
127 }
128
129 void
130 afscattach(pdp, dp, auxp)
131 struct device *pdp, *dp;
132 void *auxp;
133 {
134 struct siop_softc *sc;
135 struct zbus_args *zap;
136 siop_regmap_p rp;
137
138 printf("\n");
139
140 zap = auxp;
141
142 sc = (struct siop_softc *)dp;
143 if (zap->manid == 514 && zap->prodid == 84)
144 sc->sc_siopp = rp = zap->va + 0x00800000;
145 else
146 sc->sc_siopp = rp = ztwomap(0xdd0040);
147
148 /*
149 * CTEST7 = 80 [disable burst]
150 */
151 sc->sc_clock_freq = 50; /* Clock = 50Mhz */
152 sc->sc_ctest7 = 0x80; /* CDIS */
153
154 sc->sc_link.adapter_softc = sc;
155 sc->sc_link.adapter_target = 7;
156 sc->sc_link.adapter = &afsc_scsiswitch;
157 sc->sc_link.device = &afsc_scsidev;
158 sc->sc_link.openings = 2;
159
160 siopinitialize(sc);
161
162 sc->sc_isr.isr_intr = afsc_dmaintr;
163 sc->sc_isr.isr_arg = sc;
164 sc->sc_isr.isr_ipl = 2;
165 add_isr (&sc->sc_isr);
166
167 /*
168 * attach all scsi units on us
169 */
170 config_found(dp, &sc->sc_link, afscprint);
171 }
172
173 /*
174 * print diag if pnp is NULL else just extra
175 */
176 int
177 afscprint(auxp, pnp)
178 void *auxp;
179 char *pnp;
180 {
181 if (pnp == NULL)
182 return(UNCONF);
183 return(QUIET);
184 }
185
186 int
187 afsc_dmaintr(sc)
188 struct siop_softc *sc;
189 {
190 siop_regmap_p rp;
191 u_char istat;
192
193 if (sc->sc_flags & SIOP_INTSOFF)
194 return (0); /* interrupts are not active */
195 rp = sc->sc_siopp;
196 istat = rp->siop_istat;
197 if ((istat & (SIOP_ISTAT_SIP | SIOP_ISTAT_DIP)) == 0)
198 return(0);
199 /*
200 * save interrupt status, DMA status, and SCSI status 0
201 * (may need to deal with stacked interrupts?)
202 */
203 sc->sc_sstat0 = rp->siop_sstat0;
204 sc->sc_istat = istat;
205 sc->sc_dstat = rp->siop_dstat;
206 siopintr(sc);
207 return(1);
208 }
209
210 #ifdef DEBUG
211 void
212 afsc_dump()
213 {
214 int i;
215
216 for (i = 0; i < afsccd.cd_ndevs; ++i)
217 if (afsccd.cd_devs[i])
218 siop_dump(afsccd.cd_devs[i]);
219 }
220 #endif
221