Home | History | Annotate | Line # | Download | only in ic
vga_raster.c revision 1.37
      1 /*	$NetBSD: vga_raster.c,v 1.37 2013/04/14 16:37:32 christos Exp $	*/
      2 
      3 /*
      4  * Copyright (c) 2001, 2002 Bang Jun-Young
      5  * Copyright (c) 2004 Julio M. Merino Vidal
      6  * All rights reserved.
      7  *
      8  * Redistribution and use in source and binary forms, with or without
      9  * modification, are permitted provided that the following conditions
     10  * are met:
     11  * 1. Redistributions of source code must retain the above copyright
     12  *    notice, this list of conditions and the following disclaimer.
     13  * 2. Redistributions in binary form must reproduce the above copyright
     14  *    notice, this list of conditions and the following disclaimer in the
     15  *    documentation and/or other materials provided with the distribution.
     16  * 3. The name of the author may not be used to endorse or promote products
     17  *    derived from this software without specific prior written permission.
     18  *
     19  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     20  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     21  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     22  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     23  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     24  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     25  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     26  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     27  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
     28  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     29  */
     30 
     31 /*
     32  * Copyright (c) 1995, 1996 Carnegie-Mellon University.
     33  * All rights reserved.
     34  *
     35  * Author: Chris G. Demetriou
     36  *
     37  * Permission to use, copy, modify and distribute this software and
     38  * its documentation is hereby granted, provided that both the copyright
     39  * notice and this permission notice appear in all copies of the
     40  * software, derivative works or modified versions, and any portions
     41  * thereof, and that both notices appear in supporting documentation.
     42  *
     43  * CARNEGIE MELLON ALLOWS FREE USE OF THIS SOFTWARE IN ITS "AS IS"
     44  * CONDITION.  CARNEGIE MELLON DISCLAIMS ANY LIABILITY OF ANY KIND
     45  * FOR ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE.
     46  *
     47  * Carnegie Mellon requests users of this software to return to
     48  *
     49  *  Software Distribution Coordinator  or  Software.Distribution (at) CS.CMU.EDU
     50  *  School of Computer Science
     51  *  Carnegie Mellon University
     52  *  Pittsburgh PA 15213-3890
     53  *
     54  * any improvements or extensions that they make and grant Carnegie the
     55  * rights to redistribute these changes.
     56  */
     57 
     58 #include <sys/cdefs.h>
     59 __KERNEL_RCSID(0, "$NetBSD: vga_raster.c,v 1.37 2013/04/14 16:37:32 christos Exp $");
     60 
     61 #include "opt_wsmsgattrs.h" /* for WSDISPLAY_CUSTOM_OUTPUT */
     62 
     63 #include <sys/param.h>
     64 #include <sys/systm.h>
     65 #include <sys/callout.h>
     66 #include <sys/kernel.h>
     67 #include <sys/device.h>
     68 #include <sys/malloc.h>
     69 #include <sys/queue.h>
     70 #include <sys/bus.h>
     71 
     72 #include <dev/ic/mc6845reg.h>
     73 #include <dev/ic/pcdisplayvar.h>
     74 #include <dev/ic/vgareg.h>
     75 #include <dev/ic/vgavar.h>
     76 #include <dev/videomode/videomode.h>
     77 
     78 #include <dev/wscons/wsdisplayvar.h>
     79 #include <dev/wscons/wsconsio.h>
     80 #include <dev/wsfont/wsfont.h>
     81 
     82 #include <dev/ic/pcdisplay.h>
     83 
     84 int vga_no_builtinfont = 0;
     85 
     86 u_int8_t builtinfont_data[256 * 16];
     87 
     88 struct wsdisplay_font builtinfont = {
     89 	"builtin",			/* typeface name */
     90 	0,				/* firstchar */
     91 	256,				/* numchars */
     92 	WSDISPLAY_FONTENC_IBM,		/* encoding */
     93 	8,				/* width */
     94 	16,				/* height */
     95 	1,				/* stride */
     96 	WSDISPLAY_FONTORDER_L2R,	/* bit order */
     97 	WSDISPLAY_FONTORDER_L2R,	/* byte order */
     98 	builtinfont_data		/* data */
     99 };
    100 
    101 struct vga_scrmem {
    102 	u_int16_t ch;
    103 	u_int8_t attr;
    104 	u_int8_t second;	/* XXXBJY should be u_int8_t len; */
    105 	u_int8_t enc;
    106 };
    107 
    108 #ifdef VGA_CONSOLE_SCREENTYPE
    109 #define VGA_SCRMEM_SIZE		(80 * 30)
    110 #else
    111 #define VGA_SCRMEM_SIZE		(80 * 25)
    112 #endif
    113 
    114 struct vga_scrmem boot_scrmem[VGA_SCRMEM_SIZE];
    115 
    116 struct vga_raster_font {
    117 	LIST_ENTRY(vga_raster_font) next;
    118 	struct wsdisplay_font *font;
    119 };
    120 
    121 struct vgascreen {
    122 	LIST_ENTRY(vgascreen) next;
    123 	struct vga_config *cfg;
    124 	struct vga_handle *hdl;
    125 	const struct wsscreen_descr *type;
    126 
    127 	int active;
    128 	struct vga_scrmem *mem;
    129 	int encoding;
    130 
    131 	int dispoffset;
    132 	int mindispoffset;
    133 	int maxdispoffset;
    134 
    135 	int cursoron;			/* Is cursor displayed? */
    136 	int cursorcol;			/* Current cursor column */
    137 	int cursorrow;			/* Current cursor row */
    138 	struct vga_scrmem cursortmp;
    139 	int cursorstride;
    140 
    141 	LIST_HEAD(, vga_raster_font) fontset;
    142 };
    143 
    144 struct vga_moderegs {
    145 	u_int8_t miscout;		/* Misc. output */
    146 	u_int8_t crtc[MC6845_NREGS];	/* CRTC controller */
    147 	u_int8_t atc[VGA_ATC_NREGS];	/* Attribute controller */
    148 	u_int8_t ts[VGA_TS_NREGS];	/* Time sequencer */
    149 	u_int8_t gdc[VGA_GDC_NREGS];	/* Graphics display controller */
    150 };
    151 
    152 static int vgaconsole, vga_console_type, vga_console_attached;
    153 static struct vgascreen vga_console_screen;
    154 static struct vga_config vga_console_vc;
    155 static struct vga_raster_font vga_console_fontset_ascii;
    156 static struct videomode vga_console_modes[2] = {
    157 	/* 640x400 for 80x25, 80x40 and 80x50 modes */
    158 	{
    159 		25175, 640, 664, 760, 800, 400, 409, 411, 450, 0, NULL,
    160 	},
    161 	/* 640x480 for 80x30 mode */
    162 	{
    163 		25175, 640, 664, 760, 800, 480, 491, 493, 525, 0, NULL,
    164 	}
    165 };
    166 
    167 static void vga_raster_init(struct vga_config *, bus_space_tag_t,
    168 		bus_space_tag_t);
    169 static void vga_raster_init_screen(struct vga_config *, struct vgascreen *,
    170 		const struct wsscreen_descr *, int, long *);
    171 static void vga_raster_setup_font(struct vga_config *, struct vgascreen *);
    172 static void vga_setup_regs(struct videomode *, struct vga_moderegs *);
    173 static void vga_set_mode(struct vga_handle *, struct vga_moderegs *);
    174 static void vga_restore_screen(struct vgascreen *,
    175 		const struct wsscreen_descr *, struct vga_scrmem *);
    176 static void vga_raster_cursor_init(struct vgascreen *, int);
    177 static void _vga_raster_putchar(void *, int, int, u_int, long,
    178 		struct vga_raster_font *);
    179 
    180 static void vga_raster_cursor(void *, int, int, int);
    181 static int  vga_raster_mapchar(void *, int, u_int *);
    182 static void vga_raster_putchar(void *, int, int, u_int, long);
    183 static void vga_raster_copycols(void *, int, int, int, int);
    184 static void vga_raster_erasecols(void *, int, int, int, long);
    185 static void vga_raster_copyrows(void *, int, int, int);
    186 static void vga_raster_eraserows(void *, int, int, long);
    187 static int  vga_raster_allocattr(void *, int, int, int, long *);
    188 #ifdef WSDISPLAY_CUSTOM_OUTPUT
    189 static void vga_raster_replaceattr(void *, long, long);
    190 #endif /* WSDISPLAY_CUSTOM_OUTPUT */
    191 
    192 const struct wsdisplay_emulops vga_raster_emulops = {
    193 	vga_raster_cursor,
    194 	vga_raster_mapchar,
    195 	vga_raster_putchar,
    196 	vga_raster_copycols,
    197 	vga_raster_erasecols,
    198 	vga_raster_copyrows,
    199 	vga_raster_eraserows,
    200 	vga_raster_allocattr,
    201 #ifdef WSDISPLAY_CUSTOM_OUTPUT
    202 	vga_raster_replaceattr,
    203 #else /* WSDISPLAY_CUSTOM_OUTPUT */
    204 	NULL,
    205 #endif /* WSDISPLAY_CUSTOM_OUTPUT */
    206 };
    207 
    208 /*
    209  * translate WS(=ANSI) color codes to standard pc ones
    210  */
    211 static const unsigned char fgansitopc[] = {
    212 #ifdef __alpha__
    213 	/*
    214 	 * XXX DEC HAS SWITCHED THE CODES FOR BLUE AND RED!!!
    215 	 * XXX We should probably not bother with this
    216 	 * XXX (reinitialize the palette registers).
    217 	 */
    218 	FG_BLACK, FG_BLUE, FG_GREEN, FG_CYAN, FG_RED,
    219 	FG_MAGENTA, FG_BROWN, FG_LIGHTGREY
    220 #else
    221 	FG_BLACK, FG_RED, FG_GREEN, FG_BROWN, FG_BLUE,
    222 	FG_MAGENTA, FG_CYAN, FG_LIGHTGREY
    223 #endif
    224 }, bgansitopc[] = {
    225 #ifdef __alpha__
    226 	BG_BLACK, BG_BLUE, BG_GREEN, BG_CYAN, BG_RED,
    227 	BG_MAGENTA, BG_BROWN, BG_LIGHTGREY
    228 #else
    229 	BG_BLACK, BG_RED, BG_GREEN, BG_BROWN, BG_BLUE,
    230 	BG_MAGENTA, BG_CYAN, BG_LIGHTGREY
    231 #endif
    232 };
    233 
    234 const struct wsscreen_descr vga_25lscreen = {
    235 	"80x25", 80, 25,
    236 	&vga_raster_emulops,
    237 	8, 16,
    238 	WSSCREEN_WSCOLORS | WSSCREEN_HILIT | WSSCREEN_BLINK,
    239 	&vga_console_modes[0]
    240 }, vga_25lscreen_mono = {
    241 	"80x25", 80, 25,
    242 	&vga_raster_emulops,
    243 	8, 16,
    244 	WSSCREEN_HILIT | WSSCREEN_UNDERLINE | WSSCREEN_BLINK | WSSCREEN_REVERSE,
    245 	&vga_console_modes[0]
    246 }, vga_30lscreen = {
    247 	"80x30", 80, 30,
    248 	&vga_raster_emulops,
    249 	8, 16,
    250 	WSSCREEN_WSCOLORS | WSSCREEN_HILIT | WSSCREEN_BLINK,
    251 	&vga_console_modes[1]
    252 }, vga_30lscreen_mono = {
    253 	"80x30", 80, 30,
    254 	&vga_raster_emulops,
    255 	8, 16,
    256 	WSSCREEN_HILIT | WSSCREEN_UNDERLINE | WSSCREEN_BLINK | WSSCREEN_REVERSE,
    257 	&vga_console_modes[1]
    258 }, vga_40lscreen = {
    259 	"80x40", 80, 40,
    260 	&vga_raster_emulops,
    261 	8, 10,
    262 	WSSCREEN_WSCOLORS | WSSCREEN_HILIT | WSSCREEN_BLINK,
    263 	&vga_console_modes[0]
    264 }, vga_40lscreen_mono = {
    265 	"80x40", 80, 40,
    266 	&vga_raster_emulops,
    267 	8, 10,
    268 	WSSCREEN_HILIT | WSSCREEN_UNDERLINE | WSSCREEN_BLINK | WSSCREEN_REVERSE,
    269 	&vga_console_modes[0]
    270 }, vga_50lscreen = {
    271 	"80x50", 80, 50,
    272 	&vga_raster_emulops,
    273 	8, 8,
    274 	WSSCREEN_WSCOLORS | WSSCREEN_HILIT | WSSCREEN_BLINK,
    275 	&vga_console_modes[0]
    276 }, vga_50lscreen_mono = {
    277 	"80x50", 80, 50,
    278 	&vga_raster_emulops,
    279 	8, 8,
    280 	WSSCREEN_HILIT | WSSCREEN_UNDERLINE | WSSCREEN_BLINK | WSSCREEN_REVERSE,
    281 	&vga_console_modes[0]
    282 };
    283 
    284 const struct wsscreen_descr *_vga_scrlist[] = {
    285 	&vga_25lscreen,
    286 	&vga_30lscreen,
    287 	&vga_40lscreen,
    288 	&vga_50lscreen,
    289 }, *_vga_scrlist_mono[] = {
    290 	&vga_25lscreen_mono,
    291 	&vga_30lscreen_mono,
    292 	&vga_40lscreen_mono,
    293 	&vga_50lscreen_mono,
    294 };
    295 
    296 const struct wsscreen_list vga_screenlist = {
    297 	sizeof(_vga_scrlist) / sizeof(struct wsscreen_descr *),
    298 	_vga_scrlist
    299 }, vga_screenlist_mono = {
    300 	sizeof(_vga_scrlist_mono) / sizeof(struct wsscreen_descr *),
    301 	_vga_scrlist_mono
    302 };
    303 
    304 static int	vga_raster_ioctl(void *, void *, u_long, void *, int,
    305 		    struct lwp *);
    306 static paddr_t	vga_raster_mmap(void *, void *, off_t, int);
    307 static int	vga_raster_alloc_screen(void *, const struct wsscreen_descr *,
    308 		    void **, int *, int *, long *);
    309 static void	vga_raster_free_screen(void *, void *);
    310 static int	vga_raster_show_screen(void *, void *, int,
    311 		    void (*)(void *, int, int), void *);
    312 static int	vga_raster_load_font(void *, void *, struct wsdisplay_font *);
    313 
    314 static void 	vga_switch_screen(struct vga_config *);
    315 static void 	vga_raster_setscreentype(struct vga_config *,
    316 		    const struct wsscreen_descr *);
    317 
    318 const struct wsdisplay_accessops vga_raster_accessops = {
    319 	vga_raster_ioctl,
    320 	vga_raster_mmap,
    321 	vga_raster_alloc_screen,
    322 	vga_raster_free_screen,
    323 	vga_raster_show_screen,
    324 	vga_raster_load_font,
    325 	NULL,	/* pollc */
    326 	NULL,	/* scroll */
    327 };
    328 
    329 int
    330 vga_cnattach(bus_space_tag_t iot, bus_space_tag_t memt, int type, int check)
    331 {
    332 	long defattr;
    333 	const struct wsscreen_descr *scr;
    334 #ifdef VGA_CONSOLE_SCREENTYPE
    335 	const char *typestr = NULL;
    336 #endif
    337 
    338 	if (check && !vga_common_probe(iot, memt))
    339 		return (ENXIO);
    340 
    341 	/* set up bus-independent VGA configuration */
    342 	vga_raster_init(&vga_console_vc, iot, memt);
    343 #ifdef VGA_CONSOLE_SCREENTYPE
    344 	scr = wsdisplay_screentype_pick(vga_console_vc.hdl.vh_mono ?
    345 	    &vga_screenlist_mono : &vga_screenlist, VGA_CONSOLE_SCREENTYPE);
    346 	if (!scr)
    347 		/* Invalid screen type, continue with the default mode. */
    348 		typestr = "80x25";
    349 	else if (scr->nrows > 30)
    350 		/* Unsupported screen type, try 80x30. */
    351 		typestr = "80x30";
    352 	if (typestr)
    353 		scr = wsdisplay_screentype_pick(vga_console_vc.hdl.vh_mono ?
    354 		    &vga_screenlist_mono : &vga_screenlist, typestr);
    355 	if (scr != vga_console_vc.currenttype)
    356 		vga_console_vc.currenttype = scr;
    357 #else
    358 	scr = vga_console_vc.currenttype;
    359 #endif
    360 	vga_raster_init_screen(&vga_console_vc, &vga_console_screen, scr, 1,
    361 	    &defattr);
    362 
    363 	vga_console_screen.active = 1;
    364 	vga_console_vc.active = &vga_console_screen;
    365 
    366 	wsdisplay_cnattach(scr, &vga_console_screen,
    367 	    vga_console_screen.cursorcol, vga_console_screen.cursorrow,
    368 	    defattr);
    369 
    370 	vgaconsole = 1;
    371 	vga_console_type = type;
    372 	return (0);
    373 }
    374 
    375 static void
    376 vga_raster_init(struct vga_config *vc, bus_space_tag_t iot,
    377     bus_space_tag_t memt)
    378 {
    379 	struct vga_handle *vh = &vc->hdl;
    380 	u_int8_t mor;
    381 	struct vga_raster_font *vf;
    382 
    383 	vh->vh_iot = iot;
    384 	vh->vh_memt = memt;
    385 
    386 	if (bus_space_map(vh->vh_iot, 0x3c0, 0x10, 0, &vh->vh_ioh_vga))
    387 		panic("vga_raster_init: couldn't map vga io");
    388 
    389 	/* read "misc output register" */
    390 	mor = bus_space_read_1(vh->vh_iot, vh->vh_ioh_vga, VGA_MISC_DATAR);
    391 	vh->vh_mono = !(mor & 1);
    392 
    393 	if (bus_space_map(vh->vh_iot, (vh->vh_mono ? 0x3b0 : 0x3d0), 0x10, 0,
    394 	    &vh->vh_ioh_6845))
    395 		panic("vga_raster_init: couldn't map 6845 io");
    396 
    397 	if (bus_space_map(vh->vh_memt, 0xa0000, 0x20000, 0, &vh->vh_allmemh))
    398 		panic("vga_raster_init: couldn't map memory");
    399 
    400 	if (bus_space_subregion(vh->vh_memt, vh->vh_allmemh, 0, 0x10000,
    401 	    &vh->vh_memh))
    402 		panic("vga_raster_init: mem subrange failed");
    403 
    404 	/* should only reserve the space (no need to map - save KVM) */
    405 	vc->vc_biostag = memt;
    406 	if (bus_space_map(vc->vc_biostag, 0xc0000, 0x8000, 0, &vc->vc_bioshdl))
    407 		vc->vc_biosmapped = 0;
    408 	else
    409 		vc->vc_biosmapped = 1;
    410 
    411 	vc->nscreens = 0;
    412 	LIST_INIT(&vc->screens);
    413 	vc->active = NULL;
    414 	vc->currenttype = vh->vh_mono ? &vga_25lscreen_mono : &vga_25lscreen;
    415 	callout_init(&vc->vc_switch_callout, 0);
    416 
    417 	wsfont_init();
    418 	vc->nfonts = 1;
    419 	LIST_INIT(&vc->vc_fontlist);
    420 	vf = &vga_console_fontset_ascii;
    421 	if (vga_no_builtinfont) {
    422 		struct wsdisplay_font *wf;
    423 		int cookie;
    424 
    425 		/* prefer 8x16 pixel font */
    426 		cookie = wsfont_find(NULL, 8, 16, 0, WSDISPLAY_FONTORDER_L2R,
    427 		    0, WSFONT_FIND_BITMAP);
    428 		if (cookie == -1)
    429 			cookie = wsfont_find(NULL, 0, 0, 0,
    430 			    WSDISPLAY_FONTORDER_L2R, WSDISPLAY_FONTORDER_L2R,
    431 			    WSFONT_FIND_BITMAP);
    432 		if (cookie == -1 || wsfont_lock(cookie, &wf))
    433 			panic("vga_raster_init: can't load console font");
    434 		vf->font = wf;
    435 	} else {
    436 		vga_load_builtinfont(vh, builtinfont_data, 0, 256);
    437 		vf->font = &builtinfont;
    438 	}
    439 	LIST_INSERT_HEAD(&vc->vc_fontlist, vf, next);
    440 }
    441 
    442 static void
    443 vga_raster_init_screen(struct vga_config *vc, struct vgascreen *scr,
    444     const struct wsscreen_descr *type, int existing, long *attrp)
    445 {
    446 	int cpos;
    447 	int res;
    448 	struct vga_handle *vh;
    449 
    450 	scr->cfg = vc;
    451 	scr->hdl = &vc->hdl;
    452 	scr->type = type;
    453 	scr->mindispoffset = 0;
    454 	scr->maxdispoffset = scr->dispoffset +
    455 	    type->nrows * type->ncols * type->fontheight;
    456 	vh = &vc->hdl;
    457 
    458 	LIST_INIT(&scr->fontset);
    459 	vga_raster_setup_font(vc, scr);
    460 
    461 	if (existing) {
    462 		int i;
    463 
    464 		cpos = vga_6845_read(vh, cursorh) << 8;
    465 		cpos |= vga_6845_read(vh, cursorl);
    466 
    467 		/* make sure we have a valid cursor position */
    468 		if (cpos < 0 || cpos >= type->nrows * type->ncols)
    469 			cpos = 0;
    470 
    471 		scr->dispoffset = vga_6845_read(vh, startadrh) << 9;
    472 		scr->dispoffset |= vga_6845_read(vh, startadrl) << 1;
    473 
    474 		/* make sure we have a valid memory offset */
    475 		if (scr->dispoffset < scr->mindispoffset ||
    476 		    scr->dispoffset > scr->maxdispoffset)
    477 			scr->dispoffset = scr->mindispoffset;
    478 
    479 		scr->mem = boot_scrmem;
    480 		scr->active = 1;
    481 
    482 		/* Save the current screen to memory. XXXBJY assume 80x25 */
    483 		for (i = 0; i < 80 * 25; i++) {
    484 			scr->mem[i].ch = bus_space_read_1(vh->vh_memt,
    485 			    vh->vh_allmemh, 0x18000 + i * 2);
    486 			scr->mem[i].attr = bus_space_read_1(vh->vh_memt,
    487 			    vh->vh_allmemh, 0x18000 + i * 2 + 1);
    488 			scr->mem[i].enc = scr->encoding;
    489 		}
    490 
    491 		vga_raster_setscreentype(vc, type);
    492 
    493 		/* Clear the entire screen. */
    494 		vga_gdc_write(vh, mode, 0x02);
    495 		bus_space_set_region_4(vh->vh_memt, vh->vh_allmemh, 0, 0,
    496 		    0x4000);
    497 
    498 		vga_restore_screen(scr, type, scr->mem);
    499 	} else {
    500 		cpos = 0;
    501 		scr->dispoffset = scr->mindispoffset;
    502 		scr->mem = NULL;
    503 		scr->active = 0;
    504 	}
    505 
    506 	scr->cursorrow = cpos / type->ncols;
    507 	scr->cursorcol = cpos % type->ncols;
    508 	vga_raster_cursor_init(scr, existing);
    509 
    510 #ifdef __alpha__
    511 	if (!vc->hdl.vh_mono)
    512 		/*
    513 		 * DEC firmware uses a blue background.
    514 		 */
    515 		res = vga_raster_allocattr(scr, WSCOL_WHITE, WSCOL_BLUE,
    516 		    WSATTR_WSCOLORS, attrp);
    517 	else
    518 #endif
    519 	res = vga_raster_allocattr(scr, 0, 0, 0, attrp);
    520 #ifdef DIAGNOSTIC
    521 	if (res)
    522 		panic("vga_raster_init_screen: attribute botch");
    523 #endif
    524 
    525 	vc->nscreens++;
    526 	LIST_INSERT_HEAD(&vc->screens, scr, next);
    527 }
    528 
    529 void
    530 vga_common_attach(struct vga_softc *sc, bus_space_tag_t iot,
    531     bus_space_tag_t memt, int type, int quirks,
    532     const struct vga_funcs *vf)
    533 {
    534 	int console;
    535 	struct vga_config *vc;
    536 	struct wsemuldisplaydev_attach_args aa;
    537 
    538 	console = vga_is_console(iot, type);
    539 
    540 	if (console) {
    541 		vc = &vga_console_vc;
    542 		vga_console_attached = 1;
    543 	} else {
    544 		vc = malloc(sizeof(struct vga_config), M_DEVBUF, M_WAITOK);
    545 		vga_raster_init(vc, iot, memt);
    546 	}
    547 
    548 	vc->vc_type = type;
    549 	vc->vc_funcs = vf;
    550 
    551 	sc->sc_vc = vc;
    552 	vc->softc = sc;
    553 
    554 	aa.console = console;
    555 	aa.scrdata = (vc->hdl.vh_mono ? &vga_screenlist_mono : &vga_screenlist);
    556 	aa.accessops = &vga_raster_accessops;
    557 	aa.accesscookie = vc;
    558 
    559 	config_found(sc->sc_dev, &aa, wsemuldisplaydevprint);
    560 }
    561 
    562 int
    563 vga_cndetach(void)
    564 {
    565 	struct vga_config *vc;
    566 	struct vga_handle *vh;
    567 
    568 	vc = &vga_console_vc;
    569 	vh = &vc->hdl;
    570 
    571 	if (vgaconsole) {
    572 		bus_space_unmap(vh->vh_iot, vh->vh_ioh_vga, 0x10);
    573 		bus_space_unmap(vh->vh_iot, vh->vh_ioh_6845, 0x10);
    574 
    575 		return 1;
    576 	}
    577 
    578 	return 0;
    579 }
    580 
    581 int
    582 vga_is_console(bus_space_tag_t iot, int type)
    583 {
    584 	if (vgaconsole &&
    585 	    !vga_console_attached &&
    586 	    iot == vga_console_vc.hdl.vh_iot &&
    587 	    (vga_console_type == -1 || (type == vga_console_type)))
    588 		return (1);
    589 	return (0);
    590 }
    591 
    592 static int
    593 vga_get_video(struct vga_config *vc)
    594 {
    595 
    596 	return (vga_ts_read(&vc->hdl, mode) & VGA_TS_MODE_BLANK) == 0;
    597 }
    598 
    599 static void
    600 vga_set_video(struct vga_config *vc, int state)
    601 {
    602 	int val;
    603 
    604 	vga_ts_write(&vc->hdl, syncreset, 0x01);
    605 	if (state) {					/* unblank screen */
    606 		val = vga_ts_read(&vc->hdl, mode);
    607 		vga_ts_write(&vc->hdl, mode, val & ~VGA_TS_MODE_BLANK);
    608 #ifndef VGA_NO_VBLANK
    609 		val = vga_6845_read(&vc->hdl, mode);
    610 		vga_6845_write(&vc->hdl, mode, val | 0x80);
    611 #endif
    612 	} else {					/* blank screen */
    613 		val = vga_ts_read(&vc->hdl, mode);
    614 		vga_ts_write(&vc->hdl, mode, val | VGA_TS_MODE_BLANK);
    615 #ifndef VGA_NO_VBLANK
    616 		val = vga_6845_read(&vc->hdl, mode);
    617 		vga_6845_write(&vc->hdl, mode, val & ~0x80);
    618 #endif
    619 	}
    620 	vga_ts_write(&vc->hdl, syncreset, 0x03);
    621 }
    622 
    623 int
    624 vga_raster_ioctl(void *v, void *vs, u_long cmd, void *data, int flag,
    625 	struct lwp *l)
    626 {
    627 	struct vga_config *vc = v;
    628 	const struct vga_funcs *vf = vc->vc_funcs;
    629 
    630 	switch (cmd) {
    631 	case WSDISPLAYIO_GTYPE:
    632 		*(int *)data = vc->vc_type;
    633 		return 0;
    634 
    635 	case WSDISPLAYIO_GINFO: {
    636 		struct wsdisplay_fbinfo *fbi = data;
    637 		const struct wsscreen_descr *wd = vc->currenttype;
    638 		const struct videomode *vm = wd->modecookie;
    639 		fbi->width = vm->hdisplay;
    640 		fbi->height = vm->vdisplay;
    641 		fbi->depth = 24;	/* xxx: ? */
    642 		fbi->cmsize = 256;	/* xxx: from palette */
    643 		return 0;
    644 	}
    645 
    646 	case WSDISPLAYIO_GVIDEO:
    647 		*(int *)data = (vga_get_video(vc) ?
    648 		    WSDISPLAYIO_VIDEO_ON : WSDISPLAYIO_VIDEO_OFF);
    649 		return 0;
    650 
    651 	case WSDISPLAYIO_SVIDEO:
    652 		vga_set_video(vc, *(int *)data == WSDISPLAYIO_VIDEO_ON);
    653 		return 0;
    654 
    655 	case WSDISPLAYIO_GETCMAP:
    656 	case WSDISPLAYIO_PUTCMAP:
    657 	case WSDISPLAYIO_GCURPOS:
    658 	case WSDISPLAYIO_SCURPOS:
    659 	case WSDISPLAYIO_GCURMAX:
    660 	case WSDISPLAYIO_GCURSOR:
    661 	case WSDISPLAYIO_SCURSOR:
    662 #ifdef DIAGNOSTIC
    663 		printf("%s: 0x%lx unsupported\n", __func__, cmd);
    664 #endif
    665 		/* NONE of these operations are by the generic VGA driver. */
    666 		return EPASSTHROUGH;
    667 	}
    668 
    669 	if (vc->vc_funcs == NULL) {
    670 #ifdef DIAGNOSTIC
    671 		printf("%s: no vc_funcs\n", __func__);
    672 #endif
    673 		return EPASSTHROUGH;
    674 	}
    675 
    676 	if (vf->vf_ioctl == NULL) {
    677 #ifdef DIAGNOSTIC
    678 		printf("%s: no vf_ioctl\n", __func__);
    679 #endif
    680 		return EPASSTHROUGH;
    681 	}
    682 
    683 	return ((*vf->vf_ioctl)(v, cmd, data, flag, l));
    684 }
    685 
    686 static paddr_t
    687 vga_raster_mmap(void *v, void *vs, off_t offset, int prot)
    688 {
    689 	struct vga_config *vc = v;
    690 	const struct vga_funcs *vf = vc->vc_funcs;
    691 
    692 	if (vc->vc_funcs == NULL)
    693 		return (-1);
    694 
    695 	if (vf->vf_mmap == NULL)
    696 		return (-1);
    697 
    698 	return ((*vf->vf_mmap)(v, offset, prot));
    699 }
    700 
    701 static int
    702 vga_raster_alloc_screen(void *v, const struct wsscreen_descr *type,
    703     void **cookiep, int *curxp, int *curyp, long *defattrp)
    704 {
    705 	struct vga_config *vc = v;
    706 	struct vgascreen *scr;
    707 
    708 	if (vc->nscreens == 1) {
    709 		vc->screens.lh_first->mem = boot_scrmem;
    710 	}
    711 
    712 	scr = malloc(sizeof(struct vgascreen), M_DEVBUF, M_WAITOK);
    713 	vga_raster_init_screen(vc, scr, type, vc->nscreens == 0, defattrp);
    714 
    715 	if (vc->nscreens == 1) {
    716 		scr->active = 1;
    717 		vc->active = scr;
    718 		vc->currenttype = type;
    719 	} else {
    720 		scr->mem = malloc(sizeof(struct vga_scrmem) *
    721 		    type->ncols * type->nrows, M_DEVBUF, M_WAITOK);
    722 		vga_raster_eraserows(scr, 0, type->nrows, *defattrp);
    723 	}
    724 
    725 	*cookiep = scr;
    726 	*curxp = scr->cursorcol;
    727 	*curyp = scr->cursorrow;
    728 
    729 	return (0);
    730 }
    731 
    732 static void
    733 vga_raster_free_screen(void *v, void *cookie)
    734 {
    735 	struct vgascreen *vs = cookie;
    736 	struct vga_config *vc = vs->cfg;
    737 
    738 	LIST_REMOVE(vs, next);
    739 	vc->nscreens--;
    740 	if (vs != &vga_console_screen)
    741 		free(vs, M_DEVBUF);
    742 	else
    743 		panic("vga_raster_free_screen: console");
    744 
    745 	if (vc->active == vs)
    746 		vc->active = 0;
    747 }
    748 
    749 static int
    750 vga_raster_show_screen(void *v, void *cookie, int waitok,
    751     void (*cb)(void *, int, int), void *cbarg)
    752 {
    753 	struct vgascreen *scr = cookie, *oldscr;
    754 	struct vga_config *vc = scr->cfg;
    755 
    756 	oldscr = vc->active; /* can be NULL! */
    757 	if (scr == oldscr) {
    758 		return (0);
    759 	}
    760 
    761 	vc->wantedscreen = cookie;
    762 	vc->switchcb = cb;
    763 	vc->switchcbarg = cbarg;
    764 	if (cb) {
    765 		callout_reset(&vc->vc_switch_callout, 0,
    766 		    (void(*)(void *))vga_switch_screen, vc);
    767 		return (EAGAIN);
    768 	}
    769 
    770 	vga_switch_screen(vc);
    771 	return (0);
    772 }
    773 
    774 static void
    775 vga_switch_screen(struct vga_config *vc)
    776 {
    777 	struct vgascreen *scr, *oldscr;
    778 	struct vga_handle *vh = &vc->hdl;
    779 	const struct wsscreen_descr *type;
    780 
    781 	scr = vc->wantedscreen;
    782 	if (!scr) {
    783 		printf("vga_switch_screen: disappeared\n");
    784 		(*vc->switchcb)(vc->switchcbarg, EIO, 0);
    785 		return;
    786 	}
    787 	type = scr->type;
    788 	oldscr = vc->active; /* can be NULL! */
    789 #ifdef DIAGNOSTIC
    790 	if (oldscr) {
    791 		if (!oldscr->active)
    792 			panic("vga_raster_show_screen: not active");
    793 		if (oldscr->type != vc->currenttype)
    794 			panic("vga_raster_show_screen: bad type");
    795 	}
    796 #endif
    797 	if (scr == oldscr) {
    798 		return;
    799 	}
    800 #ifdef DIAGNOSTIC
    801 	if (scr->active)
    802 		panic("vga_raster_show_screen: active");
    803 #endif
    804 
    805 	if (oldscr)
    806 		oldscr->active = 0;
    807 
    808 	if (vc->currenttype != type) {
    809 		vga_raster_setscreentype(vc, type);
    810 		vc->currenttype = type;
    811 	}
    812 
    813 	scr->dispoffset = scr->mindispoffset;
    814 
    815 	if (!oldscr || (scr->dispoffset != oldscr->dispoffset)) {
    816 		vga_6845_write(vh, startadrh, scr->dispoffset >> 8);
    817 		vga_6845_write(vh, startadrl, scr->dispoffset);
    818 	}
    819 
    820 	/* Clear the entire screen. */
    821 	vga_gdc_write(vh, mode, 0x02);
    822 	bus_space_set_region_4(vh->vh_memt, vh->vh_allmemh, 0, 0, 0x2000);
    823 
    824 	scr->active = 1;
    825 	vga_restore_screen(scr, type, scr->mem);
    826 
    827 	vc->active = scr;
    828 
    829 	vga_raster_cursor(scr, scr->cursoron, scr->cursorrow, scr->cursorcol);
    830 
    831 	vc->wantedscreen = 0;
    832 	if (vc->switchcb)
    833 		(*vc->switchcb)(vc->switchcbarg, 0, 0);
    834 }
    835 
    836 static int
    837 vga_raster_load_font(void *v, void *id,
    838     struct wsdisplay_font *data)
    839 {
    840 	/* XXX */
    841 	printf("vga_raster_load_font: called\n");
    842 
    843 	return (0);
    844 }
    845 
    846 static void
    847 vga_raster_setup_font(struct vga_config *vc, struct vgascreen *scr)
    848 {
    849 	struct vga_raster_font *vf;
    850 	struct wsdisplay_font *wf;
    851 	int cookie;
    852 
    853 	LIST_FOREACH(vf, &vc->vc_fontlist, next) {
    854 		if (wsfont_matches(vf->font, 0, 0, scr->type->fontheight, 0,
    855 		    WSFONT_FIND_BITMAP)) {
    856 			scr->encoding = vf->font->encoding;
    857 			LIST_INSERT_HEAD(&scr->fontset, vf, next);
    858 			return;
    859 		}
    860 	}
    861 
    862 	cookie = wsfont_find(NULL, 0, scr->type->fontheight, 0,
    863 	    WSDISPLAY_FONTORDER_L2R, 0, WSFONT_FIND_BITMAP);
    864 	if (cookie == -1)
    865 		return;
    866 
    867 	if (wsfont_lock(cookie, &wf))
    868 		return;
    869 
    870 	vf = malloc(sizeof(struct vga_raster_font), M_DEVBUF, M_NOWAIT);
    871 	if (!vf) {
    872 		wsfont_unlock(cookie);
    873 		return;
    874 	}
    875 
    876 	vf->font = wf;
    877 	scr->encoding = vf->font->encoding;
    878 	LIST_INSERT_HEAD(&scr->fontset, vf, next);
    879 }
    880 
    881 static void
    882 vga_setup_regs(struct videomode *mode, struct vga_moderegs *regs)
    883 {
    884 	int i;
    885 	int depth = 4;			/* XXXBJY hardcoded for now */
    886 	const u_int8_t palette[] = {
    887 		0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x14, 0x07,
    888 		0x38, 0x39, 0x3a, 0x3b, 0x3c, 0x3d, 0x3e, 0x3f
    889 	};
    890 
    891 	/*
    892 	 * Compute hsync and vsync polarity.
    893 	 */
    894 	if ((mode->flags & (VID_PHSYNC | VID_NHSYNC))
    895 	    && (mode->flags & (VID_PVSYNC | VID_NVSYNC))) {
    896 	    	regs->miscout = 0x23;
    897 		if (mode->flags & VID_NHSYNC)
    898 			regs->miscout |= 0x40;
    899 		if (mode->flags & VID_NVSYNC)
    900 			regs->miscout |= 0x80;
    901 	} else {
    902 		if (mode->flags & VID_DBLSCAN)
    903 			mode->vdisplay *= 2;
    904 		if (mode->vdisplay < 400)
    905 			regs->miscout = 0xa3;
    906 		else if (mode->vdisplay < 480)
    907 			regs->miscout = 0x63;
    908 		else if (mode->vdisplay < 768)
    909 			regs->miscout = 0xe3;
    910 		else
    911 			regs->miscout = 0x23;
    912 	}
    913 
    914 	/*
    915 	 * Time sequencer
    916 	 */
    917 	if (depth == 4)
    918 		regs->ts[0] = 0x02;
    919 	else
    920 		regs->ts[0] = 0x00;
    921 	if (mode->flags & VID_CLKDIV2)
    922 		regs->ts[1] = 0x09;
    923 	else
    924 		regs->ts[1] = 0x01;
    925 	regs->ts[2] = 0x0f;
    926 	regs->ts[3] = 0x00;
    927 	if (depth < 8)
    928 		regs->ts[4] = 0x06;
    929 	else
    930 		regs->ts[4] = 0x0e;
    931 
    932 	/*
    933 	 * CRTC controller
    934 	 */
    935 	regs->crtc[0] = (mode->htotal >> 3) - 5;
    936 	regs->crtc[1] = (mode->hdisplay >> 3) - 1;
    937 	regs->crtc[2] = (mode->hsync_start >> 3) - 1;
    938 	regs->crtc[3] = (((mode->hsync_end >> 3) - 1) & 0x1f) | 0x80;
    939 	regs->crtc[4] = mode->hsync_start >> 3;
    940 	regs->crtc[5] = ((((mode->hsync_end >> 3) - 1) & 0x20) << 2)
    941 	    | (((mode->hsync_end >> 3)) & 0x1f);
    942 	regs->crtc[6] = (mode->vtotal - 2) & 0xff;
    943 	regs->crtc[7] = (((mode->vtotal - 2) & 0x100) >> 8)
    944 	    | (((mode->vdisplay - 1) & 0x100) >> 7)
    945 	    | ((mode->vsync_start & 0x100) >> 6)
    946 	    | (((mode->vsync_start - 1) & 0x100) >> 5)
    947 	    | 0x10
    948 	    | (((mode->vtotal - 2) & 0x200) >> 4)
    949 	    | (((mode->vdisplay - 1) & 0x200) >> 3)
    950 	    | ((mode->vsync_start & 0x200) >> 2);
    951 	regs->crtc[8] = 0x00;
    952 	regs->crtc[9] = (((mode->vsync_start - 1) & 0x200) >> 4) | 0x40;
    953 	if (mode->flags & VID_DBLSCAN)
    954 		regs->crtc[9] |= 0x80;
    955 	regs->crtc[10] = 0x00;
    956 	regs->crtc[11] = 0x00;
    957 	regs->crtc[12] = 0x00;
    958 	regs->crtc[13] = 0x00;
    959 	regs->crtc[14] = 0x00;
    960 	regs->crtc[15] = 0x00;
    961 	regs->crtc[16] = mode->vsync_start & 0xff;
    962 	regs->crtc[17] = (mode->vsync_end & 0x0f) | 0x20;
    963 	regs->crtc[18] = (mode->vdisplay - 1) & 0xff;
    964 	regs->crtc[19] = mode->hdisplay >> 4;	/* XXXBJY */
    965 	regs->crtc[20] = 0x00;
    966 	regs->crtc[21] = (mode->vsync_start - 1) & 0xff;
    967 	regs->crtc[22] = (mode->vsync_end - 1) & 0xff;
    968 	if (depth < 8)
    969 		regs->crtc[23] = 0xe3;
    970 	else
    971 		regs->crtc[23] = 0xc3;
    972 	regs->crtc[24] = 0xff;
    973 
    974 	/*
    975 	 * Graphics display controller
    976 	 */
    977 	regs->gdc[0] = 0x00;
    978 	regs->gdc[1] = 0x00;
    979 	regs->gdc[2] = 0x00;
    980 	regs->gdc[3] = 0x00;
    981 	regs->gdc[4] = 0x00;
    982 	if (depth == 4)
    983 		regs->gdc[5] = 0x02;
    984 	else
    985 		regs->gdc[5] = 0x40;
    986 	regs->gdc[6] = 0x01;
    987 	regs->gdc[7] = 0x0f;
    988 	regs->gdc[8] = 0xff;
    989 
    990 	/*
    991 	 * Attribute controller
    992 	 */
    993 	/* Set palette registers. */
    994 	for (i = 0; i < 16; i++)
    995 		regs->atc[i] = palette[i];
    996 	if (depth == 4)
    997 		regs->atc[16] = 0x01;	/* XXXBJY was 0x81 in XFree86 */
    998 	else
    999 		regs->atc[16] = 0x41;
   1000 	regs->atc[17] = 0x00;		/* XXXBJY just a guess */
   1001 	regs->atc[18] = 0x0f;
   1002 	regs->atc[19] = 0x00;
   1003 	regs->atc[20] = 0x00;
   1004 }
   1005 
   1006 static void
   1007 vga_set_mode(struct vga_handle *vh, struct vga_moderegs *regs)
   1008 {
   1009 	int i;
   1010 
   1011 	/* Disable display. */
   1012 	vga_ts_write(vh, mode, vga_ts_read(vh, mode) | VGA_TS_MODE_BLANK);
   1013 
   1014 	/* Write misc output register. */
   1015 	bus_space_write_1(vh->vh_iot, vh->vh_ioh_vga, VGA_MISC_DATAW,
   1016 	    regs->miscout);
   1017 
   1018 	/* Set synchronous reset. */
   1019 	vga_ts_write(vh, syncreset, 0x01);
   1020 	vga_ts_write(vh, mode, regs->ts[1] | VGA_TS_MODE_BLANK);
   1021 	for (i = 2; i < VGA_TS_NREGS; i++)
   1022 		_vga_ts_write(vh, i, regs->ts[i]);
   1023 	/* Clear synchronous reset. */
   1024 	vga_ts_write(vh, syncreset, 0x03);
   1025 
   1026 	/* Unprotect CRTC registers 0-7. */
   1027 	vga_6845_write(vh, vsynce, vga_6845_read(vh, vsynce) & ~0x80);
   1028 	/* Write CRTC registers. */
   1029 	for (i = 0; i < MC6845_NREGS; i++)
   1030 		_vga_6845_write(vh, i, regs->crtc[i]);
   1031 
   1032 	/* Write graphics display registers. */
   1033 	for (i = 0; i < VGA_GDC_NREGS; i++)
   1034 		_vga_gdc_write(vh, i, regs->gdc[i]);
   1035 
   1036 	/* Write attribute controller registers. */
   1037 	for (i = 0; i < VGA_ATC_NREGS; i++)
   1038 		_vga_attr_write(vh, i, regs->atc[i]);
   1039 
   1040 	/* Enable display. */
   1041 	vga_ts_write(vh, mode, vga_ts_read(vh, mode) & ~VGA_TS_MODE_BLANK);
   1042 }
   1043 
   1044 static void
   1045 vga_raster_cursor_init(struct vgascreen *scr, int existing)
   1046 {
   1047 	struct vga_handle *vh = scr->hdl;
   1048 	bus_space_tag_t memt;
   1049 	bus_space_handle_t memh;
   1050 	int off;
   1051 
   1052 	if (existing) {
   1053 		/*
   1054 		 * This is the first screen. At this point, scr->active is
   1055 		 * false, so we can't use vga_raster_cursor() to do this.
   1056 		 */
   1057 		memt = vh->vh_memt;
   1058 		memh = vh->vh_memh;
   1059 		off = (scr->cursorrow * scr->type->ncols + scr->cursorcol) +
   1060 		    scr->dispoffset / 8;
   1061 
   1062 		scr->cursortmp = scr->mem[off];
   1063 		vga_raster_putchar(scr, scr->cursorrow, scr->cursorcol,
   1064 		    scr->cursortmp.ch, scr->cursortmp.attr ^ 0x77);
   1065 	} else {
   1066 		scr->cursortmp.ch = 0;
   1067 		scr->cursortmp.attr = 0;
   1068 		scr->cursortmp.second = 0;
   1069 		scr->cursortmp.enc = scr->encoding;
   1070 	}
   1071 
   1072 	scr->cursoron = 1;
   1073 }
   1074 
   1075 static void
   1076 vga_raster_cursor(void *id, int on, int row, int col)
   1077 {
   1078 	struct vgascreen *scr = id;
   1079 	int off, tmp;
   1080 
   1081 	/* Remove old cursor image */
   1082 	if (scr->cursoron) {
   1083 		off = scr->cursorrow * scr->type->ncols + scr->cursorcol;
   1084 		if (scr->active) {
   1085 			tmp = scr->encoding;
   1086 			scr->encoding = scr->cursortmp.enc;
   1087 			if (scr->cursortmp.second)
   1088 				vga_raster_putchar(id, scr->cursorrow,
   1089 				    scr->cursorcol - 1, scr->cursortmp.ch,
   1090 				    scr->cursortmp.attr);
   1091 			else
   1092 				vga_raster_putchar(id, scr->cursorrow,
   1093 				    scr->cursorcol, scr->cursortmp.ch,
   1094 				    scr->cursortmp.attr);
   1095 			scr->encoding = tmp;
   1096 		}
   1097 	}
   1098 
   1099 	scr->cursorrow = row;
   1100 	scr->cursorcol = col;
   1101 
   1102 	if ((scr->cursoron = on) == 0)
   1103 		return;
   1104 
   1105 	off = scr->cursorrow * scr->type->ncols + scr->cursorcol;
   1106 	scr->cursortmp = scr->mem[off];
   1107 	if (scr->active) {
   1108 		tmp = scr->encoding;
   1109 		scr->encoding = scr->cursortmp.enc;
   1110 		if (scr->cursortmp.second)
   1111 			vga_raster_putchar(id, scr->cursorrow,
   1112 			    scr->cursorcol - 1, scr->cursortmp.ch,
   1113 			    scr->cursortmp.attr ^ 0x77);
   1114 		else
   1115 			vga_raster_putchar(id, scr->cursorrow,
   1116 			    scr->cursorcol, scr->cursortmp.ch,
   1117 			    scr->cursortmp.attr ^ 0x77);
   1118 		scr->encoding = tmp;
   1119 	}
   1120 }
   1121 
   1122 static int
   1123 vga_raster_mapchar(void *id, int uni, u_int *index)
   1124 {
   1125 	struct vgascreen *scr = id;
   1126 
   1127 	if (scr->encoding == WSDISPLAY_FONTENC_IBM)
   1128 		return pcdisplay_mapchar(id, uni, index);
   1129 	else {
   1130 		*index = uni;
   1131 		return 5;
   1132 	}
   1133 }
   1134 
   1135 static void
   1136 vga_raster_putchar(void *id, int row, int col, u_int c, long attr)
   1137 {
   1138 	struct vgascreen *scr = id;
   1139 	size_t off;
   1140 	struct vga_raster_font *fs;
   1141 	u_int tmp_ch;
   1142 
   1143 	off = row * scr->type->ncols + col;
   1144 
   1145 	if (__predict_false(off >= (scr->type->ncols * scr->type->nrows)))
   1146 		return;
   1147 
   1148 	LIST_FOREACH(fs, &scr->fontset, next) {
   1149 		if ((scr->encoding == fs->font->encoding) &&
   1150 		    (c >= fs->font->firstchar) &&
   1151 		    (c < fs->font->firstchar + fs->font->numchars) &&
   1152 		    (scr->type->fontheight == fs->font->fontheight)) {
   1153 			if (scr->active) {
   1154 				tmp_ch = c - fs->font->firstchar;
   1155 				_vga_raster_putchar(scr, row, col, tmp_ch,
   1156 				    attr, fs);
   1157 			}
   1158 
   1159 			scr->mem[off].ch = c;
   1160 			scr->mem[off].attr = attr;
   1161 			scr->mem[off].second = 0;
   1162 			scr->mem[off].enc = fs->font->encoding;
   1163 
   1164 			if (fs->font->stride == 2) {
   1165 				scr->mem[off + 1].ch = c;
   1166 				scr->mem[off + 1].attr = attr;
   1167 				scr->mem[off + 1].second = 1;
   1168 				scr->mem[off + 1].enc = fs->font->encoding;
   1169 			}
   1170 
   1171 			return;
   1172 		}
   1173 	}
   1174 
   1175 	/*
   1176 	 * No match found.
   1177 	 */
   1178 	if (scr->active)
   1179 		/*
   1180 		 * Put a single width space character no matter what the
   1181 		 * actual width of the character is.
   1182 		 */
   1183 		_vga_raster_putchar(scr, row, col, ' ', attr,
   1184 		    &vga_console_fontset_ascii);
   1185 	scr->mem[off].ch = c;
   1186 	scr->mem[off].attr = attr;
   1187 	scr->mem[off].second = 0;
   1188 	scr->mem[off].enc = scr->encoding;
   1189 }
   1190 
   1191 static void
   1192 _vga_raster_putchar(void *id, int row, int col, u_int c, long attr,
   1193     struct vga_raster_font *fs)
   1194 {
   1195 	struct vgascreen *scr = id;
   1196 	struct vga_handle *vh = scr->hdl;
   1197 	bus_space_tag_t memt = vh->vh_memt;
   1198 	bus_space_handle_t memh = vh->vh_memh;
   1199 	int i;
   1200 	int rasoff, rasoff2;
   1201 	int fheight = scr->type->fontheight;
   1202 	volatile u_int8_t dummy, pattern;
   1203 	u_int8_t fgcolor, bgcolor;
   1204 
   1205 	rasoff = scr->dispoffset + row * scr->type->ncols * fheight + col;
   1206 	rasoff2 = rasoff;
   1207 
   1208 #if 0
   1209 	bgcolor = bgansitopc[attr >> 4];
   1210 	fgcolor = fgansitopc[attr & 0x0f];
   1211 #else
   1212 	bgcolor = ((attr >> 4) & 0x0f);
   1213 	fgcolor = attr & 0x0f;
   1214 #endif
   1215 
   1216 	if (fs->font->stride == 1) {
   1217 		/* Paint background. */
   1218 		vga_gdc_write(vh, mode, 0x02);
   1219 		for (i = 0; i < fheight; i++) {
   1220 			bus_space_write_1(memt, memh, rasoff, bgcolor);
   1221 			rasoff += scr->type->ncols;
   1222 		}
   1223 
   1224 		/* Draw a single width character. */
   1225 		vga_gdc_write(vh, mode, 0x03);
   1226 		vga_gdc_write(vh, setres, fgcolor);
   1227 		for (i = 0; i < fheight; i++) {
   1228 			pattern = ((u_int8_t *)fs->font->data)[c * fheight + i];
   1229 			/* When pattern is 0, skip output for speed-up. */
   1230 			if (pattern != 0) {
   1231 				dummy = bus_space_read_1(memt, memh, rasoff2);
   1232 				bus_space_write_1(memt, memh, rasoff2, pattern);
   1233 			}
   1234 			rasoff2 += scr->type->ncols;
   1235 		}
   1236 	} else if (fs->font->stride == 2) {
   1237 		/* Paint background. */
   1238 		vga_gdc_write(vh, mode, 0x02);
   1239 		for (i = 0; i < fheight; i++) {
   1240 			bus_space_write_1(memt, memh, rasoff, bgcolor);
   1241 			bus_space_write_1(memt, memh, rasoff + 1, bgcolor);
   1242 			rasoff += scr->type->ncols;
   1243 		}
   1244 
   1245 		/* Draw a double width character. */
   1246 		vga_gdc_write(vh, mode, 0x03);
   1247 		vga_gdc_write(vh, setres, fgcolor);
   1248 		for (i = 0; i < fheight; i++) {
   1249 			pattern = ((u_int8_t *)fs->font->data)
   1250 			    [(c * fheight + i) * 2];
   1251 			if (pattern != 0) {
   1252 				dummy = bus_space_read_1(memt, memh, rasoff2);
   1253 				bus_space_write_1(memt, memh, rasoff2, pattern);
   1254 			}
   1255 			pattern = ((u_int8_t *)fs->font->data)
   1256 			    [(c * fheight + i) * 2 + 1];
   1257 			if (pattern != 0) {
   1258 				rasoff2++;
   1259 				dummy = bus_space_read_1(memt, memh, rasoff2);
   1260 				bus_space_write_1(memt, memh, rasoff2, pattern);
   1261 				rasoff2--;
   1262 			}
   1263 			rasoff2 += scr->type->ncols;
   1264 		}
   1265 	}
   1266 }
   1267 
   1268 static void
   1269 vga_raster_copycols(void *id, int row, int srccol, int dstcol, int ncols)
   1270 {
   1271 	struct vgascreen *scr = id;
   1272 	struct vga_handle *vh = scr->hdl;
   1273 	bus_space_tag_t memt = vh->vh_memt;
   1274 	bus_space_handle_t memh = vh->vh_memh;
   1275 	bus_size_t srcoff, dstoff;
   1276 	bus_size_t rassrcoff, rasdstoff;
   1277 	int i;
   1278 	int fheight = scr->type->fontheight;
   1279 
   1280 	srcoff = row * scr->type->ncols + srccol;
   1281 	dstoff = row * scr->type->ncols + dstcol;
   1282 	rassrcoff = scr->dispoffset + row * scr->type->ncols * fheight + srccol;
   1283 	rasdstoff = scr->dispoffset + row * scr->type->ncols * fheight + dstcol;
   1284 
   1285 	memcpy(&scr->mem[dstoff], &scr->mem[srcoff],
   1286 	    ncols * sizeof(struct vga_scrmem));
   1287 
   1288 	vga_gdc_write(vh, mode, 0x01);
   1289 	if (scr->active) {
   1290 		for (i = 0; i < fheight; i++) {
   1291 			bus_space_copy_region_1(memt, memh,
   1292 			    rassrcoff + i * scr->type->ncols, memh,
   1293 			    rasdstoff + i * scr->type->ncols, ncols);
   1294 		}
   1295 	}
   1296 }
   1297 
   1298 static void
   1299 vga_raster_erasecols(void *id, int row, int startcol, int ncols, long fillattr)
   1300 {
   1301 	struct vgascreen *scr = id;
   1302 	int i;
   1303 
   1304 	if (scr->active == 0)
   1305 		return;
   1306 
   1307 	for (i = startcol; i < startcol + ncols; i++)
   1308 		vga_raster_putchar(id, row, i, ' ', fillattr);
   1309 }
   1310 
   1311 static void
   1312 vga_raster_copyrows(void *id, int srcrow, int dstrow, int nrows)
   1313 {
   1314 	struct vgascreen *scr = id;
   1315 	struct vga_handle *vh = scr->hdl;
   1316 	bus_space_tag_t memt = vh->vh_memt;
   1317 	bus_space_handle_t memh = vh->vh_memh;
   1318 	int ncols;
   1319 	bus_size_t srcoff, dstoff;
   1320 	bus_size_t rassrcoff, rasdstoff;
   1321 	int fheight;
   1322 
   1323 	ncols = scr->type->ncols;
   1324 	fheight = scr->type->fontheight;
   1325 
   1326 	srcoff = srcrow * ncols;
   1327 	dstoff = dstrow * ncols;
   1328 	rassrcoff = srcoff * fheight;
   1329 	rasdstoff = dstoff * fheight;
   1330 
   1331 	if (scr->active) {
   1332 		vga_gdc_write(vh, mode, 0x01);
   1333 		if (dstrow == 0 && (srcrow + nrows == scr->type->nrows)) {
   1334 			int cursoron = scr->cursoron;
   1335 
   1336 			if (cursoron)
   1337 				/* Disable cursor. */
   1338 				vga_raster_cursor(scr, 0,
   1339 				    scr->cursorrow, scr->cursorcol);
   1340 
   1341 			/* scroll up whole screen */
   1342 			if ((scr->dispoffset + srcrow * ncols * fheight)
   1343 			    <= scr->maxdispoffset)
   1344 				scr->dispoffset += srcrow * ncols * fheight;
   1345 			else {
   1346 				bus_space_copy_region_1(memt, memh,
   1347 				    scr->dispoffset + rassrcoff,
   1348 				    memh, scr->mindispoffset,
   1349 				    nrows * ncols * fheight);
   1350 				scr->dispoffset = scr->mindispoffset;
   1351 			}
   1352 			vga_6845_write(vh, startadrh, scr->dispoffset >> 8);
   1353 			vga_6845_write(vh, startadrl, scr->dispoffset);
   1354 
   1355 			if (cursoron)
   1356 				/* Enable cursor. */
   1357 				vga_raster_cursor(scr, 1, scr->cursorrow,
   1358 				    scr->cursorcol);
   1359 		} else
   1360 			bus_space_copy_region_1(memt, memh,
   1361 			    scr->dispoffset + rassrcoff, memh,
   1362 			    scr->dispoffset + rasdstoff,
   1363 			    nrows * ncols * fheight);
   1364 	}
   1365 	memcpy(&scr->mem[dstoff], &scr->mem[srcoff],
   1366 	    nrows * ncols * sizeof(struct vga_scrmem));
   1367 }
   1368 
   1369 static void
   1370 vga_raster_eraserows(void *id, int startrow, int nrows, long fillattr)
   1371 {
   1372 	struct vgascreen *scr = id;
   1373 	struct vga_handle *vh = scr->hdl;
   1374 	bus_space_tag_t memt = vh->vh_memt;
   1375 	bus_space_handle_t memh = vh->vh_memh;
   1376 	bus_size_t off, count;
   1377 	bus_size_t rasoff, rascount;
   1378 	int i;
   1379 
   1380 	off = startrow * scr->type->ncols;
   1381 	count = nrows * scr->type->ncols;
   1382 	rasoff = off * scr->type->fontheight;
   1383 	rascount = count * scr->type->fontheight;
   1384 
   1385 	if (scr->active) {
   1386 		u_int8_t bgcolor = (fillattr >> 4) & 0x0F;
   1387 
   1388 		/* Paint background. */
   1389 		vga_gdc_write(vh, mode, 0x02);
   1390 		if (scr->type->ncols % 4 == 0) {
   1391 			u_int32_t fill = bgcolor | (bgcolor << 8) |
   1392 			    (bgcolor << 16) | (bgcolor << 24);
   1393 			/* We can speed up I/O */
   1394 			for (i = rasoff; i < rasoff + rascount; i += 4)
   1395 				bus_space_write_4(memt, memh,
   1396 				    scr->dispoffset + i, fill);
   1397 		} else {
   1398 			u_int16_t fill = bgcolor | (bgcolor << 8);
   1399 			for (i = rasoff; i < rasoff + rascount; i += 2)
   1400 				bus_space_write_2(memt, memh,
   1401 				    scr->dispoffset + i, fill);
   1402 		}
   1403 	}
   1404 	for (i = 0; i < count; i++) {
   1405 		scr->mem[off + i].ch = ' ';
   1406 		scr->mem[off + i].attr = fillattr;
   1407 		scr->mem[off + i].second = 0;
   1408 		scr->mem[off + i].enc = scr->encoding;
   1409 	}
   1410 }
   1411 
   1412 static int
   1413 vga_raster_allocattr(void *id, int fg, int bg, int flags, long *attrp)
   1414 {
   1415 	struct vgascreen *scr = id;
   1416 	struct vga_config *vc = scr->cfg;
   1417 
   1418 	if (__predict_false((unsigned int)fg >= sizeof(fgansitopc) ||
   1419 	    (unsigned int)bg >= sizeof(bgansitopc)))
   1420 	    	return (EINVAL);
   1421 
   1422 	if (vc->hdl.vh_mono) {
   1423 		if (flags & WSATTR_WSCOLORS)
   1424 			return (EINVAL);
   1425 		if (flags & WSATTR_REVERSE)
   1426 			*attrp = 0x70;
   1427 		else
   1428 			*attrp = 0x07;
   1429 		if (flags & WSATTR_UNDERLINE)
   1430 			*attrp |= FG_UNDERLINE;
   1431 		if (flags & WSATTR_HILIT)
   1432 			*attrp |= FG_INTENSE;
   1433 	} else {
   1434 		if (flags & (WSATTR_UNDERLINE | WSATTR_REVERSE))
   1435 			return (EINVAL);
   1436 		if (flags & WSATTR_WSCOLORS)
   1437 			*attrp = fgansitopc[fg] | bgansitopc[bg];
   1438 		else
   1439 			*attrp = 7;
   1440 		if (flags & WSATTR_HILIT)
   1441 			*attrp += 8;
   1442 	}
   1443 	if (flags & WSATTR_BLINK)
   1444 		*attrp |= FG_BLINK;
   1445 	return (0);
   1446 }
   1447 
   1448 static void
   1449 vga_restore_screen(struct vgascreen *scr,
   1450     const struct wsscreen_descr *type, struct vga_scrmem *mem)
   1451 {
   1452 	int i, j, off, tmp;
   1453 
   1454 	tmp = scr->encoding;
   1455 	for (i = 0; i < type->nrows; i++) {
   1456 		for (j = 0; j < type->ncols; j++) {
   1457 			off = i * type->ncols + j;
   1458 			if (mem[off].second != 1) {
   1459 				scr->encoding = mem[off].enc;
   1460 				vga_raster_putchar(scr, i, j, mem[off].ch,
   1461 				    mem[off].attr);
   1462 			}
   1463 		}
   1464 	}
   1465 	scr->encoding = tmp;
   1466 }
   1467 
   1468 static void
   1469 vga_raster_setscreentype(struct vga_config *vc,
   1470     const struct wsscreen_descr *type)
   1471 {
   1472 	struct vga_handle *vh = &vc->hdl;
   1473 	struct vga_moderegs moderegs;
   1474 
   1475 	vga_setup_regs((struct videomode *)type->modecookie, &moderegs);
   1476 	vga_set_mode(vh, &moderegs);
   1477 }
   1478 
   1479 #ifdef WSDISPLAY_CUSTOM_OUTPUT
   1480 static void
   1481 vga_raster_replaceattr(void *id, long oldattr, long newattr)
   1482 {
   1483 	struct vgascreen *scr = id;
   1484 	const struct wsscreen_descr *type = scr->type;
   1485 	int off;
   1486 
   1487 	for (off = 0; off < type->nrows * type->ncols; off++) {
   1488 		if (scr->mem[off].attr == oldattr)
   1489 			scr->mem[off].attr = newattr;
   1490 	}
   1491 
   1492 	/* Repaint the whole screen, if needed */
   1493 	if (scr->active)
   1494 		vga_restore_screen(scr, type, scr->mem);
   1495 }
   1496 #endif /* WSDISPLAY_CUSTOM_OUTPUT */
   1497 
   1498 void
   1499 vga_resume(struct vga_softc *sc)
   1500 {
   1501 #ifdef VGA_RESET_ON_RESUME
   1502 	vga_initregs(&sc->sc_vc->hdl);
   1503 #endif
   1504 }
   1505