1/* $NetBSD: gfb.c,v 1.12 2023/12/20 05:33:58 thorpej Exp $ */ 2 3/* 4 * Copyright (c) 2009 Michael Lorenz 5 * All rights reserved. 6 * 7 * Redistribution and use in source and binary forms, with or without 8 * modification, are permitted provided that the following conditions 9 * are met: 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 2. Redistributions in binary form must reproduce the above copyright 13 * notice, this list of conditions and the following disclaimer in the 14 * documentation and/or other materials provided with the distribution. 15 * 16 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 17 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 18 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 19 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 20 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 21 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 22 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 23 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 24 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 25 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 26 */ 27 28/* 29 * A console driver for Sun XVR-1000 graphics cards 30 */ 31 32#include <sys/cdefs.h> 33__KERNEL_RCSID(0, "$NetBSD: gfb.c,v 1.12 2023/12/20 05:33:58 thorpej Exp $"); 34 35#include <sys/param.h> 36#include <sys/systm.h> 37#include <sys/kernel.h> 38#include <sys/device.h> 39#include <sys/lwp.h> 40#include <sys/kauth.h> 41#include <sys/kmem.h> 42 43#include <uvm/uvm_extern.h> 44 45#include <dev/videomode/videomode.h> 46 47#include <sys/bus.h> 48#include <machine/autoconf.h> 49#include <machine/openfirm.h> 50 51#include <dev/wscons/wsdisplayvar.h> 52#include <dev/wscons/wsconsio.h> 53#include <dev/wsfont/wsfont.h> 54#include <dev/rasops/rasops.h> 55#include <dev/wscons/wsdisplay_vconsvar.h> 56 57 58struct gfb_softc { 59 device_t sc_dev; 60 61 bus_space_tag_t sc_memt; 62 63 bus_space_handle_t sc_fbh; 64 bus_addr_t sc_fb_paddr; 65 66 int sc_width, sc_height, sc_depth, sc_stride, sc_fblen; 67 int sc_locked; 68 void *sc_fbaddr; 69 struct vcons_screen sc_console_screen; 70 struct wsscreen_descr sc_defaultscreen_descr; 71 const struct wsscreen_descr *sc_screens[1]; 72 struct wsscreen_list sc_screenlist; 73 struct vcons_data vd; 74 int sc_mode; 75 int sc_node; 76 u_char sc_cmap_red[256]; 77 u_char sc_cmap_green[256]; 78 u_char sc_cmap_blue[256]; 79}; 80 81static int gfb_match(device_t, cfdata_t, void *); 82static void gfb_attach(device_t, device_t, void *); 83 84CFATTACH_DECL_NEW(gfb, sizeof(struct gfb_softc), 85 gfb_match, gfb_attach, NULL, NULL); 86 87extern const u_char rasops_cmap[768]; 88 89static int gfb_ioctl(void *, void *, u_long, void *, int, 90 struct lwp *); 91static paddr_t gfb_mmap(void *, void *, off_t, int); 92static void gfb_init_screen(void *, struct vcons_screen *, int, long *); 93 94static int gfb_putcmap(struct gfb_softc *, struct wsdisplay_cmap *); 95static int gfb_getcmap(struct gfb_softc *, struct wsdisplay_cmap *); 96static void gfb_restore_palette(struct gfb_softc *); 97static int gfb_putpalreg(struct gfb_softc *, uint8_t, uint8_t, 98 uint8_t, uint8_t); 99 100struct wsdisplay_accessops gfb_accessops = { 101 gfb_ioctl, 102 gfb_mmap, 103 NULL, /* alloc_screen */ 104 NULL, /* free_screen */ 105 NULL, /* show_screen */ 106 NULL, /* load_font */ 107 NULL, /* pollc */ 108 NULL /* scroll */ 109}; 110 111extern int prom_stdout_node; 112 113static int 114gfb_match(device_t parent, cfdata_t match, void *aux) 115{ 116 struct mainbus_attach_args *ma = aux; 117 118 if (strcmp(ma->ma_name, "SUNW,gfb") == 0 ) 119 return 100; 120 return 0; 121} 122 123static void 124gfb_attach(device_t parent, device_t self, void *aux) 125{ 126 struct gfb_softc *sc = device_private(self); 127 struct mainbus_attach_args *ma = aux; 128 struct rasops_info *ri; 129 struct wsemuldisplaydev_attach_args aa; 130 unsigned long defattr; 131 bool is_console; 132 int i, j; 133 134 sc->sc_memt = ma->ma_bustag; 135 sc->sc_dev = self; 136 sc->sc_node = ma->ma_node; 137 138 if (ma->ma_nreg < 7) { 139 aprint_error("%s: can't find the fb range\n", 140 device_xname(self)); 141 return; 142 } 143 144 is_console = (prom_stdout_node == ma->ma_node); 145 146 aprint_normal(": Sun XVR-1000%s\n", is_console ? " (console)" : ""); 147 148 sc->sc_depth = 32; 149 sc->sc_stride = 0x4000; 150 sc->sc_height = prom_getpropint(sc->sc_node, "height", 0); 151 sc->sc_width = prom_getpropint(sc->sc_node, "width", 0); 152 sc->sc_fblen = sc->sc_stride * sc->sc_height; 153 154 if (sc->sc_fblen == 0) { 155 aprint_error("%s: not set up by firmware, can't continue.\n", 156 device_xname(self)); 157 return; 158 } 159 160 sc->sc_locked = 0; 161 sc->sc_mode = WSDISPLAYIO_MODE_EMUL; 162 163 if (bus_space_map(sc->sc_memt, ma->ma_reg[6].ur_paddr, 164 sc->sc_fblen, BUS_SPACE_MAP_LINEAR | BUS_SPACE_MAP_PREFETCHABLE, 165 &sc->sc_fbh)) { 166 printf(": failed to map the framebuffer\n"); 167 return; 168 } 169 sc->sc_fbaddr = bus_space_vaddr(sc->sc_memt, sc->sc_fbh); 170 sc->sc_fb_paddr = ma->ma_reg[6].ur_paddr; 171 172 sc->sc_defaultscreen_descr = (struct wsscreen_descr){ 173 "default", 174 0, 0, 175 NULL, 176 8, 16, 177 WSSCREEN_WSCOLORS | WSSCREEN_HILIT, 178 NULL 179 }; 180 sc->sc_screens[0] = &sc->sc_defaultscreen_descr; 181 sc->sc_screenlist = (struct wsscreen_list){1, sc->sc_screens}; 182 sc->sc_mode = WSDISPLAYIO_MODE_EMUL; 183 sc->sc_locked = 0; 184 185 vcons_init(&sc->vd, sc, &sc->sc_defaultscreen_descr, 186 &gfb_accessops); 187 sc->vd.init_screen = gfb_init_screen; 188 189 ri = &sc->sc_console_screen.scr_ri; 190 191 j = 0; 192 for (i = 0; i < 256; i++) { 193 194 sc->sc_cmap_red[i] = rasops_cmap[j]; 195 sc->sc_cmap_green[i] = rasops_cmap[j + 1]; 196 sc->sc_cmap_blue[i] = rasops_cmap[j + 2]; 197 gfb_putpalreg(sc, i, rasops_cmap[j], rasops_cmap[j + 1], 198 rasops_cmap[j + 2]); 199 j += 3; 200 } 201 202 if (is_console) { 203 vcons_init_screen(&sc->vd, &sc->sc_console_screen, 1, 204 &defattr); 205 sc->sc_console_screen.scr_flags |= VCONS_SCREEN_IS_STATIC; 206 207#if notyet 208 gfb_rectfill(sc, 0, 0, sc->sc_width, sc->sc_height, 209 ri->ri_devcmap[(defattr >> 16) & 0xff]); 210#endif 211 sc->sc_defaultscreen_descr.textops = &ri->ri_ops; 212 sc->sc_defaultscreen_descr.capabilities = ri->ri_caps; 213 sc->sc_defaultscreen_descr.nrows = ri->ri_rows; 214 sc->sc_defaultscreen_descr.ncols = ri->ri_cols; 215 wsdisplay_cnattach(&sc->sc_defaultscreen_descr, ri, 0, 0, 216 defattr); 217 vcons_replay_msgbuf(&sc->sc_console_screen); 218 } else { 219 /* 220 * since we're not the console we can postpone the rest 221 * until someone actually allocates a screen for us 222 */ 223 (*ri->ri_ops.allocattr)(ri, 0, 0, 0, &defattr); 224 } 225 226 aa.console = is_console; 227 aa.scrdata = &sc->sc_screenlist; 228 aa.accessops = &gfb_accessops; 229 aa.accesscookie = &sc->vd; 230 231 config_found(sc->sc_dev, &aa, wsemuldisplaydevprint, CFARGS_NONE); 232 233#ifdef GFB_DEBUG 234 /* 235 * now dump a register range 236 * try 1, 2 and 4 since they're only 0x2000 each 237 */ 238 bus_space_handle_t regh; 239 240 if (bus_space_map(sc->sc_memt, ma->ma_reg[3].ur_paddr, 241 0x2000, BUS_SPACE_MAP_LINEAR, ®h) == 0) { 242 for (i = 0; i < 0x200; i += 32) { 243 printf("%04x", i); 244 for (j = 0; j < 32; j += 4) { 245 printf(" %08x", bus_space_read_4(sc->sc_memt, 246 regh, i + j)); 247 } 248 printf("\n"); 249 } 250 bus_space_unmap(sc->sc_memt, regh, 0x2000); 251 } 252#endif 253} 254 255static int 256gfb_ioctl(void *v, void *vs, u_long cmd, void *data, int flag, 257 struct lwp *l) 258{ 259 struct vcons_data *vd = v; 260 struct gfb_softc *sc = vd->cookie; 261 struct wsdisplay_fbinfo *wdf; 262 struct vcons_screen *ms = vd->active; 263 264 switch (cmd) { 265 266 case WSDISPLAYIO_GTYPE: 267 *(u_int *)data = WSDISPLAY_TYPE_XVR1000; 268 return 0; 269 270 case WSDISPLAYIO_GINFO: 271 if (ms == NULL) 272 return ENODEV; 273 wdf = (void *)data; 274 wdf->height = ms->scr_ri.ri_height; 275 wdf->width = ms->scr_ri.ri_width; 276 wdf->depth = ms->scr_ri.ri_depth; 277 wdf->cmsize = 256; 278 return 0; 279 280 case WSDISPLAYIO_GETCMAP: 281 return gfb_getcmap(sc, 282 (struct wsdisplay_cmap *)data); 283 284 case WSDISPLAYIO_PUTCMAP: 285 return gfb_putcmap(sc, 286 (struct wsdisplay_cmap *)data); 287 288 case WSDISPLAYIO_LINEBYTES: 289 *(u_int *)data = sc->sc_stride; 290 return 0; 291 292 case WSDISPLAYIO_SMODE: 293 { 294 int new_mode = *(int*)data; 295 296 /* notify the bus backend */ 297 if (new_mode != sc->sc_mode) { 298 sc->sc_mode = new_mode; 299 if(new_mode == WSDISPLAYIO_MODE_EMUL) { 300 gfb_restore_palette(sc); 301 vcons_redraw_screen(ms); 302 } 303 } 304 } 305 return 0; 306 case WSDISPLAYIO_GET_FBINFO: 307 { 308 struct wsdisplayio_fbinfo *fbi = data; 309 return wsdisplayio_get_fbinfo(&ms->scr_ri, fbi); 310 } 311 } 312 return EPASSTHROUGH; 313} 314 315static paddr_t 316gfb_mmap(void *v, void *vs, off_t offset, int prot) 317{ 318 struct vcons_data *vd = v; 319 struct gfb_softc *sc = vd->cookie; 320 paddr_t pa; 321 322 /* 'regular' framebuffer mmap()ing */ 323 if (offset < sc->sc_fblen) { 324 /* 325 * XXX 326 * BUS_SPACE_MAP_PREFETCHABLE produces artifacts with X, but 327 * not with the console code, so don't set it here 328 */ 329 pa = bus_space_mmap(sc->sc_memt, sc->sc_fb_paddr + offset, 0, 330 prot, BUS_SPACE_MAP_LINEAR); 331 return pa; 332 } 333 334 /* 335 * restrict all other mappings to processes with superuser privileges 336 * or the kernel itself 337 */ 338 if (kauth_authorize_machdep(kauth_cred_get(), KAUTH_MACHDEP_UNMANAGEDMEM, 339 NULL, NULL, NULL, NULL) != 0) { 340 aprint_normal("%s: mmap() rejected.\n", 341 device_xname(sc->sc_dev)); 342 return -1; 343 } 344 345 /* let userland map other ranges */ 346 347 return -1; 348} 349 350static void 351gfb_init_screen(void *cookie, struct vcons_screen *scr, 352 int existing, long *defattr) 353{ 354 struct gfb_softc *sc = cookie; 355 struct rasops_info *ri = &scr->scr_ri; 356 357 ri->ri_depth = sc->sc_depth; 358 ri->ri_width = sc->sc_width; 359 ri->ri_height = sc->sc_height; 360 ri->ri_stride = sc->sc_stride; 361 ri->ri_flg = RI_CENTER | RI_FULLCLEAR | RI_ENABLE_ALPHA; 362 363 ri->ri_bits = (char *)sc->sc_fbaddr; 364 scr->scr_flags |= VCONS_DONT_READ; 365 366 if (existing) { 367 ri->ri_flg |= RI_CLEAR; 368 } 369 370 /* explicitly request BGR in case the default changes */ 371 ri->ri_rnum = 8; 372 ri->ri_gnum = 8; 373 ri->ri_bnum = 8; 374 ri->ri_rpos = 0; 375 ri->ri_gpos = 8; 376 ri->ri_bpos = 16; 377 378 rasops_init(ri, 0, 0); 379 ri->ri_caps = WSSCREEN_WSCOLORS; 380 381 rasops_reconfig(ri, sc->sc_height / ri->ri_font->fontheight, 382 sc->sc_width / ri->ri_font->fontwidth); 383 384 ri->ri_hw = scr; 385#if 0 386 ri->ri_ops.copyrows = gfb_copyrows; 387 ri->ri_ops.copycols = gfb_copycols; 388 ri->ri_ops.cursor = gfb_cursor; 389 ri->ri_ops.eraserows = gfb_eraserows; 390 ri->ri_ops.erasecols = gfb_erasecols; 391 ri->ri_ops.putchar = gfb_putchar; 392#endif 393} 394 395static int 396gfb_putcmap(struct gfb_softc *sc, struct wsdisplay_cmap *cm) 397{ 398 u_char *r, *g, *b; 399 u_int index = cm->index; 400 u_int count = cm->count; 401 int i, error; 402 u_char rbuf[256], gbuf[256], bbuf[256]; 403 404#ifdef GFB_DEBUG 405 aprint_debug("putcmap: %d %d\n",index, count); 406#endif 407 if (cm->index >= 256 || cm->count > 256 || 408 (cm->index + cm->count) > 256) 409 return EINVAL; 410 error = copyin(cm->red, &rbuf[index], count); 411 if (error) 412 return error; 413 error = copyin(cm->green, &gbuf[index], count); 414 if (error) 415 return error; 416 error = copyin(cm->blue, &bbuf[index], count); 417 if (error) 418 return error; 419 420 memcpy(&sc->sc_cmap_red[index], &rbuf[index], count); 421 memcpy(&sc->sc_cmap_green[index], &gbuf[index], count); 422 memcpy(&sc->sc_cmap_blue[index], &bbuf[index], count); 423 424 r = &sc->sc_cmap_red[index]; 425 g = &sc->sc_cmap_green[index]; 426 b = &sc->sc_cmap_blue[index]; 427 428 for (i = 0; i < count; i++) { 429 gfb_putpalreg(sc, index, *r, *g, *b); 430 index++; 431 r++, g++, b++; 432 } 433 return 0; 434} 435 436static int 437gfb_getcmap(struct gfb_softc *sc, struct wsdisplay_cmap *cm) 438{ 439 u_int index = cm->index; 440 u_int count = cm->count; 441 int error; 442 443 if (index >= 255 || count > 256 || index + count > 256) 444 return EINVAL; 445 446 error = copyout(&sc->sc_cmap_red[index], cm->red, count); 447 if (error) 448 return error; 449 error = copyout(&sc->sc_cmap_green[index], cm->green, count); 450 if (error) 451 return error; 452 error = copyout(&sc->sc_cmap_blue[index], cm->blue, count); 453 if (error) 454 return error; 455 456 return 0; 457} 458 459static void 460gfb_restore_palette(struct gfb_softc *sc) 461{ 462 int i; 463 464 for (i = 0; i < (1 << sc->sc_depth); i++) { 465 gfb_putpalreg(sc, i, sc->sc_cmap_red[i], 466 sc->sc_cmap_green[i], sc->sc_cmap_blue[i]); 467 } 468} 469 470static int 471gfb_putpalreg(struct gfb_softc *sc, uint8_t idx, uint8_t r, uint8_t g, 472 uint8_t b) 473{ 474 return 0; 475} 476