Home | History | Annotate | Line # | Download | only in dev
fb_elb.c revision 1.12
      1 /*	$NetBSD: fb_elb.c,v 1.12 2011/06/18 06:44:25 matt Exp $	*/
      2 
      3 /*-
      4  * Copyright (c) 2003 The NetBSD Foundation, Inc.
      5  * All rights reserved.
      6  *
      7  * This code is derived from software contributed to The NetBSD Foundation
      8  * by Juergen Hannken-Illjes.
      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  *
     19  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     20  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     21  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     22  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     23  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     24  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     25  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     26  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     27  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     28  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     29  * POSSIBILITY OF SUCH DAMAGE.
     30  */
     31 
     32 #include <sys/cdefs.h>
     33 __KERNEL_RCSID(0, "$NetBSD: fb_elb.c,v 1.12 2011/06/18 06:44:25 matt Exp $");
     34 
     35 #include <sys/param.h>
     36 #include <sys/conf.h>
     37 #include <sys/device.h>
     38 #include <sys/ioctl.h>
     39 #include <sys/malloc.h>
     40 #include <sys/systm.h>
     41 
     42 #include <dev/wscons/wsconsio.h>
     43 #include <dev/wscons/wsdisplayvar.h>
     44 #include <dev/rasops/rasops.h>
     45 
     46 #include <machine/explora.h>
     47 #include <machine/bus.h>
     48 
     49 #include <evbppc/explora/dev/elbvar.h>
     50 
     51 #define FB_NPORTS		65536
     52 
     53 struct fb_dev {
     54 	void *fb_vram;
     55 	bus_space_tag_t fb_iot;
     56 	bus_space_handle_t fb_ioh;
     57 	struct rasops_info fb_ri;
     58 };
     59 
     60 struct fb_elb_softc {
     61 	device_t sc_dev;
     62 	struct fb_dev *sc_fb;
     63 	int sc_nscreens;
     64 };
     65 
     66 static int	fb_elb_probe(device_t, cfdata_t, void *);
     67 static void	fb_elb_attach(device_t, device_t, void *);
     68 void		fb_cnattach(bus_space_tag_t, bus_addr_t, void *);
     69 static void	fb_init(struct fb_dev *, int);
     70 static int	fb_ioctl(void *, void *, u_long, void *, int, struct lwp *);
     71 static paddr_t	fb_mmap(void *, void *, off_t, int);
     72 static int	fb_alloc_screen(void *, const struct wsscreen_descr *, void **,
     73                     int *, int *, long *);
     74 static void	fb_free_screen(void *, void *);
     75 static int	fb_show_screen(void *, void *, int, void (*)(void *, int, int),
     76                     void *);
     77 
     78 static void	fb_eraserows(void *, int, int, long);
     79 static void	fb_erasecols(void *, int, int, int, long);
     80 static void	fb_copyrows(void *, int, int, int);
     81 static void	fb_copycols(void *, int, int, int, int);
     82 
     83 static void	s3_init(struct fb_dev *, int *, int *);
     84 static void	s3_copy(struct fb_dev *, int, int, int, int, int, int, int);
     85 static void	s3_fill(struct fb_dev *, int, int, int, int, int, int);
     86 
     87 static struct fb_dev console_dev;
     88 
     89 static struct wsdisplay_accessops accessops = {
     90 	fb_ioctl,
     91 	fb_mmap,
     92 	fb_alloc_screen,
     93 	fb_free_screen,
     94 	fb_show_screen,
     95 	NULL
     96 };
     97 
     98 static struct wsscreen_descr stdscreen = {
     99 	"std",
    100 	0, 0,
    101 	0,
    102 	0, 0,
    103 	0
    104 };
    105 
    106 static const struct wsscreen_descr *scrlist[] = {
    107 	&stdscreen
    108 };
    109 
    110 static struct wsscreen_list screenlist = {
    111 	__arraycount(scrlist), scrlist
    112 };
    113 
    114 CFATTACH_DECL_NEW(fb_elb, sizeof(struct fb_elb_softc),
    115     fb_elb_probe, fb_elb_attach, NULL, NULL);
    116 
    117 static int
    118 fb_elb_probe(device_t parent, cfdata_t cf, void *aux)
    119 {
    120 	struct elb_attach_args *oaa = aux;
    121 
    122 	if (strcmp(oaa->elb_name, cf->cf_name) != 0)
    123 		return 0;
    124 
    125 	return (1);
    126 }
    127 
    128 static void
    129 fb_elb_attach(device_t parent, device_t self, void *aux)
    130 {
    131 	struct fb_elb_softc *sc = device_private(self);
    132 	struct elb_attach_args *eaa = aux;
    133 	struct wsemuldisplaydev_attach_args waa;
    134 	struct rasops_info *ri;
    135 	bus_space_handle_t ioh;
    136 	int is_console;
    137 
    138 	sc->sc_dev = self;
    139 
    140 	is_console = ((void *)eaa->elb_base == console_dev.fb_vram);
    141 
    142 	if (is_console) {
    143 		sc->sc_fb = &console_dev;
    144 		sc->sc_fb->fb_ri.ri_flg &= ~RI_NO_AUTO;
    145 	} else {
    146 		sc->sc_fb = malloc(sizeof(struct fb_dev), M_DEVBUF, M_WAITOK);
    147 		memset(sc->sc_fb, 0, sizeof(struct fb_dev));
    148 	}
    149 
    150 	sc->sc_fb->fb_iot = eaa->elb_bt;
    151 	bus_space_map(sc->sc_fb->fb_iot, eaa->elb_base, SIZE_FB,
    152 	    BUS_SPACE_MAP_LINEAR, &ioh);
    153 	sc->sc_fb->fb_vram = bus_space_vaddr(sc->sc_fb->fb_iot, ioh);
    154 	bus_space_map(sc->sc_fb->fb_iot, eaa->elb_base2, FB_NPORTS,
    155 	    0, &sc->sc_fb->fb_ioh);
    156 
    157 	fb_init(sc->sc_fb, !is_console);
    158 
    159 	ri = &sc->sc_fb->fb_ri;
    160 
    161 	printf(": %d x %d\n", ri->ri_rows, ri->ri_cols);
    162 
    163 	waa.console = is_console;
    164 	waa.scrdata = &screenlist;
    165 	waa.accessops = &accessops;
    166 	waa.accesscookie = sc;
    167 
    168 	config_found(self, &waa, wsemuldisplaydevprint);
    169 }
    170 
    171 static void
    172 fb_init(struct fb_dev *fb, int full)
    173 {
    174 	struct rasops_info *ri = &fb->fb_ri;
    175 
    176 	if (full) {
    177 		s3_init(fb, &ri->ri_width, &ri->ri_height);
    178 		ri->ri_depth = 8;
    179 		ri->ri_stride = ri->ri_width;
    180 		ri->ri_bits = fb->fb_vram;
    181 		ri->ri_flg = RI_CENTER;
    182 		if (ri == &console_dev.fb_ri)
    183 			ri->ri_flg |= RI_NO_AUTO;
    184 
    185 		rasops_init(ri, 500, 500);
    186 	} else {
    187 		ri->ri_origbits = fb->fb_vram;	/*XXX*/
    188 		rasops_reconfig(ri, 500, 500);
    189 	}
    190 
    191 	/* Replace the copy/erase ops. */
    192 	ri->ri_hw = fb;
    193 	ri->ri_ops.eraserows = fb_eraserows;
    194 	ri->ri_ops.erasecols = fb_erasecols;
    195 	ri->ri_ops.copyrows = fb_copyrows;
    196 	ri->ri_ops.copycols = fb_copycols;
    197 
    198 	stdscreen.nrows = ri->ri_rows;
    199 	stdscreen.ncols = ri->ri_cols;
    200 	stdscreen.textops = &ri->ri_ops;
    201 	stdscreen.capabilities = ri->ri_caps;
    202 }
    203 
    204 static int
    205 fb_ioctl(void *v, void *vs, u_long cmd, void *data, int flag, struct lwp *l)
    206 {
    207 	struct fb_elb_softc *sc = v;
    208 	struct rasops_info *ri = &sc->sc_fb->fb_ri;
    209 	struct wsdisplay_fbinfo *wdf;
    210 
    211 	switch (cmd) {
    212 	case WSDISPLAYIO_GTYPE:
    213 		*(int *)data = WSDISPLAY_TYPE_UNKNOWN;	/* XXX */
    214 		return(0);
    215 
    216 	case WSDISPLAYIO_GINFO:
    217 		wdf = (void *)data;
    218 		wdf->height = ri->ri_height;
    219 		wdf->width = ri->ri_width;
    220 		wdf->depth = ri->ri_depth;
    221 		wdf->cmsize = 16; /*XXX*/
    222 		return(0);
    223 
    224 	case WSDISPLAYIO_SVIDEO:
    225 	case WSDISPLAYIO_GETCMAP:
    226 	case WSDISPLAYIO_PUTCMAP:
    227 		break;
    228 	}
    229 
    230 	return(EPASSTHROUGH);
    231 }
    232 
    233 static paddr_t
    234 fb_mmap(void *v, void *vs, off_t offset, int prot)
    235 {
    236 	struct fb_elb_softc *sc = v;
    237 
    238 	if (offset < 0 || offset >= SIZE_FB)
    239 		return -1;
    240 
    241 	return bus_space_mmap(sc->sc_fb->fb_iot, BASE_FB, offset, prot,
    242 	    BUS_SPACE_MAP_LINEAR);
    243 }
    244 
    245 static int
    246 fb_alloc_screen(void *v, const struct wsscreen_descr *scrdesc, void **cookiep,
    247     int *ccolp, int *crowp, long *attrp)
    248 {
    249 	struct fb_elb_softc *sc = v;
    250 	struct rasops_info *ri = &sc->sc_fb->fb_ri;
    251 
    252 	if (sc->sc_nscreens > 0)
    253 		return ENOMEM;
    254 
    255 	*cookiep = ri;
    256 	*ccolp = *crowp = 0;
    257 	(*ri->ri_ops.allocattr)(ri, 0, 0, 0, attrp);
    258 	sc->sc_nscreens++;
    259 
    260 	return(0);
    261 }
    262 
    263 static void
    264 fb_free_screen(void *v, void *cookie)
    265 {
    266 	struct fb_elb_softc *sc = v;
    267 
    268 	if (sc->sc_fb == &console_dev)
    269 		panic("fb_free_screen: freeing console");
    270 
    271 	sc->sc_nscreens--;
    272 }
    273 
    274 static int
    275 fb_show_screen(void *v, void *cookie, int waitok, void (*cb)(void *, int, int),
    276     void *cbarg)
    277 {
    278 	return(0);
    279 }
    280 
    281 void
    282 fb_cnattach(bus_space_tag_t iot, bus_addr_t iobase, void *vram)
    283 {
    284 	struct rasops_info *ri = &console_dev.fb_ri;
    285 	long defattr;
    286 
    287 	console_dev.fb_iot = iot;
    288 	console_dev.fb_ioh = iobase;
    289 	console_dev.fb_vram = vram;
    290 
    291 	fb_init(&console_dev, 1);
    292 
    293 	(*ri->ri_ops.allocattr)(ri, 0, 0, 0, &defattr);
    294 
    295 	wsdisplay_cnattach(&stdscreen, ri, 0, 0, defattr);
    296 }
    297 
    298 static void
    299 fb_eraserows(void *v, int row, int nrows, long attr)
    300 {
    301 	struct rasops_info *ri = v;
    302 	struct fb_dev *fb = ri->ri_hw;
    303 
    304 	row *= ri->ri_font->fontheight;
    305 	nrows *= ri->ri_font->fontheight;
    306 
    307 	s3_fill(fb, 0, row, ri->ri_stride, nrows, (attr >> 16)&0x0f, 0x0f);
    308 }
    309 
    310 static void
    311 fb_erasecols(void *v, int row, int startcol, int ncols, long attr)
    312 {
    313 	struct rasops_info *ri = v;
    314 	struct fb_dev *fb = ri->ri_hw;
    315 
    316 	row *= ri->ri_font->fontheight;
    317 	startcol *= ri->ri_font->fontwidth;
    318 	ncols *= ri->ri_font->fontwidth;
    319 
    320 	s3_fill(fb, startcol, row, ncols, ri->ri_font->fontheight,
    321 	    (attr >> 16)&0x0f, 0x0f);
    322 }
    323 
    324 static void
    325 fb_copyrows(void *v, int srcrow, int dstrow, int nrows)
    326 {
    327 	struct rasops_info *ri = v;
    328 	struct fb_dev *fb = ri->ri_hw;
    329 
    330 	srcrow *= ri->ri_font->fontheight;
    331 	dstrow *= ri->ri_font->fontheight;
    332 	nrows *= ri->ri_font->fontheight;
    333 
    334 	s3_copy(fb, 0, srcrow, 0, dstrow, ri->ri_stride, nrows, 0x0f);
    335 }
    336 
    337 static void
    338 fb_copycols(void *v, int row, int srccol, int dstcol, int ncols)
    339 {
    340 	struct rasops_info *ri = v;
    341 	struct fb_dev *fb = ri->ri_hw;
    342 
    343 	row *= ri->ri_font->fontheight;
    344 	srccol *= ri->ri_font->fontwidth;
    345 	dstcol *= ri->ri_font->fontwidth;
    346 	ncols *= ri->ri_font->fontwidth;
    347 
    348 	s3_copy(fb, srccol, row, dstcol, row,
    349 	    ncols, ri->ri_font->fontheight, 0x0f);
    350 }
    351 
    352 /*
    353  * S3 support routines
    354  */
    355 
    356 #define S3_CRTC_INDEX		0x83d4
    357 #define S3_CRTC_DATA		0x83d5
    358 
    359 #define S3_DAC_RD_INDEX		0x83c7
    360 #define S3_DAC_WR_INDEX		0x83c8
    361 #define S3_DAC_DATA		0x83c9
    362 
    363 #define S3_CUR_Y		0x82e8
    364 #define S3_CUR_X		0x86e8
    365 #define S3_DESTY_AXSTP		0x8ae8
    366 #define S3_DESTX_DIASTP		0x8ee8
    367 #define S3_MAJ_AXIS_PCNT	0x96e8
    368 #define S3_GP_STAT		0x9ae8
    369 #define S3_CMD			0x9ae8
    370 #define S3_BKGD_COLOR		0xa2e8
    371 #define S3_FRGD_COLOR		0xa6e8
    372 #define S3_WRT_MASK		0xaae8
    373 #define S3_RD_MASK		0xaee8
    374 #define S3_BKGD_MIX		0xb6e8
    375 #define S3_FRGD_MIX		0xbae8
    376 #define S3_MULTIFUNC_CNTL	0xbee8
    377 
    378 #define S3_GP_STAT_FIFO_1	0x0080
    379 #define S3_GP_STAT_BSY		0x0200
    380 
    381 #define S3_CMD_BITBLT		0xc001
    382 #define S3_CMD_RECT		0x4001
    383 #define S3_INC_Y		0x0080
    384 #define S3_INC_X		0x0020
    385 #define S3_DRAW			0x0010
    386 #define S3_MULTI		0x0002
    387 
    388 #define S3_CSRC_BKGDCOL		0x0000
    389 #define S3_CSRC_FRGDCOL		0x0020
    390 #define S3_CSRC_DISPMEM		0x0060
    391 #define S3_MIX_NEW		0x0007
    392 
    393 #define CMAP_SIZE		256
    394 
    395 static u_int8_t default_cmap[] = {
    396 	/* black */		  0,   0,   0,
    397 	/* blue */		  0,   0, 192,
    398 	/* green */		  0, 192,   0,
    399 	/* cyan */		  0, 192, 192,
    400 	/* red */		192,   0,   0,
    401 	/* magenta */		192,   0, 192,
    402 	/* brown */		192, 192,   0,
    403 	/* lightgrey */		212, 208, 200,
    404 	/* darkgrey */		200, 192, 188,
    405 	/* lightblue */		  0,   0, 255,
    406 	/* lightgreen */	  0, 255,   0,
    407 	/* lightcyan */		  0, 255, 255,
    408 	/* lightred */		255,   0,   0,
    409 	/* lightmagenta */	255,   0, 255,
    410 	/* yellow */		255, 255,   0,
    411 	/* white */		255, 255, 255,
    412 };
    413 
    414 static void
    415 s3_init(struct fb_dev *fb, int *width, int *height)
    416 {
    417 	int i, j, w, h;
    418 	bus_space_tag_t iot = fb->fb_iot;
    419 	bus_space_handle_t ioh = fb->fb_ioh;
    420 
    421 	/* Initialize colormap */
    422 
    423 	bus_space_write_1(iot, ioh, S3_DAC_WR_INDEX, 0);
    424 
    425 	for (i = j = 0; i < CMAP_SIZE*3; i++) {
    426 		bus_space_write_1(iot, ioh, S3_DAC_DATA, default_cmap[j] >> 2);
    427 		j = (j+1) % sizeof(default_cmap)/sizeof(default_cmap[0]);
    428 	}
    429 
    430 	/* Retrieve frame buffer geometry */
    431 
    432 	bus_space_write_1(iot, ioh, S3_CRTC_INDEX, 1);
    433 	w = bus_space_read_1(iot, ioh, S3_CRTC_DATA);
    434 
    435 	bus_space_write_1(iot, ioh, S3_CRTC_INDEX, 18);
    436 	h = bus_space_read_1(iot, ioh, S3_CRTC_DATA);
    437 
    438 	bus_space_write_1(iot, ioh, S3_CRTC_INDEX, 7);
    439 	i = bus_space_read_1(iot, ioh, S3_CRTC_DATA);
    440 
    441 	h += (i << 7) & 0x100;
    442 	h += (i << 3) & 0x200;
    443 
    444 	*width = (w+1) << 3;
    445 	*height = h+1;
    446 }
    447 
    448 static void
    449 s3_copy(struct fb_dev *fb, int src_x, int src_y, int dest_x, int dest_y,
    450     int width, int height, int mask)
    451 {
    452 	bus_space_tag_t iot = fb->fb_iot;
    453 	bus_space_handle_t ioh = fb->fb_ioh;
    454 	u_int16_t cmd = S3_CMD_BITBLT | S3_DRAW;
    455 
    456 	if (src_x > dest_x)
    457 		cmd |= S3_INC_X;
    458 	else {
    459 		src_x += width-1;
    460 		dest_x += width-1;
    461 	}
    462 
    463 	if (src_y > dest_y)
    464 		cmd |= S3_INC_Y;
    465 	else {
    466 		src_y += height-1;
    467 		dest_y += height-1;
    468 	}
    469 
    470 	while (bus_space_read_2(iot, ioh, S3_GP_STAT) & S3_GP_STAT_FIFO_1)
    471 		;
    472 
    473 	bus_space_write_2(iot, ioh, S3_FRGD_MIX, S3_CSRC_DISPMEM | S3_MIX_NEW);
    474 	bus_space_write_2(iot, ioh, S3_WRT_MASK, mask);
    475 	bus_space_write_2(iot, ioh, S3_CUR_X, src_x);
    476 	bus_space_write_2(iot, ioh, S3_CUR_Y, src_y);
    477 	bus_space_write_2(iot, ioh, S3_DESTX_DIASTP, dest_x);
    478 	bus_space_write_2(iot, ioh, S3_DESTY_AXSTP, dest_y);
    479 	bus_space_write_2(iot, ioh, S3_MULTIFUNC_CNTL, height-1);
    480 	bus_space_write_2(iot, ioh, S3_MAJ_AXIS_PCNT, width-1);
    481 	bus_space_write_2(iot, ioh, S3_CMD, cmd);
    482 
    483 	while (bus_space_read_2(iot, ioh, S3_GP_STAT) & S3_GP_STAT_BSY)
    484 		;
    485 }
    486 
    487 static void
    488 s3_fill(struct fb_dev *fb, int x, int y, int width, int height,
    489     int color, int mask)
    490 {
    491 	bus_space_tag_t iot = fb->fb_iot;
    492 	bus_space_handle_t ioh = fb->fb_ioh;
    493 	u_int16_t cmd = S3_CMD_RECT | S3_INC_X | S3_INC_Y | S3_DRAW;
    494 
    495 	while (bus_space_read_2(iot, ioh, S3_GP_STAT) & S3_GP_STAT_FIFO_1)
    496 		;
    497 
    498 	bus_space_write_2(iot, ioh, S3_FRGD_MIX, S3_CSRC_FRGDCOL | S3_MIX_NEW);
    499 	bus_space_write_2(iot, ioh, S3_FRGD_COLOR, color);
    500 	bus_space_write_2(iot, ioh, S3_WRT_MASK, mask);
    501 	bus_space_write_2(iot, ioh, S3_CUR_X, x);
    502 	bus_space_write_2(iot, ioh, S3_CUR_Y, y);
    503 	bus_space_write_2(iot, ioh, S3_MULTIFUNC_CNTL, height-1);
    504 	bus_space_write_2(iot, ioh, S3_MAJ_AXIS_PCNT, width-1);
    505 	bus_space_write_2(iot, ioh, S3_CMD, cmd);
    506 
    507 	while (bus_space_read_2(iot, ioh, S3_GP_STAT) & S3_GP_STAT_BSY)
    508 		;
    509 }
    510