Home | History | Annotate | Line # | Download | only in dev
lunafb.c revision 1.14
      1 /* $NetBSD: lunafb.c,v 1.14 2006/04/12 19:38:23 jmmv Exp $ */
      2 
      3 /*-
      4  * Copyright (c) 2000 The NetBSD Foundation, Inc.
      5  * All rights reserved.
      6  *
      7  * This code is derived from software contributed to The NetBSD Foundation
      8  * by Tohru Nishimura.
      9  *
     10  * Redistribution and use in source and binary forms, with or without
     11  * modification, are permitted provided that the following conditions
     12  * are met:
     13  * 1. Redistributions of source code must retain the above copyright
     14  *    notice, this list of conditions and the following disclaimer.
     15  * 2. Redistributions in binary form must reproduce the above copyright
     16  *    notice, this list of conditions and the following disclaimer in the
     17  *    documentation and/or other materials provided with the distribution.
     18  * 3. All advertising materials mentioning features or use of this software
     19  *    must display the following acknowledgement:
     20  *	This product includes software developed by the NetBSD
     21  *	Foundation, Inc. and its contributors.
     22  * 4. Neither the name of The NetBSD Foundation nor the names of its
     23  *    contributors may be used to endorse or promote products derived
     24  *    from this software without specific prior written permission.
     25  *
     26  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     27  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     28  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     29  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     30  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     31  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     32  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     33  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     34  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     35  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     36  * POSSIBILITY OF SUCH DAMAGE.
     37  */
     38 
     39 #include <sys/cdefs.h>			/* RCS ID & Copyright macro defns */
     40 
     41 __KERNEL_RCSID(0, "$NetBSD: lunafb.c,v 1.14 2006/04/12 19:38:23 jmmv Exp $");
     42 
     43 #include <sys/param.h>
     44 #include <sys/systm.h>
     45 #include <sys/conf.h>
     46 #include <sys/device.h>
     47 #include <sys/ioctl.h>
     48 #include <sys/malloc.h>
     49 #include <sys/mman.h>
     50 #include <sys/proc.h>
     51 #include <sys/tty.h>
     52 #include <sys/errno.h>
     53 #include <sys/buf.h>
     54 
     55 #include <uvm/uvm_extern.h>
     56 
     57 #include <dev/rcons/raster.h>
     58 #include <dev/wscons/wsconsio.h>
     59 #include <dev/wscons/wscons_raster.h>
     60 #include <dev/wscons/wsdisplayvar.h>
     61 
     62 #include <machine/cpu.h>
     63 #include <machine/autoconf.h>
     64 
     65 struct bt454 {
     66 	u_int8_t bt_addr;		/* map address register */
     67 	u_int8_t bt_cmap;		/* colormap data register */
     68 };
     69 
     70 struct bt458 {
     71 	u_int8_t bt_addr;		/* map address register */
     72 		unsigned :24;
     73 	u_int8_t bt_cmap;		/* colormap data register */
     74 		unsigned :24;
     75 	u_int8_t bt_ctrl;		/* control register */
     76 		unsigned :24;
     77 	u_int8_t bt_omap;		/* overlay (cursor) map register */
     78 		unsigned :24;
     79 };
     80 
     81 #define	OMFB_RFCNT	0xB1000000	/* video h-origin/v-origin */
     82 #define	OMFB_PLANEMASK	0xB1040000	/* planemask register */
     83 #define	OMFB_FB_WADDR	0xB1080008	/* common plane */
     84 #define	OMFB_FB_RADDR	0xB10C0008	/* plane #0 */
     85 #define	OMFB_ROPFUNC	0xB12C0000	/* ROP function code */
     86 #define	OMFB_RAMDAC	0xC1100000	/* Bt454/Bt458 RAMDAC */
     87 #define	OMFB_SIZE	(0xB1300000 - 0xB1080000 + PAGE_SIZE)
     88 
     89 struct om_hwdevconfig {
     90 	int	dc_wid;			/* width of frame buffer */
     91 	int	dc_ht;			/* height of frame buffer */
     92 	int	dc_depth;		/* depth, bits per pixel */
     93 	int	dc_rowbytes;		/* bytes in a FB scan line */
     94 	int	dc_cmsize;		/* colormap size */
     95 	vaddr_t	dc_videobase;		/* base of flat frame buffer */
     96 	struct raster	dc_raster;	/* raster description */
     97 	struct rcons	dc_rcons;	/* raster blitter control info */
     98 };
     99 
    100 struct hwcmap {
    101 #define CMAP_SIZE 256
    102 	u_int8_t r[CMAP_SIZE];
    103 	u_int8_t g[CMAP_SIZE];
    104 	u_int8_t b[CMAP_SIZE];
    105 };
    106 
    107 struct omfb_softc {
    108 	struct device sc_dev;		/* base device */
    109 	struct om_hwdevconfig *sc_dc;	/* device configuration */
    110 	struct hwcmap sc_cmap;		/* software copy of colormap */
    111 	int nscreens;
    112 };
    113 
    114 static int  omgetcmap __P((struct omfb_softc *, struct wsdisplay_cmap *));
    115 static int  omsetcmap __P((struct omfb_softc *, struct wsdisplay_cmap *));
    116 
    117 static struct om_hwdevconfig omfb_console_dc;
    118 static void omfb_getdevconfig __P((paddr_t, struct om_hwdevconfig *));
    119 
    120 extern struct wsdisplay_emulops omfb_emulops;
    121 
    122 static struct wsscreen_descr omfb_stdscreen = {
    123 	"std", 0, 0,
    124 	&omfb_emulops,
    125 	0, 0,
    126 	0
    127 };
    128 
    129 static const struct wsscreen_descr *_omfb_scrlist[] = {
    130 	&omfb_stdscreen,
    131 };
    132 
    133 static const struct wsscreen_list omfb_screenlist = {
    134 	sizeof(_omfb_scrlist) / sizeof(struct wsscreen_descr *), _omfb_scrlist
    135 };
    136 
    137 static int   omfbioctl __P((void *, void *, u_long, caddr_t, int,
    138 		            struct lwp *));
    139 static paddr_t omfbmmap __P((void *, void *, off_t, int));
    140 static int   omfb_alloc_screen __P((void *, const struct wsscreen_descr *,
    141 				      void **, int *, int *, long *));
    142 static void  omfb_free_screen __P((void *, void *));
    143 static int   omfb_show_screen __P((void *, void *, int,
    144 				void (*) (void *, int, int), void *));
    145 
    146 static const struct wsdisplay_accessops omfb_accessops = {
    147 	omfbioctl,
    148 	omfbmmap,
    149 	omfb_alloc_screen,
    150 	omfb_free_screen,
    151 	omfb_show_screen,
    152 	0 /* load_font */
    153 };
    154 
    155 static int  omfbmatch __P((struct device *, struct cfdata *, void *));
    156 static void omfbattach __P((struct device *, struct device *, void *));
    157 
    158 CFATTACH_DECL(fb, sizeof(struct omfb_softc),
    159     omfbmatch, omfbattach, NULL, NULL);
    160 extern struct cfdriver fb_cd;
    161 
    162 extern int hwplanemask;	/* hardware planemask; retrieved at boot */
    163 
    164 static int omfb_console;
    165 int  omfb_cnattach __P((void));
    166 
    167 static int
    168 omfbmatch(parent, cf, aux)
    169 	struct device *parent;
    170 	struct cfdata *cf;
    171 	void *aux;
    172 {
    173 	struct mainbus_attach_args *ma = aux;
    174 
    175 	if (strcmp(ma->ma_name, fb_cd.cd_name))
    176 		return (0);
    177 #if 0	/* XXX badaddr() bombs if no framebuffer is installed */
    178 	if (badaddr((caddr_t)ma->ma_addr, 4))
    179 		return (0);
    180 #else
    181 	if (hwplanemask == 0)
    182 		return (0);
    183 #endif
    184 	return (1);
    185 }
    186 
    187 static void
    188 omfbattach(parent, self, args)
    189 	struct device *parent, *self;
    190 	void *args;
    191 {
    192 	struct omfb_softc *sc = (struct omfb_softc *)self;
    193 	struct wsemuldisplaydev_attach_args waa;
    194 
    195 	if (omfb_console) {
    196 		sc->sc_dc = &omfb_console_dc;
    197 		sc->nscreens = 1;
    198 	}
    199 	else {
    200 		sc->sc_dc = (struct om_hwdevconfig *)
    201 		    malloc(sizeof(struct om_hwdevconfig), M_DEVBUF, M_WAITOK);
    202 		omfb_getdevconfig(OMFB_FB_WADDR, sc->sc_dc);
    203 	}
    204 	printf(": %d x %d, %dbpp\n", sc->sc_dc->dc_wid, sc->sc_dc->dc_ht,
    205 	    sc->sc_dc->dc_depth);
    206 
    207 #if 0	/* WHITE on BLACK */
    208 	cm = &sc->sc_cmap;
    209 	memset(cm, 255, sizeof(struct hwcmap));
    210 	cm->r[0] = cm->g[0] = cm->b[0] = 0;
    211 #endif
    212 	waa.console = omfb_console;
    213 	waa.scrdata = &omfb_screenlist;
    214 	waa.accessops = &omfb_accessops;
    215 	waa.accesscookie = sc;
    216 
    217 	config_found(self, &waa, wsemuldisplaydevprint);
    218 }
    219 
    220 /* EXPORT */ int
    221 omfb_cnattach()
    222 {
    223 	struct om_hwdevconfig *dc = &omfb_console_dc;
    224 	long defattr;
    225 
    226 	omfb_getdevconfig(OMFB_FB_WADDR, dc);
    227 	(*omfb_emulops.allocattr)(&dc->dc_rcons, 0, 0, 0, &defattr);
    228 	wsdisplay_cnattach(&omfb_stdscreen, &dc->dc_rcons, 0, 0, defattr);
    229 	omfb_console = 1;
    230 	return (0);
    231 }
    232 
    233 static int
    234 omfbioctl(v, vs, cmd, data, flag, l)
    235 	void *v;
    236 	void *vs;
    237 	u_long cmd;
    238 	caddr_t data;
    239 	int flag;
    240 	struct lwp *l;
    241 {
    242 	struct omfb_softc *sc = v;
    243 	struct om_hwdevconfig *dc = sc->sc_dc;
    244 
    245 	switch (cmd) {
    246 	case WSDISPLAYIO_GTYPE:
    247 		*(u_int *)data = 0x19990927;
    248 		return (0);
    249 
    250 	case WSDISPLAYIO_GINFO:
    251 #define	wsd_fbip ((struct wsdisplay_fbinfo *)data)
    252 		wsd_fbip->height = dc->dc_ht;
    253 		wsd_fbip->width = dc->dc_wid;
    254 		wsd_fbip->depth = dc->dc_depth;
    255 		wsd_fbip->cmsize = dc->dc_cmsize;
    256 #undef fbt
    257 		return (0);
    258 
    259 	case WSDISPLAYIO_GETCMAP:
    260 		return omgetcmap(sc, (struct wsdisplay_cmap *)data);
    261 
    262 	case WSDISPLAYIO_PUTCMAP:
    263 		return omsetcmap(sc, (struct wsdisplay_cmap *)data);
    264 
    265 	case WSDISPLAYIO_SVIDEO:
    266 	case WSDISPLAYIO_GVIDEO:
    267 	case WSDISPLAYIO_GCURPOS:
    268 	case WSDISPLAYIO_SCURPOS:
    269 	case WSDISPLAYIO_GCURMAX:
    270 	case WSDISPLAYIO_GCURSOR:
    271 	case WSDISPLAYIO_SCURSOR:
    272 		break;
    273 	}
    274 	return (EPASSTHROUGH);
    275 }
    276 
    277 /*
    278  * Return the address that would map the given device at the given
    279  * offset, allowing for the given protection, or return -1 for error.
    280  */
    281 static paddr_t
    282 omfbmmap(v, vs, offset, prot)
    283 	void *v;
    284 	void *vs;
    285 	off_t offset;
    286 	int prot;
    287 {
    288 	struct omfb_softc *sc = v;
    289 
    290 	if (offset >= OMFB_SIZE || offset < 0)
    291 		return (-1);
    292 	return m68k_btop(m68k_trunc_page(sc->sc_dc->dc_videobase) + offset);
    293 }
    294 
    295 static int
    296 omgetcmap(sc, p)
    297 	struct omfb_softc *sc;
    298 	struct wsdisplay_cmap *p;
    299 {
    300 	u_int index = p->index, count = p->count;
    301 	int cmsize, error;
    302 
    303 	cmsize = sc->sc_dc->dc_cmsize;
    304 	if (index >= cmsize || count > cmsize - index)
    305 		return (EINVAL);
    306 
    307 	error = copyout(&sc->sc_cmap.r[index], p->red, count);
    308 	if (error)
    309 		return error;
    310 	error = copyout(&sc->sc_cmap.g[index], p->green, count);
    311 	if (error)
    312 		return error;
    313 	error = copyout(&sc->sc_cmap.b[index], p->blue, count);
    314 	return error;
    315 }
    316 
    317 static int
    318 omsetcmap(sc, p)
    319 	struct omfb_softc *sc;
    320 	struct wsdisplay_cmap *p;
    321 {
    322 	struct hwcmap cmap;
    323 	u_int index = p->index, count = p->count;
    324 	int cmsize, i, error;
    325 
    326 	cmsize = sc->sc_dc->dc_cmsize;
    327 	if (index >= cmsize || (index + count) > cmsize)
    328 		return (EINVAL);
    329 
    330 	error = copyin(p->red, &cmap.r[index], count);
    331 	if (error)
    332 		return error;
    333 	error = copyin(p->green, &cmap.g[index], count);
    334 	if (error)
    335 		return error;
    336 	error = copyin(p->blue, &cmap.b[index], count);
    337 	if (error)
    338 		return error;
    339 
    340 	memcpy(&sc->sc_cmap.r[index], &cmap.r[index], count);
    341 	memcpy(&sc->sc_cmap.g[index], &cmap.g[index], count);
    342 	memcpy(&sc->sc_cmap.b[index], &cmap.b[index], count);
    343 	if (hwplanemask == 0x0f) {
    344 		struct bt454 *odac = (struct bt454 *)OMFB_RAMDAC;
    345 		odac->bt_addr = index;
    346 		for (i = index; i < count; i++) {
    347 			odac->bt_cmap = sc->sc_cmap.r[i];
    348 			odac->bt_cmap = sc->sc_cmap.g[i];
    349 			odac->bt_cmap = sc->sc_cmap.b[i];
    350 		}
    351 	}
    352 	else if (hwplanemask == 0xff) {
    353 		struct bt458 *ndac = (struct bt458 *)OMFB_RAMDAC;
    354 		ndac->bt_addr = index;
    355 		for (i = index; i < count; i++) {
    356 			ndac->bt_cmap = sc->sc_cmap.r[i];
    357 			ndac->bt_cmap = sc->sc_cmap.g[i];
    358 			ndac->bt_cmap = sc->sc_cmap.b[i];
    359 		}
    360 	}
    361 	return (0);
    362 }
    363 
    364 static void
    365 omfb_getdevconfig(paddr, dc)
    366 	paddr_t paddr;
    367 	struct om_hwdevconfig *dc;
    368 {
    369 	int bpp, i;
    370 	struct raster *rap;
    371 	struct rcons *rcp;
    372 	union {
    373 		struct { short h, v; } p;
    374 		u_int32_t u;
    375 	} rfcnt;
    376 
    377 	switch (hwplanemask) {
    378 	case 0xff:
    379 		bpp = 8;	/* XXX check monochrome bit in DIPSW */
    380 		break;
    381 	default:
    382 	case 0x0f:
    383 		bpp = 4;	/* XXX check monochrome bit in DIPSW */
    384 		break;
    385 	case 1:
    386 		bpp = 1;
    387 		break;
    388 	}
    389 	dc->dc_wid = 1280;
    390 	dc->dc_ht = 1024;
    391 	dc->dc_depth = bpp;
    392 	dc->dc_rowbytes = 2048 / 8;
    393 	dc->dc_cmsize = (bpp == 1) ? 0 : 1 << bpp;
    394 	dc->dc_videobase = paddr;
    395 
    396 #if 0 /* WHITE on BLACK XXX experiment resulted in WHITE on SKYBLUE... */
    397 	if (hwplanemask == 0x0f) {
    398 		/* XXX Need Bt454 initialization */
    399 		struct bt454 *odac = (struct bt454 *)OMFB_RAMDAC;
    400 		odac->bt_addr = 0;
    401 		odac->bt_cmap = 0;
    402 		odac->bt_cmap = 0;
    403 		odac->bt_cmap = 0;
    404 		for (i = 1; i < 16; i++) {
    405 			odac->bt_cmap = 255;
    406 			odac->bt_cmap = 255;
    407 			odac->bt_cmap = 255;
    408 		}
    409 	}
    410 	else if (hwplanemask == 0xff) {
    411 		struct bt458 *ndac = (struct bt458 *)OMFB_RAMDAC;
    412 
    413 		ndac->bt_addr = 0x04;
    414 		ndac->bt_ctrl = 0xff; /* all planes will be read */
    415 		ndac->bt_ctrl = 0x00; /* all planes have non-blink */
    416 		ndac->bt_ctrl = 0x43; /* pallete enabled, ovly plane */
    417 		ndac->bt_ctrl = 0x00; /* no test mode */
    418 		ndac->bt_addr = 0;
    419 		ndac->bt_cmap = 0;
    420 		ndac->bt_cmap = 0;
    421 		ndac->bt_cmap = 0;
    422 		for (i = 1; i < 256; i++) {
    423 			ndac->bt_cmap = 255;
    424 			ndac->bt_cmap = 255;
    425 			ndac->bt_cmap = 255;
    426 		}
    427 	}
    428 #endif
    429 
    430 	/* adjust h/v orgin on screen */
    431 	rfcnt.p.h = 7;
    432 	rfcnt.p.v = -27;
    433 	*(u_int32_t *)OMFB_RFCNT = rfcnt.u; /* single write of 0x007ffe6 */
    434 
    435 	/* clear the screen */
    436 	*(u_int32_t *)OMFB_PLANEMASK = 0xff;
    437 	((u_int32_t *)OMFB_ROPFUNC)[5] = ~0;	/* ROP copy */
    438 	for (i = 0; i < dc->dc_ht * dc->dc_rowbytes/sizeof(u_int32_t); i++)
    439 		*((u_int32_t *)dc->dc_videobase + i) = 0;
    440 	*(u_int32_t *)OMFB_PLANEMASK = 0x01;
    441 
    442 	/* initialize the raster */
    443 	rap = &dc->dc_raster;
    444 	rap->width = dc->dc_wid;
    445 	rap->height = dc->dc_ht;
    446 	rap->depth = dc->dc_depth;
    447 	rap->linelongs = dc->dc_rowbytes / sizeof(u_int32_t);
    448 	rap->pixels = (u_int32_t *)dc->dc_videobase;
    449 
    450 	/* initialize the raster console blitter */
    451 	rcp = &dc->dc_rcons;
    452 	rcp->rc_sp = rap;
    453 	rcp->rc_crow = rcp->rc_ccol = -1;
    454 	rcp->rc_crowp = &rcp->rc_crow;
    455 	rcp->rc_ccolp = &rcp->rc_ccol;
    456 	rcons_init(rcp, 34, 80);
    457 
    458 	omfb_stdscreen.nrows = dc->dc_rcons.rc_maxrow;
    459 	omfb_stdscreen.ncols = dc->dc_rcons.rc_maxcol;
    460 }
    461 
    462 static int
    463 omfb_alloc_screen(v, type, cookiep, curxp, curyp, attrp)
    464 	void *v;
    465 	const struct wsscreen_descr *type;
    466 	void **cookiep;
    467 	int *curxp, *curyp;
    468 	long *attrp;
    469 {
    470 	struct omfb_softc *sc = v;
    471 	long defattr;
    472 
    473 	if (sc->nscreens > 0)
    474 		return (ENOMEM);
    475 
    476 	*cookiep = &sc->sc_dc->dc_rcons; /* one and only for now */
    477 	*curxp = 0;
    478 	*curyp = 0;
    479 	(*omfb_emulops.allocattr)(&sc->sc_dc->dc_rcons, 0, 0, 0, &defattr);
    480 	*attrp = defattr;
    481 	sc->nscreens++;
    482 	return (0);
    483 }
    484 
    485 static void
    486 omfb_free_screen(v, cookie)
    487 	void *v;
    488 	void *cookie;
    489 {
    490 	struct omfb_softc *sc = v;
    491 
    492 	if (sc->sc_dc == &omfb_console_dc)
    493 		panic("omfb_free_screen: console");
    494 
    495 	sc->nscreens--;
    496 }
    497 
    498 static int
    499 omfb_show_screen(v, cookie, waitok, cb, cbarg)
    500 	void *v;
    501 	void *cookie;
    502 	int waitok;
    503 	void (*cb) __P((void *, int, int));
    504 	void *cbarg;
    505 {
    506 	return 0;
    507 }
    508