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
18 typedef struct sBGA_Mode {
\r
25 // === CONSTANTS ===
\r
26 #define BGA_LFB_MAXSIZE (1024*768*4)
\r
27 #define VBE_DISPI_BANK_ADDRESS 0xA0000
\r
28 #define VBE_DISPI_LFB_PHYSICAL_ADDRESS 0xE0000000
\r
29 #define VBE_DISPI_IOPORT_INDEX 0x01CE
\r
30 #define VBE_DISPI_IOPORT_DATA 0x01CF
\r
31 #define VBE_DISPI_DISABLED 0x00
\r
32 #define VBE_DISPI_ENABLED 0x01
\r
33 #define VBE_DISPI_LFB_ENABLED 0x40
\r
34 #define VBE_DISPI_NOCLEARMEM 0x80
\r
37 VBE_DISPI_INDEX_XRES,
\r
38 VBE_DISPI_INDEX_YRES,
\r
39 VBE_DISPI_INDEX_BPP,
\r
40 VBE_DISPI_INDEX_ENABLE,
\r
41 VBE_DISPI_INDEX_BANK,
\r
42 VBE_DISPI_INDEX_VIRT_WIDTH,
\r
43 VBE_DISPI_INDEX_VIRT_HEIGHT,
\r
44 VBE_DISPI_INDEX_X_OFFSET,
\r
45 VBE_DISPI_INDEX_Y_OFFSET
\r
49 // === PROTOTYPES ===
\r
51 int BGA_Install(char **Arguments);
\r
52 void BGA_Uninstall();
\r
54 void BGA_int_WriteRegister(Uint16 reg, Uint16 value);
\r
55 Uint16 BGA_int_ReadRegister(Uint16 reg);
\r
56 void BGA_int_SetBank(Uint16 bank);
\r
57 void BGA_int_SetMode(Uint16 width, Uint16 height);
\r
58 int BGA_int_UpdateMode(int id);
\r
59 int BGA_int_FindMode(tVideo_IOCtl_Mode *info);
\r
60 int BGA_int_ModeInfo(tVideo_IOCtl_Mode *info);
\r
61 int BGA_int_MapFB(void *Dest);
\r
63 Uint64 BGA_Read(tVFS_Node *node, Uint64 off, Uint64 len, void *buffer);
\r
64 Uint64 BGA_Write(tVFS_Node *node, Uint64 off, Uint64 len, void *buffer);
\r
65 int BGA_Ioctl(tVFS_Node *node, int id, void *data);
\r
68 MODULE_DEFINE(0, 0x0032, BochsGA, BGA_Install, NULL, "PCI", NULL);
\r
69 tDevFS_Driver gBGA_DriverStruct = {
\r
77 int giBGA_CurrentMode = -1;
\r
78 int giBGA_BufferFormat = 0;
\r
79 tVideo_IOCtl_Pos gBGA_CursorPos = {-1,-1};
\r
80 Uint *gBGA_Framebuffer;
\r
81 tBGA_Mode gpBGA_CurrentMode;
\r
82 const tBGA_Mode gBGA_Modes[] = {
\r
84 {640,480,32, 0, 640*480*4},
\r
85 {800,600,32, 0, 800*600*4},
\r
86 {1024,768,32, 0, 1024*768*4}
\r
88 #define BGA_MODE_COUNT (sizeof(gBGA_Modes)/sizeof(gBGA_Modes[0]))
\r
92 * \fn int BGA_Install(char **Arguments)
\r
94 int BGA_Install(char **Arguments)
\r
98 // Check BGA Version
\r
99 version = BGA_int_ReadRegister(VBE_DISPI_INDEX_ID);
\r
101 // NOTE: This driver was written for 0xB0C4, but they seem to be backwards compatable
\r
102 if(version < 0xB0C4 || version > 0xB0C5) {
\r
103 Log_Warning("BGA", "Bochs Adapter Version is not 0xB0C4 or 0xB0C5, instead 0x%x", version);
\r
104 return MODULE_ERR_NOTNEEDED;
\r
108 if(DevFS_AddDevice( &gBGA_DriverStruct ) == -1) {
\r
109 Log_Warning("BGA", "Unable to register with DevFS, maybe already loaded?");
\r
110 return MODULE_ERR_MISC;
\r
113 // Map Framebuffer to hardware address
\r
114 gBGA_Framebuffer = (void *) MM_MapHWPage(VBE_DISPI_LFB_PHYSICAL_ADDRESS, 768); // 768 pages (3Mb)
\r
116 return MODULE_ERR_OK;
\r
120 * \fn void BGA_Uninstall()
\r
122 void BGA_Uninstall()
\r
124 DevFS_DelDevice( &gBGA_DriverStruct );
\r
125 MM_UnmapHWPage( VBE_DISPI_LFB_PHYSICAL_ADDRESS, 768 );
\r
129 * \fn Uint64 BGA_Read(tVFS_Node *node, Uint64 off, Uint64 len, void *buffer)
\r
130 * \brief Read from the framebuffer
\r
132 Uint64 BGA_Read(tVFS_Node *node, Uint64 off, Uint64 len, void *buffer)
\r
135 if(giBGA_CurrentMode == -1) return -1;
\r
137 // Check Offset and Length against Framebuffer Size
\r
138 if(off+len > gpBGA_CurrentMode->fbSize)
\r
141 // Copy from Framebuffer
\r
142 memcpy(buffer, (void*)((Uint)gBGA_Framebuffer + (Uint)off), len);
\r
147 * \fn Uint64 BGA_Write(tVFS_Node *node, Uint64 off, Uint64 len, void *buffer)
\r
148 * \brief Write to the framebuffer
\r
150 Uint64 BGA_Write(tVFS_Node *node, Uint64 off, Uint64 len, void *Buffer)
\r
152 ENTER("xoff xlen", off, len);
\r
155 if(giBGA_CurrentMode == -1) {
\r
161 switch( giBGA_BufferFormat )
\r
163 case VIDEO_BUFFMT_TEXT:
\r
165 tVT_Char *chars = Buffer;
\r
166 int pitch = gpBGA_CurrentMode->width * giVT_CharWidth;
\r
170 off /= sizeof(tVT_Char);
\r
171 dest = (void*)gBGA_Framebuffer;
\r
172 x = (off % gpBGA_CurrentMode->width) * giVT_CharWidth;
\r
173 y = (off / gpBGA_CurrentMode->width) * giVT_CharHeight;
\r
176 if(y > gpBGA_CurrentMode->height) {
\r
182 dest += x * giVT_CharWidth;
\r
183 len /= sizeof(tVT_Char);
\r
189 VT_Colour12to24(chars->BGCol),
\r
190 VT_Colour12to24(chars->FGCol)
\r
193 dest += giVT_CharWidth;
\r
196 x += giVT_CharWidth;
\r
199 y += giVT_CharHeight;
\r
200 dest += pitch*(giVT_CharHeight-1);
\r
206 case VIDEO_BUFFMT_FRAMEBUFFER:
\r
208 Uint8 *destBuf = (Uint8*) ((Uint)gBGA_Framebuffer + (Uint)off);
\r
210 if( off + len > gpBGA_CurrentMode->fbSize ) {
\r
215 LOG("buffer = %p", Buffer);
\r
216 LOG("Updating Framebuffer (%p to %p)", destBuf, destBuf + (Uint)len);
\r
219 // Copy to Frambuffer
\r
220 memcpy(destBuf, Buffer, len);
\r
222 LOG("BGA Framebuffer updated");
\r
235 * \fn int BGA_Ioctl(tVFS_Node *Node, int ID, void *Data)
\r
236 * \brief Handle messages to the device
\r
238 int BGA_Ioctl(tVFS_Node *Node, int ID, void *Data)
\r
241 ENTER("pNode iId pData", Node, ID, Data);
\r
245 case DRV_IOCTL_TYPE:
\r
246 ret = DRV_TYPE_VIDEO;
\r
248 case DRV_IOCTL_IDENT:
\r
249 memcpy(Data, "BGA1", 4);
\r
252 case DRV_IOCTL_VERSION:
\r
255 case DRV_IOCTL_LOOKUP: // TODO: Implement
\r
259 case VIDEO_IOCTL_GETSETMODE:
\r
261 ret = BGA_int_UpdateMode(*(int*)(Data));
\r
263 ret = giBGA_CurrentMode;
\r
266 case VIDEO_IOCTL_FINDMODE:
\r
267 ret = BGA_int_FindMode((tVideo_IOCtl_Mode*)Data);
\r
270 case VIDEO_IOCTL_MODEINFO:
\r
271 ret = BGA_int_ModeInfo((tVideo_IOCtl_Mode*)Data);
\r
274 case VIDEO_IOCTL_SETBUFFORMAT:
\r
275 ret = giBGA_BufferFormat;
\r
277 giBGA_BufferFormat = *(int*)Data;
\r
280 case VIDEO_IOCTL_SETCURSOR:
\r
281 gBGA_CursorPos.x = ((tVideo_IOCtl_Pos*)Data)->x;
\r
282 gBGA_CursorPos.y = ((tVideo_IOCtl_Pos*)Data)->y;
\r
285 // Request Access to LFB
\r
286 case VIDEO_IOCTL_REQLFB:
\r
287 ret = BGA_int_MapFB( *(void**)Data );
\r
299 //== Internal Functions ==
\r
301 * \fn void BGA_int_WriteRegister(Uint16 reg, Uint16 value)
\r
302 * \brief Writes to a BGA register
\r
304 void BGA_int_WriteRegister(Uint16 reg, Uint16 value)
\r
306 outw(VBE_DISPI_IOPORT_INDEX, reg);
\r
307 outw(VBE_DISPI_IOPORT_DATA, value);
\r
310 Uint16 BGA_int_ReadRegister(Uint16 reg)
\r
312 outw(VBE_DISPI_IOPORT_INDEX, reg);
\r
313 return inw(VBE_DISPI_IOPORT_DATA);
\r
317 void BGA_int_SetBank(Uint16 bank)
\r
319 BGA_int_WriteRegister(VBE_DISPI_INDEX_BANK, bank);
\r
324 * \fn void BGA_int_SetMode(Uint16 width, Uint16 height, Uint16 bpp)
\r
325 * \brief Sets the video mode from the dimensions and bpp given
\r
327 void BGA_int_SetMode(Uint16 Width, Uint16 Height)
\r
329 ENTER("iWidth iheight ibpp", Width, Height, bpp);
\r
330 BGA_int_WriteRegister(VBE_DISPI_INDEX_ENABLE, VBE_DISPI_DISABLED);
\r
331 BGA_int_WriteRegister(VBE_DISPI_INDEX_XRES, Width);
\r
332 BGA_int_WriteRegister(VBE_DISPI_INDEX_YRES, Height);
\r
333 BGA_int_WriteRegister(VBE_DISPI_INDEX_BPP, 32);
\r
334 BGA_int_WriteRegister(VBE_DISPI_INDEX_ENABLE, VBE_DISPI_ENABLED | VBE_DISPI_NOCLEARMEM | VBE_DISPI_LFB_ENABLED);
\r
339 * \fn int BGA_int_UpdateMode(int id)
\r
340 * \brief Set current vide mode given a mode id
\r
342 int BGA_int_UpdateMode(int id)
\r
345 if(id < 0 || id >= BGA_MODE_COUNT) return -1;
\r
347 // Check if it is a text mode
\r
348 if( gBGA_Modes[id].flags & MODEFLAG_TEXT )
\r
350 gBGA_Modes[id].width*giVT_CharWidth,
\r
351 gBGA_Modes[id].height*giVT_CharHeight);
\r
354 gBGA_Modes[id].width,
\r
355 gBGA_Modes[id].height);
\r
357 giBGA_CurrentMode = id;
\r
358 gpBGA_CurrentMode = &gBGA_Modes[id];
\r
363 * \fn int BGA_int_FindMode(tVideo_IOCtl_Mode *info)
\r
364 * \brief Find a mode matching the given options
\r
366 int BGA_int_FindMode(tVideo_IOCtl_Mode *info)
\r
369 int best = 0, bestFactor = 1000;
\r
371 int rqdProduct = info->width * info->height * info->bpp;
\r
373 ENTER("pinfo", info);
\r
374 LOG("info = {width:%i,height:%i,bpp:%i})\n", info->width, info->height, info->bpp);
\r
376 for(i = 0; i < BGA_MODE_COUNT; i++)
\r
379 LogF("Mode %i (%ix%ix%i), ", i, gBGA_Modes[i].width, gBGA_Modes[i].height, gBGA_Modes[i].bpp);
\r
382 // Check if this mode is the same type as what we want
\r
383 if( !(gBGA_Modes[i].flags & MODEFLAG_TEXT) != !(info->flags & VIDEO_FLAG_TEXT) )
\r
386 // Ooh! A perfect match
\r
387 if(gBGA_Modes[i].width == info->width
\r
388 && gBGA_Modes[i].height == info->height
\r
389 && gBGA_Modes[i].bpp == info->bpp)
\r
392 LogF("Perfect!\n");
\r
398 // If not, how close are we?
\r
399 tmp = gBGA_Modes[i].width * gBGA_Modes[i].height * gBGA_Modes[i].bpp;
\r
401 tmp = tmp < 0 ? -tmp : tmp; // tmp = ABS(tmp)
\r
402 factor = tmp * 100 / rqdProduct;
\r
405 LogF("factor = %i\n", factor);
\r
408 if(factor < bestFactor)
\r
410 bestFactor = factor;
\r
416 info->width = gBGA_Modes[best].width;
\r
417 info->height = gBGA_Modes[best].height;
\r
418 info->bpp = gBGA_Modes[best].bpp;
\r
421 if(gBGA_Modes[best].flags & MODEFLAG_TEXT)
\r
422 info->flags |= VIDEO_FLAG_TEXT;
\r
428 * \fn int BGA_int_ModeInfo(tVideo_IOCtl_Mode *info)
\r
429 * \brief Get mode information
\r
431 int BGA_int_ModeInfo(tVideo_IOCtl_Mode *info)
\r
434 //if( !MM_IsUser( (Uint)info, sizeof(tVideo_IOCtl_Mode) ) ) {
\r
438 if(info->id < 0 || info->id >= BGA_MODE_COUNT) return -1;
\r
440 info->width = gBGA_Modes[info->id].width;
\r
441 info->height = gBGA_Modes[info->id].height;
\r
442 info->bpp = gBGA_Modes[info->id].bpp;
\r
445 if(gBGA_Modes[info->id].flags & MODEFLAG_TEXT)
\r
446 info->flags |= VIDEO_FLAG_TEXT;
\r
452 * \fn int BGA_int_MapFB(void *Dest)
\r
453 * \brief Map the framebuffer into a process's space
\r
454 * \param Dest User address to load to
\r
456 int BGA_int_MapFB(void *Dest)
\r
462 if((Uint)Dest > 0xC0000000) return 0;
\r
463 if(gpBGA_CurrentMode->bpp < 15) return 0; // Only non-pallete modes are supported
\r
465 // Count required pages
\r
466 pages = (gpBGA_CurrentMode->fbSize + 0xFFF) >> 12;
\r
468 // Check if there is space
\r
469 for( i = 0; i < pages; i++ )
\r
471 if(MM_GetPhysAddr( (Uint)Dest + (i << 12) ))
\r
476 for( i = 0; i < pages; i++ )
\r
477 MM_Map( (Uint)Dest + (i<<12), VBE_DISPI_LFB_PHYSICAL_ADDRESS + (i<<12) );
\r