3 * Video BIOS Extensions (Vesa) Driver
\r
6 #define VERSION 0x100
\r
10 #include <api_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 BLINKING_CURSOR 1
\r
21 # define VESA_CURSOR_PERIOD 1000
\r
24 // === PROTOTYPES ===
\r
25 int Vesa_Install(char **Arguments);
\r
26 Uint64 Vesa_Read(tVFS_Node *Node, Uint64 Offset, Uint64 Length, void *Buffer);
\r
27 Uint64 Vesa_Write(tVFS_Node *Node, Uint64 Offset, Uint64 Length, void *Buffer);
\r
28 int Vesa_IOCtl(tVFS_Node *Node, int ID, void *Data);
\r
29 int Vesa_Int_SetMode(int Mode);
\r
30 int Vesa_Int_FindMode(tVideo_IOCtl_Mode *data);
\r
31 int Vesa_Int_ModeInfo(tVideo_IOCtl_Mode *data);
\r
32 void Vesa_FlipCursor(void *Arg);
\r
33 // --- 2D Acceleration Functions --
\r
34 void Vesa_2D_Fill(void *Ent, Uint16 X, Uint16 Y, Uint16 W, Uint16 H, Uint32 Colour);
\r
35 void Vesa_2D_Blit(void *Ent, Uint16 DstX, Uint16 DstY, Uint16 SrcX, Uint16 SrcY, Uint16 W, Uint16 H);
\r
38 MODULE_DEFINE(0, VERSION, Vesa, Vesa_Install, NULL, "PCI", "VM8086", NULL);
\r
39 tDevFS_Driver gVesa_DriverStruct = {
\r
43 .Write = Vesa_Write,
\r
48 tVM8086 *gpVesa_BiosState;
\r
49 int giVesaDriverId = -1;
\r
50 // --- Video Modes ---
\r
51 int giVesaCurrentMode = 0;
\r
52 tVesa_Mode *gVesa_Modes;
\r
53 tVesa_Mode *gpVesaCurMode;
\r
54 int giVesaModeCount = 0;
\r
55 // --- Framebuffer ---
\r
56 char *gpVesa_Framebuffer = (void*)VESA_DEFAULT_FRAMEBUFFER;
\r
57 int giVesaPageCount = 0; //!< Framebuffer size in pages
\r
58 // --- Cursor Control ---
\r
59 int giVesaCursorX = -1;
\r
60 int giVesaCursorY = -1;
\r
61 int giVesaCursorTimer = -1; // Invalid timer
\r
62 // --- 2D Video Stream Handlers ---
\r
63 tDrvUtil_Video_2DHandlers gVesa_2DFunctions = {
\r
68 tDrvUtil_Video_BufInfo gVesa_BufInfo;
\r
71 int Vesa_Install(char **Arguments)
\r
73 tVesa_CallInfo *info;
\r
75 tVesa_CallModeInfo *modeinfo;
\r
76 tFarPtr modeinfoPtr;
\r
80 // Allocate Info Block
\r
81 gpVesa_BiosState = VM8086_Init();
\r
82 info = VM8086_Allocate(gpVesa_BiosState, 512, &infoPtr.seg, &infoPtr.ofs);
\r
83 modeinfo = VM8086_Allocate(gpVesa_BiosState, 512, &modeinfoPtr.seg, &modeinfoPtr.ofs);
\r
84 // Set Requested Version
\r
85 memcpy(info->signature, "VBE2", 4);
\r
87 gpVesa_BiosState->AX = 0x4F00;
\r
88 gpVesa_BiosState->ES = infoPtr.seg; gpVesa_BiosState->DI = infoPtr.ofs;
\r
90 VM8086_Int(gpVesa_BiosState, 0x10);
\r
91 if(gpVesa_BiosState->AX != 0x004F) {
\r
92 Log_Warning("VESA", "Vesa_Install - VESA/VBE Unsupported (AX = 0x%x)", gpVesa_BiosState->AX);
\r
93 return MODULE_ERR_NOTNEEDED;
\r
96 //Log_Debug("VESA", "info->VideoModes = %04x:%04x", info->VideoModes.seg, info->VideoModes.ofs);
\r
97 modes = (Uint16 *) VM8086_GetPointer(gpVesa_BiosState, info->VideoModes.seg, info->VideoModes.ofs);
\r
100 for( giVesaModeCount = 0; modes[giVesaModeCount] != 0xFFFF; giVesaModeCount++ );
\r
101 gVesa_Modes = (tVesa_Mode *)malloc( giVesaModeCount * sizeof(tVesa_Mode) );
\r
103 Log_Debug("VESA", "%i Modes", giVesaModeCount);
\r
105 // Insert Text Mode
\r
106 gVesa_Modes[0].width = 80;
\r
107 gVesa_Modes[0].height = 25;
\r
108 gVesa_Modes[0].bpp = 12;
\r
109 gVesa_Modes[0].code = 0x3;
\r
110 gVesa_Modes[0].flags = 1;
\r
111 gVesa_Modes[0].fbSize = 80*25*2;
\r
112 gVesa_Modes[0].framebuffer = 0xB8000;
\r
114 for( i = 1; i < giVesaModeCount; i++ )
\r
116 gVesa_Modes[i].code = modes[i];
\r
118 gpVesa_BiosState->AX = 0x4F01;
\r
119 gpVesa_BiosState->CX = gVesa_Modes[i].code;
\r
120 gpVesa_BiosState->ES = modeinfoPtr.seg;
\r
121 gpVesa_BiosState->DI = modeinfoPtr.ofs;
\r
122 VM8086_Int(gpVesa_BiosState, 0x10);
\r
125 gVesa_Modes[i].flags = 0;
\r
126 if ( (modeinfo->attributes & 0x90) == 0x90 )
\r
128 gVesa_Modes[i].flags |= FLAG_LFB;
\r
129 gVesa_Modes[i].framebuffer = modeinfo->physbase;
\r
130 gVesa_Modes[i].fbSize = modeinfo->Yres*modeinfo->pitch;
\r
132 gVesa_Modes[i].framebuffer = 0;
\r
133 gVesa_Modes[i].fbSize = 0;
\r
136 gVesa_Modes[i].pitch = modeinfo->pitch;
\r
137 gVesa_Modes[i].width = modeinfo->Xres;
\r
138 gVesa_Modes[i].height = modeinfo->Yres;
\r
139 gVesa_Modes[i].bpp = modeinfo->bpp;
\r
142 Log_Log("VESA", "0x%x - %ix%ix%i",
\r
143 gVesa_Modes[i].code, gVesa_Modes[i].width, gVesa_Modes[i].height, gVesa_Modes[i].bpp);
\r
149 giVesaDriverId = DevFS_AddDevice( &gVesa_DriverStruct );
\r
150 if(giVesaDriverId == -1) return MODULE_ERR_MISC;
\r
152 return MODULE_ERR_OK;
\r
155 /* Read from the framebuffer
\r
157 Uint64 Vesa_Read(tVFS_Node *Node, Uint64 off, Uint64 len, void *buffer)
\r
160 Log("Vesa_Read: () - NULL\n");
\r
166 * \brief Write to the framebuffer
\r
168 Uint64 Vesa_Write(tVFS_Node *Node, Uint64 Offset, Uint64 Length, void *Buffer)
\r
170 if( gVesa_Modes[giVesaCurrentMode].framebuffer == 0 ) {
\r
171 Log_Warning("VESA", "Vesa_Write - Non-LFB Modes not yet supported.");
\r
175 return DrvUtil_Video_WriteLFB(&gVesa_BufInfo, Offset, Length, Buffer);
\r
178 const char *csaVESA_IOCtls[] = {DRV_IOCTLNAMES, DRV_VIDEO_IOCTLNAMES, NULL};
\r
180 * \brief Handle messages to the device
\r
182 int Vesa_IOCtl(tVFS_Node *Node, int ID, void *Data)
\r
185 //Log_Debug("VESA", "Vesa_Ioctl: (Node=%p, ID=%i, Data=%p)", Node, ID, Data);
\r
188 BASE_IOCTLS(DRV_TYPE_VIDEO, "VESA", VERSION, csaVESA_IOCtls);
\r
190 case VIDEO_IOCTL_GETSETMODE:
\r
191 if( !Data ) return giVesaCurrentMode;
\r
192 return Vesa_Int_SetMode( *(int*)Data );
\r
194 case VIDEO_IOCTL_FINDMODE:
\r
195 return Vesa_Int_FindMode((tVideo_IOCtl_Mode*)Data);
\r
196 case VIDEO_IOCTL_MODEINFO:
\r
197 return Vesa_Int_ModeInfo((tVideo_IOCtl_Mode*)Data);
\r
199 case VIDEO_IOCTL_SETBUFFORMAT:
\r
200 ret = gVesa_BufInfo.BufferFormat;
\r
201 if(Data) gVesa_BufInfo.BufferFormat = *(int*)Data;
\r
204 case VIDEO_IOCTL_SETCURSOR: // Set cursor position
\r
205 #if !BLINKING_CURSOR
\r
206 if(giVesaCursorX >= 0)
\r
207 Vesa_FlipCursor(Node);
\r
209 giVesaCursorX = ((tVideo_IOCtl_Pos*)Data)->x;
\r
210 giVesaCursorY = ((tVideo_IOCtl_Pos*)Data)->y;
\r
211 //Log_Debug("VESA", "Cursor position (%i,%i)", giVesaCursorX, giVesaCursorY);
\r
213 giVesaCursorX < 0 || giVesaCursorY < 0
\r
214 || giVesaCursorX >= gpVesaCurMode->width/giVT_CharWidth
\r
215 || giVesaCursorY >= gpVesaCurMode->height/giVT_CharHeight)
\r
217 #if BLINKING_CURSOR
\r
218 if(giVesaCursorTimer != -1) {
\r
219 Time_RemoveTimer(giVesaCursorTimer);
\r
220 giVesaCursorTimer = -1;
\r
223 giVesaCursorX = -1;
\r
224 giVesaCursorY = -1;
\r
227 #if BLINKING_CURSOR
\r
228 // Log_Debug("VESA", "Updating timer %i?", giVesaCursorTimer);
\r
229 if(giVesaCursorTimer == -1)
\r
230 giVesaCursorTimer = Time_CreateTimer(VESA_CURSOR_PERIOD, Vesa_FlipCursor, Node);
\r
232 Vesa_FlipCursor(Node);
\r
235 //Log_Debug("VESA", "Cursor position (%i,%i) Timer %i", giVesaCursorX, giVesaCursorY, giVesaCursorTimer);
\r
242 * \brief Updates the video mode
\r
244 int Vesa_Int_SetMode(int mode)
\r
246 // Sanity Check values
\r
247 if(mode < 0 || mode > giVesaModeCount) return -1;
\r
249 Log_Log("VESA", "Setting mode to %i (%ix%i %ibpp)",
\r
251 gVesa_Modes[mode].width, gVesa_Modes[mode].height,
\r
252 gVesa_Modes[mode].bpp
\r
255 // Check for fast return
\r
256 if(mode == giVesaCurrentMode) return 1;
\r
258 Time_RemoveTimer(giVesaCursorTimer);
\r
259 giVesaCursorTimer = -1;
\r
261 Mutex_Acquire( &glVesa_Lock );
\r
263 gpVesa_BiosState->AX = 0x4F02;
\r
264 gpVesa_BiosState->BX = gVesa_Modes[mode].code;
\r
265 if(gVesa_Modes[mode].flags & FLAG_LFB) {
\r
266 Log_Log("VESA", "Using LFB");
\r
267 gpVesa_BiosState->BX |= 0x4000; // Bit 14 - Use LFB
\r
271 VM8086_Int(gpVesa_BiosState, 0x10);
\r
274 if( (tVAddr)gpVesa_Framebuffer != VESA_DEFAULT_FRAMEBUFFER )
\r
275 MM_UnmapHWPages((tVAddr)gpVesa_Framebuffer, giVesaPageCount);
\r
276 giVesaPageCount = (gVesa_Modes[mode].fbSize + 0xFFF) >> 12;
\r
277 gpVesa_Framebuffer = (void*)MM_MapHWPages(gVesa_Modes[mode].framebuffer, giVesaPageCount);
\r
279 Log_Log("VESA", "Framebuffer (Phys) = 0x%x, (Virt) = 0x%x, Size = 0x%x",
\r
280 gVesa_Modes[mode].framebuffer, gpVesa_Framebuffer, giVesaPageCount << 12);
\r
283 giVesaCurrentMode = mode;
\r
284 gpVesaCurMode = &gVesa_Modes[giVesaCurrentMode];
\r
286 Mutex_Release( &glVesa_Lock );
\r
288 gVesa_BufInfo.Framebuffer = gpVesa_Framebuffer;
\r
289 gVesa_BufInfo.Pitch = gVesa_Modes[mode].pitch;
\r
290 gVesa_BufInfo.Width = gVesa_Modes[mode].width;
\r
291 gVesa_BufInfo.Height = gVesa_Modes[mode].height;
\r
292 gVesa_BufInfo.Depth = gVesa_Modes[mode].bpp;
\r
297 int Vesa_Int_FindMode(tVideo_IOCtl_Mode *data)
\r
300 int best = -1, bestFactor = 1000;
\r
303 ENTER("idata->width idata->height idata->bpp", data->width, data->height, data->bpp);
\r
305 for(i=0;i<giVesaModeCount;i++)
\r
307 LOG("Mode %i (%ix%ix%i)", i, gVesa_Modes[i].width, gVesa_Modes[i].height, gVesa_Modes[i].bpp);
\r
309 if(gVesa_Modes[i].width == data->width && gVesa_Modes[i].height == data->height)
\r
311 //if( (data->bpp == 32 || data->bpp == 24)
\r
312 // && (gVesa_Modes[i].bpp == 32 || gVesa_Modes[i].bpp == 24) )
\r
313 if( data->bpp == gVesa_Modes[i].bpp )
\r
321 tmp = gVesa_Modes[i].width * gVesa_Modes[i].height;
\r
322 tmp -= data->width * data->height;
\r
323 tmp = tmp < 0 ? -tmp : tmp;
\r
324 factor = tmp * 1000 / (data->width * data->height);
\r
326 if( data->bpp == 8 && gVesa_Modes[i].bpp != 8 ) continue;
\r
327 if( data->bpp == 16 && gVesa_Modes[i].bpp != 16 ) continue;
\r
329 if( (data->bpp == 32 || data->bpp == 24)
\r
330 && (gVesa_Modes[i].bpp == 32 || gVesa_Modes[i].bpp == 24) )
\r
332 if( data->bpp == gVesa_Modes[i].bpp )
\r
336 if( data->bpp != gVesa_Modes[i].bpp )
\r
340 LOG("factor = %i", factor);
\r
342 if(factor < bestFactor)
\r
344 bestFactor = factor;
\r
349 data->width = gVesa_Modes[best].width;
\r
350 data->height = gVesa_Modes[best].height;
\r
351 data->bpp = gVesa_Modes[best].bpp;
\r
356 int Vesa_Int_ModeInfo(tVideo_IOCtl_Mode *data)
\r
358 if(data->id < 0 || data->id > giVesaModeCount) return -1;
\r
359 data->width = gVesa_Modes[data->id].width;
\r
360 data->height = gVesa_Modes[data->id].height;
\r
361 data->bpp = gVesa_Modes[data->id].bpp;
\r
366 * \brief Updates the state of the text cursor
\r
367 * \note Just does a bitwise not on the cursor region
\r
369 void Vesa_FlipCursor(void *Arg)
\r
371 int pitch = gpVesaCurMode->pitch;
\r
372 int bytes_per_px = (gpVesaCurMode->bpp + 7) / 8;
\r
373 int x = giVesaCursorX*giVT_CharWidth;
\r
374 int y = giVesaCursorY*giVT_CharHeight;
\r
376 Uint8 *fb = (void*)gpVesa_Framebuffer;
\r
378 //Debug("Cursor flip");
\r
381 if(giVesaCursorX < 0 || giVesaCursorY < 0
\r
382 || y*pitch + x + (giVT_CharHeight-1)*pitch > (int)gpVesaCurMode->fbSize) {
\r
383 Log_Notice("VESA", "Cursor OOB (%i,%i)", x, y);
\r
384 giVesaCursorTimer = -1;
\r
389 fb += (y+1)*pitch + x*bytes_per_px;
\r
391 switch(bytes_per_px)
\r
394 for( i = 1; i < giVT_CharHeight-1; i++, fb += pitch )
\r
398 for( i = 1; i < giVT_CharHeight-1; i++, fb += pitch ) {
\r
404 for( i = 1; i < giVT_CharHeight-1; i++, fb += pitch ) {
\r
411 for( i = 1; i < giVT_CharHeight-1; i++, fb += pitch ) {
\r
419 Log_Error("VESA", "Vesa_FlipCursor - Bug Report, unknown bytes_per_px (%i)", bytes_per_px);
\r
420 giVesaCursorTimer = -1;
\r
424 #if BLINKING_CURSOR
\r
425 giVesaCursorTimer = Time_CreateTimer(VESA_CURSOR_PERIOD, Vesa_FlipCursor, Arg);
\r
429 // ------------------------
\r
430 // --- 2D Accelleration ---
\r
431 // ------------------------
\r
432 void Vesa_2D_Fill(void *Ent, Uint16 X, Uint16 Y, Uint16 W, Uint16 H, Uint32 Colour)
\r
434 // TODO: Handle non-32bit modes
\r
435 int pitch = gpVesaCurMode->pitch/4;
\r
436 Uint32 *buf = (Uint32*)gpVesa_Framebuffer + Y*pitch + X;
\r
438 memsetd(buf, Colour, W);
\r
443 void Vesa_2D_Blit(void *Ent, Uint16 DstX, Uint16 DstY, Uint16 SrcX, Uint16 SrcY, Uint16 W, Uint16 H)
\r
445 int scrnpitch = gpVesaCurMode->pitch;
\r
446 int bytes_per_px = (gpVesaCurMode->bpp + 7) / 8;
\r
447 int dst = DstY*scrnpitch + DstX;
\r
448 int src = SrcY*scrnpitch + SrcX;
\r
451 //Log("Vesa_2D_Blit: (Ent=%p, DstX=%i, DstY=%i, SrcX=%i, SrcY=%i, W=%i, H=%i)",
\r
452 // Ent, DstX, DstY, SrcX, SrcY, W, H);
\r
454 if(SrcX + W > gpVesaCurMode->width)
\r
455 W = gpVesaCurMode->width - SrcX;
\r
456 if(DstX + W > gpVesaCurMode->width)
\r
457 W = gpVesaCurMode->width - DstX;
\r
458 if(SrcY + H > gpVesaCurMode->height)
\r
459 H = gpVesaCurMode->height - SrcY;
\r
460 if(DstY + H > gpVesaCurMode->height)
\r
461 H = gpVesaCurMode->height - DstY;
\r
463 //Debug("W = %i, H = %i", W, H);
\r
467 dst += H*scrnpitch;
\r
468 src += H*scrnpitch;
\r
472 tmp = W*bytes_per_px;
\r
473 for( tmp = W; tmp --; ) {
\r
474 *(Uint8*)(gpVesa_Framebuffer + dst + tmp) = *(Uint8*)(gpVesa_Framebuffer + src + tmp);
\r
479 // Normal copy is OK
\r
481 memcpy((void*)gpVesa_Framebuffer + dst, (void*)gpVesa_Framebuffer + src, W*bytes_per_px);
\r
486 //Log("Vesa_2D_Blit: RETURN");
\r