1 /* $NetBSD: r128fb.c,v 1.11 2010/09/09 01:22:11 macallan Exp $ */ 2 3 /* 4 * Copyright (c) 2007 Michael Lorenz 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 * 16 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 17 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 18 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 19 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 20 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 21 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 22 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 23 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 24 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 25 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 26 */ 27 28 /* 29 * A console driver for ATI Rage 128 graphics controllers 30 * tested on macppc only so far 31 */ 32 33 #include <sys/cdefs.h> 34 __KERNEL_RCSID(0, "$NetBSD: r128fb.c,v 1.11 2010/09/09 01:22:11 macallan Exp $"); 35 36 #include <sys/param.h> 37 #include <sys/systm.h> 38 #include <sys/kernel.h> 39 #include <sys/device.h> 40 #include <sys/malloc.h> 41 #include <sys/lwp.h> 42 #include <sys/kauth.h> 43 44 #include <uvm/uvm_extern.h> 45 46 #include <dev/videomode/videomode.h> 47 48 #include <dev/pci/pcivar.h> 49 #include <dev/pci/pcireg.h> 50 #include <dev/pci/pcidevs.h> 51 #include <dev/pci/pciio.h> 52 #include <dev/pci/r128fbreg.h> 53 54 #include <dev/wscons/wsdisplayvar.h> 55 #include <dev/wscons/wsconsio.h> 56 #include <dev/wsfont/wsfont.h> 57 #include <dev/rasops/rasops.h> 58 #include <dev/wscons/wsdisplay_vconsvar.h> 59 60 #include <dev/i2c/i2cvar.h> 61 62 #include "opt_r128fb.h" 63 64 #ifdef R128FB_DEBUG 65 #define DPRINTF printf 66 #else 67 #define DPRINTF while(0) printf 68 #endif 69 70 struct r128fb_softc { 71 device_t sc_dev; 72 73 pci_chipset_tag_t sc_pc; 74 pcitag_t sc_pcitag; 75 76 bus_space_tag_t sc_memt; 77 bus_space_tag_t sc_iot; 78 79 bus_space_handle_t sc_fbh; 80 bus_space_handle_t sc_regh; 81 bus_addr_t sc_fb, sc_reg; 82 bus_size_t sc_fbsize, sc_regsize; 83 84 int sc_width, sc_height, sc_depth, sc_stride; 85 int sc_locked, sc_have_backlight, sc_bl_level; 86 void *sc_fbaddr; 87 struct vcons_screen sc_console_screen; 88 struct wsscreen_descr sc_defaultscreen_descr; 89 const struct wsscreen_descr *sc_screens[1]; 90 struct wsscreen_list sc_screenlist; 91 struct vcons_data vd; 92 int sc_mode; 93 u_char sc_cmap_red[256]; 94 u_char sc_cmap_green[256]; 95 u_char sc_cmap_blue[256]; 96 /* engine stuff */ 97 uint32_t sc_master_cntl; 98 }; 99 100 static int r128fb_match(device_t, cfdata_t, void *); 101 static void r128fb_attach(device_t, device_t, void *); 102 103 CFATTACH_DECL_NEW(r128fb, sizeof(struct r128fb_softc), 104 r128fb_match, r128fb_attach, NULL, NULL); 105 106 extern const u_char rasops_cmap[768]; 107 108 static int r128fb_ioctl(void *, void *, u_long, void *, int, 109 struct lwp *); 110 static paddr_t r128fb_mmap(void *, void *, off_t, int); 111 static void r128fb_init_screen(void *, struct vcons_screen *, int, long *); 112 113 static int r128fb_putcmap(struct r128fb_softc *, struct wsdisplay_cmap *); 114 static int r128fb_getcmap(struct r128fb_softc *, struct wsdisplay_cmap *); 115 static void r128fb_restore_palette(struct r128fb_softc *); 116 static int r128fb_putpalreg(struct r128fb_softc *, uint8_t, uint8_t, 117 uint8_t, uint8_t); 118 119 static void r128fb_init(struct r128fb_softc *); 120 static void r128fb_flush_engine(struct r128fb_softc *); 121 static void r128fb_rectfill(struct r128fb_softc *, int, int, int, int, 122 uint32_t); 123 static void r128fb_bitblt(struct r128fb_softc *, int, int, int, int, int, 124 int, int); 125 126 static void r128fb_cursor(void *, int, int, int); 127 #if 0 128 static void r128fb_putchar(void *, int, int, u_int, long); 129 #endif 130 static void r128fb_copycols(void *, int, int, int, int); 131 static void r128fb_erasecols(void *, int, int, int, long); 132 static void r128fb_copyrows(void *, int, int, int); 133 static void r128fb_eraserows(void *, int, int, long); 134 135 static void r128fb_brightness_up(device_t); 136 static void r128fb_brightness_down(device_t); 137 static void r128fb_set_backlight(struct r128fb_softc *, int); 138 139 struct wsdisplay_accessops r128fb_accessops = { 140 r128fb_ioctl, 141 r128fb_mmap, 142 NULL, /* alloc_screen */ 143 NULL, /* free_screen */ 144 NULL, /* show_screen */ 145 NULL, /* load_font */ 146 NULL, /* pollc */ 147 NULL /* scroll */ 148 }; 149 150 static inline void 151 r128fb_wait(struct r128fb_softc *sc, int slots) 152 { 153 uint32_t reg; 154 155 do { 156 reg = (bus_space_read_4(sc->sc_memt, sc->sc_regh, 157 R128_GUI_STAT) & R128_GUI_FIFOCNT_MASK); 158 } while (reg <= slots); 159 } 160 161 static void 162 r128fb_flush_engine(struct r128fb_softc *sc) 163 { 164 uint32_t reg; 165 166 reg = bus_space_read_4(sc->sc_memt, sc->sc_regh, R128_PC_NGUI_CTLSTAT); 167 reg |= R128_PC_FLUSH_ALL; 168 bus_space_write_4(sc->sc_memt, sc->sc_regh, R128_PC_NGUI_CTLSTAT, reg); 169 do { 170 reg = bus_space_read_4(sc->sc_memt, sc->sc_regh, 171 R128_PC_NGUI_CTLSTAT); 172 } while (reg & R128_PC_BUSY); 173 } 174 175 static int 176 r128fb_match(device_t parent, cfdata_t match, void *aux) 177 { 178 struct pci_attach_args *pa = (struct pci_attach_args *)aux; 179 180 if (PCI_CLASS(pa->pa_class) != PCI_CLASS_DISPLAY) 181 return 0; 182 if (PCI_VENDOR(pa->pa_id) != PCI_VENDOR_ATI) 183 return 0; 184 185 /* only cards tested on so far - likely need a list */ 186 if ((PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_ATI_RAGE1AGP4XT) || 187 (PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_ATI_RAGE3AGP4XT) || 188 (PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_ATI_RAGEGLPCI) || 189 (PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_ATI_RAGE_MOB_M3_AGP)) 190 return 100; 191 return (0); 192 } 193 194 static void 195 r128fb_attach(device_t parent, device_t self, void *aux) 196 { 197 struct r128fb_softc *sc = device_private(self); 198 struct pci_attach_args *pa = aux; 199 struct rasops_info *ri; 200 char devinfo[256]; 201 struct wsemuldisplaydev_attach_args aa; 202 prop_dictionary_t dict; 203 unsigned long defattr; 204 bool is_console; 205 int i, j; 206 uint32_t reg; 207 208 sc->sc_pc = pa->pa_pc; 209 sc->sc_pcitag = pa->pa_tag; 210 sc->sc_memt = pa->pa_memt; 211 sc->sc_iot = pa->pa_iot; 212 sc->sc_dev = self; 213 214 pci_devinfo(pa->pa_id, pa->pa_class, 0, devinfo, sizeof(devinfo)); 215 aprint_normal(": %s\n", devinfo); 216 217 /* fill in parameters from properties */ 218 dict = device_properties(self); 219 if (!prop_dictionary_get_uint32(dict, "width", &sc->sc_width)) { 220 aprint_error("%s: no width property\n", device_xname(self)); 221 return; 222 } 223 if (!prop_dictionary_get_uint32(dict, "height", &sc->sc_height)) { 224 aprint_error("%s: no height property\n", device_xname(self)); 225 return; 226 } 227 if (!prop_dictionary_get_uint32(dict, "depth", &sc->sc_depth)) { 228 aprint_error("%s: no depth property\n", device_xname(self)); 229 return; 230 } 231 if (!prop_dictionary_get_uint32(dict, "linebytes", &sc->sc_stride)) { 232 aprint_error("%s: no linebytes property\n", 233 device_xname(self)); 234 return; 235 } 236 237 prop_dictionary_get_bool(dict, "is_console", &is_console); 238 239 if (pci_mapreg_map(pa, 0x10, PCI_MAPREG_TYPE_MEM, 240 BUS_SPACE_MAP_LINEAR, 241 &sc->sc_memt, &sc->sc_fbh, &sc->sc_fb, &sc->sc_fbsize)) { 242 aprint_error("%s: failed to map the frame buffer.\n", 243 device_xname(sc->sc_dev)); 244 } 245 sc->sc_fbaddr = bus_space_vaddr(sc->sc_memt, sc->sc_fbh); 246 247 if (pci_mapreg_map(pa, 0x18, PCI_MAPREG_TYPE_MEM, 0, 248 &sc->sc_memt, &sc->sc_regh, &sc->sc_reg, &sc->sc_regsize)) { 249 aprint_error("%s: failed to map registers.\n", 250 device_xname(sc->sc_dev)); 251 } 252 253 /* 254 * XXX yeah, casting the fb address to uint32_t is formally wrong 255 * but as far as I know there are no mach64 with 64bit BARs 256 */ 257 aprint_normal("%s: %d MB aperture at 0x%08x\n", device_xname(self), 258 (int)(sc->sc_fbsize >> 20), (uint32_t)sc->sc_fb); 259 260 sc->sc_defaultscreen_descr = (struct wsscreen_descr){ 261 "default", 262 0, 0, 263 NULL, 264 8, 16, 265 WSSCREEN_WSCOLORS | WSSCREEN_HILIT, 266 NULL 267 }; 268 sc->sc_screens[0] = &sc->sc_defaultscreen_descr; 269 sc->sc_screenlist = (struct wsscreen_list){1, sc->sc_screens}; 270 sc->sc_mode = WSDISPLAYIO_MODE_EMUL; 271 sc->sc_locked = 0; 272 273 vcons_init(&sc->vd, sc, &sc->sc_defaultscreen_descr, 274 &r128fb_accessops); 275 sc->vd.init_screen = r128fb_init_screen; 276 277 /* init engine here */ 278 r128fb_init(sc); 279 280 ri = &sc->sc_console_screen.scr_ri; 281 282 j = 0; 283 for (i = 0; i < (1 << sc->sc_depth); i++) { 284 285 sc->sc_cmap_red[i] = rasops_cmap[j]; 286 sc->sc_cmap_green[i] = rasops_cmap[j + 1]; 287 sc->sc_cmap_blue[i] = rasops_cmap[j + 2]; 288 r128fb_putpalreg(sc, i, rasops_cmap[j], rasops_cmap[j + 1], 289 rasops_cmap[j + 2]); 290 j += 3; 291 } 292 293 if (is_console) { 294 vcons_init_screen(&sc->vd, &sc->sc_console_screen, 1, 295 &defattr); 296 sc->sc_console_screen.scr_flags |= VCONS_SCREEN_IS_STATIC; 297 298 r128fb_rectfill(sc, 0, 0, sc->sc_width, sc->sc_height, 299 ri->ri_devcmap[(defattr >> 16) & 0xff]); 300 sc->sc_defaultscreen_descr.textops = &ri->ri_ops; 301 sc->sc_defaultscreen_descr.capabilities = ri->ri_caps; 302 sc->sc_defaultscreen_descr.nrows = ri->ri_rows; 303 sc->sc_defaultscreen_descr.ncols = ri->ri_cols; 304 wsdisplay_cnattach(&sc->sc_defaultscreen_descr, ri, 0, 0, 305 defattr); 306 vcons_replay_msgbuf(&sc->sc_console_screen); 307 } else { 308 /* 309 * since we're not the console we can postpone the rest 310 * until someone actually allocates a screen for us 311 */ 312 (*ri->ri_ops.allocattr)(ri, 0, 0, 0, &defattr); 313 } 314 315 aa.console = is_console; 316 aa.scrdata = &sc->sc_screenlist; 317 aa.accessops = &r128fb_accessops; 318 aa.accesscookie = &sc->vd; 319 320 config_found(sc->sc_dev, &aa, wsemuldisplaydevprint); 321 322 /* no suspend/resume support yet */ 323 pmf_device_register(sc->sc_dev, NULL, NULL); 324 reg = bus_space_read_4(sc->sc_memt, sc->sc_regh, R128_LVDS_GEN_CNTL); 325 DPRINTF("reg: %08x\n", reg); 326 if (reg & R128_LVDS_ON) { 327 sc->sc_have_backlight = 1; 328 sc->sc_bl_level = 255 - 329 ((reg & R128_LEVEL_MASK) >> R128_LEVEL_SHIFT); 330 pmf_event_register(sc->sc_dev, PMFE_DISPLAY_BRIGHTNESS_UP, 331 r128fb_brightness_up, TRUE); 332 pmf_event_register(sc->sc_dev, PMFE_DISPLAY_BRIGHTNESS_DOWN, 333 r128fb_brightness_down, TRUE); 334 } else 335 sc->sc_have_backlight = 0; 336 } 337 338 static int 339 r128fb_ioctl(void *v, void *vs, u_long cmd, void *data, int flag, 340 struct lwp *l) 341 { 342 struct vcons_data *vd = v; 343 struct r128fb_softc *sc = vd->cookie; 344 struct wsdisplay_fbinfo *wdf; 345 struct vcons_screen *ms = vd->active; 346 347 switch (cmd) { 348 349 case WSDISPLAYIO_GTYPE: 350 *(u_int *)data = WSDISPLAY_TYPE_PCIMISC; 351 return 0; 352 353 /* PCI config read/write passthrough. */ 354 case PCI_IOC_CFGREAD: 355 case PCI_IOC_CFGWRITE: 356 return (pci_devioctl(sc->sc_pc, sc->sc_pcitag, 357 cmd, data, flag, l)); 358 359 case WSDISPLAYIO_GINFO: 360 if (ms == NULL) 361 return ENODEV; 362 wdf = (void *)data; 363 wdf->height = ms->scr_ri.ri_height; 364 wdf->width = ms->scr_ri.ri_width; 365 wdf->depth = ms->scr_ri.ri_depth; 366 wdf->cmsize = 256; 367 return 0; 368 369 case WSDISPLAYIO_GETCMAP: 370 return r128fb_getcmap(sc, 371 (struct wsdisplay_cmap *)data); 372 373 case WSDISPLAYIO_PUTCMAP: 374 return r128fb_putcmap(sc, 375 (struct wsdisplay_cmap *)data); 376 377 case WSDISPLAYIO_LINEBYTES: 378 *(u_int *)data = sc->sc_stride; 379 return 0; 380 381 case WSDISPLAYIO_SMODE: 382 { 383 int new_mode = *(int*)data; 384 385 /* notify the bus backend */ 386 if (new_mode != sc->sc_mode) { 387 sc->sc_mode = new_mode; 388 if(new_mode == WSDISPLAYIO_MODE_EMUL) { 389 r128fb_restore_palette(sc); 390 vcons_redraw_screen(ms); 391 } 392 } 393 } 394 return 0; 395 } 396 return EPASSTHROUGH; 397 } 398 399 static paddr_t 400 r128fb_mmap(void *v, void *vs, off_t offset, int prot) 401 { 402 struct vcons_data *vd = v; 403 struct r128fb_softc *sc = vd->cookie; 404 paddr_t pa; 405 406 /* 'regular' framebuffer mmap()ing */ 407 if (offset < sc->sc_fbsize) { 408 pa = bus_space_mmap(sc->sc_memt, sc->sc_fb + offset, 0, prot, 409 BUS_SPACE_MAP_LINEAR); 410 return pa; 411 } 412 413 /* 414 * restrict all other mappings to processes with superuser privileges 415 * or the kernel itself 416 */ 417 if (kauth_authorize_generic(kauth_cred_get(), KAUTH_GENERIC_ISSUSER, 418 NULL) != 0) { 419 aprint_normal("%s: mmap() rejected.\n", 420 device_xname(sc->sc_dev)); 421 return -1; 422 } 423 424 if ((offset >= sc->sc_fb) && (offset < (sc->sc_fb + sc->sc_fbsize))) { 425 pa = bus_space_mmap(sc->sc_memt, offset, 0, prot, 426 BUS_SPACE_MAP_LINEAR); 427 return pa; 428 } 429 430 if ((offset >= sc->sc_reg) && 431 (offset < (sc->sc_reg + sc->sc_regsize))) { 432 pa = bus_space_mmap(sc->sc_memt, offset, 0, prot, 433 BUS_SPACE_MAP_LINEAR); 434 return pa; 435 } 436 437 #ifdef PCI_MAGIC_IO_RANGE 438 /* allow mapping of IO space */ 439 if ((offset >= PCI_MAGIC_IO_RANGE) && 440 (offset < PCI_MAGIC_IO_RANGE + 0x10000)) { 441 pa = bus_space_mmap(sc->sc_iot, offset - PCI_MAGIC_IO_RANGE, 442 0, prot, BUS_SPACE_MAP_LINEAR); 443 return pa; 444 } 445 #endif 446 447 #ifdef OFB_ALLOW_OTHERS 448 if (offset >= 0x80000000) { 449 pa = bus_space_mmap(sc->sc_memt, offset, 0, prot, 450 BUS_SPACE_MAP_LINEAR); 451 return pa; 452 } 453 #endif 454 return -1; 455 } 456 457 static void 458 r128fb_init_screen(void *cookie, struct vcons_screen *scr, 459 int existing, long *defattr) 460 { 461 struct r128fb_softc *sc = cookie; 462 struct rasops_info *ri = &scr->scr_ri; 463 464 ri->ri_depth = sc->sc_depth; 465 ri->ri_width = sc->sc_width; 466 ri->ri_height = sc->sc_height; 467 ri->ri_stride = sc->sc_stride; 468 ri->ri_flg = RI_CENTER | RI_FULLCLEAR; 469 470 ri->ri_bits = (char *)sc->sc_fbaddr; 471 472 if (existing) { 473 ri->ri_flg |= RI_CLEAR; 474 } 475 476 rasops_init(ri, sc->sc_height / 8, sc->sc_width / 8); 477 ri->ri_caps = WSSCREEN_WSCOLORS; 478 479 rasops_reconfig(ri, sc->sc_height / ri->ri_font->fontheight, 480 sc->sc_width / ri->ri_font->fontwidth); 481 482 ri->ri_hw = scr; 483 ri->ri_ops.copyrows = r128fb_copyrows; 484 ri->ri_ops.copycols = r128fb_copycols; 485 ri->ri_ops.eraserows = r128fb_eraserows; 486 ri->ri_ops.erasecols = r128fb_erasecols; 487 ri->ri_ops.cursor = r128fb_cursor; 488 #if 0 489 ri->ri_ops.putchar = r128fb_putchar; 490 #endif 491 } 492 493 static int 494 r128fb_putcmap(struct r128fb_softc *sc, struct wsdisplay_cmap *cm) 495 { 496 u_char *r, *g, *b; 497 u_int index = cm->index; 498 u_int count = cm->count; 499 int i, error; 500 u_char rbuf[256], gbuf[256], bbuf[256]; 501 502 #ifdef R128FB_DEBUG 503 aprint_debug("putcmap: %d %d\n",index, count); 504 #endif 505 if (cm->index >= 256 || cm->count > 256 || 506 (cm->index + cm->count) > 256) 507 return EINVAL; 508 error = copyin(cm->red, &rbuf[index], count); 509 if (error) 510 return error; 511 error = copyin(cm->green, &gbuf[index], count); 512 if (error) 513 return error; 514 error = copyin(cm->blue, &bbuf[index], count); 515 if (error) 516 return error; 517 518 memcpy(&sc->sc_cmap_red[index], &rbuf[index], count); 519 memcpy(&sc->sc_cmap_green[index], &gbuf[index], count); 520 memcpy(&sc->sc_cmap_blue[index], &bbuf[index], count); 521 522 r = &sc->sc_cmap_red[index]; 523 g = &sc->sc_cmap_green[index]; 524 b = &sc->sc_cmap_blue[index]; 525 526 for (i = 0; i < count; i++) { 527 r128fb_putpalreg(sc, index, *r, *g, *b); 528 index++; 529 r++, g++, b++; 530 } 531 return 0; 532 } 533 534 static int 535 r128fb_getcmap(struct r128fb_softc *sc, struct wsdisplay_cmap *cm) 536 { 537 u_int index = cm->index; 538 u_int count = cm->count; 539 int error; 540 541 if (index >= 255 || count > 256 || index + count > 256) 542 return EINVAL; 543 544 error = copyout(&sc->sc_cmap_red[index], cm->red, count); 545 if (error) 546 return error; 547 error = copyout(&sc->sc_cmap_green[index], cm->green, count); 548 if (error) 549 return error; 550 error = copyout(&sc->sc_cmap_blue[index], cm->blue, count); 551 if (error) 552 return error; 553 554 return 0; 555 } 556 557 static void 558 r128fb_restore_palette(struct r128fb_softc *sc) 559 { 560 int i; 561 562 for (i = 0; i < (1 << sc->sc_depth); i++) { 563 r128fb_putpalreg(sc, i, sc->sc_cmap_red[i], 564 sc->sc_cmap_green[i], sc->sc_cmap_blue[i]); 565 } 566 } 567 568 static int 569 r128fb_putpalreg(struct r128fb_softc *sc, uint8_t idx, uint8_t r, uint8_t g, 570 uint8_t b) 571 { 572 uint32_t reg; 573 574 /* whack the DAC */ 575 reg = (r << 16) | (g << 8) | b; 576 bus_space_write_4(sc->sc_memt, sc->sc_regh, R128_PALETTE_INDEX, idx); 577 bus_space_write_4(sc->sc_memt, sc->sc_regh, R128_PALETTE_DATA, reg); 578 return 0; 579 } 580 581 static void 582 r128fb_init(struct r128fb_softc *sc) 583 { 584 uint32_t datatype; 585 586 r128fb_flush_engine(sc); 587 588 r128fb_wait(sc, 8); 589 bus_space_write_4(sc->sc_memt, sc->sc_regh, R128_CRTC_OFFSET, 0); 590 bus_space_write_4(sc->sc_memt, sc->sc_regh, R128_DEFAULT_OFFSET, 0); 591 bus_space_write_4(sc->sc_memt, sc->sc_regh, R128_DEFAULT_PITCH, 592 sc->sc_stride >> 3); 593 bus_space_write_4(sc->sc_memt, sc->sc_regh, R128_AUX_SC_CNTL, 0); 594 bus_space_write_4(sc->sc_memt, sc->sc_regh, 595 R128_DEFAULT_SC_BOTTOM_RIGHT, 596 R128_DEFAULT_SC_RIGHT_MAX | R128_DEFAULT_SC_BOTTOM_MAX); 597 bus_space_write_4(sc->sc_memt, sc->sc_regh, R128_SC_TOP_LEFT, 0); 598 bus_space_write_4(sc->sc_memt, sc->sc_regh, R128_SC_BOTTOM_RIGHT, 599 R128_DEFAULT_SC_RIGHT_MAX | R128_DEFAULT_SC_BOTTOM_MAX); 600 bus_space_write_4(sc->sc_memt, sc->sc_regh, R128_DP_DATATYPE, 601 R128_HOST_BIG_ENDIAN_EN); 602 603 r128fb_wait(sc, 5); 604 bus_space_write_4(sc->sc_memt, sc->sc_regh, R128_SRC_PITCH, 605 sc->sc_stride >> 3); 606 bus_space_write_4(sc->sc_memt, sc->sc_regh, R128_DST_PITCH, 607 sc->sc_stride >> 3); 608 bus_space_write_4(sc->sc_memt, sc->sc_regh, R128_SRC_OFFSET, 0); 609 bus_space_write_4(sc->sc_memt, sc->sc_regh, R128_DST_OFFSET, 0); 610 bus_space_write_4(sc->sc_memt, sc->sc_regh, R128_DP_WRITE_MASK, 611 0xffffffff); 612 613 switch (sc->sc_depth) { 614 case 8: 615 datatype = R128_GMC_DST_8BPP_CI; 616 break; 617 case 15: 618 datatype = R128_GMC_DST_15BPP; 619 break; 620 case 16: 621 datatype = R128_GMC_DST_16BPP; 622 break; 623 case 24: 624 datatype = R128_GMC_DST_24BPP; 625 break; 626 case 32: 627 datatype = R128_GMC_DST_32BPP; 628 break; 629 default: 630 aprint_error("%s: unsupported depth %d\n", 631 device_xname(sc->sc_dev), sc->sc_depth); 632 return; 633 } 634 sc->sc_master_cntl = R128_GMC_CLR_CMP_CNTL_DIS | 635 R128_GMC_AUX_CLIP_DIS | datatype; 636 637 r128fb_flush_engine(sc); 638 } 639 640 static void 641 r128fb_rectfill(struct r128fb_softc *sc, int x, int y, int wi, int he, 642 uint32_t colour) 643 { 644 645 r128fb_wait(sc, 6); 646 bus_space_write_4(sc->sc_memt, sc->sc_regh, R128_DP_GUI_MASTER_CNTL, 647 R128_GMC_BRUSH_SOLID_COLOR | 648 R128_GMC_SRC_DATATYPE_COLOR | 649 R128_ROP3_P | 650 sc->sc_master_cntl); 651 652 bus_space_write_4(sc->sc_memt, sc->sc_regh, R128_DP_BRUSH_FRGD_CLR, 653 colour); 654 bus_space_write_4(sc->sc_memt, sc->sc_regh, R128_DP_CNTL, 655 R128_DST_X_LEFT_TO_RIGHT | R128_DST_Y_TOP_TO_BOTTOM); 656 /* now feed it coordinates */ 657 bus_space_write_4(sc->sc_memt, sc->sc_regh, R128_DST_X_Y, 658 (x << 16) | y); 659 bus_space_write_4(sc->sc_memt, sc->sc_regh, R128_DST_WIDTH_HEIGHT, 660 (wi << 16) | he); 661 r128fb_flush_engine(sc); 662 } 663 664 static void 665 r128fb_bitblt(struct r128fb_softc *sc, int xs, int ys, int xd, int yd, 666 int wi, int he, int rop) 667 { 668 uint32_t dp_cntl = 0; 669 670 r128fb_wait(sc, 5); 671 bus_space_write_4(sc->sc_memt, sc->sc_regh, R128_DP_GUI_MASTER_CNTL, 672 R128_GMC_BRUSH_SOLID_COLOR | 673 R128_GMC_SRC_DATATYPE_COLOR | 674 rop | 675 R128_DP_SRC_SOURCE_MEMORY | 676 sc->sc_master_cntl); 677 678 if (yd <= ys) { 679 dp_cntl = R128_DST_Y_TOP_TO_BOTTOM; 680 } else { 681 ys += he - 1; 682 yd += he - 1; 683 } 684 if (xd <= xs) { 685 dp_cntl |= R128_DST_X_LEFT_TO_RIGHT; 686 } else { 687 xs += wi - 1; 688 xd += wi - 1; 689 } 690 bus_space_write_4(sc->sc_memt, sc->sc_regh, R128_DP_CNTL, dp_cntl); 691 692 /* now feed it coordinates */ 693 bus_space_write_4(sc->sc_memt, sc->sc_regh, R128_SRC_X_Y, 694 (xs << 16) | ys); 695 bus_space_write_4(sc->sc_memt, sc->sc_regh, R128_DST_X_Y, 696 (xd << 16) | yd); 697 bus_space_write_4(sc->sc_memt, sc->sc_regh, R128_DST_WIDTH_HEIGHT, 698 (wi << 16) | he); 699 r128fb_flush_engine(sc); 700 } 701 702 static void 703 r128fb_cursor(void *cookie, int on, int row, int col) 704 { 705 struct rasops_info *ri = cookie; 706 struct vcons_screen *scr = ri->ri_hw; 707 struct r128fb_softc *sc = scr->scr_cookie; 708 int x, y, wi, he; 709 710 wi = ri->ri_font->fontwidth; 711 he = ri->ri_font->fontheight; 712 713 if (sc->sc_mode == WSDISPLAYIO_MODE_EMUL) { 714 x = ri->ri_ccol * wi + ri->ri_xorigin; 715 y = ri->ri_crow * he + ri->ri_yorigin; 716 if (ri->ri_flg & RI_CURSOR) { 717 r128fb_bitblt(sc, x, y, x, y, wi, he, R128_ROP3_Dn); 718 ri->ri_flg &= ~RI_CURSOR; 719 } 720 ri->ri_crow = row; 721 ri->ri_ccol = col; 722 if (on) { 723 x = ri->ri_ccol * wi + ri->ri_xorigin; 724 y = ri->ri_crow * he + ri->ri_yorigin; 725 r128fb_bitblt(sc, x, y, x, y, wi, he, R128_ROP3_Dn); 726 ri->ri_flg |= RI_CURSOR; 727 } 728 } else { 729 scr->scr_ri.ri_crow = row; 730 scr->scr_ri.ri_ccol = col; 731 scr->scr_ri.ri_flg &= ~RI_CURSOR; 732 } 733 734 } 735 736 #if 0 737 static void 738 r128fb_putchar(void *cookie, int row, int col, u_int c, long attr) 739 { 740 } 741 #endif 742 743 static void 744 r128fb_copycols(void *cookie, int row, int srccol, int dstcol, int ncols) 745 { 746 struct rasops_info *ri = cookie; 747 struct vcons_screen *scr = ri->ri_hw; 748 struct r128fb_softc *sc = scr->scr_cookie; 749 int32_t xs, xd, y, width, height; 750 751 if ((sc->sc_locked == 0) && (sc->sc_mode == WSDISPLAYIO_MODE_EMUL)) { 752 xs = ri->ri_xorigin + ri->ri_font->fontwidth * srccol; 753 xd = ri->ri_xorigin + ri->ri_font->fontwidth * dstcol; 754 y = ri->ri_yorigin + ri->ri_font->fontheight * row; 755 width = ri->ri_font->fontwidth * ncols; 756 height = ri->ri_font->fontheight; 757 r128fb_bitblt(sc, xs, y, xd, y, width, height, R128_ROP3_S); 758 } 759 } 760 761 static void 762 r128fb_erasecols(void *cookie, int row, int startcol, int ncols, long fillattr) 763 { 764 struct rasops_info *ri = cookie; 765 struct vcons_screen *scr = ri->ri_hw; 766 struct r128fb_softc *sc = scr->scr_cookie; 767 int32_t x, y, width, height, fg, bg, ul; 768 769 if ((sc->sc_locked == 0) && (sc->sc_mode == WSDISPLAYIO_MODE_EMUL)) { 770 x = ri->ri_xorigin + ri->ri_font->fontwidth * startcol; 771 y = ri->ri_yorigin + ri->ri_font->fontheight * row; 772 width = ri->ri_font->fontwidth * ncols; 773 height = ri->ri_font->fontheight; 774 rasops_unpack_attr(fillattr, &fg, &bg, &ul); 775 776 r128fb_rectfill(sc, x, y, width, height, ri->ri_devcmap[bg]); 777 } 778 } 779 780 static void 781 r128fb_copyrows(void *cookie, int srcrow, int dstrow, int nrows) 782 { 783 struct rasops_info *ri = cookie; 784 struct vcons_screen *scr = ri->ri_hw; 785 struct r128fb_softc *sc = scr->scr_cookie; 786 int32_t x, ys, yd, width, height; 787 788 if ((sc->sc_locked == 0) && (sc->sc_mode == WSDISPLAYIO_MODE_EMUL)) { 789 x = ri->ri_xorigin; 790 ys = ri->ri_yorigin + ri->ri_font->fontheight * srcrow; 791 yd = ri->ri_yorigin + ri->ri_font->fontheight * dstrow; 792 width = ri->ri_emuwidth; 793 height = ri->ri_font->fontheight*nrows; 794 r128fb_bitblt(sc, x, ys, x, yd, width, height, R128_ROP3_S); 795 } 796 } 797 798 static void 799 r128fb_eraserows(void *cookie, int row, int nrows, long fillattr) 800 { 801 struct rasops_info *ri = cookie; 802 struct vcons_screen *scr = ri->ri_hw; 803 struct r128fb_softc *sc = scr->scr_cookie; 804 int32_t x, y, width, height, fg, bg, ul; 805 806 if ((sc->sc_locked == 0) && (sc->sc_mode == WSDISPLAYIO_MODE_EMUL)) { 807 x = ri->ri_xorigin; 808 y = ri->ri_yorigin + ri->ri_font->fontheight * row; 809 width = ri->ri_emuwidth; 810 height = ri->ri_font->fontheight * nrows; 811 rasops_unpack_attr(fillattr, &fg, &bg, &ul); 812 813 r128fb_rectfill(sc, x, y, width, height, ri->ri_devcmap[bg]); 814 } 815 } 816 817 static void 818 r128fb_set_backlight(struct r128fb_softc *sc, int level) 819 { 820 uint32_t reg; 821 822 if (level > 255) level = 255; 823 if (level < 0) level = 0; 824 if (level == sc->sc_bl_level) 825 return; 826 sc->sc_bl_level = level; 827 level = 255 - level; 828 reg = bus_space_read_4(sc->sc_memt, sc->sc_regh, R128_LVDS_GEN_CNTL); 829 reg &= ~R128_LEVEL_MASK; 830 reg |= level << R128_LEVEL_SHIFT; 831 bus_space_write_4(sc->sc_memt, sc->sc_regh, R128_LVDS_GEN_CNTL, reg); 832 DPRINTF("level: %d reg %08x\n", level, reg); 833 } 834 835 836 static void 837 r128fb_brightness_up(device_t dev) 838 { 839 struct r128fb_softc *sc = device_private(dev); 840 841 r128fb_set_backlight(sc, sc->sc_bl_level + 8); 842 } 843 844 static void 845 r128fb_brightness_down(device_t dev) 846 { 847 struct r128fb_softc *sc = device_private(dev); 848 849 r128fb_set_backlight(sc, sc->sc_bl_level - 8); 850 } 851