3 * Video BIOS Extensions (Vesa) Driver
\r
6 #define VERSION 0x100
\r
10 #include <tpl_drv_video.h>
\r
11 #include <fs_devfs.h>
\r
12 #include <modules.h>
\r
16 // === CONSTANTS ===
\r
17 #define FLAG_LFB 0x1
\r
18 #define VESA_DEFAULT_FRAMEBUFFER (KERNEL_BASE|0xA0000)
\r
19 #define VESA_CURSOR_PERIOD 1000
\r
21 // === PROTOTYPES ===
\r
22 int Vesa_Install(char **Arguments);
\r
23 Uint64 Vesa_Read(tVFS_Node *Node, Uint64 Offset, Uint64 Length, void *Buffer);
\r
24 Uint64 Vesa_Write(tVFS_Node *Node, Uint64 Offset, Uint64 Length, void *Buffer);
\r
25 int Vesa_Ioctl(tVFS_Node *Node, int ID, void *Data);
\r
26 int Vesa_Int_SetMode(int Mode);
\r
27 int Vesa_Int_FindMode(tVideo_IOCtl_Mode *data);
\r
28 int Vesa_Int_ModeInfo(tVideo_IOCtl_Mode *data);
\r
29 void Vesa_FlipCursor(void *Arg);
\r
30 // --- 2D Acceleration Functions --
\r
31 void Vesa_2D_Fill(void *Ent, Uint16 X, Uint16 Y, Uint16 W, Uint16 H, Uint32 Colour);
\r
32 void Vesa_2D_Blit(void *Ent, Uint16 DstX, Uint16 DstY, Uint16 SrcX, Uint16 SrcY, Uint16 W, Uint16 H);
\r
35 MODULE_DEFINE(0, VERSION, Vesa, Vesa_Install, NULL, "PCI", "VM8086", NULL);
\r
36 tDevFS_Driver gVesa_DriverStruct = {
\r
40 .Write = Vesa_Write,
\r
44 tSpinlock glVesa_Lock;
\r
45 tVM8086 *gpVesa_BiosState;
\r
46 int giVesaDriverId = -1;
\r
47 // --- Video Modes ---
\r
48 int giVesaCurrentMode = 0;
\r
49 int giVesaCurrentFormat = VIDEO_BUFFMT_TEXT;
\r
50 tVesa_Mode *gVesa_Modes;
\r
51 int giVesaModeCount = 0;
\r
52 // --- Framebuffer ---
\r
53 char *gpVesa_Framebuffer = (void*)VESA_DEFAULT_FRAMEBUFFER;
\r
54 int giVesaPageCount = 0; //!< Framebuffer size in pages
\r
55 // --- Cursor Control ---
\r
56 int giVesaCursorX = -1;
\r
57 int giVesaCursorY = -1;
\r
58 int giVesaCursorTimer = -1; // Invalid timer
\r
59 // --- 2D Video Stream Handlers ---
\r
60 tDrvUtil_Video_2DHandlers gVesa_2DFunctions = {
\r
67 int Vesa_Install(char **Arguments)
\r
69 tVesa_CallInfo *info;
\r
71 tVesa_CallModeInfo *modeinfo;
\r
72 tFarPtr modeinfoPtr;
\r
76 // Allocate Info Block
\r
77 gpVesa_BiosState = VM8086_Init();
\r
78 info = VM8086_Allocate(gpVesa_BiosState, 512, &infoPtr.seg, &infoPtr.ofs);
\r
79 modeinfo = VM8086_Allocate(gpVesa_BiosState, 512, &modeinfoPtr.seg, &modeinfoPtr.ofs);
\r
80 // Set Requested Version
\r
81 memcpy(info->signature, "VBE2", 4);
\r
83 gpVesa_BiosState->AX = 0x4F00;
\r
84 gpVesa_BiosState->ES = infoPtr.seg; gpVesa_BiosState->DI = infoPtr.ofs;
\r
86 VM8086_Int(gpVesa_BiosState, 0x10);
\r
87 if(gpVesa_BiosState->AX != 0x004F) {
\r
88 Log_Warning("VESA", "Vesa_Install - VESA/VBE Unsupported (AX = 0x%x)", gpVesa_BiosState->AX);
\r
89 return MODULE_ERR_NOTNEEDED;
\r
92 Log_Debug("VESA", "info->VideoModes = %04x:%04x", info->VideoModes.seg, info->VideoModes.ofs);
\r
93 modes = (Uint16 *) VM8086_GetPointer(gpVesa_BiosState, info->VideoModes.seg, info->VideoModes.ofs);
\r
96 for( giVesaModeCount = 0; modes[giVesaModeCount] != 0xFFFF; giVesaModeCount++ );
\r
97 gVesa_Modes = (tVesa_Mode *)malloc( giVesaModeCount * sizeof(tVesa_Mode) );
\r
100 gVesa_Modes[0].width = 80;
\r
101 gVesa_Modes[0].height = 25;
\r
102 gVesa_Modes[0].bpp = 12;
\r
103 gVesa_Modes[0].code = 0x3;
\r
104 gVesa_Modes[0].flags = 1;
\r
105 gVesa_Modes[0].fbSize = 80*25*2;
\r
106 gVesa_Modes[0].framebuffer = 0xB8000;
\r
108 for( i = 1; i < giVesaModeCount; i++ )
\r
110 gVesa_Modes[i].code = modes[i];
\r
112 gpVesa_BiosState->AX = 0x4F01;
\r
113 gpVesa_BiosState->CX = gVesa_Modes[i].code;
\r
114 gpVesa_BiosState->ES = modeinfoPtr.seg;
\r
115 gpVesa_BiosState->DI = modeinfoPtr.ofs;
\r
116 VM8086_Int(gpVesa_BiosState, 0x10);
\r
119 gVesa_Modes[i].flags = 0;
\r
120 if ( (modeinfo->attributes & 0x90) == 0x90 )
\r
122 gVesa_Modes[i].flags |= FLAG_LFB;
\r
123 gVesa_Modes[i].framebuffer = modeinfo->physbase;
\r
124 gVesa_Modes[i].fbSize = modeinfo->Xres*modeinfo->Yres*modeinfo->bpp/8;
\r
126 gVesa_Modes[i].framebuffer = 0;
\r
127 gVesa_Modes[i].fbSize = 0;
\r
130 gVesa_Modes[i].pitch = modeinfo->pitch;
\r
131 gVesa_Modes[i].width = modeinfo->Xres;
\r
132 gVesa_Modes[i].height = modeinfo->Yres;
\r
133 gVesa_Modes[i].bpp = modeinfo->bpp;
\r
136 Log_Log("VESA", "0x%x - %ix%ix%i",
\r
137 gVesa_Modes[i].code, gVesa_Modes[i].width, gVesa_Modes[i].height, gVesa_Modes[i].bpp);
\r
143 giVesaDriverId = DevFS_AddDevice( &gVesa_DriverStruct );
\r
144 if(giVesaDriverId == -1) return MODULE_ERR_MISC;
\r
146 return MODULE_ERR_OK;
\r
149 /* Read from the framebuffer
\r
151 Uint64 Vesa_Read(tVFS_Node *Node, Uint64 off, Uint64 len, void *buffer)
\r
154 Log("Vesa_Read: () - NULL\n");
\r
160 * \brief Write to the framebuffer
\r
162 Uint64 Vesa_Write(tVFS_Node *Node, Uint64 Offset, Uint64 Length, void *Buffer)
\r
164 ENTER("pNode XOffset XLength pBuffer", Node, Offset, Length, Buffer);
\r
166 if(Buffer == NULL) {
\r
171 // Default Text mode
\r
172 if( giVesaCurrentMode == 0 )
\r
174 Uint16 *fb = (Uint16*)(KERNEL_BASE|0xB8000);
\r
175 tVT_Char *chars = Buffer;
\r
178 Length /= sizeof(tVT_Char);
\r
179 Offset /= sizeof(tVT_Char);
\r
181 if( giVesaCurrentFormat != VIDEO_BUFFMT_TEXT ) {
\r
182 Log_Warning("VESA", "Vesa_Write - Mode 0 is not framebuffer");
\r
187 if( Offset + Length > 25*80 ) {
\r
188 Log_Warning("VESA", "Vesa_Write - Framebuffer Overflow");
\r
194 LOG("fb = %p", fb);
\r
195 for(rem = Length; rem --; fb ++, chars++)
\r
197 if( chars->Ch < 0x80 )
\r
198 *fb = chars->Ch & 0x7F;
\r
202 *fb |= (chars->FGCol & 0x888) == 0x888 ? 0x8 : 0;
\r
203 *fb |= (chars->FGCol & 0x700) > 0x300 ? 0x4 : 0;
\r
204 *fb |= (chars->FGCol & 0x070) > 0x030 ? 0x2 : 0;
\r
205 *fb |= (chars->FGCol & 0x007) > 0x003 ? 0x1 : 0;
\r
206 *fb |= (chars->BGCol & 0x888) == 0x888 ? 0x80 : 0;
\r
207 *fb |= (chars->BGCol & 0x700) > 0x300 ? 0x40 : 0;
\r
208 *fb |= (chars->BGCol & 0x070) > 0x030 ? 0x20 : 0;
\r
209 *fb |= (chars->BGCol & 0x007) > 0x003 ? 0x10 : 0;
\r
210 //LOG("%08x (%03x,%03x) = %04x",
\r
211 // chars->Ch, chars->BGCol, chars->FGCol, *fb);
\r
213 Length *= sizeof(tVT_Char);
\r
214 LEAVE('X', Length);
\r
218 if( gVesa_Modes[giVesaCurrentMode].framebuffer == 0 ) {
\r
219 Log_Warning("VESA", "Vesa_Write - Non-LFB Modes not yet supported.");
\r
225 switch( giVesaCurrentFormat )
\r
227 case VIDEO_BUFFMT_TEXT:
\r
229 tVT_Char *chars = Buffer;
\r
230 int pitch = gVesa_Modes[giVesaCurrentMode].width;
\r
231 int widthInChars = gVesa_Modes[giVesaCurrentMode].width/giVT_CharWidth;
\r
232 int heightInChars = gVesa_Modes[giVesaCurrentMode].height/giVT_CharHeight;
\r
234 Uint32 *dest = (void*)gpVesa_Framebuffer;
\r
237 Length /= sizeof(tVT_Char);
\r
238 Offset /= sizeof(tVT_Char);
\r
240 LOG("gVesa_Modes[%i].width = %i", giVesaCurrentMode, gVesa_Modes[giVesaCurrentMode].width);
\r
241 x = Offset % widthInChars;
\r
242 y = Offset / widthInChars;
\r
243 LOG("(x,y) = (%i,%i) = [%i,%i]", x, y, x * giVT_CharWidth, y * giVT_CharHeight * pitch);
\r
244 LOG("(w,h) = (%i,%i) = [%i,%i]",
\r
245 (int)(Length % widthInChars),
\r
246 (int)(Length / widthInChars),
\r
247 (int)((Length % widthInChars) * giVT_CharWidth),
\r
248 (int)((Length / widthInChars) * giVT_CharHeight * pitch)
\r
252 if(y >= heightInChars) {
\r
257 if( Offset + Length > heightInChars*widthInChars ) {
\r
258 Log_Debug("VESA", "%i + %i > %i*%i (%i)",
\r
259 (int)Offset, (int)Length, heightInChars, widthInChars, heightInChars*widthInChars);
\r
260 Length = heightInChars*widthInChars - Offset;
\r
261 Log_Notice("VESA", "Clipping write size to %i characters", (int)Length);
\r
264 dest += y * giVT_CharHeight * pitch;
\r
265 dest += x * giVT_CharWidth;
\r
267 LOG("dest = %p", dest);
\r
269 for( i = 0; i < Length; i++ )
\r
273 dest + x*giVT_CharWidth, pitch,
\r
274 VT_Colour12to24(chars->BGCol),
\r
275 VT_Colour12to24(chars->FGCol)
\r
280 if( x >= widthInChars ) {
\r
283 dest += pitch*giVT_CharHeight;
\r
286 Length *= sizeof(tVT_Char);
\r
290 case VIDEO_BUFFMT_FRAMEBUFFER:
\r
292 Uint8 *destBuf = (Uint8*) ((Uint)gpVesa_Framebuffer + (Uint)Offset);
\r
294 if(gVesa_Modes[giVesaCurrentMode].fbSize < Offset+Length)
\r
296 Log_Warning("VESA", "Vesa_Write - Framebuffer Overflow");
\r
301 LOG("buffer = %p", Buffer);
\r
302 LOG("Updating Framebuffer (%p to %p)", destBuf, destBuf + (Uint)Length);
\r
305 // Copy to Frambuffer
\r
306 memcpy(destBuf, Buffer, Length);
\r
308 LOG("BGA Framebuffer updated");
\r
312 case VIDEO_BUFFMT_2DSTREAM:
\r
313 Length = DrvUtil_Video_2DStream(
\r
314 NULL, // Single framebuffer, so Ent is unused
\r
315 Buffer, Length, &gVesa_2DFunctions, sizeof(gVesa_2DFunctions)
\r
324 LEAVE('X', Length);
\r
329 * \fn int Vesa_Ioctl(vfs_node *node, int id, void *data)
\r
330 * \brief Handle messages to the device
\r
332 int Vesa_Ioctl(tVFS_Node *Node, int ID, void *Data)
\r
335 //Log_Debug("VESA", "Vesa_Ioctl: (Node=%p, ID=%i, Data=%p)", Node, ID, Data);
\r
338 case DRV_IOCTL_TYPE: return DRV_TYPE_VIDEO;
\r
339 case DRV_IOCTL_IDENT: memcpy("VESA", Data, 4); return 1;
\r
340 case DRV_IOCTL_VERSION: return VERSION;
\r
342 case VIDEO_IOCTL_GETSETMODE:
\r
343 if( !Data ) return giVesaCurrentMode;
\r
344 return Vesa_Int_SetMode( *(int*)Data );
\r
346 case VIDEO_IOCTL_FINDMODE:
\r
347 return Vesa_Int_FindMode((tVideo_IOCtl_Mode*)Data);
\r
348 case VIDEO_IOCTL_MODEINFO:
\r
349 return Vesa_Int_ModeInfo((tVideo_IOCtl_Mode*)Data);
\r
351 case VIDEO_IOCTL_SETBUFFORMAT:
\r
352 ret = giVesaCurrentFormat;
\r
354 //Log_Log("VESA", "Buffer mode to %i", *(int*)Data);
\r
355 giVesaCurrentFormat = *(int*)Data;
\r
359 case VIDEO_IOCTL_SETCURSOR: // Set cursor position
\r
360 giVesaCursorX = ((tVideo_IOCtl_Pos*)Data)->x;
\r
361 giVesaCursorY = ((tVideo_IOCtl_Pos*)Data)->y;
\r
363 giVesaCursorX < 0 || giVesaCursorY < 0
\r
364 || giVesaCursorX >= gVesa_Modes[giVesaCurrentMode].width
\r
365 || giVesaCursorY >= gVesa_Modes[giVesaCurrentMode].height)
\r
367 if(giVesaCursorTimer != -1)
\r
368 Time_RemoveTimer(giVesaCursorTimer);
\r
369 giVesaCursorX = -1;
\r
370 giVesaCursorY = -1;
\r
373 if(giVesaCursorTimer == -1)
\r
374 giVesaCursorTimer = Time_CreateTimer(VESA_CURSOR_PERIOD, Vesa_FlipCursor, Node);
\r
378 case VIDEO_IOCTL_REQLFB: // Request Linear Framebuffer
\r
385 * \brief Updates the video mode
\r
387 int Vesa_Int_SetMode(int mode)
\r
389 Log_Log("VESA", "Setting mode to %i", mode);
\r
391 // Sanity Check values
\r
392 if(mode < 0 || mode > giVesaModeCount) return -1;
\r
394 // Check for fast return
\r
395 if(mode == giVesaCurrentMode) return 1;
\r
397 Time_RemoveTimer(giVesaCursorTimer);
\r
399 LOCK( &glVesa_Lock );
\r
401 gpVesa_BiosState->AX = 0x4F02;
\r
402 gpVesa_BiosState->BX = gVesa_Modes[mode].code;
\r
403 if(gVesa_Modes[mode].flags & FLAG_LFB) {
\r
404 Log_Log("VESA", "Using LFB");
\r
405 gpVesa_BiosState->BX |= 0x4000; // Bit 14 - Use LFB
\r
409 VM8086_Int(gpVesa_BiosState, 0x10);
\r
412 if( (tVAddr)gpVesa_Framebuffer != VESA_DEFAULT_FRAMEBUFFER )
\r
413 MM_UnmapHWPages((tVAddr)gpVesa_Framebuffer, giVesaPageCount);
\r
414 giVesaPageCount = (gVesa_Modes[mode].fbSize + 0xFFF) >> 12;
\r
415 gpVesa_Framebuffer = (void*)MM_MapHWPages(gVesa_Modes[mode].framebuffer, giVesaPageCount);
\r
417 Log_Log("VESA", "Framebuffer (Phys) = 0x%x", gVesa_Modes[mode].framebuffer);
\r
418 Log_Log("VESA", "Framebuffer (Virt) = 0x%x", gpVesa_Framebuffer);
\r
421 giVesaCurrentMode = mode;
\r
423 RELEASE( &glVesa_Lock );
\r
428 int Vesa_Int_FindMode(tVideo_IOCtl_Mode *data)
\r
431 int best = -1, bestFactor = 1000;
\r
434 ENTER("idata->width idata->height idata->bpp", data->width, data->height, data->bpp);
\r
436 for(i=0;i<giVesaModeCount;i++)
\r
438 LOG("Mode %i (%ix%ix%i)", i, gVesa_Modes[i].width, gVesa_Modes[i].height, gVesa_Modes[i].bpp);
\r
440 if(gVesa_Modes[i].width == data->width
\r
441 && gVesa_Modes[i].height == data->height
\r
442 && gVesa_Modes[i].bpp == data->bpp)
\r
449 tmp = gVesa_Modes[i].width * gVesa_Modes[i].height * gVesa_Modes[i].bpp;
\r
450 tmp -= data->width * data->height * data->bpp;
\r
451 tmp = tmp < 0 ? -tmp : tmp;
\r
452 factor = tmp * 100 / (data->width * data->height * data->bpp);
\r
454 LOG("factor = %i", factor);
\r
456 if(factor < bestFactor)
\r
458 bestFactor = factor;
\r
463 data->width = gVesa_Modes[best].width;
\r
464 data->height = gVesa_Modes[best].height;
\r
465 data->bpp = gVesa_Modes[best].bpp;
\r
470 int Vesa_Int_ModeInfo(tVideo_IOCtl_Mode *data)
\r
472 if(data->id < 0 || data->id > giVesaModeCount) return -1;
\r
473 data->width = gVesa_Modes[data->id].width;
\r
474 data->height = gVesa_Modes[data->id].height;
\r
475 data->bpp = gVesa_Modes[data->id].bpp;
\r
480 * \brief Updates the state of the text cursor
\r
481 * \note Just does a bitwise not on the cursor region
\r
483 void Vesa_FlipCursor(void *Arg)
\r
485 int pitch = gVesa_Modes[giVesaCurrentMode].pitch/4;
\r
486 int x = giVesaCursorX*giVT_CharWidth;
\r
487 int y = giVesaCursorY*giVT_CharHeight;
\r
489 Uint32 *fb = (void*)gpVesa_Framebuffer;
\r
491 if(giVesaCursorX < 0 || giVesaCursorY < 0) return;
\r
493 for( i = 1; i < giVT_CharHeight-1; i++ )
\r
494 fb[(y+i)*pitch+x] = ~fb[(y+i)*pitch+x];
\r
496 giVesaCursorTimer = Time_CreateTimer(VESA_CURSOR_PERIOD, Vesa_FlipCursor, Arg);
\r
499 // ------------------------
\r
500 // --- 2D Accelleration ---
\r
501 // ------------------------
\r
502 void Vesa_2D_Fill(void *Ent, Uint16 X, Uint16 Y, Uint16 W, Uint16 H, Uint32 Colour)
\r
504 int scrnwidth = gVesa_Modes[giVesaCurrentMode].width;
\r
505 Uint32 *buf = (Uint32*)gpVesa_Framebuffer + Y*scrnwidth + X;
\r
507 memsetd(buf, Colour, W);
\r
512 void Vesa_2D_Blit(void *Ent, Uint16 DstX, Uint16 DstY, Uint16 SrcX, Uint16 SrcY, Uint16 W, Uint16 H)
\r
514 int scrnpitch = gVesa_Modes[giVesaCurrentMode].pitch;
\r
515 int dst = DstY*scrnpitch + DstX;
\r
516 int src = SrcY*scrnpitch + SrcX;
\r
519 //Log("Vesa_2D_Blit: (Ent=%p, DstX=%i, DstY=%i, SrcX=%i, SrcY=%i, W=%i, H=%i)",
\r
520 // Ent, DstX, DstY, SrcX, SrcY, W, H);
\r
522 if(SrcX + W > gVesa_Modes[giVesaCurrentMode].width)
\r
523 W = gVesa_Modes[giVesaCurrentMode].width - SrcX;
\r
524 if(DstX + W > gVesa_Modes[giVesaCurrentMode].width)
\r
525 W = gVesa_Modes[giVesaCurrentMode].width - DstX;
\r
526 if(SrcY + H > gVesa_Modes[giVesaCurrentMode].height)
\r
527 H = gVesa_Modes[giVesaCurrentMode].height - SrcY;
\r
528 if(DstY + H > gVesa_Modes[giVesaCurrentMode].height)
\r
529 H = gVesa_Modes[giVesaCurrentMode].height - DstY;
\r
531 //Debug("W = %i, H = %i", W, H);
\r
535 dst += H*scrnpitch;
\r
536 src += H*scrnpitch;
\r
541 for( tmp = W; tmp --; ) {
\r
542 *(Uint32*)(gpVesa_Framebuffer + dst + tmp) = *(Uint32*)(gpVesa_Framebuffer + src + tmp);
\r
547 // Normal copy is OK
\r
549 memcpy((void*)gpVesa_Framebuffer + dst, (void*)gpVesa_Framebuffer + src, W*sizeof(Uint32));
\r