grf_nubus.c revision 1.34
1 /* $NetBSD: grf_nubus.c,v 1.34 1997/10/09 01:25:56 briggs Exp $ */ 2 3 /* 4 * Copyright (c) 1995 Allen Briggs. All rights reserved. 5 * 6 * Redistribution and use in source and binary forms, with or without 7 * modification, are permitted provided that the following conditions 8 * are met: 9 * 1. Redistributions of source code must retain the above copyright 10 * notice, this list of conditions and the following disclaimer. 11 * 2. Redistributions in binary form must reproduce the above copyright 12 * notice, this list of conditions and the following disclaimer in the 13 * documentation and/or other materials provided with the distribution. 14 * 3. All advertising materials mentioning features or use of this software 15 * must display the following acknowledgement: 16 * This product includes software developed by Allen Briggs. 17 * 4. The name of the author may not be used to endorse or promote products 18 * derived from this software without specific prior written permission. 19 * 20 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 21 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 22 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 23 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 24 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 25 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 26 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 27 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 28 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 29 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 30 */ 31 /* 32 * Device-specific routines for handling Nubus-based video cards. 33 */ 34 35 #include <sys/param.h> 36 37 #include <sys/device.h> 38 #include <sys/ioctl.h> 39 #include <sys/file.h> 40 #include <sys/malloc.h> 41 #include <sys/mman.h> 42 #include <sys/proc.h> 43 #include <sys/systm.h> 44 45 #include <machine/bus.h> 46 #include <machine/cpu.h> 47 #include <machine/grfioctl.h> 48 #include <machine/viareg.h> 49 50 #include <mac68k/dev/nubus.h> 51 #include <mac68k/dev/grfvar.h> 52 53 static void load_image_data __P((caddr_t data, struct image_data *image)); 54 55 static void grfmv_intr_generic_1 __P((void *vsc, int slot)); 56 static void grfmv_intr_generic_4 __P((void *vsc, int slot)); 57 58 static void grfmv_intr_cb264 __P((void *vsc, int slot)); 59 static void grfmv_intr_cb364 __P((void *vsc, int slot)); 60 static void grfmv_intr_cmax __P((void *vsc, int slot)); 61 static void grfmv_intr_cti __P((void *vsc, int slot)); 62 static void grfmv_intr_radius __P((void *vsc, int slot)); 63 static void grfmv_intr_supermacgfx __P((void *vsc, int slot)); 64 65 static int grfmv_mode __P((struct grf_softc *gp, int cmd, void *arg)); 66 static caddr_t grfmv_phys __P((struct grf_softc *gp)); 67 static int grfmv_match __P((struct device *, struct cfdata *, void *)); 68 static void grfmv_attach __P((struct device *, struct device *, void *)); 69 70 struct cfdriver macvid_cd = { 71 NULL, "macvid", DV_DULL 72 }; 73 74 struct cfattach macvid_ca = { 75 sizeof(struct grfbus_softc), grfmv_match, grfmv_attach 76 }; 77 78 static void 79 load_image_data(data, image) 80 caddr_t data; 81 struct image_data *image; 82 { 83 bcopy(data , &image->size, 4); 84 bcopy(data + 4, &image->offset, 4); 85 bcopy(data + 8, &image->rowbytes, 2); 86 bcopy(data + 10, &image->top, 2); 87 bcopy(data + 12, &image->left, 2); 88 bcopy(data + 14, &image->bottom, 2); 89 bcopy(data + 16, &image->right, 2); 90 bcopy(data + 18, &image->version, 2); 91 bcopy(data + 20, &image->packType, 2); 92 bcopy(data + 22, &image->packSize, 4); 93 bcopy(data + 26, &image->hRes, 4); 94 bcopy(data + 30, &image->vRes, 4); 95 bcopy(data + 34, &image->pixelType, 2); 96 bcopy(data + 36, &image->pixelSize, 2); 97 bcopy(data + 38, &image->cmpCount, 2); 98 bcopy(data + 40, &image->cmpSize, 2); 99 bcopy(data + 42, &image->planeBytes, 4); 100 } 101 102 103 static int 104 grfmv_match(parent, cf, aux) 105 struct device *parent; 106 struct cfdata *cf; 107 void *aux; 108 { 109 struct nubus_attach_args *na = (struct nubus_attach_args *)aux; 110 111 if (na->category != NUBUS_CATEGORY_DISPLAY) 112 return 0; 113 114 if (na->type != NUBUS_TYPE_VIDEO) 115 return 0; 116 117 if (na->drsw != NUBUS_DRSW_APPLE) 118 return 0; 119 120 /* 121 * If we've gotten this far, then we're dealing with a real-live 122 * Apple QuickDraw-compatible display card resource. Now, how to 123 * determine that this is an active resource??? Dunno. But we'll 124 * proceed like it is. 125 */ 126 127 return 1; 128 } 129 130 static void 131 grfmv_attach(parent, self, aux) 132 struct device *parent, *self; 133 void *aux; 134 { 135 struct grfbus_softc *sc = (struct grfbus_softc *)self; 136 struct nubus_attach_args *na = (struct nubus_attach_args *)aux; 137 struct image_data image_store, image; 138 struct grfmode *gm; 139 char cardname[CARD_NAME_LEN]; 140 nubus_dirent dirent; 141 nubus_dir dir, mode_dir; 142 int mode; 143 144 sc->sc_tag = na->na_tag; 145 sc->card_id = na->drhw; 146 147 bcopy(na->fmt, &sc->sc_slot, sizeof(nubus_slot)); 148 149 if (bus_space_map(sc->sc_tag, 150 NUBUS_SLOT2PA(na->slot), NBMEMSIZE, 0, &sc->sc_handle)) { 151 printf(": grfmv_attach: failed to map slot %d\n", na->slot); 152 return; 153 } 154 155 nubus_get_main_dir(&sc->sc_slot, &dir); 156 157 if (nubus_find_rsrc(sc->sc_tag, sc->sc_handle, 158 &sc->sc_slot, &dir, na->rsrcid, &dirent) <= 0) { 159 bad: 160 bus_space_unmap(sc->sc_tag, sc->sc_handle, NBMEMSIZE); 161 return; 162 } 163 164 nubus_get_dir_from_rsrc(&sc->sc_slot, &dirent, &sc->board_dir); 165 166 if (nubus_find_rsrc(sc->sc_tag, sc->sc_handle, 167 &sc->sc_slot, &sc->board_dir, NUBUS_RSRC_TYPE, &dirent) <= 0) 168 if ((na->rsrcid != 128) || 169 (nubus_find_rsrc(sc->sc_tag, sc->sc_handle, 170 &sc->sc_slot, &dir, 129, &dirent) <= 0)) 171 goto bad; 172 173 mode = NUBUS_RSRC_FIRSTMODE; 174 if (nubus_find_rsrc(sc->sc_tag, sc->sc_handle, 175 &sc->sc_slot, &sc->board_dir, mode, &dirent) <= 0) { 176 printf(": probe failed to get board rsrc.\n"); 177 goto bad; 178 } 179 180 nubus_get_dir_from_rsrc(&sc->sc_slot, &dirent, &mode_dir); 181 182 if (nubus_find_rsrc(sc->sc_tag, sc->sc_handle, 183 &sc->sc_slot, &mode_dir, VID_PARAMS, &dirent) <= 0) { 184 printf(": probe failed to get mode dir.\n"); 185 goto bad; 186 } 187 188 if (nubus_get_ind_data(sc->sc_tag, sc->sc_handle, &sc->sc_slot, 189 &dirent, (caddr_t)&image_store, sizeof(struct image_data)) <= 0) { 190 printf(": probe failed to get indirect mode data.\n"); 191 goto bad; 192 } 193 194 /* Need to load display info (and driver?), etc... (?) */ 195 196 load_image_data((caddr_t)&image_store, &image); 197 198 gm = &sc->curr_mode; 199 gm->mode_id = mode; 200 gm->fbbase = (caddr_t)sc->sc_handle; /* XXX evil! */ 201 gm->fboff = image.offset; 202 gm->rowbytes = image.rowbytes; 203 gm->width = image.right - image.left; 204 gm->height = image.bottom - image.top; 205 gm->fbsize = gm->height * gm->rowbytes; 206 gm->hres = image.hRes; 207 gm->vres = image.vRes; 208 gm->ptype = image.pixelType; 209 gm->psize = image.pixelSize; 210 211 strncpy(cardname, nubus_get_card_name(sc->sc_tag, sc->sc_handle, 212 &sc->sc_slot), CARD_NAME_LEN); 213 cardname[CARD_NAME_LEN-1] = '\0'; 214 printf(": %s\n", cardname); 215 216 if (sc->card_id == NUBUS_DRHW_TFB) { 217 /* 218 * This is the Toby card, but apparently some manufacturers 219 * (like Cornerstone) didn't bother to get/use their own 220 * value here, even though the cards are different, so we 221 * so we try to differentiate here. 222 */ 223 if (strncmp(cardname, "Samsung 768", 11) == 0) 224 sc->card_id = NUBUS_DRHW_SAM768; 225 else if (strncmp(cardname, "Toby frame", 10) != 0) 226 printf("%s: This display card pretends to be a TFB!\n", 227 sc->sc_dev.dv_xname); 228 } 229 230 switch (sc->card_id) { 231 case NUBUS_DRHW_TFB: 232 case NUBUS_DRHW_M2HRVC: 233 case NUBUS_DRHW_PVC: 234 sc->cli_offset = 0xa0000; 235 sc->cli_value = 0; 236 add_nubus_intr(na->slot, grfmv_intr_generic_1, sc); 237 break; 238 case NUBUS_DRHW_WVC: 239 sc->cli_offset = 0xa00000; 240 sc->cli_value = 0; 241 add_nubus_intr(na->slot, grfmv_intr_generic_1, sc); 242 break; 243 case NUBUS_DRHW_COLORMAX: 244 add_nubus_intr(na->slot, grfmv_intr_cmax, sc); 245 break; 246 case NUBUS_DRHW_SE30: 247 /* Do nothing--SE/30 interrupts are disabled */ 248 break; 249 case NUBUS_DRHW_MDC: 250 sc->cli_offset = 0x200148; 251 sc->cli_value = 1; 252 add_nubus_intr(na->slot, grfmv_intr_generic_4, sc); 253 254 /* Enable interrupts; to disable, write 0x7 to this location */ 255 bus_space_write_4(sc->sc_tag, sc->sc_handle, 0x20013C, 5); 256 break; 257 case NUBUS_DRHW_CB264: 258 add_nubus_intr(na->slot, grfmv_intr_cb264, sc); 259 break; 260 case NUBUS_DRHW_CB364: 261 add_nubus_intr(na->slot, grfmv_intr_cb364, sc); 262 break; 263 case NUBUS_DRHW_RPC8: 264 sc->cli_offset = 0xfdff8f; 265 sc->cli_value = 0xff; 266 add_nubus_intr(na->slot, grfmv_intr_generic_1, sc); 267 break; 268 case NUBUS_DRHW_RPC8XJ: 269 add_nubus_intr(na->slot, grfmv_intr_radius, sc); 270 break; 271 case NUBUS_DRHW_FIILX: 272 case NUBUS_DRHW_FIISXDSP: 273 sc->cli_offset = 0xf05000; 274 sc->cli_value = 0x80; 275 add_nubus_intr(na->slot, grfmv_intr_generic_1, sc); 276 break; 277 case NUBUS_DRHW_SAM768: 278 add_nubus_intr(na->slot, grfmv_intr_cti, sc); 279 break; 280 case NUBUS_DRHW_SUPRGFX: 281 add_nubus_intr(na->slot, grfmv_intr_supermacgfx, sc); 282 break; 283 case NUBUS_DRHW_MICRON: 284 /* What do we know about this one? */ 285 default: 286 printf("%s: Unknown video card ID 0x%x --", 287 sc->sc_dev.dv_xname, sc->card_id); 288 printf(" Not installing interrupt routine.\n"); 289 break; 290 } 291 292 /* Perform common video attachment. */ 293 grf_establish(sc, &sc->sc_slot, grfmv_mode, grfmv_phys); 294 } 295 296 static int 297 grfmv_mode(gp, cmd, arg) 298 struct grf_softc *gp; 299 int cmd; 300 void *arg; 301 { 302 switch (cmd) { 303 case GM_GRFON: 304 case GM_GRFOFF: 305 return 0; 306 case GM_CURRMODE: 307 break; 308 case GM_NEWMODE: 309 break; 310 case GM_LISTMODES: 311 break; 312 } 313 return EINVAL; 314 } 315 316 static caddr_t 317 grfmv_phys(gp) 318 struct grf_softc *gp; 319 { 320 return (caddr_t)NUBUS_SLOT2PA(gp->sc_slot->slot); 321 } 322 323 /* Interrupt handlers... */ 324 /* 325 * Generic routine to clear interrupts for cards where it simply takes 326 * a MOV.B to clear the interrupt. The offset and value of this byte 327 * varies between cards. 328 */ 329 /*ARGSUSED*/ 330 static void 331 grfmv_intr_generic_1(vsc, slot) 332 void *vsc; 333 int slot; 334 { 335 struct grfbus_softc *sc = (struct grfbus_softc *)vsc; 336 337 bus_space_write_1(sc->sc_tag, sc->sc_handle, 338 sc->cli_offset, (u_int8_t)sc->cli_value); 339 } 340 341 /* 342 * Generic routine to clear interrupts for cards where it simply takes 343 * a MOV.L to clear the interrupt. The offset and value of this byte 344 * varies between cards. 345 */ 346 /*ARGSUSED*/ 347 static void 348 grfmv_intr_generic_4(vsc, slot) 349 void *vsc; 350 int slot; 351 { 352 struct grfbus_softc *sc = (struct grfbus_softc *)vsc; 353 354 bus_space_write_4(sc->sc_tag, sc->sc_handle, 355 sc->cli_offset, sc->cli_value); 356 } 357 358 /* 359 * Routine to clear interrupts for the Radius PrecisionColor 8xj card. 360 */ 361 /*ARGSUSED*/ 362 static void 363 grfmv_intr_radius(vsc, slot) 364 void *vsc; 365 int slot; 366 { 367 struct grfbus_softc *sc = (struct grfbus_softc *)vsc; 368 u_int8_t c; 369 370 /* 371 * The value 0x66 was the observed value on one card. It is read 372 * from the driver's information block, so this may not be sufficient. 373 * Then again, we're not setting up any other interrupts... 374 */ 375 c = 0x66; 376 377 c |= 0x80; 378 bus_space_write_1(sc->sc_tag, sc->sc_handle, 0xd00403, c); 379 c &= 0x7f; 380 bus_space_write_1(sc->sc_tag, sc->sc_handle, 0xd00403, c); 381 } 382 383 /* 384 * Routine to clear interrupts on Samsung 768x1006 video controller. 385 * This controller was manufactured by Cornerstone Technology, Inc., 386 * now known as Cornerstone Imaging. 387 * 388 * To clear this interrupt, we apparently have to set, then clear, 389 * bit 2 at byte offset 0x80000 from the card's base. 390 * Information for this provided by Brad Salai <bsalai (at) servtech.com> 391 */ 392 /*ARGSUSED*/ 393 static void 394 grfmv_intr_cti(vsc, slot) 395 void *vsc; 396 int slot; 397 { 398 struct grfbus_softc *sc = (struct grfbus_softc *)vsc; 399 u_int8_t c; 400 401 c = bus_space_read_1(sc->sc_tag, sc->sc_handle, 0x80000); 402 c |= 0x02; 403 bus_space_write_1(sc->sc_tag, sc->sc_handle, 0x80000, c); 404 c &= 0xfd; 405 bus_space_write_1(sc->sc_tag, sc->sc_handle, 0x80000, c); 406 } 407 408 /*ARGSUSED*/ 409 static void 410 grfmv_intr_cb264(vsc, slot) 411 void *vsc; 412 int slot; 413 { 414 struct grfbus_softc *sc; 415 volatile char *slotbase; 416 417 sc = (struct grfbus_softc *)vsc; 418 slotbase = (volatile char *)sc->sc_handle; /* XXX evil hack */ 419 asm volatile(" movl %0,a0 420 movl a0@(0xff6028),d0 421 andl #0x2,d0 422 beq _mv_intr0 423 movql #0x3,d0 424 _mv_intr0: 425 movl a0@(0xff600c),d1 426 andl #0x3,d1 427 cmpl d1,d0 428 beq _mv_intr_fin 429 movl d0,a0@(0xff600c) 430 nop 431 tstb d0 432 beq _mv_intr1 433 movl #0x0002,a0@(0xff6040) 434 movl #0x0102,a0@(0xff6044) 435 movl #0x0105,a0@(0xff6048) 436 movl #0x000e,a0@(0xff604c) 437 movl #0x001c,a0@(0xff6050) 438 movl #0x00bc,a0@(0xff6054) 439 movl #0x00c3,a0@(0xff6058) 440 movl #0x0061,a0@(0xff605c) 441 movl #0x0012,a0@(0xff6060) 442 bra _mv_intr_fin 443 _mv_intr1: 444 movl #0x0002,a0@(0xff6040) 445 movl #0x0209,a0@(0xff6044) 446 movl #0x020c,a0@(0xff6048) 447 movl #0x000f,a0@(0xff604c) 448 movl #0x0027,a0@(0xff6050) 449 movl #0x00c7,a0@(0xff6054) 450 movl #0x00d7,a0@(0xff6058) 451 movl #0x006b,a0@(0xff605c) 452 movl #0x0029,a0@(0xff6060) 453 _mv_intr_fin: 454 movl #0x1,a0@(0xff6014)" 455 : : "g" (slotbase) : "a0","d0","d1"); 456 } 457 458 /* 459 * Support for the Colorboard 364 might be more complex than it needs to 460 * be. If we can find more information about this card, this might be 461 * significantly simplified. Contributions welcome... :-) 462 */ 463 /*ARGSUSED*/ 464 static void 465 grfmv_intr_cb364(vsc, slot) 466 void *vsc; 467 int slot; 468 { 469 struct grfbus_softc *sc; 470 volatile char *slotbase; 471 472 sc = (struct grfbus_softc *)vsc; 473 slotbase = (volatile char *)sc->sc_handle; /* XXX evil hack */ 474 asm volatile(" movl %0,a0 475 movl a0@(0xfe6028),d0 476 andl #0x2,d0 477 beq _cb364_intr4 478 movql #0x3,d0 479 movl a0@(0xfe6018),d1 480 movl #0x3,a0@(0xfe6018) 481 movw a0@(0xfe7010),d2 482 movl d1,a0@(0xfe6018) 483 movl a0@(0xfe6020),d1 484 btst #0x06,d2 485 beq _cb364_intr0 486 btst #0x00,d1 487 beq _cb364_intr5 488 bsr _cb364_intr1 489 bra _cb364_intr_out 490 _cb364_intr0: 491 btst #0x00,d1 492 bne _cb364_intr5 493 bsr _cb364_intr1 494 bra _cb364_intr_out 495 _cb364_intr1: 496 movl d0,a0@(0xfe600c) 497 nop 498 tstb d0 499 beq _cb364_intr3 500 movl #0x0002,a0@(0xfe6040) 501 movl #0x0105,a0@(0xfe6048) 502 movl #0x000e,a0@(0xfe604c) 503 movl #0x00c3,a0@(0xfe6058) 504 movl #0x0061,a0@(0xfe605c) 505 btst #0x06,d2 506 beq _cb364_intr2 507 movl #0x001c,a0@(0xfe6050) 508 movl #0x00bc,a0@(0xfe6054) 509 movl #0x0012,a0@(0xfe6060) 510 movl #0x000e,a0@(0xfe6044) 511 movl #0x00c3,a0@(0xfe6064) 512 movl #0x0061,a0@(0xfe6020) 513 rts 514 _cb364_intr2: 515 movl #0x0016,a0@(0xfe6050) 516 movl #0x00b6,a0@(0xfe6054) 517 movl #0x0011,a0@(0xfe6060) 518 movl #0x0101,a0@(0xfe6044) 519 movl #0x00bf,a0@(0xfe6064) 520 movl #0x0001,a0@(0xfe6020) 521 rts 522 _cb364_intr3: 523 movl #0x0002,a0@(0xfe6040) 524 movl #0x0209,a0@(0xfe6044) 525 movl #0x020c,a0@(0xfe6048) 526 movl #0x000f,a0@(0xfe604c) 527 movl #0x0027,a0@(0xfe6050) 528 movl #0x00c7,a0@(0xfe6054) 529 movl #0x00d7,a0@(0xfe6058) 530 movl #0x006b,a0@(0xfe605c) 531 movl #0x0029,a0@(0xfe6060) 532 oril #0x0040,a0@(0xfe6064) 533 movl #0x0000,a0@(0xfe6020) 534 rts 535 _cb364_intr4: 536 movq #0x00,d0 537 _cb364_intr5: 538 movl a0@(0xfe600c),d1 539 andl #0x3,d1 540 cmpl d1,d0 541 beq _cb364_intr_out 542 bsr _cb364_intr1 543 _cb364_intr_out: 544 movl #0x1,a0@(0xfe6014) 545 _cb364_intr_quit: 546 " : : "g" (slotbase) : "a0","d0","d1","d2"); 547 } 548 549 /* 550 * Interrupt clearing routine for SuperMac GFX card. 551 */ 552 /*ARGSUSED*/ 553 static void 554 grfmv_intr_supermacgfx(vsc, slot) 555 void *vsc; 556 int slot; 557 { 558 struct grfbus_softc *sc = (struct grfbus_softc *)vsc; 559 u_int8_t dummy; 560 561 dummy = bus_space_read_1(sc->sc_tag, sc->sc_handle, 0xE70D3); 562 } 563 564 /* 565 * Routine to clear interrupts for the Sigma Designs ColorMax card. 566 */ 567 /*ARGSUSED*/ 568 static void 569 grfmv_intr_cmax(vsc, slot) 570 void *vsc; 571 int slot; 572 { 573 struct grfbus_softc *sc = (struct grfbus_softc *)vsc; 574 u_int32_t dummy; 575 576 dummy = bus_space_read_4(sc->sc_tag, sc->sc_handle, 0xf501c); 577 dummy = bus_space_read_4(sc->sc_tag, sc->sc_handle, 0xf5018); 578 } 579
Indexes created Wed Oct 01 07:09:59 GMT 2025