1 /* $NetBSD: hyperfb.c,v 1.17 2024/10/01 07:44:22 macallan Exp $ */ 2 3 /* 4 * Copyright (c) 2024 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 OR HIS RELATIVES BE LIABLE FOR ANY DIRECT, 20 * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES 21 * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR 22 * SERVICES; LOSS OF MIND, USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 23 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, 24 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING 25 * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF 26 * THE POSSIBILITY OF SUCH DAMAGE. 27 */ 28 29 /* 30 * a native driver for HCRX / hyperdrive cards 31 * tested on a HCRX24Z in a C360 only so far 32 */ 33 34 #include <sys/cdefs.h> 35 __KERNEL_RCSID(0, "$NetBSD: hyperfb.c,v 1.17 2024/10/01 07:44:22 macallan Exp $"); 36 37 #include "opt_cputype.h" 38 #include "opt_hyperfb.h" 39 40 #include <sys/param.h> 41 #include <sys/systm.h> 42 #include <sys/device.h> 43 44 #include <sys/bus.h> 45 #include <machine/cpu.h> 46 #include <machine/iomod.h> 47 #include <machine/autoconf.h> 48 49 #include <dev/wscons/wsdisplayvar.h> 50 #include <dev/wscons/wsconsio.h> 51 #include <dev/wsfont/wsfont.h> 52 #include <dev/rasops/rasops.h> 53 #include <dev/wscons/wsdisplay_vconsvar.h> 54 #include <dev/wscons/wsdisplay_glyphcachevar.h> 55 56 #include <dev/ic/stireg.h> 57 #include <dev/ic/stivar.h> 58 59 #include <hppa/dev/cpudevs.h> 60 #include <hppa/hppa/machdep.h> 61 62 #ifdef HYPERFB_DEBUG 63 #define DPRINTF printf 64 #else 65 #define DPRINTF if (0) printf 66 #endif 67 68 #define STI_ROMSIZE (sizeof(struct sti_dd) * 4) 69 70 #define HCRX_FBOFFSET 0x01000000 71 #define HCRX_FBLEN 0x01000000 72 #define HCRX_REGOFFSET 0x00100000 73 #define HCRX_REGLEN 0x00280000 74 75 #define HCRX_CONFIG_24BIT 0x100 76 77 int hyperfb_match(device_t, cfdata_t, void *); 78 void hyperfb_attach(device_t, device_t, void *); 79 80 struct hyperfb_softc { 81 device_t sc_dev; 82 bus_space_tag_t sc_iot; 83 bus_addr_t sc_base; 84 bus_space_handle_t sc_hfb, sc_hreg; 85 void *sc_fb; 86 87 int sc_width, sc_height; 88 int sc_locked, sc_is_console, sc_24bit; 89 struct vcons_screen sc_console_screen; 90 struct wsscreen_descr sc_defaultscreen_descr; 91 const struct wsscreen_descr *sc_screens[1]; 92 struct wsscreen_list sc_screenlist; 93 struct vcons_data vd; 94 int sc_mode; 95 u_char sc_cmap_red[256]; 96 u_char sc_cmap_green[256]; 97 u_char sc_cmap_blue[256]; 98 kmutex_t sc_hwlock; 99 uint32_t sc_hwmode; 100 #define HW_FB 0 101 #define HW_FILL 1 102 #define HW_BLIT 2 103 #define HW_SFILL 3 104 /* cursor stuff */ 105 int sc_cursor_x, sc_cursor_y; 106 int sc_hot_x, sc_hot_y, sc_enabled; 107 int sc_video_on; 108 glyphcache sc_gc; 109 }; 110 111 extern struct cfdriver hyperfb_cd; 112 113 CFATTACH_DECL_NEW(hyperfb, sizeof(struct hyperfb_softc), hyperfb_match, 114 hyperfb_attach, NULL, NULL); 115 116 static inline void hyperfb_setup_fb(struct hyperfb_softc *); 117 static inline void hyperfb_setup_fb24(struct hyperfb_softc *); 118 static void hyperfb_init_screen(void *, struct vcons_screen *, 119 int, long *); 120 static int hyperfb_ioctl(void *, void *, u_long, void *, int, 121 struct lwp *); 122 static paddr_t hyperfb_mmap(void *, void *, off_t, int); 123 124 static int hyperfb_putcmap(struct hyperfb_softc *, 125 struct wsdisplay_cmap *); 126 static int hyperfb_getcmap(struct hyperfb_softc *, 127 struct wsdisplay_cmap *); 128 static void hyperfb_restore_palette(struct hyperfb_softc *); 129 static int hyperfb_putpalreg(struct hyperfb_softc *, uint8_t, uint8_t, 130 uint8_t, uint8_t); 131 void hyperfb_setup(struct hyperfb_softc *); 132 static void hyperfb_set_video(struct hyperfb_softc *, int); 133 134 static void hyperfb_rectfill(struct hyperfb_softc *, int, int, int, int, 135 uint32_t); 136 static void hyperfb_bitblt(void *, int, int, int, int, int, 137 int, int); 138 139 static void hyperfb_cursor(void *, int, int, int); 140 static void hyperfb_putchar(void *, int, int, u_int, long); 141 static void hyperfb_copycols(void *, int, int, int, int); 142 static void hyperfb_erasecols(void *, int, int, int, long); 143 static void hyperfb_copyrows(void *, int, int, int); 144 static void hyperfb_eraserows(void *, int, int, long); 145 146 static void hyperfb_move_cursor(struct hyperfb_softc *, int, int); 147 static int hyperfb_do_cursor(struct hyperfb_softc *, 148 struct wsdisplay_cursor *); 149 150 static inline void hyperfb_wait_fifo(struct hyperfb_softc *, uint32_t); 151 152 #define ngle_bt458_write(sc, r, v) \ 153 hyperfb_write4(sc, NGLE_REG_RAMDAC + ((r) << 2), (v) << 24) 154 155 struct wsdisplay_accessops hyperfb_accessops = { 156 hyperfb_ioctl, 157 hyperfb_mmap, 158 NULL, /* alloc_screen */ 159 NULL, /* free_screen */ 160 NULL, /* show_screen */ 161 NULL, /* load_font */ 162 NULL, /* pollc */ 163 NULL /* scroll */ 164 }; 165 166 static inline uint32_t 167 hyperfb_read4(struct hyperfb_softc *sc, uint32_t offset) 168 { 169 return bus_space_read_4(sc->sc_iot, sc->sc_hreg, offset); 170 } 171 172 static inline uint8_t 173 hyperfb_read1(struct hyperfb_softc *sc, uint32_t offset) 174 { 175 return bus_space_read_1(sc->sc_iot, sc->sc_hreg, offset); 176 } 177 178 static inline void 179 hyperfb_write4(struct hyperfb_softc *sc, uint32_t offset, uint32_t val) 180 { 181 bus_space_write_4(sc->sc_iot, sc->sc_hreg, offset, val); 182 } 183 184 static inline void 185 hyperfb_write1(struct hyperfb_softc *sc, uint32_t offset, uint8_t val) 186 { 187 bus_space_write_1(sc->sc_iot, sc->sc_hreg, offset, val); 188 } 189 190 static inline void 191 hyperfb_wait(struct hyperfb_softc *sc) 192 { 193 uint8_t stat; 194 195 do { 196 stat = hyperfb_read1(sc, NGLE_REG_15b0); 197 if (stat == 0) 198 stat = hyperfb_read1(sc, NGLE_REG_15b0); 199 } while (stat != 0); 200 } 201 202 static inline void 203 hyperfb_wait_fifo(struct hyperfb_softc *sc, uint32_t slots) 204 { 205 uint32_t reg; 206 207 do { 208 reg = hyperfb_read4(sc, NGLE_REG_34); 209 } while (reg < slots); 210 } 211 212 static inline void 213 hyperfb_setup_fb(struct hyperfb_softc *sc) 214 { 215 216 /* 217 * turns out the plane mask is applied to everything, including 218 * direct framebuffer writes, so make sure we always set it 219 */ 220 hyperfb_wait(sc); 221 if ((sc->sc_mode != WSDISPLAYIO_MODE_EMUL) && sc->sc_24bit) { 222 hyperfb_write4(sc, NGLE_REG_10, 223 BA(FractDcd, Otc24, Ots08, AddrLong, 0, BINapp0F8, 0)); 224 hyperfb_write4(sc, NGLE_REG_13, 0xffffffff); 225 } else { 226 hyperfb_write4(sc, NGLE_REG_10, 227 BA(IndexedDcd, Otc04, Ots08, AddrByte, 0, BINovly, 0)); 228 hyperfb_write4(sc, NGLE_REG_13, 0xff); 229 } 230 hyperfb_write4(sc, NGLE_REG_14, 0x83000300); 231 hyperfb_wait(sc); 232 hyperfb_write1(sc, NGLE_REG_16b1, 1); 233 sc->sc_hwmode = HW_FB; 234 } 235 236 static inline void 237 hyperfb_setup_fb24(struct hyperfb_softc *sc) 238 { 239 240 hyperfb_wait(sc); 241 hyperfb_write4(sc, NGLE_REG_10, 242 BA(FractDcd, Otc24, Ots08, AddrLong, 0, BINapp0F8, 0)); 243 hyperfb_write4(sc, NGLE_REG_13, 0xffffffff); 244 hyperfb_write4(sc, NGLE_REG_14, 0x83000300); 245 //IBOvals(RopSrc,0,BitmapExtent08,0,DataDynamic,MaskDynamic,0,0) 246 hyperfb_wait(sc); 247 hyperfb_write1(sc, NGLE_REG_16b1, 1); 248 sc->sc_hwmode = HW_FB; 249 } 250 251 int 252 hyperfb_match(device_t parent, cfdata_t cf, void *aux) 253 { 254 struct confargs *ca = aux; 255 bus_space_handle_t romh; 256 paddr_t rom; 257 uint32_t id = 0; 258 u_char devtype; 259 int rv = 0, romunmapped = 0; 260 261 if (ca->ca_type.iodc_type != HPPA_TYPE_FIO) 262 return 0; 263 264 /* these need further checking for the graphics id */ 265 if (ca->ca_type.iodc_sv_model != HPPA_FIO_GSGC && 266 ca->ca_type.iodc_sv_model != HPPA_FIO_SGC) 267 return 0; 268 269 if (ca->ca_naddrs > 0) 270 rom = ca->ca_addrs[0].addr; 271 else 272 rom = ca->ca_hpa; 273 274 DPRINTF("%s: hpa=%x, rom=%x\n", __func__, (uint)ca->ca_hpa, 275 (uint)rom); 276 277 /* if it does not map, probably part of the lasi space */ 278 if (bus_space_map(ca->ca_iot, rom, STI_ROMSIZE, 0, &romh)) { 279 DPRINTF("%s: can't map rom space (%d)\n", __func__, rv); 280 281 if ((rom & HPPA_IOBEGIN) == HPPA_IOBEGIN) { 282 romh = rom; 283 romunmapped++; 284 } else { 285 /* in this case nobody has no freaking idea */ 286 return 0; 287 } 288 } 289 290 devtype = bus_space_read_1(ca->ca_iot, romh, 3); 291 DPRINTF("%s: devtype=%d\n", __func__, devtype); 292 rv = 1; 293 switch (devtype) { 294 case STI_DEVTYPE4: 295 id = bus_space_read_4(ca->ca_iot, romh, STI_DEV4_DD_GRID); 296 break; 297 case STI_DEVTYPE1: 298 id = (bus_space_read_1(ca->ca_iot, romh, STI_DEV1_DD_GRID 299 + 3) << 24) | 300 (bus_space_read_1(ca->ca_iot, romh, STI_DEV1_DD_GRID 301 + 7) << 16) | 302 (bus_space_read_1(ca->ca_iot, romh, STI_DEV1_DD_GRID 303 + 11) << 8) | 304 (bus_space_read_1(ca->ca_iot, romh, STI_DEV1_DD_GRID 305 + 15)); 306 break; 307 default: 308 DPRINTF("%s: unknown type (%x)\n", __func__, devtype); 309 rv = 0; 310 } 311 312 if (id == STI_DD_HCRX) 313 rv = 100; /* beat out sti */ 314 315 ca->ca_addrs[ca->ca_naddrs].addr = rom; 316 ca->ca_addrs[ca->ca_naddrs].size = sti_rom_size(ca->ca_iot, romh); 317 ca->ca_naddrs++; 318 319 if (!romunmapped) 320 bus_space_unmap(ca->ca_iot, romh, STI_ROMSIZE); 321 return rv; 322 } 323 324 void 325 hyperfb_attach(device_t parent, device_t self, void *aux) 326 { 327 struct hyperfb_softc *sc = device_private(self); 328 struct confargs *ca = aux; 329 struct rasops_info *ri; 330 struct wsemuldisplaydev_attach_args aa; 331 bus_space_handle_t hrom; 332 hppa_hpa_t consaddr; 333 long defattr; 334 int pagezero_cookie; 335 paddr_t rom; 336 uint32_t config; 337 338 pagezero_cookie = hppa_pagezero_map(); 339 consaddr = (hppa_hpa_t)PAGE0->mem_cons.pz_hpa; 340 hppa_pagezero_unmap(pagezero_cookie); 341 342 sc->sc_dev = self; 343 sc->sc_base = ca->ca_hpa; 344 sc->sc_iot = ca->ca_iot; 345 sc->sc_is_console =(ca->ca_hpa == consaddr); 346 sc->sc_width = 1280; 347 sc->sc_height = 1024; 348 349 /* we can *not* be interrupted when doing colour map accesses */ 350 mutex_init(&sc->sc_hwlock, MUTEX_DEFAULT, IPL_HIGH); 351 352 /* we stashed rom addr/len into the last slot during probe */ 353 rom = ca->ca_addrs[ca->ca_naddrs - 1].addr; 354 355 if (bus_space_map(sc->sc_iot, 356 sc->sc_base + HCRX_FBOFFSET, HCRX_FBLEN, 357 BUS_SPACE_MAP_LINEAR | BUS_SPACE_MAP_PREFETCHABLE, 358 &sc->sc_hfb)) { 359 aprint_error_dev(sc->sc_dev, 360 "failed to map the framebuffer\n"); 361 return; 362 } 363 sc->sc_fb = bus_space_vaddr(sc->sc_iot, sc->sc_hfb); 364 365 if (bus_space_map(sc->sc_iot, 366 sc->sc_base + HCRX_REGOFFSET, HCRX_REGLEN, 0, &sc->sc_hreg)) { 367 aprint_error_dev(sc->sc_dev, "failed to map registers\n"); 368 return; 369 } 370 371 /* 372 * we really only need the first word so we can grab the config bits 373 * between the bytes 374 */ 375 if (bus_space_map(sc->sc_iot, rom, 4, 0, &hrom)) { 376 aprint_error_dev(sc->sc_dev, 377 "failed to map ROM, assuming 8bit\n"); 378 config = 0; 379 } else { 380 /* alright, we got the ROM. now do the idle dance. */ 381 volatile uint32_t r = hyperfb_read4(sc, NGLE_REG_15); 382 __USE(r); 383 hyperfb_wait(sc); 384 config = bus_space_read_4(sc->sc_iot, hrom, 0); 385 bus_space_unmap(sc->sc_iot, hrom, 4); 386 } 387 sc->sc_24bit = ((config & HCRX_CONFIG_24BIT) != 0); 388 389 printf(" %s\n", sc->sc_24bit ? "HCRX24" : "HCRX"); 390 #ifdef HP7300LC_CPU 391 /* 392 * PCXL2: enable accel I/O for this space, see PCX-L2 ERS "ACCEL_IO". 393 * "pcxl2_ers.{ps,pdf}", (section / chapter . rel. page / abs. page) 394 * 8.7.4 / 8-12 / 92, 11.3.14 / 11-14 / 122 and 14.8 / 14-5 / 203. 395 */ 396 if (hppa_cpu_info->hci_cputype == hpcxl2 397 && ca->ca_hpa >= PCXL2_ACCEL_IO_START 398 && ca->ca_hpa <= PCXL2_ACCEL_IO_END) 399 eaio_l2(PCXL2_ACCEL_IO_ADDR2MASK(ca->ca_hpa)); 400 #endif /* HP7300LC_CPU */ 401 402 sc->sc_mode = WSDISPLAYIO_MODE_EMUL; 403 sc->sc_locked = 0; 404 405 hyperfb_setup(sc); 406 hyperfb_setup_fb(sc); 407 408 sc->sc_defaultscreen_descr = (struct wsscreen_descr){ 409 "default", 410 0, 0, 411 NULL, 412 8, 16, 413 WSSCREEN_WSCOLORS | WSSCREEN_HILIT | WSSCREEN_UNDERLINE | 414 WSSCREEN_RESIZE, 415 NULL 416 }; 417 418 sc->sc_screens[0] = &sc->sc_defaultscreen_descr; 419 sc->sc_screenlist = (struct wsscreen_list){1, sc->sc_screens}; 420 421 vcons_init(&sc->vd, sc, &sc->sc_defaultscreen_descr, 422 &hyperfb_accessops); 423 sc->vd.init_screen = hyperfb_init_screen; 424 sc->vd.show_screen_cookie = &sc->sc_gc; 425 sc->vd.show_screen_cb = glyphcache_adapt; 426 427 ri = &sc->sc_console_screen.scr_ri; 428 429 //sc->sc_gc.gc_bitblt = hyperfb_bitblt; 430 //sc->sc_gc.gc_blitcookie = sc; 431 //sc->sc_gc.gc_rop = RopSrc; 432 433 if (sc->sc_is_console) { 434 vcons_init_screen(&sc->vd, &sc->sc_console_screen, 1, 435 &defattr); 436 sc->sc_console_screen.scr_flags |= VCONS_SCREEN_IS_STATIC; 437 438 sc->sc_defaultscreen_descr.textops = &ri->ri_ops; 439 sc->sc_defaultscreen_descr.capabilities = ri->ri_caps; 440 sc->sc_defaultscreen_descr.nrows = ri->ri_rows; 441 sc->sc_defaultscreen_descr.ncols = ri->ri_cols; 442 443 #if 0 444 glyphcache_init(&sc->sc_gc, sc->sc_height + 5, 445 sc->sc_scr.fbheight - sc->sc_height - 5, 446 sc->sc_scr.fbwidth, 447 ri->ri_font->fontwidth, 448 ri->ri_font->fontheight, 449 defattr); 450 #endif 451 wsdisplay_cnattach(&sc->sc_defaultscreen_descr, ri, 0, 0, 452 defattr); 453 454 hyperfb_rectfill(sc, 0, 0, sc->sc_width, sc->sc_height, 455 ri->ri_devcmap[(defattr >> 16) & 0xff]); 456 457 vcons_replay_msgbuf(&sc->sc_console_screen); 458 } else { 459 /* 460 * since we're not the console we can postpone the rest 461 * until someone actually allocates a screen for us 462 */ 463 if (sc->sc_console_screen.scr_ri.ri_rows == 0) { 464 /* do some minimal setup to avoid weirdnesses later */ 465 vcons_init_screen(&sc->vd, &sc->sc_console_screen, 1, 466 &defattr); 467 } else 468 (*ri->ri_ops.allocattr)(ri, 0, 0, 0, &defattr); 469 470 #if 0 471 glyphcache_init(&sc->sc_gc, sc->sc_height + 5, 472 sc->sc_scr.fbheight - sc->sc_height - 5, 473 sc->sc_scr.fbwidth, 474 ri->ri_font->fontwidth, 475 ri->ri_font->fontheight, 476 defattr); 477 #endif 478 } 479 480 hyperfb_restore_palette(sc); 481 482 /* no suspend/resume support yet */ 483 if (!pmf_device_register(sc->sc_dev, NULL, NULL)) 484 aprint_error_dev(sc->sc_dev, 485 "couldn't establish power handler\n"); 486 487 aa.console = sc->sc_is_console; 488 aa.scrdata = &sc->sc_screenlist; 489 aa.accessops = &hyperfb_accessops; 490 aa.accesscookie = &sc->vd; 491 492 config_found(sc->sc_dev, &aa, wsemuldisplaydevprint, CFARGS_NONE); 493 494 hyperfb_setup_fb(sc); 495 496 #ifdef HYPERFB_DEBUG 497 int i; 498 499 hyperfb_wait_fifo(sc, 4); 500 /* transfer data */ 501 hyperfb_write4(sc, NGLE_REG_8, 0xff00ff00); 502 /* plane mask */ 503 hyperfb_write4(sc, NGLE_REG_13, 0xff); 504 /* bitmap op */ 505 hyperfb_write4(sc, NGLE_REG_14, 506 IBOvals(RopSrc, 0, BitmapExtent08, 0, DataDynamic, MaskOtc, 1, 0)); 507 /* dst bitmap access */ 508 hyperfb_write4(sc, NGLE_REG_11, 509 BA(IndexedDcd, Otc32, OtsIndirect, AddrLong, 0, BINovly, 0)); 510 511 hyperfb_wait_fifo(sc, 3); 512 hyperfb_write4(sc, NGLE_REG_35, 0xe0); 513 hyperfb_write4(sc, NGLE_REG_36, 0x1c); 514 /* dst XY */ 515 hyperfb_write4(sc, NGLE_REG_6, (2 << 16) | 902); 516 /* len XY start */ 517 hyperfb_write4(sc, NGLE_REG_9, (28 << 16) | 32); 518 519 for (i = 0; i < 32; i++) 520 hyperfb_write4(sc, NGLE_REG_8, (i & 4) ? 0xff00ff00 : 0x00ff00ff); 521 522 hyperfb_rectfill(sc, 70, 902, 16, 32, 0xe0); 523 hyperfb_rectfill(sc, 50, 902, 16, 32, 0x1c); 524 #endif 525 } 526 527 static void 528 hyperfb_init_screen(void *cookie, struct vcons_screen *scr, 529 int existing, long *defattr) 530 { 531 struct hyperfb_softc *sc = cookie; 532 struct rasops_info *ri = &scr->scr_ri; 533 534 ri->ri_depth = 8; 535 ri->ri_width = 1280; 536 #ifdef HYPERFB_DEBUG 537 ri->ri_height = 900; 538 #else 539 ri->ri_height = 1024; 540 #endif 541 ri->ri_stride = 2048; 542 ri->ri_flg = RI_CENTER | RI_8BIT_IS_RGB /*| 543 RI_ENABLE_ALPHA | RI_PREFER_ALPHA*/; 544 545 ri->ri_bits = (void *)sc->sc_fb; 546 rasops_init(ri, 0, 0); 547 ri->ri_caps = WSSCREEN_WSCOLORS | WSSCREEN_HILIT | WSSCREEN_UNDERLINE | 548 WSSCREEN_RESIZE; 549 scr->scr_flags |= VCONS_LOADFONT; 550 551 rasops_reconfig(ri, sc->sc_height / ri->ri_font->fontheight, 552 sc->sc_width / ri->ri_font->fontwidth); 553 554 ri->ri_hw = scr; 555 556 ri->ri_ops.copyrows = hyperfb_copyrows; 557 ri->ri_ops.copycols = hyperfb_copycols; 558 ri->ri_ops.eraserows = hyperfb_eraserows; 559 ri->ri_ops.erasecols = hyperfb_erasecols; 560 ri->ri_ops.cursor = hyperfb_cursor; 561 ri->ri_ops.putchar = hyperfb_putchar; 562 } 563 564 static int 565 hyperfb_ioctl(void *v, void *vs, u_long cmd, void *data, int flag, 566 struct lwp *l) 567 { 568 struct vcons_data *vd = v; 569 struct hyperfb_softc *sc = vd->cookie; 570 struct wsdisplay_fbinfo *wdf; 571 struct vcons_screen *ms = vd->active; 572 573 switch (cmd) { 574 case WSDISPLAYIO_GTYPE: 575 *(u_int *)data = WSDISPLAY_TYPE_STI; 576 return 0; 577 578 case GCID: 579 *(u_int *)data = STI_DD_HCRX; 580 return 0; 581 582 case WSDISPLAYIO_GINFO: 583 if (ms == NULL) 584 return ENODEV; 585 wdf = (void *)data; 586 wdf->height = ms->scr_ri.ri_height; 587 wdf->width = sc->sc_24bit ? ms->scr_ri.ri_width << 2 588 : ms->scr_ri.ri_width; 589 wdf->depth = ms->scr_ri.ri_depth; 590 wdf->cmsize = 256; 591 return 0; 592 593 case WSDISPLAYIO_GETCMAP: 594 return hyperfb_getcmap(sc, 595 (struct wsdisplay_cmap *)data); 596 597 case WSDISPLAYIO_PUTCMAP: 598 return hyperfb_putcmap(sc, 599 (struct wsdisplay_cmap *)data); 600 case WSDISPLAYIO_LINEBYTES: 601 *(u_int *)data = sc->sc_24bit ? 8192 : 2048; 602 return 0; 603 604 case WSDISPLAYIO_SMODE: { 605 int new_mode = *(int*)data; 606 if (new_mode != sc->sc_mode) { 607 sc->sc_mode = new_mode; 608 if (new_mode == WSDISPLAYIO_MODE_EMUL) { 609 hyperfb_setup(sc); 610 hyperfb_restore_palette(sc); 611 #if 0 612 glyphcache_wipe(&sc->sc_gc); 613 #endif 614 hyperfb_rectfill(sc, 0, 0, sc->sc_width, 615 sc->sc_height, ms->scr_ri.ri_devcmap[ 616 (ms->scr_defattr >> 16) & 0xff]); 617 vcons_redraw_screen(ms); 618 hyperfb_set_video(sc, 1); 619 } else { 620 hyperfb_setup(sc); 621 hyperfb_rectfill(sc, 0, 0, sc->sc_width, 622 sc->sc_height, 0xff); 623 hyperfb_setup_fb24(sc); 624 } 625 } 626 } 627 return 0; 628 629 case WSDISPLAYIO_GET_FBINFO: { 630 struct wsdisplayio_fbinfo *fbi = data; 631 int ret; 632 633 ret = wsdisplayio_get_fbinfo(&ms->scr_ri, fbi); 634 fbi->fbi_fbsize = sc->sc_height * 2048; 635 if (sc->sc_24bit) { 636 fbi->fbi_stride = 8192; 637 fbi->fbi_bitsperpixel = 32; 638 fbi->fbi_pixeltype = WSFB_RGB; 639 fbi->fbi_subtype.fbi_rgbmasks.red_offset = 16; 640 fbi->fbi_subtype.fbi_rgbmasks.red_size = 8; 641 fbi->fbi_subtype.fbi_rgbmasks.green_offset = 8; 642 fbi->fbi_subtype.fbi_rgbmasks.green_size = 8; 643 fbi->fbi_subtype.fbi_rgbmasks.blue_offset = 0; 644 fbi->fbi_subtype.fbi_rgbmasks.blue_size = 8; 645 fbi->fbi_subtype.fbi_rgbmasks.alpha_size = 0; 646 fbi->fbi_fbsize = sc->sc_height * 8192; 647 } 648 return ret; 649 } 650 651 case WSDISPLAYIO_GCURPOS: { 652 struct wsdisplay_curpos *cp = (void *)data; 653 654 cp->x = sc->sc_cursor_x; 655 cp->y = sc->sc_cursor_y; 656 } 657 return 0; 658 659 case WSDISPLAYIO_SCURPOS: { 660 struct wsdisplay_curpos *cp = (void *)data; 661 662 hyperfb_move_cursor(sc, cp->x, cp->y); 663 } 664 return 0; 665 666 case WSDISPLAYIO_GCURMAX: { 667 struct wsdisplay_curpos *cp = (void *)data; 668 669 cp->x = 64; 670 cp->y = 64; 671 } 672 return 0; 673 674 case WSDISPLAYIO_SCURSOR: { 675 struct wsdisplay_cursor *cursor = (void *)data; 676 677 return hyperfb_do_cursor(sc, cursor); 678 } 679 680 case WSDISPLAYIO_SVIDEO: 681 hyperfb_set_video(sc, *(int *)data); 682 return 0; 683 case WSDISPLAYIO_GVIDEO: 684 *(u_int *)data = sc->sc_video_on ? 685 WSDISPLAYIO_VIDEO_ON : WSDISPLAYIO_VIDEO_OFF; 686 return 0; 687 } 688 return EPASSTHROUGH; 689 } 690 691 static paddr_t 692 hyperfb_mmap(void *v, void *vs, off_t offset, int prot) 693 { 694 struct vcons_data *vd = v; 695 struct hyperfb_softc *sc = vd->cookie; 696 paddr_t pa = -1; 697 698 699 if (sc->sc_mode == WSDISPLAYIO_MODE_EMUL) 700 return -1; 701 702 /* GSC framebuffer space is 16MB */ 703 if (offset >= 0 && offset < 0x1000000) { 704 /* framebuffer */ 705 pa = bus_space_mmap(sc->sc_iot, sc->sc_base + HCRX_FBOFFSET, 706 offset, prot, 707 BUS_SPACE_MAP_LINEAR | BUS_SPACE_MAP_PREFETCHABLE); 708 } else if (offset >= 0x80000000 && offset < 0x8040000) { 709 /* blitter registers etc. */ 710 pa = bus_space_mmap(sc->sc_iot, sc->sc_base + HCRX_REGOFFSET, 711 offset - 0x80000000, prot, BUS_SPACE_MAP_LINEAR); 712 } 713 714 return pa; 715 } 716 717 static int 718 hyperfb_putcmap(struct hyperfb_softc *sc, struct wsdisplay_cmap *cm) 719 { 720 u_char *r, *g, *b; 721 u_int index = cm->index; 722 u_int count = cm->count; 723 int i, error; 724 u_char rbuf[256], gbuf[256], bbuf[256]; 725 726 if (cm->index >= 256 || cm->count > 256 || 727 (cm->index + cm->count) > 256) 728 return EINVAL; 729 error = copyin(cm->red, &rbuf[index], count); 730 if (error) 731 return error; 732 error = copyin(cm->green, &gbuf[index], count); 733 if (error) 734 return error; 735 error = copyin(cm->blue, &bbuf[index], count); 736 if (error) 737 return error; 738 739 memcpy(&sc->sc_cmap_red[index], &rbuf[index], count); 740 memcpy(&sc->sc_cmap_green[index], &gbuf[index], count); 741 memcpy(&sc->sc_cmap_blue[index], &bbuf[index], count); 742 743 r = &sc->sc_cmap_red[index]; 744 g = &sc->sc_cmap_green[index]; 745 b = &sc->sc_cmap_blue[index]; 746 747 for (i = 0; i < count; i++) { 748 hyperfb_putpalreg(sc, index, *r, *g, *b); 749 index++; 750 r++, g++, b++; 751 } 752 return 0; 753 } 754 755 static int 756 hyperfb_getcmap(struct hyperfb_softc *sc, struct wsdisplay_cmap *cm) 757 { 758 u_int index = cm->index; 759 u_int count = cm->count; 760 int error; 761 762 if (index >= 255 || count > 256 || index + count > 256) 763 return EINVAL; 764 765 error = copyout(&sc->sc_cmap_red[index], cm->red, count); 766 if (error) 767 return error; 768 error = copyout(&sc->sc_cmap_green[index], cm->green, count); 769 if (error) 770 return error; 771 error = copyout(&sc->sc_cmap_blue[index], cm->blue, count); 772 if (error) 773 return error; 774 775 return 0; 776 } 777 778 static void 779 hyperfb_restore_palette(struct hyperfb_softc *sc) 780 { 781 uint8_t cmap[768]; 782 int i, j; 783 784 j = 0; 785 rasops_get_cmap(&sc->sc_console_screen.scr_ri, cmap, sizeof(cmap)); 786 for (i = 0; i < 256; i++) { 787 sc->sc_cmap_red[i] = cmap[j]; 788 sc->sc_cmap_green[i] = cmap[j + 1]; 789 sc->sc_cmap_blue[i] = cmap[j + 2]; 790 hyperfb_putpalreg(sc, i, cmap[j], cmap[j + 1], cmap[j + 2]); 791 j += 3; 792 } 793 } 794 795 static int 796 hyperfb_putpalreg(struct hyperfb_softc *sc, uint8_t idx, uint8_t r, uint8_t g, 797 uint8_t b) 798 { 799 800 mutex_enter(&sc->sc_hwlock); 801 hyperfb_wait(sc); 802 hyperfb_write4(sc, NGLE_REG_10, 0xbbe0f000); 803 hyperfb_write4(sc, NGLE_REG_14, 0x03000300); 804 hyperfb_write4(sc, NGLE_REG_13, 0xffffffff); 805 806 hyperfb_wait(sc); 807 hyperfb_write4(sc, NGLE_REG_3, 0x400 | (idx << 2)); 808 hyperfb_write4(sc, NGLE_REG_4, (r << 16) | (g << 8) | b); 809 810 hyperfb_write4(sc, NGLE_REG_2, 0x400); 811 hyperfb_write4(sc, NGLE_REG_38, 0x82000100); 812 hyperfb_setup_fb(sc); 813 mutex_exit(&sc->sc_hwlock); 814 return 0; 815 } 816 817 void 818 hyperfb_setup(struct hyperfb_softc *sc) 819 { 820 int i; 821 uint32_t reg; 822 823 sc->sc_hwmode = HW_FB; 824 sc->sc_hot_x = 0; 825 sc->sc_hot_y = 0; 826 sc->sc_enabled = 0; 827 sc->sc_video_on = 1; 828 829 /* set Bt458 read mask register to all planes */ 830 /* XXX I'm not sure HCRX even has one of these */ 831 hyperfb_wait(sc); 832 ngle_bt458_write(sc, 0x08, 0x04); 833 ngle_bt458_write(sc, 0x0a, 0xff); 834 835 reg = hyperfb_read4(sc, NGLE_REG_32); 836 DPRINTF("planereg %08x\n", reg); 837 hyperfb_write4(sc, NGLE_REG_32, 0xffffffff); 838 839 /* hyperbowl */ 840 hyperfb_wait(sc); 841 if (sc->sc_24bit) { 842 /* write must happen twice because hw bug */ 843 hyperfb_write4(sc, NGLE_REG_40, 844 HYPERBOWL_MODE01_8_24_LUT0_TRANSPARENT_LUT1_OPAQUE); 845 hyperfb_write4(sc, NGLE_REG_40, 846 HYPERBOWL_MODE01_8_24_LUT0_TRANSPARENT_LUT1_OPAQUE); 847 hyperfb_write4(sc, NGLE_REG_39, HYPERBOWL_MODE2_8_24); 848 /* Set lut 0 to be the direct color */ 849 hyperfb_write4(sc, NGLE_REG_42, 0x014c0148); 850 hyperfb_write4(sc, NGLE_REG_43, 0x404c4048); 851 hyperfb_write4(sc, NGLE_REG_44, 0x034c0348); 852 hyperfb_write4(sc, NGLE_REG_45, 0x444c4448); 853 } else { 854 hyperfb_write4(sc, NGLE_REG_40, 855 HYPERBOWL_MODE_FOR_8_OVER_88_LUT0_NO_TRANSPARENCIES); 856 hyperfb_write4(sc, NGLE_REG_40, 857 HYPERBOWL_MODE_FOR_8_OVER_88_LUT0_NO_TRANSPARENCIES); 858 859 hyperfb_write4(sc, NGLE_REG_42, 0); 860 hyperfb_write4(sc, NGLE_REG_43, 0); 861 hyperfb_write4(sc, NGLE_REG_44, 0); 862 hyperfb_write4(sc, NGLE_REG_45, 0x444c4048); 863 } 864 865 /* attr. planes */ 866 hyperfb_wait(sc); 867 hyperfb_write4(sc, NGLE_REG_11, 868 BA(IndexedDcd, Otc32, OtsIndirect, AddrLong, 0, BINattr, 0)); 869 hyperfb_write4(sc, NGLE_REG_14, 870 IBOvals(RopSrc, 0, BitmapExtent08, 1, DataDynamic, MaskOtc, 1, 0)); 871 hyperfb_write4(sc, NGLE_REG_12, 0x04000F00/*NGLE_BUFF0_CMAP0*/); 872 hyperfb_write4(sc, NGLE_REG_8, 0xffffffff); 873 874 hyperfb_wait(sc); 875 hyperfb_write4(sc, NGLE_REG_6, 0x00000000); 876 hyperfb_write4(sc, NGLE_REG_9, 877 (sc->sc_width << 16) | sc->sc_height); 878 /* 879 * blit into offscreen memory to force flush previous - apparently 880 * some chips have a bug this works around 881 */ 882 hyperfb_wait(sc); 883 hyperfb_write4(sc, NGLE_REG_6, 0x05000000); 884 hyperfb_write4(sc, NGLE_REG_9, 0x00040001); 885 886 /* 887 * on 24bit-capable hardware we: 888 * - make overlay colour 255 transparent 889 * - blit the 24bit buffer all white 890 * - install a linear ramp in CMAP 0 891 */ 892 if (sc->sc_24bit) { 893 /* overlay transparency */ 894 hyperfb_wait_fifo(sc, 7); 895 hyperfb_write4(sc, NGLE_REG_11, 896 BA(IndexedDcd, Otc04, Ots08, AddrLong, 0, BINovly, 0)); 897 hyperfb_write4(sc, NGLE_REG_14, 0x03000300); 898 hyperfb_write4(sc, NGLE_REG_3, 0x000017f0); 899 hyperfb_write4(sc, NGLE_REG_13, 0xffffffff); 900 hyperfb_write4(sc, NGLE_REG_22, 0xffffffff); 901 hyperfb_write4(sc, NGLE_REG_23, 0x0); 902 903 hyperfb_wait(sc); 904 hyperfb_write4(sc, NGLE_REG_12, 0x00000000); 905 906 /* clear 24bit buffer */ 907 hyperfb_wait(sc); 908 /* plane mask */ 909 hyperfb_write4(sc, NGLE_REG_13, 0xffffffff); 910 hyperfb_write4(sc, NGLE_REG_8, 0xffffffff); /* transfer data */ 911 /* bitmap op */ 912 hyperfb_write4(sc, NGLE_REG_14, 913 IBOvals(RopSrc, 0, BitmapExtent32, 0, DataDynamic, MaskOtc, 914 0, 0)); 915 /* dst bitmap access */ 916 hyperfb_write4(sc, NGLE_REG_11, 917 BA(IndexedDcd, Otc32, OtsIndirect, AddrLong, 0, BINapp0F8, 918 0)); 919 hyperfb_wait_fifo(sc, 3); 920 hyperfb_write4(sc, NGLE_REG_35, 0x00ffffff); /* fg colour */ 921 hyperfb_write4(sc, NGLE_REG_6, 0x00000000); /* dst xy */ 922 hyperfb_write4(sc, NGLE_REG_9, 923 (sc->sc_width << 16) | sc->sc_height); 924 925 /* write a linear ramp into CMAP0 */ 926 hyperfb_wait(sc); 927 hyperfb_write4(sc, NGLE_REG_10, 0xbbe0f000); 928 hyperfb_write4(sc, NGLE_REG_14, 0x03000300); 929 hyperfb_write4(sc, NGLE_REG_13, 0xffffffff); 930 931 hyperfb_wait(sc); 932 hyperfb_write4(sc, NGLE_REG_3, 0); 933 for (i = 0; i < 256; i++) { 934 hyperfb_wait(sc); 935 hyperfb_write4(sc, NGLE_REG_4, 936 (i << 16) | (i << 8) | i); 937 } 938 hyperfb_write4(sc, NGLE_REG_2, 0x0); 939 hyperfb_write4(sc, NGLE_REG_38, 940 LBC_ENABLE | LBC_TYPE_CMAP | 0x100); 941 hyperfb_wait(sc); 942 } 943 944 hyperfb_setup_fb(sc); 945 946 /* make sure video output is enabled */ 947 hyperfb_wait(sc); 948 hyperfb_write4(sc, NGLE_REG_33, 949 hyperfb_read4(sc, NGLE_REG_33) | 0x0a000000); 950 951 /* cursor mask */ 952 hyperfb_wait(sc); 953 hyperfb_write4(sc, NGLE_REG_30, 0); 954 for (i = 0; i < 64; i++) { 955 hyperfb_write4(sc, NGLE_REG_31, 0xffffffff); 956 hyperfb_write4(sc, NGLE_REG_31, 0xffffffff); 957 } 958 959 /* cursor image */ 960 hyperfb_wait(sc); 961 hyperfb_write4(sc, NGLE_REG_30, 0x80); 962 for (i = 0; i < 64; i++) { 963 hyperfb_write4(sc, NGLE_REG_31, 0xff00ff00); 964 hyperfb_write4(sc, NGLE_REG_31, 0xff00ff00); 965 } 966 967 /* colour map */ 968 hyperfb_wait(sc); 969 hyperfb_write4(sc, NGLE_REG_10, 0xBBE0F000); 970 hyperfb_write4(sc, NGLE_REG_14, 0x03000300); 971 hyperfb_write4(sc, NGLE_REG_13, 0xffffffff); 972 hyperfb_wait(sc); 973 hyperfb_write4(sc, NGLE_REG_3, 0); 974 hyperfb_write4(sc, NGLE_REG_4, 0x000000ff); /* BG */ 975 hyperfb_write4(sc, NGLE_REG_4, 0x00ff0000); /* FG */ 976 hyperfb_wait(sc); 977 hyperfb_write4(sc, NGLE_REG_2, 0); 978 hyperfb_write4(sc, NGLE_REG_38, LBC_ENABLE | LBC_TYPE_CURSOR | 4); 979 hyperfb_setup_fb(sc); 980 981 hyperfb_move_cursor(sc, 100, 100); 982 } 983 984 static void 985 hyperfb_set_video(struct hyperfb_softc *sc, int on) 986 { 987 uint32_t reg; 988 989 if (sc->sc_video_on == on) 990 return; 991 992 sc->sc_video_on = on; 993 994 hyperfb_wait(sc); 995 reg = hyperfb_read4(sc, NGLE_REG_33); 996 997 if (on) { 998 hyperfb_write4(sc, NGLE_REG_33, reg | HCRX_VIDEO_ENABLE); 999 } else { 1000 hyperfb_write4(sc, NGLE_REG_33, reg & ~HCRX_VIDEO_ENABLE); 1001 } 1002 } 1003 1004 static void 1005 hyperfb_rectfill(struct hyperfb_softc *sc, int x, int y, int wi, int he, 1006 uint32_t bg) 1007 { 1008 uint32_t mask = 0xffffffff; 1009 1010 /* 1011 * XXX 1012 * HCRX and EG both always draw rectangles at least 32 pixels wide 1013 * for anything narrower we need to set a bit mask and enable 1014 * transparency 1015 */ 1016 1017 if (sc->sc_hwmode != HW_FILL) { 1018 hyperfb_wait_fifo(sc, 3); 1019 /* plane mask */ 1020 hyperfb_write4(sc, NGLE_REG_13, 0xff); 1021 /* bitmap op */ 1022 hyperfb_write4(sc, NGLE_REG_14, 1023 IBOvals(RopSrc, 0, BitmapExtent08, 0, DataDynamic, MaskOtc, 1024 1 /* bg transparent */, 0)); 1025 /* dst bitmap access */ 1026 hyperfb_write4(sc, NGLE_REG_11, 1027 BA(IndexedDcd, Otc32, OtsIndirect, AddrLong, 0, BINovly, 1028 0)); 1029 sc->sc_hwmode = HW_FILL; 1030 } 1031 hyperfb_wait_fifo(sc, 4); 1032 if (wi < 32) 1033 mask = 0xffffffff << (32 - wi); 1034 /* 1035 * XXX - the NGLE code calls this 'transfer data' 1036 * in reality it's a bit mask applied per pixel, 1037 * foreground colour in reg 35, bg in 36 1038 */ 1039 hyperfb_write4(sc, NGLE_REG_8, mask); 1040 1041 hyperfb_write4(sc, NGLE_REG_35, bg); 1042 /* dst XY */ 1043 hyperfb_write4(sc, NGLE_REG_6, (x << 16) | y); 1044 /* len XY start */ 1045 hyperfb_write4(sc, NGLE_REG_9, (wi << 16) | he); 1046 } 1047 1048 static void 1049 hyperfb_bitblt(void *cookie, int xs, int ys, int xd, int yd, int wi, 1050 int he, int rop) 1051 { 1052 struct hyperfb_softc *sc = cookie; 1053 1054 if (sc->sc_hwmode != HW_BLIT) { 1055 hyperfb_wait(sc); 1056 hyperfb_write4(sc, NGLE_REG_10, 1057 BA(IndexedDcd, Otc04, Ots08, AddrLong, 0, BINovly, 0)); 1058 hyperfb_write4(sc, NGLE_REG_13, 0xff); 1059 sc->sc_hwmode = HW_BLIT; 1060 } 1061 hyperfb_wait_fifo(sc, 4); 1062 hyperfb_write4(sc, NGLE_REG_14, ((rop << 8) & 0xf00) | 0x23000000); 1063 /* IBOvals(rop, 0, BitmapExtent08, 1, DataDynamic, MaskOtc, 0, 0) */ 1064 hyperfb_write4(sc, NGLE_REG_24, (xs << 16) | ys); 1065 hyperfb_write4(sc, NGLE_REG_7, (wi << 16) | he); 1066 hyperfb_write4(sc, NGLE_REG_25, (xd << 16) | yd); 1067 } 1068 1069 static void 1070 hyperfb_nuke_cursor(struct rasops_info *ri) 1071 { 1072 struct vcons_screen *scr = ri->ri_hw; 1073 struct hyperfb_softc *sc = scr->scr_cookie; 1074 int wi, he, x, y; 1075 1076 if (ri->ri_flg & RI_CURSOR) { 1077 wi = ri->ri_font->fontwidth; 1078 he = ri->ri_font->fontheight; 1079 x = ri->ri_ccol * wi + ri->ri_xorigin; 1080 y = ri->ri_crow * he + ri->ri_yorigin; 1081 hyperfb_bitblt(sc, x, y, x, y, wi, he, RopInv); 1082 ri->ri_flg &= ~RI_CURSOR; 1083 } 1084 } 1085 1086 static void 1087 hyperfb_cursor(void *cookie, int on, int row, int col) 1088 { 1089 struct rasops_info *ri = cookie; 1090 struct vcons_screen *scr = ri->ri_hw; 1091 struct hyperfb_softc *sc = scr->scr_cookie; 1092 int x, y, wi, he; 1093 1094 wi = ri->ri_font->fontwidth; 1095 he = ri->ri_font->fontheight; 1096 1097 if (sc->sc_mode == WSDISPLAYIO_MODE_EMUL) { 1098 if (on) { 1099 if (ri->ri_flg & RI_CURSOR) { 1100 hyperfb_nuke_cursor(ri); 1101 } 1102 x = col * wi + ri->ri_xorigin; 1103 y = row * he + ri->ri_yorigin; 1104 hyperfb_bitblt(sc, x, y, x, y, wi, he, RopInv); 1105 ri->ri_flg |= RI_CURSOR; 1106 } 1107 ri->ri_crow = row; 1108 ri->ri_ccol = col; 1109 } else { 1110 ri->ri_crow = row; 1111 ri->ri_ccol = col; 1112 ri->ri_flg &= ~RI_CURSOR; 1113 } 1114 } 1115 1116 static void 1117 hyperfb_putchar(void *cookie, int row, int col, u_int c, long attr) 1118 { 1119 struct rasops_info *ri = cookie; 1120 struct wsdisplay_font *font = PICK_FONT(ri, c); 1121 struct vcons_screen *scr = ri->ri_hw; 1122 struct hyperfb_softc *sc = scr->scr_cookie; 1123 void *data; 1124 int i, x, y, wi, he/*, rv = GC_NOPE*/; 1125 uint32_t bg, fg, mask; 1126 1127 if (sc->sc_mode != WSDISPLAYIO_MODE_EMUL) 1128 return; 1129 1130 if (!CHAR_IN_FONT(c, font)) 1131 return; 1132 1133 if (row == ri->ri_crow && col == ri->ri_ccol) { 1134 ri->ri_flg &= ~RI_CURSOR; 1135 } 1136 1137 wi = font->fontwidth; 1138 he = font->fontheight; 1139 1140 x = ri->ri_xorigin + col * wi; 1141 y = ri->ri_yorigin + row * he; 1142 1143 bg = ri->ri_devcmap[(attr >> 16) & 0xf]; 1144 fg = ri->ri_devcmap[(attr >> 24) & 0x0f]; 1145 1146 /* clear the character cell */ 1147 hyperfb_rectfill(sc, x, y, wi, he, bg); 1148 1149 /* if we're drawing a space we're done here */ 1150 if (c == 0x20) 1151 return; 1152 1153 #if 0 1154 rv = glyphcache_try(&sc->sc_gc, c, x, y, attr); 1155 if (rv == GC_OK) 1156 return; 1157 #endif 1158 1159 data = WSFONT_GLYPH(c, font); 1160 1161 hyperfb_wait_fifo(sc, 2); 1162 1163 /* character colour */ 1164 hyperfb_write4(sc, NGLE_REG_35, fg); 1165 /* dst XY */ 1166 hyperfb_write4(sc, NGLE_REG_6, (x << 16) | y); 1167 1168 /* 1169 * drawing a rectangle moves the starting coordinates down the 1170 * y-axis so we can just hammer the wi/he register to draw a full 1171 * character 1172 */ 1173 if (ri->ri_font->stride == 1) { 1174 uint8_t *data8 = data; 1175 for (i = 0; i < he; i++) { 1176 hyperfb_wait_fifo(sc, 2); 1177 mask = *data8; 1178 hyperfb_write4(sc, NGLE_REG_8, mask << 24); 1179 hyperfb_write4(sc, NGLE_REG_9, (wi << 16) | 1); 1180 data8++; 1181 } 1182 } else { 1183 uint16_t *data16 = data; 1184 for (i = 0; i < he; i++) { 1185 hyperfb_wait_fifo(sc, 2); 1186 mask = *data16; 1187 hyperfb_write4(sc, NGLE_REG_8, mask << 16); 1188 hyperfb_write4(sc, NGLE_REG_9, (wi << 16) | 1); 1189 data16++; 1190 } 1191 } 1192 #if 0 1193 if (rv == GC_ADD) 1194 glyphcache_add(&sc->sc_gc, c, x, y); 1195 #endif 1196 } 1197 1198 static void 1199 hyperfb_copycols(void *cookie, int row, int srccol, int dstcol, int ncols) 1200 { 1201 struct rasops_info *ri = cookie; 1202 struct vcons_screen *scr = ri->ri_hw; 1203 struct hyperfb_softc *sc = scr->scr_cookie; 1204 int32_t xs, xd, y, width, height; 1205 1206 if ((sc->sc_locked == 0) && (sc->sc_mode == WSDISPLAYIO_MODE_EMUL)) { 1207 if (ri->ri_crow == row && 1208 (ri->ri_ccol >= srccol && ri->ri_ccol < (srccol + ncols)) && 1209 (ri->ri_flg & RI_CURSOR)) { 1210 hyperfb_nuke_cursor(ri); 1211 } 1212 1213 xs = ri->ri_xorigin + ri->ri_font->fontwidth * srccol; 1214 xd = ri->ri_xorigin + ri->ri_font->fontwidth * dstcol; 1215 y = ri->ri_yorigin + ri->ri_font->fontheight * row; 1216 width = ri->ri_font->fontwidth * ncols; 1217 height = ri->ri_font->fontheight; 1218 hyperfb_bitblt(sc, xs, y, xd, y, width, height, RopSrc); 1219 if (ri->ri_crow == row && 1220 (ri->ri_ccol >= dstcol && ri->ri_ccol < (dstcol + ncols))) 1221 ri->ri_flg &= ~RI_CURSOR; 1222 } 1223 } 1224 1225 static void 1226 hyperfb_erasecols(void *cookie, int row, int startcol, int ncols, 1227 long fillattr) 1228 { 1229 struct rasops_info *ri = cookie; 1230 struct vcons_screen *scr = ri->ri_hw; 1231 struct hyperfb_softc *sc = scr->scr_cookie; 1232 int32_t x, y, width, height, fg, bg, ul; 1233 1234 if ((sc->sc_locked == 0) && (sc->sc_mode == WSDISPLAYIO_MODE_EMUL)) { 1235 x = ri->ri_xorigin + ri->ri_font->fontwidth * startcol; 1236 y = ri->ri_yorigin + ri->ri_font->fontheight * row; 1237 width = ri->ri_font->fontwidth * ncols; 1238 height = ri->ri_font->fontheight; 1239 rasops_unpack_attr(fillattr, &fg, &bg, &ul); 1240 1241 hyperfb_rectfill(sc, x, y, width, height, ri->ri_devcmap[bg]); 1242 if (ri->ri_crow == row && 1243 (ri->ri_ccol >= startcol && 1244 ri->ri_ccol < (startcol + ncols))) 1245 ri->ri_flg &= ~RI_CURSOR; 1246 } 1247 } 1248 1249 static void 1250 hyperfb_copyrows(void *cookie, int srcrow, int dstrow, int nrows) 1251 { 1252 struct rasops_info *ri = cookie; 1253 struct vcons_screen *scr = ri->ri_hw; 1254 struct hyperfb_softc *sc = scr->scr_cookie; 1255 int32_t x, ys, yd, width, height; 1256 1257 if ((sc->sc_locked == 0) && (sc->sc_mode == WSDISPLAYIO_MODE_EMUL)) { 1258 if ((ri->ri_crow >= srcrow && 1259 ri->ri_crow < (srcrow + nrows)) && 1260 (ri->ri_flg & RI_CURSOR)) { 1261 hyperfb_nuke_cursor(ri); 1262 } 1263 x = ri->ri_xorigin; 1264 ys = ri->ri_yorigin + ri->ri_font->fontheight * srcrow; 1265 yd = ri->ri_yorigin + ri->ri_font->fontheight * dstrow; 1266 width = ri->ri_emuwidth; 1267 height = ri->ri_font->fontheight * nrows; 1268 hyperfb_bitblt(sc, x, ys, x, yd, width, height, RopSrc); 1269 if (ri->ri_crow >= dstrow && ri->ri_crow < (dstrow + nrows)) 1270 ri->ri_flg &= ~RI_CURSOR; 1271 } 1272 } 1273 1274 static void 1275 hyperfb_eraserows(void *cookie, int row, int nrows, long fillattr) 1276 { 1277 struct rasops_info *ri = cookie; 1278 struct vcons_screen *scr = ri->ri_hw; 1279 struct hyperfb_softc *sc = scr->scr_cookie; 1280 int32_t x, y, width, height, fg, bg, ul; 1281 1282 if ((sc->sc_locked == 0) && (sc->sc_mode == WSDISPLAYIO_MODE_EMUL)) { 1283 x = ri->ri_xorigin; 1284 y = ri->ri_yorigin + ri->ri_font->fontheight * row; 1285 width = ri->ri_emuwidth; 1286 height = ri->ri_font->fontheight * nrows; 1287 rasops_unpack_attr(fillattr, &fg, &bg, &ul); 1288 1289 hyperfb_rectfill(sc, x, y, width, height, ri->ri_devcmap[bg]); 1290 1291 if (ri->ri_crow >= row && ri->ri_crow < (row + nrows)) 1292 ri->ri_flg &= ~RI_CURSOR; 1293 } 1294 } 1295 1296 static void 1297 hyperfb_move_cursor(struct hyperfb_softc *sc, int x, int y) 1298 { 1299 uint32_t pos; 1300 1301 sc->sc_cursor_x = x; 1302 x -= sc->sc_hot_x; 1303 sc->sc_cursor_y = y; 1304 y -= sc->sc_hot_y; 1305 1306 if (x < 0) x = 0x1000 - x; 1307 if (y < 0) y = 0x1000 - y; 1308 pos = (x << 16) | y; 1309 if (sc->sc_enabled) pos |= HCRX_ENABLE_CURSOR; 1310 hyperfb_wait_fifo(sc, 2); 1311 hyperfb_write4(sc, NGLE_REG_28, 0); 1312 hyperfb_write4(sc, NGLE_REG_29, pos); 1313 } 1314 1315 static int 1316 hyperfb_do_cursor(struct hyperfb_softc *sc, struct wsdisplay_cursor *cur) 1317 { 1318 1319 if (cur->which & WSDISPLAY_CURSOR_DOCUR) { 1320 1321 sc->sc_enabled = cur->enable; 1322 cur->which |= WSDISPLAY_CURSOR_DOPOS; 1323 } 1324 if (cur->which & WSDISPLAY_CURSOR_DOHOT) { 1325 1326 sc->sc_hot_x = cur->hot.x; 1327 sc->sc_hot_y = cur->hot.y; 1328 cur->which |= WSDISPLAY_CURSOR_DOPOS; 1329 } 1330 if (cur->which & WSDISPLAY_CURSOR_DOPOS) { 1331 1332 hyperfb_move_cursor(sc, cur->pos.x, cur->pos.y); 1333 } 1334 if (cur->which & WSDISPLAY_CURSOR_DOCMAP) { 1335 uint32_t rgb; 1336 uint8_t r[2], g[2], b[2]; 1337 1338 copyin(cur->cmap.blue, b, 2); 1339 copyin(cur->cmap.green, g, 2); 1340 copyin(cur->cmap.red, r, 2); 1341 mutex_enter(&sc->sc_hwlock); 1342 hyperfb_wait(sc); 1343 hyperfb_write4(sc, NGLE_REG_10, 0xBBE0F000); 1344 hyperfb_write4(sc, NGLE_REG_14, 0x03000300); 1345 hyperfb_write4(sc, NGLE_REG_13, 0xffffffff); 1346 hyperfb_wait(sc); 1347 hyperfb_write4(sc, NGLE_REG_3, 0); 1348 rgb = (r[0] << 16) | (g[0] << 8) | b[0]; 1349 hyperfb_write4(sc, NGLE_REG_4, rgb); /* BG */ 1350 rgb = (r[1] << 16) | (g[1] << 8) | b[1]; 1351 hyperfb_write4(sc, NGLE_REG_4, rgb); /* FG */ 1352 hyperfb_write4(sc, NGLE_REG_2, 0); 1353 hyperfb_write4(sc, NGLE_REG_38, 1354 LBC_ENABLE | LBC_TYPE_CURSOR | 4); 1355 1356 hyperfb_setup_fb(sc); 1357 mutex_exit(&sc->sc_hwlock); 1358 1359 } 1360 if (cur->which & WSDISPLAY_CURSOR_DOSHAPE) { 1361 uint32_t buffer[128], latch, tmp; 1362 int i; 1363 1364 copyin(cur->mask, buffer, 512); 1365 hyperfb_wait(sc); 1366 hyperfb_write4(sc, NGLE_REG_30, 0); 1367 for (i = 0; i < 128; i += 2) { 1368 latch = 0; 1369 tmp = buffer[i] & 0x80808080; 1370 latch |= tmp >> 7; 1371 tmp = buffer[i] & 0x40404040; 1372 latch |= tmp >> 5; 1373 tmp = buffer[i] & 0x20202020; 1374 latch |= tmp >> 3; 1375 tmp = buffer[i] & 0x10101010; 1376 latch |= tmp >> 1; 1377 tmp = buffer[i] & 0x08080808; 1378 latch |= tmp << 1; 1379 tmp = buffer[i] & 0x04040404; 1380 latch |= tmp << 3; 1381 tmp = buffer[i] & 0x02020202; 1382 latch |= tmp << 5; 1383 tmp = buffer[i] & 0x01010101; 1384 latch |= tmp << 7; 1385 hyperfb_write4(sc, NGLE_REG_31, latch); 1386 latch = 0; 1387 tmp = buffer[i + 1] & 0x80808080; 1388 latch |= tmp >> 7; 1389 tmp = buffer[i + 1] & 0x40404040; 1390 latch |= tmp >> 5; 1391 tmp = buffer[i + 1] & 0x20202020; 1392 latch |= tmp >> 3; 1393 tmp = buffer[i + 1] & 0x10101010; 1394 latch |= tmp >> 1; 1395 tmp = buffer[i + 1] & 0x08080808; 1396 latch |= tmp << 1; 1397 tmp = buffer[i + 1] & 0x04040404; 1398 latch |= tmp << 3; 1399 tmp = buffer[i + 1] & 0x02020202; 1400 latch |= tmp << 5; 1401 tmp = buffer[i + 1] & 0x01010101; 1402 latch |= tmp << 7; 1403 hyperfb_write4(sc, NGLE_REG_31, latch); 1404 } 1405 1406 copyin(cur->image, buffer, 512); 1407 hyperfb_wait(sc); 1408 hyperfb_write4(sc, NGLE_REG_30, 0x80); 1409 for (i = 0; i < 128; i += 2) { 1410 latch = 0; 1411 tmp = buffer[i] & 0x80808080; 1412 latch |= tmp >> 7; 1413 tmp = buffer[i] & 0x40404040; 1414 latch |= tmp >> 5; 1415 tmp = buffer[i] & 0x20202020; 1416 latch |= tmp >> 3; 1417 tmp = buffer[i] & 0x10101010; 1418 latch |= tmp >> 1; 1419 tmp = buffer[i] & 0x08080808; 1420 latch |= tmp << 1; 1421 tmp = buffer[i] & 0x04040404; 1422 latch |= tmp << 3; 1423 tmp = buffer[i] & 0x02020202; 1424 latch |= tmp << 5; 1425 tmp = buffer[i] & 0x01010101; 1426 latch |= tmp << 7; 1427 hyperfb_write4(sc, NGLE_REG_31, latch); 1428 latch = 0; 1429 tmp = buffer[i + 1] & 0x80808080; 1430 latch |= tmp >> 7; 1431 tmp = buffer[i + 1] & 0x40404040; 1432 latch |= tmp >> 5; 1433 tmp = buffer[i + 1] & 0x20202020; 1434 latch |= tmp >> 3; 1435 tmp = buffer[i + 1] & 0x10101010; 1436 latch |= tmp >> 1; 1437 tmp = buffer[i + 1] & 0x08080808; 1438 latch |= tmp << 1; 1439 tmp = buffer[i + 1] & 0x04040404; 1440 latch |= tmp << 3; 1441 tmp = buffer[i + 1] & 0x02020202; 1442 latch |= tmp << 5; 1443 tmp = buffer[i + 1] & 0x01010101; 1444 latch |= tmp << 7; 1445 hyperfb_write4(sc, NGLE_REG_31, latch); 1446 } 1447 hyperfb_setup_fb(sc); 1448 } 1449 1450 return 0; 1451 } 1452