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