1 /*- 2 * SPDX-License-Identifier: BSD-2-Clause-FreeBSD 3 * 4 * Copyright (c) 2003 Peter Grehan 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 AND CONTRIBUTORS ``AS IS'' AND 17 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 18 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 19 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 20 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 21 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 22 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 23 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 24 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 25 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 26 * SUCH DAMAGE. 27 */ 28 29 #include <sys/cdefs.h> 30 __FBSDID("$FreeBSD$"); 31 32 #include <sys/param.h> 33 #include <sys/systm.h> 34 #include <sys/module.h> 35 #include <sys/bus.h> 36 #include <sys/kernel.h> 37 #include <sys/sysctl.h> 38 #include <sys/limits.h> 39 #include <sys/conf.h> 40 #include <sys/cons.h> 41 #include <sys/proc.h> 42 #include <sys/fcntl.h> 43 #include <sys/malloc.h> 44 #include <sys/fbio.h> 45 #include <sys/consio.h> 46 47 #include <machine/bus.h> 48 #include <machine/sc_machdep.h> 49 #include <machine/vm.h> 50 51 #include <sys/rman.h> 52 53 #include <dev/fb/fbreg.h> 54 #include <dev/syscons/syscons.h> 55 56 #include <dev/ofw/openfirm.h> 57 #include <dev/ofw/ofw_bus.h> 58 #include <dev/ofw/ofw_pci.h> 59 #include <powerpc/ofw/ofw_syscons.h> 60 61 static int ofwfb_ignore_mmap_checks = 1; 62 static int ofwfb_reset_on_switch = 1; 63 static SYSCTL_NODE(_hw, OID_AUTO, ofwfb, CTLFLAG_RD, 0, "ofwfb"); 64 SYSCTL_INT(_hw_ofwfb, OID_AUTO, relax_mmap, CTLFLAG_RW, 65 &ofwfb_ignore_mmap_checks, 0, "relaxed mmap bounds checking"); 66 SYSCTL_INT(_hw_ofwfb, OID_AUTO, reset_on_mode_switch, CTLFLAG_RW, 67 &ofwfb_reset_on_switch, 0, "reset the framebuffer driver on mode switch"); 68 69 extern u_char dflt_font_16[]; 70 extern u_char dflt_font_14[]; 71 extern u_char dflt_font_8[]; 72 73 static int ofwfb_configure(int flags); 74 75 static vi_probe_t ofwfb_probe; 76 static vi_init_t ofwfb_init; 77 static vi_get_info_t ofwfb_get_info; 78 static vi_query_mode_t ofwfb_query_mode; 79 static vi_set_mode_t ofwfb_set_mode; 80 static vi_save_font_t ofwfb_save_font; 81 static vi_load_font_t ofwfb_load_font; 82 static vi_show_font_t ofwfb_show_font; 83 static vi_save_palette_t ofwfb_save_palette; 84 static vi_load_palette_t ofwfb_load_palette; 85 static vi_set_border_t ofwfb_set_border; 86 static vi_save_state_t ofwfb_save_state; 87 static vi_load_state_t ofwfb_load_state; 88 static vi_set_win_org_t ofwfb_set_win_org; 89 static vi_read_hw_cursor_t ofwfb_read_hw_cursor; 90 static vi_set_hw_cursor_t ofwfb_set_hw_cursor; 91 static vi_set_hw_cursor_shape_t ofwfb_set_hw_cursor_shape; 92 static vi_blank_display_t ofwfb_blank_display; 93 static vi_mmap_t ofwfb_mmap; 94 static vi_ioctl_t ofwfb_ioctl; 95 static vi_clear_t ofwfb_clear; 96 static vi_fill_rect_t ofwfb_fill_rect; 97 static vi_bitblt_t ofwfb_bitblt; 98 static vi_diag_t ofwfb_diag; 99 static vi_save_cursor_palette_t ofwfb_save_cursor_palette; 100 static vi_load_cursor_palette_t ofwfb_load_cursor_palette; 101 static vi_copy_t ofwfb_copy; 102 static vi_putp_t ofwfb_putp; 103 static vi_putc_t ofwfb_putc; 104 static vi_puts_t ofwfb_puts; 105 static vi_putm_t ofwfb_putm; 106 107 static video_switch_t ofwfbvidsw = { 108 .probe = ofwfb_probe, 109 .init = ofwfb_init, 110 .get_info = ofwfb_get_info, 111 .query_mode = ofwfb_query_mode, 112 .set_mode = ofwfb_set_mode, 113 .save_font = ofwfb_save_font, 114 .load_font = ofwfb_load_font, 115 .show_font = ofwfb_show_font, 116 .save_palette = ofwfb_save_palette, 117 .load_palette = ofwfb_load_palette, 118 .set_border = ofwfb_set_border, 119 .save_state = ofwfb_save_state, 120 .load_state = ofwfb_load_state, 121 .set_win_org = ofwfb_set_win_org, 122 .read_hw_cursor = ofwfb_read_hw_cursor, 123 .set_hw_cursor = ofwfb_set_hw_cursor, 124 .set_hw_cursor_shape = ofwfb_set_hw_cursor_shape, 125 .blank_display = ofwfb_blank_display, 126 .mmap = ofwfb_mmap, 127 .ioctl = ofwfb_ioctl, 128 .clear = ofwfb_clear, 129 .fill_rect = ofwfb_fill_rect, 130 .bitblt = ofwfb_bitblt, 131 .diag = ofwfb_diag, 132 .save_cursor_palette = ofwfb_save_cursor_palette, 133 .load_cursor_palette = ofwfb_load_cursor_palette, 134 .copy = ofwfb_copy, 135 .putp = ofwfb_putp, 136 .putc = ofwfb_putc, 137 .puts = ofwfb_puts, 138 .putm = ofwfb_putm, 139 }; 140 141 /* 142 * bitmap depth-specific routines 143 */ 144 static vi_blank_display_t ofwfb_blank_display8; 145 static vi_putc_t ofwfb_putc8; 146 static vi_putm_t ofwfb_putm8; 147 static vi_set_border_t ofwfb_set_border8; 148 149 static vi_blank_display_t ofwfb_blank_display32; 150 static vi_putc_t ofwfb_putc32; 151 static vi_putm_t ofwfb_putm32; 152 static vi_set_border_t ofwfb_set_border32; 153 154 VIDEO_DRIVER(ofwfb, ofwfbvidsw, ofwfb_configure); 155 156 extern sc_rndr_sw_t txtrndrsw; 157 RENDERER(ofwfb, 0, txtrndrsw, gfb_set); 158 159 RENDERER_MODULE(ofwfb, gfb_set); 160 161 /* 162 * Define the iso6429-1983 colormap 163 */ 164 static struct { 165 uint8_t red; 166 uint8_t green; 167 uint8_t blue; 168 } ofwfb_cmap[16] = { /* # R G B Color */ 169 /* - - - - ----- */ 170 { 0x00, 0x00, 0x00 }, /* 0 0 0 0 Black */ 171 { 0x00, 0x00, 0xaa }, /* 1 0 0 2/3 Blue */ 172 { 0x00, 0xaa, 0x00 }, /* 2 0 2/3 0 Green */ 173 { 0x00, 0xaa, 0xaa }, /* 3 0 2/3 2/3 Cyan */ 174 { 0xaa, 0x00, 0x00 }, /* 4 2/3 0 0 Red */ 175 { 0xaa, 0x00, 0xaa }, /* 5 2/3 0 2/3 Magenta */ 176 { 0xaa, 0x55, 0x00 }, /* 6 2/3 1/3 0 Brown */ 177 { 0xaa, 0xaa, 0xaa }, /* 7 2/3 2/3 2/3 White */ 178 { 0x55, 0x55, 0x55 }, /* 8 1/3 1/3 1/3 Gray */ 179 { 0x55, 0x55, 0xff }, /* 9 1/3 1/3 1 Bright Blue */ 180 { 0x55, 0xff, 0x55 }, /* 10 1/3 1 1/3 Bright Green */ 181 { 0x55, 0xff, 0xff }, /* 11 1/3 1 1 Bright Cyan */ 182 { 0xff, 0x55, 0x55 }, /* 12 1 1/3 1/3 Bright Red */ 183 { 0xff, 0x55, 0xff }, /* 13 1 1/3 1 Bright Magenta */ 184 { 0xff, 0xff, 0x80 }, /* 14 1 1 1/3 Bright Yellow */ 185 { 0xff, 0xff, 0xff } /* 15 1 1 1 Bright White */ 186 }; 187 188 #define TODO printf("%s: unimplemented\n", __func__) 189 190 static u_int16_t ofwfb_static_window[ROW*COL]; 191 192 static struct ofwfb_softc ofwfb_softc; 193 194 static __inline int 195 ofwfb_background(uint8_t attr) 196 { 197 return (attr >> 4); 198 } 199 200 static __inline int 201 ofwfb_foreground(uint8_t attr) 202 { 203 return (attr & 0x0f); 204 } 205 206 static u_int 207 ofwfb_pix32(struct ofwfb_softc *sc, int attr) 208 { 209 u_int retval; 210 211 if (sc->sc_tag == &bs_le_tag) 212 retval = (ofwfb_cmap[attr].red << 16) | 213 (ofwfb_cmap[attr].green << 8) | 214 ofwfb_cmap[attr].blue; 215 else 216 retval = (ofwfb_cmap[attr].blue << 16) | 217 (ofwfb_cmap[attr].green << 8) | 218 ofwfb_cmap[attr].red; 219 220 return (retval); 221 } 222 223 static int 224 ofwfb_configure(int flags) 225 { 226 struct ofwfb_softc *sc; 227 phandle_t chosen; 228 ihandle_t stdout; 229 phandle_t node; 230 uint32_t fb_phys; 231 int depth; 232 int disable; 233 int len; 234 int i; 235 char type[16]; 236 static int done = 0; 237 238 disable = 0; 239 TUNABLE_INT_FETCH("hw.syscons.disable", &disable); 240 if (disable != 0) 241 return (0); 242 243 if (done != 0) 244 return (0); 245 done = 1; 246 247 sc = &ofwfb_softc; 248 249 chosen = OF_finddevice("/chosen"); 250 OF_getprop(chosen, "stdout", &stdout, sizeof(stdout)); 251 node = OF_instance_to_package(stdout); 252 if (node == -1) { 253 /* 254 * The "/chosen/stdout" does not exist try 255 * using "screen" directly. 256 */ 257 node = OF_finddevice("screen"); 258 } 259 OF_getprop(node, "device_type", type, sizeof(type)); 260 if (strcmp(type, "display") != 0) 261 return (0); 262 263 /* Only support 8 and 32-bit framebuffers */ 264 OF_getprop(node, "depth", &depth, sizeof(depth)); 265 if (depth == 8) { 266 sc->sc_blank = ofwfb_blank_display8; 267 sc->sc_putc = ofwfb_putc8; 268 sc->sc_putm = ofwfb_putm8; 269 sc->sc_set_border = ofwfb_set_border8; 270 } else if (depth == 32) { 271 sc->sc_blank = ofwfb_blank_display32; 272 sc->sc_putc = ofwfb_putc32; 273 sc->sc_putm = ofwfb_putm32; 274 sc->sc_set_border = ofwfb_set_border32; 275 } else 276 return (0); 277 278 if (OF_getproplen(node, "height") != sizeof(sc->sc_height) || 279 OF_getproplen(node, "width") != sizeof(sc->sc_width) || 280 OF_getproplen(node, "linebytes") != sizeof(sc->sc_stride)) 281 return (0); 282 283 sc->sc_depth = depth; 284 sc->sc_node = node; 285 sc->sc_console = 1; 286 OF_getprop(node, "height", &sc->sc_height, sizeof(sc->sc_height)); 287 OF_getprop(node, "width", &sc->sc_width, sizeof(sc->sc_width)); 288 OF_getprop(node, "linebytes", &sc->sc_stride, sizeof(sc->sc_stride)); 289 290 /* 291 * Get the PCI addresses of the adapter. The node may be the 292 * child of the PCI device: in that case, try the parent for 293 * the assigned-addresses property. 294 */ 295 len = OF_getprop(node, "assigned-addresses", sc->sc_pciaddrs, 296 sizeof(sc->sc_pciaddrs)); 297 if (len == -1) { 298 len = OF_getprop(OF_parent(node), "assigned-addresses", 299 sc->sc_pciaddrs, sizeof(sc->sc_pciaddrs)); 300 } 301 if (len == -1) 302 len = 0; 303 sc->sc_num_pciaddrs = len / sizeof(struct ofw_pci_register); 304 305 /* 306 * Grab the physical address of the framebuffer, and then map it 307 * into our memory space. If the MMU is not yet up, it will be 308 * remapped for us when relocation turns on. 309 * 310 * XXX We assume #address-cells is 1 at this point. 311 */ 312 if (OF_getproplen(node, "address") == sizeof(fb_phys)) { 313 OF_getprop(node, "address", &fb_phys, sizeof(fb_phys)); 314 sc->sc_tag = &bs_be_tag; 315 bus_space_map(sc->sc_tag, fb_phys, sc->sc_height * 316 sc->sc_stride, BUS_SPACE_MAP_PREFETCHABLE, &sc->sc_addr); 317 } else { 318 /* 319 * Some IBM systems don't have an address property. Try to 320 * guess the framebuffer region from the assigned addresses. 321 * This is ugly, but there doesn't seem to be an alternative. 322 * Linux does the same thing. 323 */ 324 325 fb_phys = sc->sc_num_pciaddrs; 326 for (i = 0; i < sc->sc_num_pciaddrs; i++) { 327 /* If it is too small, not the framebuffer */ 328 if (sc->sc_pciaddrs[i].size_lo < 329 sc->sc_stride*sc->sc_height) 330 continue; 331 /* If it is not memory, it isn't either */ 332 if (!(sc->sc_pciaddrs[i].phys_hi & 333 OFW_PCI_PHYS_HI_SPACE_MEM32)) 334 continue; 335 336 /* This could be the framebuffer */ 337 fb_phys = i; 338 339 /* If it is prefetchable, it certainly is */ 340 if (sc->sc_pciaddrs[i].phys_hi & 341 OFW_PCI_PHYS_HI_PREFETCHABLE) 342 break; 343 } 344 if (fb_phys == sc->sc_num_pciaddrs) 345 return (0); 346 347 OF_decode_addr(node, fb_phys, &sc->sc_tag, &sc->sc_addr, NULL); 348 } 349 350 ofwfb_init(0, &sc->sc_va, 0); 351 352 return (0); 353 } 354 355 static int 356 ofwfb_probe(int unit, video_adapter_t **adp, void *arg, int flags) 357 { 358 TODO; 359 return (0); 360 } 361 362 static int 363 ofwfb_init(int unit, video_adapter_t *adp, int flags) 364 { 365 struct ofwfb_softc *sc; 366 video_info_t *vi; 367 int cborder; 368 int font_height; 369 370 sc = (struct ofwfb_softc *)adp; 371 vi = &adp->va_info; 372 373 vid_init_struct(adp, "ofwfb", -1, unit); 374 375 /* The default font size can be overridden by loader */ 376 font_height = 16; 377 TUNABLE_INT_FETCH("hw.syscons.fsize", &font_height); 378 if (font_height == 8) { 379 sc->sc_font = dflt_font_8; 380 sc->sc_font_height = 8; 381 } else if (font_height == 14) { 382 sc->sc_font = dflt_font_14; 383 sc->sc_font_height = 14; 384 } else { 385 /* default is 8x16 */ 386 sc->sc_font = dflt_font_16; 387 sc->sc_font_height = 16; 388 } 389 390 /* The user can set a border in chars - default is 1 char width */ 391 cborder = 1; 392 TUNABLE_INT_FETCH("hw.syscons.border", &cborder); 393 394 vi->vi_cheight = sc->sc_font_height; 395 vi->vi_width = sc->sc_width/8 - 2*cborder; 396 vi->vi_height = sc->sc_height/sc->sc_font_height - 2*cborder; 397 vi->vi_cwidth = 8; 398 399 /* 400 * Clamp width/height to syscons maximums 401 */ 402 if (vi->vi_width > COL) 403 vi->vi_width = COL; 404 if (vi->vi_height > ROW) 405 vi->vi_height = ROW; 406 407 sc->sc_xmargin = (sc->sc_width - (vi->vi_width * vi->vi_cwidth)) / 2; 408 sc->sc_ymargin = (sc->sc_height - (vi->vi_height * vi->vi_cheight))/2; 409 410 /* 411 * Avoid huge amounts of conditional code in syscons by 412 * defining a dummy h/w text display buffer. 413 */ 414 adp->va_window = (vm_offset_t) ofwfb_static_window; 415 416 /* 417 * Enable future font-loading and flag color support, as well as 418 * adding V_ADP_MODECHANGE so that we ofwfb_set_mode() gets called 419 * when the X server shuts down. This enables us to get the console 420 * back when X disappears. 421 */ 422 adp->va_flags |= V_ADP_FONT | V_ADP_COLOR | V_ADP_MODECHANGE; 423 424 ofwfb_set_mode(&sc->sc_va, 0); 425 426 vid_register(&sc->sc_va); 427 428 return (0); 429 } 430 431 static int 432 ofwfb_get_info(video_adapter_t *adp, int mode, video_info_t *info) 433 { 434 bcopy(&adp->va_info, info, sizeof(*info)); 435 return (0); 436 } 437 438 static int 439 ofwfb_query_mode(video_adapter_t *adp, video_info_t *info) 440 { 441 TODO; 442 return (0); 443 } 444 445 static int 446 ofwfb_set_mode(video_adapter_t *adp, int mode) 447 { 448 struct ofwfb_softc *sc; 449 char name[64]; 450 ihandle_t ih; 451 int i, retval; 452 453 sc = (struct ofwfb_softc *)adp; 454 455 if (ofwfb_reset_on_switch) { 456 /* 457 * Open the display device, which will initialize it. 458 */ 459 460 memset(name, 0, sizeof(name)); 461 OF_package_to_path(sc->sc_node, name, sizeof(name)); 462 ih = OF_open(name); 463 464 if (sc->sc_depth == 8) { 465 /* 466 * Install the ISO6429 colormap - older OFW systems 467 * don't do this by default 468 */ 469 for (i = 0; i < 16; i++) { 470 OF_call_method("color!", ih, 4, 1, 471 ofwfb_cmap[i].red, 472 ofwfb_cmap[i].green, 473 ofwfb_cmap[i].blue, 474 i, 475 &retval); 476 } 477 } 478 } 479 480 ofwfb_blank_display(&sc->sc_va, V_DISPLAY_ON); 481 482 return (0); 483 } 484 485 static int 486 ofwfb_save_font(video_adapter_t *adp, int page, int size, int width, 487 u_char *data, int c, int count) 488 { 489 TODO; 490 return (0); 491 } 492 493 static int 494 ofwfb_load_font(video_adapter_t *adp, int page, int size, int width, 495 u_char *data, int c, int count) 496 { 497 struct ofwfb_softc *sc; 498 499 sc = (struct ofwfb_softc *)adp; 500 501 /* 502 * syscons code has already determined that current width/height 503 * are unchanged for this new font 504 */ 505 sc->sc_font = data; 506 return (0); 507 } 508 509 static int 510 ofwfb_show_font(video_adapter_t *adp, int page) 511 { 512 513 return (0); 514 } 515 516 static int 517 ofwfb_save_palette(video_adapter_t *adp, u_char *palette) 518 { 519 /* TODO; */ 520 return (0); 521 } 522 523 static int 524 ofwfb_load_palette(video_adapter_t *adp, u_char *palette) 525 { 526 /* TODO; */ 527 return (0); 528 } 529 530 static int 531 ofwfb_set_border8(video_adapter_t *adp, int border) 532 { 533 struct ofwfb_softc *sc; 534 int i, j; 535 uint8_t *addr; 536 uint8_t bground; 537 538 sc = (struct ofwfb_softc *)adp; 539 540 bground = ofwfb_background(border); 541 542 /* Set top margin */ 543 addr = (uint8_t *) sc->sc_addr; 544 for (i = 0; i < sc->sc_ymargin; i++) { 545 for (j = 0; j < sc->sc_width; j++) { 546 *(addr + j) = bground; 547 } 548 addr += sc->sc_stride; 549 } 550 551 /* bottom margin */ 552 addr = (uint8_t *) sc->sc_addr + (sc->sc_height - sc->sc_ymargin)*sc->sc_stride; 553 for (i = 0; i < sc->sc_ymargin; i++) { 554 for (j = 0; j < sc->sc_width; j++) { 555 *(addr + j) = bground; 556 } 557 addr += sc->sc_stride; 558 } 559 560 /* remaining left and right borders */ 561 addr = (uint8_t *) sc->sc_addr + sc->sc_ymargin*sc->sc_stride; 562 for (i = 0; i < sc->sc_height - 2*sc->sc_xmargin; i++) { 563 for (j = 0; j < sc->sc_xmargin; j++) { 564 *(addr + j) = bground; 565 *(addr + j + sc->sc_width - sc->sc_xmargin) = bground; 566 } 567 addr += sc->sc_stride; 568 } 569 570 return (0); 571 } 572 573 static int 574 ofwfb_set_border32(video_adapter_t *adp, int border) 575 { 576 /* XXX Be lazy for now and blank entire screen */ 577 return (ofwfb_blank_display32(adp, border)); 578 } 579 580 static int 581 ofwfb_set_border(video_adapter_t *adp, int border) 582 { 583 struct ofwfb_softc *sc; 584 585 sc = (struct ofwfb_softc *)adp; 586 587 return ((*sc->sc_set_border)(adp, border)); 588 } 589 590 static int 591 ofwfb_save_state(video_adapter_t *adp, void *p, size_t size) 592 { 593 TODO; 594 return (0); 595 } 596 597 static int 598 ofwfb_load_state(video_adapter_t *adp, void *p) 599 { 600 TODO; 601 return (0); 602 } 603 604 static int 605 ofwfb_set_win_org(video_adapter_t *adp, off_t offset) 606 { 607 TODO; 608 return (0); 609 } 610 611 static int 612 ofwfb_read_hw_cursor(video_adapter_t *adp, int *col, int *row) 613 { 614 *col = 0; 615 *row = 0; 616 617 return (0); 618 } 619 620 static int 621 ofwfb_set_hw_cursor(video_adapter_t *adp, int col, int row) 622 { 623 624 return (0); 625 } 626 627 static int 628 ofwfb_set_hw_cursor_shape(video_adapter_t *adp, int base, int height, 629 int celsize, int blink) 630 { 631 return (0); 632 } 633 634 static int 635 ofwfb_blank_display8(video_adapter_t *adp, int mode) 636 { 637 struct ofwfb_softc *sc; 638 int i; 639 uint32_t *addr; 640 uint32_t color; 641 uint32_t end; 642 643 sc = (struct ofwfb_softc *)adp; 644 addr = (uint32_t *) sc->sc_addr; 645 end = (sc->sc_stride/4) * sc->sc_height; 646 647 /* Splat 4 pixels at once. */ 648 color = (ofwfb_background(SC_NORM_ATTR) << 24) | 649 (ofwfb_background(SC_NORM_ATTR) << 16) | 650 (ofwfb_background(SC_NORM_ATTR) << 8) | 651 (ofwfb_background(SC_NORM_ATTR)); 652 653 for (i = 0; i < end; i++) 654 *(addr + i) = color; 655 656 return (0); 657 } 658 659 static int 660 ofwfb_blank_display32(video_adapter_t *adp, int mode) 661 { 662 struct ofwfb_softc *sc; 663 int i; 664 uint32_t *addr, blank; 665 666 sc = (struct ofwfb_softc *)adp; 667 addr = (uint32_t *) sc->sc_addr; 668 blank = ofwfb_pix32(sc, ofwfb_background(SC_NORM_ATTR)); 669 670 for (i = 0; i < (sc->sc_stride/4)*sc->sc_height; i++) 671 *(addr + i) = blank; 672 673 return (0); 674 } 675 676 static int 677 ofwfb_blank_display(video_adapter_t *adp, int mode) 678 { 679 struct ofwfb_softc *sc; 680 681 sc = (struct ofwfb_softc *)adp; 682 683 return ((*sc->sc_blank)(adp, mode)); 684 } 685 686 static int 687 ofwfb_mmap(video_adapter_t *adp, vm_ooffset_t offset, vm_paddr_t *paddr, 688 int prot, vm_memattr_t *memattr) 689 { 690 struct ofwfb_softc *sc; 691 int i; 692 693 sc = (struct ofwfb_softc *)adp; 694 695 /* 696 * Make sure the requested address lies within the PCI device's 697 * assigned addrs 698 */ 699 for (i = 0; i < sc->sc_num_pciaddrs; i++) 700 if (offset >= sc->sc_pciaddrs[i].phys_lo && 701 offset < (sc->sc_pciaddrs[i].phys_lo + sc->sc_pciaddrs[i].size_lo)) 702 { 703 /* 704 * If this is a prefetchable BAR, we can (and should) 705 * enable write-combining. 706 */ 707 if (sc->sc_pciaddrs[i].phys_hi & 708 OFW_PCI_PHYS_HI_PREFETCHABLE) 709 *memattr = VM_MEMATTR_WRITE_COMBINING; 710 711 *paddr = offset; 712 return (0); 713 } 714 715 /* 716 * Hack for Radeon... 717 */ 718 if (ofwfb_ignore_mmap_checks) { 719 *paddr = offset; 720 return (0); 721 } 722 723 /* 724 * This might be a legacy VGA mem request: if so, just point it at the 725 * framebuffer, since it shouldn't be touched 726 */ 727 if (offset < sc->sc_stride*sc->sc_height) { 728 *paddr = sc->sc_addr + offset; 729 return (0); 730 } 731 732 /* 733 * Error if we didn't have a better idea. 734 */ 735 if (sc->sc_num_pciaddrs == 0) 736 return (ENOMEM); 737 738 return (EINVAL); 739 } 740 741 static int 742 ofwfb_ioctl(video_adapter_t *adp, u_long cmd, caddr_t data) 743 { 744 745 return (0); 746 } 747 748 static int 749 ofwfb_clear(video_adapter_t *adp) 750 { 751 TODO; 752 return (0); 753 } 754 755 static int 756 ofwfb_fill_rect(video_adapter_t *adp, int val, int x, int y, int cx, int cy) 757 { 758 TODO; 759 return (0); 760 } 761 762 static int 763 ofwfb_bitblt(video_adapter_t *adp, ...) 764 { 765 TODO; 766 return (0); 767 } 768 769 static int 770 ofwfb_diag(video_adapter_t *adp, int level) 771 { 772 TODO; 773 return (0); 774 } 775 776 static int 777 ofwfb_save_cursor_palette(video_adapter_t *adp, u_char *palette) 778 { 779 TODO; 780 return (0); 781 } 782 783 static int 784 ofwfb_load_cursor_palette(video_adapter_t *adp, u_char *palette) 785 { 786 TODO; 787 return (0); 788 } 789 790 static int 791 ofwfb_copy(video_adapter_t *adp, vm_offset_t src, vm_offset_t dst, int n) 792 { 793 TODO; 794 return (0); 795 } 796 797 static int 798 ofwfb_putp(video_adapter_t *adp, vm_offset_t off, uint32_t p, uint32_t a, 799 int size, int bpp, int bit_ltor, int byte_ltor) 800 { 801 TODO; 802 return (0); 803 } 804 805 static int 806 ofwfb_putc8(video_adapter_t *adp, vm_offset_t off, uint8_t c, uint8_t a) 807 { 808 struct ofwfb_softc *sc; 809 int row; 810 int col; 811 int i; 812 uint32_t *addr; 813 u_char *p, fg, bg; 814 union { 815 uint32_t l; 816 uint8_t c[4]; 817 } ch1, ch2; 818 819 820 sc = (struct ofwfb_softc *)adp; 821 row = (off / adp->va_info.vi_width) * adp->va_info.vi_cheight; 822 col = (off % adp->va_info.vi_width) * adp->va_info.vi_cwidth; 823 p = sc->sc_font + c*sc->sc_font_height; 824 addr = (u_int32_t *)((uintptr_t)sc->sc_addr 825 + (row + sc->sc_ymargin)*sc->sc_stride 826 + col + sc->sc_xmargin); 827 828 fg = ofwfb_foreground(a); 829 bg = ofwfb_background(a); 830 831 for (i = 0; i < sc->sc_font_height; i++) { 832 u_char fline = p[i]; 833 834 /* 835 * Assume that there is more background than foreground 836 * in characters and init accordingly 837 */ 838 ch1.l = ch2.l = (bg << 24) | (bg << 16) | (bg << 8) | bg; 839 840 /* 841 * Calculate 2 x 4-chars at a time, and then 842 * write these out. 843 */ 844 if (fline & 0x80) ch1.c[0] = fg; 845 if (fline & 0x40) ch1.c[1] = fg; 846 if (fline & 0x20) ch1.c[2] = fg; 847 if (fline & 0x10) ch1.c[3] = fg; 848 849 if (fline & 0x08) ch2.c[0] = fg; 850 if (fline & 0x04) ch2.c[1] = fg; 851 if (fline & 0x02) ch2.c[2] = fg; 852 if (fline & 0x01) ch2.c[3] = fg; 853 854 addr[0] = ch1.l; 855 addr[1] = ch2.l; 856 addr += (sc->sc_stride / sizeof(u_int32_t)); 857 } 858 859 return (0); 860 } 861 862 static int 863 ofwfb_putc32(video_adapter_t *adp, vm_offset_t off, uint8_t c, uint8_t a) 864 { 865 struct ofwfb_softc *sc; 866 int row; 867 int col; 868 int i, j, k; 869 uint32_t *addr, fg, bg; 870 u_char *p; 871 872 sc = (struct ofwfb_softc *)adp; 873 row = (off / adp->va_info.vi_width) * adp->va_info.vi_cheight; 874 col = (off % adp->va_info.vi_width) * adp->va_info.vi_cwidth; 875 p = sc->sc_font + c*sc->sc_font_height; 876 addr = (uint32_t *)sc->sc_addr 877 + (row + sc->sc_ymargin)*(sc->sc_stride/4) 878 + col + sc->sc_xmargin; 879 880 fg = ofwfb_pix32(sc, ofwfb_foreground(a)); 881 bg = ofwfb_pix32(sc, ofwfb_background(a)); 882 883 for (i = 0; i < sc->sc_font_height; i++) { 884 for (j = 0, k = 7; j < 8; j++, k--) { 885 if ((p[i] & (1 << k)) == 0) 886 *(addr + j) = bg; 887 else 888 *(addr + j) = fg; 889 } 890 addr += (sc->sc_stride/4); 891 } 892 893 return (0); 894 } 895 896 static int 897 ofwfb_putc(video_adapter_t *adp, vm_offset_t off, uint8_t c, uint8_t a) 898 { 899 struct ofwfb_softc *sc; 900 901 sc = (struct ofwfb_softc *)adp; 902 903 return ((*sc->sc_putc)(adp, off, c, a)); 904 } 905 906 static int 907 ofwfb_puts(video_adapter_t *adp, vm_offset_t off, u_int16_t *s, int len) 908 { 909 int i; 910 911 for (i = 0; i < len; i++) { 912 ofwfb_putc(adp, off + i, s[i] & 0xff, (s[i] & 0xff00) >> 8); 913 } 914 return (0); 915 } 916 917 static int 918 ofwfb_putm(video_adapter_t *adp, int x, int y, uint8_t *pixel_image, 919 uint32_t pixel_mask, int size, int width) 920 { 921 struct ofwfb_softc *sc; 922 923 sc = (struct ofwfb_softc *)adp; 924 925 return ((*sc->sc_putm)(adp, x, y, pixel_image, pixel_mask, size, 926 width)); 927 } 928 929 static int 930 ofwfb_putm8(video_adapter_t *adp, int x, int y, uint8_t *pixel_image, 931 uint32_t pixel_mask, int size, int width) 932 { 933 struct ofwfb_softc *sc; 934 int i, j, k; 935 uint8_t *addr; 936 u_char fg, bg; 937 938 sc = (struct ofwfb_softc *)adp; 939 addr = (u_int8_t *)((uintptr_t)sc->sc_addr 940 + (y + sc->sc_ymargin)*sc->sc_stride 941 + x + sc->sc_xmargin); 942 943 fg = ofwfb_foreground(SC_NORM_ATTR); 944 bg = ofwfb_background(SC_NORM_ATTR); 945 946 for (i = 0; i < size && i+y < sc->sc_height - 2*sc->sc_ymargin; i++) { 947 /* 948 * Calculate 2 x 4-chars at a time, and then 949 * write these out. 950 */ 951 for (j = 0, k = width; j < 8; j++, k--) { 952 if (x + j >= sc->sc_width - 2*sc->sc_xmargin) 953 continue; 954 955 if (pixel_image[i] & (1 << k)) 956 addr[j] = (addr[j] == fg) ? bg : fg; 957 } 958 959 addr += (sc->sc_stride / sizeof(u_int8_t)); 960 } 961 962 return (0); 963 } 964 965 static int 966 ofwfb_putm32(video_adapter_t *adp, int x, int y, uint8_t *pixel_image, 967 uint32_t pixel_mask, int size, int width) 968 { 969 struct ofwfb_softc *sc; 970 int i, j, k; 971 uint32_t fg, bg; 972 uint32_t *addr; 973 974 sc = (struct ofwfb_softc *)adp; 975 addr = (uint32_t *)sc->sc_addr 976 + (y + sc->sc_ymargin)*(sc->sc_stride/4) 977 + x + sc->sc_xmargin; 978 979 fg = ofwfb_pix32(sc, ofwfb_foreground(SC_NORM_ATTR)); 980 bg = ofwfb_pix32(sc, ofwfb_background(SC_NORM_ATTR)); 981 982 for (i = 0; i < size && i+y < sc->sc_height - 2*sc->sc_ymargin; i++) { 983 for (j = 0, k = width; j < 8; j++, k--) { 984 if (x + j >= sc->sc_width - 2*sc->sc_xmargin) 985 continue; 986 987 if (pixel_image[i] & (1 << k)) 988 *(addr + j) = (*(addr + j) == fg) ? bg : fg; 989 } 990 addr += (sc->sc_stride/4); 991 } 992 993 return (0); 994 } 995 996 /* 997 * Define the syscons nexus device attachment 998 */ 999 static void 1000 ofwfb_scidentify(driver_t *driver, device_t parent) 1001 { 1002 device_t child; 1003 1004 /* 1005 * Add with a priority guaranteed to make it last on 1006 * the device list 1007 */ 1008 child = BUS_ADD_CHILD(parent, INT_MAX, SC_DRIVER_NAME, 0); 1009 } 1010 1011 static int 1012 ofwfb_scprobe(device_t dev) 1013 { 1014 int error; 1015 1016 device_set_desc(dev, "System console"); 1017 1018 error = sc_probe_unit(device_get_unit(dev), 1019 device_get_flags(dev) | SC_AUTODETECT_KBD); 1020 if (error != 0) 1021 return (error); 1022 1023 /* This is a fake device, so make sure we added it ourselves */ 1024 return (BUS_PROBE_NOWILDCARD); 1025 } 1026 1027 static int 1028 ofwfb_scattach(device_t dev) 1029 { 1030 return (sc_attach_unit(device_get_unit(dev), 1031 device_get_flags(dev) | SC_AUTODETECT_KBD)); 1032 } 1033 1034 static device_method_t ofwfb_sc_methods[] = { 1035 DEVMETHOD(device_identify, ofwfb_scidentify), 1036 DEVMETHOD(device_probe, ofwfb_scprobe), 1037 DEVMETHOD(device_attach, ofwfb_scattach), 1038 { 0, 0 } 1039 }; 1040 1041 static driver_t ofwfb_sc_driver = { 1042 SC_DRIVER_NAME, 1043 ofwfb_sc_methods, 1044 sizeof(sc_softc_t), 1045 }; 1046 1047 static devclass_t sc_devclass; 1048 1049 DRIVER_MODULE(ofwfb, nexus, ofwfb_sc_driver, sc_devclass, 0, 0); 1050 1051 /* 1052 * Define a stub keyboard driver in case one hasn't been 1053 * compiled into the kernel 1054 */ 1055 #include <sys/kbio.h> 1056 #include <dev/kbd/kbdreg.h> 1057 1058 static int dummy_kbd_configure(int flags); 1059 1060 keyboard_switch_t dummysw; 1061 1062 static int 1063 dummy_kbd_configure(int flags) 1064 { 1065 1066 return (0); 1067 } 1068 KEYBOARD_DRIVER(dummy, dummysw, dummy_kbd_configure); 1069 1070 /* 1071 * Utility routines from <dev/fb/fbreg.h> 1072 */ 1073 void 1074 ofwfb_bcopy(const void *s, void *d, size_t c) 1075 { 1076 bcopy(s, d, c); 1077 } 1078 1079 void 1080 ofwfb_bzero(void *d, size_t c) 1081 { 1082 bzero(d, c); 1083 } 1084 1085 void 1086 ofwfb_fillw(int pat, void *base, size_t cnt) 1087 { 1088 u_int16_t *bptr = base; 1089 1090 while (cnt--) 1091 *bptr++ = pat; 1092 } 1093 1094 u_int16_t 1095 ofwfb_readw(u_int16_t *addr) 1096 { 1097 return (*addr); 1098 } 1099 1100 void 1101 ofwfb_writew(u_int16_t *addr, u_int16_t val) 1102 { 1103 *addr = val; 1104 } 1105