1 /* $NetBSD: zbus.c,v 1.27 1996/10/17 15:49:39 is 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 #include <sys/param.h> 33 #include <sys/device.h> 34 #include <sys/systm.h> 35 #include <machine/cpu.h> 36 #include <machine/pte.h> 37 #include <amiga/amiga/cfdev.h> 38 #include <amiga/amiga/device.h> 39 #include <amiga/dev/zbusvar.h> 40 41 struct aconfdata { 42 char *name; 43 int manid; 44 int prodid; 45 }; 46 47 struct preconfdata { 48 int manid; 49 int prodid; 50 caddr_t vaddr; 51 }; 52 53 54 /* 55 * explain the names.. 0123456789 => zothfisven 56 */ 57 static struct aconfdata aconftab[] = { 58 /* Commodore Amiga */ 59 { "atzee", 513, 1 }, 60 { "atzsc", 514, 2 }, 61 { "atzsc", 514, 3 }, 62 { "bah", 514, 9 }, /* A2060 */ 63 { "ql", 514, 69 }, 64 { "ql", 514, 70 }, 65 { "atfsc", 514, 84 }, 66 { "le", 514, 112 }, 67 /* Ameristar */ 68 { "le", 1053, 1 }, 69 { "bah", 1053, 9 }, /* A2060 */ 70 { "es", 1053, 10 }, 71 /* University of Lowell */ 72 { "grful", 1030, 0 }, 73 /* DMI */ 74 { "grfrs", 2129, 1 }, /* Resolver graphics board */ 75 /* Macrosystems */ 76 { "grfrt", 18260, 6 }, 77 { "grfrh", 18260, 16}, /* Retina BLT Z3 */ 78 { "grfrh", 18260, 19}, /* Altais */ 79 /* Greater valley products */ 80 { "gvpbus", 2017, 2 }, 81 { "gvpbus", 2017, 11 }, 82 { "giv", 2017, 32 }, 83 { "gio", 2017, 255 }, 84 /* progressive perhiperals */ 85 { "zssc", 2026, 150 }, 86 { "ppia", 2026, 187 }, 87 { "ppta", 2026, 105 }, 88 { "ppha", 2026, 1 }, 89 { "mrsc", 2026, 0 }, 90 /* CSA */ 91 { "mgnsc", 1058, 17 }, 92 { "otgsc", 1058, 21 }, 93 /* Microbotics */ 94 { "vhzsc", 1010, 69 }, 95 /* Supra */ 96 { "wstsc", 1056, 12 }, 97 { "wstsc", 1056, 13 }, 98 /* IVS */ 99 { "itrmp", 2112, 48 }, 100 { "itrmp", 2112, 52 }, 101 { "ivasc", 2112, 242 }, 102 { "ivsc", 2112, 243 }, 103 /* Hydra */ 104 { "ed", 2121, 1 }, 105 /* ASDG */ 106 { "ed", 1023, 254 }, 107 /* Village Tronic Ariadne */ 108 { "ae", 2167, 201}, 109 /* bsc/Alf Data */ 110 { "Tandem", 2092, 6 }, /* Tandem AT disk controler */ 111 { "mfc", 2092, 16 }, 112 { "mfc", 2092, 17 }, 113 { "mfc", 2092, 18 }, 114 /* Cirrus CL GD 5426 -> Picasso, Piccolo, EGS Spectrum */ 115 { "grfcl", 2167, 11}, /* Picasso-II mem*/ 116 { "grfcl", 2167, 12}, /* regs */ 117 { "grfcl", 2193, 2}, /* Spectrum mem */ 118 { "grfcl", 2193, 1}, /* Spectrum regs */ 119 { "grfcl", 2195, 5}, /* Piccolo mem */ 120 { "grfcl", 2195, 6}, /* Piccolo regs */ 121 { "grfcl", 2195, 10}, /* Piccolo SD64 mem */ 122 { "grfcl", 2195, 11}, /* Piccolo SD64 regs */ 123 /* MacroSystemsUS */ 124 { "wesc", 2203, 19}, /* Warp engine */ 125 /* phase 5 digital products */ 126 { "flmem", 8512, 10}, /* FastlaneZ3 memory */ 127 { "flsc", 8512, 11}, /* FastlaneZ3 */ 128 { "bznsc", 8512, 17}, /* Blizzard IV SCSI */ 129 { "bznsc", 8512, 24}, /* Blizzard 2060 SCSI */ 130 { "grfcv", 8512, 34}, /* CyberVison 64 */ 131 /* Hacker Inc. */ 132 { "mlhsc", 2011, 1 }, 133 /* Resource Management Force */ 134 { "qn", 2011, 2 }, /* QuickNet Ethernet */ 135 /* ??? */ 136 { "empsc", 2171, 21 }, /* Emplant SCSI */ 137 { "empsc", 2171, 32 }, /* Emplant SCSI */ 138 /* Tseng ET4000 boards */ 139 { "grfet", 2181, 0 }, /* oMniBus */ 140 { "grfet", 2167, 1 }, /* Domnio mem */ 141 { "grfet", 2167, 2 }, /* Domino regs */ 142 { "grfet", 2117, 3 }, /* Merlin mem */ 143 { "grfet", 2117, 4 }, /* Merlin regs */ 144 /* Advanced Systems */ 145 { "nxsc", 2102, 1 }, /* Nexus SCSI board */ 146 /* Masoboshi */ 147 { "mcsc", 8535, 4 } /* Masoboshi Mastercard 702 */ 148 }; 149 static int naconfent = sizeof(aconftab) / sizeof(struct aconfdata); 150 151 /* 152 * Anything listed in this table is subject to pre-configuration, 153 * if autoconf.c:config_console() calls amiga_config_found() on 154 * the Zorro III device. 155 */ 156 static struct preconfdata preconftab[] = { 157 {18260, 6, 0 }, /* Retina Z2 */ 158 {18260, 16, 0}, /* Retina BLT Z3 */ 159 {18260, 19, 0}, /* Altais */ 160 {2167, 11, 0}, /* Picasso-II mem*/ 161 {2167, 12, 0}, /* Picasso-II regs */ 162 {2193, 2, 0}, /* Spectrum mem */ 163 {2193, 1, 0}, /* Spectrum regs */ 164 {2195, 5, 0}, /* Piccolo mem */ 165 {2195, 6, 0}, /* Piccolo regs */ 166 {2195, 10, 0}, /* Piccolo SD64 mem */ 167 {2195, 11, 0}, /* Piccolo SD64 regs */ 168 {1030, 0, 0}, /* Ulwl board */ 169 {8512, 34, 0}, /* Cybervison 64 */ 170 {8512, 34, 0}, /* Cybervison 64 */ 171 {2181, 0, 0}, /* oMniBus mem or regs */ 172 {2167, 1, 0}, /* Domino mem */ 173 {2167, 2, 0}, /* Domino regs */ 174 {2117, 3, 0}, /* Merlin mem */ 175 {2117, 4, 0} /* Merlin regs */ 176 }; 177 static int npreconfent = sizeof(preconftab) / sizeof(struct preconfdata); 178 179 180 void zbusattach __P((struct device *, struct device *, void *)); 181 int zbusprint __P((void *, const char *)); 182 int zbusmatch __P((struct device *, void *, void *)); 183 caddr_t zbusmap __P((caddr_t, u_int)); 184 static char *aconflookup __P((int, int)); 185 186 /* 187 * given a manufacturer id and product id, find the name 188 * that describes this board. 189 */ 190 static char * 191 aconflookup(mid, pid) 192 int mid, pid; 193 { 194 struct aconfdata *adp, *eadp; 195 196 eadp = &aconftab[naconfent]; 197 for (adp = aconftab; adp < eadp; adp++) 198 if (adp->manid == mid && adp->prodid == pid) 199 return(adp->name); 200 return("board"); 201 } 202 203 /* 204 * mainbus driver 205 */ 206 207 struct cfattach zbus_ca = { 208 sizeof(struct device), zbusmatch, zbusattach 209 }; 210 211 struct cfdriver zbus_cd = { 212 NULL, "zbus", DV_DULL, NULL, 0 213 }; 214 215 static struct cfdata *early_cfdata; 216 217 /*ARGSUSED*/ 218 int 219 zbusmatch(pdp, match, auxp) 220 struct device *pdp; 221 void *match, *auxp; 222 { 223 struct cfdata *cfp = match; 224 225 if (matchname(auxp, "zbus") == 0) 226 return(0); 227 if (amiga_realconfig == 0) 228 early_cfdata = cfp; 229 return(1); 230 } 231 232 /* 233 * called to attach bus, we probe, i.e., scan configdev structs passed 234 * in, for each found name call config_found() which will do this again 235 * with that driver if matched else print a diag. 236 */ 237 void 238 zbusattach(pdp, dp, auxp) 239 struct device *pdp, *dp; 240 void *auxp; 241 { 242 struct zbus_args za; 243 struct preconfdata *pcp, *epcp; 244 struct cfdev *cdp, *ecdp; 245 246 epcp = &preconftab[npreconfent]; 247 ecdp = &cfdev[ncfdev]; 248 if (amiga_realconfig) { 249 if (ZTWOMEMADDR) 250 printf(": mem 0x%08lx-0x%08lx", 251 ZTWOMEMADDR, ZTWOMEMADDR + NBPG * NZTWOMEMPG - 1); 252 if (ZBUSAVAIL) 253 printf (": i/o size 0x%08x", ZBUSAVAIL); 254 printf("\n"); 255 } 256 for (cdp = cfdev; cdp < ecdp; cdp++) { 257 for (pcp = preconftab; pcp < epcp; pcp++) { 258 if (pcp->manid == cdp->rom.manid && 259 pcp->prodid == cdp->rom.prodid) 260 break; 261 } 262 if (amiga_realconfig == 0 && pcp >= epcp) 263 continue; 264 265 /* 266 * check if it's a Zorro II or III board and not linked into 267 * MemList (i.e. not a memory board) 268 */ 269 if ((cdp->rom.type & 0xe0) != 0xc0 && 270 (cdp->rom.type & 0xe0) != 0x80) 271 continue; /* er_Type != Zorro I/O */ 272 273 za.pa = cdp->addr; 274 za.size = cdp->size; 275 if (amiga_realconfig && pcp < epcp && pcp->vaddr) 276 za.va = pcp->vaddr; 277 else { 278 za.va = (void *) (isztwopa(za.pa) ? ztwomap(za.pa) 279 : zbusmap(za.pa, za.size)); 280 /* ??????? */ 281 /* 282 * save value if early console init 283 */ 284 if (amiga_realconfig == 0) 285 pcp->vaddr = za.va; 286 } 287 za.manid = cdp->rom.manid; 288 za.prodid = cdp->rom.prodid; 289 za.serno = cdp->rom.serno; 290 za.slot = (((u_long)za.pa >> 16) & 0xF) - 0x9; 291 amiga_config_found(early_cfdata, dp, &za, zbusprint); 292 } 293 } 294 295 /* 296 * print configuration info. 297 */ 298 int 299 zbusprint(auxp, pnp) 300 void *auxp; 301 const char *pnp; 302 { 303 struct zbus_args *zap; 304 int rv; 305 306 rv = UNCONF; 307 zap = auxp; 308 309 if (pnp) { 310 printf("%s at %s:", aconflookup(zap->manid, zap->prodid), 311 pnp); 312 if (zap->manid == -1) 313 rv = UNSUPP; 314 } 315 printf(" rom %p man/pro %d/%d", zap->pa, zap->manid, zap->prodid); 316 return(rv); 317 } 318 319 /* 320 * this function is used to map Zorro physical I/O addresses into kernel 321 * virtual addresses. We don't keep track which address we map where, we don't 322 * NEED to know this. We made sure in amiga_init.c (by scanning all available 323 * Zorro devices) to have enough kva-space available, so there is no extra 324 * range check done here. 325 */ 326 caddr_t 327 zbusmap (pa, size) 328 caddr_t pa; 329 u_int size; 330 { 331 static vm_offset_t nextkva = 0; 332 vm_offset_t kva; 333 334 if (nextkva == 0) 335 nextkva = ZBUSADDR; 336 337 if (nextkva > ZBUSADDR + ZBUSAVAIL) 338 return 0; 339 340 /* size better be an integral multiple of the page size... */ 341 kva = nextkva; 342 nextkva += size; 343 if (nextkva > ZBUSADDR + ZBUSAVAIL) 344 panic("allocating too much Zorro I/O address space"); 345 physaccess((caddr_t)kva, (caddr_t)pa, size, PG_RW|PG_CI); 346 return((caddr_t)kva); 347 } 348