2 * \file drv_bochsvbe.c
\r
3 * \brief BGA (Bochs Graphic Adapter) Driver
\r
5 * \warning This driver does NOT support the Bochs PCI VGA driver
\r
10 #include <modules.h>
\r
12 #include <fs_devfs.h>
\r
13 #include <drv_pci.h>
\r
14 #include <tpl_drv_video.h>
\r
16 //#define INT static
\r
28 // === CONSTANTS ===
\r
32 #define BGA_LFB_MAXSIZE (1024*768*4)
\r
33 #define VBE_DISPI_BANK_ADDRESS 0xA0000
\r
34 #define VBE_DISPI_LFB_PHYSICAL_ADDRESS 0xE0000000
\r
35 #define VBE_DISPI_IOPORT_INDEX 0x01CE
\r
36 #define VBE_DISPI_IOPORT_DATA 0x01CF
\r
37 #define VBE_DISPI_DISABLED 0x00
\r
38 #define VBE_DISPI_ENABLED 0x01
\r
39 #define VBE_DISPI_LFB_ENABLED 0x40
\r
40 #define VBE_DISPI_NOCLEARMEM 0x80
\r
43 VBE_DISPI_INDEX_XRES,
\r
44 VBE_DISPI_INDEX_YRES,
\r
45 VBE_DISPI_INDEX_BPP,
\r
46 VBE_DISPI_INDEX_ENABLE,
\r
47 VBE_DISPI_INDEX_BANK,
\r
48 VBE_DISPI_INDEX_VIRT_WIDTH,
\r
49 VBE_DISPI_INDEX_VIRT_HEIGHT,
\r
50 VBE_DISPI_INDEX_X_OFFSET,
\r
51 VBE_DISPI_INDEX_Y_OFFSET
\r
55 // === PROTOTYPES ===
\r
57 int BGA_Install(char **Arguments);
\r
58 void BGA_Uninstall();
\r
60 void BGA_int_WriteRegister(Uint16 reg, Uint16 value);
\r
61 Uint16 BGA_int_ReadRegister(Uint16 reg);
\r
62 void BGA_int_SetBank(Uint16 bank);
\r
63 void BGA_int_SetMode(Uint16 width, Uint16 height);
\r
64 int BGA_int_UpdateMode(int id);
\r
65 int BGA_int_FindMode(tVideo_IOCtl_Mode *info);
\r
66 int BGA_int_ModeInfo(tVideo_IOCtl_Mode *info);
\r
67 int BGA_int_MapFB(void *Dest);
\r
69 Uint64 BGA_Read(tVFS_Node *node, Uint64 off, Uint64 len, void *buffer);
\r
70 Uint64 BGA_Write(tVFS_Node *node, Uint64 off, Uint64 len, void *buffer);
\r
71 int BGA_Ioctl(tVFS_Node *node, int id, void *data);
\r
74 MODULE_DEFINE(0, 0x0032, BochsGA, BGA_Install, NULL, NULL);
\r
75 tDevFS_Driver gBGA_DriverStruct = {
\r
83 int giBGA_CurrentMode = -1;
\r
84 tVideo_IOCtl_Pos gBGA_CursorPos = {-1,-1};
\r
85 int giBGA_DriverId = -1;
\r
86 Uint *gBGA_Framebuffer;
\r
87 t_bga_mode gBGA_Modes[] = {
\r
89 { 80,25, 12, MODEFLAG_TEXT, 80*25*8}, // 640 x 480
\r
90 {100,37, 12, MODEFLAG_TEXT, 100*37*8}, // 800 x 600
\r
91 {640,480,8, 0, 640*480},
\r
92 {640,480,32, 0, 640*480*4},
\r
93 {800,600,8, 0, 800*600},
\r
94 {800,600,32, 0, 800*600*4},
\r
96 #define BGA_MODE_COUNT (sizeof(gBGA_Modes)/sizeof(gBGA_Modes[0]))
\r
100 * \fn int BGA_Install(char **Arguments)
\r
102 int BGA_Install(char **Arguments)
\r
104 int bga_version = 0;
\r
106 // Check BGA Version
\r
107 bga_version = BGA_int_ReadRegister(VBE_DISPI_INDEX_ID);
\r
108 // NOTE: This driver was written for 0xB0C4, but they seem to be backwards compatable
\r
109 if(bga_version < 0xB0C4 || bga_version > 0xB0C5) {
\r
110 Warning("[BGA ] Bochs Adapter Version is not 0xB0C4 or 0xB0C5, instead 0x%x", bga_version);
\r
115 giBGA_DriverId = DevFS_AddDevice( &gBGA_DriverStruct );
\r
116 if(giBGA_DriverId == -1) {
\r
117 Warning("[BGA ] Unable to register with DevFS, maybe already loaded?");
\r
121 // Map Framebuffer to hardware address
\r
122 gBGA_Framebuffer = (void *) MM_MapHWPage(VBE_DISPI_LFB_PHYSICAL_ADDRESS, 768); // 768 pages (3Mb)
\r
128 * \fn void BGA_Uninstall()
\r
130 void BGA_Uninstall()
\r
132 //DevFS_DelDevice( giBGA_DriverId );
\r
133 MM_UnmapHWPage( VBE_DISPI_LFB_PHYSICAL_ADDRESS, 768 );
\r
137 * \fn Uint64 BGA_Read(tVFS_Node *node, Uint64 off, Uint64 len, void *buffer)
\r
138 * \brief Read from the framebuffer
\r
140 Uint64 BGA_Read(tVFS_Node *node, Uint64 off, Uint64 len, void *buffer)
\r
143 if(giBGA_CurrentMode == -1) return -1;
\r
145 // Check Offset and Length against Framebuffer Size
\r
146 if(off+len > gBGA_Modes[giBGA_CurrentMode].fbSize)
\r
149 // Copy from Framebuffer
\r
150 memcpy(buffer, (void*)((Uint)gBGA_Framebuffer + (Uint)off), len);
\r
155 * \fn Uint64 BGA_Write(tVFS_Node *node, Uint64 off, Uint64 len, void *buffer)
\r
156 * \brief Write to the framebuffer
\r
158 Uint64 BGA_Write(tVFS_Node *node, Uint64 off, Uint64 len, void *buffer)
\r
160 ENTER("xoff xlen", off, len);
\r
163 if(giBGA_CurrentMode == -1) {
\r
168 // Check Input against Frambuffer Size
\r
169 if(off+len > gBGA_Modes[giBGA_CurrentMode].fbSize) {
\r
175 if( gBGA_Modes[giBGA_CurrentMode].flags & MODEFLAG_TEXT )
\r
177 tVT_Char *chars = buffer;
\r
178 int pitch = gBGA_Modes[giBGA_CurrentMode].width * giVT_CharWidth;
\r
182 off /= sizeof(tVT_Char);
\r
183 dest = (void*)gBGA_Framebuffer;
\r
184 x = (off % gBGA_Modes[giBGA_CurrentMode].width) * giVT_CharWidth;
\r
185 y = (off / gBGA_Modes[giBGA_CurrentMode].width) * giVT_CharHeight;
\r
187 dest += x * giVT_CharWidth;
\r
188 len /= sizeof(tVT_Char);
\r
194 VT_Colour12to24(chars->BGCol),
\r
195 VT_Colour12to24(chars->FGCol)
\r
198 dest += giVT_CharWidth;
\r
201 x += giVT_CharWidth;
\r
204 y += giVT_CharHeight;
\r
205 dest += pitch*(giVT_CharHeight-1);
\r
211 Uint8 *destBuf = (Uint8*) ((Uint)gBGA_Framebuffer + (Uint)off);
\r
213 LOG("buffer = %p\n", buffer);
\r
214 LOG("Updating Framebuffer (%p to %p)\n",
\r
215 destBuf, destBuf + (Uint)len);
\r
218 // Copy to Frambuffer
\r
219 memcpy(destBuf, buffer, len);
\r
221 LOG("BGA Framebuffer updated\n");
\r
229 * \fn INT int BGA_Ioctl(tVFS_Node *node, int ID, void *Data)
\r
230 * \brief Handle messages to the device
\r
232 INT int BGA_Ioctl(tVFS_Node *node, int ID, void *Data)
\r
235 ENTER("pNode iId pData", node, ID, Data);
\r
239 case DRV_IOCTL_TYPE:
\r
240 ret = DRV_TYPE_VIDEO;
\r
242 case DRV_IOCTL_IDENT:
\r
243 memcpy(Data, "BGA1", 4);
\r
246 case DRV_IOCTL_VERSION:
\r
249 case DRV_IOCTL_LOOKUP: // TODO: Implement
\r
253 case VIDEO_IOCTL_GETSETMODE:
\r
255 ret = BGA_int_UpdateMode(*(int*)(Data));
\r
257 ret = giBGA_CurrentMode;
\r
260 case VIDEO_IOCTL_FINDMODE:
\r
261 ret = BGA_int_FindMode((tVideo_IOCtl_Mode*)Data);
\r
264 case VIDEO_IOCTL_MODEINFO:
\r
265 ret = BGA_int_ModeInfo((tVideo_IOCtl_Mode*)Data);
\r
268 // Request Access to LFB
\r
269 case VIDEO_IOCTL_REQLFB:
\r
270 ret = BGA_int_MapFB( *(void**)Data );
\r
273 case VIDEO_IOCTL_SETCURSOR:
\r
274 gBGA_CursorPos.x = ((tVideo_IOCtl_Pos*)Data)->x;
\r
275 gBGA_CursorPos.y = ((tVideo_IOCtl_Pos*)Data)->y;
\r
287 //== Internal Functions ==
\r
289 * \fn void BGA_int_WriteRegister(Uint16 reg, Uint16 value)
\r
290 * \brief Writes to a BGA register
\r
292 void BGA_int_WriteRegister(Uint16 reg, Uint16 value)
\r
294 outw(VBE_DISPI_IOPORT_INDEX, reg);
\r
295 outw(VBE_DISPI_IOPORT_DATA, value);
\r
298 INT Uint16 BGA_int_ReadRegister(Uint16 reg)
\r
300 outw(VBE_DISPI_IOPORT_INDEX, reg);
\r
301 return inw(VBE_DISPI_IOPORT_DATA);
\r
305 INT void BGA_int_SetBank(Uint16 bank)
\r
307 BGA_int_WriteRegister(VBE_DISPI_INDEX_BANK, bank);
\r
312 * \fn void BGA_int_SetMode(Uint16 width, Uint16 height, Uint16 bpp)
\r
313 * \brief Sets the video mode from the dimensions and bpp given
\r
315 void BGA_int_SetMode(Uint16 width, Uint16 height)
\r
317 ENTER("iwidth iheight ibpp", width, height, bpp);
\r
318 BGA_int_WriteRegister(VBE_DISPI_INDEX_ENABLE, VBE_DISPI_DISABLED);
\r
319 BGA_int_WriteRegister(VBE_DISPI_INDEX_XRES, width);
\r
320 BGA_int_WriteRegister(VBE_DISPI_INDEX_YRES, height);
\r
321 BGA_int_WriteRegister(VBE_DISPI_INDEX_BPP, 32);
\r
322 BGA_int_WriteRegister(VBE_DISPI_INDEX_ENABLE, VBE_DISPI_ENABLED | VBE_DISPI_NOCLEARMEM | VBE_DISPI_LFB_ENABLED);
\r
323 //BGA_int_WriteRegister(VBE_DISPI_INDEX_ENABLE, VBE_DISPI_ENABLED | VBE_DISPI_NOCLEARMEM);
\r
328 * \fn int BGA_int_UpdateMode(int id)
\r
329 * \brief Set current vide mode given a mode id
\r
331 int BGA_int_UpdateMode(int id)
\r
334 if(id < 0 || id >= BGA_MODE_COUNT) return -1;
\r
336 // Check if it is a text mode
\r
337 if( gBGA_Modes[id].flags & MODEFLAG_TEXT )
\r
339 gBGA_Modes[id].width*giVT_CharWidth,
\r
340 gBGA_Modes[id].height*giVT_CharHeight);
\r
343 gBGA_Modes[id].width,
\r
344 gBGA_Modes[id].height);
\r
346 giBGA_CurrentMode = id;
\r
351 * \fn int BGA_int_FindMode(tVideo_IOCtl_Mode *info)
\r
352 * \brief Find a mode matching the given options
\r
354 int BGA_int_FindMode(tVideo_IOCtl_Mode *info)
\r
357 int best = 0, bestFactor = 1000;
\r
359 int rqdProduct = info->width * info->height * info->bpp;
\r
361 ENTER("pinfo", info);
\r
362 LOG("info = {width:%i,height:%i,bpp:%i})\n", info->width, info->height, info->bpp);
\r
364 for(i = 0; i < BGA_MODE_COUNT; i++)
\r
367 LogF("Mode %i (%ix%ix%i), ", i, gBGA_Modes[i].width, gBGA_Modes[i].height, gBGA_Modes[i].bpp);
\r
370 // Check if this mode is the same type as what we want
\r
371 if( !(gBGA_Modes[i].flags & MODEFLAG_TEXT) != !(info->flags & VIDEO_FLAG_TEXT) )
\r
374 // Ooh! A perfect match
\r
375 if(gBGA_Modes[i].width == info->width
\r
376 && gBGA_Modes[i].height == info->height
\r
377 && gBGA_Modes[i].bpp == info->bpp)
\r
380 LogF("Perfect!\n");
\r
386 // If not, how close are we?
\r
387 tmp = gBGA_Modes[i].width * gBGA_Modes[i].height * gBGA_Modes[i].bpp;
\r
389 tmp = tmp < 0 ? -tmp : tmp; // tmp = ABS(tmp)
\r
390 factor = tmp * 100 / rqdProduct;
\r
393 LogF("factor = %i\n", factor);
\r
396 if(factor < bestFactor)
\r
398 bestFactor = factor;
\r
404 info->width = gBGA_Modes[best].width;
\r
405 info->height = gBGA_Modes[best].height;
\r
406 info->bpp = gBGA_Modes[best].bpp;
\r
409 if(gBGA_Modes[best].flags & MODEFLAG_TEXT)
\r
410 info->flags |= VIDEO_FLAG_TEXT;
\r
416 * \fn int BGA_int_ModeInfo(tVideo_IOCtl_Mode *info)
\r
417 * \brief Get mode information
\r
419 int BGA_int_ModeInfo(tVideo_IOCtl_Mode *info)
\r
422 //if( !MM_IsUser( (Uint)info, sizeof(tVideo_IOCtl_Mode) ) ) {
\r
426 if(info->id < 0 || info->id >= BGA_MODE_COUNT) return -1;
\r
428 info->width = gBGA_Modes[info->id].width;
\r
429 info->height = gBGA_Modes[info->id].height;
\r
430 info->bpp = gBGA_Modes[info->id].bpp;
\r
433 if(gBGA_Modes[info->id].flags & MODEFLAG_TEXT)
\r
434 info->flags |= VIDEO_FLAG_TEXT;
\r
440 * \fn int BGA_int_MapFB(void *Dest)
\r
441 * \brief Map the framebuffer into a process's space
\r
442 * \param Dest User address to load to
\r
444 int BGA_int_MapFB(void *Dest)
\r
450 if((Uint)Dest > 0xC0000000) return 0;
\r
451 if(gBGA_Modes[giBGA_CurrentMode].bpp < 15) return 0; // Only non-pallete modes are supported
\r
453 // Count required pages
\r
454 pages = (gBGA_Modes[giBGA_CurrentMode].fbSize + 0xFFF) >> 12;
\r
456 // Check if there is space
\r
457 for( i = 0; i < pages; i++ )
\r
459 if(MM_GetPhysAddr( (Uint)Dest + (i << 12) ))
\r
464 for( i = 0; i < pages; i++ )
\r
465 MM_Map( (Uint)Dest + (i<<12), VBE_DISPI_LFB_PHYSICAL_ADDRESS + (i<<12) );
\r