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