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