1 /* $NetBSD: ffb.c,v 1.51 2012/04/12 19:09:18 macallan Exp $ */ 2 /* $OpenBSD: creator.c,v 1.20 2002/07/30 19:48:15 jason Exp $ */ 3 4 /* 5 * Copyright (c) 2002 Jason L. Wright (jason@thought.net) 6 * All rights reserved. 7 * 8 * Redistribution and use in source and binary forms, with or without 9 * modification, are permitted provided that the following conditions 10 * are met: 11 * 1. Redistributions of source code must retain the above copyright 12 * notice, this list of conditions and the following disclaimer. 13 * 2. Redistributions in binary form must reproduce the above copyright 14 * notice, this list of conditions and the following disclaimer in the 15 * documentation and/or other materials provided with the distribution. 16 * 3. All advertising materials mentioning features or use of this software 17 * must display the following acknowledgement: 18 * This product includes software developed by Jason L. Wright 19 * 4. The name of the author may not be used to endorse or promote products 20 * derived from this software without specific prior written permission. 21 * 22 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 23 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED 24 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE 25 * DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, 26 * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES 27 * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR 28 * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 29 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, 30 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN 31 * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 32 * POSSIBILITY OF SUCH DAMAGE. 33 */ 34 35 #include <sys/cdefs.h> 36 __KERNEL_RCSID(0, "$NetBSD: ffb.c,v 1.51 2012/04/12 19:09:18 macallan Exp $"); 37 38 #include <sys/types.h> 39 #include <sys/param.h> 40 #include <sys/systm.h> 41 #include <sys/kernel.h> 42 #include <sys/device.h> 43 #include <sys/conf.h> 44 #include <sys/ioctl.h> 45 #include <sys/malloc.h> 46 #include <sys/mman.h> 47 48 #include <sys/bus.h> 49 #include <machine/autoconf.h> 50 #include <machine/openfirm.h> 51 #include <machine/vmparam.h> 52 53 #include <dev/wscons/wsconsio.h> 54 #include <dev/sun/fbio.h> 55 #include <dev/sun/fbvar.h> 56 57 #include <dev/wsfont/wsfont.h> 58 #include <dev/wscons/wsdisplay_vconsvar.h> 59 60 #include <prop/proplib.h> 61 62 #include <dev/i2c/i2cvar.h> 63 #include <dev/i2c/i2c_bitbang.h> 64 #include <dev/i2c/ddcvar.h> 65 66 #include <sparc64/dev/ffbreg.h> 67 #include <sparc64/dev/ffbvar.h> 68 69 #include "opt_wsdisplay_compat.h" 70 #include "opt_ffb.h" 71 72 #ifndef WS_DEFAULT_BG 73 /* Sun -> background should be white */ 74 #define WS_DEFAULT_BG 0xf 75 #endif 76 77 #ifdef FFB_SYNC 78 #define SYNC ffb_ras_wait(sc) 79 #else 80 #define SYNC 81 #endif 82 83 /* Debugging */ 84 #if !defined FFB_DEBUG 85 #define FFB_DEBUG 0 86 #endif 87 #define DPRINTF(x) if (ffb_debug) printf x 88 /* Patchable */ 89 extern int ffb_debug; 90 #if FFB_DEBUG > 0 91 int ffb_debug = 1; 92 #else 93 int ffb_debug = 0; 94 #endif 95 96 extern struct cfdriver ffb_cd; 97 98 struct wsscreen_descr ffb_stdscreen = { 99 "sunffb", 100 0, 0, /* will be filled in -- XXX shouldn't, it's global. */ 101 0, 102 0, 0, 103 WSSCREEN_REVERSE | WSSCREEN_WSCOLORS, 104 NULL /* modecookie */ 105 }; 106 107 const struct wsscreen_descr *ffb_scrlist[] = { 108 &ffb_stdscreen, 109 /* XXX other formats? */ 110 }; 111 112 struct wsscreen_list ffb_screenlist = { 113 sizeof(ffb_scrlist) / sizeof(struct wsscreen_descr *), 114 ffb_scrlist 115 }; 116 117 static struct vcons_screen ffb_console_screen; 118 119 int ffb_ioctl(void *, void *, u_long, void *, int, struct lwp *); 120 static int ffb_blank(struct ffb_softc *, u_long, u_int *); 121 paddr_t ffb_mmap(void *, void *, off_t, int); 122 void ffb_ras_fifo_wait(struct ffb_softc *, int); 123 void ffb_ras_wait(struct ffb_softc *); 124 void ffb_ras_init(struct ffb_softc *); 125 void ffb_ras_copyrows(void *, int, int, int); 126 void ffb_ras_erasecols(void *, int, int, int, long int); 127 void ffb_ras_eraserows(void *, int, int, long int); 128 void ffb_ras_do_cursor(struct rasops_info *); 129 void ffb_ras_fill(struct ffb_softc *); 130 static void ffb_ras_setfg(struct ffb_softc *, int32_t); 131 static void ffb_ras_setbg(struct ffb_softc *, int32_t); 132 133 void ffb_clearscreen(struct ffb_softc *); 134 int ffb_load_font(void *, void *, struct wsdisplay_font *); 135 void ffb_init_screen(void *, struct vcons_screen *, int, 136 long *); 137 int ffb_allocattr(void *, int, int, int, long *); 138 void ffb_putchar(void *, int, int, u_int, long); 139 void ffb_cursor(void *, int, int, int); 140 141 /* frame buffer generic driver */ 142 static void ffbfb_unblank(device_t); 143 dev_type_open(ffbfb_open); 144 dev_type_close(ffbfb_close); 145 dev_type_ioctl(ffbfb_ioctl); 146 dev_type_mmap(ffbfb_mmap); 147 148 static struct fbdriver ffb_fbdriver = { 149 ffbfb_unblank, ffbfb_open, ffbfb_close, ffbfb_ioctl, nopoll, 150 ffbfb_mmap, nokqfilter 151 }; 152 153 struct wsdisplay_accessops ffb_accessops = { 154 .ioctl = ffb_ioctl, 155 .mmap = ffb_mmap, 156 }; 157 158 /* I2C glue */ 159 static int ffb_i2c_acquire_bus(void *, int); 160 static void ffb_i2c_release_bus(void *, int); 161 static int ffb_i2c_send_start(void *, int); 162 static int ffb_i2c_send_stop(void *, int); 163 static int ffb_i2c_initiate_xfer(void *, i2c_addr_t, int); 164 static int ffb_i2c_read_byte(void *, uint8_t *, int); 165 static int ffb_i2c_write_byte(void *, uint8_t, int); 166 167 /* I2C bitbang glue */ 168 static void ffb_i2cbb_set_bits(void *, uint32_t); 169 static void ffb_i2cbb_set_dir(void *, uint32_t); 170 static uint32_t ffb_i2cbb_read(void *); 171 172 static const struct i2c_bitbang_ops ffb_i2cbb_ops = { 173 ffb_i2cbb_set_bits, 174 ffb_i2cbb_set_dir, 175 ffb_i2cbb_read, 176 { 177 FFB_DAC_CFG_MPDATA_SDA, 178 FFB_DAC_CFG_MPDATA_SCL, 179 0, 180 0 181 } 182 }; 183 184 void ffb_attach_i2c(struct ffb_softc *); 185 186 /* Video mode setting */ 187 int ffb_tgc_disable(struct ffb_softc *); 188 void ffb_get_pclk(int, uint32_t *, int *); 189 int ffb_set_vmode(struct ffb_softc *, struct videomode *, int, int *, int *); 190 191 192 void 193 ffb_attach(device_t self) 194 { 195 struct ffb_softc *sc = device_private(self); 196 struct wsemuldisplaydev_attach_args waa; 197 struct rasops_info *ri; 198 long defattr; 199 const char *model, *out_dev; 200 int btype; 201 uint32_t dac; 202 int maxrow, maxcol; 203 u_int blank = WSDISPLAYIO_VIDEO_ON; 204 char buf[6+1]; 205 int i, try_edid; 206 prop_data_t data; 207 208 printf(":"); 209 210 if (sc->sc_type == FFB_CREATOR) { 211 btype = prom_getpropint(sc->sc_node, "board_type", 0); 212 if ((btype & 7) == 3) 213 printf(" Creator3D"); 214 else 215 printf(" Creator"); 216 } else { 217 printf(" Elite3D"); 218 btype = 0; 219 } 220 221 model = prom_getpropstring(sc->sc_node, "model"); 222 if (model == NULL || strlen(model) == 0) 223 model = "unknown"; 224 225 sc->sc_depth = 24; 226 sc->sc_linebytes = 8192; 227 /* We might alter these during EDID mode setting */ 228 sc->sc_height = prom_getpropint(sc->sc_node, "height", 0); 229 sc->sc_width = prom_getpropint(sc->sc_node, "width", 0); 230 231 sc->sc_locked = 0; 232 sc->sc_mode = WSDISPLAYIO_MODE_EMUL; 233 234 maxcol = (prom_getoption("screen-#columns", buf, sizeof buf) == 0) 235 ? strtoul(buf, NULL, 10) 236 : 80; 237 238 maxrow = (prom_getoption("screen-#rows", buf, sizeof buf) != 0) 239 ? strtoul(buf, NULL, 10) 240 : 34; 241 242 /* collect DAC version, as Elite3D cursor enable bit is reversed */ 243 DAC_WRITE(sc, FFB_DAC_TYPE, FFB_DAC_DEVID); 244 dac = DAC_READ(sc, FFB_DAC_VALUE); 245 sc->sc_dacrev = (dac >> 28) & 0xf; 246 247 if (sc->sc_type == FFB_AFB) { 248 sc->sc_dacrev = 10; 249 sc->sc_needredraw = 0; 250 } else { 251 /* see what kind of DAC we have */ 252 int pnum = (dac & 0x0ffff000) >> 12; 253 if (pnum == 0x236e) { 254 sc->sc_needredraw = 0; 255 } else { 256 sc->sc_needredraw = 1; 257 } 258 } 259 printf(", model %s, dac %u\n", model, sc->sc_dacrev); 260 if (sc->sc_needredraw) 261 printf("%s: found old DAC, enabling redraw on unblank\n", 262 device_xname(sc->sc_dev)); 263 264 /* Check if a console resolution "<device>:r<res>" is set. */ 265 if (sc->sc_console) { 266 out_dev = prom_getpropstring(sc->sc_node, "output_device"); 267 if (out_dev != NULL && strlen(out_dev) != 0 && 268 strstr(out_dev, ":r") != NULL) 269 try_edid = 0; 270 else 271 try_edid = 1; 272 } else 273 try_edid = 1; 274 275 #if FFB_DEBUG > 0 276 DAC_WRITE(sc, FFB_DAC_TYPE, FFB_DAC_TGC); 277 printf("tgc: %08x\n", DAC_READ(sc, FFB_DAC_VALUE)); 278 DAC_WRITE(sc, FFB_DAC_TYPE, FFB_DAC_DAC_CTRL); 279 printf("dcl: %08x\n", DAC_READ(sc, FFB_DAC_VALUE)); 280 #endif 281 ffb_attach_i2c(sc); 282 283 /* Need to set asynchronous blank during DDC write/read */ 284 DAC_WRITE(sc, FFB_DAC_TYPE, FFB_DAC_USR_CTRL); 285 dac = DAC_READ(sc, FFB_DAC_VALUE); 286 DAC_WRITE(sc, FFB_DAC_TYPE, FFB_DAC_USR_CTRL); 287 DAC_WRITE(sc, FFB_DAC_VALUE, dac | FFB_DAC_USR_CTRL_BLANK); 288 289 /* Some monitors don't respond first time */ 290 i = 0; 291 while (sc->sc_edid_data[1] == 0 && i++ < 3) 292 ddc_read_edid(&sc->sc_i2c, sc->sc_edid_data, EDID_DATA_LEN); 293 294 /* Remove asynchronous blank */ 295 DAC_WRITE(sc, FFB_DAC_TYPE, FFB_DAC_USR_CTRL); 296 DAC_WRITE(sc, FFB_DAC_VALUE, dac); 297 298 if (edid_parse(&sc->sc_edid_data[0], &sc->sc_edid_info) != -1) { 299 sort_modes(sc->sc_edid_info.edid_modes, 300 &sc->sc_edid_info.edid_preferred_mode, 301 sc->sc_edid_info.edid_nmodes); 302 DPRINTF(("%s: EDID data:\n ", device_xname(sc->sc_dev))); 303 for (i = 0; i < EDID_DATA_LEN; i++) { 304 if (i && !(i % 32)) 305 DPRINTF(("\n ")); 306 if (i && !(i % 4)) 307 DPRINTF((" ")); 308 DPRINTF(("%02x", sc->sc_edid_data[i])); 309 } 310 DPRINTF(("\n")); 311 if (ffb_debug) 312 edid_print(&sc->sc_edid_info); 313 314 data = prop_data_create_data(sc->sc_edid_data, EDID_DATA_LEN); 315 prop_dictionary_set(device_properties(self), "EDID", data); 316 prop_object_release(data); 317 318 if (try_edid) 319 for (i = 0; i < sc->sc_edid_info.edid_nmodes; i++) { 320 if (ffb_set_vmode(sc, 321 &(sc->sc_edid_info.edid_modes[i]), btype, 322 &(sc->sc_width), &(sc->sc_height))) 323 break; 324 } 325 } else { 326 DPRINTF(("%s: No EDID data.\n", device_xname(sc->sc_dev))); 327 } 328 329 ffb_ras_init(sc); 330 331 ffb_blank(sc, WSDISPLAYIO_SVIDEO, &blank); 332 333 sc->sc_accel = ((device_cfdata(sc->sc_dev)->cf_flags & 334 FFB_CFFLAG_NOACCEL) == 0); 335 336 wsfont_init(); 337 338 vcons_init(&sc->vd, sc, &ffb_stdscreen, &ffb_accessops); 339 sc->vd.init_screen = ffb_init_screen; 340 341 /* we mess with ffb_console_screen only once */ 342 if (sc->sc_console) { 343 vcons_init_screen(&sc->vd, &ffb_console_screen, 1, &defattr); 344 SCREEN_VISIBLE((&ffb_console_screen)); 345 /* 346 * XXX we shouldn't use a global variable for the console 347 * screen 348 */ 349 sc->vd.active = &ffb_console_screen; 350 ffb_console_screen.scr_flags = VCONS_SCREEN_IS_STATIC; 351 } else { 352 if (ffb_console_screen.scr_ri.ri_rows == 0) { 353 /* do some minimal setup to avoid weirdnesses later */ 354 vcons_init_screen(&sc->vd, &ffb_console_screen, 1, &defattr); 355 } 356 } 357 ri = &ffb_console_screen.scr_ri; 358 359 ffb_stdscreen.nrows = ri->ri_rows; 360 ffb_stdscreen.ncols = ri->ri_cols; 361 ffb_stdscreen.textops = &ri->ri_ops; 362 ffb_stdscreen.capabilities = ri->ri_caps; 363 364 sc->sc_fb.fb_driver = &ffb_fbdriver; 365 sc->sc_fb.fb_type.fb_cmsize = 0; 366 sc->sc_fb.fb_type.fb_size = maxrow * sc->sc_linebytes; 367 sc->sc_fb.fb_type.fb_type = FBTYPE_CREATOR; 368 sc->sc_fb.fb_type.fb_width = sc->sc_width; 369 sc->sc_fb.fb_type.fb_depth = sc->sc_depth; 370 sc->sc_fb.fb_type.fb_height = sc->sc_height; 371 sc->sc_fb.fb_device = sc->sc_dev; 372 fb_attach(&sc->sc_fb, sc->sc_console); 373 374 ffb_clearscreen(sc); 375 376 if (sc->sc_console) { 377 wsdisplay_cnattach(&ffb_stdscreen, ri, 0, 0, defattr); 378 vcons_replay_msgbuf(&ffb_console_screen); 379 } 380 381 waa.console = sc->sc_console; 382 waa.scrdata = &ffb_screenlist; 383 waa.accessops = &ffb_accessops; 384 waa.accesscookie = &sc->vd; 385 config_found(sc->sc_dev, &waa, wsemuldisplaydevprint); 386 } 387 388 void 389 ffb_attach_i2c(struct ffb_softc *sc) 390 { 391 392 /* Fill in the i2c tag */ 393 sc->sc_i2c.ic_cookie = sc; 394 sc->sc_i2c.ic_acquire_bus = ffb_i2c_acquire_bus; 395 sc->sc_i2c.ic_release_bus = ffb_i2c_release_bus; 396 sc->sc_i2c.ic_send_start = ffb_i2c_send_start; 397 sc->sc_i2c.ic_send_stop = ffb_i2c_send_stop; 398 sc->sc_i2c.ic_initiate_xfer = ffb_i2c_initiate_xfer; 399 sc->sc_i2c.ic_read_byte = ffb_i2c_read_byte; 400 sc->sc_i2c.ic_write_byte = ffb_i2c_write_byte; 401 sc->sc_i2c.ic_exec = NULL; 402 } 403 404 int 405 ffb_ioctl(void *v, void *vs, u_long cmd, void *data, int flags, struct lwp *l) 406 { 407 struct vcons_data *vd = v; 408 struct ffb_softc *sc = vd->cookie; 409 struct wsdisplay_fbinfo *wdf; 410 struct vcons_screen *ms = vd->active; 411 412 DPRINTF(("ffb_ioctl: %s cmd _IO%s%s('%c', %lu)\n", 413 device_xname(sc->sc_dev), 414 (cmd & IOC_IN) ? "W" : "", (cmd & IOC_OUT) ? "R" : "", 415 (char)IOCGROUP(cmd), cmd & 0xff)); 416 417 switch (cmd) { 418 case FBIOGTYPE: 419 *(struct fbtype *)data = sc->sc_fb.fb_type; 420 break; 421 case FBIOGATTR: 422 #define fba ((struct fbgattr *)data) 423 fba->real_type = sc->sc_fb.fb_type.fb_type; 424 fba->owner = 0; /* XXX ??? */ 425 fba->fbtype = sc->sc_fb.fb_type; 426 fba->sattr.flags = 0; 427 fba->sattr.emu_type = sc->sc_fb.fb_type.fb_type; 428 fba->sattr.dev_specific[0] = -1; 429 fba->emu_types[0] = sc->sc_fb.fb_type.fb_type; 430 fba->emu_types[1] = -1; 431 #undef fba 432 break; 433 434 case FBIOGETCMAP: 435 case FBIOPUTCMAP: 436 return EIO; 437 438 case FBIOGVIDEO: 439 case FBIOSVIDEO: 440 return ffb_blank(sc, cmd == FBIOGVIDEO? 441 WSDISPLAYIO_GVIDEO : WSDISPLAYIO_SVIDEO, 442 (u_int *)data); 443 break; 444 case FBIOGCURSOR: 445 case FBIOSCURSOR: 446 /* the console driver is not using the hardware cursor */ 447 break; 448 case FBIOGCURPOS: 449 printf("%s: FBIOGCURPOS not implemented\n", 450 device_xname(sc->sc_dev)); 451 return EIO; 452 case FBIOSCURPOS: 453 printf("%s: FBIOSCURPOS not implemented\n", 454 device_xname(sc->sc_dev)); 455 return EIO; 456 case FBIOGCURMAX: 457 printf("%s: FBIOGCURMAX not implemented\n", 458 device_xname(sc->sc_dev)); 459 return EIO; 460 461 case WSDISPLAYIO_GTYPE: 462 *(u_int *)data = WSDISPLAY_TYPE_SUNFFB; 463 break; 464 case WSDISPLAYIO_SMODE: 465 { 466 if (sc->sc_mode != *(u_int *)data) { 467 sc->sc_mode = *(u_int *)data; 468 if ((sc->sc_mode == WSDISPLAYIO_MODE_EMUL) && 469 (sc->sc_locked == 0)) { 470 ffb_ras_init(sc); 471 vcons_redraw_screen(ms); 472 } 473 } 474 } 475 break; 476 case WSDISPLAYIO_GINFO: 477 wdf = (void *)data; 478 wdf->height = sc->sc_height; 479 wdf->width = sc->sc_width; 480 wdf->depth = 32; 481 wdf->cmsize = 256; /* XXX */ 482 break; 483 #ifdef WSDISPLAYIO_LINEBYTES 484 case WSDISPLAYIO_LINEBYTES: 485 *(u_int *)data = sc->sc_linebytes; 486 break; 487 #endif 488 case WSDISPLAYIO_GETCMAP: 489 break;/* XXX */ 490 491 case WSDISPLAYIO_PUTCMAP: 492 break;/* XXX */ 493 494 case WSDISPLAYIO_SVIDEO: 495 case WSDISPLAYIO_GVIDEO: 496 return(ffb_blank(sc, cmd, (u_int *)data)); 497 break; 498 case WSDISPLAYIO_GCURPOS: 499 case WSDISPLAYIO_SCURPOS: 500 case WSDISPLAYIO_GCURMAX: 501 case WSDISPLAYIO_GCURSOR: 502 case WSDISPLAYIO_SCURSOR: 503 return EIO; /* not supported yet */ 504 break; 505 case WSDISPLAYIO_GET_EDID: { 506 struct wsdisplayio_edid_info *d = data; 507 return wsdisplayio_get_edid(sc->sc_dev, d); 508 } 509 default: 510 return EPASSTHROUGH; 511 } 512 513 return (0); 514 } 515 516 /* blank/unblank the screen */ 517 static int 518 ffb_blank(struct ffb_softc *sc, u_long cmd, u_int *data) 519 { 520 struct vcons_screen *ms = sc->vd.active; 521 u_int val; 522 523 DAC_WRITE(sc, FFB_DAC_TYPE, FFB_DAC_TGC); 524 val = DAC_READ(sc, FFB_DAC_VALUE); 525 526 switch (cmd) { 527 case WSDISPLAYIO_GVIDEO: 528 *data = val & 1; 529 return(0); 530 break; 531 case WSDISPLAYIO_SVIDEO: 532 if (*data == WSDISPLAYIO_VIDEO_OFF) 533 val &= ~1; 534 else if (*data == WSDISPLAYIO_VIDEO_ON) 535 val |= 1; 536 else 537 return(EINVAL); 538 break; 539 default: 540 return(EINVAL); 541 } 542 543 DAC_WRITE(sc, FFB_DAC_TYPE, FFB_DAC_TGC); 544 DAC_WRITE(sc, FFB_DAC_VALUE, val); 545 546 if ((val & 1) && sc->sc_needredraw) { 547 if (ms != NULL) { 548 if ((sc->sc_mode == WSDISPLAYIO_MODE_EMUL) && 549 (sc->sc_locked == 0)) { 550 ffb_ras_init(sc); 551 vcons_redraw_screen(ms); 552 } 553 } 554 } 555 556 return(0); 557 } 558 559 paddr_t 560 ffb_mmap(void *vsc, void *vs, off_t off, int prot) 561 { 562 struct vcons_data *vd = vsc; 563 struct ffb_softc *sc = vd->cookie; 564 int i; 565 566 switch (sc->sc_mode) { 567 case WSDISPLAYIO_MODE_MAPPED: 568 for (i = 0; i < sc->sc_nreg; i++) { 569 /* Before this set? */ 570 if (off < sc->sc_addrs[i]) 571 continue; 572 /* After this set? */ 573 if (off >= (sc->sc_addrs[i] + sc->sc_sizes[i])) 574 continue; 575 576 return (bus_space_mmap(sc->sc_bt, sc->sc_addrs[i], 577 off - sc->sc_addrs[i], prot, BUS_SPACE_MAP_LINEAR)); 578 } 579 break; 580 #ifdef WSDISPLAYIO_MODE_DUMBFB 581 case WSDISPLAYIO_MODE_DUMBFB: 582 if (sc->sc_nreg < FFB_REG_DFB24) 583 break; 584 if (off >= 0 && off < sc->sc_sizes[FFB_REG_DFB24]) 585 return (bus_space_mmap(sc->sc_bt, 586 sc->sc_addrs[FFB_REG_DFB24], off, prot, 587 BUS_SPACE_MAP_LINEAR)); 588 break; 589 #endif 590 } 591 return (-1); 592 } 593 594 void 595 ffb_ras_fifo_wait(struct ffb_softc *sc, int n) 596 { 597 int32_t cache = sc->sc_fifo_cache; 598 599 if (cache < n) { 600 do { 601 cache = FBC_READ(sc, FFB_FBC_UCSR); 602 cache = (cache & FBC_UCSR_FIFO_MASK) - 8; 603 } while (cache < n); 604 } 605 sc->sc_fifo_cache = cache - n; 606 } 607 608 void 609 ffb_ras_wait(struct ffb_softc *sc) 610 { 611 uint32_t ucsr, r; 612 613 while (1) { 614 ucsr = FBC_READ(sc, FFB_FBC_UCSR); 615 if ((ucsr & (FBC_UCSR_FB_BUSY|FBC_UCSR_RP_BUSY)) == 0) 616 break; 617 r = ucsr & (FBC_UCSR_READ_ERR | FBC_UCSR_FIFO_OVFL); 618 if (r != 0) 619 FBC_WRITE(sc, FFB_FBC_UCSR, r); 620 } 621 } 622 623 void 624 ffb_ras_init(struct ffb_softc *sc) 625 { 626 uint32_t fbc; 627 628 if (sc->sc_width > 1280) { 629 DPRINTF(("ffb_ras_init: high resolution.\n")); 630 fbc = FFB_FBC_WM_COMBINED | FFB_FBC_WE_FORCEON | 631 FFB_FBC_ZE_OFF | FFB_FBC_YE_OFF | FFB_FBC_XE_ON; 632 } else { 633 DPRINTF(("ffb_ras_init: standard resolution.\n")); 634 fbc = FFB_FBC_XE_OFF; 635 } 636 ffb_ras_fifo_wait(sc, 11); 637 DPRINTF(("WID: %08x\n", FBC_READ(sc, FFB_FBC_WID))); 638 FBC_WRITE(sc, FFB_FBC_WID, 0x0); 639 FBC_WRITE(sc, FFB_FBC_PPC, 640 FBC_PPC_VCE_DIS | FBC_PPC_TBE_OPAQUE | FBC_PPC_ACE_DIS | 641 FBC_PPC_APE_DIS | FBC_PPC_DCE_DIS | FBC_PPC_CS_CONST | 642 FBC_PPC_ABE_DIS | FBC_PPC_XS_WID); 643 644 fbc |= FFB_FBC_WB_A | FFB_FBC_RB_A | FFB_FBC_SB_BOTH | 645 FFB_FBC_RGBE_MASK; 646 DPRINTF(("%s: fbc is %08x\n", __func__, fbc)); 647 FBC_WRITE(sc, FFB_FBC_FBC, fbc); 648 FBC_WRITE(sc, FFB_FBC_ROP, FBC_ROP_NEW); 649 FBC_WRITE(sc, FFB_FBC_DRAWOP, FBC_DRAWOP_RECTANGLE); 650 FBC_WRITE(sc, FFB_FBC_PMASK, 0xffffffff); 651 FBC_WRITE(sc, FFB_FBC_FONTINC, 0x10000); 652 sc->sc_fg_cache = 0; 653 FBC_WRITE(sc, FFB_FBC_FG, sc->sc_fg_cache); 654 FBC_WRITE(sc, FFB_FBC_BLENDC, FFB_BLENDC_FORCE_ONE | 655 FFB_BLENDC_DF_ONE_M_A | 656 FFB_BLENDC_SF_A); 657 FBC_WRITE(sc, FFB_FBC_BLENDC1, 0); 658 FBC_WRITE(sc, FFB_FBC_BLENDC2, 0); 659 ffb_ras_wait(sc); 660 } 661 662 void 663 ffb_ras_eraserows(void *cookie, int row, int n, long attr) 664 { 665 struct rasops_info *ri = cookie; 666 struct vcons_screen *scr = ri->ri_hw; 667 struct ffb_softc *sc = scr->scr_cookie; 668 669 if (row < 0) { 670 n += row; 671 row = 0; 672 } 673 if (row + n > ri->ri_rows) 674 n = ri->ri_rows - row; 675 if (n <= 0) 676 return; 677 678 ffb_ras_fill(sc); 679 ffb_ras_setfg(sc, ri->ri_devcmap[(attr >> 16) & 0xf]); 680 ffb_ras_fifo_wait(sc, 4); 681 if ((n == ri->ri_rows) && (ri->ri_flg & RI_FULLCLEAR)) { 682 FBC_WRITE(sc, FFB_FBC_BY, 0); 683 FBC_WRITE(sc, FFB_FBC_BX, 0); 684 FBC_WRITE(sc, FFB_FBC_BH, ri->ri_height); 685 FBC_WRITE(sc, FFB_FBC_BW, ri->ri_width); 686 } else { 687 row *= ri->ri_font->fontheight; 688 FBC_WRITE(sc, FFB_FBC_BY, ri->ri_yorigin + row); 689 FBC_WRITE(sc, FFB_FBC_BX, ri->ri_xorigin); 690 FBC_WRITE(sc, FFB_FBC_BH, n * ri->ri_font->fontheight); 691 FBC_WRITE(sc, FFB_FBC_BW, ri->ri_emuwidth); 692 } 693 SYNC; 694 } 695 696 void 697 ffb_ras_erasecols(void *cookie, int row, int col, int n, long attr) 698 { 699 struct rasops_info *ri = cookie; 700 struct vcons_screen *scr = ri->ri_hw; 701 struct ffb_softc *sc = scr->scr_cookie; 702 703 if ((row < 0) || (row >= ri->ri_rows)) 704 return; 705 if (col < 0) { 706 n += col; 707 col = 0; 708 } 709 if (col + n > ri->ri_cols) 710 n = ri->ri_cols - col; 711 if (n <= 0) 712 return; 713 n *= ri->ri_font->fontwidth; 714 col *= ri->ri_font->fontwidth; 715 row *= ri->ri_font->fontheight; 716 717 ffb_ras_fill(sc); 718 ffb_ras_setfg(sc, ri->ri_devcmap[(attr >> 16) & 0xf]); 719 ffb_ras_fifo_wait(sc, 4); 720 FBC_WRITE(sc, FFB_FBC_BY, ri->ri_yorigin + row); 721 FBC_WRITE(sc, FFB_FBC_BX, ri->ri_xorigin + col); 722 FBC_WRITE(sc, FFB_FBC_BH, ri->ri_font->fontheight); 723 FBC_WRITE(sc, FFB_FBC_BW, n - 1); 724 SYNC; 725 } 726 727 void 728 ffb_ras_fill(struct ffb_softc *sc) 729 { 730 ffb_ras_fifo_wait(sc, 3); 731 FBC_WRITE(sc, FFB_FBC_PPC, 732 FBC_PPC_VCE_DIS | FBC_PPC_TBE_OPAQUE | FBC_PPC_ACE_DIS | 733 FBC_PPC_APE_DIS | FBC_PPC_DCE_DIS | FBC_PPC_CS_CONST | 734 FBC_PPC_ABE_DIS | FBC_PPC_XS_WID); 735 FBC_WRITE(sc, FFB_FBC_ROP, FBC_ROP_NEW); 736 FBC_WRITE(sc, FFB_FBC_DRAWOP, FBC_DRAWOP_RECTANGLE); 737 SYNC; 738 } 739 740 void 741 ffb_ras_copyrows(void *cookie, int src, int dst, int n) 742 { 743 struct rasops_info *ri = cookie; 744 struct vcons_screen *scr = ri->ri_hw; 745 struct ffb_softc *sc = scr->scr_cookie; 746 747 if (dst == src) 748 return; 749 if (src < 0) { 750 n += src; 751 src = 0; 752 } 753 if ((src + n) > ri->ri_rows) 754 n = ri->ri_rows - src; 755 if (dst < 0) { 756 n += dst; 757 dst = 0; 758 } 759 if ((dst + n) > ri->ri_rows) 760 n = ri->ri_rows - dst; 761 if (n <= 0) 762 return; 763 n *= ri->ri_font->fontheight; 764 src *= ri->ri_font->fontheight; 765 dst *= ri->ri_font->fontheight; 766 767 ffb_ras_fifo_wait(sc, 9); 768 FBC_WRITE(sc, FFB_FBC_PPC, 769 FBC_PPC_VCE_DIS | FBC_PPC_TBE_OPAQUE | FBC_PPC_ACE_DIS | 770 FBC_PPC_APE_DIS | FBC_PPC_DCE_DIS | FBC_PPC_CS_CONST | 771 FBC_PPC_ABE_DIS | FBC_PPC_XS_WID); 772 FBC_WRITE(sc, FFB_FBC_ROP, FBC_ROP_OLD | (FBC_ROP_OLD << 8)); 773 FBC_WRITE(sc, FFB_FBC_DRAWOP, FBC_DRAWOP_VSCROLL); 774 FBC_WRITE(sc, FFB_FBC_BY, ri->ri_yorigin + src); 775 FBC_WRITE(sc, FFB_FBC_BX, ri->ri_xorigin); 776 FBC_WRITE(sc, FFB_FBC_DY, ri->ri_yorigin + dst); 777 FBC_WRITE(sc, FFB_FBC_DX, ri->ri_xorigin); 778 FBC_WRITE(sc, FFB_FBC_BH, n); 779 FBC_WRITE(sc, FFB_FBC_BW, ri->ri_emuwidth); 780 SYNC; 781 } 782 783 static void 784 ffb_ras_setfg(struct ffb_softc *sc, int32_t fg) 785 { 786 ffb_ras_fifo_wait(sc, 1); 787 if (fg == sc->sc_fg_cache) 788 return; 789 sc->sc_fg_cache = fg; 790 FBC_WRITE(sc, FFB_FBC_FG, fg); 791 SYNC; 792 } 793 794 static void 795 ffb_ras_setbg(struct ffb_softc *sc, int32_t bg) 796 { 797 ffb_ras_fifo_wait(sc, 1); 798 if (bg == sc->sc_bg_cache) 799 return; 800 sc->sc_bg_cache = bg; 801 FBC_WRITE(sc, FFB_FBC_BG, bg); 802 SYNC; 803 } 804 805 /* frame buffer generic driver support functions */ 806 static void 807 ffbfb_unblank(device_t dev) 808 { 809 struct ffb_softc *sc = device_private(dev); 810 struct vcons_screen *ms = sc->vd.active; 811 u_int on = 1; 812 int redraw = 0; 813 814 ffb_ras_init(sc); 815 if (sc->sc_locked) { 816 sc->sc_locked = 0; 817 redraw = 1; 818 } 819 820 ffb_blank(sc, WSDISPLAYIO_SVIDEO, &on); 821 #if 0 822 if ((sc->vd.active != &ffb_console_screen) && 823 (ffb_console_screen.scr_flags & VCONS_SCREEN_IS_STATIC)) { 824 /* 825 * force-switch to the console screen. 826 * Caveat: the higher layer will think we're still on the 827 * other screen 828 */ 829 830 SCREEN_INVISIBLE(sc->vd.active); 831 sc->vd.active = &ffb_console_screen; 832 SCREEN_VISIBLE(sc->vd.active); 833 ms = sc->vd.active; 834 redraw = 1; 835 } 836 #endif 837 if (redraw) { 838 vcons_redraw_screen(ms); 839 } 840 } 841 842 int 843 ffbfb_open(dev_t dev, int flags, int mode, struct lwp *l) 844 { 845 struct ffb_softc *sc; 846 847 sc = device_lookup_private(&ffb_cd, minor(dev)); 848 if (sc == NULL) 849 return ENXIO; 850 851 sc->sc_locked = 1; 852 return 0; 853 } 854 855 int 856 ffbfb_close(dev_t dev, int flags, int mode, struct lwp *l) 857 { 858 struct ffb_softc *sc = device_lookup_private(&ffb_cd, minor(dev)); 859 struct vcons_screen *ms = sc->vd.active; 860 861 sc->sc_locked = 0; 862 if (ms != NULL) { 863 if ((sc->sc_mode == WSDISPLAYIO_MODE_EMUL) && 864 (sc->sc_locked == 0)) { 865 ffb_ras_init(sc); 866 vcons_redraw_screen(ms); 867 } 868 } 869 return 0; 870 } 871 872 int 873 ffbfb_ioctl(dev_t dev, u_long cmd, void *data, int flags, struct lwp *l) 874 { 875 struct ffb_softc *sc = device_lookup_private(&ffb_cd, minor(dev)); 876 877 return ffb_ioctl(&sc->vd, NULL, cmd, data, flags, l); 878 } 879 880 paddr_t 881 ffbfb_mmap(dev_t dev, off_t off, int prot) 882 { 883 struct ffb_softc *sc = device_lookup_private(&ffb_cd, minor(dev)); 884 uint64_t size; 885 int i, reg; 886 off_t o; 887 888 /* 889 * off is a magic cookie (see xfree86/drivers/sunffb/ffb.h), 890 * which we map to an index into the "reg" property, and use 891 * our copy of the firmware data as arguments for the real 892 * mapping. 893 */ 894 static struct { unsigned long voff; int reg; } map[] = { 895 { 0x00000000, FFB_REG_SFB8R }, 896 { 0x00400000, FFB_REG_SFB8G }, 897 { 0x00800000, FFB_REG_SFB8B }, 898 { 0x00c00000, FFB_REG_SFB8X }, 899 { 0x01000000, FFB_REG_SFB32 }, 900 { 0x02000000, FFB_REG_SFB64 }, 901 { 0x04000000, FFB_REG_FBC }, 902 { 0x04004000, FFB_REG_DFB8R }, 903 { 0x04404000, FFB_REG_DFB8G }, 904 { 0x04804000, FFB_REG_DFB8B }, 905 { 0x04c04000, FFB_REG_DFB8X }, 906 { 0x05004000, FFB_REG_DFB24 }, 907 { 0x06004000, FFB_REG_DFB32 }, 908 { 0x07004000, FFB_REG_DFB422A }, 909 { 0x0bc06000, FFB_REG_DAC }, 910 { 0x0bc08000, FFB_REG_PROM }, 911 { 0x0bc18000, 0 } 912 }; 913 914 /* special value "FFB_EXP_VOFF" - not backed by any "reg" entry */ 915 if (off == 0x0bc18000) 916 return bus_space_mmap(sc->sc_bt, sc->sc_addrs[FFB_REG_PROM], 917 0x00200000, prot, BUS_SPACE_MAP_LINEAR); 918 919 /* 920 * FFB_VOFF_FBC_KREGS - used by afbinit to upload firmware. We should 921 * probably mmap them only on afb boards 922 */ 923 if ((off >= 0x0bc04000) && (off < 0x0bc06000)) 924 return bus_space_mmap(sc->sc_bt, sc->sc_addrs[FFB_REG_PROM], 925 0x00610000 + (off - 0x0bc04000), prot, 926 BUS_SPACE_MAP_LINEAR); 927 928 #define NELEMS(arr) (sizeof(arr)/sizeof((arr)[0])) 929 930 /* the map is ordered by voff */ 931 for (i = 0; i < NELEMS(map)-1; i++) { 932 reg = map[i].reg; 933 /* the number of entries in reg seems to vary */ 934 if (reg < sc->sc_nreg) { 935 size = min((map[i + 1].voff - map[i].voff), 936 sc->sc_sizes[reg]); 937 if ((off >= map[i].voff) && 938 (off < (map[i].voff + size))) { 939 o = off - map[i].voff; 940 return bus_space_mmap(sc->sc_bt, 941 sc->sc_addrs[reg], o, prot, 942 BUS_SPACE_MAP_LINEAR); 943 } 944 } 945 } 946 947 return -1; 948 } 949 950 void 951 ffb_clearscreen(struct ffb_softc *sc) 952 { 953 struct rasops_info *ri = &ffb_console_screen.scr_ri; 954 ffb_ras_fill(sc); 955 ffb_ras_setfg(sc, ri->ri_devcmap[WS_DEFAULT_BG]); 956 ffb_ras_fifo_wait(sc, 4); 957 FBC_WRITE(sc, FFB_FBC_BY, 0); 958 FBC_WRITE(sc, FFB_FBC_BX, 0); 959 FBC_WRITE(sc, FFB_FBC_BH, sc->sc_height); 960 FBC_WRITE(sc, FFB_FBC_BW, sc->sc_width); 961 } 962 963 void 964 ffb_cursor(void *cookie, int on, int row, int col) 965 { 966 struct rasops_info *ri = cookie; 967 struct vcons_screen *scr; 968 struct ffb_softc *sc; 969 int x, y, wi, he, coffset; 970 971 if (cookie != NULL) { 972 scr = ri->ri_hw; 973 sc = scr->scr_cookie; 974 975 wi = ri->ri_font->fontwidth; 976 he = ri->ri_font->fontheight; 977 978 if (sc->sc_mode == WSDISPLAYIO_MODE_EMUL) { 979 x = ri->ri_ccol * wi + ri->ri_xorigin; 980 y = ri->ri_crow * he + ri->ri_yorigin; 981 982 if (ri->ri_flg & RI_CURSOR) { 983 /* remove cursor */ 984 coffset = ri->ri_ccol + (ri->ri_crow * 985 ri->ri_cols); 986 #ifdef WSDISPLAY_SCROLLSUPPORT 987 coffset += scr->scr_offset_to_zero; 988 #endif 989 ffb_ras_wait(sc); 990 ffb_putchar(cookie, ri->ri_crow, 991 ri->ri_ccol, scr->scr_chars[coffset], 992 scr->scr_attrs[coffset]); 993 ri->ri_flg &= ~RI_CURSOR; 994 } 995 ri->ri_crow = row; 996 ri->ri_ccol = col; 997 if (on) 998 { 999 long attr, revattr; 1000 x = ri->ri_ccol * wi + ri->ri_xorigin; 1001 y = ri->ri_crow * he + ri->ri_yorigin; 1002 coffset = col + (row * ri->ri_cols); 1003 #ifdef WSDISPLAY_SCROLLSUPPORT 1004 coffset += scr->scr_offset_to_zero; 1005 #endif 1006 attr = scr->scr_attrs[coffset]; 1007 #ifdef FFB_CURSOR_SWAP_COLOURS 1008 revattr=((attr >> 8 ) & 0x000f0000) | ((attr & 1009 0x000f0000)<<8) | (attr & 0x0000ffff); 1010 #else 1011 revattr = attr ^ 0xffff0000; 1012 #endif 1013 ffb_ras_wait(sc); 1014 ffb_putchar(cookie, ri->ri_crow, ri->ri_ccol, 1015 scr->scr_chars[coffset], revattr); 1016 ri->ri_flg |= RI_CURSOR; 1017 } 1018 } else { 1019 ri->ri_crow = row; 1020 ri->ri_ccol = col; 1021 ri->ri_flg &= ~RI_CURSOR; 1022 } 1023 } 1024 } 1025 1026 void 1027 ffb_putchar(void *cookie, int row, int col, u_int c, long attr) 1028 { 1029 struct rasops_info *ri = cookie; 1030 struct vcons_screen *scr = ri->ri_hw; 1031 struct wsdisplay_font *font = PICK_FONT(ri, c); 1032 struct ffb_softc *sc = scr->scr_cookie; 1033 void *data; 1034 uint32_t fg, bg; 1035 int uc, i; 1036 int x, y, wi, he; 1037 1038 if (sc->sc_mode != WSDISPLAYIO_MODE_EMUL) 1039 return; 1040 1041 wi = font->fontwidth; 1042 he = font->fontheight; 1043 1044 if (!CHAR_IN_FONT(c, font)) 1045 return; 1046 1047 bg = ri->ri_devcmap[(attr >> 16) & 0xf]; 1048 fg = ri->ri_devcmap[(attr >> 24) & 0xf]; 1049 x = ri->ri_xorigin + col * wi; 1050 y = ri->ri_yorigin + row * he; 1051 1052 uc = c - font->firstchar; 1053 data = (uint8_t *)font->data + uc * ri->ri_fontscale; 1054 1055 if (font->stride < wi) { 1056 /* mono bitmap font */ 1057 ffb_ras_setbg(sc, bg); 1058 ffb_ras_setfg(sc, fg); 1059 ffb_ras_fifo_wait(sc, 4); 1060 FBC_WRITE(sc, FFB_FBC_ROP, FBC_ROP_NEW); 1061 FBC_WRITE(sc, FFB_FBC_FONTXY, (y << 16) | x); 1062 FBC_WRITE(sc, FFB_FBC_FONTW, wi); 1063 FBC_WRITE(sc, FFB_FBC_PPC, 1064 FBC_PPC_VCE_DIS | FBC_PPC_TBE_OPAQUE | FBC_PPC_ACE_DIS | 1065 FBC_PPC_APE_DIS | FBC_PPC_DCE_DIS | FBC_PPC_CS_CONST | 1066 FBC_PPC_ABE_DIS | FBC_PPC_XS_WID); 1067 1068 switch (font->stride) { 1069 case 1: { 1070 uint8_t *data8 = data; 1071 uint32_t reg; 1072 for (i = 0; i < he; i++) { 1073 reg = *data8; 1074 FBC_WRITE(sc, FFB_FBC_FONT, reg << 24); 1075 data8++; 1076 } 1077 break; 1078 } 1079 case 2: { 1080 uint16_t *data16 = data; 1081 uint32_t reg; 1082 for (i = 0; i < he; i++) { 1083 reg = *data16; 1084 FBC_WRITE(sc, FFB_FBC_FONT, reg << 16); 1085 data16++; 1086 } 1087 break; 1088 } 1089 } 1090 } else { 1091 /* alpha font */ 1092 volatile uint32_t *dest, *ddest; 1093 uint32_t alpha = 0x80; 1094 uint8_t *data8 = data; 1095 int j; 1096 1097 /* first we erase the background */ 1098 ffb_ras_fill(sc); 1099 ffb_ras_setfg(sc, bg); 1100 ffb_ras_fifo_wait(sc, 4); 1101 FBC_WRITE(sc, FFB_FBC_BY, y); 1102 FBC_WRITE(sc, FFB_FBC_BX, x); 1103 FBC_WRITE(sc, FFB_FBC_BH, he); 1104 FBC_WRITE(sc, FFB_FBC_BW, wi); 1105 1106 /* if we draw a space we're done */ 1107 if (c == ' ') return; 1108 1109 /* now enable alpha blending */ 1110 ffb_ras_setfg(sc, fg); 1111 ffb_ras_fifo_wait(sc, 2); 1112 FBC_WRITE(sc, FFB_FBC_ROP, FBC_ROP_NEW); 1113 1114 FBC_WRITE(sc, FFB_FBC_PPC, 1115 FBC_PPC_VCE_DIS | FBC_PPC_TBE_OPAQUE | FBC_PPC_ACE_DIS | 1116 FBC_PPC_APE_DIS | FBC_PPC_DCE_DIS | FBC_PPC_CS_CONST | 1117 FBC_PPC_ABE_ENA | FBC_PPC_XS_VAR); 1118 /* 1119 * we have to wait for both the rectangle drawing op above and 1120 * the FFB_FBC_PPC write to finish before mucking around in 1121 * the SFB aperture 1122 */ 1123 ffb_ras_wait(sc); 1124 1125 /* ... and draw the character */ 1126 dest = sc->sc_sfb32 + 2048 * y + x; 1127 for (i = 0; i < he; i++) { 1128 ddest = dest; 1129 for (j = 0; j < wi; j++) { 1130 alpha = *data8; 1131 /* 1132 * We set the colour source to constant above 1133 * so we only have to write the alpha channel 1134 * here and the colour comes from the FG 1135 * register. It would be nice if we could 1136 * just use the SFB8X aperture and memcpy() 1137 * the alpha map line by line but for some 1138 * strange reason that will take colour info 1139 * from the framebuffer even if we set the 1140 * FBC_PPC_CS_CONST bit above. 1141 */ 1142 *ddest = alpha << 24; 1143 data8++; 1144 ddest++; 1145 } 1146 dest += 2048; 1147 } 1148 } 1149 } 1150 1151 int 1152 ffb_allocattr(void *cookie, int fg, int bg, int flags, long *attrp) 1153 { 1154 if ((fg == 0) && (bg == 0)) 1155 { 1156 fg = WS_DEFAULT_FG; 1157 bg = WS_DEFAULT_BG; 1158 } 1159 if (flags & WSATTR_REVERSE) { 1160 *attrp = (bg & 0xff) << 24 | (fg & 0xff) << 16 | 1161 (flags & 0xff); 1162 } else 1163 *attrp = (fg & 0xff) << 24 | (bg & 0xff) << 16 | 1164 (flags & 0xff); 1165 return 0; 1166 } 1167 1168 void 1169 ffb_init_screen(void *cookie, struct vcons_screen *scr, 1170 int existing, long *defattr) 1171 { 1172 struct ffb_softc *sc = cookie; 1173 struct rasops_info *ri = &scr->scr_ri; 1174 1175 ri->ri_depth = 32; 1176 ri->ri_width = sc->sc_width; 1177 ri->ri_height = sc->sc_height; 1178 ri->ri_stride = sc->sc_linebytes; 1179 ri->ri_flg = RI_CENTER | RI_ENABLE_ALPHA; 1180 1181 /* 1182 * we can't accelerate copycols() so instead of falling back to 1183 * software use vcons' putchar() based implementation 1184 */ 1185 scr->scr_flags |= VCONS_NO_COPYCOLS; 1186 #ifdef VCONS_DRAW_INTR 1187 scr->scr_flags |= VCONS_DONT_READ; 1188 #endif 1189 DPRINTF(("ffb_init_screen: addr: %08lx\n",(ulong)ri->ri_bits)); 1190 1191 /* explicitly request BGR in case the default changes */ 1192 ri->ri_rnum = 8; 1193 ri->ri_gnum = 8; 1194 ri->ri_bnum = 8; 1195 ri->ri_rpos = 0; 1196 ri->ri_gpos = 8; 1197 ri->ri_bpos = 16; 1198 1199 rasops_init(ri, 0, 0); 1200 ri->ri_caps = WSSCREEN_WSCOLORS; 1201 rasops_reconfig(ri, sc->sc_height / ri->ri_font->fontheight, 1202 sc->sc_width / ri->ri_font->fontwidth); 1203 1204 /* enable acceleration */ 1205 ri->ri_ops.copyrows = ffb_ras_copyrows; 1206 ri->ri_ops.eraserows = ffb_ras_eraserows; 1207 ri->ri_ops.erasecols = ffb_ras_erasecols; 1208 ri->ri_ops.cursor = ffb_cursor; 1209 ri->ri_ops.allocattr = ffb_allocattr; 1210 ri->ri_ops.putchar = ffb_putchar; 1211 } 1212 1213 /* I2C bitbanging */ 1214 static void ffb_i2cbb_set_bits(void *cookie, uint32_t bits) 1215 { 1216 struct ffb_softc *sc = cookie; 1217 1218 DAC_WRITE(sc, FFB_DAC_TYPE, FFB_DAC_CFG_MPDATA); 1219 DAC_WRITE(sc, FFB_DAC_VALUE, bits); 1220 } 1221 1222 static void ffb_i2cbb_set_dir(void *cookie, uint32_t dir) 1223 { 1224 /* Nothing to do */ 1225 } 1226 1227 static uint32_t ffb_i2cbb_read(void *cookie) 1228 { 1229 struct ffb_softc *sc = cookie; 1230 uint32_t bits; 1231 1232 DAC_WRITE(sc, FFB_DAC_TYPE, FFB_DAC_CFG_MPSENSE); 1233 bits = DAC_READ(sc, FFB_DAC_VALUE); 1234 1235 return bits; 1236 } 1237 1238 /* higher level I2C stuff */ 1239 static int 1240 ffb_i2c_acquire_bus(void *cookie, int flags) 1241 { 1242 /* private bus */ 1243 return (0); 1244 } 1245 1246 static void 1247 ffb_i2c_release_bus(void *cookie, int flags) 1248 { 1249 /* private bus */ 1250 } 1251 1252 static int 1253 ffb_i2c_send_start(void *cookie, int flags) 1254 { 1255 return (i2c_bitbang_send_start(cookie, flags, &ffb_i2cbb_ops)); 1256 } 1257 1258 static int 1259 ffb_i2c_send_stop(void *cookie, int flags) 1260 { 1261 1262 return (i2c_bitbang_send_stop(cookie, flags, &ffb_i2cbb_ops)); 1263 } 1264 1265 static int 1266 ffb_i2c_initiate_xfer(void *cookie, i2c_addr_t addr, int flags) 1267 { 1268 /* 1269 * for some reason i2c_bitbang_initiate_xfer left-shifts 1270 * the I2C-address and then sets the direction bit 1271 */ 1272 return (i2c_bitbang_initiate_xfer(cookie, addr, flags, 1273 &ffb_i2cbb_ops)); 1274 } 1275 1276 static int 1277 ffb_i2c_read_byte(void *cookie, uint8_t *valp, int flags) 1278 { 1279 return (i2c_bitbang_read_byte(cookie, valp, flags, &ffb_i2cbb_ops)); 1280 } 1281 1282 static int 1283 ffb_i2c_write_byte(void *cookie, uint8_t val, int flags) 1284 { 1285 return (i2c_bitbang_write_byte(cookie, val, flags, &ffb_i2cbb_ops)); 1286 } 1287 1288 1289 #define TVC_READ_LIMIT 100000 1290 int 1291 ffb_tgc_disable(struct ffb_softc *sc) 1292 { 1293 int i; 1294 1295 /* Is the timing generator disabled? */ 1296 DAC_WRITE(sc, FFB_DAC_TYPE, FFB_DAC_TGC); 1297 if (!(DAC_READ(sc, FFB_DAC_VALUE) & FFB_DAC_TGC_TIMING_ENABLE)) 1298 return 1; 1299 1300 /* If not, disable it when the vertical counter reaches 0 */ 1301 for (i = 0; i < TVC_READ_LIMIT; i++) { 1302 DAC_WRITE(sc, FFB_DAC_TYPE, FFB_DAC_TVC); 1303 if (!DAC_READ(sc, FFB_DAC_VALUE)) { 1304 DAC_WRITE(sc, FFB_DAC_TYPE, FFB_DAC_TGC); 1305 DAC_WRITE(sc, FFB_DAC_VALUE, 0); 1306 return 1; 1307 } 1308 } 1309 return 0; 1310 } 1311 1312 /* 1313 * PLL Control Register values: 1314 * M)ultiplier = bits 0:6 + 1 1315 * D)ivisor = bits 7:10 + 1 1316 * P)ost divisor = bits 11:13 (000 = 1, 001 = 2, 010 = 4, 011 = 8) 1317 * Frequency = 13.5 * M / D / P 1318 */ 1319 #define FFB_PLL_FREQ 13500000 1320 void 1321 ffb_get_pclk(int request, uint32_t *pll, int *diff) 1322 { 1323 int m, d, p, f, hex = 0, curdiff; 1324 1325 *diff = 100000000; 1326 1327 for (m = 32; m <= 80; m++) { 1328 for (d = 4; d <= 11; d++) { 1329 for (p = 1; p <= 8; p = p << 1) { 1330 switch (p) { 1331 case 1: 1332 hex = 0x4000 + (d << 7) + m; 1333 break; 1334 case 2: 1335 hex = 0x4800 + (d << 7) + m; 1336 break; 1337 case 4: 1338 hex = 0x5000 + (d << 7) + m; 1339 break; 1340 case 8: 1341 hex = 0x6000 + (d << 7) + m; 1342 break; 1343 } 1344 f = 13500000 * m / d / p; 1345 if (f == request) { 1346 *diff = 0; 1347 *pll = hex; 1348 return; 1349 } else { 1350 curdiff = abs(request - f); 1351 if (curdiff < *diff) { 1352 *diff = curdiff; 1353 *pll = hex; 1354 } 1355 } 1356 } 1357 } 1358 } 1359 } 1360 1361 /* 1362 * Details of the FFB RAMDAC are contained in the Brooktree BT497/498 1363 * and in the Connexant BT497A/498A documentation. 1364 * 1365 * VESA timings to FFB register conversion: 1366 * If interleave = 4/2:1 then x = 2, if interleave = 8/2:1 then x = 4 1367 * VBE = VBS - vres = (sync pulse - 1) + back porch 1368 * VBS = VSS - front porch = (sync pulse - 1) + back porch + vres 1369 * VSE = sync pulse - 1 1370 * VSS = (sync pulse - 1) + back porch + vres + front porch 1371 * HRE = HSS - HSE - 1 1372 * HBE = (sync pulse + back porch) / x - 1 1373 * HBS = (sync pulse + back porch + hres) / x - 1 1374 * HSE = sync pulse / x - 1 1375 * HSS = (sync pulse + back porch + hres + front porch) / x - 1 1376 * HCE = HBS - 4 1377 * HCS = HBE - 4 1378 * EPE = EIE = EIS = 0 (for all non-interlaced modes) 1379 * 1380 * Note, that 8/2:1 Single Buffered Interleaving is only supported by the 1381 * double-buffered FFB (Creator3D), and at higher resolutions than 1280x1024 1382 * 1383 * Note, that the timing generator should be disabled and re-enabled when the 1384 * the timing parameter registers are being programmed. Stopping the timing 1385 * generator should only be done when the vertical counter is zero. 1386 */ 1387 #define DIVIDE(x,y) (((x) + ((y) / 2)) / (y)) 1388 int 1389 ffb_set_vmode(struct ffb_softc *sc, struct videomode *mode, int btype, 1390 int *hres, int *vres) 1391 { 1392 int diff; 1393 uint32_t fp, sp, bp, x; 1394 uint32_t pll, pfc, ucl, dcl, tgc; 1395 uint32_t vbe, vbs, vse, vss, hre, hbe, hbs, hse, hss, hce, hcs; 1396 uint32_t epe, eie, eis; 1397 uint32_t fbcfg0; 1398 1399 DPRINTF(("ffb_set_vmode: %dx%d@%d", mode->hdisplay, mode->vdisplay, 1400 DIVIDE(DIVIDE(mode->dot_clock * 1000, 1401 mode->htotal), mode->vtotal))); 1402 DPRINTF((" (%d %d %d %d %d %d %d", 1403 mode->dot_clock, mode->hsync_start, mode->hsync_end, mode->htotal, 1404 mode->vsync_start, mode->vsync_end, mode->vtotal)); 1405 DPRINTF((" %s%sH %s%sV)\n", 1406 mode->flags & VID_PHSYNC ? "+" : "", 1407 mode->flags & VID_NHSYNC ? "-" : "", 1408 mode->flags & VID_PVSYNC ? "+" : "", 1409 mode->flags & VID_NVSYNC ? "-" : "")); 1410 1411 /* We don't handle interlaced or doublescan (yet) */ 1412 if ((mode->flags & VID_INTERLACE) || (mode->flags & VID_DBLSCAN)) 1413 return 0; 1414 1415 /* Only Creator3D can be set to > 1280x1024 */ 1416 if(((sc->sc_type == FFB_CREATOR && !((btype & 7) == 3)) || 1417 sc->sc_type == FFB_AFB) 1418 && (mode->hdisplay > 1280 || mode->vdisplay > 1024)) 1419 return 0; 1420 /* Creator3D can be set to <= 1920x1360 */ 1421 if (mode->hdisplay > 1920 || mode->vdisplay > 1360) 1422 return 0; 1423 1424 /* 1425 * Look for a matching pixel clock and set PLL Control. 1426 * XXX: 640x480@60 is 25175000 in modelines but 25125000 in the 1427 * FFB PROM, and the closest match to 25175000 (0x4da9/25159090) 1428 * does not work. So, use the PROM value instead. 1429 */ 1430 if (mode->hdisplay == 640 && mode->vdisplay == 480 && 1431 mode->dot_clock == 25175) { 1432 DPRINTF(("ffb_set_vmode: 640x480@60: adjusted dot clock\n")); 1433 mode->dot_clock = 25125; 1434 } 1435 ffb_get_pclk(mode->dot_clock * 1000, &pll, &diff); 1436 if (diff > 250000) 1437 return 0; 1438 1439 /* Pixel Format Control, User Control and FBC Configuration. */ 1440 if (mode->hdisplay > 1280) { 1441 pfc = FFB_DAC_PIX_FMT_821; 1442 ucl = FFB_DAC_USR_CTRL_OVERLAY | FFB_DAC_USR_CTRL_WMODE_C; 1443 x = 4; 1444 fbcfg0 = FBC_READ(sc, FFB_FBC_FBCFG0) | FBC_CFG0_DOUBLE_BUF; 1445 } else { 1446 pfc = FFB_DAC_PIX_FMT_421; 1447 /* Only Creator3D and Elite3D can have double-buffer */ 1448 if ((sc->sc_type == FFB_CREATOR && !((btype & 7) == 3))) 1449 ucl = 0; 1450 else 1451 ucl = FFB_DAC_USR_CTRL_DOUBLE; 1452 ucl |= (FFB_DAC_USR_CTRL_OVERLAY | FFB_DAC_USR_CTRL_WMODE_S8); 1453 x = 2; 1454 fbcfg0 = FBC_READ(sc, FFB_FBC_FBCFG0) | FBC_CFG0_SINGLE_BUF; 1455 } 1456 1457 /* DAC Control and Timing Generator Control */ 1458 if (mode->flags & VID_PVSYNC) 1459 dcl = FFB_DAC_DAC_CTRL_POS_VSYNC; 1460 else 1461 dcl = 0; 1462 tgc = 0; 1463 #define EDID_VID_INP sc->sc_edid_info.edid_video_input 1464 if ((EDID_VID_INP & EDID_VIDEO_INPUT_COMPOSITE_SYNC)) { 1465 dcl |= FFB_DAC_DAC_CTRL_VSYNC_DIS; 1466 tgc = FFB_DAC_TGC_EQUAL_DISABLE; 1467 } else { 1468 dcl |= FFB_DAC_DAC_CTRL_SYNC_G; 1469 if (EDID_VID_INP & EDID_VIDEO_INPUT_SEPARATE_SYNCS) 1470 tgc |= FFB_DAC_TGC_VSYNC_DISABLE; 1471 else 1472 tgc = FFB_DAC_TGC_EQUAL_DISABLE; 1473 } 1474 if (EDID_VID_INP & EDID_VIDEO_INPUT_BLANK_TO_BLACK) 1475 dcl |= FFB_DAC_DAC_CTRL_PED_ENABLE; 1476 tgc |= (FFB_DAC_TGC_VIDEO_ENABLE | FFB_DAC_TGC_TIMING_ENABLE | 1477 FFB_DAC_TGC_MASTER_ENABLE); 1478 1479 /* Vertical timing */ 1480 fp = mode->vsync_start - mode->vdisplay; 1481 sp = mode->vsync_end - mode->vsync_start; 1482 bp = mode->vtotal - mode->vsync_end; 1483 1484 vbe = sp - 1 + bp; 1485 vbs = sp - 1 + bp + mode->vdisplay; 1486 vse = sp - 1; 1487 vss = sp - 1 + bp + mode->vdisplay + fp; 1488 1489 /* Horizontal timing */ 1490 fp = mode->hsync_start - mode->hdisplay; 1491 sp = mode->hsync_end - mode->hsync_start; 1492 bp = mode->htotal - mode->hsync_end; 1493 1494 hbe = (sp + bp) / x - 1; 1495 hbs = (sp + bp + mode->hdisplay) / x - 1; 1496 hse = sp / x - 1; 1497 hss = (sp + bp + mode->hdisplay + fp) / x -1; 1498 hre = hss - hse - 1; 1499 hce = hbs - 4; 1500 hcs = hbe - 4; 1501 1502 /* Equalisation (interlaced modes) */ 1503 epe = 0; 1504 eie = 0; 1505 eis = 0; 1506 1507 DPRINTF(("ffb_set_vmode: 0x%04x 0x%04x 0x%04x 0x%04x 0x%04x\n", 1508 pll, pfc, ucl, dcl, tgc)); 1509 DPRINTF(("\t0x%04x 0x%04x 0x%04x 0x%04x\n", vbe, vbs, vse, vss)); 1510 DPRINTF(("\t0x%04x 0x%04x 0x%04x 0x%04x 0x%04x 0x%04x 0x%04x\n", 1511 hre, hbe, hbs, hse, hss, hce, hcs)); 1512 DPRINTF(("\t0x%04x 0x%04x 0x%04x\n", epe, eie, eis)); 1513 1514 if (!ffb_tgc_disable(sc)) { 1515 DPRINTF(("ffb_set_vmode: failed to disable TGC register\n")); 1516 return 0; 1517 } 1518 1519 /* 1520 * Program the mode registers. 1521 * Program the timing generator last, as that re-enables output. 1522 * Note, that a read to/write from a register increments the 1523 * register address to the next register automatically. 1524 */ 1525 DAC_WRITE(sc, FFB_DAC_TYPE, FFB_DAC_PLL_CTRL); 1526 DAC_WRITE(sc, FFB_DAC_VALUE, pll); 1527 DAC_WRITE(sc, FFB_DAC_TYPE, FFB_DAC_PIX_FMT); 1528 DAC_WRITE(sc, FFB_DAC_VALUE, pfc); 1529 DAC_WRITE(sc, FFB_DAC_VALUE, ucl); 1530 DAC_WRITE(sc, FFB_DAC_TYPE, FFB_DAC_DAC_CTRL); 1531 DAC_WRITE(sc, FFB_DAC_VALUE, dcl); 1532 1533 DAC_WRITE(sc, FFB_DAC_TYPE, FFB_DAC_VBE); 1534 DAC_WRITE(sc, FFB_DAC_VALUE, vbe); 1535 DAC_WRITE(sc, FFB_DAC_VALUE, vbs); 1536 DAC_WRITE(sc, FFB_DAC_VALUE, vse); 1537 DAC_WRITE(sc, FFB_DAC_VALUE, vss); 1538 1539 DAC_WRITE(sc, FFB_DAC_VALUE, hre); 1540 DAC_WRITE(sc, FFB_DAC_VALUE, hbe); 1541 DAC_WRITE(sc, FFB_DAC_VALUE, hbs); 1542 DAC_WRITE(sc, FFB_DAC_VALUE, hse); 1543 DAC_WRITE(sc, FFB_DAC_VALUE, hss); 1544 DAC_WRITE(sc, FFB_DAC_VALUE, hce); 1545 DAC_WRITE(sc, FFB_DAC_VALUE, hcs); 1546 1547 DAC_WRITE(sc, FFB_DAC_VALUE, epe); 1548 DAC_WRITE(sc, FFB_DAC_VALUE, eie); 1549 DAC_WRITE(sc, FFB_DAC_VALUE, eis); 1550 1551 FBC_WRITE(sc, FFB_FBC_FBCFG0, fbcfg0); 1552 1553 DAC_WRITE(sc, FFB_DAC_TYPE, FFB_DAC_TGC); 1554 DAC_WRITE(sc, FFB_DAC_VALUE, tgc); 1555 DPRINTF(("new tgc: %08x\n", tgc)); 1556 1557 *hres = mode->hdisplay; 1558 *vres = mode->vdisplay; 1559 1560 printf("%s: video mode set to %d x %d @ %dHz\n", 1561 device_xname(sc->sc_dev), 1562 mode->hdisplay, mode->vdisplay, 1563 DIVIDE(DIVIDE(mode->dot_clock * 1000, 1564 mode->htotal), mode->vtotal)); 1565 1566 return 1; 1567 } 1568