Home | History | Annotate | Line # | Download | only in ic
vga_subr.c revision 1.14
      1 /* $NetBSD: vga_subr.c,v 1.14 2003/01/31 21:57:26 tsutsui Exp $ */
      2 
      3 /*
      4  * Copyright (c) 1998
      5  *	Matthias Drochner.  All rights reserved.
      6  *
      7  * Redistribution and use in source and binary forms, with or without
      8  * modification, are permitted provided that the following conditions
      9  * are met:
     10  * 1. Redistributions of source code must retain the above copyright
     11  *    notice, this list of conditions and the following disclaimer.
     12  * 2. Redistributions in binary form must reproduce the above copyright
     13  *    notice, this list of conditions and the following disclaimer in the
     14  *    documentation and/or other materials provided with the distribution.
     15  * 3. All advertising materials mentioning features or use of this software
     16  *    must display the following acknowledgement:
     17  *	This product includes software developed for the NetBSD Project
     18  *	by Matthias Drochner.
     19  * 4. The name of the author may not be used to endorse or promote products
     20  *    derived from this software without specific prior written permission.
     21  *
     22  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     23  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     24  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     25  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     26  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     27  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     28  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     29  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     30  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
     31  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     32  *
     33  */
     34 
     35 #include <sys/cdefs.h>
     36 __KERNEL_RCSID(0, "$NetBSD: vga_subr.c,v 1.14 2003/01/31 21:57:26 tsutsui Exp $");
     37 
     38 #include <sys/param.h>
     39 #include <sys/systm.h>
     40 #include <sys/device.h>
     41 #include <sys/queue.h>
     42 #include <machine/bus.h>
     43 
     44 #include <dev/ic/mc6845reg.h>
     45 #include <dev/ic/pcdisplay.h>
     46 #include <dev/ic/pcdisplayvar.h>
     47 #include <dev/ic/vgareg.h>
     48 #include <dev/ic/vgavar.h>
     49 
     50 #include <dev/wscons/wsdisplayvar.h>
     51 
     52 static void fontram(struct vga_handle *);
     53 static void textram(struct vga_handle *);
     54 #ifdef VGA_RESET
     55 static void vga_initregs(struct vga_handle *);
     56 #endif
     57 
     58 static void
     59 fontram(struct vga_handle *vh)
     60 {
     61 
     62 	/* program sequencer to access character generator */
     63 
     64 	vga_ts_write(vh, syncreset, 0x01);	/* synchronous reset */
     65 	vga_ts_write(vh, wrplmask, 0x04);	/* write to map 2 */
     66 	vga_ts_write(vh, memmode, 0x07);	/* sequential addressing */
     67 	vga_ts_write(vh, syncreset, 0x03);	/* clear synchronous reset */
     68 
     69 	/* program graphics controller to access character generator */
     70 
     71 	vga_gdc_write(vh, rdplanesel, 0x02);	/* select map 2 for cpu reads */
     72 	vga_gdc_write(vh, mode, 0x00);	/* disable odd-even addressing */
     73 	vga_gdc_write(vh, misc, 0x04);	/* map starts at 0xA000 */
     74 }
     75 
     76 static void
     77 textram(struct vga_handle *vh)
     78 {
     79 
     80 	/* program sequencer to access video ram */
     81 
     82 	vga_ts_write(vh, syncreset, 0x01);	/* synchronous reset */
     83 	vga_ts_write(vh, wrplmask, 0x03);	/* write to map 0 & 1 */
     84 	vga_ts_write(vh, memmode, 0x03);	/* odd-even addressing */
     85 	vga_ts_write(vh, syncreset, 0x03);	/* clear synchronous reset */
     86 
     87 	/* program graphics controller for text mode */
     88 
     89 	vga_gdc_write(vh, rdplanesel, 0x00);	/* select map 0 for cpu reads */
     90 	vga_gdc_write(vh, mode, 0x10);		/* enable odd-even addressing */
     91 	/* map starts at 0xb800 or 0xb000 (mono) */
     92 	vga_gdc_write(vh, misc, (vh->vh_mono ? 0x0a : 0x0e));
     93 }
     94 
     95 #ifndef VGA_RASTERCONSOLE
     96 void
     97 vga_loadchars(struct vga_handle *vh, int fontset, int first, int num, int lpc,
     98 	      char *data)
     99 {
    100 	int offset, i, j, s;
    101 
    102 	/* fontset number swizzle done in vga_setfontset() */
    103 	offset = (fontset << 13) | (first << 5);
    104 
    105 	s = splhigh();
    106 	fontram(vh);
    107 
    108 	for (i = 0; i < num; i++)
    109 		for (j = 0; j < lpc; j++)
    110 			bus_space_write_1(vh->vh_memt, vh->vh_allmemh,
    111 			    offset + (i << 5) + j, data[i * lpc + j]);
    112 
    113 	textram(vh);
    114 	splx(s);
    115 }
    116 
    117 void
    118 vga_readoutchars(struct vga_handle *vh, int fontset, int first, int num,
    119 		 int lpc, char *data)
    120 {
    121 	int offset, i, j, s;
    122 
    123 	/* fontset number swizzle done in vga_setfontset() */
    124 	offset = (fontset << 13) | (first << 5);
    125 
    126 	s = splhigh();
    127 	fontram(vh);
    128 
    129 	for (i = 0; i < num; i++)
    130 		for (j = 0; j < lpc; j++)
    131 			data[i * lpc + j] = bus_space_read_1(vh->vh_memt,
    132 			    vh->vh_allmemh, offset + (i << 5) + j);
    133 
    134 	textram(vh);
    135 	splx(s);
    136 }
    137 
    138 #ifdef VGA_CONSOLE_ATI_BROKEN_FONTSEL
    139 void
    140 vga_copyfont01(struct vga_handle *vh)
    141 {
    142 	int s;
    143 
    144 	s = splhigh();
    145 	fontram(vh);
    146 
    147 	bus_space_copy_region_1(vh->vh_memt, vh->vh_allmemh, 0,
    148 	    vh->vh_allmemh, 1 << 13, 1 << 13);
    149 
    150 	textram(vh);
    151 	splx(s);
    152 }
    153 #endif
    154 
    155 void
    156 vga_setfontset(struct vga_handle *vh, int fontset1, int fontset2)
    157 {
    158 	u_int8_t cmap;
    159 	static const u_int8_t cmaptaba[] = {
    160 		0x00, 0x10, 0x01, 0x11,
    161 		0x02, 0x12, 0x03, 0x13
    162 	};
    163 	static const u_int8_t cmaptabb[] = {
    164 		0x00, 0x20, 0x04, 0x24,
    165 		0x08, 0x28, 0x0c, 0x2c
    166 	};
    167 
    168 	/* extended font if fontset1 != fontset2 */
    169 	cmap = cmaptaba[fontset1] | cmaptabb[fontset2];
    170 
    171 	vga_ts_write(vh, fontsel, cmap);
    172 }
    173 
    174 void
    175 vga_setscreentype(struct vga_handle *vh, const struct wsscreen_descr *type)
    176 {
    177 
    178 	vga_6845_write(vh, maxrow, type->fontheight - 1);
    179 
    180 	/* lo byte */
    181 	vga_6845_write(vh, vde, type->fontheight * type->nrows - 1);
    182 
    183 #ifndef PCDISPLAY_SOFTCURSOR
    184 	/* set cursor to last 2 lines */
    185 	vga_6845_write(vh, curstart, type->fontheight - 2);
    186 	vga_6845_write(vh, curend, type->fontheight - 1);
    187 #endif
    188 	/*
    189 	 * disable colour plane 3 if needed for font selection
    190 	 */
    191 	if (type->capabilities & WSSCREEN_HILIT) {
    192 		/*
    193 		 * these are the screens which don't support
    194 		 * 512-character fonts
    195 		 */
    196 		vga_attr_write(vh, colplen, 0x0f);
    197 	} else
    198 		vga_attr_write(vh, colplen, 0x07);
    199 }
    200 
    201 #else /* !VGA_RASTERCONSOLE */
    202 void
    203 vga_load_builtinfont(struct vga_handle *vh, u_int8_t *font, int firstchar,
    204 	int numchars)
    205 {
    206 	int i, s;
    207 
    208 	s = splhigh();
    209 	fontram(vh);
    210 
    211 	for (i = firstchar; i < firstchar + numchars; i++)
    212 		bus_space_read_region_1(vh->vh_memt, vh->vh_allmemh, i * 32,
    213 		    font + i * 16, 16);
    214 
    215 	textram(vh);
    216 	splx(s);
    217 }
    218 #endif /* !VGA_RASTERCONSOLE */
    219 
    220 #ifdef VGA_RESET
    221 /*
    222  * vga_reset():
    223  *	Reset VGA registers to put it into 80x25 text mode. (mode 3)
    224  *	This function should be called from MD consinit() on ports
    225  *	whose firmware does not use text mode at boot time.
    226  */
    227 void
    228 vga_reset(vh, md_initfunc)
    229 	struct vga_handle *vh;
    230 	void (*md_initfunc)(struct vga_handle *);
    231 {
    232 	u_int8_t reg;
    233 
    234 	if (bus_space_map(vh->vh_iot, 0x3c0, 0x10, 0, &vh->vh_ioh_vga))
    235 		return;
    236 
    237 	reg = bus_space_read_1(vh->vh_iot, vh->vh_ioh_vga, VGA_MISC_DATAR);
    238 	vh->vh_mono = !(reg & 0x01);
    239 
    240 	if (bus_space_map(vh->vh_iot, vh->vh_mono ? 0x3b0 : 0x3d0, 0x10,
    241 	    0, &vh->vh_ioh_6845))
    242 		goto out1;
    243 
    244 	if (bus_space_map(vh->vh_memt, 0xa0000, 0x20000, 0, &vh->vh_allmemh))
    245 		goto out2;
    246 
    247 	if (bus_space_subregion(vh->vh_memt, vh->vh_allmemh,
    248 	    vh->vh_mono ? 0x10000 : 0x18000, 0x8000, &vh->vh_memh))
    249 		goto out3;
    250 
    251 	/* check if VGA already in text mode. */
    252 	if ((vga_gdc_read(vh, misc) & 0x01) == 0)
    253 		goto out3;
    254 
    255 	/* initialize common VGA registers */
    256 	vga_initregs(vh);
    257 
    258 	/* initialize chipset specific registers */
    259 	if (md_initfunc != NULL)
    260 		(*md_initfunc)(vh);
    261 
    262 	delay(10000);
    263 
    264 	/* clear text buffer RAM */
    265 	bus_space_set_region_2(vh->vh_memt, vh->vh_memh, 0,
    266 	    ((BG_BLACK | FG_LIGHTGREY) << 8) | ' ', 80 * 25 /*XXX*/);
    267 
    268  out3:
    269 	bus_space_unmap(vh->vh_memt, vh->vh_allmemh, 0x20000);
    270  out2:
    271 	bus_space_unmap(vh->vh_iot, vh->vh_ioh_6845, 0x10);
    272  out1:
    273 	bus_space_unmap(vh->vh_iot, vh->vh_ioh_vga, 0x10);
    274 }
    275 
    276 /*
    277  * values to initialize registers.
    278  */
    279 
    280 /* miscellaneous output register */
    281 #define VGA_MISCOUT	0x66
    282 
    283 /* sequencer registers */
    284 static const u_int8_t vga_ts[] = {
    285 	0x03,	/* 00: reset */
    286 	0x00,	/* 01: clocking mode */
    287 	0x03,	/* 02: map mask */
    288 	0x00,	/* 03: character map select */
    289 	0x02	/* 04: memory mode */
    290 };
    291 
    292 /* CRT controller registers */
    293 static const u_int8_t vga_crtc[] = {
    294 	0x5f,	/* 00: horizontal total */
    295 	0x4f,	/* 01: horizontal display-enable end */
    296 	0x50,	/* 02: start horizontal blanking */
    297 	0x82,	/* 03: display skew control / end horizontal blanking */
    298 	0x55,	/* 04: start horizontal retrace pulse */
    299 	0x81,	/* 05: horizontal retrace delay / end horizontal retrace */
    300 	0xbf,	/* 06: vetical total */
    301 	0x1f,	/* 07: overflow register */
    302 	0x00,	/* 08: preset row scan */
    303 	0x4f,	/* 09: overflow / maximum scan line */
    304 	0x0d,	/* 0A: cursor off / cursor start */
    305 	0x0e,	/* 0B: cursor skew / cursor end */
    306 	0x00,	/* 0C: start regenerative buffer address high */
    307 	0x00,	/* 0D: start regenerative buffer address low */
    308 	0x00,	/* 0E: cursor location high */
    309 	0x00,	/* 0F: cursor location low */
    310 	0x9c,	/* 10: vertical retrace start */
    311 	0x8e,	/* 11: vertical interrupt / vertical retrace end */
    312 	0x8f,	/* 12: vertical display enable end */
    313 	0x28,	/* 13: logical line width */
    314 	0x00,	/* 14: underline location */
    315 	0x96,	/* 15: start vertical blanking */
    316 	0xb9,	/* 16: end vertical blanking */
    317 	0xa3,	/* 17: CRT mode control */
    318 	0xff	/* 18: line compare */
    319 };
    320 
    321 /* graphics controller registers */
    322 static const u_int8_t vga_gdc[] = {
    323 	0x00,	/* 00: set/reset map */
    324 	0x00,	/* 01: enable set/reset */
    325 	0x00,	/* 02: color compare */
    326 	0x00,	/* 03: data rotate */
    327 	0x00,	/* 04: read map select */
    328 	0x10,	/* 05: graphics mode */
    329 	0x0e,	/* 06: miscellaneous */
    330 	0x00,	/* 07: color don't care */
    331 	0xff	/* 08: bit mask */
    332 };
    333 
    334 /* attribute controller registers */
    335 static const u_int8_t vga_atc[] = {
    336 	0x00,	/* 00: internal palette  0 */
    337 	0x01,	/* 01: internal palette  1 */
    338 	0x02,	/* 02: internal palette  2 */
    339 	0x03,	/* 03: internal palette  3 */
    340 	0x04,	/* 04: internal palette  4 */
    341 	0x05,	/* 05: internal palette  5 */
    342 	0x14,	/* 06: internal palette  6 */
    343 	0x07,	/* 07: internal palette  7 */
    344 	0x38,	/* 08: internal palette  8 */
    345 	0x39,	/* 09: internal palette  9 */
    346 	0x3a,	/* 0A: internal palette 10 */
    347 	0x3b,	/* 0B: internal palette 11 */
    348 	0x3c,	/* 0C: internal palette 12 */
    349 	0x3d,	/* 0D: internal palette 13 */
    350 	0x3e,	/* 0E: internal palette 14 */
    351 	0x3f,	/* 0F: internal palette 15 */
    352 	0x0c,	/* 10: attribute mode control */
    353 	0x00,	/* 11: overscan color */
    354 	0x0f,	/* 12: color plane enable */
    355 	0x08,	/* 13: horizontal PEL panning */
    356 	0x00	/* 14: color select */
    357 };
    358 
    359 /* video DAC palette registers */
    360 /* XXX only set up 16 colors used by internal palette in ATC regsters */
    361 static const u_int8_t vga_dacpal[] = {
    362 	/* R     G     B */
    363 	0x00, 0x00, 0x00,	/* BLACK        */
    364 	0x00, 0x00, 0x2a,	/* BLUE	        */
    365 	0x00, 0x2a, 0x00,	/* GREEN        */
    366 	0x00, 0x2a, 0x2a,	/* CYAN         */
    367 	0x2a, 0x00, 0x00,	/* RED          */
    368 	0x2a, 0x00, 0x2a,	/* MAGENTA      */
    369 	0x2a, 0x15, 0x00,	/* BROWN        */
    370 	0x2a, 0x2a, 0x2a,	/* LIGHTGREY    */
    371 	0x15, 0x15, 0x15,	/* DARKGREY     */
    372 	0x15, 0x15, 0x3f,	/* LIGHTBLUE    */
    373 	0x15, 0x3f, 0x15,	/* LIGHTGREEN   */
    374 	0x15, 0x3f, 0x3f,	/* LIGHTCYAN    */
    375 	0x3f, 0x15, 0x15,	/* LIGHTRED     */
    376 	0x3f, 0x15, 0x3f,	/* LIGHTMAGENTA */
    377 	0x3f, 0x3f, 0x15,	/* YELLOW       */
    378 	0x3f, 0x3f, 0x3f	/* WHITE        */
    379 };
    380 
    381 static void
    382 vga_initregs(vh)
    383 	struct vga_handle *vh;
    384 {
    385 	int i;
    386 
    387 	/* disable video */
    388 	vga_ts_write(vh, mode, vga_ts[1] | VGA_TS_MODE_BLANK);
    389 
    390 	/* synchronous reset */
    391 	vga_ts_write(vh, syncreset, 0x01);
    392 	/* set TS regsters */
    393 	for (i = 2; i < VGA_TS_NREGS; i++)
    394 		_vga_ts_write(vh, i, vga_ts[i]);
    395 	/* clear synchronous reset */
    396 	vga_ts_write(vh, syncreset, 0x03);
    397 
    398 	/* unprotect CRTC regsters */
    399 	vga_6845_write(vh, vsynce, vga_6845_read(vh, vsynce) & ~0x80);
    400 	/* set CRTC regsters */
    401 	for (i = 0; i < MC6845_NREGS; i++)
    402 		_vga_6845_write(vh, i, vga_crtc[i]);
    403 
    404 	/* set GDC regsters */
    405 	for (i = 0; i < VGA_GDC_NREGS; i++)
    406 		_vga_gdc_write(vh, i, vga_gdc[i]);
    407 
    408 	/* set ATC regsters */
    409 	for (i = 0; i < VGA_ATC_NREGS; i++)
    410 		_vga_attr_write(vh, i, vga_atc[i]);
    411 
    412 	/* set DAC palette */
    413 	if (!vh->vh_mono) {
    414 		for (i = 0; i < 16; i++) {
    415 			bus_space_write_1(vh->vh_iot, vh->vh_ioh_vga,
    416 			    VGA_DAC_ADDRW, vga_atc[i]);
    417 			bus_space_write_1(vh->vh_iot, vh->vh_ioh_vga,
    418 			    VGA_DAC_PALETTE, vga_dacpal[i * 3 + 0]);
    419 			bus_space_write_1(vh->vh_iot, vh->vh_ioh_vga,
    420 			    VGA_DAC_PALETTE, vga_dacpal[i * 3 + 1]);
    421 			bus_space_write_1(vh->vh_iot, vh->vh_ioh_vga,
    422 			    VGA_DAC_PALETTE, vga_dacpal[i * 3 + 2]);
    423 		}
    424 	}
    425 
    426 	/* set misc output register */
    427 	bus_space_write_1(vh->vh_iot, vh->vh_ioh_vga,
    428 	    VGA_MISC_DATAW, VGA_MISCOUT | (vh->vh_mono ? 0 : 0x01));
    429 
    430 	/* reenable video */
    431 	vga_ts_write(vh, mode, vga_ts[1] & ~VGA_TS_MODE_BLANK);
    432 }
    433 #endif /* VGA_RESET */
    434