2 * \file drv_bochsvbe.c
\r
3 * \brief BGA (Bochs Graphic Adapter) Driver for Acess2
\r
4 * \warning This driver does NOT support the Bochs PCI VGA driver
\r
11 #include <fs_devfs.h>
\r
12 #include <drv_pci.h>
\r
13 #include <tpl_drv_video.h>
\r
26 // === CONSTANTS ===
\r
30 #define BGA_LFB_MAXSIZE (1024*768*4)
\r
31 #define VBE_DISPI_BANK_ADDRESS 0xA0000
\r
32 #define VBE_DISPI_LFB_PHYSICAL_ADDRESS 0xE0000000
\r
33 #define VBE_DISPI_IOPORT_INDEX 0x01CE
\r
34 #define VBE_DISPI_IOPORT_DATA 0x01CF
\r
35 #define VBE_DISPI_DISABLED 0x00
\r
36 #define VBE_DISPI_ENABLED 0x01
\r
37 #define VBE_DISPI_LFB_ENABLED 0x40
\r
38 #define VBE_DISPI_NOCLEARMEM 0x80
\r
41 VBE_DISPI_INDEX_XRES,
\r
42 VBE_DISPI_INDEX_YRES,
\r
43 VBE_DISPI_INDEX_BPP,
\r
44 VBE_DISPI_INDEX_ENABLE,
\r
45 VBE_DISPI_INDEX_BANK,
\r
46 VBE_DISPI_INDEX_VIRT_WIDTH,
\r
47 VBE_DISPI_INDEX_VIRT_HEIGHT,
\r
48 VBE_DISPI_INDEX_X_OFFSET,
\r
49 VBE_DISPI_INDEX_Y_OFFSET
\r
53 // === PROTOTYPES ===
\r
55 int BGA_Install(char **Arguments);
\r
56 void BGA_Uninstall();
\r
58 void BGA_int_WriteRegister(Uint16 reg, Uint16 value);
\r
59 Uint16 BGA_int_ReadRegister(Uint16 reg);
\r
60 void BGA_int_SetBank(Uint16 bank);
\r
61 void BGA_int_SetMode(Uint16 width, Uint16 height);
\r
62 int BGA_int_UpdateMode(int id);
\r
63 int BGA_int_FindMode(tVideo_IOCtl_Mode *info);
\r
64 int BGA_int_ModeInfo(tVideo_IOCtl_Mode *info);
\r
65 int BGA_int_MapFB(void *Dest);
\r
67 Uint64 BGA_Read(tVFS_Node *node, Uint64 off, Uint64 len, void *buffer);
\r
68 Uint64 BGA_Write(tVFS_Node *node, Uint64 off, Uint64 len, void *buffer);
\r
69 int BGA_Ioctl(tVFS_Node *node, int id, void *data);
\r
72 MODULE_DEFINE(0, 0x0032, BochsGA, BGA_Install, NULL, "PCI", NULL);
\r
73 tDevFS_Driver gBGA_DriverStruct = {
\r
81 int giBGA_CurrentMode = -1;
\r
82 tVideo_IOCtl_Pos gBGA_CursorPos = {-1,-1};
\r
83 int giBGA_DriverId = -1;
\r
84 Uint *gBGA_Framebuffer;
\r
85 t_bga_mode gBGA_Modes[] = {
\r
87 { 80,25, 12, MODEFLAG_TEXT, 80*25*8}, // 640 x 480
\r
88 {100,37, 12, MODEFLAG_TEXT, 100*37*8}, // 800 x 600
\r
89 {640,480,8, 0, 640*480},
\r
90 {640,480,32, 0, 640*480*4},
\r
91 {800,600,8, 0, 800*600},
\r
92 {800,600,32, 0, 800*600*4},
\r
94 #define BGA_MODE_COUNT (sizeof(gBGA_Modes)/sizeof(gBGA_Modes[0]))
\r
98 * \fn int BGA_Install(char **Arguments)
\r
100 int BGA_Install(char **Arguments)
\r
102 int bga_version = 0;
\r
104 // Check BGA Version
\r
105 bga_version = BGA_int_ReadRegister(VBE_DISPI_INDEX_ID);
\r
106 // NOTE: This driver was written for 0xB0C4, but they seem to be backwards compatable
\r
107 if(bga_version < 0xB0C4 || bga_version > 0xB0C5) {
\r
108 Warning("[BGA ] Bochs Adapter Version is not 0xB0C4 or 0xB0C5, instead 0x%x", bga_version);
\r
109 return MODULE_ERR_NOTNEEDED;
\r
113 giBGA_DriverId = DevFS_AddDevice( &gBGA_DriverStruct );
\r
114 if(giBGA_DriverId == -1) {
\r
115 Warning("[BGA ] Unable to register with DevFS, maybe already loaded?");
\r
116 return MODULE_ERR_MISC;
\r
119 // Map Framebuffer to hardware address
\r
120 gBGA_Framebuffer = (void *) MM_MapHWPage(VBE_DISPI_LFB_PHYSICAL_ADDRESS, 768); // 768 pages (3Mb)
\r
122 return MODULE_ERR_OK;
\r
126 * \fn void BGA_Uninstall()
\r
128 void BGA_Uninstall()
\r
130 //DevFS_DelDevice( giBGA_DriverId );
\r
131 MM_UnmapHWPage( VBE_DISPI_LFB_PHYSICAL_ADDRESS, 768 );
\r
135 * \fn Uint64 BGA_Read(tVFS_Node *node, Uint64 off, Uint64 len, void *buffer)
\r
136 * \brief Read from the framebuffer
\r
138 Uint64 BGA_Read(tVFS_Node *node, Uint64 off, Uint64 len, void *buffer)
\r
141 if(giBGA_CurrentMode == -1) return -1;
\r
143 // Check Offset and Length against Framebuffer Size
\r
144 if(off+len > gBGA_Modes[giBGA_CurrentMode].fbSize)
\r
147 // Copy from Framebuffer
\r
148 memcpy(buffer, (void*)((Uint)gBGA_Framebuffer + (Uint)off), len);
\r
153 * \fn Uint64 BGA_Write(tVFS_Node *node, Uint64 off, Uint64 len, void *buffer)
\r
154 * \brief Write to the framebuffer
\r
156 Uint64 BGA_Write(tVFS_Node *node, Uint64 off, Uint64 len, void *Buffer)
\r
158 ENTER("xoff xlen", off, len);
\r
161 if(giBGA_CurrentMode == -1) {
\r
166 // Check Input against Frambuffer Size
\r
167 if(off + len > gBGA_Modes[giBGA_CurrentMode].fbSize) {
\r
173 if( gBGA_Modes[giBGA_CurrentMode].flags & MODEFLAG_TEXT )
\r
175 tVT_Char *chars = Buffer;
\r
176 int pitch = gBGA_Modes[giBGA_CurrentMode].width * giVT_CharWidth;
\r
180 off /= sizeof(tVT_Char);
\r
181 dest = (void*)gBGA_Framebuffer;
\r
182 x = (off % gBGA_Modes[giBGA_CurrentMode].width) * giVT_CharWidth;
\r
183 y = (off / gBGA_Modes[giBGA_CurrentMode].width) * giVT_CharHeight;
\r
185 dest += x * giVT_CharWidth;
\r
186 len /= sizeof(tVT_Char);
\r
192 VT_Colour12to24(chars->BGCol),
\r
193 VT_Colour12to24(chars->FGCol)
\r
196 dest += giVT_CharWidth;
\r
199 x += giVT_CharWidth;
\r
202 y += giVT_CharHeight;
\r
203 dest += pitch*(giVT_CharHeight-1);
\r
209 Uint8 *destBuf = (Uint8*) ((Uint)gBGA_Framebuffer + (Uint)off);
\r
211 Log("buffer = %p", Buffer);
\r
212 Log("Updating Framebuffer (%p to %p)",
\r
213 destBuf, destBuf + (Uint)len);
\r
216 // Copy to Frambuffer
\r
217 memcpy(destBuf, Buffer, len);
\r
219 Log("BGA Framebuffer updated");
\r
227 * \fn INT int BGA_Ioctl(tVFS_Node *node, int ID, void *Data)
\r
228 * \brief Handle messages to the device
\r
230 INT int BGA_Ioctl(tVFS_Node *node, int ID, void *Data)
\r
233 ENTER("pNode iId pData", node, ID, Data);
\r
237 case DRV_IOCTL_TYPE:
\r
238 ret = DRV_TYPE_VIDEO;
\r
240 case DRV_IOCTL_IDENT:
\r
241 memcpy(Data, "BGA1", 4);
\r
244 case DRV_IOCTL_VERSION:
\r
247 case DRV_IOCTL_LOOKUP: // TODO: Implement
\r
251 case VIDEO_IOCTL_GETSETMODE:
\r
253 ret = BGA_int_UpdateMode(*(int*)(Data));
\r
255 ret = giBGA_CurrentMode;
\r
258 case VIDEO_IOCTL_FINDMODE:
\r
259 ret = BGA_int_FindMode((tVideo_IOCtl_Mode*)Data);
\r
262 case VIDEO_IOCTL_MODEINFO:
\r
263 ret = BGA_int_ModeInfo((tVideo_IOCtl_Mode*)Data);
\r
266 // Request Access to LFB
\r
267 case VIDEO_IOCTL_REQLFB:
\r
268 ret = BGA_int_MapFB( *(void**)Data );
\r
271 case VIDEO_IOCTL_SETCURSOR:
\r
272 gBGA_CursorPos.x = ((tVideo_IOCtl_Pos*)Data)->x;
\r
273 gBGA_CursorPos.y = ((tVideo_IOCtl_Pos*)Data)->y;
\r
285 //== Internal Functions ==
\r
287 * \fn void BGA_int_WriteRegister(Uint16 reg, Uint16 value)
\r
288 * \brief Writes to a BGA register
\r
290 void BGA_int_WriteRegister(Uint16 reg, Uint16 value)
\r
292 outw(VBE_DISPI_IOPORT_INDEX, reg);
\r
293 outw(VBE_DISPI_IOPORT_DATA, value);
\r
296 INT Uint16 BGA_int_ReadRegister(Uint16 reg)
\r
298 outw(VBE_DISPI_IOPORT_INDEX, reg);
\r
299 return inw(VBE_DISPI_IOPORT_DATA);
\r
303 INT void BGA_int_SetBank(Uint16 bank)
\r
305 BGA_int_WriteRegister(VBE_DISPI_INDEX_BANK, bank);
\r
310 * \fn void BGA_int_SetMode(Uint16 width, Uint16 height, Uint16 bpp)
\r
311 * \brief Sets the video mode from the dimensions and bpp given
\r
313 void BGA_int_SetMode(Uint16 width, Uint16 height)
\r
315 ENTER("iwidth iheight ibpp", width, height, bpp);
\r
316 BGA_int_WriteRegister(VBE_DISPI_INDEX_ENABLE, VBE_DISPI_DISABLED);
\r
317 BGA_int_WriteRegister(VBE_DISPI_INDEX_XRES, width);
\r
318 BGA_int_WriteRegister(VBE_DISPI_INDEX_YRES, height);
\r
319 BGA_int_WriteRegister(VBE_DISPI_INDEX_BPP, 32);
\r
320 BGA_int_WriteRegister(VBE_DISPI_INDEX_ENABLE, VBE_DISPI_ENABLED | VBE_DISPI_NOCLEARMEM | VBE_DISPI_LFB_ENABLED);
\r
321 //BGA_int_WriteRegister(VBE_DISPI_INDEX_ENABLE, VBE_DISPI_ENABLED | VBE_DISPI_NOCLEARMEM);
\r
326 * \fn int BGA_int_UpdateMode(int id)
\r
327 * \brief Set current vide mode given a mode id
\r
329 int BGA_int_UpdateMode(int id)
\r
332 if(id < 0 || id >= BGA_MODE_COUNT) return -1;
\r
334 // Check if it is a text mode
\r
335 if( gBGA_Modes[id].flags & MODEFLAG_TEXT )
\r
337 gBGA_Modes[id].width*giVT_CharWidth,
\r
338 gBGA_Modes[id].height*giVT_CharHeight);
\r
341 gBGA_Modes[id].width,
\r
342 gBGA_Modes[id].height);
\r
344 giBGA_CurrentMode = id;
\r
349 * \fn int BGA_int_FindMode(tVideo_IOCtl_Mode *info)
\r
350 * \brief Find a mode matching the given options
\r
352 int BGA_int_FindMode(tVideo_IOCtl_Mode *info)
\r
355 int best = 0, bestFactor = 1000;
\r
357 int rqdProduct = info->width * info->height * info->bpp;
\r
359 ENTER("pinfo", info);
\r
360 LOG("info = {width:%i,height:%i,bpp:%i})\n", info->width, info->height, info->bpp);
\r
362 for(i = 0; i < BGA_MODE_COUNT; i++)
\r
365 LogF("Mode %i (%ix%ix%i), ", i, gBGA_Modes[i].width, gBGA_Modes[i].height, gBGA_Modes[i].bpp);
\r
368 // Check if this mode is the same type as what we want
\r
369 if( !(gBGA_Modes[i].flags & MODEFLAG_TEXT) != !(info->flags & VIDEO_FLAG_TEXT) )
\r
372 // Ooh! A perfect match
\r
373 if(gBGA_Modes[i].width == info->width
\r
374 && gBGA_Modes[i].height == info->height
\r
375 && gBGA_Modes[i].bpp == info->bpp)
\r
378 LogF("Perfect!\n");
\r
384 // If not, how close are we?
\r
385 tmp = gBGA_Modes[i].width * gBGA_Modes[i].height * gBGA_Modes[i].bpp;
\r
387 tmp = tmp < 0 ? -tmp : tmp; // tmp = ABS(tmp)
\r
388 factor = tmp * 100 / rqdProduct;
\r
391 LogF("factor = %i\n", factor);
\r
394 if(factor < bestFactor)
\r
396 bestFactor = factor;
\r
402 info->width = gBGA_Modes[best].width;
\r
403 info->height = gBGA_Modes[best].height;
\r
404 info->bpp = gBGA_Modes[best].bpp;
\r
407 if(gBGA_Modes[best].flags & MODEFLAG_TEXT)
\r
408 info->flags |= VIDEO_FLAG_TEXT;
\r
414 * \fn int BGA_int_ModeInfo(tVideo_IOCtl_Mode *info)
\r
415 * \brief Get mode information
\r
417 int BGA_int_ModeInfo(tVideo_IOCtl_Mode *info)
\r
420 //if( !MM_IsUser( (Uint)info, sizeof(tVideo_IOCtl_Mode) ) ) {
\r
424 if(info->id < 0 || info->id >= BGA_MODE_COUNT) return -1;
\r
426 info->width = gBGA_Modes[info->id].width;
\r
427 info->height = gBGA_Modes[info->id].height;
\r
428 info->bpp = gBGA_Modes[info->id].bpp;
\r
431 if(gBGA_Modes[info->id].flags & MODEFLAG_TEXT)
\r
432 info->flags |= VIDEO_FLAG_TEXT;
\r
438 * \fn int BGA_int_MapFB(void *Dest)
\r
439 * \brief Map the framebuffer into a process's space
\r
440 * \param Dest User address to load to
\r
442 int BGA_int_MapFB(void *Dest)
\r
448 if((Uint)Dest > 0xC0000000) return 0;
\r
449 if(gBGA_Modes[giBGA_CurrentMode].bpp < 15) return 0; // Only non-pallete modes are supported
\r
451 // Count required pages
\r
452 pages = (gBGA_Modes[giBGA_CurrentMode].fbSize + 0xFFF) >> 12;
\r
454 // Check if there is space
\r
455 for( i = 0; i < pages; i++ )
\r
457 if(MM_GetPhysAddr( (Uint)Dest + (i << 12) ))
\r
462 for( i = 0; i < pages; i++ )
\r
463 MM_Map( (Uint)Dest + (i<<12), VBE_DISPI_LFB_PHYSICAL_ADDRESS + (i<<12) );
\r