1 /*-
2 * SPDX-License-Identifier: BSD-3-Clause
3 *
4 * Copyright (c) 1999 Kazutaka YOKOTA <yokota@zodiac.mech.utsunomiya-u.ac.jp>
5 * Copyright (c) 1992-1998 Søren Schmidt
6 * All rights reserved.
7 *
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
10 * are met:
11 * 1. Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer as
13 * the first lines of this file unmodified.
14 * 2. Redistributions in binary form must reproduce the above copyright
15 * notice, this list of conditions and the following disclaimer in the
16 * documentation and/or other materials provided with the distribution.
17 * 3. The name of the author may not be used to endorse or promote products
18 * derived from this software without specific prior written permission.
19 *
20 * THIS SOFTWARE IS PROVIDED BY THE AUTHORS ``AS IS'' AND ANY EXPRESS OR
21 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
22 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
23 * IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR ANY DIRECT, INDIRECT,
24 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
25 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
26 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
27 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
28 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
29 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
30 *
31 */
32
33 #include <sys/cdefs.h>
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
vga_probe_unit(int unit,video_adapter_t * buf,int flags)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
vga_attach_unit(int unit,vga_softc_t * sc,int flags)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
vga_open(struct cdev * dev,vga_softc_t * sc,int flag,int mode,struct thread * td)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
vga_close(struct cdev * dev,vga_softc_t * sc,int flag,int mode,struct thread * td)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
vga_read(struct cdev * dev,vga_softc_t * sc,struct uio * uio,int flag)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
vga_write(struct cdev * dev,vga_softc_t * sc,struct uio * uio,int flag)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
vga_ioctl(struct cdev * dev,vga_softc_t * sc,u_long cmd,caddr_t arg,int flag,struct thread * td)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
vga_mmap(struct cdev * dev,vga_softc_t * sc,vm_ooffset_t offset,vm_paddr_t * paddr,int prot,vm_memattr_t * memattr)147 vga_mmap(struct cdev *dev, vga_softc_t *sc, vm_ooffset_t offset,
148 vm_paddr_t *paddr, int prot, vm_memattr_t *memattr)
149 {
150 return genfbmmap(&sc->gensc, sc->adp, offset, paddr, prot, memattr);
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, V_INFO_COLOR, 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 MDA_BUF_BASE, MDA_BUF_SIZE, MDA_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
vga_configure(int flags)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
map_mode_table(u_char * map[],u_char * table,int max)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
clear_mode_map(video_adapter_t * adp,u_char * map[],int max,int color)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
map_mode_num(int mode)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_VGA_M80x25 },
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 < nitems(mode_map); ++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
map_gen_mode_num(int type,int color,int mode)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 < nitems(mode_map); ++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
map_bios_mode_num(int type,int color,int bios_mode)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 < nitems(vga_modes))
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 < nitems(ega_modes))
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 < nitems(cga_modes))
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
get_mode_param(int mode)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
fill_adapter_param(int code,video_adapter_t * adp)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 >= nitems(dcc))) {
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
verify_adapter(video_adapter_t * adp)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
update_adapter_info(video_adapter_t * adp,video_info_t * info)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 adp->va_flags &= ~V_ADP_CWIDTH9;
866 if (info->vi_flags & V_INFO_CWIDTH9)
867 adp->va_flags |= V_ADP_CWIDTH9;
868 if (info->vi_mem_model == V_INFO_MM_VGAX) {
869 adp->va_line_width = info->vi_width/2;
870 } else if (info->vi_flags & V_INFO_GRAPHICS) {
871 switch (info->vi_depth/info->vi_planes) {
872 case 1:
873 adp->va_line_width = info->vi_width/8;
874 break;
875 case 2:
876 adp->va_line_width = info->vi_width/4;
877 break;
878 case 4:
879 adp->va_line_width = info->vi_width/2;
880 break;
881 case 8:
882 default: /* shouldn't happen */
883 adp->va_line_width = info->vi_width;
884 break;
885 }
886 } else {
887 adp->va_line_width = info->vi_width;
888 }
889 adp->va_disp_start.x = 0;
890 adp->va_disp_start.y = 0;
891 bcopy(info, &adp->va_info, sizeof(adp->va_info));
892 }
893
894 #if !defined(VGA_NO_BIOS) && !defined(VGA_NO_MODE_CHANGE)
895 /* compare two parameter table entries */
896 static int
comp_adpregs(u_char * buf1,u_char * buf2)897 comp_adpregs(u_char *buf1, u_char *buf2)
898 {
899 static struct {
900 u_char mask;
901 } params[V_MODE_PARAM_SIZE] = {
902 {0xff}, {0x00}, {0xff}, /* COLS}, ROWS}, POINTS */
903 {0x00}, {0x00}, /* page length */
904 {0xfe}, {0xff}, {0xff}, {0xff}, /* sequencer registers */
905 {0xf3}, /* misc register */
906 {0xff}, {0xff}, {0xff}, {0x7f}, {0xff}, /* CRTC */
907 {0xff}, {0xff}, {0xff}, {0x7f}, {0xff},
908 {0x00}, {0x00}, {0x00}, {0x00}, {0x00},
909 {0x00}, {0xff}, {0x7f}, {0xff}, {0xff},
910 {0x7f}, {0xff}, {0xff}, {0xef}, {0xff},
911 {0xff}, {0xff}, {0xff}, {0xff}, {0xff}, /* attribute controller regs */
912 {0xff}, {0xff}, {0xff}, {0xff}, {0xff},
913 {0xff}, {0xff}, {0xff}, {0xff}, {0xff},
914 {0xff}, {0xff}, {0xff}, {0xff}, {0xf0},
915 {0xff}, {0xff}, {0xff}, {0xff}, {0xff}, /* GDC register */
916 {0xff}, {0xff}, {0xff}, {0xff},
917 };
918 int identical = TRUE;
919 int i;
920
921 if ((buf1 == NULL) || (buf2 == NULL))
922 return COMP_DIFFERENT;
923
924 for (i = 0; i < nitems(params); ++i) {
925 if (params[i].mask == 0) /* don't care */
926 continue;
927 if ((buf1[i] & params[i].mask) != (buf2[i] & params[i].mask))
928 return COMP_DIFFERENT;
929 if (buf1[i] != buf2[i])
930 identical = FALSE;
931 }
932 return (identical) ? COMP_IDENTICAL : COMP_SIMILAR;
933 }
934 #endif /* !VGA_NO_BIOS && !VGA_NO_MODE_CHANGE */
935
936 /* probe video adapters and return the number of detected adapters */
937 static int
probe_adapters(void)938 probe_adapters(void)
939 {
940 video_adapter_t *adp;
941 video_info_t info;
942 #if !defined(VGA_NO_BIOS) && !defined(VGA_NO_MODE_CHANGE)
943 u_char *mp;
944 #endif
945 int height, i, width;
946
947 /* do this test only once */
948 if (vga_init_done)
949 return biosadapters;
950 vga_init_done = TRUE;
951
952 /*
953 * Locate display adapters.
954 * The AT architecture supports up to two adapters. `syscons' allows
955 * the following combinations of adapters:
956 * 1) MDA + CGA
957 * 2) MDA + EGA/VGA color
958 * 3) CGA + EGA/VGA mono
959 * Note that `syscons' doesn't bother with MCGA as it is only
960 * avaiable for low end PS/2 models which has 80286 or earlier CPUs,
961 * thus, they are not running FreeBSD!
962 * When there are two adapaters in the system, one becomes `primary'
963 * and the other `secondary'. The EGA adapter has a set of DIP
964 * switches on board for this information and the EGA BIOS copies
965 * it in the BIOS data area BIOSDATA_VIDEOSWITCH (40:88).
966 * The VGA BIOS has more sophisticated mechanism and has this
967 * information in BIOSDATA_DCCINDEX (40:8a), but it also maintains
968 * compatibility with the EGA BIOS by updating BIOSDATA_VIDEOSWITCH.
969 */
970
971 /*
972 * Check rtc and BIOS data area.
973 * XXX: we don't use BIOSDATA_EQUIPMENT, since it is not a dead
974 * copy of RTC_EQUIPMENT. Bits 4 and 5 of ETC_EQUIPMENT are
975 * zeros for EGA and VGA. However, the EGA/VGA BIOS sets
976 * these bits in BIOSDATA_EQUIPMENT according to the monitor
977 * type detected.
978 */
979 #ifndef VGA_NO_BIOS
980 if (*(u_int32_t *)BIOS_PADDRTOVADDR(0x4a8)) {
981 /* EGA/VGA BIOS is present */
982 fill_adapter_param(readb(BIOS_PADDRTOVADDR(0x488)) & 0x0f,
983 biosadapter);
984 } else {
985 switch ((rtcin(RTC_EQUIPMENT) >> 4) & 3) { /* bit 4 and 5 */
986 case 0:
987 /* EGA/VGA: shouldn't be happening */
988 fill_adapter_param(readb(BIOS_PADDRTOVADDR(0x488)) & 0x0f,
989 biosadapter);
990 break;
991 case 1:
992 /* CGA 40x25 */
993 /* FIXME: switch to the 80x25 mode? XXX */
994 biosadapter[V_ADP_PRIMARY] = adapter_init_value[DCC_CGA40];
995 biosadapter[V_ADP_SECONDARY] = adapter_init_value[DCC_MONO];
996 break;
997 case 2:
998 /* CGA 80x25 */
999 biosadapter[V_ADP_PRIMARY] = adapter_init_value[DCC_CGA80];
1000 biosadapter[V_ADP_SECONDARY] = adapter_init_value[DCC_MONO];
1001 break;
1002 case 3:
1003 /* MDA */
1004 biosadapter[V_ADP_PRIMARY] = adapter_init_value[DCC_MONO];
1005 biosadapter[V_ADP_SECONDARY] = adapter_init_value[DCC_CGA80];
1006 break;
1007 }
1008 }
1009 #else
1010 /* assume EGA/VGA? XXX */
1011 biosadapter[V_ADP_PRIMARY] = adapter_init_value[DCC_EGA80];
1012 biosadapter[V_ADP_SECONDARY] = adapter_init_value[DCC_MONO];
1013 #endif /* VGA_NO_BIOS */
1014
1015 biosadapters = 0;
1016 if (verify_adapter(&biosadapter[V_ADP_SECONDARY]) == 0) {
1017 ++biosadapters;
1018 biosadapter[V_ADP_SECONDARY].va_flags |= V_ADP_PROBED;
1019 biosadapter[V_ADP_SECONDARY].va_mode =
1020 biosadapter[V_ADP_SECONDARY].va_initial_mode =
1021 map_bios_mode_num(biosadapter[V_ADP_SECONDARY].va_type,
1022 biosadapter[V_ADP_SECONDARY].va_flags
1023 & V_ADP_COLOR,
1024 biosadapter[V_ADP_SECONDARY].va_initial_bios_mode);
1025 } else {
1026 biosadapter[V_ADP_SECONDARY].va_type = -1;
1027 }
1028 if (verify_adapter(&biosadapter[V_ADP_PRIMARY]) == 0) {
1029 ++biosadapters;
1030 biosadapter[V_ADP_PRIMARY].va_flags |= V_ADP_PROBED;
1031 #ifndef VGA_NO_BIOS
1032 biosadapter[V_ADP_PRIMARY].va_initial_bios_mode =
1033 readb(BIOS_PADDRTOVADDR(0x449));
1034 #else
1035 biosadapter[V_ADP_PRIMARY].va_initial_bios_mode = 3; /* XXX */
1036 #endif
1037 biosadapter[V_ADP_PRIMARY].va_mode =
1038 biosadapter[V_ADP_PRIMARY].va_initial_mode =
1039 map_bios_mode_num(biosadapter[V_ADP_PRIMARY].va_type,
1040 biosadapter[V_ADP_PRIMARY].va_flags & V_ADP_COLOR,
1041 biosadapter[V_ADP_PRIMARY].va_initial_bios_mode);
1042 } else {
1043 biosadapter[V_ADP_PRIMARY] = biosadapter[V_ADP_SECONDARY];
1044 biosadapter[V_ADP_SECONDARY].va_type = -1;
1045 }
1046 if (biosadapters == 0)
1047 return biosadapters;
1048 biosadapter[V_ADP_PRIMARY].va_unit = V_ADP_PRIMARY;
1049 biosadapter[V_ADP_SECONDARY].va_unit = V_ADP_SECONDARY;
1050
1051 #if 0 /* we don't need these... */
1052 fb_init_struct(&biosadapter[V_ADP_PRIMARY], ...);
1053 fb_init_struct(&biosadapter[V_ADP_SECONDARY], ...);
1054 #endif
1055
1056 #ifdef notyet
1057 /*
1058 * We cannot have two video adapter of the same type; there must be
1059 * only one of color or mono adapter, or one each of them.
1060 */
1061 if (biosadapters > 1) {
1062 if (!((biosadapter[0].va_flags ^ biosadapter[1].va_flags)
1063 & V_ADP_COLOR))
1064 /* we have two mono or color adapters!! */
1065 return (biosadapters = 0);
1066 }
1067 #endif
1068
1069 /*
1070 * Ensure a zero start address. The registers are w/o
1071 * for old hardware so it's too hard to relocate the active screen
1072 * memory.
1073 * This must be done before vga_save_state() for VGA.
1074 */
1075 outb(biosadapter[V_ADP_PRIMARY].va_crtc_addr, 12);
1076 outb(biosadapter[V_ADP_PRIMARY].va_crtc_addr + 1, 0);
1077 outb(biosadapter[V_ADP_PRIMARY].va_crtc_addr, 13);
1078 outb(biosadapter[V_ADP_PRIMARY].va_crtc_addr + 1, 0);
1079
1080 /* the video mode parameter table in EGA/VGA BIOS */
1081 /* NOTE: there can be only one EGA/VGA, wheather color or mono,
1082 * recognized by the video BIOS.
1083 */
1084 if ((biosadapter[V_ADP_PRIMARY].va_type == KD_EGA) ||
1085 (biosadapter[V_ADP_PRIMARY].va_type == KD_VGA)) {
1086 adp = &biosadapter[V_ADP_PRIMARY];
1087 } else if ((biosadapter[V_ADP_SECONDARY].va_type == KD_EGA) ||
1088 (biosadapter[V_ADP_SECONDARY].va_type == KD_VGA)) {
1089 adp = &biosadapter[V_ADP_SECONDARY];
1090 } else {
1091 adp = NULL;
1092 }
1093 bzero(mode_map, sizeof(mode_map));
1094 if (adp != NULL) {
1095 if (adp->va_type == KD_VGA) {
1096 vga_save_state(adp, &adpstate, sizeof(adpstate));
1097 #if defined(VGA_NO_BIOS) || defined(VGA_NO_MODE_CHANGE)
1098 mode_map[adp->va_initial_mode] = adpstate.regs;
1099 rows_offset = 1;
1100 #else /* VGA_NO_BIOS || VGA_NO_MODE_CHANGE */
1101 if (video_mode_ptr == NULL) {
1102 mode_map[adp->va_initial_mode] = adpstate.regs;
1103 rows_offset = 1;
1104 } else {
1105 /* discard the table if we are not familiar with it... */
1106 map_mode_table(mode_map, video_mode_ptr, M_VGA_CG320 + 1);
1107 mp = get_mode_param(adp->va_initial_mode);
1108 if (mp != NULL)
1109 bcopy(mp, adpstate2.regs, sizeof(adpstate2.regs));
1110 switch (comp_adpregs(adpstate.regs, mp)) {
1111 case COMP_IDENTICAL:
1112 /*
1113 * OK, this parameter table looks reasonably familiar
1114 * to us...
1115 */
1116 /*
1117 * This is a kludge for Toshiba DynaBook SS433
1118 * whose BIOS video mode table entry has the actual #
1119 * of rows at the offset 1; BIOSes from other
1120 * manufacturers store the # of rows - 1 there. XXX
1121 */
1122 rows_offset = adpstate.regs[1] + 1 - mp[1];
1123 break;
1124
1125 case COMP_SIMILAR:
1126 /*
1127 * Not exactly the same, but similar enough to be
1128 * trusted. However, use the saved register values
1129 * for the initial mode and other modes which are
1130 * based on the initial mode.
1131 */
1132 mode_map[adp->va_initial_mode] = adpstate.regs;
1133 rows_offset = adpstate.regs[1] + 1 - mp[1];
1134 adpstate.regs[1] -= rows_offset - 1;
1135 break;
1136
1137 case COMP_DIFFERENT:
1138 default:
1139 /*
1140 * Don't use the parameter table in the BIOS, since
1141 * even the BIOS doesn't use it for the initial mode.
1142 * Restrict the tweaked modes to (in practice) 80x50
1143 * from 80x25 with 400 scan lines, since the only safe
1144 * tweak is changing the characters from 8x16 to 8x8.
1145 */
1146 video_mode_ptr = NULL;
1147 bzero(mode_map, sizeof(mode_map));
1148 mode_map[adp->va_initial_mode] = adpstate.regs;
1149 rows_offset = 1;
1150
1151 width = height = -1;
1152 for (i = 0; i < nitems(bios_vmode); ++i) {
1153 if (bios_vmode[i].vi_mode == adp->va_initial_mode) {
1154 width = bios_vmode[i].vi_width;
1155 height = bios_vmode[i].vi_height;
1156 break;
1157 }
1158 }
1159 for (i = 0; i < nitems(bios_vmode); ++i) {
1160 if (bios_vmode[i].vi_mode != adp->va_initial_mode &&
1161 map_mode_num(bios_vmode[i].vi_mode) ==
1162 adp->va_initial_mode &&
1163 (bios_vmode[i].vi_width != width ||
1164 bios_vmode[i].vi_height != 2 * height)) {
1165 bios_vmode[i].vi_mode = NA;
1166 }
1167 }
1168 break;
1169 }
1170 }
1171 #endif /* VGA_NO_BIOS || VGA_NO_MODE_CHANGE */
1172
1173 #ifndef VGA_NO_MODE_CHANGE
1174 adp->va_flags |= V_ADP_MODECHANGE;
1175 #endif
1176 #ifndef VGA_NO_FONT_LOADING
1177 adp->va_flags |= V_ADP_FONT;
1178 #endif
1179 } else if (adp->va_type == KD_EGA) {
1180 #if defined(VGA_NO_BIOS) || defined(VGA_NO_MODE_CHANGE)
1181 rows_offset = 1;
1182 #else /* VGA_NO_BIOS || VGA_NO_MODE_CHANGE */
1183 if (video_mode_ptr == NULL) {
1184 rows_offset = 1;
1185 } else {
1186 map_mode_table(mode_map, video_mode_ptr, M_ENH_C80x25 + 1);
1187 /* XXX how can one validate the EGA table... */
1188 mp = get_mode_param(adp->va_initial_mode);
1189 if (mp != NULL) {
1190 adp->va_flags |= V_ADP_MODECHANGE;
1191 #ifndef VGA_NO_FONT_LOADING
1192 adp->va_flags |= V_ADP_FONT;
1193 #endif
1194 rows_offset = 1;
1195 } else {
1196 /*
1197 * This is serious. We will not be able to switch video
1198 * modes at all...
1199 */
1200 video_mode_ptr = NULL;
1201 bzero(mode_map, sizeof(mode_map));
1202 rows_offset = 1;
1203 }
1204 }
1205 #endif /* VGA_NO_BIOS || VGA_NO_MODE_CHANGE */
1206 }
1207 }
1208
1209 /* remove conflicting modes if we have more than one adapter */
1210 if (biosadapters > 0) {
1211 for (i = 0; i < biosadapters; ++i) {
1212 if (!(biosadapter[i].va_flags & V_ADP_MODECHANGE))
1213 continue;
1214 clear_mode_map(&biosadapter[i], mode_map, M_VGA_CG320 + 1,
1215 (biosadapter[i].va_flags & V_ADP_COLOR) ?
1216 V_INFO_COLOR : 0);
1217 if ((biosadapter[i].va_type == KD_VGA)
1218 || (biosadapter[i].va_type == KD_EGA)) {
1219 biosadapter[i].va_io_base =
1220 (biosadapter[i].va_flags & V_ADP_COLOR) ?
1221 IO_VGA : IO_MDA;
1222 biosadapter[i].va_io_size = 32;
1223 }
1224 }
1225 }
1226
1227 #if !defined(VGA_NO_BIOS) && !defined(VGA_NO_MODE_CHANGE)
1228 /*
1229 * Attempt to determine the real character width for each mode. 9 wide
1230 * is supposed to be standard for EGA mono mode and most VGA text modes,
1231 * but some hardware doesn't support it, so dynamic configuration is
1232 * needed. Bit 0 in sequencer register 1 is supposed control the width
1233 * (set = 8), but this is unreliable too. Trust that 0 in the sequencer
1234 * bit means 9 wide after verifying that 9 is consistent with some CRTC
1235 * timing. The ratio (Horizontal Total) / (Horizontal Displayed) is
1236 * about 1.2 in all standard 9-wide modes and should be about 9/8 larger
1237 * again in similar 8-wide modes; in practice it is usually about 1.4
1238 * times larger.
1239 */
1240 for (i = 0; i < nitems(bios_vmode); ++i) {
1241 if (bios_vmode[i].vi_mem_model == V_INFO_MM_TEXT &&
1242 bios_vmode[i].vi_width != 90) {
1243 mp = get_mode_param(map_mode_num(bios_vmode[i].vi_mode));
1244 if (mp != NULL && !(mp[5] & 1) && mp[10] <= mp[11] * 125 / 100)
1245 bios_vmode[i].vi_flags |= V_INFO_CWIDTH9;
1246 }
1247 }
1248 #endif
1249
1250 /* buffer address */
1251 vga_get_info(&biosadapter[V_ADP_PRIMARY],
1252 biosadapter[V_ADP_PRIMARY].va_initial_mode, &info);
1253 info.vi_flags &= ~V_INFO_LINEAR; /* XXX */
1254 update_adapter_info(&biosadapter[V_ADP_PRIMARY], &info);
1255
1256 if (biosadapters > 1) {
1257 vga_get_info(&biosadapter[V_ADP_SECONDARY],
1258 biosadapter[V_ADP_SECONDARY].va_initial_mode, &info);
1259 info.vi_flags &= ~V_INFO_LINEAR; /* XXX */
1260 update_adapter_info(&biosadapter[V_ADP_SECONDARY], &info);
1261 }
1262
1263 /*
1264 * XXX: we should verify the following values for the primary adapter...
1265 * crtc I/O port address: *(u_int16_t *)BIOS_PADDRTOVADDR(0x463);
1266 * color/mono display: (*(u_int8_t *)BIOS_PADDRTOVADDR(0x487) & 0x02)
1267 * ? 0 : V_ADP_COLOR;
1268 * columns: *(u_int8_t *)BIOS_PADDRTOVADDR(0x44a);
1269 * rows: *(u_int8_t *)BIOS_PADDRTOVADDR(0x484);
1270 * font size: *(u_int8_t *)BIOS_PADDRTOVADDR(0x485);
1271 * buffer size: *(u_int16_t *)BIOS_PADDRTOVADDR(0x44c);
1272 */
1273
1274 return biosadapters;
1275 }
1276
1277 /* set the scan line length in pixel */
1278 static int
set_line_length(video_adapter_t * adp,int pixel)1279 set_line_length(video_adapter_t *adp, int pixel)
1280 {
1281 u_char *mp;
1282 int ppw; /* pixels per word */
1283 int bpl; /* bytes per line */
1284 int count;
1285
1286 if ((adp->va_type != KD_VGA) && (adp->va_type != KD_EGA))
1287 return ENODEV;
1288 mp = get_mode_param(adp->va_mode);
1289 if (mp == NULL)
1290 return EINVAL;
1291
1292 switch (adp->va_info.vi_mem_model) {
1293 case V_INFO_MM_PLANAR:
1294 ppw = 16/(adp->va_info.vi_depth/adp->va_info.vi_planes);
1295 count = howmany(pixel, ppw)/2;
1296 bpl = (howmany(pixel, ppw)/2)*4;
1297 break;
1298 case V_INFO_MM_PACKED:
1299 count = (pixel + 7)/8;
1300 bpl = rounddown(pixel + 7, 8);
1301 break;
1302 case V_INFO_MM_TEXT:
1303 count = (pixel + 7)/8; /* columns */
1304 bpl = (pixel + 7)/8; /* columns */
1305 break;
1306 default:
1307 return ENODEV;
1308 }
1309
1310 if (mp[10 + 0x17] & 0x40) /* CRTC mode control reg */
1311 count *= 2; /* byte mode */
1312 outb(adp->va_crtc_addr, 0x13);
1313 outb(adp->va_crtc_addr + 1, count);
1314 adp->va_line_width = bpl;
1315
1316 return 0;
1317 }
1318
1319 static int
set_display_start(video_adapter_t * adp,int x,int y)1320 set_display_start(video_adapter_t *adp, int x, int y)
1321 {
1322 int off; /* byte offset (graphics mode)/word offset (text mode) */
1323 int poff; /* pixel offset */
1324 int roff; /* row offset */
1325 int ppb; /* pixels per byte */
1326
1327 if ((adp->va_type != KD_VGA) && (adp->va_type != KD_EGA))
1328 x &= ~7;
1329 if (adp->va_info.vi_flags & V_INFO_GRAPHICS) {
1330 ppb = 8/(adp->va_info.vi_depth/adp->va_info.vi_planes);
1331 off = y*adp->va_line_width + x/ppb;
1332 roff = 0;
1333 poff = x%ppb;
1334 } else {
1335 if ((adp->va_type == KD_VGA) || (adp->va_type == KD_EGA)) {
1336 outb(TSIDX, 1);
1337 if (inb(TSREG) & 1)
1338 ppb = 9;
1339 else
1340 ppb = 8;
1341 } else {
1342 ppb = 8;
1343 }
1344 off = y/adp->va_info.vi_cheight*adp->va_line_width + x/ppb;
1345 roff = y%adp->va_info.vi_cheight;
1346 /* FIXME: is this correct? XXX */
1347 if (ppb == 8)
1348 poff = x%ppb;
1349 else
1350 poff = (x + 8)%ppb;
1351 }
1352
1353 /* start address */
1354 outb(adp->va_crtc_addr, 0xc); /* high */
1355 outb(adp->va_crtc_addr + 1, off >> 8);
1356 outb(adp->va_crtc_addr, 0xd); /* low */
1357 outb(adp->va_crtc_addr + 1, off & 0xff);
1358
1359 /* horizontal pel pan */
1360 if ((adp->va_type == KD_VGA) || (adp->va_type == KD_EGA)) {
1361 inb(adp->va_crtc_addr + 6);
1362 outb(ATC, 0x13 | 0x20);
1363 outb(ATC, poff);
1364 inb(adp->va_crtc_addr + 6);
1365 outb(ATC, 0x20);
1366 }
1367
1368 /* preset raw scan */
1369 outb(adp->va_crtc_addr, 8);
1370 outb(adp->va_crtc_addr + 1, roff);
1371
1372 adp->va_disp_start.x = x;
1373 adp->va_disp_start.y = y;
1374 return 0;
1375 }
1376
1377 #ifndef VGA_NO_MODE_CHANGE
1378 #if defined(__i386__) || defined(__amd64__) /* XXX */
1379 static void
fill(int val,void * d,size_t size)1380 fill(int val, void *d, size_t size)
1381 {
1382 u_char *p = d;
1383
1384 while (size-- > 0)
1385 *p++ = val;
1386 }
1387 #endif /* __i386__ */
1388
1389 static void
filll_io(int val,vm_offset_t d,size_t size)1390 filll_io(int val, vm_offset_t d, size_t size)
1391 {
1392 while (size-- > 0) {
1393 writel(d, val);
1394 d += sizeof(u_int32_t);
1395 }
1396 }
1397 #endif /* !VGA_NO_MODE_CHANGE */
1398
1399 /* entry points */
1400
1401 #if 0
1402 static int
1403 vga_nop(void)
1404 {
1405 return 0;
1406 }
1407 #endif
1408
1409 static int
vga_error(void)1410 vga_error(void)
1411 {
1412 return ENODEV;
1413 }
1414
1415 static int
vga_probe(int unit,video_adapter_t ** adpp,void * arg,int flags)1416 vga_probe(int unit, video_adapter_t **adpp, void *arg, int flags)
1417 {
1418 probe_adapters();
1419 if (unit >= biosadapters)
1420 return ENXIO;
1421
1422 *adpp = &biosadapter[unit];
1423
1424 return 0;
1425 }
1426
1427 static int
vga_init(int unit,video_adapter_t * adp,int flags)1428 vga_init(int unit, video_adapter_t *adp, int flags)
1429 {
1430 if ((unit >= biosadapters) || (adp == NULL) || !probe_done(adp))
1431 return ENXIO;
1432
1433 if (!init_done(adp)) {
1434 /* nothing to do really... */
1435 adp->va_flags |= V_ADP_INITIALIZED;
1436 }
1437
1438 if (!config_done(adp)) {
1439 if (vid_register(adp) < 0)
1440 return ENXIO;
1441 adp->va_flags |= V_ADP_REGISTERED;
1442 }
1443 if (vga_sub_configure != NULL)
1444 (*vga_sub_configure)(0);
1445
1446 return 0;
1447 }
1448
1449 /*
1450 * get_info():
1451 * Return the video_info structure of the requested video mode.
1452 *
1453 * all adapters
1454 */
1455 static int
vga_get_info(video_adapter_t * adp,int mode,video_info_t * info)1456 vga_get_info(video_adapter_t *adp, int mode, video_info_t *info)
1457 {
1458 int i;
1459
1460 if (!vga_init_done)
1461 return ENXIO;
1462
1463 mode = map_gen_mode_num(adp->va_type, adp->va_flags & V_ADP_COLOR, mode);
1464 #ifndef VGA_NO_MODE_CHANGE
1465 if (adp->va_flags & V_ADP_MODECHANGE) {
1466 /*
1467 * If the parameter table entry for this mode is not found,
1468 * the mode is not supported...
1469 */
1470 if (get_mode_param(mode) == NULL)
1471 return EINVAL;
1472 } else
1473 #endif /* VGA_NO_MODE_CHANGE */
1474 {
1475 /*
1476 * Even if we don't support video mode switching on this adapter,
1477 * the information on the initial (thus current) video mode
1478 * should be made available.
1479 */
1480 if (mode != adp->va_initial_mode)
1481 return EINVAL;
1482 }
1483
1484 for (i = 0; bios_vmode[i].vi_mode != EOT; ++i) {
1485 if (bios_vmode[i].vi_mode == NA)
1486 continue;
1487 if (mode == bios_vmode[i].vi_mode) {
1488 *info = bios_vmode[i];
1489 /* XXX */
1490 info->vi_buffer_size = info->vi_window_size*info->vi_planes;
1491 return 0;
1492 }
1493 }
1494 return EINVAL;
1495 }
1496
1497 /*
1498 * query_mode():
1499 * Find a video mode matching the requested parameters.
1500 * Fields filled with 0 are considered "don't care" fields and
1501 * match any modes.
1502 *
1503 * all adapters
1504 */
1505 static int
vga_query_mode(video_adapter_t * adp,video_info_t * info)1506 vga_query_mode(video_adapter_t *adp, video_info_t *info)
1507 {
1508 int i;
1509
1510 if (!vga_init_done)
1511 return ENXIO;
1512
1513 for (i = 0; bios_vmode[i].vi_mode != EOT; ++i) {
1514 if (bios_vmode[i].vi_mode == NA)
1515 continue;
1516
1517 if ((info->vi_width != 0)
1518 && (info->vi_width != bios_vmode[i].vi_width))
1519 continue;
1520 if ((info->vi_height != 0)
1521 && (info->vi_height != bios_vmode[i].vi_height))
1522 continue;
1523 if ((info->vi_cwidth != 0)
1524 && (info->vi_cwidth != bios_vmode[i].vi_cwidth))
1525 continue;
1526 if ((info->vi_cheight != 0)
1527 && (info->vi_cheight != bios_vmode[i].vi_cheight))
1528 continue;
1529 if ((info->vi_depth != 0)
1530 && (info->vi_depth != bios_vmode[i].vi_depth))
1531 continue;
1532 if ((info->vi_planes != 0)
1533 && (info->vi_planes != bios_vmode[i].vi_planes))
1534 continue;
1535 /* XXX: should check pixel format, memory model */
1536 if ((info->vi_flags != 0)
1537 && (info->vi_flags != bios_vmode[i].vi_flags))
1538 continue;
1539
1540 /* verify if this mode is supported on this adapter */
1541 if (vga_get_info(adp, bios_vmode[i].vi_mode, info))
1542 continue;
1543 return 0;
1544 }
1545 return ENODEV;
1546 }
1547
1548 /*
1549 * set_mode():
1550 * Change the video mode.
1551 *
1552 * EGA/VGA
1553 */
1554
1555 #ifndef VGA_NO_MODE_CHANGE
1556 #ifdef VGA_WIDTH90
1557 static void
set_width90(adp_state_t * params)1558 set_width90(adp_state_t *params)
1559 {
1560 /*
1561 * Based on code submitted by Kelly Yancey (kbyanc@freedomnet.com)
1562 * and alexv@sui.gda.itesm.mx.
1563 */
1564 params->regs[5] |= 1; /* toggle 8 pixel wide fonts */
1565 params->regs[10+0x0] = 0x6b;
1566 params->regs[10+0x1] = 0x59;
1567 params->regs[10+0x2] = 0x5a;
1568 params->regs[10+0x3] = 0x8e;
1569 params->regs[10+0x4] = 0x5e;
1570 params->regs[10+0x5] = 0x8a;
1571 params->regs[10+0x13] = 45;
1572 params->regs[35+0x13] = 0;
1573 }
1574 #endif /* VGA_WIDTH90 */
1575 #endif /* !VGA_NO_MODE_CHANGE */
1576
1577 static int
vga_set_mode(video_adapter_t * adp,int mode)1578 vga_set_mode(video_adapter_t *adp, int mode)
1579 {
1580 #ifndef VGA_NO_MODE_CHANGE
1581 video_info_t info;
1582 adp_state_t params;
1583
1584 prologue(adp, V_ADP_MODECHANGE, ENODEV);
1585
1586 mode = map_gen_mode_num(adp->va_type,
1587 adp->va_flags & V_ADP_COLOR, mode);
1588 if (vga_get_info(adp, mode, &info))
1589 return EINVAL;
1590
1591 #if VGA_DEBUG > 1
1592 printf("vga_set_mode(): setting mode %d\n", mode);
1593 #endif
1594
1595 params.sig = V_STATE_SIG;
1596 bcopy(get_mode_param(mode), params.regs, sizeof(params.regs));
1597
1598 switch (mode) {
1599 #ifdef VGA_WIDTH90
1600 case M_VGA_C90x60: case M_VGA_M90x60:
1601 set_width90(¶ms);
1602 /* FALLTHROUGH */
1603 #endif
1604 case M_VGA_C80x60: case M_VGA_M80x60:
1605 params.regs[2] = 0x08;
1606 params.regs[19] = 0x47;
1607 goto special_480l;
1608
1609 #ifdef VGA_WIDTH90
1610 case M_VGA_C90x30: case M_VGA_M90x30:
1611 set_width90(¶ms);
1612 /* FALLTHROUGH */
1613 #endif
1614 case M_VGA_C80x30: case M_VGA_M80x30:
1615 params.regs[19] = 0x4f;
1616 special_480l:
1617 params.regs[9] |= 0xc0;
1618 params.regs[16] = 0x08;
1619 params.regs[17] = 0x3e;
1620 params.regs[26] = 0xea;
1621 params.regs[28] = 0xdf;
1622 params.regs[31] = 0xe7;
1623 params.regs[32] = 0x04;
1624 goto setup_mode;
1625
1626 #ifdef VGA_WIDTH90
1627 case M_VGA_C90x43: case M_VGA_M90x43:
1628 set_width90(¶ms);
1629 /* FALLTHROUGH */
1630 #endif
1631 case M_ENH_C80x43: case M_ENH_B80x43:
1632 params.regs[28] = 87;
1633 goto special_80x50;
1634
1635 #ifdef VGA_WIDTH90
1636 case M_VGA_C90x50: case M_VGA_M90x50:
1637 set_width90(¶ms);
1638 /* FALLTHROUGH */
1639 #endif
1640 case M_VGA_C80x50: case M_VGA_M80x50:
1641 special_80x50:
1642 params.regs[2] = 8;
1643 params.regs[19] = 7;
1644 goto setup_mode;
1645
1646 #ifdef VGA_WIDTH90
1647 case M_VGA_C90x25: case M_VGA_M90x25:
1648 set_width90(¶ms);
1649 /* FALLTHROUGH */
1650 #endif
1651 case M_VGA_C40x25: case M_VGA_C80x25:
1652 case M_VGA_M80x25:
1653 case M_B40x25: case M_C40x25:
1654 case M_B80x25: case M_C80x25:
1655 case M_ENH_B40x25: case M_ENH_C40x25:
1656 case M_ENH_B80x25: case M_ENH_C80x25:
1657 case M_EGAMONO80x25:
1658
1659 setup_mode:
1660 vga_load_state(adp, ¶ms);
1661 break;
1662
1663 case M_VGA_MODEX:
1664 /* "unchain" the VGA mode */
1665 params.regs[5-1+0x04] &= 0xf7;
1666 params.regs[5-1+0x04] |= 0x04;
1667 /* turn off doubleword mode */
1668 params.regs[10+0x14] &= 0xbf;
1669 /* turn off word addressing */
1670 params.regs[10+0x17] |= 0x40;
1671 /* set logical screen width */
1672 params.regs[10+0x13] = 80;
1673 /* set 240 lines */
1674 params.regs[10+0x11] = 0x2c;
1675 params.regs[10+0x06] = 0x0d;
1676 params.regs[10+0x07] = 0x3e;
1677 params.regs[10+0x10] = 0xea;
1678 params.regs[10+0x11] = 0xac;
1679 params.regs[10+0x12] = 0xdf;
1680 params.regs[10+0x15] = 0xe7;
1681 params.regs[10+0x16] = 0x06;
1682 /* set vertical sync polarity to reflect aspect ratio */
1683 params.regs[9] = 0xe3;
1684 goto setup_grmode;
1685
1686 case M_BG320: case M_CG320: case M_BG640:
1687 case M_CG320_D: case M_CG640_E:
1688 case M_CG640x350: case M_ENH_CG640:
1689 case M_BG640x480: case M_CG640x480: case M_VGA_CG320:
1690
1691 setup_grmode:
1692 vga_load_state(adp, ¶ms);
1693 break;
1694
1695 default:
1696 return EINVAL;
1697 }
1698
1699 adp->va_mode = mode;
1700 info.vi_flags &= ~V_INFO_LINEAR; /* XXX */
1701 update_adapter_info(adp, &info);
1702
1703 /* move hardware cursor out of the way */
1704 vidd_set_hw_cursor(adp, -1, -1);
1705
1706 return 0;
1707 #else /* VGA_NO_MODE_CHANGE */
1708 return ENODEV;
1709 #endif /* VGA_NO_MODE_CHANGE */
1710 }
1711
1712 #ifndef VGA_NO_FONT_LOADING
1713
1714 static void
set_font_mode(video_adapter_t * adp,u_char * buf)1715 set_font_mode(video_adapter_t *adp, u_char *buf)
1716 {
1717 u_char *mp;
1718 int s;
1719
1720 s = splhigh();
1721
1722 /* save register values */
1723 if (adp->va_type == KD_VGA) {
1724 outb(TSIDX, 0x02); buf[0] = inb(TSREG);
1725 outb(TSIDX, 0x04); buf[1] = inb(TSREG);
1726 outb(GDCIDX, 0x04); buf[2] = inb(GDCREG);
1727 outb(GDCIDX, 0x05); buf[3] = inb(GDCREG);
1728 outb(GDCIDX, 0x06); buf[4] = inb(GDCREG);
1729 inb(adp->va_crtc_addr + 6);
1730 outb(ATC, 0x10); buf[5] = inb(ATC + 1);
1731 } else /* if (adp->va_type == KD_EGA) */ {
1732 /*
1733 * EGA cannot be read; copy parameters from the mode parameter
1734 * table.
1735 */
1736 mp = get_mode_param(adp->va_mode);
1737 buf[0] = mp[5 + 0x02 - 1];
1738 buf[1] = mp[5 + 0x04 - 1];
1739 buf[2] = mp[55 + 0x04];
1740 buf[3] = mp[55 + 0x05];
1741 buf[4] = mp[55 + 0x06];
1742 buf[5] = mp[35 + 0x10];
1743 }
1744
1745 /* setup vga for loading fonts */
1746 inb(adp->va_crtc_addr + 6); /* reset flip-flop */
1747 outb(ATC, 0x10); outb(ATC, buf[5] & ~0x01);
1748 inb(adp->va_crtc_addr + 6); /* reset flip-flop */
1749 outb(ATC, 0x20); /* enable palette */
1750
1751 #ifdef VGA_SLOW_IOACCESS
1752 #ifdef VGA_ALT_SEQACCESS
1753 outb(TSIDX, 0x00); outb(TSREG, 0x01);
1754 #endif
1755 outb(TSIDX, 0x02); outb(TSREG, 0x04);
1756 outb(TSIDX, 0x04); outb(TSREG, 0x07);
1757 #ifdef VGA_ALT_SEQACCESS
1758 outb(TSIDX, 0x00); outb(TSREG, 0x03);
1759 #endif
1760 outb(GDCIDX, 0x04); outb(GDCREG, 0x02);
1761 outb(GDCIDX, 0x05); outb(GDCREG, 0x00);
1762 outb(GDCIDX, 0x06); outb(GDCREG, 0x04);
1763 #else /* VGA_SLOW_IOACCESS */
1764 #ifdef VGA_ALT_SEQACCESS
1765 outw(TSIDX, 0x0100);
1766 #endif
1767 outw(TSIDX, 0x0402);
1768 outw(TSIDX, 0x0704);
1769 #ifdef VGA_ALT_SEQACCESS
1770 outw(TSIDX, 0x0300);
1771 #endif
1772 outw(GDCIDX, 0x0204);
1773 outw(GDCIDX, 0x0005);
1774 outw(GDCIDX, 0x0406); /* addr = a0000, 64kb */
1775 #endif /* VGA_SLOW_IOACCESS */
1776
1777 splx(s);
1778 }
1779
1780 static void
set_normal_mode(video_adapter_t * adp,u_char * buf)1781 set_normal_mode(video_adapter_t *adp, u_char *buf)
1782 {
1783 int s;
1784
1785 s = splhigh();
1786
1787 /* setup vga for normal operation mode again */
1788 inb(adp->va_crtc_addr + 6); /* reset flip-flop */
1789 outb(ATC, 0x10); outb(ATC, buf[5]);
1790 inb(adp->va_crtc_addr + 6); /* reset flip-flop */
1791 outb(ATC, 0x20); /* enable palette */
1792
1793 #ifdef VGA_SLOW_IOACCESS
1794 #ifdef VGA_ALT_SEQACCESS
1795 outb(TSIDX, 0x00); outb(TSREG, 0x01);
1796 #endif
1797 outb(TSIDX, 0x02); outb(TSREG, buf[0]);
1798 outb(TSIDX, 0x04); outb(TSREG, buf[1]);
1799 #ifdef VGA_ALT_SEQACCESS
1800 outb(TSIDX, 0x00); outb(TSREG, 0x03);
1801 #endif
1802 outb(GDCIDX, 0x04); outb(GDCREG, buf[2]);
1803 outb(GDCIDX, 0x05); outb(GDCREG, buf[3]);
1804 if (adp->va_crtc_addr == MONO_CRTC) {
1805 outb(GDCIDX, 0x06); outb(GDCREG,(buf[4] & 0x03) | 0x08);
1806 } else {
1807 outb(GDCIDX, 0x06); outb(GDCREG,(buf[4] & 0x03) | 0x0c);
1808 }
1809 #else /* VGA_SLOW_IOACCESS */
1810 #ifdef VGA_ALT_SEQACCESS
1811 outw(TSIDX, 0x0100);
1812 #endif
1813 outw(TSIDX, 0x0002 | (buf[0] << 8));
1814 outw(TSIDX, 0x0004 | (buf[1] << 8));
1815 #ifdef VGA_ALT_SEQACCESS
1816 outw(TSIDX, 0x0300);
1817 #endif
1818 outw(GDCIDX, 0x0004 | (buf[2] << 8));
1819 outw(GDCIDX, 0x0005 | (buf[3] << 8));
1820 if (adp->va_crtc_addr == MONO_CRTC)
1821 outw(GDCIDX, 0x0006 | (((buf[4] & 0x03) | 0x08)<<8));
1822 else
1823 outw(GDCIDX, 0x0006 | (((buf[4] & 0x03) | 0x0c)<<8));
1824 #endif /* VGA_SLOW_IOACCESS */
1825
1826 splx(s);
1827 }
1828
1829 #endif /* VGA_NO_FONT_LOADING */
1830
1831 /*
1832 * save_font():
1833 * Read the font data in the requested font page from the video adapter.
1834 *
1835 * EGA/VGA
1836 */
1837 static int
vga_save_font(video_adapter_t * adp,int page,int fontsize,int fontwidth,u_char * data,int ch,int count)1838 vga_save_font(video_adapter_t *adp, int page, int fontsize, int fontwidth,
1839 u_char *data, int ch, int count)
1840 {
1841 #ifndef VGA_NO_FONT_LOADING
1842 u_char buf[PARAM_BUFSIZE];
1843 vm_offset_t segment;
1844 int c;
1845 #ifdef VGA_ALT_SEQACCESS
1846 int s;
1847 u_char val = 0;
1848 #endif
1849
1850 prologue(adp, V_ADP_FONT, ENODEV);
1851
1852 if (fontsize < 14) {
1853 /* FONT_8 */
1854 fontsize = 8;
1855 } else if (fontsize >= 32) {
1856 fontsize = 32;
1857 } else if (fontsize >= 16) {
1858 /* FONT_16 */
1859 fontsize = 16;
1860 } else {
1861 /* FONT_14 */
1862 fontsize = 14;
1863 }
1864
1865 if (page < 0 || page >= 8 || fontwidth != 8)
1866 return EINVAL;
1867 segment = FONT_BUF + 0x4000*page;
1868 if (page > 3)
1869 segment -= 0xe000;
1870
1871 #ifdef VGA_ALT_SEQACCESS
1872 if (adp->va_type == KD_VGA) { /* what about EGA? XXX */
1873 s = splhigh();
1874 outb(TSIDX, 0x00); outb(TSREG, 0x01);
1875 outb(TSIDX, 0x01); val = inb(TSREG); /* disable screen */
1876 outb(TSIDX, 0x01); outb(TSREG, val | 0x20);
1877 outb(TSIDX, 0x00); outb(TSREG, 0x03);
1878 splx(s);
1879 }
1880 #endif
1881
1882 set_font_mode(adp, buf);
1883 if (fontsize == 32) {
1884 bcopy_fromio((uintptr_t)segment + ch*32, data, fontsize*count);
1885 } else {
1886 for (c = ch; count > 0; ++c, --count) {
1887 bcopy_fromio((uintptr_t)segment + c*32, data, fontsize);
1888 data += fontsize;
1889 }
1890 }
1891 set_normal_mode(adp, buf);
1892
1893 #ifdef VGA_ALT_SEQACCESS
1894 if (adp->va_type == KD_VGA) {
1895 s = splhigh();
1896 outb(TSIDX, 0x00); outb(TSREG, 0x01);
1897 outb(TSIDX, 0x01); outb(TSREG, val & 0xdf); /* enable screen */
1898 outb(TSIDX, 0x00); outb(TSREG, 0x03);
1899 splx(s);
1900 }
1901 #endif
1902
1903 return 0;
1904 #else /* VGA_NO_FONT_LOADING */
1905 return ENODEV;
1906 #endif /* VGA_NO_FONT_LOADING */
1907 }
1908
1909 /*
1910 * load_font():
1911 * Set the font data in the requested font page.
1912 * NOTE: it appears that some recent video adapters do not support
1913 * the font page other than 0... XXX
1914 *
1915 * EGA/VGA
1916 */
1917 static int
vga_load_font(video_adapter_t * adp,int page,int fontsize,int fontwidth,u_char * data,int ch,int count)1918 vga_load_font(video_adapter_t *adp, int page, int fontsize, int fontwidth,
1919 u_char *data, int ch, int count)
1920 {
1921 #ifndef VGA_NO_FONT_LOADING
1922 u_char buf[PARAM_BUFSIZE];
1923 vm_offset_t segment;
1924 int c;
1925 #ifdef VGA_ALT_SEQACCESS
1926 int s;
1927 u_char val = 0;
1928 #endif
1929
1930 prologue(adp, V_ADP_FONT, ENODEV);
1931
1932 if (fontsize < 14) {
1933 /* FONT_8 */
1934 fontsize = 8;
1935 } else if (fontsize >= 32) {
1936 fontsize = 32;
1937 } else if (fontsize >= 16) {
1938 /* FONT_16 */
1939 fontsize = 16;
1940 } else {
1941 /* FONT_14 */
1942 fontsize = 14;
1943 }
1944
1945 if (page < 0 || page >= 8 || fontwidth != 8)
1946 return EINVAL;
1947 segment = FONT_BUF + 0x4000*page;
1948 if (page > 3)
1949 segment -= 0xe000;
1950
1951 #ifdef VGA_ALT_SEQACCESS
1952 if (adp->va_type == KD_VGA) { /* what about EGA? XXX */
1953 s = splhigh();
1954 outb(TSIDX, 0x00); outb(TSREG, 0x01);
1955 outb(TSIDX, 0x01); val = inb(TSREG); /* disable screen */
1956 outb(TSIDX, 0x01); outb(TSREG, val | 0x20);
1957 outb(TSIDX, 0x00); outb(TSREG, 0x03);
1958 splx(s);
1959 }
1960 #endif
1961
1962 set_font_mode(adp, buf);
1963 if (fontsize == 32) {
1964 bcopy_toio(data, (uintptr_t)segment + ch*32, fontsize*count);
1965 } else {
1966 for (c = ch; count > 0; ++c, --count) {
1967 bcopy_toio(data, (uintptr_t)segment + c*32, fontsize);
1968 data += fontsize;
1969 }
1970 }
1971 set_normal_mode(adp, buf);
1972
1973 #ifdef VGA_ALT_SEQACCESS
1974 if (adp->va_type == KD_VGA) {
1975 s = splhigh();
1976 outb(TSIDX, 0x00); outb(TSREG, 0x01);
1977 outb(TSIDX, 0x01); outb(TSREG, val & 0xdf); /* enable screen */
1978 outb(TSIDX, 0x00); outb(TSREG, 0x03);
1979 splx(s);
1980 }
1981 #endif
1982
1983 return 0;
1984 #else /* VGA_NO_FONT_LOADING */
1985 return ENODEV;
1986 #endif /* VGA_NO_FONT_LOADING */
1987 }
1988
1989 /*
1990 * show_font():
1991 * Activate the requested font page.
1992 * NOTE: it appears that some recent video adapters do not support
1993 * the font page other than 0... XXX
1994 *
1995 * EGA/VGA
1996 */
1997 static int
vga_show_font(video_adapter_t * adp,int page)1998 vga_show_font(video_adapter_t *adp, int page)
1999 {
2000 #ifndef VGA_NO_FONT_LOADING
2001 static u_char cg[] = { 0x00, 0x05, 0x0a, 0x0f, 0x30, 0x35, 0x3a, 0x3f };
2002 int s;
2003
2004 prologue(adp, V_ADP_FONT, ENODEV);
2005 if (page < 0 || page >= 8)
2006 return EINVAL;
2007
2008 s = splhigh();
2009 outb(TSIDX, 0x03); outb(TSREG, cg[page]);
2010 splx(s);
2011
2012 return 0;
2013 #else /* VGA_NO_FONT_LOADING */
2014 return ENODEV;
2015 #endif /* VGA_NO_FONT_LOADING */
2016 }
2017
2018 /*
2019 * save_palette():
2020 * Read DAC values. The values have expressed in 8 bits.
2021 *
2022 * VGA
2023 */
2024 static int
vga_save_palette(video_adapter_t * adp,u_char * palette)2025 vga_save_palette(video_adapter_t *adp, u_char *palette)
2026 {
2027 int bits;
2028 int i;
2029
2030 prologue(adp, V_ADP_PALETTE, ENODEV);
2031
2032 /*
2033 * We store 8 bit values in the palette buffer, while the standard
2034 * VGA has 6 bit DAC .
2035 */
2036 outb(PALRADR, 0x00);
2037 bits = (adp->va_flags & V_ADP_DAC8) != 0 ? 0 : 2;
2038 for (i = 0; i < 256*3; ++i)
2039 palette[i] = inb(PALDATA) << bits;
2040 inb(adp->va_crtc_addr + 6); /* reset flip/flop */
2041 return 0;
2042 }
2043
2044 static int
vga_save_palette2(video_adapter_t * adp,int base,int count,u_char * r,u_char * g,u_char * b)2045 vga_save_palette2(video_adapter_t *adp, int base, int count,
2046 u_char *r, u_char *g, u_char *b)
2047 {
2048 int bits;
2049 int i;
2050
2051 prologue(adp, V_ADP_PALETTE, ENODEV);
2052
2053 outb(PALRADR, base);
2054 bits = (adp->va_flags & V_ADP_DAC8) != 0 ? 0 : 2;
2055 for (i = 0; i < count; ++i) {
2056 r[i] = inb(PALDATA) << bits;
2057 g[i] = inb(PALDATA) << bits;
2058 b[i] = inb(PALDATA) << bits;
2059 }
2060 inb(adp->va_crtc_addr + 6); /* reset flip/flop */
2061 return 0;
2062 }
2063
2064 /*
2065 * load_palette():
2066 * Set DAC values.
2067 *
2068 * VGA
2069 */
2070 static int
vga_load_palette(video_adapter_t * adp,u_char * palette)2071 vga_load_palette(video_adapter_t *adp, u_char *palette)
2072 {
2073 int bits;
2074 int i;
2075
2076 prologue(adp, V_ADP_PALETTE, ENODEV);
2077
2078 outb(PIXMASK, 0xff); /* no pixelmask */
2079 outb(PALWADR, 0x00);
2080 bits = (adp->va_flags & V_ADP_DAC8) != 0 ? 0 : 2;
2081 for (i = 0; i < 256*3; ++i)
2082 outb(PALDATA, palette[i] >> bits);
2083 inb(adp->va_crtc_addr + 6); /* reset flip/flop */
2084 outb(ATC, 0x20); /* enable palette */
2085 return 0;
2086 }
2087
2088 static int
vga_load_palette2(video_adapter_t * adp,int base,int count,u_char * r,u_char * g,u_char * b)2089 vga_load_palette2(video_adapter_t *adp, int base, int count,
2090 u_char *r, u_char *g, u_char *b)
2091 {
2092 int bits;
2093 int i;
2094
2095 prologue(adp, V_ADP_PALETTE, ENODEV);
2096
2097 outb(PIXMASK, 0xff); /* no pixelmask */
2098 outb(PALWADR, base);
2099 bits = (adp->va_flags & V_ADP_DAC8) != 0 ? 0 : 2;
2100 for (i = 0; i < count; ++i) {
2101 outb(PALDATA, r[i] >> bits);
2102 outb(PALDATA, g[i] >> bits);
2103 outb(PALDATA, b[i] >> bits);
2104 }
2105 inb(adp->va_crtc_addr + 6); /* reset flip/flop */
2106 outb(ATC, 0x20); /* enable palette */
2107 return 0;
2108 }
2109
2110 /*
2111 * set_border():
2112 * Change the border color.
2113 *
2114 * CGA/EGA/VGA
2115 */
2116 static int
vga_set_border(video_adapter_t * adp,int color)2117 vga_set_border(video_adapter_t *adp, int color)
2118 {
2119 prologue(adp, V_ADP_BORDER, ENODEV);
2120
2121 switch (adp->va_type) {
2122 case KD_EGA:
2123 case KD_VGA:
2124 inb(adp->va_crtc_addr + 6); /* reset flip-flop */
2125 outb(ATC, 0x31); outb(ATC, color & 0xff);
2126 break;
2127 case KD_CGA:
2128 outb(adp->va_crtc_addr + 5, color & 0x0f); /* color select register */
2129 break;
2130 case KD_MONO:
2131 case KD_HERCULES:
2132 default:
2133 break;
2134 }
2135 return 0;
2136 }
2137
2138 /*
2139 * save_state():
2140 * Read video register values.
2141 * NOTE: this function only reads the standard EGA/VGA registers.
2142 * any extra/extended registers of SVGA adapters are not saved.
2143 *
2144 * VGA
2145 */
2146 static int
vga_save_state(video_adapter_t * adp,void * p,size_t size)2147 vga_save_state(video_adapter_t *adp, void *p, size_t size)
2148 {
2149 video_info_t info;
2150 u_char *buf;
2151 int crtc_addr;
2152 int i, j;
2153 int s;
2154
2155 if (size == 0) {
2156 /* return the required buffer size */
2157 prologue(adp, V_ADP_STATESAVE, 0);
2158 return sizeof(adp_state_t);
2159 } else {
2160 prologue(adp, V_ADP_STATESAVE, ENODEV);
2161 if (size < sizeof(adp_state_t))
2162 return EINVAL;
2163 }
2164
2165 ((adp_state_t *)p)->sig = V_STATE_SIG;
2166 buf = ((adp_state_t *)p)->regs;
2167 bzero(buf, V_MODE_PARAM_SIZE);
2168 crtc_addr = adp->va_crtc_addr;
2169
2170 s = splhigh();
2171
2172 outb(TSIDX, 0x00); outb(TSREG, 0x01); /* stop sequencer */
2173 for (i = 0, j = 5; i < 4; i++) {
2174 outb(TSIDX, i + 1);
2175 buf[j++] = inb(TSREG);
2176 }
2177 buf[9] = inb(MISC + 10); /* dot-clock */
2178 outb(TSIDX, 0x00); outb(TSREG, 0x03); /* start sequencer */
2179
2180 for (i = 0, j = 10; i < 25; i++) { /* crtc */
2181 outb(crtc_addr, i);
2182 buf[j++] = inb(crtc_addr + 1);
2183 }
2184 for (i = 0, j = 35; i < 20; i++) { /* attribute ctrl */
2185 inb(crtc_addr + 6); /* reset flip-flop */
2186 outb(ATC, i);
2187 buf[j++] = inb(ATC + 1);
2188 }
2189 for (i = 0, j = 55; i < 9; i++) { /* graph data ctrl */
2190 outb(GDCIDX, i);
2191 buf[j++] = inb(GDCREG);
2192 }
2193 inb(crtc_addr + 6); /* reset flip-flop */
2194 outb(ATC, 0x20); /* enable palette */
2195
2196 splx(s);
2197
2198 #if 1
2199 if (vga_get_info(adp, adp->va_mode, &info) == 0) {
2200 if (info.vi_flags & V_INFO_GRAPHICS) {
2201 buf[0] = info.vi_width/info.vi_cwidth; /* COLS */
2202 buf[1] = info.vi_height/info.vi_cheight - 1; /* ROWS */
2203 } else {
2204 buf[0] = info.vi_width; /* COLS */
2205 buf[1] = info.vi_height - 1; /* ROWS */
2206 }
2207 buf[2] = info.vi_cheight; /* POINTS */
2208 }
2209 #else
2210 buf[0] = readb(BIOS_PADDRTOVADDR(0x44a)); /* COLS */
2211 buf[1] = readb(BIOS_PADDRTOVADDR(0x484)); /* ROWS */
2212 buf[2] = readb(BIOS_PADDRTOVADDR(0x485)); /* POINTS */
2213 buf[3] = readb(BIOS_PADDRTOVADDR(0x44c));
2214 buf[4] = readb(BIOS_PADDRTOVADDR(0x44d));
2215 #endif
2216
2217 return 0;
2218 }
2219
2220 /*
2221 * load_state():
2222 * Set video registers at once.
2223 * NOTE: this function only updates the standard EGA/VGA registers.
2224 * any extra/extended registers of SVGA adapters are not changed.
2225 *
2226 * EGA/VGA
2227 */
2228 static int
vga_load_state(video_adapter_t * adp,void * p)2229 vga_load_state(video_adapter_t *adp, void *p)
2230 {
2231 u_char *buf;
2232 int crtc_addr;
2233 int s;
2234 int i;
2235
2236 prologue(adp, V_ADP_STATELOAD, ENODEV);
2237 if (((adp_state_t *)p)->sig != V_STATE_SIG)
2238 return EINVAL;
2239
2240 buf = ((adp_state_t *)p)->regs;
2241 crtc_addr = adp->va_crtc_addr;
2242
2243 #if VGA_DEBUG > 1
2244 dump_buffer(buf, V_MODE_PARAM_SIZE);
2245 #endif
2246
2247 s = splhigh();
2248
2249 outb(TSIDX, 0x00); outb(TSREG, 0x01); /* stop sequencer */
2250 for (i = 0; i < 4; ++i) { /* program sequencer */
2251 outb(TSIDX, i + 1);
2252 outb(TSREG, buf[i + 5]);
2253 }
2254 outb(MISC, buf[9]); /* set dot-clock */
2255 outb(TSIDX, 0x00); outb(TSREG, 0x03); /* start sequencer */
2256 outb(crtc_addr, 0x11);
2257 outb(crtc_addr + 1, inb(crtc_addr + 1) & 0x7F);
2258 for (i = 0; i < 25; ++i) { /* program crtc */
2259 outb(crtc_addr, i);
2260 outb(crtc_addr + 1, buf[i + 10]);
2261 }
2262 inb(crtc_addr+6); /* reset flip-flop */
2263 for (i = 0; i < 20; ++i) { /* program attribute ctrl */
2264 outb(ATC, i);
2265 outb(ATC, buf[i + 35]);
2266 }
2267 for (i = 0; i < 9; ++i) { /* program graph data ctrl */
2268 outb(GDCIDX, i);
2269 outb(GDCREG, buf[i + 55]);
2270 }
2271 inb(crtc_addr + 6); /* reset flip-flop */
2272 outb(ATC, 0x20); /* enable palette */
2273
2274 #ifdef notyet /* a temporary workaround for kernel panic, XXX */
2275 #ifndef VGA_NO_BIOS
2276 if (adp->va_unit == V_ADP_PRIMARY) {
2277 writeb(BIOS_PADDRTOVADDR(0x44a), buf[0]); /* COLS */
2278 writeb(BIOS_PADDRTOVADDR(0x484), buf[1] + rows_offset - 1); /* ROWS */
2279 writeb(BIOS_PADDRTOVADDR(0x485), buf[2]); /* POINTS */
2280 #if 0
2281 writeb(BIOS_PADDRTOVADDR(0x44c), buf[3]);
2282 writeb(BIOS_PADDRTOVADDR(0x44d), buf[4]);
2283 #endif
2284 }
2285 #endif /* VGA_NO_BIOS */
2286 #endif /* notyet */
2287
2288 splx(s);
2289 return 0;
2290 }
2291
2292 /*
2293 * set_origin():
2294 * Change the origin (window mapping) of the banked frame buffer.
2295 */
2296 static int
vga_set_origin(video_adapter_t * adp,off_t offset)2297 vga_set_origin(video_adapter_t *adp, off_t offset)
2298 {
2299 /*
2300 * The standard video modes do not require window mapping;
2301 * always return error.
2302 */
2303 return ENODEV;
2304 }
2305
2306 /*
2307 * read_hw_cursor():
2308 * Read the position of the hardware text cursor.
2309 *
2310 * all adapters
2311 */
2312 static int
vga_read_hw_cursor(video_adapter_t * adp,int * col,int * row)2313 vga_read_hw_cursor(video_adapter_t *adp, int *col, int *row)
2314 {
2315 u_int16_t off;
2316 int s;
2317
2318 if (!vga_init_done)
2319 return ENXIO;
2320
2321 if (adp->va_info.vi_flags & V_INFO_GRAPHICS)
2322 return ENODEV;
2323
2324 s = spltty();
2325 outb(adp->va_crtc_addr, 14);
2326 off = inb(adp->va_crtc_addr + 1);
2327 outb(adp->va_crtc_addr, 15);
2328 off = (off << 8) | inb(adp->va_crtc_addr + 1);
2329 splx(s);
2330
2331 *row = off / adp->va_info.vi_width;
2332 *col = off % adp->va_info.vi_width;
2333
2334 return 0;
2335 }
2336
2337 /*
2338 * set_hw_cursor():
2339 * Move the hardware text cursor. If col and row are both -1,
2340 * the cursor won't be shown.
2341 *
2342 * all adapters
2343 */
2344 static int
vga_set_hw_cursor(video_adapter_t * adp,int col,int row)2345 vga_set_hw_cursor(video_adapter_t *adp, int col, int row)
2346 {
2347 u_int16_t off;
2348 int s;
2349
2350 if (!vga_init_done)
2351 return ENXIO;
2352
2353 if ((col == -1) && (row == -1)) {
2354 off = -1;
2355 } else {
2356 if (adp->va_info.vi_flags & V_INFO_GRAPHICS)
2357 return ENODEV;
2358 off = row*adp->va_info.vi_width + col;
2359 }
2360
2361 s = spltty();
2362 outb(adp->va_crtc_addr, 14);
2363 outb(adp->va_crtc_addr + 1, off >> 8);
2364 outb(adp->va_crtc_addr, 15);
2365 outb(adp->va_crtc_addr + 1, off & 0x00ff);
2366 splx(s);
2367
2368 return 0;
2369 }
2370
2371 /*
2372 * set_hw_cursor_shape():
2373 * Change the shape of the hardware text cursor. If the height is
2374 * zero or negative, the cursor won't be shown.
2375 *
2376 * all adapters
2377 */
2378 static int
vga_set_hw_cursor_shape(video_adapter_t * adp,int base,int height,int celsize,int blink)2379 vga_set_hw_cursor_shape(video_adapter_t *adp, int base, int height,
2380 int celsize, int blink)
2381 {
2382 int s;
2383
2384 if (!vga_init_done)
2385 return ENXIO;
2386
2387 s = spltty();
2388 switch (adp->va_type) {
2389 case KD_VGA:
2390 case KD_CGA:
2391 case KD_MONO:
2392 case KD_HERCULES:
2393 default:
2394 if (height <= 0) {
2395 /* make the cursor invisible */
2396 outb(adp->va_crtc_addr, 10);
2397 outb(adp->va_crtc_addr + 1, 32);
2398 outb(adp->va_crtc_addr, 11);
2399 outb(adp->va_crtc_addr + 1, 0);
2400 } else {
2401 outb(adp->va_crtc_addr, 10);
2402 outb(adp->va_crtc_addr + 1, celsize - base - height);
2403 outb(adp->va_crtc_addr, 11);
2404 outb(adp->va_crtc_addr + 1, celsize - base - 1);
2405 }
2406 break;
2407 case KD_EGA:
2408 if (height <= 0) {
2409 /* make the cursor invisible */
2410 outb(adp->va_crtc_addr, 10);
2411 outb(adp->va_crtc_addr + 1, celsize);
2412 outb(adp->va_crtc_addr, 11);
2413 outb(adp->va_crtc_addr + 1, 0);
2414 } else {
2415 outb(adp->va_crtc_addr, 10);
2416 outb(adp->va_crtc_addr + 1, celsize - base - height);
2417 outb(adp->va_crtc_addr, 11);
2418 outb(adp->va_crtc_addr + 1, celsize - base);
2419 }
2420 break;
2421 }
2422 splx(s);
2423
2424 return 0;
2425 }
2426
2427 /*
2428 * blank_display()
2429 * Put the display in power save/power off mode.
2430 *
2431 * all adapters
2432 */
2433 static int
vga_blank_display(video_adapter_t * adp,int mode)2434 vga_blank_display(video_adapter_t *adp, int mode)
2435 {
2436 u_char val;
2437 int s;
2438
2439 s = splhigh();
2440 switch (adp->va_type) {
2441 case KD_VGA:
2442 switch (mode) {
2443 case V_DISPLAY_SUSPEND:
2444 case V_DISPLAY_STAND_BY:
2445 outb(TSIDX, 0x01);
2446 val = inb(TSREG);
2447 outb(TSIDX, 0x01);
2448 outb(TSREG, val | 0x20);
2449 outb(adp->va_crtc_addr, 0x17);
2450 val = inb(adp->va_crtc_addr + 1);
2451 outb(adp->va_crtc_addr + 1, val & ~0x80);
2452 break;
2453 case V_DISPLAY_BLANK:
2454 outb(TSIDX, 0x01);
2455 val = inb(TSREG);
2456 outb(TSIDX, 0x01);
2457 outb(TSREG, val | 0x20);
2458 break;
2459 case V_DISPLAY_ON:
2460 outb(TSIDX, 0x01);
2461 val = inb(TSREG);
2462 outb(TSIDX, 0x01);
2463 outb(TSREG, val & 0xDF);
2464 outb(adp->va_crtc_addr, 0x17);
2465 val = inb(adp->va_crtc_addr + 1);
2466 outb(adp->va_crtc_addr + 1, val | 0x80);
2467 break;
2468 }
2469 break;
2470
2471 case KD_EGA:
2472 /* no support yet */
2473 splx(s);
2474 return ENODEV;
2475
2476 case KD_CGA:
2477 switch (mode) {
2478 case V_DISPLAY_SUSPEND:
2479 case V_DISPLAY_STAND_BY:
2480 case V_DISPLAY_BLANK:
2481 outb(adp->va_crtc_addr + 4, 0x25);
2482 break;
2483 case V_DISPLAY_ON:
2484 outb(adp->va_crtc_addr + 4, 0x2d);
2485 break;
2486 }
2487 break;
2488
2489 case KD_MONO:
2490 case KD_HERCULES:
2491 switch (mode) {
2492 case V_DISPLAY_SUSPEND:
2493 case V_DISPLAY_STAND_BY:
2494 case V_DISPLAY_BLANK:
2495 outb(adp->va_crtc_addr + 4, 0x21);
2496 break;
2497 case V_DISPLAY_ON:
2498 outb(adp->va_crtc_addr + 4, 0x29);
2499 break;
2500 }
2501 break;
2502 default:
2503 break;
2504 }
2505 splx(s);
2506
2507 return 0;
2508 }
2509
2510 /*
2511 * mmap():
2512 * Mmap frame buffer.
2513 *
2514 * all adapters
2515 */
2516 static int
vga_mmap_buf(video_adapter_t * adp,vm_ooffset_t offset,vm_paddr_t * paddr,int prot,vm_memattr_t * memattr)2517 vga_mmap_buf(video_adapter_t *adp, vm_ooffset_t offset, vm_paddr_t *paddr,
2518 int prot, vm_memattr_t *memattr)
2519 {
2520 if (adp->va_info.vi_flags & V_INFO_LINEAR)
2521 return -1;
2522
2523 #if VGA_DEBUG > 0
2524 printf("vga_mmap_buf(): window:0x%jx, offset:0x%jx\n",
2525 (uintmax_t)adp->va_info.vi_window, (uintmax_t)offset);
2526 #endif
2527
2528 /* XXX: is this correct? */
2529 if (offset > adp->va_window_size - PAGE_SIZE)
2530 return -1;
2531
2532 *paddr = adp->va_info.vi_window + offset;
2533 return 0;
2534 }
2535
2536 #ifndef VGA_NO_MODE_CHANGE
2537
2538 static void
planar_fill(video_adapter_t * adp,int val)2539 planar_fill(video_adapter_t *adp, int val)
2540 {
2541 int length;
2542 int at; /* position in the frame buffer */
2543 int l;
2544
2545 outw(GDCIDX, 0x0005); /* read mode 0, write mode 0 */
2546 outw(GDCIDX, 0x0003); /* data rotate/function select */
2547 outw(GDCIDX, 0x0f01); /* set/reset enable */
2548 outw(GDCIDX, 0xff08); /* bit mask */
2549 outw(GDCIDX, (val << 8) | 0x00); /* set/reset */
2550 at = 0;
2551 length = adp->va_line_width*adp->va_info.vi_height;
2552 while (length > 0) {
2553 l = imin(length, adp->va_window_size);
2554 vidd_set_win_org(adp, at);
2555 bzero_io(adp->va_window, l);
2556 length -= l;
2557 at += l;
2558 }
2559 outw(GDCIDX, 0x0000); /* set/reset */
2560 outw(GDCIDX, 0x0001); /* set/reset enable */
2561 }
2562
2563 static void
packed_fill(video_adapter_t * adp,int val)2564 packed_fill(video_adapter_t *adp, int val)
2565 {
2566 int length;
2567 int at; /* position in the frame buffer */
2568 int l;
2569
2570 at = 0;
2571 length = adp->va_line_width*adp->va_info.vi_height;
2572 while (length > 0) {
2573 l = imin(length, adp->va_window_size);
2574 vidd_set_win_org(adp, at);
2575 fill_io(val, adp->va_window, l);
2576 length -= l;
2577 at += l;
2578 }
2579 }
2580
2581 static void
direct_fill(video_adapter_t * adp,int val)2582 direct_fill(video_adapter_t *adp, int val)
2583 {
2584 int length;
2585 int at; /* position in the frame buffer */
2586 int l;
2587
2588 at = 0;
2589 length = adp->va_line_width*adp->va_info.vi_height;
2590 while (length > 0) {
2591 l = imin(length, adp->va_window_size);
2592 vidd_set_win_org(adp, at);
2593 switch (adp->va_info.vi_pixel_size) {
2594 case sizeof(u_int16_t):
2595 fillw_io(val, adp->va_window, l/sizeof(u_int16_t));
2596 break;
2597 case 3:
2598 /* FIXME */
2599 break;
2600 case sizeof(u_int32_t):
2601 filll_io(val, adp->va_window, l/sizeof(u_int32_t));
2602 break;
2603 }
2604 length -= l;
2605 at += l;
2606 }
2607 }
2608
2609 static int
vga_clear(video_adapter_t * adp)2610 vga_clear(video_adapter_t *adp)
2611 {
2612 switch (adp->va_info.vi_mem_model) {
2613 case V_INFO_MM_TEXT:
2614 /* do nothing? XXX */
2615 break;
2616 case V_INFO_MM_PLANAR:
2617 planar_fill(adp, 0);
2618 break;
2619 case V_INFO_MM_PACKED:
2620 packed_fill(adp, 0);
2621 break;
2622 case V_INFO_MM_DIRECT:
2623 direct_fill(adp, 0);
2624 break;
2625 }
2626 return 0;
2627 }
2628
2629 #ifdef notyet
2630 static void
planar_fill_rect(video_adapter_t * adp,int val,int x,int y,int cx,int cy)2631 planar_fill_rect(video_adapter_t *adp, int val, int x, int y, int cx, int cy)
2632 {
2633 int banksize;
2634 int bank;
2635 int pos;
2636 int offset; /* offset within window */
2637 int bx;
2638 int l;
2639
2640 outw(GDCIDX, 0x0005); /* read mode 0, write mode 0 */
2641 outw(GDCIDX, 0x0003); /* data rotate/function select */
2642 outw(GDCIDX, 0x0f01); /* set/reset enable */
2643 outw(GDCIDX, 0xff08); /* bit mask */
2644 outw(GDCIDX, (val << 8) | 0x00); /* set/reset */
2645
2646 banksize = adp->va_window_size;
2647 bank = -1;
2648 while (cy > 0) {
2649 pos = adp->va_line_width*y + x/8;
2650 if (bank != pos/banksize) {
2651 vidd_set_win_org(adp, pos);
2652 bank = pos/banksize;
2653 }
2654 offset = pos%banksize;
2655 bx = (x + cx)/8 - x/8;
2656 if (x % 8) {
2657 outw(GDCIDX, ((0xff00 >> (x % 8)) & 0xff00) | 0x08);
2658 writeb(adp->va_window + offset, 0);
2659 ++offset;
2660 --bx;
2661 if (offset >= banksize) {
2662 offset = 0;
2663 ++bank; /* next bank */
2664 vidd_set_win_org(adp, bank*banksize);
2665 }
2666 outw(GDCIDX, 0xff08); /* bit mask */
2667 }
2668 while (bx > 0) {
2669 l = imin(bx, banksize);
2670 bzero_io(adp->va_window + offset, l);
2671 offset += l;
2672 bx -= l;
2673 if (offset >= banksize) {
2674 offset = 0;
2675 ++bank; /* next bank */
2676 vidd_set_win_org(adp, bank*banksize);
2677 }
2678 }
2679 if ((x + cx) % 8) {
2680 outw(GDCIDX, (~(0xff00 >> ((x + cx) % 8)) & 0xff00) | 0x08);
2681 writeb(adp->va_window + offset, 0);
2682 ++offset;
2683 if (offset >= banksize) {
2684 offset = 0;
2685 ++bank; /* next bank */
2686 vidd_set_win_org(adp, bank*banksize);
2687 }
2688 outw(GDCIDX, 0xff08); /* bit mask */
2689 }
2690 ++y;
2691 --cy;
2692 }
2693
2694 outw(GDCIDX, 0xff08); /* bit mask */
2695 outw(GDCIDX, 0x0000); /* set/reset */
2696 outw(GDCIDX, 0x0001); /* set/reset enable */
2697 }
2698
2699 static void
packed_fill_rect(video_adapter_t * adp,int val,int x,int y,int cx,int cy)2700 packed_fill_rect(video_adapter_t *adp, int val, int x, int y, int cx, int cy)
2701 {
2702 int banksize;
2703 int bank;
2704 int pos;
2705 int offset; /* offset within window */
2706 int end;
2707
2708 banksize = adp->va_window_size;
2709 bank = -1;
2710 cx *= adp->va_info.vi_pixel_size;
2711 while (cy > 0) {
2712 pos = adp->va_line_width*y + x*adp->va_info.vi_pixel_size;
2713 if (bank != pos/banksize) {
2714 vidd_set_win_org(adp, pos);
2715 bank = pos/banksize;
2716 }
2717 offset = pos%banksize;
2718 end = imin(offset + cx, banksize);
2719 fill_io(val, adp->va_window + offset,
2720 (end - offset)/adp->va_info.vi_pixel_size);
2721 /* the line may cross the window boundary */
2722 if (offset + cx > banksize) {
2723 ++bank; /* next bank */
2724 vidd_set_win_org(adp, bank*banksize);
2725 end = offset + cx - banksize;
2726 fill_io(val, adp->va_window, end/adp->va_info.vi_pixel_size);
2727 }
2728 ++y;
2729 --cy;
2730 }
2731 }
2732
2733 static void
direct_fill_rect16(video_adapter_t * adp,int val,int x,int y,int cx,int cy)2734 direct_fill_rect16(video_adapter_t *adp, int val, int x, int y, int cx, int cy)
2735 {
2736 int banksize;
2737 int bank;
2738 int pos;
2739 int offset; /* offset within window */
2740 int end;
2741
2742 /*
2743 * XXX: the function assumes that banksize is a muliple of
2744 * sizeof(u_int16_t).
2745 */
2746 banksize = adp->va_window_size;
2747 bank = -1;
2748 cx *= sizeof(u_int16_t);
2749 while (cy > 0) {
2750 pos = adp->va_line_width*y + x*sizeof(u_int16_t);
2751 if (bank != pos/banksize) {
2752 vidd_set_win_org(adp, pos);
2753 bank = pos/banksize;
2754 }
2755 offset = pos%banksize;
2756 end = imin(offset + cx, banksize);
2757 fillw_io(val, adp->va_window + offset,
2758 (end - offset)/sizeof(u_int16_t));
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 end = offset + cx - banksize;
2764 fillw_io(val, adp->va_window, end/sizeof(u_int16_t));
2765 }
2766 ++y;
2767 --cy;
2768 }
2769 }
2770
2771 static void
direct_fill_rect24(video_adapter_t * adp,int val,int x,int y,int cx,int cy)2772 direct_fill_rect24(video_adapter_t *adp, int val, int x, int y, int cx, int cy)
2773 {
2774 int banksize;
2775 int bank;
2776 int pos;
2777 int offset; /* offset within window */
2778 int end;
2779 int i;
2780 int j;
2781 u_int8_t b[3];
2782
2783 b[0] = val & 0x0000ff;
2784 b[1] = (val >> 8) & 0x0000ff;
2785 b[2] = (val >> 16) & 0x0000ff;
2786 banksize = adp->va_window_size;
2787 bank = -1;
2788 cx *= 3;
2789 while (cy > 0) {
2790 pos = adp->va_line_width*y + x*3;
2791 if (bank != pos/banksize) {
2792 vidd_set_win_org(adp, pos);
2793 bank = pos/banksize;
2794 }
2795 offset = pos%banksize;
2796 end = imin(offset + cx, banksize);
2797 for (i = 0, j = offset; j < end; i = (++i)%3, ++j) {
2798 writeb(adp->va_window + j, b[i]);
2799 }
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 j = 0;
2805 end = offset + cx - banksize;
2806 for (; j < end; i = (++i)%3, ++j) {
2807 writeb(adp->va_window + j, b[i]);
2808 }
2809 }
2810 ++y;
2811 --cy;
2812 }
2813 }
2814
2815 static void
direct_fill_rect32(video_adapter_t * adp,int val,int x,int y,int cx,int cy)2816 direct_fill_rect32(video_adapter_t *adp, int val, int x, int y, int cx, int cy)
2817 {
2818 int banksize;
2819 int bank;
2820 int pos;
2821 int offset; /* offset within window */
2822 int end;
2823
2824 /*
2825 * XXX: the function assumes that banksize is a muliple of
2826 * sizeof(u_int32_t).
2827 */
2828 banksize = adp->va_window_size;
2829 bank = -1;
2830 cx *= sizeof(u_int32_t);
2831 while (cy > 0) {
2832 pos = adp->va_line_width*y + x*sizeof(u_int32_t);
2833 if (bank != pos/banksize) {
2834 vidd_set_win_org(adp, pos);
2835 bank = pos/banksize;
2836 }
2837 offset = pos%banksize;
2838 end = imin(offset + cx, banksize);
2839 filll_io(val, adp->va_window + offset,
2840 (end - offset)/sizeof(u_int32_t));
2841 /* the line may cross the window boundary */
2842 if (offset + cx > banksize) {
2843 ++bank; /* next bank */
2844 vidd_set_win_org(adp, bank*banksize);
2845 end = offset + cx - banksize;
2846 filll_io(val, adp->va_window, end/sizeof(u_int32_t));
2847 }
2848 ++y;
2849 --cy;
2850 }
2851 }
2852
2853 static int
vga_fill_rect(video_adapter_t * adp,int val,int x,int y,int cx,int cy)2854 vga_fill_rect(video_adapter_t *adp, int val, int x, int y, int cx, int cy)
2855 {
2856 switch (adp->va_info.vi_mem_model) {
2857 case V_INFO_MM_TEXT:
2858 /* do nothing? XXX */
2859 break;
2860 case V_INFO_MM_PLANAR:
2861 planar_fill_rect(adp, val, x, y, cx, cy);
2862 break;
2863 case V_INFO_MM_PACKED:
2864 packed_fill_rect(adp, val, x, y, cx, cy);
2865 break;
2866 case V_INFO_MM_DIRECT:
2867 switch (adp->va_info.vi_pixel_size) {
2868 case sizeof(u_int16_t):
2869 direct_fill_rect16(adp, val, x, y, cx, cy);
2870 break;
2871 case 3:
2872 direct_fill_rect24(adp, val, x, y, cx, cy);
2873 break;
2874 case sizeof(u_int32_t):
2875 direct_fill_rect32(adp, val, x, y, cx, cy);
2876 break;
2877 }
2878 break;
2879 }
2880 return 0;
2881 }
2882 #else /* !notyet */
2883 static int
vga_fill_rect(video_adapter_t * adp,int val,int x,int y,int cx,int cy)2884 vga_fill_rect(video_adapter_t *adp, int val, int x, int y, int cx, int cy)
2885 {
2886 return ENODEV;
2887 }
2888 #endif /* notyet */
2889
2890 static int
vga_bitblt(video_adapter_t * adp,...)2891 vga_bitblt(video_adapter_t *adp,...)
2892 {
2893 /* FIXME */
2894 return ENODEV;
2895 }
2896
2897 #endif /* !VGA_NO_MODE_CHANGE */
2898
2899 static int
get_palette(video_adapter_t * adp,int base,int count,u_char * red,u_char * green,u_char * blue,u_char * trans)2900 get_palette(video_adapter_t *adp, int base, int count,
2901 u_char *red, u_char *green, u_char *blue, u_char *trans)
2902 {
2903 u_char *r;
2904 u_char *g;
2905 u_char *b;
2906
2907 if (count < 0 || base < 0 || count > 256 || base > 256 ||
2908 base + count > 256)
2909 return EINVAL;
2910
2911 r = malloc(count*3, M_DEVBUF, M_WAITOK);
2912 g = r + count;
2913 b = g + count;
2914 if (vga_save_palette2(adp, base, count, r, g, b)) {
2915 free(r, M_DEVBUF);
2916 return ENODEV;
2917 }
2918 copyout(r, red, count);
2919 copyout(g, green, count);
2920 copyout(b, blue, count);
2921 if (trans != NULL) {
2922 bzero(r, count);
2923 copyout(r, trans, count);
2924 }
2925 free(r, M_DEVBUF);
2926
2927 return 0;
2928 }
2929
2930 static int
set_palette(video_adapter_t * adp,int base,int count,u_char * red,u_char * green,u_char * blue,u_char * trans)2931 set_palette(video_adapter_t *adp, int base, int count,
2932 u_char *red, u_char *green, u_char *blue, u_char *trans)
2933 {
2934 u_char *r;
2935 u_char *g;
2936 u_char *b;
2937 int err;
2938
2939 if (count < 0 || base < 0 || count > 256 || base > 256 ||
2940 base + count > 256)
2941 return EINVAL;
2942
2943 r = malloc(count*3, M_DEVBUF, M_WAITOK);
2944 g = r + count;
2945 b = g + count;
2946 err = copyin(red, r, count);
2947 if (!err)
2948 err = copyin(green, g, count);
2949 if (!err)
2950 err = copyin(blue, b, count);
2951 if (!err)
2952 err = vga_load_palette2(adp, base, count, r, g, b);
2953 free(r, M_DEVBUF);
2954
2955 return (err ? ENODEV : 0);
2956 }
2957
2958 static int
vga_dev_ioctl(video_adapter_t * adp,u_long cmd,caddr_t arg)2959 vga_dev_ioctl(video_adapter_t *adp, u_long cmd, caddr_t arg)
2960 {
2961 switch (cmd) {
2962 case FBIO_GETWINORG: /* get frame buffer window origin */
2963 *(u_int *)arg = 0;
2964 return 0;
2965
2966 case FBIO_SETWINORG: /* set frame buffer window origin */
2967 return ENODEV;
2968
2969 case FBIO_SETDISPSTART: /* set display start address */
2970 return (set_display_start(adp,
2971 ((video_display_start_t *)arg)->x,
2972 ((video_display_start_t *)arg)->y)
2973 ? ENODEV : 0);
2974
2975 case FBIO_SETLINEWIDTH: /* set scan line length in pixel */
2976 return (set_line_length(adp, *(u_int *)arg) ? ENODEV : 0);
2977
2978 case FBIO_GETPALETTE: /* get color palette */
2979 return get_palette(adp, ((video_color_palette_t *)arg)->index,
2980 ((video_color_palette_t *)arg)->count,
2981 ((video_color_palette_t *)arg)->red,
2982 ((video_color_palette_t *)arg)->green,
2983 ((video_color_palette_t *)arg)->blue,
2984 ((video_color_palette_t *)arg)->transparent);
2985
2986 case FBIO_SETPALETTE: /* set color palette */
2987 return set_palette(adp, ((video_color_palette_t *)arg)->index,
2988 ((video_color_palette_t *)arg)->count,
2989 ((video_color_palette_t *)arg)->red,
2990 ((video_color_palette_t *)arg)->green,
2991 ((video_color_palette_t *)arg)->blue,
2992 ((video_color_palette_t *)arg)->transparent);
2993
2994 case FBIOGTYPE: /* get frame buffer type info. */
2995 ((struct fbtype *)arg)->fb_type = fb_type(adp->va_type);
2996 ((struct fbtype *)arg)->fb_height = adp->va_info.vi_height;
2997 ((struct fbtype *)arg)->fb_width = adp->va_info.vi_width;
2998 ((struct fbtype *)arg)->fb_depth = adp->va_info.vi_depth;
2999 if ((adp->va_info.vi_depth <= 1) || (adp->va_info.vi_depth > 8))
3000 ((struct fbtype *)arg)->fb_cmsize = 0;
3001 else
3002 ((struct fbtype *)arg)->fb_cmsize = 1 << adp->va_info.vi_depth;
3003 ((struct fbtype *)arg)->fb_size = adp->va_buffer_size;
3004 return 0;
3005
3006 case FBIOGETCMAP: /* get color palette */
3007 return get_palette(adp, ((struct fbcmap *)arg)->index,
3008 ((struct fbcmap *)arg)->count,
3009 ((struct fbcmap *)arg)->red,
3010 ((struct fbcmap *)arg)->green,
3011 ((struct fbcmap *)arg)->blue, NULL);
3012
3013 case FBIOPUTCMAP: /* set color palette */
3014 return set_palette(adp, ((struct fbcmap *)arg)->index,
3015 ((struct fbcmap *)arg)->count,
3016 ((struct fbcmap *)arg)->red,
3017 ((struct fbcmap *)arg)->green,
3018 ((struct fbcmap *)arg)->blue, NULL);
3019
3020 default:
3021 return fb_commonioctl(adp, cmd, arg);
3022 }
3023 }
3024
3025 static void
dump_buffer(u_char * buf,size_t len)3026 dump_buffer(u_char *buf, size_t len)
3027 {
3028 int i;
3029
3030 for(i = 0; i < len;) {
3031 printf("%02x ", buf[i]);
3032 if ((++i % 16) == 0)
3033 printf("\n");
3034 }
3035 }
3036
3037 /*
3038 * diag():
3039 * Print some information about the video adapter and video modes,
3040 * with requested level of details.
3041 *
3042 * all adapters
3043 */
3044 static int
vga_diag(video_adapter_t * adp,int level)3045 vga_diag(video_adapter_t *adp, int level)
3046 {
3047 u_char *mp;
3048 #if FB_DEBUG > 1
3049 video_info_t info;
3050 int i;
3051 #endif
3052
3053 if (!vga_init_done)
3054 return ENXIO;
3055
3056 #if FB_DEBUG > 1
3057 #ifndef VGA_NO_BIOS
3058 printf("vga: RTC equip. code:0x%02x, DCC code:0x%02x\n",
3059 rtcin(RTC_EQUIPMENT), readb(BIOS_PADDRTOVADDR(0x488)));
3060 printf("vga: CRTC:0x%x, video option:0x%02x, ",
3061 readw(BIOS_PADDRTOVADDR(0x463)),
3062 readb(BIOS_PADDRTOVADDR(0x487)));
3063 printf("rows:%d, cols:%d, font height:%d\n",
3064 readb(BIOS_PADDRTOVADDR(0x44a)),
3065 readb(BIOS_PADDRTOVADDR(0x484)) + 1,
3066 readb(BIOS_PADDRTOVADDR(0x485)));
3067 #endif /* VGA_NO_BIOS */
3068 #if !defined(VGA_NO_BIOS) && !defined(VGA_NO_MODE_CHANGE)
3069 printf("vga: param table EGA/VGA:%p", video_mode_ptr);
3070 printf(", CGA/MDA:%p\n", video_mode_ptr2);
3071 printf("vga: rows_offset:%d\n", rows_offset);
3072 #endif
3073 #endif /* FB_DEBUG > 1 */
3074
3075 fb_dump_adp_info(VGA_DRIVER_NAME, adp, level);
3076
3077 #if FB_DEBUG > 1
3078 if (adp->va_flags & V_ADP_MODECHANGE) {
3079 for (i = 0; bios_vmode[i].vi_mode != EOT; ++i) {
3080 if (bios_vmode[i].vi_mode == NA)
3081 continue;
3082 if (get_mode_param(bios_vmode[i].vi_mode) == NULL)
3083 continue;
3084 fb_dump_mode_info(VGA_DRIVER_NAME, adp, &bios_vmode[i], level);
3085 }
3086 } else {
3087 vga_get_info(adp, adp->va_initial_mode, &info); /* shouldn't fail */
3088 fb_dump_mode_info(VGA_DRIVER_NAME, adp, &info, level);
3089 }
3090 #endif /* FB_DEBUG > 1 */
3091
3092 if ((adp->va_type != KD_EGA) && (adp->va_type != KD_VGA))
3093 return 0;
3094 #if !defined(VGA_NO_BIOS) && !defined(VGA_NO_MODE_CHANGE)
3095 if (video_mode_ptr == NULL)
3096 printf("vga%d: %s: WARNING: video mode switching is not "
3097 "fully supported on this adapter\n",
3098 adp->va_unit, adp->va_name);
3099 #endif
3100 if (level <= 0)
3101 return 0;
3102
3103 if (adp->va_type == KD_VGA) {
3104 printf("VGA parameters upon power-up\n");
3105 dump_buffer(adpstate.regs, sizeof(adpstate.regs));
3106 printf("VGA parameters in BIOS for mode %d\n", adp->va_initial_mode);
3107 dump_buffer(adpstate2.regs, sizeof(adpstate2.regs));
3108 }
3109
3110 mp = get_mode_param(adp->va_initial_mode);
3111 if (mp == NULL) /* this shouldn't be happening */
3112 return 0;
3113 printf("EGA/VGA parameters to be used for mode %d\n", adp->va_initial_mode);
3114 dump_buffer(mp, V_MODE_PARAM_SIZE);
3115
3116 return 0;
3117 }
3118