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
27 // === CONSTANTS ===
\r
31 #define BGA_LFB_MAXSIZE (1024*768*4)
\r
32 #define VBE_DISPI_BANK_ADDRESS 0xA0000
\r
33 #define VBE_DISPI_LFB_PHYSICAL_ADDRESS 0xE0000000
\r
34 #define VBE_DISPI_IOPORT_INDEX 0x01CE
\r
35 #define VBE_DISPI_IOPORT_DATA 0x01CF
\r
36 #define VBE_DISPI_DISABLED 0x00
\r
37 #define VBE_DISPI_ENABLED 0x01
\r
38 #define VBE_DISPI_LFB_ENABLED 0x40
\r
39 #define VBE_DISPI_NOCLEARMEM 0x80
\r
42 VBE_DISPI_INDEX_XRES,
\r
43 VBE_DISPI_INDEX_YRES,
\r
44 VBE_DISPI_INDEX_BPP,
\r
45 VBE_DISPI_INDEX_ENABLE,
\r
46 VBE_DISPI_INDEX_BANK,
\r
47 VBE_DISPI_INDEX_VIRT_WIDTH,
\r
48 VBE_DISPI_INDEX_VIRT_HEIGHT,
\r
49 VBE_DISPI_INDEX_X_OFFSET,
\r
50 VBE_DISPI_INDEX_Y_OFFSET
\r
54 // === PROTOTYPES ===
\r
56 int BGA_Install(char **Arguments);
\r
57 void BGA_Uninstall();
\r
59 void BGA_int_WriteRegister(Uint16 reg, Uint16 value);
\r
60 Uint16 BGA_int_ReadRegister(Uint16 reg);
\r
61 void BGA_int_SetBank(Uint16 bank);
\r
62 void BGA_int_SetMode(Uint16 width, Uint16 height);
\r
63 int BGA_int_UpdateMode(int id);
\r
64 int BGA_int_FindMode(tVideo_IOCtl_Mode *info);
\r
65 int BGA_int_ModeInfo(tVideo_IOCtl_Mode *info);
\r
66 int BGA_int_MapFB(void *Dest);
\r
68 Uint64 BGA_Read(tVFS_Node *node, Uint64 off, Uint64 len, void *buffer);
\r
69 Uint64 BGA_Write(tVFS_Node *node, Uint64 off, Uint64 len, void *buffer);
\r
70 int BGA_Ioctl(tVFS_Node *node, int id, void *data);
\r
73 MODULE_DEFINE(0, 0x0032, BochsGA, BGA_Install, NULL, "PCI", NULL);
\r
74 tDevFS_Driver gBGA_DriverStruct = {
\r
82 int giBGA_CurrentMode = -1;
\r
83 tVideo_IOCtl_Pos gBGA_CursorPos = {-1,-1};
\r
84 int giBGA_DriverId = -1;
\r
85 Uint *gBGA_Framebuffer;
\r
86 t_bga_mode gBGA_Modes[] = {
\r
88 { 80,25, 12, MODEFLAG_TEXT, 80*25*8}, // 640 x 480
\r
89 {100,37, 12, MODEFLAG_TEXT, 100*37*8}, // 800 x 600
\r
90 {640,480,8, 0, 640*480},
\r
91 {640,480,32, 0, 640*480*4},
\r
92 {800,600,8, 0, 800*600},
\r
93 {800,600,32, 0, 800*600*4},
\r
95 #define BGA_MODE_COUNT (sizeof(gBGA_Modes)/sizeof(gBGA_Modes[0]))
\r
99 * \fn int BGA_Install(char **Arguments)
\r
101 int BGA_Install(char **Arguments)
\r
103 int bga_version = 0;
\r
105 // Check BGA Version
\r
106 bga_version = BGA_int_ReadRegister(VBE_DISPI_INDEX_ID);
\r
107 // NOTE: This driver was written for 0xB0C4, but they seem to be backwards compatable
\r
108 if(bga_version < 0xB0C4 || bga_version > 0xB0C5) {
\r
109 Warning("[BGA ] Bochs Adapter Version is not 0xB0C4 or 0xB0C5, instead 0x%x", bga_version);
\r
110 return MODULE_ERR_NOTNEEDED;
\r
114 giBGA_DriverId = DevFS_AddDevice( &gBGA_DriverStruct );
\r
115 if(giBGA_DriverId == -1) {
\r
116 Warning("[BGA ] Unable to register with DevFS, maybe already loaded?");
\r
117 return MODULE_ERR_MISC;
\r
120 // Map Framebuffer to hardware address
\r
121 gBGA_Framebuffer = (void *) MM_MapHWPage(VBE_DISPI_LFB_PHYSICAL_ADDRESS, 768); // 768 pages (3Mb)
\r
123 return MODULE_ERR_OK;
\r
127 * \fn void BGA_Uninstall()
\r
129 void BGA_Uninstall()
\r
131 //DevFS_DelDevice( giBGA_DriverId );
\r
132 MM_UnmapHWPage( VBE_DISPI_LFB_PHYSICAL_ADDRESS, 768 );
\r
136 * \fn Uint64 BGA_Read(tVFS_Node *node, Uint64 off, Uint64 len, void *buffer)
\r
137 * \brief Read from the framebuffer
\r
139 Uint64 BGA_Read(tVFS_Node *node, Uint64 off, Uint64 len, void *buffer)
\r
142 if(giBGA_CurrentMode == -1) return -1;
\r
144 // Check Offset and Length against Framebuffer Size
\r
145 if(off+len > gBGA_Modes[giBGA_CurrentMode].fbSize)
\r
148 // Copy from Framebuffer
\r
149 memcpy(buffer, (void*)((Uint)gBGA_Framebuffer + (Uint)off), len);
\r
154 * \fn Uint64 BGA_Write(tVFS_Node *node, Uint64 off, Uint64 len, void *buffer)
\r
155 * \brief Write to the framebuffer
\r
157 Uint64 BGA_Write(tVFS_Node *node, Uint64 off, Uint64 len, void *Buffer)
\r
159 ENTER("xoff xlen", off, len);
\r
162 if(giBGA_CurrentMode == -1) {
\r
167 // Check Input against Frambuffer Size
\r
168 if(off + len > gBGA_Modes[giBGA_CurrentMode].fbSize) {
\r
174 if( gBGA_Modes[giBGA_CurrentMode].flags & MODEFLAG_TEXT )
\r
176 tVT_Char *chars = Buffer;
\r
177 int pitch = gBGA_Modes[giBGA_CurrentMode].width * giVT_CharWidth;
\r
181 off /= sizeof(tVT_Char);
\r
182 dest = (void*)gBGA_Framebuffer;
\r
183 x = (off % gBGA_Modes[giBGA_CurrentMode].width) * giVT_CharWidth;
\r
184 y = (off / gBGA_Modes[giBGA_CurrentMode].width) * giVT_CharHeight;
\r
186 dest += x * giVT_CharWidth;
\r
187 len /= sizeof(tVT_Char);
\r
193 VT_Colour12to24(chars->BGCol),
\r
194 VT_Colour12to24(chars->FGCol)
\r
197 dest += giVT_CharWidth;
\r
200 x += giVT_CharWidth;
\r
203 y += giVT_CharHeight;
\r
204 dest += pitch*(giVT_CharHeight-1);
\r
210 Uint8 *destBuf = (Uint8*) ((Uint)gBGA_Framebuffer + (Uint)off);
\r
212 Log("buffer = %p", Buffer);
\r
213 Log("Updating Framebuffer (%p to %p)",
\r
214 destBuf, destBuf + (Uint)len);
\r
217 // Copy to Frambuffer
\r
218 memcpy(destBuf, Buffer, len);
\r
220 Log("BGA Framebuffer updated");
\r
228 * \fn INT int BGA_Ioctl(tVFS_Node *node, int ID, void *Data)
\r
229 * \brief Handle messages to the device
\r
231 INT int BGA_Ioctl(tVFS_Node *node, int ID, void *Data)
\r
234 ENTER("pNode iId pData", node, ID, Data);
\r
238 case DRV_IOCTL_TYPE:
\r
239 ret = DRV_TYPE_VIDEO;
\r
241 case DRV_IOCTL_IDENT:
\r
242 memcpy(Data, "BGA1", 4);
\r
245 case DRV_IOCTL_VERSION:
\r
248 case DRV_IOCTL_LOOKUP: // TODO: Implement
\r
252 case VIDEO_IOCTL_GETSETMODE:
\r
254 ret = BGA_int_UpdateMode(*(int*)(Data));
\r
256 ret = giBGA_CurrentMode;
\r
259 case VIDEO_IOCTL_FINDMODE:
\r
260 ret = BGA_int_FindMode((tVideo_IOCtl_Mode*)Data);
\r
263 case VIDEO_IOCTL_MODEINFO:
\r
264 ret = BGA_int_ModeInfo((tVideo_IOCtl_Mode*)Data);
\r
267 // Request Access to LFB
\r
268 case VIDEO_IOCTL_REQLFB:
\r
269 ret = BGA_int_MapFB( *(void**)Data );
\r
272 case VIDEO_IOCTL_SETCURSOR:
\r
273 gBGA_CursorPos.x = ((tVideo_IOCtl_Pos*)Data)->x;
\r
274 gBGA_CursorPos.y = ((tVideo_IOCtl_Pos*)Data)->y;
\r
286 //== Internal Functions ==
\r
288 * \fn void BGA_int_WriteRegister(Uint16 reg, Uint16 value)
\r
289 * \brief Writes to a BGA register
\r
291 void BGA_int_WriteRegister(Uint16 reg, Uint16 value)
\r
293 outw(VBE_DISPI_IOPORT_INDEX, reg);
\r
294 outw(VBE_DISPI_IOPORT_DATA, value);
\r
297 INT Uint16 BGA_int_ReadRegister(Uint16 reg)
\r
299 outw(VBE_DISPI_IOPORT_INDEX, reg);
\r
300 return inw(VBE_DISPI_IOPORT_DATA);
\r
304 INT void BGA_int_SetBank(Uint16 bank)
\r
306 BGA_int_WriteRegister(VBE_DISPI_INDEX_BANK, bank);
\r
311 * \fn void BGA_int_SetMode(Uint16 width, Uint16 height, Uint16 bpp)
\r
312 * \brief Sets the video mode from the dimensions and bpp given
\r
314 void BGA_int_SetMode(Uint16 width, Uint16 height)
\r
316 ENTER("iwidth iheight ibpp", width, height, bpp);
\r
317 BGA_int_WriteRegister(VBE_DISPI_INDEX_ENABLE, VBE_DISPI_DISABLED);
\r
318 BGA_int_WriteRegister(VBE_DISPI_INDEX_XRES, width);
\r
319 BGA_int_WriteRegister(VBE_DISPI_INDEX_YRES, height);
\r
320 BGA_int_WriteRegister(VBE_DISPI_INDEX_BPP, 32);
\r
321 BGA_int_WriteRegister(VBE_DISPI_INDEX_ENABLE, VBE_DISPI_ENABLED | VBE_DISPI_NOCLEARMEM | VBE_DISPI_LFB_ENABLED);
\r
322 //BGA_int_WriteRegister(VBE_DISPI_INDEX_ENABLE, VBE_DISPI_ENABLED | VBE_DISPI_NOCLEARMEM);
\r
327 * \fn int BGA_int_UpdateMode(int id)
\r
328 * \brief Set current vide mode given a mode id
\r
330 int BGA_int_UpdateMode(int id)
\r
333 if(id < 0 || id >= BGA_MODE_COUNT) return -1;
\r
335 // Check if it is a text mode
\r
336 if( gBGA_Modes[id].flags & MODEFLAG_TEXT )
\r
338 gBGA_Modes[id].width*giVT_CharWidth,
\r
339 gBGA_Modes[id].height*giVT_CharHeight);
\r
342 gBGA_Modes[id].width,
\r
343 gBGA_Modes[id].height);
\r
345 giBGA_CurrentMode = id;
\r
350 * \fn int BGA_int_FindMode(tVideo_IOCtl_Mode *info)
\r
351 * \brief Find a mode matching the given options
\r
353 int BGA_int_FindMode(tVideo_IOCtl_Mode *info)
\r
356 int best = 0, bestFactor = 1000;
\r
358 int rqdProduct = info->width * info->height * info->bpp;
\r
360 ENTER("pinfo", info);
\r
361 LOG("info = {width:%i,height:%i,bpp:%i})\n", info->width, info->height, info->bpp);
\r
363 for(i = 0; i < BGA_MODE_COUNT; i++)
\r
366 LogF("Mode %i (%ix%ix%i), ", i, gBGA_Modes[i].width, gBGA_Modes[i].height, gBGA_Modes[i].bpp);
\r
369 // Check if this mode is the same type as what we want
\r
370 if( !(gBGA_Modes[i].flags & MODEFLAG_TEXT) != !(info->flags & VIDEO_FLAG_TEXT) )
\r
373 // Ooh! A perfect match
\r
374 if(gBGA_Modes[i].width == info->width
\r
375 && gBGA_Modes[i].height == info->height
\r
376 && gBGA_Modes[i].bpp == info->bpp)
\r
379 LogF("Perfect!\n");
\r
385 // If not, how close are we?
\r
386 tmp = gBGA_Modes[i].width * gBGA_Modes[i].height * gBGA_Modes[i].bpp;
\r
388 tmp = tmp < 0 ? -tmp : tmp; // tmp = ABS(tmp)
\r
389 factor = tmp * 100 / rqdProduct;
\r
392 LogF("factor = %i\n", factor);
\r
395 if(factor < bestFactor)
\r
397 bestFactor = factor;
\r
403 info->width = gBGA_Modes[best].width;
\r
404 info->height = gBGA_Modes[best].height;
\r
405 info->bpp = gBGA_Modes[best].bpp;
\r
408 if(gBGA_Modes[best].flags & MODEFLAG_TEXT)
\r
409 info->flags |= VIDEO_FLAG_TEXT;
\r
415 * \fn int BGA_int_ModeInfo(tVideo_IOCtl_Mode *info)
\r
416 * \brief Get mode information
\r
418 int BGA_int_ModeInfo(tVideo_IOCtl_Mode *info)
\r
421 //if( !MM_IsUser( (Uint)info, sizeof(tVideo_IOCtl_Mode) ) ) {
\r
425 if(info->id < 0 || info->id >= BGA_MODE_COUNT) return -1;
\r
427 info->width = gBGA_Modes[info->id].width;
\r
428 info->height = gBGA_Modes[info->id].height;
\r
429 info->bpp = gBGA_Modes[info->id].bpp;
\r
432 if(gBGA_Modes[info->id].flags & MODEFLAG_TEXT)
\r
433 info->flags |= VIDEO_FLAG_TEXT;
\r
439 * \fn int BGA_int_MapFB(void *Dest)
\r
440 * \brief Map the framebuffer into a process's space
\r
441 * \param Dest User address to load to
\r
443 int BGA_int_MapFB(void *Dest)
\r
449 if((Uint)Dest > 0xC0000000) return 0;
\r
450 if(gBGA_Modes[giBGA_CurrentMode].bpp < 15) return 0; // Only non-pallete modes are supported
\r
452 // Count required pages
\r
453 pages = (gBGA_Modes[giBGA_CurrentMode].fbSize + 0xFFF) >> 12;
\r
455 // Check if there is space
\r
456 for( i = 0; i < pages; i++ )
\r
458 if(MM_GetPhysAddr( (Uint)Dest + (i << 12) ))
\r
463 for( i = 0; i < pages; i++ )
\r
464 MM_Map( (Uint)Dest + (i<<12), VBE_DISPI_LFB_PHYSICAL_ADDRESS + (i<<12) );
\r