zbus.c revision 1.32.2.2 1 1.32.2.2 veego /* $NetBSD: zbus.c,v 1.32.2.2 1997/03/05 22:41:04 veego Exp $ */
2 1.32.2.2 veego
3 1.32.2.2 veego /*
4 1.32.2.2 veego * Copyright (c) 1994 Christian E. Hopps
5 1.32.2.2 veego * All rights reserved.
6 1.32.2.2 veego *
7 1.32.2.2 veego * Redistribution and use in source and binary forms, with or without
8 1.32.2.2 veego * modification, are permitted provided that the following conditions
9 1.32.2.2 veego * are met:
10 1.32.2.2 veego * 1. Redistributions of source code must retain the above copyright
11 1.32.2.2 veego * notice, this list of conditions and the following disclaimer.
12 1.32.2.2 veego * 2. Redistributions in binary form must reproduce the above copyright
13 1.32.2.2 veego * notice, this list of conditions and the following disclaimer in the
14 1.32.2.2 veego * documentation and/or other materials provided with the distribution.
15 1.32.2.2 veego * 3. All advertising materials mentioning features or use of this software
16 1.32.2.2 veego * must display the following acknowledgement:
17 1.32.2.2 veego * This product includes software developed by Christian E. Hopps.
18 1.32.2.2 veego * 4. The name of the author may not be used to endorse or promote products
19 1.32.2.2 veego * derived from this software without specific prior written permission
20 1.32.2.2 veego *
21 1.32.2.2 veego * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
22 1.32.2.2 veego * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
23 1.32.2.2 veego * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
24 1.32.2.2 veego * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
25 1.32.2.2 veego * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
26 1.32.2.2 veego * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
27 1.32.2.2 veego * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
28 1.32.2.2 veego * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
29 1.32.2.2 veego * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
30 1.32.2.2 veego * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
31 1.32.2.2 veego */
32 1.32.2.2 veego #include <sys/param.h>
33 1.32.2.2 veego #include <sys/device.h>
34 1.32.2.2 veego #include <sys/systm.h>
35 1.32.2.2 veego #include <machine/cpu.h>
36 1.32.2.2 veego #include <machine/pte.h>
37 1.32.2.2 veego #include <amiga/amiga/cfdev.h>
38 1.32.2.2 veego #include <amiga/amiga/device.h>
39 1.32.2.2 veego #include <amiga/dev/zbusvar.h>
40 1.32.2.2 veego
41 1.32.2.2 veego struct aconfdata {
42 1.32.2.2 veego char *name;
43 1.32.2.2 veego int manid;
44 1.32.2.2 veego int prodid;
45 1.32.2.2 veego };
46 1.32.2.2 veego
47 1.32.2.2 veego struct preconfdata {
48 1.32.2.2 veego int manid;
49 1.32.2.2 veego int prodid;
50 1.32.2.2 veego caddr_t vaddr;
51 1.32.2.2 veego };
52 1.32.2.2 veego
53 1.32.2.2 veego
54 1.32.2.2 veego /*
55 1.32.2.2 veego * explain the names.. 0123456789 => zothfisven
56 1.32.2.2 veego */
57 1.32.2.2 veego static struct aconfdata aconftab[] = {
58 1.32.2.2 veego /* Commodore Amiga */
59 1.32.2.2 veego { "atzee", 513, 1 },
60 1.32.2.2 veego { "atzsc", 514, 2 },
61 1.32.2.2 veego { "atzsc", 514, 3 },
62 1.32.2.2 veego { "bah", 514, 9 }, /* A2060 */
63 1.32.2.2 veego { "ql", 514, 69 },
64 1.32.2.2 veego { "ql", 514, 70 },
65 1.32.2.2 veego { "atfsc", 514, 84 },
66 1.32.2.2 veego { "le", 514, 112 },
67 1.32.2.2 veego /* Ameristar */
68 1.32.2.2 veego { "le", 1053, 1 },
69 1.32.2.2 veego { "bah", 1053, 9 }, /* A2060 */
70 1.32.2.2 veego { "es", 1053, 10 },
71 1.32.2.2 veego /* University of Lowell */
72 1.32.2.2 veego { "grful", 1030, 0 },
73 1.32.2.2 veego /* DMI */
74 1.32.2.2 veego { "grfrs", 2129, 1 }, /* Resolver graphics board */
75 1.32.2.2 veego /* Macrosystems */
76 1.32.2.2 veego { "grfrt", 18260, 6 },
77 1.32.2.2 veego { "grfrh", 18260, 16}, /* Retina BLT Z3 */
78 1.32.2.2 veego { "grfrh", 18260, 19}, /* Altais */
79 1.32.2.2 veego /* Greater valley products */
80 1.32.2.2 veego { "gvpbus", 2017, 2 },
81 1.32.2.2 veego { "gvpbus", 2017, 11 },
82 1.32.2.2 veego { "giv", 2017, 32 },
83 1.32.2.2 veego { "gio", 2017, 255 },
84 1.32.2.2 veego /* progressive perhiperals */
85 1.32.2.2 veego { "zssc", 2026, 150 },
86 1.32.2.2 veego { "ppia", 2026, 187 },
87 1.32.2.2 veego { "ppta", 2026, 105 },
88 1.32.2.2 veego { "ppha", 2026, 1 },
89 1.32.2.2 veego { "mrsc", 2026, 0 },
90 1.32.2.2 veego /* CSA */
91 1.32.2.2 veego { "mgnsc", 1058, 17 },
92 1.32.2.2 veego { "otgsc", 1058, 21 },
93 1.32.2.2 veego /* Microbotics */
94 1.32.2.2 veego { "vhzsc", 1010, 69 },
95 1.32.2.2 veego /* Supra */
96 1.32.2.2 veego { "wstsc", 1056, 12 },
97 1.32.2.2 veego { "wstsc", 1056, 13 },
98 1.32.2.2 veego /* IVS */
99 1.32.2.2 veego { "itrmp", 2112, 48 },
100 1.32.2.2 veego { "itrmp", 2112, 52 },
101 1.32.2.2 veego { "ivasc", 2112, 242 },
102 1.32.2.2 veego { "ivsc", 2112, 243 },
103 1.32.2.2 veego /* Hydra */
104 1.32.2.2 veego { "ed", 2121, 1 },
105 1.32.2.2 veego /* ASDG */
106 1.32.2.2 veego { "ed", 1023, 254 },
107 1.32.2.2 veego /* Village Tronic Ariadne */
108 1.32.2.2 veego { "ae", 2167, 201},
109 1.32.2.2 veego /* bsc/Alf Data */
110 1.32.2.2 veego { "Tandem", 2092, 6 }, /* Tandem AT disk controler */
111 1.32.2.2 veego { "mfc", 2092, 16 },
112 1.32.2.2 veego { "mfc", 2092, 17 },
113 1.32.2.2 veego { "mfc", 2092, 18 },
114 1.32.2.2 veego /* Cirrus CL GD 5426 -> Picasso, Piccolo, EGS Spectrum */
115 1.32.2.2 veego { "grfcl", 2167, 11}, /* PicassoII mem */
116 1.32.2.2 veego { "grfcl", 2167, 12}, /* PicassoII regs */
117 1.32.2.2 veego { "grfcl", 2167, 21}, /* PicassoIV Z2 mem1 */
118 1.32.2.2 veego { "grfcl", 2167, 22}, /* PicassoIV Z2 mem2 */
119 1.32.2.2 veego { "grfcl", 2167, 23}, /* PicassoIV Z2 regs */
120 1.32.2.2 veego { "grfcl", 2167, 24}, /* PicassoIV Z3 */
121 1.32.2.2 veego { "grfcl", 2193, 2}, /* Spectrum mem */
122 1.32.2.2 veego { "grfcl", 2193, 1}, /* Spectrum regs */
123 1.32.2.2 veego { "grfcl", 2195, 5}, /* Piccolo mem */
124 1.32.2.2 veego { "grfcl", 2195, 6}, /* Piccolo regs */
125 1.32.2.2 veego { "grfcl", 2195, 10}, /* Piccolo SD64 mem */
126 1.32.2.2 veego { "grfcl", 2195, 11}, /* Piccolo SD64 regs */
127 1.32.2.2 veego /* MacroSystemsUS */
128 1.32.2.2 veego { "wesc", 2203, 19}, /* Warp engine */
129 1.32.2.2 veego /* phase 5 digital products */
130 1.32.2.2 veego { "flmem", 8512, 10}, /* FastlaneZ3 memory */
131 1.32.2.2 veego { "flsc", 8512, 11}, /* FastlaneZ3 */
132 1.32.2.2 veego { "cbsc", 8512, 12}, /* Cyberstorm Mk I SCSI */
133 1.32.2.2 veego { "bzivsc", 8512, 17}, /* Blizzard IV SCSI */
134 1.32.2.2 veego { "bztzsc", 8512, 24}, /* Blizzard 2060 SCSI */
135 1.32.2.2 veego { "cbiisc", 8512, 25}, /* Cyberstorm Mk II SCSI */
136 1.32.2.2 veego { "grfcv", 8512, 34}, /* CyberVison 64 */
137 1.32.2.2 veego /* Hacker Inc. */
138 1.32.2.2 veego { "mlhsc", 2011, 1 },
139 1.32.2.2 veego /* Resource Management Force */
140 1.32.2.2 veego { "qn", 2011, 2 }, /* QuickNet Ethernet */
141 1.32.2.2 veego /* ??? */
142 1.32.2.2 veego { "empsc", 2171, 21 }, /* Emplant SCSI */
143 1.32.2.2 veego { "empsc", 2171, 32 }, /* Emplant SCSI */
144 1.32.2.2 veego /* Tseng ET4000 boards */
145 1.32.2.2 veego { "grfet", 2117, 3 }, /* Merlin mem */
146 1.32.2.2 veego { "grfet", 2117, 4 }, /* Merlin regs */
147 1.32.2.2 veego { "grfet", 2167, 1 }, /* Domino mem */
148 1.32.2.2 veego { "grfet", 2167, 2 }, /* Domino regs */
149 1.32.2.2 veego { "grfet", 2167, 3 }, /* Domino regs (proto 16M) */
150 1.32.2.2 veego { "grfet", 2181, 0 }, /* oMniBus */
151 1.32.2.2 veego /* Advanced Systems */
152 1.32.2.2 veego { "nxsc", 2102, 1 }, /* Nexus SCSI board */
153 1.32.2.2 veego /* Masoboshi */
154 1.32.2.2 veego { "mcsc", 8535, 4 }, /* Masoboshi Mastercard 702 */
155 1.32.2.2 veego /* Apollo */
156 1.32.2.2 veego { "apssc", 8738, 35 } /* Apollo '060 scsi */
157 1.32.2.2 veego };
158 1.32.2.2 veego static int naconfent = sizeof(aconftab) / sizeof(struct aconfdata);
159 1.32.2.2 veego
160 1.32.2.2 veego /*
161 1.32.2.2 veego * Anything listed in this table is subject to pre-configuration,
162 1.32.2.2 veego * if autoconf.c:config_console() calls amiga_config_found() on
163 1.32.2.2 veego * the Zorro III device.
164 1.32.2.2 veego */
165 1.32.2.2 veego static struct preconfdata preconftab[] = {
166 1.32.2.2 veego {18260, 6, 0 }, /* Retina Z2 */ /* grf1 */
167 1.32.2.2 veego {18260, 16, 0}, /* Retina BLT Z3 */ /* grf2 */
168 1.32.2.2 veego {18260, 19, 0}, /* Altais */
169 1.32.2.2 veego {2167, 11, 0}, /* PicassoII mem */ /* grf3 */
170 1.32.2.2 veego {2167, 12, 0}, /* PicassoII regs */
171 1.32.2.2 veego {2167, 21, 0}, /* PicassoIV Z2 mem1 */
172 1.32.2.2 veego {2167, 22, 0}, /* PicassoIV Z2 mem2 */
173 1.32.2.2 veego {2167, 23, 0}, /* PicassoIV Z2 regs */
174 1.32.2.2 veego {2167, 24, 0}, /* PicassoIV Z3 */
175 1.32.2.2 veego {2193, 2, 0}, /* Spectrum mem */
176 1.32.2.2 veego {2193, 1, 0}, /* Spectrum regs */
177 1.32.2.2 veego {2195, 5, 0}, /* Piccolo mem */
178 1.32.2.2 veego {2195, 6, 0}, /* Piccolo regs */
179 1.32.2.2 veego {2195, 10, 0}, /* Piccolo SD64 mem */
180 1.32.2.2 veego {2195, 11, 0}, /* Piccolo SD64 regs */
181 1.32.2.2 veego {1030, 0, 0}, /* Ulwl board */ /* grf4 */
182 1.32.2.2 veego {8512, 34, 0}, /* Cybervison 64 */ /* grf5 */
183 1.32.2.2 veego {2117, 3, 0}, /* Merlin mem */ /* grf6 */
184 1.32.2.2 veego {2117, 4, 0}, /* Merlin regs */
185 1.32.2.2 veego {2167, 1, 0}, /* Domino mem */
186 1.32.2.2 veego {2167, 2, 0}, /* Domino regs */
187 1.32.2.2 veego {2167, 3, 0}, /* Domino regs (proto 16M) */
188 1.32.2.2 veego {2181, 0, 0} /* oMniBus mem or regs */
189 1.32.2.2 veego };
190 1.32.2.2 veego static int npreconfent = sizeof(preconftab) / sizeof(struct preconfdata);
191 1.32.2.2 veego
192 1.32.2.2 veego
193 1.32.2.2 veego void zbusattach __P((struct device *, struct device *, void *));
194 1.32.2.2 veego int zbusprint __P((void *, const char *));
195 1.32.2.2 veego int zbusmatch __P((struct device *, struct cfdata *, void *));
196 1.32.2.2 veego caddr_t zbusmap __P((caddr_t, u_int));
197 1.32.2.2 veego static char *aconflookup __P((int, int));
198 1.32.2.2 veego
199 1.32.2.2 veego /*
200 1.32.2.2 veego * given a manufacturer id and product id, find the name
201 1.32.2.2 veego * that describes this board.
202 1.32.2.2 veego */
203 1.32.2.2 veego static char *
204 1.32.2.2 veego aconflookup(mid, pid)
205 1.32.2.2 veego int mid, pid;
206 1.32.2.2 veego {
207 1.32.2.2 veego struct aconfdata *adp, *eadp;
208 1.32.2.2 veego
209 1.32.2.2 veego eadp = &aconftab[naconfent];
210 1.32.2.2 veego for (adp = aconftab; adp < eadp; adp++)
211 1.32.2.2 veego if (adp->manid == mid && adp->prodid == pid)
212 1.32.2.2 veego return(adp->name);
213 1.32.2.2 veego return("board");
214 1.32.2.2 veego }
215 1.32.2.2 veego
216 1.32.2.2 veego /*
217 1.32.2.2 veego * mainbus driver
218 1.32.2.2 veego */
219 1.32.2.2 veego
220 1.32.2.2 veego struct cfattach zbus_ca = {
221 1.32.2.2 veego sizeof(struct device), zbusmatch, zbusattach
222 1.32.2.2 veego };
223 1.32.2.2 veego
224 1.32.2.2 veego struct cfdriver zbus_cd = {
225 1.32.2.2 veego NULL, "zbus", DV_DULL, NULL, 0
226 1.32.2.2 veego };
227 1.32.2.2 veego
228 1.32.2.2 veego static struct cfdata *early_cfdata;
229 1.32.2.2 veego
230 1.32.2.2 veego /*ARGSUSED*/
231 1.32.2.2 veego int
232 1.32.2.2 veego zbusmatch(pdp, cfp, auxp)
233 1.32.2.2 veego struct device *pdp;
234 1.32.2.2 veego struct cfdata *cfp;
235 1.32.2.2 veego void *auxp;
236 1.32.2.2 veego {
237 1.32.2.2 veego
238 1.32.2.2 veego if (matchname(auxp, "zbus") == 0)
239 1.32.2.2 veego return(0);
240 1.32.2.2 veego if (amiga_realconfig == 0)
241 1.32.2.2 veego early_cfdata = cfp;
242 1.32.2.2 veego return(1);
243 1.32.2.2 veego }
244 1.32.2.2 veego
245 1.32.2.2 veego /*
246 1.32.2.2 veego * called to attach bus, we probe, i.e., scan configdev structs passed
247 1.32.2.2 veego * in, for each found name call config_found() which will do this again
248 1.32.2.2 veego * with that driver if matched else print a diag.
249 1.32.2.2 veego */
250 1.32.2.2 veego void
251 1.32.2.2 veego zbusattach(pdp, dp, auxp)
252 1.32.2.2 veego struct device *pdp, *dp;
253 1.32.2.2 veego void *auxp;
254 1.32.2.2 veego {
255 1.32.2.2 veego struct zbus_args za;
256 1.32.2.2 veego struct preconfdata *pcp, *epcp;
257 1.32.2.2 veego struct cfdev *cdp, *ecdp;
258 1.32.2.2 veego
259 1.32.2.2 veego epcp = &preconftab[npreconfent];
260 1.32.2.2 veego ecdp = &cfdev[ncfdev];
261 1.32.2.2 veego if (amiga_realconfig) {
262 1.32.2.2 veego if (ZTWOMEMADDR)
263 1.32.2.2 veego printf(": mem 0x%08lx-0x%08lx",
264 1.32.2.2 veego ZTWOMEMADDR, ZTWOMEMADDR + NBPG * NZTWOMEMPG - 1);
265 1.32.2.2 veego if (ZBUSAVAIL)
266 1.32.2.2 veego printf (": i/o size 0x%08x", ZBUSAVAIL);
267 1.32.2.2 veego printf("\n");
268 1.32.2.2 veego }
269 1.32.2.2 veego for (cdp = cfdev; cdp < ecdp; cdp++) {
270 1.32.2.2 veego for (pcp = preconftab; pcp < epcp; pcp++) {
271 1.32.2.2 veego if (pcp->manid == cdp->rom.manid &&
272 1.32.2.2 veego pcp->prodid == cdp->rom.prodid)
273 1.32.2.2 veego break;
274 1.32.2.2 veego }
275 1.32.2.2 veego if (amiga_realconfig == 0 && pcp >= epcp)
276 1.32.2.2 veego continue;
277 1.32.2.2 veego
278 1.32.2.2 veego /*
279 1.32.2.2 veego * check if it's a Zorro II or III board and not linked into
280 1.32.2.2 veego * MemList (i.e. not a memory board)
281 1.32.2.2 veego */
282 1.32.2.2 veego if ((cdp->rom.type & 0xe0) != 0xc0 &&
283 1.32.2.2 veego (cdp->rom.type & 0xe0) != 0x80)
284 1.32.2.2 veego continue; /* er_Type != Zorro I/O */
285 1.32.2.2 veego
286 1.32.2.2 veego za.pa = cdp->addr;
287 1.32.2.2 veego za.size = cdp->size;
288 1.32.2.2 veego if (amiga_realconfig && pcp < epcp && pcp->vaddr)
289 1.32.2.2 veego za.va = pcp->vaddr;
290 1.32.2.2 veego else {
291 1.32.2.2 veego za.va = (void *) (isztwopa(za.pa) ? ztwomap(za.pa)
292 1.32.2.2 veego : zbusmap(za.pa, za.size));
293 1.32.2.2 veego /* ??????? */
294 1.32.2.2 veego /*
295 1.32.2.2 veego * save value if early console init
296 1.32.2.2 veego */
297 1.32.2.2 veego if (amiga_realconfig == 0)
298 1.32.2.2 veego pcp->vaddr = za.va;
299 1.32.2.2 veego }
300 1.32.2.2 veego za.manid = cdp->rom.manid;
301 1.32.2.2 veego za.prodid = cdp->rom.prodid;
302 1.32.2.2 veego za.serno = cdp->rom.serno;
303 1.32.2.2 veego za.slot = (((u_long)za.pa >> 16) & 0xF) - 0x9;
304 1.32.2.2 veego amiga_config_found(early_cfdata, dp, &za, zbusprint);
305 1.32.2.2 veego }
306 1.32.2.2 veego }
307 1.32.2.2 veego
308 1.32.2.2 veego /*
309 1.32.2.2 veego * print configuration info.
310 1.32.2.2 veego */
311 1.32.2.2 veego int
312 1.32.2.2 veego zbusprint(auxp, pnp)
313 1.32.2.2 veego void *auxp;
314 1.32.2.2 veego const char *pnp;
315 1.32.2.2 veego {
316 1.32.2.2 veego struct zbus_args *zap;
317 1.32.2.2 veego int rv;
318 1.32.2.2 veego
319 1.32.2.2 veego rv = UNCONF;
320 1.32.2.2 veego zap = auxp;
321 1.32.2.2 veego
322 1.32.2.2 veego if (pnp) {
323 1.32.2.2 veego printf("%s at %s:", aconflookup(zap->manid, zap->prodid),
324 1.32.2.2 veego pnp);
325 1.32.2.2 veego if (zap->manid == -1)
326 1.32.2.2 veego rv = UNSUPP;
327 1.32.2.2 veego }
328 1.32.2.2 veego printf(" rom %p man/pro %d/%d", zap->pa, zap->manid, zap->prodid);
329 1.32.2.2 veego return(rv);
330 1.32.2.2 veego }
331 1.32.2.2 veego
332 1.32.2.2 veego /*
333 1.32.2.2 veego * this function is used to map Zorro physical I/O addresses into kernel
334 1.32.2.2 veego * virtual addresses. We don't keep track which address we map where, we don't
335 1.32.2.2 veego * NEED to know this. We made sure in amiga_init.c (by scanning all available
336 1.32.2.2 veego * Zorro devices) to have enough kva-space available, so there is no extra
337 1.32.2.2 veego * range check done here.
338 1.32.2.2 veego */
339 1.32.2.2 veego caddr_t
340 1.32.2.2 veego zbusmap (pa, size)
341 1.32.2.2 veego caddr_t pa;
342 1.32.2.2 veego u_int size;
343 1.32.2.2 veego {
344 1.32.2.2 veego static vm_offset_t nextkva = 0;
345 1.32.2.2 veego vm_offset_t kva;
346 1.32.2.2 veego
347 1.32.2.2 veego if (nextkva == 0)
348 1.32.2.2 veego nextkva = ZBUSADDR;
349 1.32.2.2 veego
350 1.32.2.2 veego if (nextkva > ZBUSADDR + ZBUSAVAIL)
351 1.32.2.2 veego return 0;
352 1.32.2.2 veego
353 1.32.2.2 veego /* size better be an integral multiple of the page size... */
354 1.32.2.2 veego kva = nextkva;
355 1.32.2.2 veego nextkva += size;
356 1.32.2.2 veego if (nextkva > ZBUSADDR + ZBUSAVAIL)
357 1.32.2.2 veego panic("allocating too much Zorro I/O address space");
358 1.32.2.2 veego physaccess((caddr_t)kva, (caddr_t)pa, size, PG_RW|PG_CI);
359 1.32.2.2 veego return((caddr_t)kva);
360 1.32.2.2 veego }
361