FreeBSD/Linux Kernel Cross Reference
sys/dev/fb/vga.c
1 /*-
2 * Copyright (c) 1999 Kazutaka YOKOTA <yokota@zodiac.mech.utsunomiya-u.ac.jp>
3 * Copyright (c) 1992-1998 Søren Schmidt
4 * All rights reserved.
5 *
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
8 * are met:
9 * 1. Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer as
11 * the first lines of this file unmodified.
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. The name of the author may not be used to endorse or promote products
16 * derived from this software without specific prior written permission.
17 *
18 * THIS SOFTWARE IS PROVIDED BY THE AUTHORS ``AS IS'' AND ANY EXPRESS OR
19 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
20 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
21 * IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR ANY DIRECT, INDIRECT,
22 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
23 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
24 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
25 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
26 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
27 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
28 *
29 */
30
31 #include <sys/cdefs.h>
32 __FBSDID("$FreeBSD: releng/8.2/sys/dev/fb/vga.c 205984 2010-03-31 15:49:10Z jkim $");
33
34 #include "opt_vga.h"
35 #include "opt_fb.h"
36 #ifndef FB_DEBUG
37 #define FB_DEBUG 0
38 #endif
39 #include "opt_syscons.h" /* should be removed in the future, XXX */
40
41 #include <sys/param.h>
42 #include <sys/systm.h>
43 #include <sys/kernel.h>
44 #include <sys/conf.h>
45 #include <sys/fcntl.h>
46 #include <sys/malloc.h>
47 #include <sys/fbio.h>
48
49 #include <vm/vm.h>
50 #include <vm/vm_param.h>
51 #include <vm/pmap.h>
52
53 #include <machine/md_var.h>
54 #if defined(__i386__) || defined(__amd64__)
55 #include <machine/pc/bios.h>
56 #endif
57 #include <machine/bus.h>
58
59 #include <dev/fb/fbreg.h>
60 #include <dev/fb/vgareg.h>
61
62 #include <isa/isareg.h>
63
64 #ifndef VGA_DEBUG
65 #define VGA_DEBUG 0
66 #endif
67
68 /* XXX machine/pc/bios.h has got too much i386-specific stuff in it */
69 #ifndef BIOS_PADDRTOVADDR
70 #define BIOS_PADDRTOVADDR(x) (x)
71 #endif
72
73 int
74 vga_probe_unit(int unit, video_adapter_t *buf, int flags)
75 {
76 video_adapter_t *adp;
77 video_switch_t *sw;
78 int error;
79
80 sw = vid_get_switch(VGA_DRIVER_NAME);
81 if (sw == NULL)
82 return 0;
83 error = (*sw->probe)(unit, &adp, NULL, flags);
84 if (error)
85 return error;
86 bcopy(adp, buf, sizeof(*buf));
87 return 0;
88 }
89
90 int
91 vga_attach_unit(int unit, vga_softc_t *sc, int flags)
92 {
93 video_switch_t *sw;
94 int error;
95
96 sw = vid_get_switch(VGA_DRIVER_NAME);
97 if (sw == NULL)
98 return ENXIO;
99
100 error = (*sw->probe)(unit, &sc->adp, NULL, flags);
101 if (error)
102 return error;
103 return (*sw->init)(unit, sc->adp, flags);
104 }
105
106 /* cdev driver functions */
107
108 #ifdef FB_INSTALL_CDEV
109
110 int
111 vga_open(struct cdev *dev, vga_softc_t *sc, int flag, int mode, struct thread *td)
112 {
113 if (sc == NULL)
114 return ENXIO;
115 if (mode & (O_CREAT | O_APPEND | O_TRUNC))
116 return ENODEV;
117
118 return genfbopen(&sc->gensc, sc->adp, flag, mode, td);
119 }
120
121 int
122 vga_close(struct cdev *dev, vga_softc_t *sc, int flag, int mode, struct thread *td)
123 {
124 return genfbclose(&sc->gensc, sc->adp, flag, mode, td);
125 }
126
127 int
128 vga_read(struct cdev *dev, vga_softc_t *sc, struct uio *uio, int flag)
129 {
130 return genfbread(&sc->gensc, sc->adp, uio, flag);
131 }
132
133 int
134 vga_write(struct cdev *dev, vga_softc_t *sc, struct uio *uio, int flag)
135 {
136 return genfbread(&sc->gensc, sc->adp, uio, flag);
137 }
138
139 int
140 vga_ioctl(struct cdev *dev, vga_softc_t *sc, u_long cmd, caddr_t arg, int flag,
141 struct thread *td)
142 {
143 return genfbioctl(&sc->gensc, sc->adp, cmd, arg, flag, td);
144 }
145
146 int
147 vga_mmap(struct cdev *dev, vga_softc_t *sc, vm_offset_t offset, vm_offset_t *paddr,
148 int prot)
149 {
150 return genfbmmap(&sc->gensc, sc->adp, offset, paddr, prot);
151 }
152
153 #endif /* FB_INSTALL_CDEV */
154
155 /* LOW-LEVEL */
156
157 #include <isa/rtc.h>
158 #ifdef __i386__
159 #include <dev/fb/vesa.h>
160 #endif
161
162 #define probe_done(adp) ((adp)->va_flags & V_ADP_PROBED)
163 #define init_done(adp) ((adp)->va_flags & V_ADP_INITIALIZED)
164 #define config_done(adp) ((adp)->va_flags & V_ADP_REGISTERED)
165
166 /* for compatibility with old kernel options */
167 #ifdef SC_ALT_SEQACCESS
168 #undef SC_ALT_SEQACCESS
169 #undef VGA_ALT_SEQACCESS
170 #define VGA_ALT_SEQACCESS 1
171 #endif
172
173 #ifdef SLOW_VGA
174 #undef SLOW_VGA
175 #undef VGA_SLOW_IOACCESS
176 #define VGA_SLOW_IOACCESS
177 #endif
178
179 /* architecture dependent option */
180 #if !defined(__i386__) && !defined(__amd64__)
181 #define VGA_NO_BIOS 1
182 #endif
183
184 /* this should really be in `rtc.h' */
185 #define RTC_EQUIPMENT 0x14
186
187 /* various sizes */
188 #define V_MODE_MAP_SIZE (M_VGA_CG320 + 1)
189 #define V_MODE_PARAM_SIZE 64
190
191 /* video adapter state buffer */
192 struct adp_state {
193 int sig;
194 #define V_STATE_SIG 0x736f6962
195 u_char regs[V_MODE_PARAM_SIZE];
196 };
197 typedef struct adp_state adp_state_t;
198
199 /* video adapter information */
200 #define DCC_MONO 0
201 #define DCC_CGA40 1
202 #define DCC_CGA80 2
203 #define DCC_EGAMONO 3
204 #define DCC_EGA40 4
205 #define DCC_EGA80 5
206
207 /*
208 * NOTE: `va_window' should have a virtual address, but is initialized
209 * with a physical address in the following table, as verify_adapter()
210 * will perform address conversion at run-time.
211 */
212 static video_adapter_t adapter_init_value[] = {
213 /* DCC_MONO */
214 { 0, KD_MONO, "mda", 0, 0, 0, IO_MDA, IO_MDASIZE, MONO_CRTC,
215 MDA_BUF_BASE, MDA_BUF_SIZE, MDA_BUF_BASE, MDA_BUF_SIZE, MDA_BUF_SIZE,
216 0, 0, 0, 0, 7, 0, },
217 /* DCC_CGA40 */
218 { 0, KD_CGA, "cga", 0, 0, V_ADP_COLOR, IO_CGA, IO_CGASIZE, COLOR_CRTC,
219 CGA_BUF_BASE, CGA_BUF_SIZE, CGA_BUF_BASE, CGA_BUF_SIZE, CGA_BUF_SIZE,
220 0, 0, 0, 0, 3, 0, },
221 /* DCC_CGA80 */
222 { 0, KD_CGA, "cga", 0, 0, V_ADP_COLOR, IO_CGA, IO_CGASIZE, COLOR_CRTC,
223 CGA_BUF_BASE, CGA_BUF_SIZE, CGA_BUF_BASE, CGA_BUF_SIZE, CGA_BUF_SIZE,
224 0, 0, 0, 0, 3, 0, },
225 /* DCC_EGAMONO */
226 { 0, KD_EGA, "ega", 0, 0, 0, IO_MDA, 48, MONO_CRTC,
227 EGA_BUF_BASE, EGA_BUF_SIZE, MDA_BUF_BASE, MDA_BUF_SIZE, MDA_BUF_SIZE,
228 0, 0, 0, 0, 7, 0, },
229 /* DCC_EGA40 */
230 { 0, KD_EGA, "ega", 0, 0, V_ADP_COLOR, IO_MDA, 48, COLOR_CRTC,
231 EGA_BUF_BASE, EGA_BUF_SIZE, CGA_BUF_BASE, CGA_BUF_SIZE, CGA_BUF_SIZE,
232 0, 0, 0, 0, 3, 0, },
233 /* DCC_EGA80 */
234 { 0, KD_EGA, "ega", 0, 0, V_ADP_COLOR, IO_MDA, 48, COLOR_CRTC,
235 EGA_BUF_BASE, EGA_BUF_SIZE, CGA_BUF_BASE, CGA_BUF_SIZE, CGA_BUF_SIZE,
236 0, 0, 0, 0, 3, 0, },
237 };
238
239 static video_adapter_t biosadapter[2];
240 static int biosadapters = 0;
241
242 /* video driver declarations */
243 static int vga_configure(int flags);
244 int (*vga_sub_configure)(int flags);
245 #if 0
246 static int vga_nop(void);
247 #endif
248 static int vga_error(void);
249 static vi_probe_t vga_probe;
250 static vi_init_t vga_init;
251 static vi_get_info_t vga_get_info;
252 static vi_query_mode_t vga_query_mode;
253 static vi_set_mode_t vga_set_mode;
254 static vi_save_font_t vga_save_font;
255 static vi_load_font_t vga_load_font;
256 static vi_show_font_t vga_show_font;
257 static vi_save_palette_t vga_save_palette;
258 static vi_load_palette_t vga_load_palette;
259 static vi_set_border_t vga_set_border;
260 static vi_save_state_t vga_save_state;
261 static vi_load_state_t vga_load_state;
262 static vi_set_win_org_t vga_set_origin;
263 static vi_read_hw_cursor_t vga_read_hw_cursor;
264 static vi_set_hw_cursor_t vga_set_hw_cursor;
265 static vi_set_hw_cursor_shape_t vga_set_hw_cursor_shape;
266 static vi_blank_display_t vga_blank_display;
267 static vi_mmap_t vga_mmap_buf;
268 static vi_ioctl_t vga_dev_ioctl;
269 #ifndef VGA_NO_MODE_CHANGE
270 static vi_clear_t vga_clear;
271 static vi_fill_rect_t vga_fill_rect;
272 static vi_bitblt_t vga_bitblt;
273 #else /* VGA_NO_MODE_CHANGE */
274 #define vga_clear (vi_clear_t *)vga_error
275 #define vga_fill_rect (vi_fill_rect_t *)vga_error
276 #define vga_bitblt (vi_bitblt_t *)vga_error
277 #endif
278 static vi_diag_t vga_diag;
279
280 static video_switch_t vgavidsw = {
281 vga_probe,
282 vga_init,
283 vga_get_info,
284 vga_query_mode,
285 vga_set_mode,
286 vga_save_font,
287 vga_load_font,
288 vga_show_font,
289 vga_save_palette,
290 vga_load_palette,
291 vga_set_border,
292 vga_save_state,
293 vga_load_state,
294 vga_set_origin,
295 vga_read_hw_cursor,
296 vga_set_hw_cursor,
297 vga_set_hw_cursor_shape,
298 vga_blank_display,
299 vga_mmap_buf,
300 vga_dev_ioctl,
301 vga_clear,
302 vga_fill_rect,
303 vga_bitblt,
304 vga_error,
305 vga_error,
306 vga_diag,
307 };
308
309 VIDEO_DRIVER(mda, vgavidsw, NULL);
310 VIDEO_DRIVER(cga, vgavidsw, NULL);
311 VIDEO_DRIVER(ega, vgavidsw, NULL);
312 VIDEO_DRIVER(vga, vgavidsw, vga_configure);
313
314 /* VGA BIOS standard video modes */
315 #define EOT (-1)
316 #define NA (-2)
317
318 static video_info_t bios_vmode[] = {
319 /* CGA */
320 { M_B40x25, V_INFO_COLOR, 40, 25, 8, 8, 2, 1,
321 CGA_BUF_BASE, CGA_BUF_SIZE, CGA_BUF_SIZE, 0, 0, V_INFO_MM_TEXT },
322 { M_C40x25, V_INFO_COLOR, 40, 25, 8, 8, 4, 1,
323 CGA_BUF_BASE, CGA_BUF_SIZE, CGA_BUF_SIZE, 0, 0, V_INFO_MM_TEXT },
324 { M_B80x25, V_INFO_COLOR, 80, 25, 8, 8, 2, 1,
325 CGA_BUF_BASE, CGA_BUF_SIZE, CGA_BUF_SIZE, 0, 0, V_INFO_MM_TEXT },
326 { M_C80x25, V_INFO_COLOR, 80, 25, 8, 8, 4, 1,
327 CGA_BUF_BASE, CGA_BUF_SIZE, CGA_BUF_SIZE, 0, 0, V_INFO_MM_TEXT },
328 /* EGA */
329 { M_ENH_B40x25, V_INFO_COLOR, 40, 25, 8, 14, 2, 1,
330 CGA_BUF_BASE, CGA_BUF_SIZE, CGA_BUF_SIZE, 0, 0, V_INFO_MM_TEXT },
331 { M_ENH_C40x25, V_INFO_COLOR, 40, 25, 8, 14, 4, 1,
332 CGA_BUF_BASE, CGA_BUF_SIZE, CGA_BUF_SIZE, 0, 0, V_INFO_MM_TEXT },
333 { M_ENH_B80x25, V_INFO_COLOR, 80, 25, 8, 14, 2, 1,
334 CGA_BUF_BASE, CGA_BUF_SIZE, CGA_BUF_SIZE, 0, 0, V_INFO_MM_TEXT },
335 { M_ENH_C80x25, V_INFO_COLOR, 80, 25, 8, 14, 4, 1,
336 CGA_BUF_BASE, CGA_BUF_SIZE, CGA_BUF_SIZE, 0, 0, V_INFO_MM_TEXT },
337 /* VGA */
338 { M_VGA_C40x25, V_INFO_COLOR, 40, 25, 8, 16, 4, 1,
339 CGA_BUF_BASE, CGA_BUF_SIZE, CGA_BUF_SIZE, 0, 0, V_INFO_MM_TEXT },
340 { M_VGA_M80x25, 0, 80, 25, 8, 16, 2, 1,
341 MDA_BUF_BASE, MDA_BUF_SIZE, MDA_BUF_SIZE, 0, 0, V_INFO_MM_TEXT },
342 { M_VGA_C80x25, V_INFO_COLOR, 80, 25, 8, 16, 4, 1,
343 CGA_BUF_BASE, CGA_BUF_SIZE, CGA_BUF_SIZE, 0, 0, V_INFO_MM_TEXT },
344 /* MDA */
345 { M_EGAMONO80x25, 0, 80, 25, 8, 14, 2, 1,
346 MDA_BUF_BASE, MDA_BUF_SIZE, MDA_BUF_SIZE, 0, 0, V_INFO_MM_TEXT },
347 /* EGA */
348 { M_ENH_B80x43, 0, 80, 43, 8, 8, 2, 1,
349 CGA_BUF_BASE, CGA_BUF_SIZE, CGA_BUF_SIZE, 0, 0, V_INFO_MM_TEXT },
350 { M_ENH_C80x43, V_INFO_COLOR, 80, 43, 8, 8, 4, 1,
351 CGA_BUF_BASE, CGA_BUF_SIZE, CGA_BUF_SIZE, 0, 0, V_INFO_MM_TEXT },
352 /* VGA */
353 { M_VGA_M80x30, 0, 80, 30, 8, 16, 2, 1,
354 MDA_BUF_BASE, MDA_BUF_SIZE, MDA_BUF_SIZE, 0, 0, V_INFO_MM_TEXT },
355 { M_VGA_C80x30, V_INFO_COLOR, 80, 30, 8, 16, 4, 1,
356 CGA_BUF_BASE, CGA_BUF_SIZE, CGA_BUF_SIZE, 0, 0, V_INFO_MM_TEXT },
357 { M_VGA_M80x50, 0, 80, 50, 8, 8, 2, 1,
358 MDA_BUF_BASE, MDA_BUF_SIZE, MDA_BUF_SIZE, 0, 0, V_INFO_MM_TEXT },
359 { M_VGA_C80x50, V_INFO_COLOR, 80, 50, 8, 8, 4, 1,
360 CGA_BUF_BASE, CGA_BUF_SIZE, CGA_BUF_SIZE, 0, 0, V_INFO_MM_TEXT },
361 { M_VGA_M80x60, 0, 80, 60, 8, 8, 2, 1,
362 MDA_BUF_BASE, MDA_BUF_SIZE, MDA_BUF_SIZE, 0, 0, V_INFO_MM_TEXT },
363 { M_VGA_C80x60, V_INFO_COLOR, 80, 60, 8, 8, 4, 1,
364 CGA_BUF_BASE, CGA_BUF_SIZE, CGA_BUF_SIZE, 0, 0, V_INFO_MM_TEXT },
365
366 #ifndef VGA_NO_MODE_CHANGE
367
368 #ifdef VGA_WIDTH90
369 { M_VGA_M90x25, 0, 90, 25, 8, 16, 2, 1,
370 MDA_BUF_BASE, MDA_BUF_SIZE, MDA_BUF_SIZE, 0, 0, V_INFO_MM_TEXT },
371 { M_VGA_C90x25, V_INFO_COLOR, 90, 25, 8, 16, 4, 1,
372 CGA_BUF_BASE, CGA_BUF_SIZE, CGA_BUF_SIZE, 0, 0, V_INFO_MM_TEXT },
373 { M_VGA_M90x30, 0, 90, 30, 8, 16, 2, 1,
374 MDA_BUF_BASE, MDA_BUF_SIZE, MDA_BUF_SIZE, 0, 0, V_INFO_MM_TEXT },
375 { M_VGA_C90x30, V_INFO_COLOR, 90, 30, 8, 16, 4, 1,
376 CGA_BUF_BASE, CGA_BUF_SIZE, CGA_BUF_SIZE, 0, 0, V_INFO_MM_TEXT },
377 { M_VGA_M90x43, 0, 90, 43, 8, 8, 2, 1,
378 CGA_BUF_BASE, CGA_BUF_SIZE, CGA_BUF_SIZE, 0, 0, V_INFO_MM_TEXT },
379 { M_VGA_C90x43, V_INFO_COLOR, 90, 43, 8, 8, 4, 1,
380 CGA_BUF_BASE, CGA_BUF_SIZE, CGA_BUF_SIZE, 0, 0, V_INFO_MM_TEXT },
381 { M_VGA_M90x50, 0, 90, 50, 8, 8, 2, 1,
382 MDA_BUF_BASE, MDA_BUF_SIZE, MDA_BUF_SIZE, 0, 0, V_INFO_MM_TEXT },
383 { M_VGA_C90x50, V_INFO_COLOR, 90, 50, 8, 8, 4, 1,
384 CGA_BUF_BASE, CGA_BUF_SIZE, CGA_BUF_SIZE, 0, 0, V_INFO_MM_TEXT },
385 { M_VGA_M90x60, 0, 90, 60, 8, 8, 2, 1,
386 MDA_BUF_BASE, MDA_BUF_SIZE, MDA_BUF_SIZE, 0, 0, V_INFO_MM_TEXT },
387 { M_VGA_C90x60, V_INFO_COLOR, 90, 60, 8, 8, 4, 1,
388 CGA_BUF_BASE, CGA_BUF_SIZE, CGA_BUF_SIZE, 0, 0, V_INFO_MM_TEXT },
389 #endif /* VGA_WIDTH90 */
390
391 /* CGA */
392 { M_BG320, V_INFO_COLOR | V_INFO_GRAPHICS, 320, 200, 8, 8, 2, 1,
393 CGA_BUF_BASE, CGA_BUF_SIZE, CGA_BUF_SIZE, 0, 0, V_INFO_MM_CGA },
394 { M_CG320, V_INFO_COLOR | V_INFO_GRAPHICS, 320, 200, 8, 8, 2, 1,
395 CGA_BUF_BASE, CGA_BUF_SIZE, CGA_BUF_SIZE, 0, 0, V_INFO_MM_CGA },
396 { M_BG640, V_INFO_COLOR | V_INFO_GRAPHICS, 640, 200, 8, 8, 1, 1,
397 CGA_BUF_BASE, CGA_BUF_SIZE, CGA_BUF_SIZE, 0, 0, V_INFO_MM_CGA },
398 /* EGA */
399 { M_CG320_D, V_INFO_COLOR | V_INFO_GRAPHICS, 320, 200, 8, 8, 4, 4,
400 GRAPHICS_BUF_BASE, GRAPHICS_BUF_SIZE, GRAPHICS_BUF_SIZE, 0, 0,
401 V_INFO_MM_PLANAR },
402 { M_CG640_E, V_INFO_COLOR | V_INFO_GRAPHICS, 640, 200, 8, 8, 4, 4,
403 GRAPHICS_BUF_BASE, GRAPHICS_BUF_SIZE, GRAPHICS_BUF_SIZE, 0, 0 ,
404 V_INFO_MM_PLANAR },
405 { M_EGAMONOAPA, V_INFO_GRAPHICS, 640, 350, 8, 14, 4, 4,
406 GRAPHICS_BUF_BASE, GRAPHICS_BUF_SIZE, 64*1024, 0, 0 ,
407 V_INFO_MM_PLANAR },
408 { M_ENHMONOAPA2,V_INFO_GRAPHICS, 640, 350, 8, 14, 4, 4,
409 GRAPHICS_BUF_BASE, GRAPHICS_BUF_SIZE, GRAPHICS_BUF_SIZE, 0, 0 ,
410 V_INFO_MM_PLANAR },
411 { M_CG640x350, V_INFO_COLOR | V_INFO_GRAPHICS, 640, 350, 8, 14, 2, 2,
412 GRAPHICS_BUF_BASE, GRAPHICS_BUF_SIZE, GRAPHICS_BUF_SIZE, 0, 0 ,
413 V_INFO_MM_PLANAR },
414 { M_ENH_CG640, V_INFO_COLOR | V_INFO_GRAPHICS, 640, 350, 8, 14, 4, 4,
415 GRAPHICS_BUF_BASE, GRAPHICS_BUF_SIZE, GRAPHICS_BUF_SIZE, 0, 0 ,
416 V_INFO_MM_PLANAR },
417 /* VGA */
418 { M_BG640x480, V_INFO_COLOR | V_INFO_GRAPHICS, 640, 480, 8, 16, 4, 4,
419 GRAPHICS_BUF_BASE, GRAPHICS_BUF_SIZE, GRAPHICS_BUF_SIZE, 0, 0 ,
420 V_INFO_MM_PLANAR },
421 { M_CG640x480, V_INFO_COLOR | V_INFO_GRAPHICS, 640, 480, 8, 16, 4, 4,
422 GRAPHICS_BUF_BASE, GRAPHICS_BUF_SIZE, GRAPHICS_BUF_SIZE, 0, 0 ,
423 V_INFO_MM_PLANAR },
424 { M_VGA_CG320, V_INFO_COLOR | V_INFO_GRAPHICS, 320, 200, 8, 8, 8, 1,
425 GRAPHICS_BUF_BASE, GRAPHICS_BUF_SIZE, GRAPHICS_BUF_SIZE, 0, 0,
426 V_INFO_MM_PACKED, 1 },
427 { M_VGA_MODEX, V_INFO_COLOR | V_INFO_GRAPHICS, 320, 240, 8, 8, 8, 4,
428 GRAPHICS_BUF_BASE, GRAPHICS_BUF_SIZE, GRAPHICS_BUF_SIZE, 0, 0,
429 V_INFO_MM_VGAX, 1 },
430 #endif /* VGA_NO_MODE_CHANGE */
431
432 { EOT },
433 };
434
435 static int vga_init_done = FALSE;
436 #if !defined(VGA_NO_BIOS) && !defined(VGA_NO_MODE_CHANGE)
437 static u_char *video_mode_ptr = NULL; /* EGA/VGA */
438 static u_char *video_mode_ptr2 = NULL; /* CGA/MDA */
439 #endif
440 static u_char *mode_map[V_MODE_MAP_SIZE];
441 static adp_state_t adpstate;
442 static adp_state_t adpstate2;
443 static int rows_offset = 1;
444
445 /* local macros and functions */
446 #define BIOS_SADDRTOLADDR(p) ((((p) & 0xffff0000) >> 12) + ((p) & 0x0000ffff))
447
448 #if !defined(VGA_NO_BIOS) && !defined(VGA_NO_MODE_CHANGE)
449 static void map_mode_table(u_char *map[], u_char *table, int max);
450 #endif
451 static void clear_mode_map(video_adapter_t *adp, u_char *map[], int max,
452 int color);
453 #if !defined(VGA_NO_BIOS) && !defined(VGA_NO_MODE_CHANGE)
454 static int map_mode_num(int mode);
455 #endif
456 static int map_gen_mode_num(int type, int color, int mode);
457 static int map_bios_mode_num(int type, int color, int bios_mode);
458 static u_char *get_mode_param(int mode);
459 #ifndef VGA_NO_BIOS
460 static void fill_adapter_param(int code, video_adapter_t *adp);
461 #endif
462 static int verify_adapter(video_adapter_t *adp);
463 static void update_adapter_info(video_adapter_t *adp, video_info_t *info);
464 #if !defined(VGA_NO_BIOS) && !defined(VGA_NO_MODE_CHANGE)
465 #define COMP_IDENTICAL 0
466 #define COMP_SIMILAR 1
467 #define COMP_DIFFERENT 2
468 static int comp_adpregs(u_char *buf1, u_char *buf2);
469 #endif
470 static int probe_adapters(void);
471 static int set_line_length(video_adapter_t *adp, int pixel);
472 static int set_display_start(video_adapter_t *adp, int x, int y);
473
474 #ifndef VGA_NO_MODE_CHANGE
475 #ifdef VGA_WIDTH90
476 static void set_width90(adp_state_t *params);
477 #endif
478 #endif /* !VGA_NO_MODE_CHANGE */
479
480 #ifndef VGA_NO_FONT_LOADING
481 #define PARAM_BUFSIZE 6
482 static void set_font_mode(video_adapter_t *adp, u_char *buf);
483 static void set_normal_mode(video_adapter_t *adp, u_char *buf);
484 #endif
485
486 #ifndef VGA_NO_MODE_CHANGE
487 static void filll_io(int val, vm_offset_t d, size_t size);
488 static void planar_fill(video_adapter_t *adp, int val);
489 static void packed_fill(video_adapter_t *adp, int val);
490 static void direct_fill(video_adapter_t *adp, int val);
491 #ifdef notyet
492 static void planar_fill_rect(video_adapter_t *adp, int val, int x, int y,
493 int cx, int cy);
494 static void packed_fill_rect(video_adapter_t *adp, int val, int x, int y,
495 int cx, int cy);
496 static void direct_fill_rect16(video_adapter_t *adp, int val, int x, int y,
497 int cx, int cy);
498 static void direct_fill_rect24(video_adapter_t *adp, int val, int x, int y,
499 int cx, int cy);
500 static void direct_fill_rect32(video_adapter_t *adp, int val, int x, int y,
501 int cx, int cy);
502 #endif /* notyet */
503 #endif /* !VGA_NO_MODE_CHANGE */
504
505 static void dump_buffer(u_char *buf, size_t len);
506
507 #define ISMAPPED(pa, width) \
508 (((pa) <= (u_long)0x1000 - (width)) \
509 || ((pa) >= ISA_HOLE_START && (pa) <= 0x100000 - (width)))
510
511 #define prologue(adp, flag, err) \
512 if (!vga_init_done || !((adp)->va_flags & (flag))) \
513 return (err)
514
515 /* a backdoor for the console driver */
516 static int
517 vga_configure(int flags)
518 {
519 int i;
520
521 probe_adapters();
522 for (i = 0; i < biosadapters; ++i) {
523 if (!probe_done(&biosadapter[i]))
524 continue;
525 biosadapter[i].va_flags |= V_ADP_INITIALIZED;
526 if (!config_done(&biosadapter[i])) {
527 if (vid_register(&biosadapter[i]) < 0)
528 continue;
529 biosadapter[i].va_flags |= V_ADP_REGISTERED;
530 }
531 }
532 if (vga_sub_configure != NULL)
533 (*vga_sub_configure)(flags);
534
535 return biosadapters;
536 }
537
538 /* local subroutines */
539
540 #if !defined(VGA_NO_BIOS) && !defined(VGA_NO_MODE_CHANGE)
541 /* construct the mode parameter map */
542 static void
543 map_mode_table(u_char *map[], u_char *table, int max)
544 {
545 int i;
546
547 for(i = 0; i < max; ++i)
548 map[i] = table + i*V_MODE_PARAM_SIZE;
549 for(; i < V_MODE_MAP_SIZE; ++i)
550 map[i] = NULL;
551 }
552 #endif /* !VGA_NO_BIOS && !VGA_NO_MODE_CHANGE */
553
554 static void
555 clear_mode_map(video_adapter_t *adp, u_char *map[], int max, int color)
556 {
557 video_info_t info;
558 int i;
559
560 /*
561 * NOTE: we don't touch `bios_vmode[]' because it is shared
562 * by all adapters.
563 */
564 for(i = 0; i < max; ++i) {
565 if (vga_get_info(adp, i, &info))
566 continue;
567 if ((info.vi_flags & V_INFO_COLOR) != color)
568 map[i] = NULL;
569 }
570 }
571
572 #if !defined(VGA_NO_BIOS) && !defined(VGA_NO_MODE_CHANGE)
573 /* map the non-standard video mode to a known mode number */
574 static int
575 map_mode_num(int mode)
576 {
577 static struct {
578 int from;
579 int to;
580 } mode_map[] = {
581 { M_ENH_B80x43, M_ENH_B80x25 },
582 { M_ENH_C80x43, M_ENH_C80x25 },
583 { M_VGA_M80x30, M_VGA_M80x25 },
584 { M_VGA_C80x30, M_VGA_C80x25 },
585 { M_VGA_M80x50, M_VGA_M80x25 },
586 { M_VGA_C80x50, M_VGA_C80x25 },
587 { M_VGA_M80x60, M_VGA_M80x25 },
588 { M_VGA_C80x60, M_VGA_C80x25 },
589 #ifdef VGA_WIDTH90
590 { M_VGA_M90x25, M_VGA_M80x25 },
591 { M_VGA_C90x25, M_VGA_C80x25 },
592 { M_VGA_M90x30, M_VGA_M80x25 },
593 { M_VGA_C90x30, M_VGA_C80x25 },
594 { M_VGA_M90x43, M_ENH_B80x25 },
595 { M_VGA_C90x43, M_ENH_C80x25 },
596 { M_VGA_M90x50, M_VGA_M80x25 },
597 { M_VGA_C90x50, M_VGA_C80x25 },
598 { M_VGA_M90x60, M_VGA_M80x25 },
599 { M_VGA_C90x60, M_VGA_C80x25 },
600 #endif
601 { M_VGA_MODEX, M_VGA_CG320 },
602 };
603 int i;
604
605 for (i = 0; i < sizeof(mode_map)/sizeof(mode_map[0]); ++i) {
606 if (mode_map[i].from == mode)
607 return mode_map[i].to;
608 }
609 return mode;
610 }
611 #endif /* !VGA_NO_BIOS && !VGA_NO_MODE_CHANGE */
612
613 /* map a generic video mode to a known mode number */
614 static int
615 map_gen_mode_num(int type, int color, int mode)
616 {
617 static struct {
618 int from;
619 int to_color;
620 int to_mono;
621 } mode_map[] = {
622 { M_TEXT_80x30, M_VGA_C80x30, M_VGA_M80x30, },
623 { M_TEXT_80x43, M_ENH_C80x43, M_ENH_B80x43, },
624 { M_TEXT_80x50, M_VGA_C80x50, M_VGA_M80x50, },
625 { M_TEXT_80x60, M_VGA_C80x60, M_VGA_M80x60, },
626 };
627 int i;
628
629 if (mode == M_TEXT_80x25) {
630 switch (type) {
631
632 case KD_VGA:
633 if (color)
634 return M_VGA_C80x25;
635 else
636 return M_VGA_M80x25;
637 break;
638
639 case KD_EGA:
640 if (color)
641 return M_ENH_C80x25;
642 else
643 return M_EGAMONO80x25;
644 break;
645
646 case KD_CGA:
647 return M_C80x25;
648
649 case KD_MONO:
650 case KD_HERCULES:
651 return M_EGAMONO80x25; /* XXX: this name is confusing */
652
653 default:
654 return -1;
655 }
656 }
657
658 for (i = 0; i < sizeof(mode_map)/sizeof(mode_map[0]); ++i) {
659 if (mode_map[i].from == mode)
660 return ((color) ? mode_map[i].to_color : mode_map[i].to_mono);
661 }
662 return mode;
663 }
664
665 /* turn the BIOS video number into our video mode number */
666 static int
667 map_bios_mode_num(int type, int color, int bios_mode)
668 {
669 static int cga_modes[7] = {
670 M_B40x25, M_C40x25, /* 0, 1 */
671 M_B80x25, M_C80x25, /* 2, 3 */
672 M_BG320, M_CG320,
673 M_BG640,
674 };
675 static int ega_modes[17] = {
676 M_ENH_B40x25, M_ENH_C40x25, /* 0, 1 */
677 M_ENH_B80x25, M_ENH_C80x25, /* 2, 3 */
678 M_BG320, M_CG320,
679 M_BG640,
680 M_EGAMONO80x25, /* 7 */
681 8, 9, 10, 11, 12,
682 M_CG320_D,
683 M_CG640_E,
684 M_ENHMONOAPA2, /* XXX: video momery > 64K */
685 M_ENH_CG640, /* XXX: video momery > 64K */
686 };
687 static int vga_modes[20] = {
688 M_VGA_C40x25, M_VGA_C40x25, /* 0, 1 */
689 M_VGA_C80x25, M_VGA_C80x25, /* 2, 3 */
690 M_BG320, M_CG320,
691 M_BG640,
692 M_VGA_M80x25, /* 7 */
693 8, 9, 10, 11, 12,
694 M_CG320_D,
695 M_CG640_E,
696 M_ENHMONOAPA2,
697 M_ENH_CG640,
698 M_BG640x480, M_CG640x480,
699 M_VGA_CG320,
700 };
701
702 switch (type) {
703
704 case KD_VGA:
705 if (bios_mode < sizeof(vga_modes)/sizeof(vga_modes[0]))
706 return vga_modes[bios_mode];
707 else if (color)
708 return M_VGA_C80x25;
709 else
710 return M_VGA_M80x25;
711 break;
712
713 case KD_EGA:
714 if (bios_mode < sizeof(ega_modes)/sizeof(ega_modes[0]))
715 return ega_modes[bios_mode];
716 else if (color)
717 return M_ENH_C80x25;
718 else
719 return M_EGAMONO80x25;
720 break;
721
722 case KD_CGA:
723 if (bios_mode < sizeof(cga_modes)/sizeof(cga_modes[0]))
724 return cga_modes[bios_mode];
725 else
726 return M_C80x25;
727 break;
728
729 case KD_MONO:
730 case KD_HERCULES:
731 return M_EGAMONO80x25; /* XXX: this name is confusing */
732
733 default:
734 break;
735 }
736 return -1;
737 }
738
739 /* look up a parameter table entry */
740 static u_char
741 *get_mode_param(int mode)
742 {
743 #if !defined(VGA_NO_BIOS) && !defined(VGA_NO_MODE_CHANGE)
744 if (mode >= V_MODE_MAP_SIZE)
745 mode = map_mode_num(mode);
746 #endif
747 if ((mode >= 0) && (mode < V_MODE_MAP_SIZE))
748 return mode_map[mode];
749 else
750 return NULL;
751 }
752
753 #ifndef VGA_NO_BIOS
754 static void
755 fill_adapter_param(int code, video_adapter_t *adp)
756 {
757 static struct {
758 int primary;
759 int secondary;
760 } dcc[] = {
761 { DCC_MONO, DCC_EGA40 /* CGA monitor */ },
762 { DCC_MONO, DCC_EGA80 /* CGA monitor */ },
763 { DCC_MONO, DCC_EGA80 },
764 { DCC_MONO, DCC_EGA80 },
765 { DCC_CGA40, DCC_EGAMONO },
766 { DCC_CGA80, DCC_EGAMONO },
767 { DCC_EGA40 /* CGA monitor */, DCC_MONO},
768 { DCC_EGA80 /* CGA monitor */, DCC_MONO},
769 { DCC_EGA80, DCC_MONO },
770 { DCC_EGA80, DCC_MONO },
771 { DCC_EGAMONO, DCC_CGA40 },
772 { DCC_EGAMONO, DCC_CGA80 },
773 };
774
775 if ((code < 0) || (code >= sizeof(dcc)/sizeof(dcc[0]))) {
776 adp[V_ADP_PRIMARY] = adapter_init_value[DCC_MONO];
777 adp[V_ADP_SECONDARY] = adapter_init_value[DCC_CGA80];
778 } else {
779 adp[V_ADP_PRIMARY] = adapter_init_value[dcc[code].primary];
780 adp[V_ADP_SECONDARY] = adapter_init_value[dcc[code].secondary];
781 }
782 }
783 #endif /* VGA_NO_BIOS */
784
785 static int
786 verify_adapter(video_adapter_t *adp)
787 {
788 vm_offset_t buf;
789 u_int16_t v;
790 #if !defined(VGA_NO_BIOS) && !defined(VGA_NO_MODE_CHANGE)
791 u_int32_t p;
792 #endif
793
794 buf = BIOS_PADDRTOVADDR(adp->va_window);
795 v = readw(buf);
796 writew(buf, 0xA55A);
797 if (readw(buf) != 0xA55A)
798 return ENXIO;
799 writew(buf, v);
800
801 switch (adp->va_type) {
802
803 case KD_EGA:
804 outb(adp->va_crtc_addr, 7);
805 if (inb(adp->va_crtc_addr) == 7) {
806 adp->va_type = KD_VGA;
807 adp->va_name = "vga";
808 adp->va_flags |= V_ADP_STATESAVE | V_ADP_PALETTE;
809 }
810 adp->va_flags |= V_ADP_STATELOAD | V_ADP_BORDER;
811 /* the color adapter may be in the 40x25 mode... XXX */
812
813 #if !defined(VGA_NO_BIOS) && !defined(VGA_NO_MODE_CHANGE)
814 /* get the BIOS video mode pointer */
815 p = *(u_int32_t *)BIOS_PADDRTOVADDR(0x4a8);
816 p = BIOS_SADDRTOLADDR(p);
817 if (ISMAPPED(p, sizeof(u_int32_t))) {
818 p = *(u_int32_t *)BIOS_PADDRTOVADDR(p);
819 p = BIOS_SADDRTOLADDR(p);
820 if (ISMAPPED(p, V_MODE_PARAM_SIZE))
821 video_mode_ptr = (u_char *)BIOS_PADDRTOVADDR(p);
822 }
823 #endif
824 break;
825
826 case KD_CGA:
827 adp->va_flags |= V_ADP_COLOR | V_ADP_BORDER;
828 /* may be in the 40x25 mode... XXX */
829 #if !defined(VGA_NO_BIOS) && !defined(VGA_NO_MODE_CHANGE)
830 /* get the BIOS video mode pointer */
831 p = *(u_int32_t *)BIOS_PADDRTOVADDR(0x1d*4);
832 p = BIOS_SADDRTOLADDR(p);
833 video_mode_ptr2 = (u_char *)BIOS_PADDRTOVADDR(p);
834 #endif
835 break;
836
837 case KD_MONO:
838 #if !defined(VGA_NO_BIOS) && !defined(VGA_NO_MODE_CHANGE)
839 /* get the BIOS video mode pointer */
840 p = *(u_int32_t *)BIOS_PADDRTOVADDR(0x1d*4);
841 p = BIOS_SADDRTOLADDR(p);
842 video_mode_ptr2 = (u_char *)BIOS_PADDRTOVADDR(p);
843 #endif
844 break;
845 }
846
847 return 0;
848 }
849
850 static void
851 update_adapter_info(video_adapter_t *adp, video_info_t *info)
852 {
853 adp->va_flags &= ~V_ADP_COLOR;
854 adp->va_flags |=
855 (info->vi_flags & V_INFO_COLOR) ? V_ADP_COLOR : 0;
856 adp->va_crtc_addr =
857 (adp->va_flags & V_ADP_COLOR) ? COLOR_CRTC : MONO_CRTC;
858 adp->va_window = BIOS_PADDRTOVADDR(info->vi_window);
859 adp->va_window_size = info->vi_window_size;
860 adp->va_window_gran = info->vi_window_gran;
861 adp->va_window_orig = 0;
862 /* XXX */
863 adp->va_buffer = info->vi_buffer;
864 adp->va_buffer_size = info->vi_buffer_size;
865 if (info->vi_mem_model == V_INFO_MM_VGAX) {
866 adp->va_line_width = info->vi_width/2;
867 } else if (info->vi_flags & V_INFO_GRAPHICS) {
868 switch (info->vi_depth/info->vi_planes) {
869 case 1:
870 adp->va_line_width = info->vi_width/8;
871 break;
872 case 2:
873 adp->va_line_width = info->vi_width/4;
874 break;
875 case 4:
876 adp->va_line_width = info->vi_width/2;
877 break;
878 case 8:
879 default: /* shouldn't happen */
880 adp->va_line_width = info->vi_width;
881 break;
882 }
883 } else {
884 adp->va_line_width = info->vi_width;
885 }
886 adp->va_disp_start.x = 0;
887 adp->va_disp_start.y = 0;
888 bcopy(info, &adp->va_info, sizeof(adp->va_info));
889 }
890
891 #if !defined(VGA_NO_BIOS) && !defined(VGA_NO_MODE_CHANGE)
892 /* compare two parameter table entries */
893 static int
894 comp_adpregs(u_char *buf1, u_char *buf2)
895 {
896 static struct {
897 u_char mask;
898 } params[V_MODE_PARAM_SIZE] = {
899 {0xff}, {0x00}, {0xff}, /* COLS}, ROWS}, POINTS */
900 {0x00}, {0x00}, /* page length */
901 {0xfe}, {0xff}, {0xff}, {0xff}, /* sequencer registers */
902 {0xf3}, /* misc register */
903 {0xff}, {0xff}, {0xff}, {0x7f}, {0xff}, /* CRTC */
904 {0xff}, {0xff}, {0xff}, {0x7f}, {0xff},
905 {0x00}, {0x00}, {0x00}, {0x00}, {0x00},
906 {0x00}, {0xff}, {0x7f}, {0xff}, {0xff},
907 {0x7f}, {0xff}, {0xff}, {0xef}, {0xff},
908 {0xff}, {0xff}, {0xff}, {0xff}, {0xff}, /* attribute controller regs */
909 {0xff}, {0xff}, {0xff}, {0xff}, {0xff},
910 {0xff}, {0xff}, {0xff}, {0xff}, {0xff},
911 {0xff}, {0xff}, {0xff}, {0xff}, {0xf0},
912 {0xff}, {0xff}, {0xff}, {0xff}, {0xff}, /* GDC register */
913 {0xff}, {0xff}, {0xff}, {0xff},
914 };
915 int identical = TRUE;
916 int i;
917
918 if ((buf1 == NULL) || (buf2 == NULL))
919 return COMP_DIFFERENT;
920
921 for (i = 0; i < sizeof(params)/sizeof(params[0]); ++i) {
922 if (params[i].mask == 0) /* don't care */
923 continue;
924 if ((buf1[i] & params[i].mask) != (buf2[i] & params[i].mask))
925 return COMP_DIFFERENT;
926 if (buf1[i] != buf2[i])
927 identical = FALSE;
928 }
929 return (identical) ? COMP_IDENTICAL : COMP_SIMILAR;
930 }
931 #endif /* !VGA_NO_BIOS && !VGA_NO_MODE_CHANGE */
932
933 /* probe video adapters and return the number of detected adapters */
934 static int
935 probe_adapters(void)
936 {
937 video_adapter_t *adp;
938 video_info_t info;
939 #if !defined(VGA_NO_BIOS) && !defined(VGA_NO_MODE_CHANGE)
940 u_char *mp;
941 #endif
942 int i;
943
944 /* do this test only once */
945 if (vga_init_done)
946 return biosadapters;
947 vga_init_done = TRUE;
948
949 /*
950 * Locate display adapters.
951 * The AT architecture supports upto two adapters. `syscons' allows
952 * the following combinations of adapters:
953 * 1) MDA + CGA
954 * 2) MDA + EGA/VGA color
955 * 3) CGA + EGA/VGA mono
956 * Note that `syscons' doesn't bother with MCGA as it is only
957 * avaiable for low end PS/2 models which has 80286 or earlier CPUs,
958 * thus, they are not running FreeBSD!
959 * When there are two adapaters in the system, one becomes `primary'
960 * and the other `secondary'. The EGA adapter has a set of DIP
961 * switches on board for this information and the EGA BIOS copies
962 * it in the BIOS data area BIOSDATA_VIDEOSWITCH (40:88).
963 * The VGA BIOS has more sophisticated mechanism and has this
964 * information in BIOSDATA_DCCINDEX (40:8a), but it also maintains
965 * compatibility with the EGA BIOS by updating BIOSDATA_VIDEOSWITCH.
966 */
967
968 /*
969 * Check rtc and BIOS data area.
970 * XXX: we don't use BIOSDATA_EQUIPMENT, since it is not a dead
971 * copy of RTC_EQUIPMENT. Bits 4 and 5 of ETC_EQUIPMENT are
972 * zeros for EGA and VGA. However, the EGA/VGA BIOS sets
973 * these bits in BIOSDATA_EQUIPMENT according to the monitor
974 * type detected.
975 */
976 #ifndef VGA_NO_BIOS
977 if (*(u_int32_t *)BIOS_PADDRTOVADDR(0x4a8)) {
978 /* EGA/VGA BIOS is present */
979 fill_adapter_param(readb(BIOS_PADDRTOVADDR(0x488)) & 0x0f,
980 biosadapter);
981 } else {
982 switch ((rtcin(RTC_EQUIPMENT) >> 4) & 3) { /* bit 4 and 5 */
983 case 0:
984 /* EGA/VGA: shouldn't be happening */
985 fill_adapter_param(readb(BIOS_PADDRTOVADDR(0x488)) & 0x0f,
986 biosadapter);
987 break;
988 case 1:
989 /* CGA 40x25 */
990 /* FIXME: switch to the 80x25 mode? XXX */
991 biosadapter[V_ADP_PRIMARY] = adapter_init_value[DCC_CGA40];
992 biosadapter[V_ADP_SECONDARY] = adapter_init_value[DCC_MONO];
993 break;
994 case 2:
995 /* CGA 80x25 */
996 biosadapter[V_ADP_PRIMARY] = adapter_init_value[DCC_CGA80];
997 biosadapter[V_ADP_SECONDARY] = adapter_init_value[DCC_MONO];
998 break;
999 case 3:
1000 /* MDA */
1001 biosadapter[V_ADP_PRIMARY] = adapter_init_value[DCC_MONO];
1002 biosadapter[V_ADP_SECONDARY] = adapter_init_value[DCC_CGA80];
1003 break;
1004 }
1005 }
1006 #else
1007 /* assume EGA/VGA? XXX */
1008 biosadapter[V_ADP_PRIMARY] = adapter_init_value[DCC_EGA80];
1009 biosadapter[V_ADP_SECONDARY] = adapter_init_value[DCC_MONO];
1010 #endif /* VGA_NO_BIOS */
1011
1012 biosadapters = 0;
1013 if (verify_adapter(&biosadapter[V_ADP_SECONDARY]) == 0) {
1014 ++biosadapters;
1015 biosadapter[V_ADP_SECONDARY].va_flags |= V_ADP_PROBED;
1016 biosadapter[V_ADP_SECONDARY].va_mode =
1017 biosadapter[V_ADP_SECONDARY].va_initial_mode =
1018 map_bios_mode_num(biosadapter[V_ADP_SECONDARY].va_type,
1019 biosadapter[V_ADP_SECONDARY].va_flags
1020 & V_ADP_COLOR,
1021 biosadapter[V_ADP_SECONDARY].va_initial_bios_mode);
1022 } else {
1023 biosadapter[V_ADP_SECONDARY].va_type = -1;
1024 }
1025 if (verify_adapter(&biosadapter[V_ADP_PRIMARY]) == 0) {
1026 ++biosadapters;
1027 biosadapter[V_ADP_PRIMARY].va_flags |= V_ADP_PROBED;
1028 #ifndef VGA_NO_BIOS
1029 biosadapter[V_ADP_PRIMARY].va_initial_bios_mode =
1030 readb(BIOS_PADDRTOVADDR(0x449));
1031 #else
1032 biosadapter[V_ADP_PRIMARY].va_initial_bios_mode = 3; /* XXX */
1033 #endif
1034 biosadapter[V_ADP_PRIMARY].va_mode =
1035 biosadapter[V_ADP_PRIMARY].va_initial_mode =
1036 map_bios_mode_num(biosadapter[V_ADP_PRIMARY].va_type,
1037 biosadapter[V_ADP_PRIMARY].va_flags & V_ADP_COLOR,
1038 biosadapter[V_ADP_PRIMARY].va_initial_bios_mode);
1039 } else {
1040 biosadapter[V_ADP_PRIMARY] = biosadapter[V_ADP_SECONDARY];
1041 biosadapter[V_ADP_SECONDARY].va_type = -1;
1042 }
1043 if (biosadapters == 0)
1044 return biosadapters;
1045 biosadapter[V_ADP_PRIMARY].va_unit = V_ADP_PRIMARY;
1046 biosadapter[V_ADP_SECONDARY].va_unit = V_ADP_SECONDARY;
1047
1048 #if 0 /* we don't need these... */
1049 fb_init_struct(&biosadapter[V_ADP_PRIMARY], ...);
1050 fb_init_struct(&biosadapter[V_ADP_SECONDARY], ...);
1051 #endif
1052
1053 #ifdef notyet
1054 /*
1055 * We cannot have two video adapter of the same type; there must be
1056 * only one of color or mono adapter, or one each of them.
1057 */
1058 if (biosadapters > 1) {
1059 if (!((biosadapter[0].va_flags ^ biosadapter[1].va_flags)
1060 & V_ADP_COLOR))
1061 /* we have two mono or color adapters!! */
1062 return (biosadapters = 0);
1063 }
1064 #endif
1065
1066 /*
1067 * Ensure a zero start address. The registers are w/o
1068 * for old hardware so it's too hard to relocate the active screen
1069 * memory.
1070 * This must be done before vga_save_state() for VGA.
1071 */
1072 outb(biosadapter[V_ADP_PRIMARY].va_crtc_addr, 12);
1073 outb(biosadapter[V_ADP_PRIMARY].va_crtc_addr + 1, 0);
1074 outb(biosadapter[V_ADP_PRIMARY].va_crtc_addr, 13);
1075 outb(biosadapter[V_ADP_PRIMARY].va_crtc_addr + 1, 0);
1076
1077 /* the video mode parameter table in EGA/VGA BIOS */
1078 /* NOTE: there can be only one EGA/VGA, wheather color or mono,
1079 * recognized by the video BIOS.
1080 */
1081 if ((biosadapter[V_ADP_PRIMARY].va_type == KD_EGA) ||
1082 (biosadapter[V_ADP_PRIMARY].va_type == KD_VGA)) {
1083 adp = &biosadapter[V_ADP_PRIMARY];
1084 } else if ((biosadapter[V_ADP_SECONDARY].va_type == KD_EGA) ||
1085 (biosadapter[V_ADP_SECONDARY].va_type == KD_VGA)) {
1086 adp = &biosadapter[V_ADP_SECONDARY];
1087 } else {
1088 adp = NULL;
1089 }
1090 bzero(mode_map, sizeof(mode_map));
1091 if (adp != NULL) {
1092 if (adp->va_type == KD_VGA) {
1093 vga_save_state(adp, &adpstate, sizeof(adpstate));
1094 #if defined(VGA_NO_BIOS) || defined(VGA_NO_MODE_CHANGE)
1095 mode_map[adp->va_initial_mode] = adpstate.regs;
1096 rows_offset = 1;
1097 #else /* VGA_NO_BIOS || VGA_NO_MODE_CHANGE */
1098 if (video_mode_ptr == NULL) {
1099 mode_map[adp->va_initial_mode] = adpstate.regs;
1100 rows_offset = 1;
1101 } else {
1102 /* discard the table if we are not familiar with it... */
1103 map_mode_table(mode_map, video_mode_ptr, M_VGA_CG320 + 1);
1104 mp = get_mode_param(adp->va_initial_mode);
1105 if (mp != NULL)
1106 bcopy(mp, adpstate2.regs, sizeof(adpstate2.regs));
1107 switch (comp_adpregs(adpstate.regs, mp)) {
1108 case COMP_IDENTICAL:
1109 /*
1110 * OK, this parameter table looks reasonably familiar
1111 * to us...
1112 */
1113 /*
1114 * This is a kludge for Toshiba DynaBook SS433
1115 * whose BIOS video mode table entry has the actual #
1116 * of rows at the offset 1; BIOSes from other
1117 * manufacturers store the # of rows - 1 there. XXX
1118 */
1119 rows_offset = adpstate.regs[1] + 1 - mp[1];
1120 break;
1121
1122 case COMP_SIMILAR:
1123 /*
1124 * Not exactly the same, but similar enough to be
1125 * trusted. However, use the saved register values
1126 * for the initial mode and other modes which are
1127 * based on the initial mode.
1128 */
1129 mode_map[adp->va_initial_mode] = adpstate.regs;
1130 rows_offset = adpstate.regs[1] + 1 - mp[1];
1131 adpstate.regs[1] -= rows_offset - 1;
1132 break;
1133
1134 case COMP_DIFFERENT:
1135 default:
1136 /*
1137 * Don't use the paramter table in BIOS. It doesn't
1138 * look familiar to us. Video mode switching is allowed
1139 * only if the new mode is the same as or based on
1140 * the initial mode.
1141 */
1142 video_mode_ptr = NULL;
1143 bzero(mode_map, sizeof(mode_map));
1144 mode_map[adp->va_initial_mode] = adpstate.regs;
1145 rows_offset = 1;
1146 break;
1147 }
1148 }
1149 #endif /* VGA_NO_BIOS || VGA_NO_MODE_CHANGE */
1150
1151 #ifndef VGA_NO_MODE_CHANGE
1152 adp->va_flags |= V_ADP_MODECHANGE;
1153 #endif
1154 #ifndef VGA_NO_FONT_LOADING
1155 adp->va_flags |= V_ADP_FONT;
1156 #endif
1157 } else if (adp->va_type == KD_EGA) {
1158 #if defined(VGA_NO_BIOS) || defined(VGA_NO_MODE_CHANGE)
1159 rows_offset = 1;
1160 #else /* VGA_NO_BIOS || VGA_NO_MODE_CHANGE */
1161 if (video_mode_ptr == NULL) {
1162 rows_offset = 1;
1163 } else {
1164 map_mode_table(mode_map, video_mode_ptr, M_ENH_C80x25 + 1);
1165 /* XXX how can one validate the EGA table... */
1166 mp = get_mode_param(adp->va_initial_mode);
1167 if (mp != NULL) {
1168 adp->va_flags |= V_ADP_MODECHANGE;
1169 #ifndef VGA_NO_FONT_LOADING
1170 adp->va_flags |= V_ADP_FONT;
1171 #endif
1172 rows_offset = 1;
1173 } else {
1174 /*
1175 * This is serious. We will not be able to switch video
1176 * modes at all...
1177 */
1178 video_mode_ptr = NULL;
1179 bzero(mode_map, sizeof(mode_map));
1180 rows_offset = 1;
1181 }
1182 }
1183 #endif /* VGA_NO_BIOS || VGA_NO_MODE_CHANGE */
1184 }
1185 }
1186
1187 /* remove conflicting modes if we have more than one adapter */
1188 if (biosadapters > 0) {
1189 for (i = 0; i < biosadapters; ++i) {
1190 if (!(biosadapter[i].va_flags & V_ADP_MODECHANGE))
1191 continue;
1192 clear_mode_map(&biosadapter[i], mode_map, M_VGA_CG320 + 1,
1193 (biosadapter[i].va_flags & V_ADP_COLOR) ?
1194 V_INFO_COLOR : 0);
1195 if ((biosadapter[i].va_type == KD_VGA)
1196 || (biosadapter[i].va_type == KD_EGA)) {
1197 biosadapter[i].va_io_base =
1198 (biosadapter[i].va_flags & V_ADP_COLOR) ?
1199 IO_VGA : IO_MDA;
1200 biosadapter[i].va_io_size = 32;
1201 }
1202 }
1203 }
1204
1205 /* buffer address */
1206 vga_get_info(&biosadapter[V_ADP_PRIMARY],
1207 biosadapter[V_ADP_PRIMARY].va_initial_mode, &info);
1208 info.vi_flags &= ~V_INFO_LINEAR; /* XXX */
1209 update_adapter_info(&biosadapter[V_ADP_PRIMARY], &info);
1210
1211 if (biosadapters > 1) {
1212 vga_get_info(&biosadapter[V_ADP_SECONDARY],
1213 biosadapter[V_ADP_SECONDARY].va_initial_mode, &info);
1214 info.vi_flags &= ~V_INFO_LINEAR; /* XXX */
1215 update_adapter_info(&biosadapter[V_ADP_SECONDARY], &info);
1216 }
1217
1218 /*
1219 * XXX: we should verify the following values for the primary adapter...
1220 * crtc I/O port address: *(u_int16_t *)BIOS_PADDRTOVADDR(0x463);
1221 * color/mono display: (*(u_int8_t *)BIOS_PADDRTOVADDR(0x487) & 0x02)
1222 * ? 0 : V_ADP_COLOR;
1223 * columns: *(u_int8_t *)BIOS_PADDRTOVADDR(0x44a);
1224 * rows: *(u_int8_t *)BIOS_PADDRTOVADDR(0x484);
1225 * font size: *(u_int8_t *)BIOS_PADDRTOVADDR(0x485);
1226 * buffer size: *(u_int16_t *)BIOS_PADDRTOVADDR(0x44c);
1227 */
1228
1229 return biosadapters;
1230 }
1231
1232 /* set the scan line length in pixel */
1233 static int
1234 set_line_length(video_adapter_t *adp, int pixel)
1235 {
1236 u_char *mp;
1237 int ppw; /* pixels per word */
1238 int bpl; /* bytes per line */
1239 int count;
1240
1241 if ((adp->va_type != KD_VGA) && (adp->va_type != KD_EGA))
1242 return ENODEV;
1243 mp = get_mode_param(adp->va_mode);
1244 if (mp == NULL)
1245 return EINVAL;
1246
1247 switch (adp->va_info.vi_mem_model) {
1248 case V_INFO_MM_PLANAR:
1249 ppw = 16/(adp->va_info.vi_depth/adp->va_info.vi_planes);
1250 count = (pixel + ppw - 1)/ppw/2;
1251 bpl = ((pixel + ppw - 1)/ppw/2)*4;
1252 break;
1253 case V_INFO_MM_PACKED:
1254 count = (pixel + 7)/8;
1255 bpl = ((pixel + 7)/8)*8;
1256 break;
1257 case V_INFO_MM_TEXT:
1258 count = (pixel + 7)/8; /* columns */
1259 bpl = (pixel + 7)/8; /* columns */
1260 break;
1261 default:
1262 return ENODEV;
1263 }
1264
1265 if (mp[10 + 0x17] & 0x40) /* CRTC mode control reg */
1266 count *= 2; /* byte mode */
1267 outb(adp->va_crtc_addr, 0x13);
1268 outb(adp->va_crtc_addr + 1, count);
1269 adp->va_line_width = bpl;
1270
1271 return 0;
1272 }
1273
1274 static int
1275 set_display_start(video_adapter_t *adp, int x, int y)
1276 {
1277 int off; /* byte offset (graphics mode)/word offset (text mode) */
1278 int poff; /* pixel offset */
1279 int roff; /* row offset */
1280 int ppb; /* pixels per byte */
1281
1282 if ((adp->va_type != KD_VGA) && (adp->va_type != KD_EGA))
1283 x &= ~7;
1284 if (adp->va_info.vi_flags & V_INFO_GRAPHICS) {
1285 ppb = 8/(adp->va_info.vi_depth/adp->va_info.vi_planes);
1286 off = y*adp->va_line_width + x/ppb;
1287 roff = 0;
1288 poff = x%ppb;
1289 } else {
1290 if ((adp->va_type == KD_VGA) || (adp->va_type == KD_EGA)) {
1291 outb(TSIDX, 1);
1292 if (inb(TSREG) & 1)
1293 ppb = 9;
1294 else
1295 ppb = 8;
1296 } else {
1297 ppb = 8;
1298 }
1299 off = y/adp->va_info.vi_cheight*adp->va_line_width + x/ppb;
1300 roff = y%adp->va_info.vi_cheight;
1301 /* FIXME: is this correct? XXX */
1302 if (ppb == 8)
1303 poff = x%ppb;
1304 else
1305 poff = (x + 8)%ppb;
1306 }
1307
1308 /* start address */
1309 outb(adp->va_crtc_addr, 0xc); /* high */
1310 outb(adp->va_crtc_addr + 1, off >> 8);
1311 outb(adp->va_crtc_addr, 0xd); /* low */
1312 outb(adp->va_crtc_addr + 1, off & 0xff);
1313
1314 /* horizontal pel pan */
1315 if ((adp->va_type == KD_VGA) || (adp->va_type == KD_EGA)) {
1316 inb(adp->va_crtc_addr + 6);
1317 outb(ATC, 0x13 | 0x20);
1318 outb(ATC, poff);
1319 inb(adp->va_crtc_addr + 6);
1320 outb(ATC, 0x20);
1321 }
1322
1323 /* preset raw scan */
1324 outb(adp->va_crtc_addr, 8);
1325 outb(adp->va_crtc_addr + 1, roff);
1326
1327 adp->va_disp_start.x = x;
1328 adp->va_disp_start.y = y;
1329 return 0;
1330 }
1331
1332 #ifndef VGA_NO_MODE_CHANGE
1333 #if defined(__i386__) || defined(__amd64__) /* XXX */
1334 static void
1335 fill(int val, void *d, size_t size)
1336 {
1337 u_char *p = d;
1338
1339 while (size-- > 0)
1340 *p++ = val;
1341 }
1342 #endif /* __i386__ */
1343
1344 static void
1345 filll_io(int val, vm_offset_t d, size_t size)
1346 {
1347 while (size-- > 0) {
1348 writel(d, val);
1349 d += sizeof(u_int32_t);
1350 }
1351 }
1352 #endif /* !VGA_NO_MODE_CHANGE */
1353
1354 /* entry points */
1355
1356 #if 0
1357 static int
1358 vga_nop(void)
1359 {
1360 return 0;
1361 }
1362 #endif
1363
1364 static int
1365 vga_error(void)
1366 {
1367 return ENODEV;
1368 }
1369
1370 static int
1371 vga_probe(int unit, video_adapter_t **adpp, void *arg, int flags)
1372 {
1373 probe_adapters();
1374 if (unit >= biosadapters)
1375 return ENXIO;
1376
1377 *adpp = &biosadapter[unit];
1378
1379 return 0;
1380 }
1381
1382 static int
1383 vga_init(int unit, video_adapter_t *adp, int flags)
1384 {
1385 if ((unit >= biosadapters) || (adp == NULL) || !probe_done(adp))
1386 return ENXIO;
1387
1388 if (!init_done(adp)) {
1389 /* nothing to do really... */
1390 adp->va_flags |= V_ADP_INITIALIZED;
1391 }
1392
1393 if (!config_done(adp)) {
1394 if (vid_register(adp) < 0)
1395 return ENXIO;
1396 adp->va_flags |= V_ADP_REGISTERED;
1397 }
1398 if (vga_sub_configure != NULL)
1399 (*vga_sub_configure)(0);
1400
1401 return 0;
1402 }
1403
1404 /*
1405 * get_info():
1406 * Return the video_info structure of the requested video mode.
1407 *
1408 * all adapters
1409 */
1410 static int
1411 vga_get_info(video_adapter_t *adp, int mode, video_info_t *info)
1412 {
1413 int i;
1414
1415 if (!vga_init_done)
1416 return ENXIO;
1417
1418 mode = map_gen_mode_num(adp->va_type, adp->va_flags & V_ADP_COLOR, mode);
1419 #ifndef VGA_NO_MODE_CHANGE
1420 if (adp->va_flags & V_ADP_MODECHANGE) {
1421 /*
1422 * If the parameter table entry for this mode is not found,
1423 * the mode is not supported...
1424 */
1425 if (get_mode_param(mode) == NULL)
1426 return EINVAL;
1427 } else
1428 #endif /* VGA_NO_MODE_CHANGE */
1429 {
1430 /*
1431 * Even if we don't support video mode switching on this adapter,
1432 * the information on the initial (thus current) video mode
1433 * should be made available.
1434 */
1435 if (mode != adp->va_initial_mode)
1436 return EINVAL;
1437 }
1438
1439 for (i = 0; bios_vmode[i].vi_mode != EOT; ++i) {
1440 if (bios_vmode[i].vi_mode == NA)
1441 continue;
1442 if (mode == bios_vmode[i].vi_mode) {
1443 *info = bios_vmode[i];
1444 /* XXX */
1445 info->vi_buffer_size = info->vi_window_size*info->vi_planes;
1446 return 0;
1447 }
1448 }
1449 return EINVAL;
1450 }
1451
1452 /*
1453 * query_mode():
1454 * Find a video mode matching the requested parameters.
1455 * Fields filled with 0 are considered "don't care" fields and
1456 * match any modes.
1457 *
1458 * all adapters
1459 */
1460 static int
1461 vga_query_mode(video_adapter_t *adp, video_info_t *info)
1462 {
1463 int i;
1464
1465 if (!vga_init_done)
1466 return ENXIO;
1467
1468 for (i = 0; bios_vmode[i].vi_mode != EOT; ++i) {
1469 if (bios_vmode[i].vi_mode == NA)
1470 continue;
1471
1472 if ((info->vi_width != 0)
1473 && (info->vi_width != bios_vmode[i].vi_width))
1474 continue;
1475 if ((info->vi_height != 0)
1476 && (info->vi_height != bios_vmode[i].vi_height))
1477 continue;
1478 if ((info->vi_cwidth != 0)
1479 && (info->vi_cwidth != bios_vmode[i].vi_cwidth))
1480 continue;
1481 if ((info->vi_cheight != 0)
1482 && (info->vi_cheight != bios_vmode[i].vi_cheight))
1483 continue;
1484 if ((info->vi_depth != 0)
1485 && (info->vi_depth != bios_vmode[i].vi_depth))
1486 continue;
1487 if ((info->vi_planes != 0)
1488 && (info->vi_planes != bios_vmode[i].vi_planes))
1489 continue;
1490 /* XXX: should check pixel format, memory model */
1491 if ((info->vi_flags != 0)
1492 && (info->vi_flags != bios_vmode[i].vi_flags))
1493 continue;
1494
1495 /* verify if this mode is supported on this adapter */
1496 if (vga_get_info(adp, bios_vmode[i].vi_mode, info))
1497 continue;
1498 return 0;
1499 }
1500 return ENODEV;
1501 }
1502
1503 /*
1504 * set_mode():
1505 * Change the video mode.
1506 *
1507 * EGA/VGA
1508 */
1509
1510 #ifndef VGA_NO_MODE_CHANGE
1511 #ifdef VGA_WIDTH90
1512 static void
1513 set_width90(adp_state_t *params)
1514 {
1515 /*
1516 * Based on code submitted by Kelly Yancey (kbyanc@freedomnet.com)
1517 * and alexv@sui.gda.itesm.mx.
1518 */
1519 params->regs[5] |= 1; /* toggle 8 pixel wide fonts */
1520 params->regs[10+0x0] = 0x6b;
1521 params->regs[10+0x1] = 0x59;
1522 params->regs[10+0x2] = 0x5a;
1523 params->regs[10+0x3] = 0x8e;
1524 params->regs[10+0x4] = 0x5e;
1525 params->regs[10+0x5] = 0x8a;
1526 params->regs[10+0x13] = 45;
1527 params->regs[35+0x13] = 0;
1528 }
1529 #endif /* VGA_WIDTH90 */
1530 #endif /* !VGA_NO_MODE_CHANGE */
1531
1532 static int
1533 vga_set_mode(video_adapter_t *adp, int mode)
1534 {
1535 #ifndef VGA_NO_MODE_CHANGE
1536 video_info_t info;
1537 adp_state_t params;
1538
1539 prologue(adp, V_ADP_MODECHANGE, ENODEV);
1540
1541 mode = map_gen_mode_num(adp->va_type,
1542 adp->va_flags & V_ADP_COLOR, mode);
1543 if (vga_get_info(adp, mode, &info))
1544 return EINVAL;
1545
1546 #if VGA_DEBUG > 1
1547 printf("vga_set_mode(): setting mode %d\n", mode);
1548 #endif
1549
1550 params.sig = V_STATE_SIG;
1551 bcopy(get_mode_param(mode), params.regs, sizeof(params.regs));
1552
1553 switch (mode) {
1554 #ifdef VGA_WIDTH90
1555 case M_VGA_C90x60: case M_VGA_M90x60:
1556 set_width90(¶ms);
1557 /* FALLTHROUGH */
1558 #endif
1559 case M_VGA_C80x60: case M_VGA_M80x60:
1560 params.regs[2] = 0x08;
1561 params.regs[19] = 0x47;
1562 goto special_480l;
1563
1564 #ifdef VGA_WIDTH90
1565 case M_VGA_C90x30: case M_VGA_M90x30:
1566 set_width90(¶ms);
1567 /* FALLTHROUGH */
1568 #endif
1569 case M_VGA_C80x30: case M_VGA_M80x30:
1570 params.regs[19] = 0x4f;
1571 special_480l:
1572 params.regs[9] |= 0xc0;
1573 params.regs[16] = 0x08;
1574 params.regs[17] = 0x3e;
1575 params.regs[26] = 0xea;
1576 params.regs[28] = 0xdf;
1577 params.regs[31] = 0xe7;
1578 params.regs[32] = 0x04;
1579 goto setup_mode;
1580
1581 #ifdef VGA_WIDTH90
1582 case M_VGA_C90x43: case M_VGA_M90x43:
1583 set_width90(¶ms);
1584 /* FALLTHROUGH */
1585 #endif
1586 case M_ENH_C80x43: case M_ENH_B80x43:
1587 params.regs[28] = 87;
1588 goto special_80x50;
1589
1590 #ifdef VGA_WIDTH90
1591 case M_VGA_C90x50: case M_VGA_M90x50:
1592 set_width90(¶ms);
1593 /* FALLTHROUGH */
1594 #endif
1595 case M_VGA_C80x50: case M_VGA_M80x50:
1596 special_80x50:
1597 params.regs[2] = 8;
1598 params.regs[19] = 7;
1599 goto setup_mode;
1600
1601 #ifdef VGA_WIDTH90
1602 case M_VGA_C90x25: case M_VGA_M90x25:
1603 set_width90(¶ms);
1604 /* FALLTHROUGH */
1605 #endif
1606 case M_VGA_C40x25: case M_VGA_C80x25:
1607 case M_VGA_M80x25:
1608 case M_B40x25: case M_C40x25:
1609 case M_B80x25: case M_C80x25:
1610 case M_ENH_B40x25: case M_ENH_C40x25:
1611 case M_ENH_B80x25: case M_ENH_C80x25:
1612 case M_EGAMONO80x25:
1613
1614 setup_mode:
1615 vga_load_state(adp, ¶ms);
1616 break;
1617
1618 case M_VGA_MODEX:
1619 /* "unchain" the VGA mode */
1620 params.regs[5-1+0x04] &= 0xf7;
1621 params.regs[5-1+0x04] |= 0x04;
1622 /* turn off doubleword mode */
1623 params.regs[10+0x14] &= 0xbf;
1624 /* turn off word addressing */
1625 params.regs[10+0x17] |= 0x40;
1626 /* set logical screen width */
1627 params.regs[10+0x13] = 80;
1628 /* set 240 lines */
1629 params.regs[10+0x11] = 0x2c;
1630 params.regs[10+0x06] = 0x0d;
1631 params.regs[10+0x07] = 0x3e;
1632 params.regs[10+0x10] = 0xea;
1633 params.regs[10+0x11] = 0xac;
1634 params.regs[10+0x12] = 0xdf;
1635 params.regs[10+0x15] = 0xe7;
1636 params.regs[10+0x16] = 0x06;
1637 /* set vertical sync polarity to reflect aspect ratio */
1638 params.regs[9] = 0xe3;
1639 goto setup_grmode;
1640
1641 case M_BG320: case M_CG320: case M_BG640:
1642 case M_CG320_D: case M_CG640_E:
1643 case M_CG640x350: case M_ENH_CG640:
1644 case M_BG640x480: case M_CG640x480: case M_VGA_CG320:
1645
1646 setup_grmode:
1647 vga_load_state(adp, ¶ms);
1648 break;
1649
1650 default:
1651 return EINVAL;
1652 }
1653
1654 adp->va_mode = mode;
1655 info.vi_flags &= ~V_INFO_LINEAR; /* XXX */
1656 update_adapter_info(adp, &info);
1657
1658 /* move hardware cursor out of the way */
1659 vidd_set_hw_cursor(adp, -1, -1);
1660
1661 return 0;
1662 #else /* VGA_NO_MODE_CHANGE */
1663 return ENODEV;
1664 #endif /* VGA_NO_MODE_CHANGE */
1665 }
1666
1667 #ifndef VGA_NO_FONT_LOADING
1668
1669 static void
1670 set_font_mode(video_adapter_t *adp, u_char *buf)
1671 {
1672 u_char *mp;
1673 int s;
1674
1675 s = splhigh();
1676
1677 /* save register values */
1678 if (adp->va_type == KD_VGA) {
1679 outb(TSIDX, 0x02); buf[0] = inb(TSREG);
1680 outb(TSIDX, 0x04); buf[1] = inb(TSREG);
1681 outb(GDCIDX, 0x04); buf[2] = inb(GDCREG);
1682 outb(GDCIDX, 0x05); buf[3] = inb(GDCREG);
1683 outb(GDCIDX, 0x06); buf[4] = inb(GDCREG);
1684 inb(adp->va_crtc_addr + 6);
1685 outb(ATC, 0x10); buf[5] = inb(ATC + 1);
1686 } else /* if (adp->va_type == KD_EGA) */ {
1687 /*
1688 * EGA cannot be read; copy parameters from the mode parameter
1689 * table.
1690 */
1691 mp = get_mode_param(adp->va_mode);
1692 buf[0] = mp[5 + 0x02 - 1];
1693 buf[1] = mp[5 + 0x04 - 1];
1694 buf[2] = mp[55 + 0x04];
1695 buf[3] = mp[55 + 0x05];
1696 buf[4] = mp[55 + 0x06];
1697 buf[5] = mp[35 + 0x10];
1698 }
1699
1700 /* setup vga for loading fonts */
1701 inb(adp->va_crtc_addr + 6); /* reset flip-flop */
1702 outb(ATC, 0x10); outb(ATC, buf[5] & ~0x01);
1703 inb(adp->va_crtc_addr + 6); /* reset flip-flop */
1704 outb(ATC, 0x20); /* enable palette */
1705
1706 #ifdef VGA_SLOW_IOACCESS
1707 #ifdef VGA_ALT_SEQACCESS
1708 outb(TSIDX, 0x00); outb(TSREG, 0x01);
1709 #endif
1710 outb(TSIDX, 0x02); outb(TSREG, 0x04);
1711 outb(TSIDX, 0x04); outb(TSREG, 0x07);
1712 #ifdef VGA_ALT_SEQACCESS
1713 outb(TSIDX, 0x00); outb(TSREG, 0x03);
1714 #endif
1715 outb(GDCIDX, 0x04); outb(GDCREG, 0x02);
1716 outb(GDCIDX, 0x05); outb(GDCREG, 0x00);
1717 outb(GDCIDX, 0x06); outb(GDCREG, 0x04);
1718 #else /* VGA_SLOW_IOACCESS */
1719 #ifdef VGA_ALT_SEQACCESS
1720 outw(TSIDX, 0x0100);
1721 #endif
1722 outw(TSIDX, 0x0402);
1723 outw(TSIDX, 0x0704);
1724 #ifdef VGA_ALT_SEQACCESS
1725 outw(TSIDX, 0x0300);
1726 #endif
1727 outw(GDCIDX, 0x0204);
1728 outw(GDCIDX, 0x0005);
1729 outw(GDCIDX, 0x0406); /* addr = a0000, 64kb */
1730 #endif /* VGA_SLOW_IOACCESS */
1731
1732 splx(s);
1733 }
1734
1735 static void
1736 set_normal_mode(video_adapter_t *adp, u_char *buf)
1737 {
1738 int s;
1739
1740 s = splhigh();
1741
1742 /* setup vga for normal operation mode again */
1743 inb(adp->va_crtc_addr + 6); /* reset flip-flop */
1744 outb(ATC, 0x10); outb(ATC, buf[5]);
1745 inb(adp->va_crtc_addr + 6); /* reset flip-flop */
1746 outb(ATC, 0x20); /* enable palette */
1747
1748 #ifdef VGA_SLOW_IOACCESS
1749 #ifdef VGA_ALT_SEQACCESS
1750 outb(TSIDX, 0x00); outb(TSREG, 0x01);
1751 #endif
1752 outb(TSIDX, 0x02); outb(TSREG, buf[0]);
1753 outb(TSIDX, 0x04); outb(TSREG, buf[1]);
1754 #ifdef VGA_ALT_SEQACCESS
1755 outb(TSIDX, 0x00); outb(TSREG, 0x03);
1756 #endif
1757 outb(GDCIDX, 0x04); outb(GDCREG, buf[2]);
1758 outb(GDCIDX, 0x05); outb(GDCREG, buf[3]);
1759 if (adp->va_crtc_addr == MONO_CRTC) {
1760 outb(GDCIDX, 0x06); outb(GDCREG,(buf[4] & 0x03) | 0x08);
1761 } else {
1762 outb(GDCIDX, 0x06); outb(GDCREG,(buf[4] & 0x03) | 0x0c);
1763 }
1764 #else /* VGA_SLOW_IOACCESS */
1765 #ifdef VGA_ALT_SEQACCESS
1766 outw(TSIDX, 0x0100);
1767 #endif
1768 outw(TSIDX, 0x0002 | (buf[0] << 8));
1769 outw(TSIDX, 0x0004 | (buf[1] << 8));
1770 #ifdef VGA_ALT_SEQACCESS
1771 outw(TSIDX, 0x0300);
1772 #endif
1773 outw(GDCIDX, 0x0004 | (buf[2] << 8));
1774 outw(GDCIDX, 0x0005 | (buf[3] << 8));
1775 if (adp->va_crtc_addr == MONO_CRTC)
1776 outw(GDCIDX, 0x0006 | (((buf[4] & 0x03) | 0x08)<<8));
1777 else
1778 outw(GDCIDX, 0x0006 | (((buf[4] & 0x03) | 0x0c)<<8));
1779 #endif /* VGA_SLOW_IOACCESS */
1780
1781 splx(s);
1782 }
1783
1784 #endif /* VGA_NO_FONT_LOADING */
1785
1786 /*
1787 * save_font():
1788 * Read the font data in the requested font page from the video adapter.
1789 *
1790 * EGA/VGA
1791 */
1792 static int
1793 vga_save_font(video_adapter_t *adp, int page, int fontsize, int fontwidth,
1794 u_char *data, int ch, int count)
1795 {
1796 #ifndef VGA_NO_FONT_LOADING
1797 u_char buf[PARAM_BUFSIZE];
1798 vm_offset_t segment;
1799 int c;
1800 #ifdef VGA_ALT_SEQACCESS
1801 int s;
1802 u_char val = 0;
1803 #endif
1804
1805 prologue(adp, V_ADP_FONT, ENODEV);
1806
1807 if (fontsize < 14) {
1808 /* FONT_8 */
1809 fontsize = 8;
1810 } else if (fontsize >= 32) {
1811 fontsize = 32;
1812 } else if (fontsize >= 16) {
1813 /* FONT_16 */
1814 fontsize = 16;
1815 } else {
1816 /* FONT_14 */
1817 fontsize = 14;
1818 }
1819
1820 if (page < 0 || page >= 8 || fontwidth != 8)
1821 return EINVAL;
1822 segment = FONT_BUF + 0x4000*page;
1823 if (page > 3)
1824 segment -= 0xe000;
1825
1826 #ifdef VGA_ALT_SEQACCESS
1827 if (adp->va_type == KD_VGA) { /* what about EGA? XXX */
1828 s = splhigh();
1829 outb(TSIDX, 0x00); outb(TSREG, 0x01);
1830 outb(TSIDX, 0x01); val = inb(TSREG); /* disable screen */
1831 outb(TSIDX, 0x01); outb(TSREG, val | 0x20);
1832 outb(TSIDX, 0x00); outb(TSREG, 0x03);
1833 splx(s);
1834 }
1835 #endif
1836
1837 set_font_mode(adp, buf);
1838 if (fontsize == 32) {
1839 bcopy_fromio((uintptr_t)segment + ch*32, data, fontsize*count);
1840 } else {
1841 for (c = ch; count > 0; ++c, --count) {
1842 bcopy_fromio((uintptr_t)segment + c*32, data, fontsize);
1843 data += fontsize;
1844 }
1845 }
1846 set_normal_mode(adp, buf);
1847
1848 #ifdef VGA_ALT_SEQACCESS
1849 if (adp->va_type == KD_VGA) {
1850 s = splhigh();
1851 outb(TSIDX, 0x00); outb(TSREG, 0x01);
1852 outb(TSIDX, 0x01); outb(TSREG, val & 0xdf); /* enable screen */
1853 outb(TSIDX, 0x00); outb(TSREG, 0x03);
1854 splx(s);
1855 }
1856 #endif
1857
1858 return 0;
1859 #else /* VGA_NO_FONT_LOADING */
1860 return ENODEV;
1861 #endif /* VGA_NO_FONT_LOADING */
1862 }
1863
1864 /*
1865 * load_font():
1866 * Set the font data in the requested font page.
1867 * NOTE: it appears that some recent video adapters do not support
1868 * the font page other than 0... XXX
1869 *
1870 * EGA/VGA
1871 */
1872 static int
1873 vga_load_font(video_adapter_t *adp, int page, int fontsize, int fontwidth,
1874 u_char *data, int ch, int count)
1875 {
1876 #ifndef VGA_NO_FONT_LOADING
1877 u_char buf[PARAM_BUFSIZE];
1878 vm_offset_t segment;
1879 int c;
1880 #ifdef VGA_ALT_SEQACCESS
1881 int s;
1882 u_char val = 0;
1883 #endif
1884
1885 prologue(adp, V_ADP_FONT, ENODEV);
1886
1887 if (fontsize < 14) {
1888 /* FONT_8 */
1889 fontsize = 8;
1890 } else if (fontsize >= 32) {
1891 fontsize = 32;
1892 } else if (fontsize >= 16) {
1893 /* FONT_16 */
1894 fontsize = 16;
1895 } else {
1896 /* FONT_14 */
1897 fontsize = 14;
1898 }
1899
1900 if (page < 0 || page >= 8 || fontwidth != 8)
1901 return EINVAL;
1902 segment = FONT_BUF + 0x4000*page;
1903 if (page > 3)
1904 segment -= 0xe000;
1905
1906 #ifdef VGA_ALT_SEQACCESS
1907 if (adp->va_type == KD_VGA) { /* what about EGA? XXX */
1908 s = splhigh();
1909 outb(TSIDX, 0x00); outb(TSREG, 0x01);
1910 outb(TSIDX, 0x01); val = inb(TSREG); /* disable screen */
1911 outb(TSIDX, 0x01); outb(TSREG, val | 0x20);
1912 outb(TSIDX, 0x00); outb(TSREG, 0x03);
1913 splx(s);
1914 }
1915 #endif
1916
1917 set_font_mode(adp, buf);
1918 if (fontsize == 32) {
1919 bcopy_toio(data, (uintptr_t)segment + ch*32, fontsize*count);
1920 } else {
1921 for (c = ch; count > 0; ++c, --count) {
1922 bcopy_toio(data, (uintptr_t)segment + c*32, fontsize);
1923 data += fontsize;
1924 }
1925 }
1926 set_normal_mode(adp, buf);
1927
1928 #ifdef VGA_ALT_SEQACCESS
1929 if (adp->va_type == KD_VGA) {
1930 s = splhigh();
1931 outb(TSIDX, 0x00); outb(TSREG, 0x01);
1932 outb(TSIDX, 0x01); outb(TSREG, val & 0xdf); /* enable screen */
1933 outb(TSIDX, 0x00); outb(TSREG, 0x03);
1934 splx(s);
1935 }
1936 #endif
1937
1938 return 0;
1939 #else /* VGA_NO_FONT_LOADING */
1940 return ENODEV;
1941 #endif /* VGA_NO_FONT_LOADING */
1942 }
1943
1944 /*
1945 * show_font():
1946 * Activate the requested font page.
1947 * NOTE: it appears that some recent video adapters do not support
1948 * the font page other than 0... XXX
1949 *
1950 * EGA/VGA
1951 */
1952 static int
1953 vga_show_font(video_adapter_t *adp, int page)
1954 {
1955 #ifndef VGA_NO_FONT_LOADING
1956 static u_char cg[] = { 0x00, 0x05, 0x0a, 0x0f, 0x30, 0x35, 0x3a, 0x3f };
1957 int s;
1958
1959 prologue(adp, V_ADP_FONT, ENODEV);
1960 if (page < 0 || page >= 8)
1961 return EINVAL;
1962
1963 s = splhigh();
1964 outb(TSIDX, 0x03); outb(TSREG, cg[page]);
1965 splx(s);
1966
1967 return 0;
1968 #else /* VGA_NO_FONT_LOADING */
1969 return ENODEV;
1970 #endif /* VGA_NO_FONT_LOADING */
1971 }
1972
1973 /*
1974 * save_palette():
1975 * Read DAC values. The values have expressed in 8 bits.
1976 *
1977 * VGA
1978 */
1979 static int
1980 vga_save_palette(video_adapter_t *adp, u_char *palette)
1981 {
1982 int bits;
1983 int i;
1984
1985 prologue(adp, V_ADP_PALETTE, ENODEV);
1986
1987 /*
1988 * We store 8 bit values in the palette buffer, while the standard
1989 * VGA has 6 bit DAC .
1990 */
1991 outb(PALRADR, 0x00);
1992 bits = (adp->va_flags & V_ADP_DAC8) != 0 ? 0 : 2;
1993 for (i = 0; i < 256*3; ++i)
1994 palette[i] = inb(PALDATA) << bits;
1995 inb(adp->va_crtc_addr + 6); /* reset flip/flop */
1996 return 0;
1997 }
1998
1999 static int
2000 vga_save_palette2(video_adapter_t *adp, int base, int count,
2001 u_char *r, u_char *g, u_char *b)
2002 {
2003 int bits;
2004 int i;
2005
2006 prologue(adp, V_ADP_PALETTE, ENODEV);
2007
2008 outb(PALRADR, base);
2009 bits = (adp->va_flags & V_ADP_DAC8) != 0 ? 0 : 2;
2010 for (i = 0; i < count; ++i) {
2011 r[i] = inb(PALDATA) << bits;
2012 g[i] = inb(PALDATA) << bits;
2013 b[i] = inb(PALDATA) << bits;
2014 }
2015 inb(adp->va_crtc_addr + 6); /* reset flip/flop */
2016 return 0;
2017 }
2018
2019 /*
2020 * load_palette():
2021 * Set DAC values.
2022 *
2023 * VGA
2024 */
2025 static int
2026 vga_load_palette(video_adapter_t *adp, u_char *palette)
2027 {
2028 int bits;
2029 int i;
2030
2031 prologue(adp, V_ADP_PALETTE, ENODEV);
2032
2033 outb(PIXMASK, 0xff); /* no pixelmask */
2034 outb(PALWADR, 0x00);
2035 bits = (adp->va_flags & V_ADP_DAC8) != 0 ? 0 : 2;
2036 for (i = 0; i < 256*3; ++i)
2037 outb(PALDATA, palette[i] >> bits);
2038 inb(adp->va_crtc_addr + 6); /* reset flip/flop */
2039 outb(ATC, 0x20); /* enable palette */
2040 return 0;
2041 }
2042
2043 static int
2044 vga_load_palette2(video_adapter_t *adp, int base, int count,
2045 u_char *r, u_char *g, u_char *b)
2046 {
2047 int bits;
2048 int i;
2049
2050 prologue(adp, V_ADP_PALETTE, ENODEV);
2051
2052 outb(PIXMASK, 0xff); /* no pixelmask */
2053 outb(PALWADR, base);
2054 bits = (adp->va_flags & V_ADP_DAC8) != 0 ? 0 : 2;
2055 for (i = 0; i < count; ++i) {
2056 outb(PALDATA, r[i] >> bits);
2057 outb(PALDATA, g[i] >> bits);
2058 outb(PALDATA, b[i] >> bits);
2059 }
2060 inb(adp->va_crtc_addr + 6); /* reset flip/flop */
2061 outb(ATC, 0x20); /* enable palette */
2062 return 0;
2063 }
2064
2065 /*
2066 * set_border():
2067 * Change the border color.
2068 *
2069 * CGA/EGA/VGA
2070 */
2071 static int
2072 vga_set_border(video_adapter_t *adp, int color)
2073 {
2074 prologue(adp, V_ADP_BORDER, ENODEV);
2075
2076 switch (adp->va_type) {
2077 case KD_EGA:
2078 case KD_VGA:
2079 inb(adp->va_crtc_addr + 6); /* reset flip-flop */
2080 outb(ATC, 0x31); outb(ATC, color & 0xff);
2081 break;
2082 case KD_CGA:
2083 outb(adp->va_crtc_addr + 5, color & 0x0f); /* color select register */
2084 break;
2085 case KD_MONO:
2086 case KD_HERCULES:
2087 default:
2088 break;
2089 }
2090 return 0;
2091 }
2092
2093 /*
2094 * save_state():
2095 * Read video register values.
2096 * NOTE: this function only reads the standard EGA/VGA registers.
2097 * any extra/extended registers of SVGA adapters are not saved.
2098 *
2099 * VGA
2100 */
2101 static int
2102 vga_save_state(video_adapter_t *adp, void *p, size_t size)
2103 {
2104 video_info_t info;
2105 u_char *buf;
2106 int crtc_addr;
2107 int i, j;
2108 int s;
2109
2110 if (size == 0) {
2111 /* return the required buffer size */
2112 prologue(adp, V_ADP_STATESAVE, 0);
2113 return sizeof(adp_state_t);
2114 } else {
2115 prologue(adp, V_ADP_STATESAVE, ENODEV);
2116 if (size < sizeof(adp_state_t))
2117 return EINVAL;
2118 }
2119
2120 ((adp_state_t *)p)->sig = V_STATE_SIG;
2121 buf = ((adp_state_t *)p)->regs;
2122 bzero(buf, V_MODE_PARAM_SIZE);
2123 crtc_addr = adp->va_crtc_addr;
2124
2125 s = splhigh();
2126
2127 outb(TSIDX, 0x00); outb(TSREG, 0x01); /* stop sequencer */
2128 for (i = 0, j = 5; i < 4; i++) {
2129 outb(TSIDX, i + 1);
2130 buf[j++] = inb(TSREG);
2131 }
2132 buf[9] = inb(MISC + 10); /* dot-clock */
2133 outb(TSIDX, 0x00); outb(TSREG, 0x03); /* start sequencer */
2134
2135 for (i = 0, j = 10; i < 25; i++) { /* crtc */
2136 outb(crtc_addr, i);
2137 buf[j++] = inb(crtc_addr + 1);
2138 }
2139 for (i = 0, j = 35; i < 20; i++) { /* attribute ctrl */
2140 inb(crtc_addr + 6); /* reset flip-flop */
2141 outb(ATC, i);
2142 buf[j++] = inb(ATC + 1);
2143 }
2144 for (i = 0, j = 55; i < 9; i++) { /* graph data ctrl */
2145 outb(GDCIDX, i);
2146 buf[j++] = inb(GDCREG);
2147 }
2148 inb(crtc_addr + 6); /* reset flip-flop */
2149 outb(ATC, 0x20); /* enable palette */
2150
2151 splx(s);
2152
2153 #if 1
2154 if (vga_get_info(adp, adp->va_mode, &info) == 0) {
2155 if (info.vi_flags & V_INFO_GRAPHICS) {
2156 buf[0] = info.vi_width/info.vi_cwidth; /* COLS */
2157 buf[1] = info.vi_height/info.vi_cheight - 1; /* ROWS */
2158 } else {
2159 buf[0] = info.vi_width; /* COLS */
2160 buf[1] = info.vi_height - 1; /* ROWS */
2161 }
2162 buf[2] = info.vi_cheight; /* POINTS */
2163 } else {
2164 /* XXX: shouldn't be happening... */
2165 printf("vga%d: %s: failed to obtain mode info. (vga_save_state())\n",
2166 adp->va_unit, adp->va_name);
2167 }
2168 #else
2169 buf[0] = readb(BIOS_PADDRTOVADDR(0x44a)); /* COLS */
2170 buf[1] = readb(BIOS_PADDRTOVADDR(0x484)); /* ROWS */
2171 buf[2] = readb(BIOS_PADDRTOVADDR(0x485)); /* POINTS */
2172 buf[3] = readb(BIOS_PADDRTOVADDR(0x44c));
2173 buf[4] = readb(BIOS_PADDRTOVADDR(0x44d));
2174 #endif
2175
2176 return 0;
2177 }
2178
2179 /*
2180 * load_state():
2181 * Set video registers at once.
2182 * NOTE: this function only updates the standard EGA/VGA registers.
2183 * any extra/extended registers of SVGA adapters are not changed.
2184 *
2185 * EGA/VGA
2186 */
2187 static int
2188 vga_load_state(video_adapter_t *adp, void *p)
2189 {
2190 u_char *buf;
2191 int crtc_addr;
2192 int s;
2193 int i;
2194
2195 prologue(adp, V_ADP_STATELOAD, ENODEV);
2196 if (((adp_state_t *)p)->sig != V_STATE_SIG)
2197 return EINVAL;
2198
2199 buf = ((adp_state_t *)p)->regs;
2200 crtc_addr = adp->va_crtc_addr;
2201
2202 #if VGA_DEBUG > 1
2203 dump_buffer(buf, V_MODE_PARAM_SIZE);
2204 #endif
2205
2206 s = splhigh();
2207
2208 outb(TSIDX, 0x00); outb(TSREG, 0x01); /* stop sequencer */
2209 for (i = 0; i < 4; ++i) { /* program sequencer */
2210 outb(TSIDX, i + 1);
2211 outb(TSREG, buf[i + 5]);
2212 }
2213 outb(MISC, buf[9]); /* set dot-clock */
2214 outb(TSIDX, 0x00); outb(TSREG, 0x03); /* start sequencer */
2215 outb(crtc_addr, 0x11);
2216 outb(crtc_addr + 1, inb(crtc_addr + 1) & 0x7F);
2217 for (i = 0; i < 25; ++i) { /* program crtc */
2218 outb(crtc_addr, i);
2219 outb(crtc_addr + 1, buf[i + 10]);
2220 }
2221 inb(crtc_addr+6); /* reset flip-flop */
2222 for (i = 0; i < 20; ++i) { /* program attribute ctrl */
2223 outb(ATC, i);
2224 outb(ATC, buf[i + 35]);
2225 }
2226 for (i = 0; i < 9; ++i) { /* program graph data ctrl */
2227 outb(GDCIDX, i);
2228 outb(GDCREG, buf[i + 55]);
2229 }
2230 inb(crtc_addr + 6); /* reset flip-flop */
2231 outb(ATC, 0x20); /* enable palette */
2232
2233 #ifdef notyet /* a temporary workaround for kernel panic, XXX */
2234 #ifndef VGA_NO_BIOS
2235 if (adp->va_unit == V_ADP_PRIMARY) {
2236 writeb(BIOS_PADDRTOVADDR(0x44a), buf[0]); /* COLS */
2237 writeb(BIOS_PADDRTOVADDR(0x484), buf[1] + rows_offset - 1); /* ROWS */
2238 writeb(BIOS_PADDRTOVADDR(0x485), buf[2]); /* POINTS */
2239 #if 0
2240 writeb(BIOS_PADDRTOVADDR(0x44c), buf[3]);
2241 writeb(BIOS_PADDRTOVADDR(0x44d), buf[4]);
2242 #endif
2243 }
2244 #endif /* VGA_NO_BIOS */
2245 #endif /* notyet */
2246
2247 splx(s);
2248 return 0;
2249 }
2250
2251 /*
2252 * set_origin():
2253 * Change the origin (window mapping) of the banked frame buffer.
2254 */
2255 static int
2256 vga_set_origin(video_adapter_t *adp, off_t offset)
2257 {
2258 /*
2259 * The standard video modes do not require window mapping;
2260 * always return error.
2261 */
2262 return ENODEV;
2263 }
2264
2265 /*
2266 * read_hw_cursor():
2267 * Read the position of the hardware text cursor.
2268 *
2269 * all adapters
2270 */
2271 static int
2272 vga_read_hw_cursor(video_adapter_t *adp, int *col, int *row)
2273 {
2274 u_int16_t off;
2275 int s;
2276
2277 if (!vga_init_done)
2278 return ENXIO;
2279
2280 if (adp->va_info.vi_flags & V_INFO_GRAPHICS)
2281 return ENODEV;
2282
2283 s = spltty();
2284 outb(adp->va_crtc_addr, 14);
2285 off = inb(adp->va_crtc_addr + 1);
2286 outb(adp->va_crtc_addr, 15);
2287 off = (off << 8) | inb(adp->va_crtc_addr + 1);
2288 splx(s);
2289
2290 *row = off / adp->va_info.vi_width;
2291 *col = off % adp->va_info.vi_width;
2292
2293 return 0;
2294 }
2295
2296 /*
2297 * set_hw_cursor():
2298 * Move the hardware text cursor. If col and row are both -1,
2299 * the cursor won't be shown.
2300 *
2301 * all adapters
2302 */
2303 static int
2304 vga_set_hw_cursor(video_adapter_t *adp, int col, int row)
2305 {
2306 u_int16_t off;
2307 int s;
2308
2309 if (!vga_init_done)
2310 return ENXIO;
2311
2312 if ((col == -1) && (row == -1)) {
2313 off = -1;
2314 } else {
2315 if (adp->va_info.vi_flags & V_INFO_GRAPHICS)
2316 return ENODEV;
2317 off = row*adp->va_info.vi_width + col;
2318 }
2319
2320 s = spltty();
2321 outb(adp->va_crtc_addr, 14);
2322 outb(adp->va_crtc_addr + 1, off >> 8);
2323 outb(adp->va_crtc_addr, 15);
2324 outb(adp->va_crtc_addr + 1, off & 0x00ff);
2325 splx(s);
2326
2327 return 0;
2328 }
2329
2330 /*
2331 * set_hw_cursor_shape():
2332 * Change the shape of the hardware text cursor. If the height is
2333 * zero or negative, the cursor won't be shown.
2334 *
2335 * all adapters
2336 */
2337 static int
2338 vga_set_hw_cursor_shape(video_adapter_t *adp, int base, int height,
2339 int celsize, int blink)
2340 {
2341 int s;
2342
2343 if (!vga_init_done)
2344 return ENXIO;
2345
2346 s = spltty();
2347 switch (adp->va_type) {
2348 case KD_VGA:
2349 case KD_CGA:
2350 case KD_MONO:
2351 case KD_HERCULES:
2352 default:
2353 if (height <= 0) {
2354 /* make the cursor invisible */
2355 outb(adp->va_crtc_addr, 10);
2356 outb(adp->va_crtc_addr + 1, 32);
2357 outb(adp->va_crtc_addr, 11);
2358 outb(adp->va_crtc_addr + 1, 0);
2359 } else {
2360 outb(adp->va_crtc_addr, 10);
2361 outb(adp->va_crtc_addr + 1, celsize - base - height);
2362 outb(adp->va_crtc_addr, 11);
2363 outb(adp->va_crtc_addr + 1, celsize - base - 1);
2364 }
2365 break;
2366 case KD_EGA:
2367 if (height <= 0) {
2368 /* make the cursor invisible */
2369 outb(adp->va_crtc_addr, 10);
2370 outb(adp->va_crtc_addr + 1, celsize);
2371 outb(adp->va_crtc_addr, 11);
2372 outb(adp->va_crtc_addr + 1, 0);
2373 } else {
2374 outb(adp->va_crtc_addr, 10);
2375 outb(adp->va_crtc_addr + 1, celsize - base - height);
2376 outb(adp->va_crtc_addr, 11);
2377 outb(adp->va_crtc_addr + 1, celsize - base);
2378 }
2379 break;
2380 }
2381 splx(s);
2382
2383 return 0;
2384 }
2385
2386 /*
2387 * blank_display()
2388 * Put the display in power save/power off mode.
2389 *
2390 * all adapters
2391 */
2392 static int
2393 vga_blank_display(video_adapter_t *adp, int mode)
2394 {
2395 u_char val;
2396 int s;
2397
2398 s = splhigh();
2399 switch (adp->va_type) {
2400 case KD_VGA:
2401 switch (mode) {
2402 case V_DISPLAY_SUSPEND:
2403 case V_DISPLAY_STAND_BY:
2404 outb(TSIDX, 0x01);
2405 val = inb(TSREG);
2406 outb(TSIDX, 0x01);
2407 outb(TSREG, val | 0x20);
2408 outb(adp->va_crtc_addr, 0x17);
2409 val = inb(adp->va_crtc_addr + 1);
2410 outb(adp->va_crtc_addr + 1, val & ~0x80);
2411 break;
2412 case V_DISPLAY_BLANK:
2413 outb(TSIDX, 0x01);
2414 val = inb(TSREG);
2415 outb(TSIDX, 0x01);
2416 outb(TSREG, val | 0x20);
2417 break;
2418 case V_DISPLAY_ON:
2419 outb(TSIDX, 0x01);
2420 val = inb(TSREG);
2421 outb(TSIDX, 0x01);
2422 outb(TSREG, val & 0xDF);
2423 outb(adp->va_crtc_addr, 0x17);
2424 val = inb(adp->va_crtc_addr + 1);
2425 outb(adp->va_crtc_addr + 1, val | 0x80);
2426 break;
2427 }
2428 break;
2429
2430 case KD_EGA:
2431 /* no support yet */
2432 splx(s);
2433 return ENODEV;
2434
2435 case KD_CGA:
2436 switch (mode) {
2437 case V_DISPLAY_SUSPEND:
2438 case V_DISPLAY_STAND_BY:
2439 case V_DISPLAY_BLANK:
2440 outb(adp->va_crtc_addr + 4, 0x25);
2441 break;
2442 case V_DISPLAY_ON:
2443 outb(adp->va_crtc_addr + 4, 0x2d);
2444 break;
2445 }
2446 break;
2447
2448 case KD_MONO:
2449 case KD_HERCULES:
2450 switch (mode) {
2451 case V_DISPLAY_SUSPEND:
2452 case V_DISPLAY_STAND_BY:
2453 case V_DISPLAY_BLANK:
2454 outb(adp->va_crtc_addr + 4, 0x21);
2455 break;
2456 case V_DISPLAY_ON:
2457 outb(adp->va_crtc_addr + 4, 0x29);
2458 break;
2459 }
2460 break;
2461 default:
2462 break;
2463 }
2464 splx(s);
2465
2466 return 0;
2467 }
2468
2469 /*
2470 * mmap():
2471 * Mmap frame buffer.
2472 *
2473 * all adapters
2474 */
2475 static int
2476 vga_mmap_buf(video_adapter_t *adp, vm_offset_t offset, vm_paddr_t *paddr,
2477 int prot)
2478 {
2479 if (adp->va_info.vi_flags & V_INFO_LINEAR)
2480 return -1;
2481
2482 #if VGA_DEBUG > 0
2483 printf("vga_mmap_buf(): window:0x%jx, offset:0x%jx\n",
2484 (uintmax_t)adp->va_info.vi_window, (uintmax_t)offset);
2485 #endif
2486
2487 /* XXX: is this correct? */
2488 if (offset > adp->va_window_size - PAGE_SIZE)
2489 return -1;
2490
2491 *paddr = adp->va_info.vi_window + offset;
2492 return 0;
2493 }
2494
2495 #ifndef VGA_NO_MODE_CHANGE
2496
2497 static void
2498 planar_fill(video_adapter_t *adp, int val)
2499 {
2500 int length;
2501 int at; /* position in the frame buffer */
2502 int l;
2503
2504 outw(GDCIDX, 0x0005); /* read mode 0, write mode 0 */
2505 outw(GDCIDX, 0x0003); /* data rotate/function select */
2506 outw(GDCIDX, 0x0f01); /* set/reset enable */
2507 outw(GDCIDX, 0xff08); /* bit mask */
2508 outw(GDCIDX, (val << 8) | 0x00); /* set/reset */
2509 at = 0;
2510 length = adp->va_line_width*adp->va_info.vi_height;
2511 while (length > 0) {
2512 l = imin(length, adp->va_window_size);
2513 vidd_set_win_org(adp, at);
2514 bzero_io(adp->va_window, l);
2515 length -= l;
2516 at += l;
2517 }
2518 outw(GDCIDX, 0x0000); /* set/reset */
2519 outw(GDCIDX, 0x0001); /* set/reset enable */
2520 }
2521
2522 static void
2523 packed_fill(video_adapter_t *adp, int val)
2524 {
2525 int length;
2526 int at; /* position in the frame buffer */
2527 int l;
2528
2529 at = 0;
2530 length = adp->va_line_width*adp->va_info.vi_height;
2531 while (length > 0) {
2532 l = imin(length, adp->va_window_size);
2533 vidd_set_win_org(adp, at);
2534 fill_io(val, adp->va_window, l);
2535 length -= l;
2536 at += l;
2537 }
2538 }
2539
2540 static void
2541 direct_fill(video_adapter_t *adp, int val)
2542 {
2543 int length;
2544 int at; /* position in the frame buffer */
2545 int l;
2546
2547 at = 0;
2548 length = adp->va_line_width*adp->va_info.vi_height;
2549 while (length > 0) {
2550 l = imin(length, adp->va_window_size);
2551 vidd_set_win_org(adp, at);
2552 switch (adp->va_info.vi_pixel_size) {
2553 case sizeof(u_int16_t):
2554 fillw_io(val, adp->va_window, l/sizeof(u_int16_t));
2555 break;
2556 case 3:
2557 /* FIXME */
2558 break;
2559 case sizeof(u_int32_t):
2560 filll_io(val, adp->va_window, l/sizeof(u_int32_t));
2561 break;
2562 }
2563 length -= l;
2564 at += l;
2565 }
2566 }
2567
2568 static int
2569 vga_clear(video_adapter_t *adp)
2570 {
2571 switch (adp->va_info.vi_mem_model) {
2572 case V_INFO_MM_TEXT:
2573 /* do nothing? XXX */
2574 break;
2575 case V_INFO_MM_PLANAR:
2576 planar_fill(adp, 0);
2577 break;
2578 case V_INFO_MM_PACKED:
2579 packed_fill(adp, 0);
2580 break;
2581 case V_INFO_MM_DIRECT:
2582 direct_fill(adp, 0);
2583 break;
2584 }
2585 return 0;
2586 }
2587
2588 #ifdef notyet
2589 static void
2590 planar_fill_rect(video_adapter_t *adp, int val, int x, int y, int cx, int cy)
2591 {
2592 int banksize;
2593 int bank;
2594 int pos;
2595 int offset; /* offset within window */
2596 int bx;
2597 int l;
2598
2599 outw(GDCIDX, 0x0005); /* read mode 0, write mode 0 */
2600 outw(GDCIDX, 0x0003); /* data rotate/function select */
2601 outw(GDCIDX, 0x0f01); /* set/reset enable */
2602 outw(GDCIDX, 0xff08); /* bit mask */
2603 outw(GDCIDX, (val << 8) | 0x00); /* set/reset */
2604
2605 banksize = adp->va_window_size;
2606 bank = -1;
2607 while (cy > 0) {
2608 pos = adp->va_line_width*y + x/8;
2609 if (bank != pos/banksize) {
2610 vidd_set_win_org(adp, pos);
2611 bank = pos/banksize;
2612 }
2613 offset = pos%banksize;
2614 bx = (x + cx)/8 - x/8;
2615 if (x % 8) {
2616 outw(GDCIDX, ((0xff00 >> (x % 8)) & 0xff00) | 0x08);
2617 writeb(adp->va_window + offset, 0);
2618 ++offset;
2619 --bx;
2620 if (offset >= banksize) {
2621 offset = 0;
2622 ++bank; /* next bank */
2623 vidd_set_win_org(adp, bank*banksize);
2624 }
2625 outw(GDCIDX, 0xff08); /* bit mask */
2626 }
2627 while (bx > 0) {
2628 l = imin(bx, banksize);
2629 bzero_io(adp->va_window + offset, l);
2630 offset += l;
2631 bx -= l;
2632 if (offset >= banksize) {
2633 offset = 0;
2634 ++bank; /* next bank */
2635 vidd_set_win_org(adp, bank*banksize);
2636 }
2637 }
2638 if ((x + cx) % 8) {
2639 outw(GDCIDX, (~(0xff00 >> ((x + cx) % 8)) & 0xff00) | 0x08);
2640 writeb(adp->va_window + offset, 0);
2641 ++offset;
2642 if (offset >= banksize) {
2643 offset = 0;
2644 ++bank; /* next bank */
2645 vidd_set_win_org(adp, bank*banksize);
2646 }
2647 outw(GDCIDX, 0xff08); /* bit mask */
2648 }
2649 ++y;
2650 --cy;
2651 }
2652
2653 outw(GDCIDX, 0xff08); /* bit mask */
2654 outw(GDCIDX, 0x0000); /* set/reset */
2655 outw(GDCIDX, 0x0001); /* set/reset enable */
2656 }
2657
2658 static void
2659 packed_fill_rect(video_adapter_t *adp, int val, int x, int y, int cx, int cy)
2660 {
2661 int banksize;
2662 int bank;
2663 int pos;
2664 int offset; /* offset within window */
2665 int end;
2666
2667 banksize = adp->va_window_size;
2668 bank = -1;
2669 cx *= adp->va_info.vi_pixel_size;
2670 while (cy > 0) {
2671 pos = adp->va_line_width*y + x*adp->va_info.vi_pixel_size;
2672 if (bank != pos/banksize) {
2673 vidd_set_win_org(adp, pos);
2674 bank = pos/banksize;
2675 }
2676 offset = pos%banksize;
2677 end = imin(offset + cx, banksize);
2678 fill_io(val, adp->va_window + offset,
2679 (end - offset)/adp->va_info.vi_pixel_size);
2680 /* the line may cross the window boundary */
2681 if (offset + cx > banksize) {
2682 ++bank; /* next bank */
2683 vidd_set_win_org(adp, bank*banksize);
2684 end = offset + cx - banksize;
2685 fill_io(val, adp->va_window, end/adp->va_info.vi_pixel_size);
2686 }
2687 ++y;
2688 --cy;
2689 }
2690 }
2691
2692 static void
2693 direct_fill_rect16(video_adapter_t *adp, int val, int x, int y, int cx, int cy)
2694 {
2695 int banksize;
2696 int bank;
2697 int pos;
2698 int offset; /* offset within window */
2699 int end;
2700
2701 /*
2702 * XXX: the function assumes that banksize is a muliple of
2703 * sizeof(u_int16_t).
2704 */
2705 banksize = adp->va_window_size;
2706 bank = -1;
2707 cx *= sizeof(u_int16_t);
2708 while (cy > 0) {
2709 pos = adp->va_line_width*y + x*sizeof(u_int16_t);
2710 if (bank != pos/banksize) {
2711 vidd_set_win_org(adp, pos);
2712 bank = pos/banksize;
2713 }
2714 offset = pos%banksize;
2715 end = imin(offset + cx, banksize);
2716 fillw_io(val, adp->va_window + offset,
2717 (end - offset)/sizeof(u_int16_t));
2718 /* the line may cross the window boundary */
2719 if (offset + cx > banksize) {
2720 ++bank; /* next bank */
2721 vidd_set_win_org(adp, bank*banksize);
2722 end = offset + cx - banksize;
2723 fillw_io(val, adp->va_window, end/sizeof(u_int16_t));
2724 }
2725 ++y;
2726 --cy;
2727 }
2728 }
2729
2730 static void
2731 direct_fill_rect24(video_adapter_t *adp, int val, int x, int y, int cx, int cy)
2732 {
2733 int banksize;
2734 int bank;
2735 int pos;
2736 int offset; /* offset within window */
2737 int end;
2738 int i;
2739 int j;
2740 u_int8_t b[3];
2741
2742 b[0] = val & 0x0000ff;
2743 b[1] = (val >> 8) & 0x0000ff;
2744 b[2] = (val >> 16) & 0x0000ff;
2745 banksize = adp->va_window_size;
2746 bank = -1;
2747 cx *= 3;
2748 while (cy > 0) {
2749 pos = adp->va_line_width*y + x*3;
2750 if (bank != pos/banksize) {
2751 vidd_set_win_org(adp, pos);
2752 bank = pos/banksize;
2753 }
2754 offset = pos%banksize;
2755 end = imin(offset + cx, banksize);
2756 for (i = 0, j = offset; j < end; i = (++i)%3, ++j) {
2757 writeb(adp->va_window + j, b[i]);
2758 }
2759 /* the line may cross the window boundary */
2760 if (offset + cx >= banksize) {
2761 ++bank; /* next bank */
2762 vidd_set_win_org(adp, bank*banksize);
2763 j = 0;
2764 end = offset + cx - banksize;
2765 for (; j < end; i = (++i)%3, ++j) {
2766 writeb(adp->va_window + j, b[i]);
2767 }
2768 }
2769 ++y;
2770 --cy;
2771 }
2772 }
2773
2774 static void
2775 direct_fill_rect32(video_adapter_t *adp, int val, int x, int y, int cx, int cy)
2776 {
2777 int banksize;
2778 int bank;
2779 int pos;
2780 int offset; /* offset within window */
2781 int end;
2782
2783 /*
2784 * XXX: the function assumes that banksize is a muliple of
2785 * sizeof(u_int32_t).
2786 */
2787 banksize = adp->va_window_size;
2788 bank = -1;
2789 cx *= sizeof(u_int32_t);
2790 while (cy > 0) {
2791 pos = adp->va_line_width*y + x*sizeof(u_int32_t);
2792 if (bank != pos/banksize) {
2793 vidd_set_win_org(adp, pos);
2794 bank = pos/banksize;
2795 }
2796 offset = pos%banksize;
2797 end = imin(offset + cx, banksize);
2798 filll_io(val, adp->va_window + offset,
2799 (end - offset)/sizeof(u_int32_t));
2800 /* the line may cross the window boundary */
2801 if (offset + cx > banksize) {
2802 ++bank; /* next bank */
2803 vidd_set_win_org(adp, bank*banksize);
2804 end = offset + cx - banksize;
2805 filll_io(val, adp->va_window, end/sizeof(u_int32_t));
2806 }
2807 ++y;
2808 --cy;
2809 }
2810 }
2811
2812 static int
2813 vga_fill_rect(video_adapter_t *adp, int val, int x, int y, int cx, int cy)
2814 {
2815 switch (adp->va_info.vi_mem_model) {
2816 case V_INFO_MM_TEXT:
2817 /* do nothing? XXX */
2818 break;
2819 case V_INFO_MM_PLANAR:
2820 planar_fill_rect(adp, val, x, y, cx, cy);
2821 break;
2822 case V_INFO_MM_PACKED:
2823 packed_fill_rect(adp, val, x, y, cx, cy);
2824 break;
2825 case V_INFO_MM_DIRECT:
2826 switch (adp->va_info.vi_pixel_size) {
2827 case sizeof(u_int16_t):
2828 direct_fill_rect16(adp, val, x, y, cx, cy);
2829 break;
2830 case 3:
2831 direct_fill_rect24(adp, val, x, y, cx, cy);
2832 break;
2833 case sizeof(u_int32_t):
2834 direct_fill_rect32(adp, val, x, y, cx, cy);
2835 break;
2836 }
2837 break;
2838 }
2839 return 0;
2840 }
2841 #else /* !notyet */
2842 static int
2843 vga_fill_rect(video_adapter_t *adp, int val, int x, int y, int cx, int cy)
2844 {
2845 return ENODEV;
2846 }
2847 #endif /* notyet */
2848
2849 static int
2850 vga_bitblt(video_adapter_t *adp,...)
2851 {
2852 /* FIXME */
2853 return ENODEV;
2854 }
2855
2856 #endif /* !VGA_NO_MODE_CHANGE */
2857
2858 static int
2859 get_palette(video_adapter_t *adp, int base, int count,
2860 u_char *red, u_char *green, u_char *blue, u_char *trans)
2861 {
2862 u_char *r;
2863 u_char *g;
2864 u_char *b;
2865
2866 if (count < 0 || base < 0 || count > 256 || base > 256 ||
2867 base + count > 256)
2868 return EINVAL;
2869
2870 r = malloc(count*3, M_DEVBUF, M_WAITOK);
2871 g = r + count;
2872 b = g + count;
2873 if (vga_save_palette2(adp, base, count, r, g, b)) {
2874 free(r, M_DEVBUF);
2875 return ENODEV;
2876 }
2877 copyout(r, red, count);
2878 copyout(g, green, count);
2879 copyout(b, blue, count);
2880 if (trans != NULL) {
2881 bzero(r, count);
2882 copyout(r, trans, count);
2883 }
2884 free(r, M_DEVBUF);
2885
2886 return 0;
2887 }
2888
2889 static int
2890 set_palette(video_adapter_t *adp, int base, int count,
2891 u_char *red, u_char *green, u_char *blue, u_char *trans)
2892 {
2893 u_char *r;
2894 u_char *g;
2895 u_char *b;
2896 int err;
2897
2898 if (count < 0 || base < 0 || count > 256 || base > 256 ||
2899 base + count > 256)
2900 return EINVAL;
2901
2902 r = malloc(count*3, M_DEVBUF, M_WAITOK);
2903 g = r + count;
2904 b = g + count;
2905 err = copyin(red, r, count);
2906 if (!err)
2907 err = copyin(green, g, count);
2908 if (!err)
2909 err = copyin(blue, b, count);
2910 if (!err)
2911 err = vga_load_palette2(adp, base, count, r, g, b);
2912 free(r, M_DEVBUF);
2913
2914 return (err ? ENODEV : 0);
2915 }
2916
2917 static int
2918 vga_dev_ioctl(video_adapter_t *adp, u_long cmd, caddr_t arg)
2919 {
2920 switch (cmd) {
2921 case FBIO_GETWINORG: /* get frame buffer window origin */
2922 *(u_int *)arg = 0;
2923 return 0;
2924
2925 case FBIO_SETWINORG: /* set frame buffer window origin */
2926 return ENODEV;
2927
2928 case FBIO_SETDISPSTART: /* set display start address */
2929 return (set_display_start(adp,
2930 ((video_display_start_t *)arg)->x,
2931 ((video_display_start_t *)arg)->y)
2932 ? ENODEV : 0);
2933
2934 case FBIO_SETLINEWIDTH: /* set scan line length in pixel */
2935 return (set_line_length(adp, *(u_int *)arg) ? ENODEV : 0);
2936
2937 case FBIO_GETPALETTE: /* get color palette */
2938 return get_palette(adp, ((video_color_palette_t *)arg)->index,
2939 ((video_color_palette_t *)arg)->count,
2940 ((video_color_palette_t *)arg)->red,
2941 ((video_color_palette_t *)arg)->green,
2942 ((video_color_palette_t *)arg)->blue,
2943 ((video_color_palette_t *)arg)->transparent);
2944
2945 case FBIO_SETPALETTE: /* set color palette */
2946 return set_palette(adp, ((video_color_palette_t *)arg)->index,
2947 ((video_color_palette_t *)arg)->count,
2948 ((video_color_palette_t *)arg)->red,
2949 ((video_color_palette_t *)arg)->green,
2950 ((video_color_palette_t *)arg)->blue,
2951 ((video_color_palette_t *)arg)->transparent);
2952
2953 case FBIOGTYPE: /* get frame buffer type info. */
2954 ((struct fbtype *)arg)->fb_type = fb_type(adp->va_type);
2955 ((struct fbtype *)arg)->fb_height = adp->va_info.vi_height;
2956 ((struct fbtype *)arg)->fb_width = adp->va_info.vi_width;
2957 ((struct fbtype *)arg)->fb_depth = adp->va_info.vi_depth;
2958 if ((adp->va_info.vi_depth <= 1) || (adp->va_info.vi_depth > 8))
2959 ((struct fbtype *)arg)->fb_cmsize = 0;
2960 else
2961 ((struct fbtype *)arg)->fb_cmsize = 1 << adp->va_info.vi_depth;
2962 ((struct fbtype *)arg)->fb_size = adp->va_buffer_size;
2963 return 0;
2964
2965 case FBIOGETCMAP: /* get color palette */
2966 return get_palette(adp, ((struct fbcmap *)arg)->index,
2967 ((struct fbcmap *)arg)->count,
2968 ((struct fbcmap *)arg)->red,
2969 ((struct fbcmap *)arg)->green,
2970 ((struct fbcmap *)arg)->blue, NULL);
2971
2972 case FBIOPUTCMAP: /* set color palette */
2973 return set_palette(adp, ((struct fbcmap *)arg)->index,
2974 ((struct fbcmap *)arg)->count,
2975 ((struct fbcmap *)arg)->red,
2976 ((struct fbcmap *)arg)->green,
2977 ((struct fbcmap *)arg)->blue, NULL);
2978
2979 default:
2980 return fb_commonioctl(adp, cmd, arg);
2981 }
2982 }
2983
2984 static void
2985 dump_buffer(u_char *buf, size_t len)
2986 {
2987 int i;
2988
2989 for(i = 0; i < len;) {
2990 printf("%02x ", buf[i]);
2991 if ((++i % 16) == 0)
2992 printf("\n");
2993 }
2994 }
2995
2996 /*
2997 * diag():
2998 * Print some information about the video adapter and video modes,
2999 * with requested level of details.
3000 *
3001 * all adapters
3002 */
3003 static int
3004 vga_diag(video_adapter_t *adp, int level)
3005 {
3006 u_char *mp;
3007 #if FB_DEBUG > 1
3008 video_info_t info;
3009 int i;
3010 #endif
3011
3012 if (!vga_init_done)
3013 return ENXIO;
3014
3015 #if FB_DEBUG > 1
3016 #ifndef VGA_NO_BIOS
3017 printf("vga: RTC equip. code:0x%02x, DCC code:0x%02x\n",
3018 rtcin(RTC_EQUIPMENT), readb(BIOS_PADDRTOVADDR(0x488)));
3019 printf("vga: CRTC:0x%x, video option:0x%02x, ",
3020 readw(BIOS_PADDRTOVADDR(0x463)),
3021 readb(BIOS_PADDRTOVADDR(0x487)));
3022 printf("rows:%d, cols:%d, font height:%d\n",
3023 readb(BIOS_PADDRTOVADDR(0x44a)),
3024 readb(BIOS_PADDRTOVADDR(0x484)) + 1,
3025 readb(BIOS_PADDRTOVADDR(0x485)));
3026 #endif /* VGA_NO_BIOS */
3027 #if !defined(VGA_NO_BIOS) && !defined(VGA_NO_MODE_CHANGE)
3028 printf("vga: param table EGA/VGA:%p", video_mode_ptr);
3029 printf(", CGA/MDA:%p\n", video_mode_ptr2);
3030 printf("vga: rows_offset:%d\n", rows_offset);
3031 #endif
3032 #endif /* FB_DEBUG > 1 */
3033
3034 fb_dump_adp_info(VGA_DRIVER_NAME, adp, level);
3035
3036 #if FB_DEBUG > 1
3037 if (adp->va_flags & V_ADP_MODECHANGE) {
3038 for (i = 0; bios_vmode[i].vi_mode != EOT; ++i) {
3039 if (bios_vmode[i].vi_mode == NA)
3040 continue;
3041 if (get_mode_param(bios_vmode[i].vi_mode) == NULL)
3042 continue;
3043 fb_dump_mode_info(VGA_DRIVER_NAME, adp, &bios_vmode[i], level);
3044 }
3045 } else {
3046 vga_get_info(adp, adp->va_initial_mode, &info); /* shouldn't fail */
3047 fb_dump_mode_info(VGA_DRIVER_NAME, adp, &info, level);
3048 }
3049 #endif /* FB_DEBUG > 1 */
3050
3051 if ((adp->va_type != KD_EGA) && (adp->va_type != KD_VGA))
3052 return 0;
3053 #if !defined(VGA_NO_BIOS) && !defined(VGA_NO_MODE_CHANGE)
3054 if (video_mode_ptr == NULL)
3055 printf("vga%d: %s: WARNING: video mode switching is not "
3056 "fully supported on this adapter\n",
3057 adp->va_unit, adp->va_name);
3058 #endif
3059 if (level <= 0)
3060 return 0;
3061
3062 if (adp->va_type == KD_VGA) {
3063 printf("VGA parameters upon power-up\n");
3064 dump_buffer(adpstate.regs, sizeof(adpstate.regs));
3065 printf("VGA parameters in BIOS for mode %d\n", adp->va_initial_mode);
3066 dump_buffer(adpstate2.regs, sizeof(adpstate2.regs));
3067 }
3068
3069 mp = get_mode_param(adp->va_initial_mode);
3070 if (mp == NULL) /* this shouldn't be happening */
3071 return 0;
3072 printf("EGA/VGA parameters to be used for mode %d\n", adp->va_initial_mode);
3073 dump_buffer(mp, V_MODE_PARAM_SIZE);
3074
3075 return 0;
3076 }
Cache object: 93e36de6a6f58e537791db9b6cc7de0b
|