Modules/Display/VESA/main.c

   1 /*\r
   2  * AcessOS 1\r
   3  * Video BIOS Extensions (Vesa) Driver\r
   4  */\r
   5 #define DEBUG   0\r
   6 #define VERSION 0x100\r
   7 \r
   8 #include <acess.h>\r
   9 #include <vfs.h>\r
  10 #include <tpl_drv_video.h>\r
  11 #include <fs_devfs.h>\r
  12 #include <modules.h>\r
  13 #include <vm8086.h>\r
  14 #include "common.h"\r
  15 \r
  16 // === CONSTANTS ===\r
  17 #define FLAG_LFB        0x1\r
  18 \r
  19 // === PROTOTYPES ===\r
  20  int    Vesa_Install(char **Arguments);\r
  21 Uint64  Vesa_Read(tVFS_Node *Node, Uint64 Offset, Uint64 Length, void *Buffer);\r
  22 Uint64  Vesa_Write(tVFS_Node *Node, Uint64 Offset, Uint64 Length, void *Buffer);\r
  23  int    Vesa_Ioctl(tVFS_Node *Node, int ID, void *Data);\r
  24  int    Vesa_Int_SetMode(int Mode);\r
  25  int    Vesa_Int_FindMode(tVideo_IOCtl_Mode *data);\r
  26  int    Vesa_Int_ModeInfo(tVideo_IOCtl_Mode *data);\r
  27 \r
  28 // === GLOBALS ===\r
  29 MODULE_DEFINE(0, VERSION, Vesa, Vesa_Install, NULL, "PCI", "VM8086", NULL);\r
  30 tDevFS_Driver   gVesa_DriverStruct = {\r
  31         NULL, "VESA",\r
  32         {\r
  33         .Read = Vesa_Read,\r
  34         .Write = Vesa_Write,\r
  35         .IOCtl = Vesa_Ioctl\r
  36         }\r
  37 };\r
  38 tSpinlock       glVesa_Lock;\r
  39 tVM8086 *gpVesa_BiosState;\r
  40  int    giVesaCurrentMode = -1;\r
  41  int    giVesaDriverId = -1;\r
  42 char    *gVesaFramebuffer = (void*)0xC00A0000;\r
  43 tVesa_Mode      *gVesa_Modes;\r
  44  int    giVesaModeCount = 0;\r
  45  int    giVesaPageCount = 0;\r
  46 \r
  47 //CODE\r
  48 int Vesa_Install(char **Arguments)\r
  49 {\r
  50         tVesa_CallInfo  *info;\r
  51         tFarPtr infoPtr;\r
  52         tVesa_CallModeInfo      *modeinfo;\r
  53         tFarPtr modeinfoPtr;\r
  54         Uint16  *modes;\r
  55         int     i;\r
  56         \r
  57         // Allocate Info Block\r
  58         gpVesa_BiosState = VM8086_Init();\r
  59         info = VM8086_Allocate(gpVesa_BiosState, 512, &infoPtr.seg, &infoPtr.ofs);\r
  60         modeinfo = VM8086_Allocate(gpVesa_BiosState, 512, &modeinfoPtr.seg, &modeinfoPtr.ofs);\r
  61         // Set Requested Version\r
  62         memcpy(info->signature, "VBE2", 4);\r
  63         // Set Registers\r
  64         gpVesa_BiosState->AX = 0x4F00;\r
  65         gpVesa_BiosState->ES = infoPtr.seg;     gpVesa_BiosState->DI = infoPtr.ofs;\r
  66         // Call Interrupt\r
  67         VM8086_Int(gpVesa_BiosState, 0x10);\r
  68         if(gpVesa_BiosState->AX != 0x004F) {\r
  69                 Log_Warning("Vesa", "Vesa_Install - VESA/VBE Unsupported (AX = 0x%x)\n", gpVesa_BiosState->AX);\r
  70                 return MODULE_ERR_NOTNEEDED;\r
  71         }\r
  72         \r
  73         modes = (Uint16 *) VM8086_GetPointer(gpVesa_BiosState, info->VideoModes.seg, info->VideoModes.ofs);\r
  74         \r
  75         // Read Modes\r
  76         for( giVesaModeCount = 1; modes[giVesaModeCount] != 0xFFFF; giVesaModeCount++ );\r
  77         gVesa_Modes = (tVesa_Mode *)malloc( giVesaModeCount * sizeof(tVesa_Mode) );\r
  78         \r
  79         // Insert Text Mode\r
  80         gVesa_Modes[0].width = 80;\r
  81         gVesa_Modes[0].height = 25;\r
  82         gVesa_Modes[0].bpp = 4;\r
  83         gVesa_Modes[0].code = 0x3;\r
  84         \r
  85         for( i = 1; i < giVesaModeCount; i++ )\r
  86         {\r
  87                 gVesa_Modes[i].code = modes[i];\r
  88                 // Get Mode info\r
  89                 gpVesa_BiosState->AX = 0x4F01;\r
  90                 gpVesa_BiosState->CX = gVesa_Modes[i].code;\r
  91                 gpVesa_BiosState->ES = modeinfoPtr.seg;\r
  92                 gpVesa_BiosState->DI = modeinfoPtr.ofs;\r
  93                 VM8086_Int(gpVesa_BiosState, 0x10);\r
  94                 \r
  95                 // Parse Info\r
  96                 gVesa_Modes[i].flags = 0;\r
  97                 if ( (modeinfo->attributes & 0x90) == 0x90 )\r
  98                 {\r
  99                         gVesa_Modes[i].flags |= FLAG_LFB;\r
 100                         gVesa_Modes[i].framebuffer = modeinfo->physbase;\r
 101                         gVesa_Modes[i].fbSize = modeinfo->Xres*modeinfo->Yres*modeinfo->bpp/8;\r
 102                 } else {\r
 103                         gVesa_Modes[i].framebuffer = 0;\r
 104                         gVesa_Modes[i].fbSize = 0;\r
 105                 }\r
 106                 \r
 107                 gVesa_Modes[i].width = modeinfo->Xres;\r
 108                 gVesa_Modes[i].height = modeinfo->Yres;\r
 109                 gVesa_Modes[i].bpp = modeinfo->bpp;\r
 110                 \r
 111                 #if DEBUG\r
 112                 LogF(" Vesa_Install: 0x%x - %ix%ix%i\n",\r
 113                         gVesa_Modes[i].code, gVesa_Modes[i].width, gVesa_Modes[i].height, gVesa_Modes[i].bpp);\r
 114                 #endif\r
 115         }\r
 116         \r
 117         \r
 118         // Install Device\r
 119         giVesaDriverId = DevFS_AddDevice( &gVesa_DriverStruct );\r
 120         if(giVesaDriverId == -1)        return MODULE_ERR_MISC;\r
 121         \r
 122         return MODULE_ERR_OK;\r
 123 }\r
 124 \r
 125 /* Read from the framebuffer\r
 126  */\r
 127 Uint64 Vesa_Read(tVFS_Node *Node, Uint64 off, Uint64 len, void *buffer)\r
 128 {\r
 129         #if DEBUG >= 2\r
 130         LogF("Vesa_Read: () - NULL\n");\r
 131         #endif\r
 132         return 0;\r
 133 }\r
 134 \r
 135 /**\r
 136  * \brief Write to the framebuffer\r
 137  */\r
 138 Uint64 Vesa_Write(tVFS_Node *Node, Uint64 Offset, Uint64 Length, void *Buffer)\r
 139 {\r
 140         ENTER("pNode XOffset XLength pBuffer", Node, Offset, Length, Bufffer);\r
 141 \r
 142         if(Buffer == NULL) {\r
 143                 LEAVE('i', 0);\r
 144                 return 0;\r
 145         }\r
 146 \r
 147         if( gVesa_Modes[giVesaCurrentMode].framebuffer == 0 ) {\r
 148                 Log_Warning("VESA", "Vesa_Write - Non-LFB Modes not yet supported.");\r
 149                 LEAVE('i', 0);\r
 150                 return 0;\r
 151         }\r
 152         if(gVesa_Modes[giVesaCurrentMode].fbSize < Offset+Length)\r
 153         {\r
 154                 Log_Warning("VESA", "Vesa_Write - Framebuffer Overflow");\r
 155                 LEAVE('i', 0);\r
 156                 return 0;\r
 157         }\r
 158         \r
 159         memcpy(gVesaFramebuffer + Offset, Buffer, Length);\r
 160         \r
 161         LEAVE('X', Length);\r
 162         return Length;\r
 163 }\r
 164 \r
 165 /**\r
 166  * \fn int Vesa_Ioctl(vfs_node *node, int id, void *data)\r
 167  * \brief Handle messages to the device\r
 168  */\r
 169 int Vesa_Ioctl(tVFS_Node *Node, int ID, void *Data)\r
 170 {\r
 171         switch(ID)\r
 172         {\r
 173         case DRV_IOCTL_TYPE:    return DRV_TYPE_VIDEO;\r
 174         case DRV_IOCTL_IDENT:   memcpy("VESA", Data, 4);        return 1;\r
 175         case DRV_IOCTL_VERSION: return VERSION;\r
 176         \r
 177         case VIDEO_IOCTL_GETSETMODE:\r
 178                 if( !Data )     return giVesaCurrentMode;\r
 179                 return Vesa_Int_SetMode( *(int*)Data );\r
 180         \r
 181         case VIDEO_IOCTL_FINDMODE:\r
 182                 return Vesa_Int_FindMode((tVideo_IOCtl_Mode*)Data);\r
 183         case VIDEO_IOCTL_MODEINFO:\r
 184                 return Vesa_Int_ModeInfo((tVideo_IOCtl_Mode*)Data);\r
 185         \r
 186         case VIDEO_IOCTL_REQLFB:        // Request Linear Framebuffer\r
 187                 return 0;\r
 188         }\r
 189         return 0;\r
 190 }\r
 191 \r
 192 int Vesa_Int_SetMode(int mode)\r
 193 {       \r
 194         #if DEBUG\r
 195         LogF("Vesa_Int_SetMode: (mode=%i)\n", mode);\r
 196         #endif\r
 197         \r
 198         // Sanity Check values\r
 199         if(mode < 0 || mode > giVesaModeCount)  return -1;\r
 200         \r
 201         // Check for fast return\r
 202         if(mode == giVesaCurrentMode)   return 1;\r
 203         \r
 204         LOCK( &glVesa_Lock );\r
 205         \r
 206         gpVesa_BiosState->AX = 0x4F02;\r
 207         gpVesa_BiosState->BX = gVesa_Modes[mode].code;\r
 208         if(gVesa_Modes[mode].flags & FLAG_LFB) {\r
 209                 LogF(" Vesa_Int_SetMode: Using LFB\n");\r
 210                 gpVesa_BiosState->BX |= 0x4000; // Bit 14 - Use LFB\r
 211         }\r
 212         \r
 213         // Set Mode\r
 214         VM8086_Int(gpVesa_BiosState, 0x10);\r
 215         \r
 216         // Map Framebuffer\r
 217         MM_UnmapHWPages((tVAddr)gVesaFramebuffer, giVesaPageCount);\r
 218         giVesaPageCount = (gVesa_Modes[mode].fbSize + 0xFFF) >> 12;\r
 219         gVesaFramebuffer = (void*)MM_MapHWPages(gVesa_Modes[mode].framebuffer, giVesaPageCount);\r
 220         \r
 221         LogF(" Vesa_Int_SetMode: Fb (Phys) = 0x%x\n", gVesa_Modes[mode].framebuffer);\r
 222         LogF(" Vesa_Int_SetMode: Fb (Virt) = 0x%x\n", gVesaFramebuffer);\r
 223         \r
 224         // Record Mode Set\r
 225         giVesaCurrentMode = mode;\r
 226         \r
 227         RELEASE( &glVesa_Lock );\r
 228         \r
 229         return 1;\r
 230 }\r
 231 \r
 232 int Vesa_Int_FindMode(tVideo_IOCtl_Mode *data)\r
 233 {\r
 234          int    i;\r
 235          int    best = -1, bestFactor = 1000;\r
 236          int    factor, tmp;\r
 237         #if DEBUG\r
 238         LogF("Vesa_Int_FindMode: (data={width:%i,height:%i,bpp:%i})\n", data->width, data->height, data->bpp);\r
 239         #endif\r
 240         for(i=0;i<giVesaModeCount;i++)\r
 241         {\r
 242                 #if DEBUG >= 2\r
 243                 LogF("Mode %i (%ix%ix%i), ", i, gVesa_Modes[i].width, gVesa_Modes[i].height, gVesa_Modes[i].bpp);\r
 244                 #endif\r
 245         \r
 246                 if(gVesa_Modes[i].width == data->width\r
 247                 && gVesa_Modes[i].height == data->height\r
 248                 && gVesa_Modes[i].bpp == data->bpp)\r
 249                 {\r
 250                         #if DEBUG >= 2\r
 251                         LogF("Perfect!\n");\r
 252                         #endif\r
 253                         best = i;\r
 254                         break;\r
 255                 }\r
 256                 \r
 257                 tmp = gVesa_Modes[i].width * gVesa_Modes[i].height * gVesa_Modes[i].bpp;\r
 258                 tmp -= data->width * data->height * data->bpp;\r
 259                 tmp = tmp < 0 ? -tmp : tmp;\r
 260                 factor = tmp * 100 / (data->width * data->height * data->bpp);\r
 261                 \r
 262                 #if DEBUG >= 2\r
 263                 LogF("factor = %i\n", factor);\r
 264                 #endif\r
 265                 \r
 266                 if(factor < bestFactor)\r
 267                 {\r
 268                         bestFactor = factor;\r
 269                         best = i;\r
 270                 }\r
 271         }\r
 272         data->id = best;\r
 273         data->width = gVesa_Modes[best].width;\r
 274         data->height = gVesa_Modes[best].height;\r
 275         data->bpp = gVesa_Modes[best].bpp;\r
 276         return best;\r
 277 }\r
 278 \r
 279 int Vesa_Int_ModeInfo(tVideo_IOCtl_Mode *data)\r
 280 {\r
 281         if(data->id < 0 || data->id > giVesaModeCount)  return -1;\r
 282         data->width = gVesa_Modes[data->id].width;\r
 283         data->height = gVesa_Modes[data->id].height;\r
 284         data->bpp = gVesa_Modes[data->id].bpp;\r
 285         return 1;\r
 286 }\r