sys/powerpc/ofw/ofw_syscons.c

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