Home | History | Annotate | Line # | Download | only in dev
gfb.c revision 1.2
      1 /*	$NetBSD: gfb.c,v 1.2 2009/12/31 05:08:05 macallan 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.2 2009/12/31 05:08:05 macallan 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/malloc.h>
     40 #include <sys/lwp.h>
     41 #include <sys/kauth.h>
     42 #include <sys/kmem.h>
     43 
     44 #include <uvm/uvm_extern.h>
     45 
     46 #include <dev/videomode/videomode.h>
     47 
     48 #include <machine/bus.h>
     49 #include <machine/autoconf.h>
     50 #include <machine/openfirm.h>
     51 
     52 #include <dev/wscons/wsdisplayvar.h>
     53 #include <dev/wscons/wsconsio.h>
     54 #include <dev/wsfont/wsfont.h>
     55 #include <dev/rasops/rasops.h>
     56 #include <dev/wscons/wsdisplay_vconsvar.h>
     57 
     58 
     59 struct gfb_softc {
     60 	device_t sc_dev;
     61 
     62 	bus_space_tag_t sc_memt;
     63 
     64 	bus_space_handle_t sc_fbh;
     65 	bus_addr_t sc_fb_paddr;
     66 
     67 	int sc_width, sc_height, sc_depth, sc_stride, sc_fblen;
     68 	int sc_locked;
     69 	void *sc_fbaddr, *sc_shadow;
     70 	struct vcons_screen sc_console_screen;
     71 	struct wsscreen_descr sc_defaultscreen_descr;
     72 	const struct wsscreen_descr *sc_screens[1];
     73 	struct wsscreen_list sc_screenlist;
     74 	struct vcons_data vd;
     75 	int sc_mode;
     76 	int sc_node;
     77 	u_char sc_cmap_red[256];
     78 	u_char sc_cmap_green[256];
     79 	u_char sc_cmap_blue[256];
     80 };
     81 
     82 static int	gfb_match(device_t, cfdata_t, void *);
     83 static void	gfb_attach(device_t, device_t, void *);
     84 
     85 CFATTACH_DECL_NEW(gfb, sizeof(struct gfb_softc),
     86     gfb_match, gfb_attach, NULL, NULL);
     87 
     88 extern const u_char rasops_cmap[768];
     89 
     90 static int	gfb_ioctl(void *, void *, u_long, void *, int,
     91 			     struct lwp *);
     92 static paddr_t	gfb_mmap(void *, void *, off_t, int);
     93 static void	gfb_init_screen(void *, struct vcons_screen *, int, long *);
     94 
     95 static int	gfb_putcmap(struct gfb_softc *, struct wsdisplay_cmap *);
     96 static int 	gfb_getcmap(struct gfb_softc *, struct wsdisplay_cmap *);
     97 static void	gfb_restore_palette(struct gfb_softc *);
     98 static int 	gfb_putpalreg(struct gfb_softc *, uint8_t, uint8_t,
     99 			    uint8_t, uint8_t);
    100 
    101 struct wsdisplay_accessops gfb_accessops = {
    102 	gfb_ioctl,
    103 	gfb_mmap,
    104 	NULL,	/* alloc_screen */
    105 	NULL,	/* free_screen */
    106 	NULL,	/* show_screen */
    107 	NULL, 	/* load_font */
    108 	NULL,	/* pollc */
    109 	NULL	/* scroll */
    110 };
    111 
    112 extern int prom_stdout_node;
    113 
    114 static int
    115 gfb_match(device_t parent, cfdata_t match, void *aux)
    116 {
    117 	struct mainbus_attach_args *ma = aux;
    118 
    119 	if (strcmp(ma->ma_name, "SUNW,gfb") == 0 )
    120 		return 100;
    121 	return 0;
    122 }
    123 
    124 static void
    125 gfb_attach(device_t parent, device_t self, void *aux)
    126 {
    127 	struct gfb_softc	*sc = device_private(self);
    128 	struct mainbus_attach_args	*ma = aux;
    129 	struct rasops_info	*ri;
    130 	struct wsemuldisplaydev_attach_args aa;
    131 	unsigned long		defattr;
    132 	bool			is_console;
    133 	int i, j;
    134 
    135 	sc->sc_memt = ma->ma_bustag;
    136 	sc->sc_dev = self;
    137 	sc->sc_node = ma->ma_node;
    138 
    139 	if (ma->ma_nreg < 7) {
    140 		aprint_error("%s: can't find the fb range\n",
    141 		    device_xname(self));
    142 		return;
    143 	}
    144 
    145 	is_console = (prom_stdout_node == ma->ma_node);
    146 
    147 	aprint_normal(": Sun XVR-1000%s\n", is_console ? " (console)" : "");
    148 
    149 	sc->sc_depth = 32;
    150 	sc->sc_stride = 0x4000;
    151 	sc->sc_height = prom_getpropint(sc->sc_node, "height", 0);
    152 	sc->sc_width = prom_getpropint(sc->sc_node, "width", 0);
    153 	sc->sc_fblen = sc->sc_stride * sc->sc_height;
    154 
    155 	if (sc->sc_fblen == 0) {
    156 		aprint_error("%s: not set up by firmware, can't continue.\n",
    157 		    device_xname(self));
    158 		return;
    159 	}
    160 
    161 	sc->sc_shadow = kmem_alloc(sc->sc_fblen, KM_SLEEP);
    162 	sc->sc_locked = 0;
    163 	sc->sc_mode = WSDISPLAYIO_MODE_EMUL;
    164 
    165 	if (bus_space_map(sc->sc_memt, ma->ma_reg[6].ur_paddr,
    166 	    sc->sc_fblen, BUS_SPACE_MAP_LINEAR, &sc->sc_fbh)) {
    167 		printf(": failed to map the framebuffer\n");
    168 		return;
    169 	}
    170 	sc->sc_fbaddr = bus_space_vaddr(sc->sc_memt, sc->sc_fbh);
    171 	sc->sc_fb_paddr = ma->ma_reg[6].ur_paddr;
    172 
    173 	sc->sc_defaultscreen_descr = (struct wsscreen_descr){
    174 		"default",
    175 		0, 0,
    176 		NULL,
    177 		8, 16,
    178 		WSSCREEN_WSCOLORS | WSSCREEN_HILIT,
    179 		NULL
    180 	};
    181 	sc->sc_screens[0] = &sc->sc_defaultscreen_descr;
    182 	sc->sc_screenlist = (struct wsscreen_list){1, sc->sc_screens};
    183 	sc->sc_mode = WSDISPLAYIO_MODE_EMUL;
    184 	sc->sc_locked = 0;
    185 
    186 	vcons_init(&sc->vd, sc, &sc->sc_defaultscreen_descr,
    187 	    &gfb_accessops);
    188 	sc->vd.init_screen = gfb_init_screen;
    189 
    190 	ri = &sc->sc_console_screen.scr_ri;
    191 
    192 	j = 0;
    193 	for (i = 0; i < (1 << sc->sc_depth); i++) {
    194 
    195 		sc->sc_cmap_red[i] = rasops_cmap[j];
    196 		sc->sc_cmap_green[i] = rasops_cmap[j + 1];
    197 		sc->sc_cmap_blue[i] = rasops_cmap[j + 2];
    198 		gfb_putpalreg(sc, i, rasops_cmap[j], rasops_cmap[j + 1],
    199 		    rasops_cmap[j + 2]);
    200 		j += 3;
    201 	}
    202 
    203 	if (is_console) {
    204 		vcons_init_screen(&sc->vd, &sc->sc_console_screen, 1,
    205 		    &defattr);
    206 		sc->sc_console_screen.scr_flags |= VCONS_SCREEN_IS_STATIC;
    207 
    208 #if notyet
    209 		gfb_rectfill(sc, 0, 0, sc->sc_width, sc->sc_height,
    210 		    ri->ri_devcmap[(defattr >> 16) & 0xff]);
    211 #endif
    212 		sc->sc_defaultscreen_descr.textops = &ri->ri_ops;
    213 		sc->sc_defaultscreen_descr.capabilities = ri->ri_caps;
    214 		sc->sc_defaultscreen_descr.nrows = ri->ri_rows;
    215 		sc->sc_defaultscreen_descr.ncols = ri->ri_cols;
    216 		wsdisplay_cnattach(&sc->sc_defaultscreen_descr, ri, 0, 0,
    217 		    defattr);
    218 		vcons_replay_msgbuf(&sc->sc_console_screen);
    219 	} else {
    220 		/*
    221 		 * since we're not the console we can postpone the rest
    222 		 * until someone actually allocates a screen for us
    223 		 */
    224 		(*ri->ri_ops.allocattr)(ri, 0, 0, 0, &defattr);
    225 	}
    226 
    227 	aa.console = is_console;
    228 	aa.scrdata = &sc->sc_screenlist;
    229 	aa.accessops = &gfb_accessops;
    230 	aa.accesscookie = &sc->vd;
    231 
    232 	config_found(sc->sc_dev, &aa, wsemuldisplaydevprint);
    233 }
    234 
    235 static int
    236 gfb_ioctl(void *v, void *vs, u_long cmd, void *data, int flag,
    237 	struct lwp *l)
    238 {
    239 	struct vcons_data *vd = v;
    240 	struct gfb_softc *sc = vd->cookie;
    241 	struct wsdisplay_fbinfo *wdf;
    242 	struct vcons_screen *ms = vd->active;
    243 
    244 	switch (cmd) {
    245 
    246 		case WSDISPLAYIO_GTYPE:
    247 			*(u_int *)data = WSDISPLAY_TYPE_XVR1000;
    248 			return 0;
    249 
    250 		case WSDISPLAYIO_GINFO:
    251 			if (ms == NULL)
    252 				return ENODEV;
    253 			wdf = (void *)data;
    254 			wdf->height = ms->scr_ri.ri_height;
    255 			wdf->width = ms->scr_ri.ri_width;
    256 			wdf->depth = ms->scr_ri.ri_depth;
    257 			wdf->cmsize = 256;
    258 			return 0;
    259 
    260 		case WSDISPLAYIO_GETCMAP:
    261 			return gfb_getcmap(sc,
    262 			    (struct wsdisplay_cmap *)data);
    263 
    264 		case WSDISPLAYIO_PUTCMAP:
    265 			return gfb_putcmap(sc,
    266 			    (struct wsdisplay_cmap *)data);
    267 
    268 		case WSDISPLAYIO_LINEBYTES:
    269 			*(u_int *)data = sc->sc_stride;
    270 			return 0;
    271 
    272 		case WSDISPLAYIO_SMODE:
    273 			{
    274 				int new_mode = *(int*)data;
    275 
    276 				/* notify the bus backend */
    277 				if (new_mode != sc->sc_mode) {
    278 					sc->sc_mode = new_mode;
    279 					if(new_mode == WSDISPLAYIO_MODE_EMUL) {
    280 						gfb_restore_palette(sc);
    281 						vcons_redraw_screen(ms);
    282 					}
    283 				}
    284 			}
    285 			return 0;
    286 	}
    287 	return EPASSTHROUGH;
    288 }
    289 
    290 static paddr_t
    291 gfb_mmap(void *v, void *vs, off_t offset, int prot)
    292 {
    293 	struct vcons_data *vd = v;
    294 	struct gfb_softc *sc = vd->cookie;
    295 	paddr_t pa;
    296 
    297 	/* 'regular' framebuffer mmap()ing */
    298 	if (offset < sc->sc_fblen) {
    299 		pa = bus_space_mmap(sc->sc_memt, sc->sc_fb_paddr + offset, 0,
    300 		    prot, BUS_SPACE_MAP_LINEAR);
    301 		return pa;
    302 	}
    303 
    304 	/*
    305 	 * restrict all other mappings to processes with superuser privileges
    306 	 * or the kernel itself
    307 	 */
    308 	if (kauth_authorize_generic(kauth_cred_get(), KAUTH_GENERIC_ISSUSER,
    309 	    NULL) != 0) {
    310 		aprint_normal("%s: mmap() rejected.\n",
    311 		    device_xname(sc->sc_dev));
    312 		return -1;
    313 	}
    314 
    315 	/* let userland map other ranges */
    316 
    317 	return -1;
    318 }
    319 
    320 static void
    321 gfb_init_screen(void *cookie, struct vcons_screen *scr,
    322     int existing, long *defattr)
    323 {
    324 	struct gfb_softc *sc = cookie;
    325 	struct rasops_info *ri = &scr->scr_ri;
    326 
    327 	ri->ri_depth = sc->sc_depth;
    328 	ri->ri_width = sc->sc_width;
    329 	ri->ri_height = sc->sc_height;
    330 	ri->ri_stride = sc->sc_stride;
    331 	ri->ri_flg = RI_CENTER | RI_FULLCLEAR;
    332 
    333 	ri->ri_bits = sc->sc_shadow;
    334 	ri->ri_hwbits = (char *)sc->sc_fbaddr;
    335 
    336 	if (existing) {
    337 		ri->ri_flg |= RI_CLEAR;
    338 	}
    339 
    340 	rasops_init(ri, sc->sc_height / 8, sc->sc_width / 8);
    341 	ri->ri_caps = WSSCREEN_WSCOLORS;
    342 
    343 	rasops_reconfig(ri, sc->sc_height / ri->ri_font->fontheight,
    344 		    sc->sc_width / ri->ri_font->fontwidth);
    345 
    346 	ri->ri_hw = scr;
    347 #if 0
    348 	ri->ri_ops.copyrows = gfb_copyrows;
    349 	ri->ri_ops.copycols = gfb_copycols;
    350 	ri->ri_ops.cursor = gfb_cursor;
    351 	ri->ri_ops.eraserows = gfb_eraserows;
    352 	ri->ri_ops.erasecols = gfb_erasecols;
    353 	ri->ri_ops.putchar = gfb_putchar;
    354 #endif
    355 }
    356 
    357 static int
    358 gfb_putcmap(struct gfb_softc *sc, struct wsdisplay_cmap *cm)
    359 {
    360 	u_char *r, *g, *b;
    361 	u_int index = cm->index;
    362 	u_int count = cm->count;
    363 	int i, error;
    364 	u_char rbuf[256], gbuf[256], bbuf[256];
    365 
    366 #ifdef GFB_DEBUG
    367 	aprint_debug("putcmap: %d %d\n",index, count);
    368 #endif
    369 	if (cm->index >= 256 || cm->count > 256 ||
    370 	    (cm->index + cm->count) > 256)
    371 		return EINVAL;
    372 	error = copyin(cm->red, &rbuf[index], count);
    373 	if (error)
    374 		return error;
    375 	error = copyin(cm->green, &gbuf[index], count);
    376 	if (error)
    377 		return error;
    378 	error = copyin(cm->blue, &bbuf[index], count);
    379 	if (error)
    380 		return error;
    381 
    382 	memcpy(&sc->sc_cmap_red[index], &rbuf[index], count);
    383 	memcpy(&sc->sc_cmap_green[index], &gbuf[index], count);
    384 	memcpy(&sc->sc_cmap_blue[index], &bbuf[index], count);
    385 
    386 	r = &sc->sc_cmap_red[index];
    387 	g = &sc->sc_cmap_green[index];
    388 	b = &sc->sc_cmap_blue[index];
    389 
    390 	for (i = 0; i < count; i++) {
    391 		gfb_putpalreg(sc, index, *r, *g, *b);
    392 		index++;
    393 		r++, g++, b++;
    394 	}
    395 	return 0;
    396 }
    397 
    398 static int
    399 gfb_getcmap(struct gfb_softc *sc, struct wsdisplay_cmap *cm)
    400 {
    401 	u_int index = cm->index;
    402 	u_int count = cm->count;
    403 	int error;
    404 
    405 	if (index >= 255 || count > 256 || index + count > 256)
    406 		return EINVAL;
    407 
    408 	error = copyout(&sc->sc_cmap_red[index],   cm->red,   count);
    409 	if (error)
    410 		return error;
    411 	error = copyout(&sc->sc_cmap_green[index], cm->green, count);
    412 	if (error)
    413 		return error;
    414 	error = copyout(&sc->sc_cmap_blue[index],  cm->blue,  count);
    415 	if (error)
    416 		return error;
    417 
    418 	return 0;
    419 }
    420 
    421 static void
    422 gfb_restore_palette(struct gfb_softc *sc)
    423 {
    424 	int i;
    425 
    426 	for (i = 0; i < (1 << sc->sc_depth); i++) {
    427 		gfb_putpalreg(sc, i, sc->sc_cmap_red[i],
    428 		    sc->sc_cmap_green[i], sc->sc_cmap_blue[i]);
    429 	}
    430 }
    431 
    432 static int
    433 gfb_putpalreg(struct gfb_softc *sc, uint8_t idx, uint8_t r, uint8_t g,
    434     uint8_t b)
    435 {
    436 	return 0;
    437 }
    438