Home | History | Annotate | Line # | Download | only in ic
vga_raster.c revision 1.31
      1 /*	$NetBSD: vga_raster.c,v 1.31 2008/06/15 13:42:03 nonaka 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.31 2008/06/15 13:42:03 nonaka 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/ic/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 	scr = wsdisplay_screentype_pick(vga_console_vc.hdl.vh_mono ?
    353 	    &vga_screenlist_mono : &vga_screenlist, typestr);
    354 	if (scr != vga_console_vc.currenttype)
    355 		vga_console_vc.currenttype = scr;
    356 #else
    357 	scr = vga_console_vc.currenttype;
    358 #endif
    359 	vga_raster_init_screen(&vga_console_vc, &vga_console_screen, scr, 1,
    360 	    &defattr);
    361 
    362 	vga_console_screen.active = 1;
    363 	vga_console_vc.active = &vga_console_screen;
    364 
    365 	wsdisplay_cnattach(scr, &vga_console_screen,
    366 	    vga_console_screen.cursorcol, vga_console_screen.cursorrow,
    367 	    defattr);
    368 
    369 	vgaconsole = 1;
    370 	vga_console_type = type;
    371 	return (0);
    372 }
    373 
    374 void
    375 vga_raster_init(struct vga_config *vc, bus_space_tag_t iot,
    376     bus_space_tag_t memt)
    377 {
    378 	struct vga_handle *vh = &vc->hdl;
    379 	u_int8_t mor;
    380 	struct vga_raster_font *vf;
    381 
    382 	vh->vh_iot = iot;
    383 	vh->vh_memt = memt;
    384 
    385 	if (bus_space_map(vh->vh_iot, 0x3c0, 0x10, 0, &vh->vh_ioh_vga))
    386 		panic("vga_raster_init: couldn't map vga io");
    387 
    388 	/* read "misc output register" */
    389 	mor = bus_space_read_1(vh->vh_iot, vh->vh_ioh_vga, VGA_MISC_DATAR);
    390 	vh->vh_mono = !(mor & 1);
    391 
    392 	if (bus_space_map(vh->vh_iot, (vh->vh_mono ? 0x3b0 : 0x3d0), 0x10, 0,
    393 	    &vh->vh_ioh_6845))
    394 		panic("vga_raster_init: couldn't map 6845 io");
    395 
    396 	if (bus_space_map(vh->vh_memt, 0xa0000, 0x20000, 0, &vh->vh_allmemh))
    397 		panic("vga_raster_init: couldn't map memory");
    398 
    399 	if (bus_space_subregion(vh->vh_memt, vh->vh_allmemh, 0, 0x10000,
    400 	    &vh->vh_memh))
    401 		panic("vga_raster_init: mem subrange failed");
    402 
    403 	/* should only reserve the space (no need to map - save KVM) */
    404 	vc->vc_biostag = memt;
    405 	if (bus_space_map(vc->vc_biostag, 0xc0000, 0x8000, 0, &vc->vc_bioshdl))
    406 		vc->vc_biosmapped = 0;
    407 	else
    408 		vc->vc_biosmapped = 1;
    409 
    410 	vc->nscreens = 0;
    411 	LIST_INIT(&vc->screens);
    412 	vc->active = NULL;
    413 	vc->currenttype = vh->vh_mono ? &vga_25lscreen_mono : &vga_25lscreen;
    414 	callout_init(&vc->vc_switch_callout, 0);
    415 
    416 	wsfont_init();
    417 	vc->nfonts = 1;
    418 	LIST_INIT(&vc->vc_fontlist);
    419 	vf = &vga_console_fontset_ascii;
    420 	if (vga_no_builtinfont) {
    421 		struct wsdisplay_font *wf;
    422 		int cookie;
    423 
    424 		/* prefer 8x16 pixel font */
    425 		cookie = wsfont_find(NULL, 8, 16, 0, WSDISPLAY_FONTORDER_L2R,
    426 		    0);
    427 		if (cookie == -1)
    428 			cookie = wsfont_find(NULL, 0, 0, 0,
    429 			    WSDISPLAY_FONTORDER_L2R, WSDISPLAY_FONTORDER_L2R);
    430 		if (cookie == -1 || wsfont_lock(cookie, &wf))
    431 			panic("vga_raster_init: can't load console font");
    432 		vf->font = wf;
    433 	} else {
    434 		vga_load_builtinfont(vh, builtinfont_data, 0, 256);
    435 		vf->font = &builtinfont;
    436 	}
    437 	LIST_INSERT_HEAD(&vc->vc_fontlist, vf, next);
    438 }
    439 
    440 void
    441 vga_raster_init_screen(struct vga_config *vc, struct vgascreen *scr,
    442     const struct wsscreen_descr *type, int existing, long *attrp)
    443 {
    444 	int cpos;
    445 	int res;
    446 	struct vga_handle *vh;
    447 
    448 	scr->cfg = vc;
    449 	scr->hdl = &vc->hdl;
    450 	scr->type = type;
    451 	scr->mindispoffset = 0;
    452 	scr->maxdispoffset = 0x10000;
    453 	vh = &vc->hdl;
    454 
    455 	LIST_INIT(&scr->fontset);
    456 	vga_raster_setup_font(vc, scr);
    457 
    458 	if (existing) {
    459 		int i;
    460 
    461 		cpos = vga_6845_read(vh, cursorh) << 8;
    462 		cpos |= vga_6845_read(vh, cursorl);
    463 
    464 		/* make sure we have a valid cursor position */
    465 		if (cpos < 0 || cpos >= type->nrows * type->ncols)
    466 			cpos = 0;
    467 
    468 		scr->dispoffset = vga_6845_read(vh, startadrh) << 9;
    469 		scr->dispoffset |= vga_6845_read(vh, startadrl) << 1;
    470 
    471 		/* make sure we have a valid memory offset */
    472 		if (scr->dispoffset < scr->mindispoffset ||
    473 		    scr->dispoffset > scr->maxdispoffset)
    474 			scr->dispoffset = scr->mindispoffset;
    475 
    476 		scr->mem = boot_scrmem;
    477 		scr->active = 1;
    478 
    479 		/* Save the current screen to memory. XXXBJY assume 80x25 */
    480 		for (i = 0; i < 80 * 25; i++) {
    481 			scr->mem[i].ch = bus_space_read_1(vh->vh_memt,
    482 			    vh->vh_allmemh, 0x18000 + i * 2);
    483 			scr->mem[i].attr = bus_space_read_1(vh->vh_memt,
    484 			    vh->vh_allmemh, 0x18000 + i * 2 + 1);
    485 			scr->mem[i].enc = scr->encoding;
    486 		}
    487 
    488 		vga_raster_setscreentype(vc, type);
    489 
    490 		/* Clear the entire screen. */
    491 		vga_gdc_write(vh, mode, 0x02);
    492 		bus_space_set_region_4(vh->vh_memt, vh->vh_allmemh, 0, 0,
    493 		    0x4000);
    494 
    495 		vga_restore_screen(scr, type, scr->mem);
    496 	} else {
    497 		cpos = 0;
    498 		scr->dispoffset = scr->mindispoffset;
    499 		scr->mem = NULL;
    500 		scr->active = 0;
    501 	}
    502 
    503 	scr->cursorrow = cpos / type->ncols;
    504 	scr->cursorcol = cpos % type->ncols;
    505 	vga_raster_cursor_init(scr, existing);
    506 
    507 #ifdef __alpha__
    508 	if (!vc->hdl.vh_mono)
    509 		/*
    510 		 * DEC firmware uses a blue background.
    511 		 */
    512 		res = vga_raster_allocattr(scr, WSCOL_WHITE, WSCOL_BLUE,
    513 		    WSATTR_WSCOLORS, attrp);
    514 	else
    515 #endif
    516 	res = vga_raster_allocattr(scr, 0, 0, 0, attrp);
    517 #ifdef DIAGNOSTIC
    518 	if (res)
    519 		panic("vga_raster_init_screen: attribute botch");
    520 #endif
    521 
    522 	vc->nscreens++;
    523 	LIST_INSERT_HEAD(&vc->screens, scr, next);
    524 }
    525 
    526 void
    527 vga_common_attach(struct vga_softc *sc, bus_space_tag_t iot,
    528     bus_space_tag_t memt, int type, int quirks,
    529     const struct vga_funcs *vf)
    530 {
    531 	int console;
    532 	struct vga_config *vc;
    533 	struct wsemuldisplaydev_attach_args aa;
    534 
    535 	console = vga_is_console(iot, type);
    536 
    537 	if (console) {
    538 		vc = &vga_console_vc;
    539 		vga_console_attached = 1;
    540 	} else {
    541 		vc = malloc(sizeof(struct vga_config), M_DEVBUF, M_WAITOK);
    542 		vga_raster_init(vc, iot, memt);
    543 	}
    544 
    545 	vc->vc_type = type;
    546 	vc->vc_funcs = vf;
    547 
    548 	sc->sc_vc = vc;
    549 	vc->softc = sc;
    550 
    551 	aa.console = console;
    552 	aa.scrdata = (vc->hdl.vh_mono ? &vga_screenlist_mono : &vga_screenlist);
    553 	aa.accessops = &vga_raster_accessops;
    554 	aa.accesscookie = vc;
    555 
    556 	config_found(sc->sc_dev, &aa, wsemuldisplaydevprint);
    557 }
    558 
    559 int
    560 vga_cndetach(void)
    561 {
    562 	struct vga_config *vc;
    563 	struct vga_handle *vh;
    564 
    565 	vc = &vga_console_vc;
    566 	vh = &vc->hdl;
    567 
    568 	if (vgaconsole) {
    569 		bus_space_unmap(vh->vh_iot, vh->vh_ioh_vga, 0x10);
    570 		bus_space_unmap(vh->vh_iot, vh->vh_ioh_6845, 0x10);
    571 
    572 		return 1;
    573 	}
    574 
    575 	return 0;
    576 }
    577 
    578 int
    579 vga_is_console(bus_space_tag_t iot, int type)
    580 {
    581 	if (vgaconsole &&
    582 	    !vga_console_attached &&
    583 	    iot == vga_console_vc.hdl.vh_iot &&
    584 	    (vga_console_type == -1 || (type == vga_console_type)))
    585 		return (1);
    586 	return (0);
    587 }
    588 
    589 static int
    590 vga_get_video(struct vga_config *vc)
    591 {
    592 
    593 	return (vga_ts_read(&vc->hdl, mode) & VGA_TS_MODE_BLANK) == 0;
    594 }
    595 
    596 static void
    597 vga_set_video(struct vga_config *vc, int state)
    598 {
    599 	int val;
    600 
    601 	vga_ts_write(&vc->hdl, syncreset, 0x01);
    602 	if (state) {					/* unblank screen */
    603 		val = vga_ts_read(&vc->hdl, mode);
    604 		vga_ts_write(&vc->hdl, mode, val & ~VGA_TS_MODE_BLANK);
    605 #ifndef VGA_NO_VBLANK
    606 		val = vga_6845_read(&vc->hdl, mode);
    607 		vga_6845_write(&vc->hdl, mode, val | 0x80);
    608 #endif
    609 	} else {					/* blank screen */
    610 		val = vga_ts_read(&vc->hdl, mode);
    611 		vga_ts_write(&vc->hdl, mode, val | VGA_TS_MODE_BLANK);
    612 #ifndef VGA_NO_VBLANK
    613 		val = vga_6845_read(&vc->hdl, mode);
    614 		vga_6845_write(&vc->hdl, mode, val & ~0x80);
    615 #endif
    616 	}
    617 	vga_ts_write(&vc->hdl, syncreset, 0x03);
    618 }
    619 
    620 int
    621 vga_raster_ioctl(void *v, void *vs, u_long cmd, void *data, int flag,
    622 	struct lwp *l)
    623 {
    624 	struct vga_config *vc = v;
    625 	const struct vga_funcs *vf = vc->vc_funcs;
    626 
    627 	switch (cmd) {
    628 	case WSDISPLAYIO_GTYPE:
    629 		*(int *)data = vc->vc_type;
    630 		return 0;
    631 
    632 	case WSDISPLAYIO_GINFO:
    633 		/* XXX should get detailed hardware information here */
    634 		return EPASSTHROUGH;
    635 
    636 	case WSDISPLAYIO_GVIDEO:
    637 #if 1
    638 		*(int *)data = (vga_get_video(vc) ?
    639 		    WSDISPLAYIO_VIDEO_ON : WSDISPLAYIO_VIDEO_OFF);
    640 		return 0;
    641 #endif
    642 
    643 	case WSDISPLAYIO_SVIDEO:
    644 #if 1
    645 		vga_set_video(vc, *(int *)data == WSDISPLAYIO_VIDEO_ON);
    646 		return 0;
    647 #endif
    648 
    649 	case WSDISPLAYIO_GETCMAP:
    650 	case WSDISPLAYIO_PUTCMAP:
    651 	case WSDISPLAYIO_GCURPOS:
    652 	case WSDISPLAYIO_SCURPOS:
    653 	case WSDISPLAYIO_GCURMAX:
    654 	case WSDISPLAYIO_GCURSOR:
    655 	case WSDISPLAYIO_SCURSOR:
    656 		/* NONE of these operations are by the generic VGA driver. */
    657 		return EPASSTHROUGH;
    658 	}
    659 
    660 	if (vc->vc_funcs == NULL)
    661 		return (EPASSTHROUGH);
    662 
    663 	if (vf->vf_ioctl == NULL)
    664 		return (EPASSTHROUGH);
    665 
    666 	return ((*vf->vf_ioctl)(v, cmd, data, flag, l));
    667 }
    668 
    669 static paddr_t
    670 vga_raster_mmap(void *v, void *vs, off_t offset, int prot)
    671 {
    672 	struct vga_config *vc = v;
    673 	const struct vga_funcs *vf = vc->vc_funcs;
    674 
    675 	if (vc->vc_funcs == NULL)
    676 		return (-1);
    677 
    678 	if (vf->vf_mmap == NULL)
    679 		return (-1);
    680 
    681 	return ((*vf->vf_mmap)(v, offset, prot));
    682 }
    683 
    684 int
    685 vga_raster_alloc_screen(void *v, const struct wsscreen_descr *type,
    686     void **cookiep, int *curxp, int *curyp, long *defattrp)
    687 {
    688 	struct vga_config *vc = v;
    689 	struct vgascreen *scr;
    690 
    691 	if (vc->nscreens == 1) {
    692 		vc->screens.lh_first->mem = boot_scrmem;
    693 	}
    694 
    695 	scr = malloc(sizeof(struct vgascreen), M_DEVBUF, M_WAITOK);
    696 	vga_raster_init_screen(vc, scr, type, vc->nscreens == 0, defattrp);
    697 
    698 	if (vc->nscreens == 1) {
    699 		scr->active = 1;
    700 		vc->active = scr;
    701 		vc->currenttype = type;
    702 	} else {
    703 		scr->mem = malloc(sizeof(struct vga_scrmem) *
    704 		    type->ncols * type->nrows, M_DEVBUF, M_WAITOK);
    705 		vga_raster_eraserows(scr, 0, type->nrows, *defattrp);
    706 	}
    707 
    708 	*cookiep = scr;
    709 	*curxp = scr->cursorcol;
    710 	*curyp = scr->cursorrow;
    711 
    712 	return (0);
    713 }
    714 
    715 void
    716 vga_raster_free_screen(void *v, void *cookie)
    717 {
    718 	struct vgascreen *vs = cookie;
    719 	struct vga_config *vc = vs->cfg;
    720 
    721 	LIST_REMOVE(vs, next);
    722 	vc->nscreens--;
    723 	if (vs != &vga_console_screen)
    724 		free(vs, M_DEVBUF);
    725 	else
    726 		panic("vga_raster_free_screen: console");
    727 
    728 	if (vc->active == vs)
    729 		vc->active = 0;
    730 }
    731 
    732 int
    733 vga_raster_show_screen(void *v, void *cookie, int waitok,
    734     void (*cb)(void *, int, int), void *cbarg)
    735 {
    736 	struct vgascreen *scr = cookie, *oldscr;
    737 	struct vga_config *vc = scr->cfg;
    738 
    739 	oldscr = vc->active; /* can be NULL! */
    740 	if (scr == oldscr) {
    741 		return (0);
    742 	}
    743 
    744 	vc->wantedscreen = cookie;
    745 	vc->switchcb = cb;
    746 	vc->switchcbarg = cbarg;
    747 	if (cb) {
    748 		callout_reset(&vc->vc_switch_callout, 0,
    749 		    (void(*)(void *))vga_switch_screen, vc);
    750 		return (EAGAIN);
    751 	}
    752 
    753 	vga_switch_screen(vc);
    754 	return (0);
    755 }
    756 
    757 void
    758 vga_switch_screen(struct vga_config *vc)
    759 {
    760 	struct vgascreen *scr, *oldscr;
    761 	struct vga_handle *vh = &vc->hdl;
    762 	const struct wsscreen_descr *type;
    763 
    764 	scr = vc->wantedscreen;
    765 	if (!scr) {
    766 		printf("vga_switch_screen: disappeared\n");
    767 		(*vc->switchcb)(vc->switchcbarg, EIO, 0);
    768 		return;
    769 	}
    770 	type = scr->type;
    771 	oldscr = vc->active; /* can be NULL! */
    772 #ifdef DIAGNOSTIC
    773 	if (oldscr) {
    774 		if (!oldscr->active)
    775 			panic("vga_raster_show_screen: not active");
    776 		if (oldscr->type != vc->currenttype)
    777 			panic("vga_raster_show_screen: bad type");
    778 	}
    779 #endif
    780 	if (scr == oldscr) {
    781 		return;
    782 	}
    783 #ifdef DIAGNOSTIC
    784 	if (scr->active)
    785 		panic("vga_raster_show_screen: active");
    786 #endif
    787 
    788 	if (oldscr)
    789 		oldscr->active = 0;
    790 
    791 	if (vc->currenttype != type) {
    792 		vga_raster_setscreentype(vc, type);
    793 		vc->currenttype = type;
    794 	}
    795 
    796 	scr->dispoffset = scr->mindispoffset;
    797 
    798 	if (!oldscr || (scr->dispoffset != oldscr->dispoffset)) {
    799 		vga_6845_write(vh, startadrh, scr->dispoffset >> 8);
    800 		vga_6845_write(vh, startadrl, scr->dispoffset);
    801 	}
    802 
    803 	/* Clear the entire screen. */
    804 	vga_gdc_write(vh, mode, 0x02);
    805 	bus_space_set_region_4(vh->vh_memt, vh->vh_allmemh, 0, 0, 0x2000);
    806 
    807 	scr->active = 1;
    808 	vga_restore_screen(scr, type, scr->mem);
    809 
    810 	vc->active = scr;
    811 
    812 	vga_raster_cursor(scr, scr->cursoron, scr->cursorrow, scr->cursorcol);
    813 
    814 	vc->wantedscreen = 0;
    815 	if (vc->switchcb)
    816 		(*vc->switchcb)(vc->switchcbarg, 0, 0);
    817 }
    818 
    819 static int
    820 vga_raster_load_font(void *v, void *id,
    821     struct wsdisplay_font *data)
    822 {
    823 	/* XXX */
    824 	printf("vga_raster_load_font: called\n");
    825 
    826 	return (0);
    827 }
    828 
    829 void
    830 vga_raster_setup_font(struct vga_config *vc, struct vgascreen *scr)
    831 {
    832 	struct vga_raster_font *vf;
    833 	struct wsdisplay_font *wf;
    834 	int cookie;
    835 
    836 	LIST_FOREACH(vf, &vc->vc_fontlist, next) {
    837 		if (wsfont_matches(vf->font, 0, 0, scr->type->fontheight, 0)) {
    838 			scr->encoding = vf->font->encoding;
    839 			LIST_INSERT_HEAD(&scr->fontset, vf, next);
    840 			return;
    841 		}
    842 	}
    843 
    844 	cookie = wsfont_find(NULL, 0, scr->type->fontheight, 0,
    845 	    WSDISPLAY_FONTORDER_L2R, 0);
    846 	if (cookie == -1)
    847 		return;
    848 
    849 	if (wsfont_lock(cookie, &wf))
    850 		return;
    851 
    852 	vf = malloc(sizeof(struct vga_raster_font), M_DEVBUF, M_NOWAIT);
    853 	if (!vf) {
    854 		wsfont_unlock(cookie);
    855 		return;
    856 	}
    857 
    858 	vf->font = wf;
    859 	scr->encoding = vf->font->encoding;
    860 	LIST_INSERT_HEAD(&scr->fontset, vf, next);
    861 }
    862 
    863 void
    864 vga_setup_regs(struct videomode *mode, struct vga_moderegs *regs)
    865 {
    866 	int i;
    867 	int depth = 4;			/* XXXBJY hardcoded for now */
    868 	const u_int8_t palette[] = {
    869 		0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x14, 0x07,
    870 		0x38, 0x39, 0x3a, 0x3b, 0x3c, 0x3d, 0x3e, 0x3f
    871 	};
    872 
    873 	/*
    874 	 * Compute hsync and vsync polarity.
    875 	 */
    876 	if ((mode->flags & (VID_PHSYNC | VID_NHSYNC))
    877 	    && (mode->flags & (VID_PVSYNC | VID_NVSYNC))) {
    878 	    	regs->miscout = 0x23;
    879 		if (mode->flags & VID_NHSYNC)
    880 			regs->miscout |= 0x40;
    881 		if (mode->flags & VID_NVSYNC)
    882 			regs->miscout |= 0x80;
    883 	} else {
    884 		if (mode->flags & VID_DBLSCAN)
    885 			mode->vdisplay *= 2;
    886 		if (mode->vdisplay < 400)
    887 			regs->miscout = 0xa3;
    888 		else if (mode->vdisplay < 480)
    889 			regs->miscout = 0x63;
    890 		else if (mode->vdisplay < 768)
    891 			regs->miscout = 0xe3;
    892 		else
    893 			regs->miscout = 0x23;
    894 	}
    895 
    896 	/*
    897 	 * Time sequencer
    898 	 */
    899 	if (depth == 4)
    900 		regs->ts[0] = 0x02;
    901 	else
    902 		regs->ts[0] = 0x00;
    903 	if (mode->flags & VID_CLKDIV2)
    904 		regs->ts[1] = 0x09;
    905 	else
    906 		regs->ts[1] = 0x01;
    907 	regs->ts[2] = 0x0f;
    908 	regs->ts[3] = 0x00;
    909 	if (depth < 8)
    910 		regs->ts[4] = 0x06;
    911 	else
    912 		regs->ts[4] = 0x0e;
    913 
    914 	/*
    915 	 * CRTC controller
    916 	 */
    917 	regs->crtc[0] = (mode->htotal >> 3) - 5;
    918 	regs->crtc[1] = (mode->hdisplay >> 3) - 1;
    919 	regs->crtc[2] = (mode->hsync_start >> 3) - 1;
    920 	regs->crtc[3] = (((mode->hsync_end >> 3) - 1) & 0x1f) | 0x80;
    921 	regs->crtc[4] = mode->hsync_start >> 3;
    922 	regs->crtc[5] = ((((mode->hsync_end >> 3) - 1) & 0x20) << 2)
    923 	    | (((mode->hsync_end >> 3)) & 0x1f);
    924 	regs->crtc[6] = (mode->vtotal - 2) & 0xff;
    925 	regs->crtc[7] = (((mode->vtotal - 2) & 0x100) >> 8)
    926 	    | (((mode->vdisplay - 1) & 0x100) >> 7)
    927 	    | ((mode->vsync_start & 0x100) >> 6)
    928 	    | (((mode->vsync_start - 1) & 0x100) >> 5)
    929 	    | 0x10
    930 	    | (((mode->vtotal - 2) & 0x200) >> 4)
    931 	    | (((mode->vdisplay - 1) & 0x200) >> 3)
    932 	    | ((mode->vsync_start & 0x200) >> 2);
    933 	regs->crtc[8] = 0x00;
    934 	regs->crtc[9] = (((mode->vsync_start - 1) & 0x200) >> 4) | 0x40;
    935 	if (mode->flags & VID_DBLSCAN)
    936 		regs->crtc[9] |= 0x80;
    937 	regs->crtc[10] = 0x00;
    938 	regs->crtc[11] = 0x00;
    939 	regs->crtc[12] = 0x00;
    940 	regs->crtc[13] = 0x00;
    941 	regs->crtc[14] = 0x00;
    942 	regs->crtc[15] = 0x00;
    943 	regs->crtc[16] = mode->vsync_start & 0xff;
    944 	regs->crtc[17] = (mode->vsync_end & 0x0f) | 0x20;
    945 	regs->crtc[18] = (mode->vdisplay - 1) & 0xff;
    946 	regs->crtc[19] = mode->hdisplay >> 4;	/* XXXBJY */
    947 	regs->crtc[20] = 0x00;
    948 	regs->crtc[21] = (mode->vsync_start - 1) & 0xff;
    949 	regs->crtc[22] = (mode->vsync_end - 1) & 0xff;
    950 	if (depth < 8)
    951 		regs->crtc[23] = 0xe3;
    952 	else
    953 		regs->crtc[23] = 0xc3;
    954 	regs->crtc[24] = 0xff;
    955 
    956 	/*
    957 	 * Graphics display controller
    958 	 */
    959 	regs->gdc[0] = 0x00;
    960 	regs->gdc[1] = 0x00;
    961 	regs->gdc[2] = 0x00;
    962 	regs->gdc[3] = 0x00;
    963 	regs->gdc[4] = 0x00;
    964 	if (depth == 4)
    965 		regs->gdc[5] = 0x02;
    966 	else
    967 		regs->gdc[5] = 0x40;
    968 	regs->gdc[6] = 0x01;
    969 	regs->gdc[7] = 0x0f;
    970 	regs->gdc[8] = 0xff;
    971 
    972 	/*
    973 	 * Attribute controller
    974 	 */
    975 	/* Set palette registers. */
    976 	for (i = 0; i < 16; i++)
    977 		regs->atc[i] = palette[i];
    978 	if (depth == 4)
    979 		regs->atc[16] = 0x01;	/* XXXBJY was 0x81 in XFree86 */
    980 	else
    981 		regs->atc[16] = 0x41;
    982 	regs->atc[17] = 0x00;		/* XXXBJY just a guess */
    983 	regs->atc[18] = 0x0f;
    984 	regs->atc[19] = 0x00;
    985 	regs->atc[20] = 0x00;
    986 }
    987 
    988 void
    989 vga_set_mode(struct vga_handle *vh, struct vga_moderegs *regs)
    990 {
    991 	int i;
    992 
    993 	/* Disable display. */
    994 	vga_ts_write(vh, mode, vga_ts_read(vh, mode) | VGA_TS_MODE_BLANK);
    995 
    996 	/* Write misc output register. */
    997 	bus_space_write_1(vh->vh_iot, vh->vh_ioh_vga, VGA_MISC_DATAW,
    998 	    regs->miscout);
    999 
   1000 	/* Set synchronous reset. */
   1001 	vga_ts_write(vh, syncreset, 0x01);
   1002 	vga_ts_write(vh, mode, regs->ts[1] | VGA_TS_MODE_BLANK);
   1003 	for (i = 2; i < VGA_TS_NREGS; i++)
   1004 		_vga_ts_write(vh, i, regs->ts[i]);
   1005 	/* Clear synchronous reset. */
   1006 	vga_ts_write(vh, syncreset, 0x03);
   1007 
   1008 	/* Unprotect CRTC registers 0-7. */
   1009 	vga_6845_write(vh, vsynce, vga_6845_read(vh, vsynce) & ~0x80);
   1010 	/* Write CRTC registers. */
   1011 	for (i = 0; i < MC6845_NREGS; i++)
   1012 		_vga_6845_write(vh, i, regs->crtc[i]);
   1013 
   1014 	/* Write graphics display registers. */
   1015 	for (i = 0; i < VGA_GDC_NREGS; i++)
   1016 		_vga_gdc_write(vh, i, regs->gdc[i]);
   1017 
   1018 	/* Write attribute controller registers. */
   1019 	for (i = 0; i < VGA_ATC_NREGS; i++)
   1020 		_vga_attr_write(vh, i, regs->atc[i]);
   1021 
   1022 	/* Enable display. */
   1023 	vga_ts_write(vh, mode, vga_ts_read(vh, mode) & ~VGA_TS_MODE_BLANK);
   1024 }
   1025 
   1026 void
   1027 vga_raster_cursor_init(struct vgascreen *scr, int existing)
   1028 {
   1029 	struct vga_handle *vh = scr->hdl;
   1030 	bus_space_tag_t memt;
   1031 	bus_space_handle_t memh;
   1032 	int off;
   1033 
   1034 	if (existing) {
   1035 		/*
   1036 		 * This is the first screen. At this point, scr->active is
   1037 		 * false, so we can't use vga_raster_cursor() to do this.
   1038 		 */
   1039 		memt = vh->vh_memt;
   1040 		memh = vh->vh_memh;
   1041 		off = (scr->cursorrow * scr->type->ncols + scr->cursorcol) +
   1042 		    scr->dispoffset / 8;
   1043 
   1044 		scr->cursortmp = scr->mem[off];
   1045 		vga_raster_putchar(scr, scr->cursorrow, scr->cursorcol,
   1046 		    scr->cursortmp.ch, scr->cursortmp.attr ^ 0x77);
   1047 	} else {
   1048 		scr->cursortmp.ch = 0;
   1049 		scr->cursortmp.attr = 0;
   1050 		scr->cursortmp.second = 0;
   1051 		scr->cursortmp.enc = scr->encoding;
   1052 	}
   1053 
   1054 	scr->cursoron = 1;
   1055 }
   1056 
   1057 void
   1058 vga_raster_cursor(void *id, int on, int row, int col)
   1059 {
   1060 	struct vgascreen *scr = id;
   1061 	int off, tmp;
   1062 
   1063 	/* Remove old cursor image */
   1064 	if (scr->cursoron) {
   1065 		off = scr->cursorrow * scr->type->ncols + scr->cursorcol;
   1066 		if (scr->active) {
   1067 			tmp = scr->encoding;
   1068 			scr->encoding = scr->cursortmp.enc;
   1069 			if (scr->cursortmp.second)
   1070 				vga_raster_putchar(id, scr->cursorrow,
   1071 				    scr->cursorcol - 1, scr->cursortmp.ch,
   1072 				    scr->cursortmp.attr);
   1073 			else
   1074 				vga_raster_putchar(id, scr->cursorrow,
   1075 				    scr->cursorcol, scr->cursortmp.ch,
   1076 				    scr->cursortmp.attr);
   1077 			scr->encoding = tmp;
   1078 		}
   1079 	}
   1080 
   1081 	scr->cursorrow = row;
   1082 	scr->cursorcol = col;
   1083 
   1084 	if ((scr->cursoron = on) == 0)
   1085 		return;
   1086 
   1087 	off = scr->cursorrow * scr->type->ncols + scr->cursorcol;
   1088 	scr->cursortmp = scr->mem[off];
   1089 	if (scr->active) {
   1090 		tmp = scr->encoding;
   1091 		scr->encoding = scr->cursortmp.enc;
   1092 		if (scr->cursortmp.second)
   1093 			vga_raster_putchar(id, scr->cursorrow,
   1094 			    scr->cursorcol - 1, scr->cursortmp.ch,
   1095 			    scr->cursortmp.attr ^ 0x77);
   1096 		else
   1097 			vga_raster_putchar(id, scr->cursorrow,
   1098 			    scr->cursorcol, scr->cursortmp.ch,
   1099 			    scr->cursortmp.attr ^ 0x77);
   1100 		scr->encoding = tmp;
   1101 	}
   1102 }
   1103 
   1104 static int
   1105 vga_raster_mapchar(void *id, int uni, u_int *index)
   1106 {
   1107 	struct vgascreen *scr = id;
   1108 
   1109 	if (scr->encoding == WSDISPLAY_FONTENC_IBM)
   1110 		return pcdisplay_mapchar(id, uni, index);
   1111 	else {
   1112 		*index = uni;
   1113 		return 5;
   1114 	}
   1115 }
   1116 
   1117 void
   1118 vga_raster_putchar(void *id, int row, int col, u_int c, long attr)
   1119 {
   1120 	struct vgascreen *scr = id;
   1121 	size_t off;
   1122 	struct vga_raster_font *fs;
   1123 	u_int tmp_ch;
   1124 
   1125 	off = row * scr->type->ncols + col;
   1126 
   1127 	if (__predict_false(off >= (scr->type->ncols * scr->type->nrows)))
   1128 		return;
   1129 
   1130 	LIST_FOREACH(fs, &scr->fontset, next) {
   1131 		if ((scr->encoding == fs->font->encoding) &&
   1132 		    (c >= fs->font->firstchar) &&
   1133 		    (c < fs->font->firstchar + fs->font->numchars) &&
   1134 		    (scr->type->fontheight == fs->font->fontheight)) {
   1135 			if (scr->active) {
   1136 				tmp_ch = c - fs->font->firstchar;
   1137 				_vga_raster_putchar(scr, row, col, tmp_ch,
   1138 				    attr, fs);
   1139 			}
   1140 
   1141 			scr->mem[off].ch = c;
   1142 			scr->mem[off].attr = attr;
   1143 			scr->mem[off].second = 0;
   1144 			scr->mem[off].enc = fs->font->encoding;
   1145 
   1146 			if (fs->font->stride == 2) {
   1147 				scr->mem[off + 1].ch = c;
   1148 				scr->mem[off + 1].attr = attr;
   1149 				scr->mem[off + 1].second = 1;
   1150 				scr->mem[off + 1].enc = fs->font->encoding;
   1151 			}
   1152 
   1153 			return;
   1154 		}
   1155 	}
   1156 
   1157 	/*
   1158 	 * No match found.
   1159 	 */
   1160 	if (scr->active)
   1161 		/*
   1162 		 * Put a single width space character no matter what the
   1163 		 * actual width of the character is.
   1164 		 */
   1165 		_vga_raster_putchar(scr, row, col, ' ', attr,
   1166 		    &vga_console_fontset_ascii);
   1167 	scr->mem[off].ch = c;
   1168 	scr->mem[off].attr = attr;
   1169 	scr->mem[off].second = 0;
   1170 	scr->mem[off].enc = scr->encoding;
   1171 }
   1172 
   1173 static void
   1174 _vga_raster_putchar(void *id, int row, int col, u_int c, long attr,
   1175     struct vga_raster_font *fs)
   1176 {
   1177 	struct vgascreen *scr = id;
   1178 	struct vga_handle *vh = scr->hdl;
   1179 	bus_space_tag_t memt = vh->vh_memt;
   1180 	bus_space_handle_t memh = vh->vh_memh;
   1181 	int i;
   1182 	int rasoff, rasoff2;
   1183 	int fheight = scr->type->fontheight;
   1184 	volatile u_int8_t dummy, pattern;
   1185 	u_int8_t fgcolor, bgcolor;
   1186 
   1187 	rasoff = scr->dispoffset + row * scr->type->ncols * fheight + col;
   1188 	rasoff2 = rasoff;
   1189 
   1190 #if 0
   1191 	bgcolor = bgansitopc[attr >> 4];
   1192 	fgcolor = fgansitopc[attr & 0x0f];
   1193 #else
   1194 	bgcolor = ((attr >> 4) & 0x0f);
   1195 	fgcolor = attr & 0x0f;
   1196 #endif
   1197 
   1198 	if (fs->font->stride == 1) {
   1199 		/* Paint background. */
   1200 		vga_gdc_write(vh, mode, 0x02);
   1201 		for (i = 0; i < fheight; i++) {
   1202 			bus_space_write_1(memt, memh, rasoff, bgcolor);
   1203 			rasoff += scr->type->ncols;
   1204 		}
   1205 
   1206 		/* Draw a single width character. */
   1207 		vga_gdc_write(vh, mode, 0x03);
   1208 		vga_gdc_write(vh, setres, fgcolor);
   1209 		for (i = 0; i < fheight; i++) {
   1210 			pattern = ((u_int8_t *)fs->font->data)[c * fheight + i];
   1211 			/* When pattern is 0, skip output for speed-up. */
   1212 			if (pattern != 0) {
   1213 				dummy = bus_space_read_1(memt, memh, rasoff2);
   1214 				bus_space_write_1(memt, memh, rasoff2, pattern);
   1215 			}
   1216 			rasoff2 += scr->type->ncols;
   1217 		}
   1218 	} else if (fs->font->stride == 2) {
   1219 		/* Paint background. */
   1220 		vga_gdc_write(vh, mode, 0x02);
   1221 		for (i = 0; i < fheight; i++) {
   1222 			bus_space_write_1(memt, memh, rasoff, bgcolor);
   1223 			bus_space_write_1(memt, memh, rasoff + 1, bgcolor);
   1224 			rasoff += scr->type->ncols;
   1225 		}
   1226 
   1227 		/* Draw a double width character. */
   1228 		vga_gdc_write(vh, mode, 0x03);
   1229 		vga_gdc_write(vh, setres, fgcolor);
   1230 		for (i = 0; i < fheight; i++) {
   1231 			pattern = ((u_int8_t *)fs->font->data)
   1232 			    [(c * fheight + i) * 2];
   1233 			if (pattern != 0) {
   1234 				dummy = bus_space_read_1(memt, memh, rasoff2);
   1235 				bus_space_write_1(memt, memh, rasoff2, pattern);
   1236 			}
   1237 			pattern = ((u_int8_t *)fs->font->data)
   1238 			    [(c * fheight + i) * 2 + 1];
   1239 			if (pattern != 0) {
   1240 				rasoff2++;
   1241 				dummy = bus_space_read_1(memt, memh, rasoff2);
   1242 				bus_space_write_1(memt, memh, rasoff2, pattern);
   1243 				rasoff2--;
   1244 			}
   1245 			rasoff2 += scr->type->ncols;
   1246 		}
   1247 	}
   1248 }
   1249 
   1250 void
   1251 vga_raster_copycols(void *id, int row, int srccol, int dstcol, int ncols)
   1252 {
   1253 	struct vgascreen *scr = id;
   1254 	struct vga_handle *vh = scr->hdl;
   1255 	bus_space_tag_t memt = vh->vh_memt;
   1256 	bus_space_handle_t memh = vh->vh_memh;
   1257 	bus_size_t srcoff, dstoff;
   1258 	bus_size_t rassrcoff, rasdstoff;
   1259 	int i;
   1260 	int fheight = scr->type->fontheight;
   1261 
   1262 	srcoff = row * scr->type->ncols + srccol;
   1263 	dstoff = row * scr->type->ncols + dstcol;
   1264 	rassrcoff = scr->dispoffset + row * scr->type->ncols * fheight + srccol;
   1265 	rasdstoff = scr->dispoffset + row * scr->type->ncols * fheight + dstcol;
   1266 
   1267 	memcpy(&scr->mem[dstoff], &scr->mem[srcoff],
   1268 	    ncols * sizeof(struct vga_scrmem));
   1269 
   1270 	vga_gdc_write(vh, mode, 0x01);
   1271 	if (scr->active) {
   1272 		for (i = 0; i < fheight; i++) {
   1273 			bus_space_copy_region_1(memt, memh,
   1274 			    rassrcoff + i * scr->type->ncols, memh,
   1275 			    rasdstoff + i * scr->type->ncols, ncols);
   1276 		}
   1277 	}
   1278 }
   1279 
   1280 void
   1281 vga_raster_erasecols(void *id, int row, int startcol, int ncols, long fillattr)
   1282 {
   1283 	struct vgascreen *scr = id;
   1284 	int i;
   1285 
   1286 	if (scr->active == 0)
   1287 		return;
   1288 
   1289 	for (i = startcol; i < startcol + ncols; i++)
   1290 		vga_raster_putchar(id, row, i, ' ', fillattr);
   1291 }
   1292 
   1293 void
   1294 vga_raster_copyrows(void *id, int srcrow, int dstrow, int nrows)
   1295 {
   1296 	struct vgascreen *scr = id;
   1297 	struct vga_handle *vh = scr->hdl;
   1298 	bus_space_tag_t memt = vh->vh_memt;
   1299 	bus_space_handle_t memh = vh->vh_memh;
   1300 	int ncols;
   1301 	bus_size_t srcoff, dstoff;
   1302 	bus_size_t rassrcoff, rasdstoff;
   1303 	int fheight;
   1304 
   1305 	ncols = scr->type->ncols;
   1306 	fheight = scr->type->fontheight;
   1307 
   1308 	srcoff = srcrow * ncols;
   1309 	dstoff = dstrow * ncols;
   1310 	rassrcoff = srcoff * fheight;
   1311 	rasdstoff = dstoff * fheight;
   1312 
   1313 	if (scr->active) {
   1314 		vga_gdc_write(vh, mode, 0x01);
   1315 		if (dstrow == 0 && (srcrow + nrows == scr->type->nrows)) {
   1316 			int cursoron = scr->cursoron;
   1317 
   1318 			if (cursoron)
   1319 				/* Disable cursor. */
   1320 				vga_raster_cursor(scr, 0,
   1321 				    scr->cursorrow, scr->cursorcol);
   1322 
   1323 			/* scroll up whole screen */
   1324 			if ((scr->dispoffset + srcrow * ncols * fheight)
   1325 			    <= scr->maxdispoffset)
   1326 				scr->dispoffset += srcrow * ncols * fheight;
   1327 			else {
   1328 				bus_space_copy_region_1(memt, memh,
   1329 				    scr->dispoffset + rassrcoff,
   1330 				    memh, scr->mindispoffset,
   1331 				    nrows * ncols * fheight);
   1332 				scr->dispoffset = scr->mindispoffset;
   1333 			}
   1334 			vga_6845_write(vh, startadrh, scr->dispoffset >> 8);
   1335 			vga_6845_write(vh, startadrl, scr->dispoffset);
   1336 
   1337 			if (cursoron)
   1338 				/* Enable cursor. */
   1339 				vga_raster_cursor(scr, 1, scr->cursorrow,
   1340 				    scr->cursorcol);
   1341 		} else
   1342 			bus_space_copy_region_1(memt, memh,
   1343 			    scr->dispoffset + rassrcoff, memh,
   1344 			    scr->dispoffset + rasdstoff,
   1345 			    nrows * ncols * fheight);
   1346 	}
   1347 	memcpy(&scr->mem[dstoff], &scr->mem[srcoff],
   1348 	    nrows * ncols * sizeof(struct vga_scrmem));
   1349 }
   1350 
   1351 void
   1352 vga_raster_eraserows(void *id, int startrow, int nrows, long fillattr)
   1353 {
   1354 	struct vgascreen *scr = id;
   1355 	struct vga_handle *vh = scr->hdl;
   1356 	bus_space_tag_t memt = vh->vh_memt;
   1357 	bus_space_handle_t memh = vh->vh_memh;
   1358 	bus_size_t off, count;
   1359 	bus_size_t rasoff, rascount;
   1360 	int i;
   1361 
   1362 	off = startrow * scr->type->ncols;
   1363 	count = nrows * scr->type->ncols;
   1364 	rasoff = off * scr->type->fontheight;
   1365 	rascount = count * scr->type->fontheight;
   1366 
   1367 	if (scr->active) {
   1368 		u_int8_t bgcolor = (fillattr >> 4) & 0x0F;
   1369 
   1370 		/* Paint background. */
   1371 		vga_gdc_write(vh, mode, 0x02);
   1372 		if (scr->type->ncols % 4 == 0) {
   1373 			u_int32_t fill = bgcolor | (bgcolor << 8) |
   1374 			    (bgcolor << 16) | (bgcolor << 24);
   1375 			/* We can speed up I/O */
   1376 			for (i = rasoff; i < rasoff + rascount; i += 4)
   1377 				bus_space_write_4(memt, memh,
   1378 				    scr->dispoffset + i, fill);
   1379 		} else {
   1380 			u_int16_t fill = bgcolor | (bgcolor << 8);
   1381 			for (i = rasoff; i < rasoff + rascount; i += 2)
   1382 				bus_space_write_2(memt, memh,
   1383 				    scr->dispoffset + i, fill);
   1384 		}
   1385 	}
   1386 	for (i = 0; i < count; i++) {
   1387 		scr->mem[off + i].ch = ' ';
   1388 		scr->mem[off + i].attr = fillattr;
   1389 		scr->mem[off + i].second = 0;
   1390 		scr->mem[off + i].enc = scr->encoding;
   1391 	}
   1392 }
   1393 
   1394 static int
   1395 vga_raster_allocattr(void *id, int fg, int bg, int flags, long *attrp)
   1396 {
   1397 	struct vgascreen *scr = id;
   1398 	struct vga_config *vc = scr->cfg;
   1399 
   1400 	if (__predict_false((unsigned int)fg >= sizeof(fgansitopc) ||
   1401 	    (unsigned int)bg >= sizeof(bgansitopc)))
   1402 	    	return (EINVAL);
   1403 
   1404 	if (vc->hdl.vh_mono) {
   1405 		if (flags & WSATTR_WSCOLORS)
   1406 			return (EINVAL);
   1407 		if (flags & WSATTR_REVERSE)
   1408 			*attrp = 0x70;
   1409 		else
   1410 			*attrp = 0x07;
   1411 		if (flags & WSATTR_UNDERLINE)
   1412 			*attrp |= FG_UNDERLINE;
   1413 		if (flags & WSATTR_HILIT)
   1414 			*attrp |= FG_INTENSE;
   1415 	} else {
   1416 		if (flags & (WSATTR_UNDERLINE | WSATTR_REVERSE))
   1417 			return (EINVAL);
   1418 		if (flags & WSATTR_WSCOLORS)
   1419 			*attrp = fgansitopc[fg] | bgansitopc[bg];
   1420 		else
   1421 			*attrp = 7;
   1422 		if (flags & WSATTR_HILIT)
   1423 			*attrp += 8;
   1424 	}
   1425 	if (flags & WSATTR_BLINK)
   1426 		*attrp |= FG_BLINK;
   1427 	return (0);
   1428 }
   1429 
   1430 void
   1431 vga_restore_screen(struct vgascreen *scr,
   1432     const struct wsscreen_descr *type, struct vga_scrmem *mem)
   1433 {
   1434 	int i, j, off, tmp;
   1435 
   1436 	tmp = scr->encoding;
   1437 	for (i = 0; i < type->nrows; i++) {
   1438 		for (j = 0; j < type->ncols; j++) {
   1439 			off = i * type->ncols + j;
   1440 			if (mem[off].second != 1) {
   1441 				scr->encoding = mem[off].enc;
   1442 				vga_raster_putchar(scr, i, j, mem[off].ch,
   1443 				    mem[off].attr);
   1444 			}
   1445 		}
   1446 	}
   1447 	scr->encoding = tmp;
   1448 }
   1449 
   1450 void
   1451 vga_raster_setscreentype(struct vga_config *vc,
   1452     const struct wsscreen_descr *type)
   1453 {
   1454 	struct vga_handle *vh = &vc->hdl;
   1455 	struct vga_moderegs moderegs;
   1456 
   1457 	vga_setup_regs((struct videomode *)type->modecookie, &moderegs);
   1458 	vga_set_mode(vh, &moderegs);
   1459 }
   1460 
   1461 #ifdef WSDISPLAY_CUSTOM_OUTPUT
   1462 void
   1463 vga_raster_replaceattr(void *id, long oldattr, long newattr)
   1464 {
   1465 	struct vgascreen *scr = id;
   1466 	const struct wsscreen_descr *type = scr->type;
   1467 	int off;
   1468 
   1469 	for (off = 0; off < type->nrows * type->ncols; off++) {
   1470 		if (scr->mem[off].attr == oldattr)
   1471 			scr->mem[off].attr = newattr;
   1472 	}
   1473 
   1474 	/* Repaint the whole screen, if needed */
   1475 	if (scr->active)
   1476 		vga_restore_screen(scr, type, scr->mem);
   1477 }
   1478 #endif /* WSDISPLAY_CUSTOM_OUTPUT */
   1479 
   1480 void
   1481 vga_resume(struct vga_softc *sc)
   1482 {
   1483 #ifdef VGA_RESET_ON_RESUME
   1484 	vga_initregs(&sc->sc_vc->hdl);
   1485 #endif
   1486 }
   1487