vgabios: Update copyright statements in bochsvga.c and vbe.c.
[seabios.git] / vgasrc / vbe.c
1 // Video Bios Extensions handlers
2 //
3 // Copyright (C) 2012  Kevin O'Connor <kevin@koconnor.net>
4 // Copyright (C) 2011  Julian Pidancet <julian.pidancet@citrix.com>
5 // Copyright (C) 2001-2008 the LGPL VGABios developers Team
6 //
7 // This file may be distributed under the terms of the GNU LGPLv3 license.
8
9 #include "vgabios.h" // handle_104f
10 #include "config.h" // CONFIG_*
11 #include "bregs.h" // struct bregs
12 #include "vbe.h" // struct vbe_info
13 #include "util.h" // dprintf
14 #include "biosvar.h" // get_global_set
15 #include "vgahw.h" // vgahw_set_mode
16
17 u32 VBE_total_memory VAR16 = 256 * 1024;
18 u32 VBE_capabilities VAR16;
19 u32 VBE_framebuffer VAR16;
20 u16 VBE_win_granularity VAR16 = 64;
21
22 static void
23 vbe_104f00(struct bregs *regs)
24 {
25     u16 seg = regs->es;
26     struct vbe_info *info = (void*)(regs->di+0);
27
28     if (GET_FARVAR(seg, info->signature) == VBE2_SIGNATURE) {
29         dprintf(4, "Get VBE Controller: VBE2 Signature found\n");
30     } else if (GET_FARVAR(seg, info->signature) == VESA_SIGNATURE) {
31         dprintf(4, "Get VBE Controller: VESA Signature found\n");
32     } else {
33         dprintf(4, "Get VBE Controller: Invalid Signature\n");
34     }
35
36     memset_far(seg, info, 0, sizeof(*info));
37
38     SET_FARVAR(seg, info->signature, VESA_SIGNATURE);
39
40     SET_FARVAR(seg, info->version, 0x0200);
41
42     SET_FARVAR(seg, info->oem_string,
43             SEGOFF(get_global_seg(), (u32)VBE_OEM_STRING));
44     SET_FARVAR(seg, info->capabilities, GET_GLOBAL(VBE_capabilities));
45
46     /* We generate our mode list in the reserved field of the info block */
47     u16 *destmode = (void*)info->reserved;
48     SET_FARVAR(seg, info->video_mode, SEGOFF(seg, (u32)destmode));
49
50     /* Total memory (in 64 blocks) */
51     SET_FARVAR(seg, info->total_memory
52                , GET_GLOBAL(VBE_total_memory) / (64*1024));
53
54     SET_FARVAR(seg, info->oem_vendor_string,
55             SEGOFF(get_global_seg(), (u32)VBE_VENDOR_STRING));
56     SET_FARVAR(seg, info->oem_product_string,
57             SEGOFF(get_global_seg(), (u32)VBE_PRODUCT_STRING));
58     SET_FARVAR(seg, info->oem_revision_string,
59             SEGOFF(get_global_seg(), (u32)VBE_REVISION_STRING));
60
61     /* Fill list of modes */
62     u16 *last = (void*)&info->reserved[sizeof(info->reserved)];
63     vgahw_list_modes(seg, destmode, last - 1);
64
65     regs->ax = 0x004f;
66 }
67
68 static void
69 vbe_104f01(struct bregs *regs)
70 {
71     u16 seg = regs->es;
72     struct vbe_mode_info *info = (void*)(regs->di+0);
73     u16 mode = regs->cx;
74
75     dprintf(1, "VBE mode info request: %x\n", mode);
76
77     struct vgamode_s *vmode_g = vgahw_find_mode(mode);
78     if (! vmode_g) {
79         dprintf(1, "VBE mode %x not found\n", mode);
80         regs->ax = 0x0100;
81         return;
82     }
83
84     memset_far(seg, info, 0, sizeof(*info));
85     u16 mode_attr = VBE_MODE_ATTRIBUTE_SUPPORTED |
86                     VBE_MODE_ATTRIBUTE_EXTENDED_INFORMATION_AVAILABLE |
87                     VBE_MODE_ATTRIBUTE_COLOR_MODE |
88                     VBE_MODE_ATTRIBUTE_GRAPHICS_MODE |
89                     VBE_MODE_ATTRIBUTE_NOT_VGA_COMPATIBLE;
90     u32 framebuffer = GET_GLOBAL(VBE_framebuffer);
91     int depth = GET_GLOBAL(vmode_g->depth);
92     if (depth == 4)
93         mode_attr |= VBE_MODE_ATTRIBUTE_TTY_BIOS_SUPPORT;
94     else if (framebuffer)
95         mode_attr |= VBE_MODE_ATTRIBUTE_LINEAR_FRAME_BUFFER_MODE;
96     SET_FARVAR(seg, info->mode_attributes, mode_attr);
97     SET_FARVAR(seg, info->winA_attributes,
98                VBE_WINDOW_ATTRIBUTE_RELOCATABLE |
99                VBE_WINDOW_ATTRIBUTE_READABLE |
100                VBE_WINDOW_ATTRIBUTE_WRITEABLE);
101     SET_FARVAR(seg, info->winB_attributes, 0);
102     SET_FARVAR(seg, info->win_granularity, GET_GLOBAL(VBE_win_granularity));
103     SET_FARVAR(seg, info->win_size, 64); /* Bank size 64K */
104     SET_FARVAR(seg, info->winA_seg, GET_GLOBAL(vmode_g->sstart));
105     SET_FARVAR(seg, info->winB_seg, 0x0);
106     extern void entry_104f05(void);
107     SET_FARVAR(seg, info->win_func_ptr
108                , SEGOFF(get_global_seg(), (u32)entry_104f05));
109     int width = GET_GLOBAL(vmode_g->width);
110     int height = GET_GLOBAL(vmode_g->height);
111     int linesize = width * DIV_ROUND_UP(depth, 8);
112     SET_FARVAR(seg, info->bytes_per_scanline, linesize);
113     SET_FARVAR(seg, info->xres, width);
114     SET_FARVAR(seg, info->yres, height);
115     SET_FARVAR(seg, info->xcharsize, GET_GLOBAL(vmode_g->cwidth));
116     SET_FARVAR(seg, info->ycharsize, GET_GLOBAL(vmode_g->cheight));
117     if (depth == 4)
118         SET_FARVAR(seg, info->planes, 4);
119     else
120         SET_FARVAR(seg, info->planes, 1);
121     SET_FARVAR(seg, info->bits_per_pixel, depth);
122     SET_FARVAR(seg, info->banks, 1);
123     SET_FARVAR(seg, info->mem_model, GET_GLOBAL(vmode_g->memmodel));
124     SET_FARVAR(seg, info->bank_size, 0);
125     u32 pages = GET_GLOBAL(VBE_total_memory) / (height * linesize);
126     if (depth == 4)
127         SET_FARVAR(seg, info->pages, (pages / 4) - 1);
128     else
129         SET_FARVAR(seg, info->pages, pages - 1);
130     SET_FARVAR(seg, info->reserved0, 1);
131
132     u8 r_size, r_pos, g_size, g_pos, b_size, b_pos, a_size, a_pos;
133
134     switch (depth) {
135     case 15: r_size = 5; r_pos = 10; g_size = 5; g_pos = 5;
136              b_size = 5; b_pos = 0; a_size = 1; a_pos = 15; break;
137     case 16: r_size = 5; r_pos = 11; g_size = 6; g_pos = 5;
138              b_size = 5; b_pos = 0; a_size = 0; a_pos = 0; break;
139     case 24: r_size = 8; r_pos = 16; g_size = 8; g_pos = 8;
140              b_size = 8; b_pos = 0; a_size = 0; a_pos = 0; break;
141     case 32: r_size = 8; r_pos = 16; g_size = 8; g_pos = 8;
142              b_size = 8; b_pos = 0; a_size = 8; a_pos = 24; break;
143     default: r_size = 0; r_pos = 0; g_size = 0; g_pos = 0;
144              b_size = 0; b_pos = 0; a_size = 0; a_pos = 0; break;
145     }
146
147     SET_FARVAR(seg, info->red_size, r_size);
148     SET_FARVAR(seg, info->red_pos, r_pos);
149     SET_FARVAR(seg, info->green_size, g_size);
150     SET_FARVAR(seg, info->green_pos, g_pos);
151     SET_FARVAR(seg, info->blue_size, b_size);
152     SET_FARVAR(seg, info->blue_pos, b_pos);
153     SET_FARVAR(seg, info->alpha_size, a_size);
154     SET_FARVAR(seg, info->alpha_pos, a_pos);
155
156     if (depth == 32)
157         SET_FARVAR(seg, info->directcolor_info,
158                    VBE_DIRECTCOLOR_RESERVED_BITS_AVAILABLE);
159     else
160         SET_FARVAR(seg, info->directcolor_info, 0);
161
162     if (depth > 4)
163         SET_FARVAR(seg, info->phys_base, GET_GLOBAL(VBE_framebuffer));
164     else
165         SET_FARVAR(seg, info->phys_base, 0);
166
167     SET_FARVAR(seg, info->reserved1, 0);
168     SET_FARVAR(seg, info->reserved2, 0);
169     SET_FARVAR(seg, info->linear_bytes_per_scanline, linesize);
170     SET_FARVAR(seg, info->bank_pages, 0);
171     SET_FARVAR(seg, info->linear_pages, 0);
172     SET_FARVAR(seg, info->linear_red_size, r_size);
173     SET_FARVAR(seg, info->linear_red_pos, r_pos);
174     SET_FARVAR(seg, info->linear_green_size, g_size);
175     SET_FARVAR(seg, info->linear_green_pos, g_pos);
176     SET_FARVAR(seg, info->linear_blue_size, b_size);
177     SET_FARVAR(seg, info->linear_blue_pos, b_pos);
178     SET_FARVAR(seg, info->linear_alpha_size, a_size);
179     SET_FARVAR(seg, info->linear_alpha_pos, a_pos);
180     SET_FARVAR(seg, info->pixclock_max, 0);
181
182     regs->ax = 0x004f;
183 }
184
185 static void
186 vbe_104f02(struct bregs *regs)
187 {
188     dprintf(1, "VBE mode set: %x\n", regs->bx);
189
190     int mode = regs->bx & ~MF_VBEFLAGS;
191     int flags = regs->bx & MF_VBEFLAGS;
192     int ret = vga_set_mode(mode, flags);
193
194     regs->ah = ret;
195     regs->al = 0x4f;
196 }
197
198 static void
199 vbe_104f03(struct bregs *regs)
200 {
201     regs->bx = GET_BDA(vbe_mode);
202     dprintf(1, "VBE current mode=%x\n", regs->bx);
203     regs->ax = 0x004f;
204 }
205
206 static void
207 vbe_104f04(struct bregs *regs)
208 {
209     debug_stub(regs);
210     regs->ax = 0x0100;
211 }
212
213 void VISIBLE16
214 vbe_104f05(struct bregs *regs)
215 {
216     if (regs->bh > 1 || regs->bl > 1)
217         goto fail;
218     if (GET_BDA(vbe_mode) & MF_LINEARFB) {
219         regs->ah = VBE_RETURN_STATUS_INVALID;
220         return;
221     }
222     struct vgamode_s *vmode_g = get_current_mode();
223     if (! vmode_g)
224         goto fail;
225     if (regs->bh) {
226         int ret = vgahw_get_window(vmode_g, regs->bl);
227         if (ret < 0)
228             goto fail;
229         regs->dx = ret;
230         regs->ax = 0x004f;
231         return;
232     }
233     int ret = vgahw_set_window(vmode_g, regs->bl, regs->dx);
234     if (ret)
235         goto fail;
236     regs->ax = 0x004f;
237     return;
238 fail:
239     regs->ax = 0x0100;
240 }
241
242 static void
243 vbe_104f06(struct bregs *regs)
244 {
245     if (regs->bl > 0x02)
246         goto fail;
247     struct vgamode_s *vmode_g = get_current_mode();
248     if (! vmode_g)
249         goto fail;
250     int bpp = vga_bpp(vmode_g);
251
252     if (regs->bl == 0x00) {
253         int ret = vgahw_set_linelength(vmode_g, DIV_ROUND_UP(regs->cx * bpp, 8));
254         if (ret)
255             goto fail;
256     } else if (regs->bl == 0x02) {
257         int ret = vgahw_set_linelength(vmode_g, regs->cx);
258         if (ret)
259             goto fail;
260     }
261     int linelength = vgahw_get_linelength(vmode_g);
262     if (linelength < 0)
263         goto fail;
264
265     regs->bx = linelength;
266     regs->cx = (linelength * 8) / bpp;
267     regs->dx = GET_GLOBAL(VBE_total_memory) / linelength;
268     regs->ax = 0x004f;
269     return;
270 fail:
271     regs->ax = 0x014f;
272 }
273
274 static void
275 vbe_104f07(struct bregs *regs)
276 {
277     struct vgamode_s *vmode_g = get_current_mode();
278     if (! vmode_g)
279         goto fail;
280     int bpp = vga_bpp(vmode_g);
281     int linelength = vgahw_get_linelength(vmode_g);
282     if (linelength < 0)
283         goto fail;
284
285     int ret;
286     switch (regs->bl) {
287     case 0x80:
288     case 0x00:
289         ret = vgahw_set_displaystart(
290             vmode_g, DIV_ROUND_UP(regs->cx * bpp, 8) + linelength * regs->dx);
291         if (ret)
292             goto fail;
293         break;
294     case 0x01:
295         ret = vgahw_get_displaystart(vmode_g);
296         if (ret < 0)
297             goto fail;
298         regs->dx = ret / linelength;
299         regs->cx = (ret % linelength) * 8 / bpp;
300         break;
301     default:
302         goto fail;
303     }
304     regs->ax = 0x004f;
305     return;
306 fail:
307     regs->ax = 0x014f;
308 }
309
310 static void
311 vbe_104f08(struct bregs *regs)
312 {
313     debug_stub(regs);
314     regs->ax = 0x0100;
315 }
316
317 static void
318 vbe_104f0a(struct bregs *regs)
319 {
320     debug_stub(regs);
321     regs->ax = 0x0100;
322 }
323
324 static void
325 vbe_104f10(struct bregs *regs)
326 {
327     switch (regs->bl) {
328     case 0x00:
329         regs->bx = 0x0f30;
330         break;
331     case 0x01:
332         SET_BDA(vbe_flag, regs->bh);
333         break;
334     case 0x02:
335         regs->bh = GET_BDA(vbe_flag);
336         break;
337     default:
338         regs->ax = 0x014f;
339         return;
340     }
341     regs->ax = 0x004f;
342 }
343
344 static void
345 vbe_104fXX(struct bregs *regs)
346 {
347     debug_stub(regs);
348     regs->ax = 0x0100;
349 }
350
351 void
352 handle_104f(struct bregs *regs)
353 {
354     if (!CONFIG_VGA_VBE) {
355         vbe_104fXX(regs);
356         return;
357     }
358
359     switch (regs->al) {
360     case 0x00: vbe_104f00(regs); break;
361     case 0x01: vbe_104f01(regs); break;
362     case 0x02: vbe_104f02(regs); break;
363     case 0x03: vbe_104f03(regs); break;
364     case 0x04: vbe_104f04(regs); break;
365     case 0x05: vbe_104f05(regs); break;
366     case 0x06: vbe_104f06(regs); break;
367     case 0x07: vbe_104f07(regs); break;
368     case 0x08: vbe_104f08(regs); break;
369     case 0x0a: vbe_104f0a(regs); break;
370     case 0x10: vbe_104f10(regs); break;
371     default:   vbe_104fXX(regs); break;
372     }
373 }