703e708f8c043c45ee7e36df126e122c61dd48e1
[tpg/acess2.git] / 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 #define VESA_DEFAULT_FRAMEBUFFER        (KERNEL_BASE|0xA0000)\r
19 #define VESA_CURSOR_PERIOD      1000\r
20 \r
21 // === PROTOTYPES ===\r
22  int    Vesa_Install(char **Arguments);\r
23 Uint64  Vesa_Read(tVFS_Node *Node, Uint64 Offset, Uint64 Length, void *Buffer);\r
24 Uint64  Vesa_Write(tVFS_Node *Node, Uint64 Offset, Uint64 Length, void *Buffer);\r
25  int    Vesa_Ioctl(tVFS_Node *Node, int ID, void *Data);\r
26  int    Vesa_Int_SetMode(int Mode);\r
27  int    Vesa_Int_FindMode(tVideo_IOCtl_Mode *data);\r
28  int    Vesa_Int_ModeInfo(tVideo_IOCtl_Mode *data);\r
29 void    Vesa_FlipCursor(void *Arg);\r
30 // --- 2D Acceleration Functions --\r
31 void    Vesa_2D_Fill(void *Ent, Uint16 X, Uint16 Y, Uint16 W, Uint16 H, Uint32 Colour);\r
32 void    Vesa_2D_Blit(void *Ent, Uint16 DstX, Uint16 DstY, Uint16 SrcX, Uint16 SrcY, Uint16 W, Uint16 H);\r
33 \r
34 // === GLOBALS ===\r
35 MODULE_DEFINE(0, VERSION, Vesa, Vesa_Install, NULL, "PCI", "VM8086", NULL);\r
36 tDevFS_Driver   gVesa_DriverStruct = {\r
37         NULL, "Vesa",\r
38         {\r
39         .Read = Vesa_Read,\r
40         .Write = Vesa_Write,\r
41         .IOCtl = Vesa_Ioctl\r
42         }\r
43 };\r
44 tSpinlock       glVesa_Lock;\r
45 tVM8086 *gpVesa_BiosState;\r
46  int    giVesaDriverId = -1;\r
47 // --- Video Modes ---\r
48  int    giVesaCurrentMode = 0;\r
49  int    giVesaCurrentFormat = VIDEO_BUFFMT_TEXT;\r
50 tVesa_Mode      *gVesa_Modes;\r
51  int    giVesaModeCount = 0;\r
52 // --- Framebuffer ---\r
53 char    *gpVesa_Framebuffer = (void*)VESA_DEFAULT_FRAMEBUFFER;\r
54  int    giVesaPageCount = 0;    //!< Framebuffer size in pages\r
55 // --- Cursor Control ---\r
56  int    giVesaCursorX = -1;\r
57  int    giVesaCursorY = -1;\r
58  int    giVesaCursorTimer = -1; // Invalid timer\r
59 // --- 2D Video Stream Handlers ---\r
60 tDrvUtil_Video_2DHandlers       gVesa_2DFunctions = {\r
61         NULL,\r
62         Vesa_2D_Fill,\r
63         Vesa_2D_Blit\r
64 };\r
65 \r
66 // === CODE ===\r
67 int Vesa_Install(char **Arguments)\r
68 {\r
69         tVesa_CallInfo  *info;\r
70         tFarPtr infoPtr;\r
71         tVesa_CallModeInfo      *modeinfo;\r
72         tFarPtr modeinfoPtr;\r
73         Uint16  *modes;\r
74         int     i;\r
75         \r
76         // Allocate Info Block\r
77         gpVesa_BiosState = VM8086_Init();\r
78         info = VM8086_Allocate(gpVesa_BiosState, 512, &infoPtr.seg, &infoPtr.ofs);\r
79         modeinfo = VM8086_Allocate(gpVesa_BiosState, 512, &modeinfoPtr.seg, &modeinfoPtr.ofs);\r
80         // Set Requested Version\r
81         memcpy(info->signature, "VBE2", 4);\r
82         // Set Registers\r
83         gpVesa_BiosState->AX = 0x4F00;\r
84         gpVesa_BiosState->ES = infoPtr.seg;     gpVesa_BiosState->DI = infoPtr.ofs;\r
85         // Call Interrupt\r
86         VM8086_Int(gpVesa_BiosState, 0x10);\r
87         if(gpVesa_BiosState->AX != 0x004F) {\r
88                 Log_Warning("VESA", "Vesa_Install - VESA/VBE Unsupported (AX = 0x%x)", gpVesa_BiosState->AX);\r
89                 return MODULE_ERR_NOTNEEDED;\r
90         }\r
91         \r
92         Log_Debug("VESA", "info->VideoModes = %04x:%04x", info->VideoModes.seg, info->VideoModes.ofs);\r
93         modes = (Uint16 *) VM8086_GetPointer(gpVesa_BiosState, info->VideoModes.seg, info->VideoModes.ofs);\r
94         \r
95         // Read Modes\r
96         for( giVesaModeCount = 0; modes[giVesaModeCount] != 0xFFFF; giVesaModeCount++ );\r
97         gVesa_Modes = (tVesa_Mode *)malloc( giVesaModeCount * sizeof(tVesa_Mode) );\r
98         \r
99         // Insert Text Mode\r
100         gVesa_Modes[0].width = 80;\r
101         gVesa_Modes[0].height = 25;\r
102         gVesa_Modes[0].bpp = 12;\r
103         gVesa_Modes[0].code = 0x3;\r
104         gVesa_Modes[0].flags = 1;\r
105         gVesa_Modes[0].fbSize = 80*25*2;\r
106         gVesa_Modes[0].framebuffer = 0xB8000;\r
107         \r
108         for( i = 1; i < giVesaModeCount; i++ )\r
109         {\r
110                 gVesa_Modes[i].code = modes[i];\r
111                 // Get Mode info\r
112                 gpVesa_BiosState->AX = 0x4F01;\r
113                 gpVesa_BiosState->CX = gVesa_Modes[i].code;\r
114                 gpVesa_BiosState->ES = modeinfoPtr.seg;\r
115                 gpVesa_BiosState->DI = modeinfoPtr.ofs;\r
116                 VM8086_Int(gpVesa_BiosState, 0x10);\r
117                 \r
118                 // Parse Info\r
119                 gVesa_Modes[i].flags = 0;\r
120                 if ( (modeinfo->attributes & 0x90) == 0x90 )\r
121                 {\r
122                         gVesa_Modes[i].flags |= FLAG_LFB;\r
123                         gVesa_Modes[i].framebuffer = modeinfo->physbase;\r
124                         gVesa_Modes[i].fbSize = modeinfo->Xres*modeinfo->Yres*modeinfo->bpp/8;\r
125                 } else {\r
126                         gVesa_Modes[i].framebuffer = 0;\r
127                         gVesa_Modes[i].fbSize = 0;\r
128                 }\r
129                 \r
130                 gVesa_Modes[i].pitch = modeinfo->pitch;\r
131                 gVesa_Modes[i].width = modeinfo->Xres;\r
132                 gVesa_Modes[i].height = modeinfo->Yres;\r
133                 gVesa_Modes[i].bpp = modeinfo->bpp;\r
134                 \r
135                 #if DEBUG\r
136                 Log_Log("VESA", "0x%x - %ix%ix%i",\r
137                         gVesa_Modes[i].code, gVesa_Modes[i].width, gVesa_Modes[i].height, gVesa_Modes[i].bpp);\r
138                 #endif\r
139         }\r
140         \r
141         \r
142         // Install Device\r
143         giVesaDriverId = DevFS_AddDevice( &gVesa_DriverStruct );\r
144         if(giVesaDriverId == -1)        return MODULE_ERR_MISC;\r
145         \r
146         return MODULE_ERR_OK;\r
147 }\r
148 \r
149 /* Read from the framebuffer\r
150  */\r
151 Uint64 Vesa_Read(tVFS_Node *Node, Uint64 off, Uint64 len, void *buffer)\r
152 {\r
153         #if DEBUG >= 2\r
154         Log("Vesa_Read: () - NULL\n");\r
155         #endif\r
156         return 0;\r
157 }\r
158 \r
159 /**\r
160  * \brief Write to the framebuffer\r
161  */\r
162 Uint64 Vesa_Write(tVFS_Node *Node, Uint64 Offset, Uint64 Length, void *Buffer)\r
163 {\r
164         ENTER("pNode XOffset XLength pBuffer", Node, Offset, Length, Buffer);\r
165 \r
166         if(Buffer == NULL) {\r
167                 LEAVE('i', 0);\r
168                 return 0;\r
169         }\r
170 \r
171         // Default Text mode\r
172         if( giVesaCurrentMode == 0 )\r
173         {\r
174                 Uint16  *fb = (Uint16*)(KERNEL_BASE|0xB8000);\r
175                 tVT_Char        *chars = Buffer;\r
176                  int    rem;\r
177                 \r
178                 Length /= sizeof(tVT_Char);\r
179                 Offset /= sizeof(tVT_Char);\r
180                 \r
181                 if( giVesaCurrentFormat != VIDEO_BUFFMT_TEXT ) {\r
182                         Log_Warning("VESA", "Vesa_Write - Mode 0 is not framebuffer");\r
183                         LEAVE('i', -1);\r
184                         return -1;\r
185                 }\r
186                 \r
187                 if( Offset + Length > 25*80 ) {\r
188                         Log_Warning("VESA", "Vesa_Write - Framebuffer Overflow");\r
189                         LEAVE('i', 0);\r
190                         return 0;\r
191                 }\r
192                 \r
193                 fb += 2*Offset;\r
194                 LOG("fb = %p", fb);\r
195                 for(rem = Length; rem --; fb ++, chars++)\r
196                 {\r
197                         if( chars->Ch < 0x80 )\r
198                                 *fb = chars->Ch & 0x7F;\r
199                         else\r
200                                 *fb = 0x00;\r
201                         \r
202                         *fb |= (chars->FGCol & 0x888) == 0x888 ? 0x8 : 0;\r
203                         *fb |= (chars->FGCol & 0x700) > 0x300 ? 0x4 : 0;\r
204                         *fb |= (chars->FGCol & 0x070) > 0x030 ? 0x2 : 0;\r
205                         *fb |= (chars->FGCol & 0x007) > 0x003 ? 0x1 : 0;\r
206                         *fb |= (chars->BGCol & 0x888) == 0x888 ? 0x80 : 0;\r
207                         *fb |= (chars->BGCol & 0x700) > 0x300 ? 0x40 : 0;\r
208                         *fb |= (chars->BGCol & 0x070) > 0x030 ? 0x20 : 0;\r
209                         *fb |= (chars->BGCol & 0x007) > 0x003 ? 0x10 : 0;\r
210                         //LOG("%08x (%03x,%03x) = %04x",\r
211                         //      chars->Ch, chars->BGCol, chars->FGCol, *fb);\r
212                 }\r
213                 Length *= sizeof(tVT_Char);\r
214                 LEAVE('X', Length);\r
215                 return Length;\r
216         }\r
217 \r
218         if( gVesa_Modes[giVesaCurrentMode].framebuffer == 0 ) {\r
219                 Log_Warning("VESA", "Vesa_Write - Non-LFB Modes not yet supported.");\r
220                 LEAVE('i', 0);\r
221                 return 0;\r
222         }\r
223         \r
224         // Text Mode\r
225         switch( giVesaCurrentFormat )\r
226         {\r
227         case VIDEO_BUFFMT_TEXT:\r
228                 {\r
229                 tVT_Char        *chars = Buffer;\r
230                  int    pitch = gVesa_Modes[giVesaCurrentMode].width;\r
231                  int    widthInChars = gVesa_Modes[giVesaCurrentMode].width/giVT_CharWidth;\r
232                  int    heightInChars = gVesa_Modes[giVesaCurrentMode].height/giVT_CharHeight;\r
233                  int    x, y;\r
234                 Uint32  *dest = (void*)gpVesa_Framebuffer;\r
235                  int    i;\r
236                 \r
237                 Length /= sizeof(tVT_Char);\r
238                 Offset /= sizeof(tVT_Char);\r
239                 \r
240                 LOG("gVesa_Modes[%i].width = %i", giVesaCurrentMode, gVesa_Modes[giVesaCurrentMode].width);\r
241                 x = Offset % widthInChars;\r
242                 y = Offset / widthInChars;\r
243                 LOG("(x,y) = (%i,%i) = [%i,%i]", x, y, x * giVT_CharWidth, y * giVT_CharHeight * pitch);\r
244                 LOG("(w,h) = (%i,%i) = [%i,%i]",\r
245                         (int)(Length % widthInChars),\r
246                         (int)(Length / widthInChars),\r
247                         (int)((Length % widthInChars) * giVT_CharWidth),\r
248                         (int)((Length / widthInChars) * giVT_CharHeight * pitch)\r
249                         );\r
250                 \r
251                 // Sanity Check\r
252                 if(y >= heightInChars) {\r
253                         LEAVE('i', 0);\r
254                         return 0;\r
255                 }\r
256                 \r
257                 if( Offset + Length > heightInChars*widthInChars ) {\r
258                         Log_Debug("VESA", "%i + %i > %i*%i (%i)",\r
259                                 (int)Offset, (int)Length, heightInChars, widthInChars, heightInChars*widthInChars);\r
260                         Length = heightInChars*widthInChars - Offset;\r
261                         Log_Notice("VESA", "Clipping write size to %i characters", (int)Length);\r
262                 }\r
263                 \r
264                 dest += y * giVT_CharHeight * pitch;\r
265                 dest += x * giVT_CharWidth;\r
266                 \r
267                 LOG("dest = %p", dest);\r
268                 \r
269                 for( i = 0; i < Length; i++ )\r
270                 {\r
271                         VT_Font_Render(\r
272                                 chars->Ch,\r
273                                 dest + x*giVT_CharWidth, pitch,\r
274                                 VT_Colour12to24(chars->BGCol),\r
275                                 VT_Colour12to24(chars->FGCol)\r
276                                 );\r
277                         \r
278                         chars ++;\r
279                         x ++;\r
280                         if( x >= widthInChars ) {\r
281                                 x = 0;\r
282                                 y ++;\r
283                                 dest += pitch*giVT_CharHeight;\r
284                         }\r
285                 }\r
286                 Length *= sizeof(tVT_Char);\r
287                 }\r
288                 break;\r
289         \r
290         case VIDEO_BUFFMT_FRAMEBUFFER:\r
291                 {\r
292                 Uint8   *destBuf = (Uint8*) ((Uint)gpVesa_Framebuffer + (Uint)Offset);\r
293                 \r
294                 if(gVesa_Modes[giVesaCurrentMode].fbSize < Offset+Length)\r
295                 {\r
296                         Log_Warning("VESA", "Vesa_Write - Framebuffer Overflow");\r
297                         LEAVE('i', 0);\r
298                         return 0;\r
299                 }\r
300                 \r
301                 LOG("buffer = %p", Buffer);\r
302                 LOG("Updating Framebuffer (%p to %p)", destBuf, destBuf + (Uint)Length);\r
303                 \r
304                 \r
305                 // Copy to Frambuffer\r
306                 memcpy(destBuf, Buffer, Length);\r
307                 \r
308                 LOG("BGA Framebuffer updated");\r
309                 }\r
310                 break;\r
311         \r
312         case VIDEO_BUFFMT_2DSTREAM:\r
313                 Length = DrvUtil_Video_2DStream(\r
314                         NULL,   // Single framebuffer, so Ent is unused\r
315                         Buffer, Length, &gVesa_2DFunctions, sizeof(gVesa_2DFunctions)\r
316                         );\r
317                 break;\r
318         \r
319         default:\r
320                 LEAVE('i', -1);\r
321                 return -1;\r
322         }\r
323         \r
324         LEAVE('X', Length);\r
325         return Length;\r
326 }\r
327 \r
328 /**\r
329  * \fn int Vesa_Ioctl(vfs_node *node, int id, void *data)\r
330  * \brief Handle messages to the device\r
331  */\r
332 int Vesa_Ioctl(tVFS_Node *Node, int ID, void *Data)\r
333 {\r
334          int    ret;\r
335         //Log_Debug("VESA", "Vesa_Ioctl: (Node=%p, ID=%i, Data=%p)", Node, ID, Data);\r
336         switch(ID)\r
337         {\r
338         case DRV_IOCTL_TYPE:    return DRV_TYPE_VIDEO;\r
339         case DRV_IOCTL_IDENT:   memcpy("VESA", Data, 4);        return 1;\r
340         case DRV_IOCTL_VERSION: return VERSION;\r
341         \r
342         case VIDEO_IOCTL_GETSETMODE:\r
343                 if( !Data )     return giVesaCurrentMode;\r
344                 return Vesa_Int_SetMode( *(int*)Data );\r
345         \r
346         case VIDEO_IOCTL_FINDMODE:\r
347                 return Vesa_Int_FindMode((tVideo_IOCtl_Mode*)Data);\r
348         case VIDEO_IOCTL_MODEINFO:\r
349                 return Vesa_Int_ModeInfo((tVideo_IOCtl_Mode*)Data);\r
350         \r
351         case VIDEO_IOCTL_SETBUFFORMAT:\r
352                 ret = giVesaCurrentFormat;\r
353                 if(Data) {\r
354                         //Log_Log("VESA", "Buffer mode to %i", *(int*)Data);\r
355                         giVesaCurrentFormat = *(int*)Data;\r
356                 }\r
357                 return ret;\r
358         \r
359         case VIDEO_IOCTL_SETCURSOR:     // Set cursor position\r
360                 giVesaCursorX = ((tVideo_IOCtl_Pos*)Data)->x;\r
361                 giVesaCursorY = ((tVideo_IOCtl_Pos*)Data)->y;\r
362                 if(\r
363                         giVesaCursorX < 0 || giVesaCursorY < 0\r
364                 ||      giVesaCursorX >= gVesa_Modes[giVesaCurrentMode].width\r
365                 ||      giVesaCursorY >= gVesa_Modes[giVesaCurrentMode].height)\r
366                 {\r
367                         if(giVesaCursorTimer != -1)\r
368                                 Time_RemoveTimer(giVesaCursorTimer);\r
369                         giVesaCursorX = -1;\r
370                         giVesaCursorY = -1;\r
371                 }\r
372                 else {\r
373                         if(giVesaCursorTimer == -1)\r
374                                 giVesaCursorTimer = Time_CreateTimer(VESA_CURSOR_PERIOD, Vesa_FlipCursor, Node);\r
375                 }\r
376                 return 0;\r
377         \r
378         case VIDEO_IOCTL_REQLFB:        // Request Linear Framebuffer\r
379                 return 0;\r
380         }\r
381         return 0;\r
382 }\r
383 \r
384 /**\r
385  * \brief Updates the video mode\r
386  */\r
387 int Vesa_Int_SetMode(int mode)\r
388 {\r
389         Log_Log("VESA", "Setting mode to %i", mode);\r
390         \r
391         // Sanity Check values\r
392         if(mode < 0 || mode > giVesaModeCount)  return -1;\r
393         \r
394         // Check for fast return\r
395         if(mode == giVesaCurrentMode)   return 1;\r
396         \r
397         Time_RemoveTimer(giVesaCursorTimer);\r
398         \r
399         LOCK( &glVesa_Lock );\r
400         \r
401         gpVesa_BiosState->AX = 0x4F02;\r
402         gpVesa_BiosState->BX = gVesa_Modes[mode].code;\r
403         if(gVesa_Modes[mode].flags & FLAG_LFB) {\r
404                 Log_Log("VESA", "Using LFB");\r
405                 gpVesa_BiosState->BX |= 0x4000; // Bit 14 - Use LFB\r
406         }\r
407         \r
408         // Set Mode\r
409         VM8086_Int(gpVesa_BiosState, 0x10);\r
410         \r
411         // Map Framebuffer\r
412         if( (tVAddr)gpVesa_Framebuffer != VESA_DEFAULT_FRAMEBUFFER )\r
413                 MM_UnmapHWPages((tVAddr)gpVesa_Framebuffer, giVesaPageCount);\r
414         giVesaPageCount = (gVesa_Modes[mode].fbSize + 0xFFF) >> 12;\r
415         gpVesa_Framebuffer = (void*)MM_MapHWPages(gVesa_Modes[mode].framebuffer, giVesaPageCount);\r
416         \r
417         Log_Log("VESA", "Framebuffer (Phys) = 0x%x", gVesa_Modes[mode].framebuffer);\r
418         Log_Log("VESA", "Framebuffer (Virt) = 0x%x", gpVesa_Framebuffer);\r
419         \r
420         // Record Mode Set\r
421         giVesaCurrentMode = mode;\r
422         \r
423         RELEASE( &glVesa_Lock );\r
424         \r
425         return 1;\r
426 }\r
427 \r
428 int Vesa_Int_FindMode(tVideo_IOCtl_Mode *data)\r
429 {\r
430          int    i;\r
431          int    best = -1, bestFactor = 1000;\r
432          int    factor, tmp;\r
433         \r
434         ENTER("idata->width idata->height idata->bpp", data->width, data->height, data->bpp);\r
435         \r
436         for(i=0;i<giVesaModeCount;i++)\r
437         {\r
438                 LOG("Mode %i (%ix%ix%i)", i, gVesa_Modes[i].width, gVesa_Modes[i].height, gVesa_Modes[i].bpp);\r
439         \r
440                 if(gVesa_Modes[i].width == data->width\r
441                 && gVesa_Modes[i].height == data->height\r
442                 && gVesa_Modes[i].bpp == data->bpp)\r
443                 {\r
444                         LOG("Perfect!");\r
445                         best = i;\r
446                         break;\r
447                 }\r
448                 \r
449                 tmp = gVesa_Modes[i].width * gVesa_Modes[i].height * gVesa_Modes[i].bpp;\r
450                 tmp -= data->width * data->height * data->bpp;\r
451                 tmp = tmp < 0 ? -tmp : tmp;\r
452                 factor = tmp * 100 / (data->width * data->height * data->bpp);\r
453                 \r
454                 LOG("factor = %i", factor);\r
455                 \r
456                 if(factor < bestFactor)\r
457                 {\r
458                         bestFactor = factor;\r
459                         best = i;\r
460                 }\r
461         }\r
462         data->id = best;\r
463         data->width = gVesa_Modes[best].width;\r
464         data->height = gVesa_Modes[best].height;\r
465         data->bpp = gVesa_Modes[best].bpp;\r
466         LEAVE('i', best);\r
467         return best;\r
468 }\r
469 \r
470 int Vesa_Int_ModeInfo(tVideo_IOCtl_Mode *data)\r
471 {\r
472         if(data->id < 0 || data->id > giVesaModeCount)  return -1;\r
473         data->width = gVesa_Modes[data->id].width;\r
474         data->height = gVesa_Modes[data->id].height;\r
475         data->bpp = gVesa_Modes[data->id].bpp;\r
476         return 1;\r
477 }\r
478 \r
479 /**\r
480  * \brief Updates the state of the text cursor\r
481  * \note Just does a bitwise not on the cursor region\r
482  */\r
483 void Vesa_FlipCursor(void *Arg)\r
484 {\r
485          int    pitch = gVesa_Modes[giVesaCurrentMode].pitch/4;\r
486          int    x = giVesaCursorX*giVT_CharWidth;\r
487          int    y = giVesaCursorY*giVT_CharHeight;\r
488          int    i;\r
489         Uint32  *fb = (void*)gpVesa_Framebuffer;\r
490         \r
491         if(giVesaCursorX < 0 || giVesaCursorY < 0)      return;\r
492         \r
493         for( i = 1; i < giVT_CharHeight-1; i++ )\r
494                 fb[(y+i)*pitch+x] = ~fb[(y+i)*pitch+x];\r
495         \r
496         giVesaCursorTimer = Time_CreateTimer(VESA_CURSOR_PERIOD, Vesa_FlipCursor, Arg);\r
497 }\r
498 \r
499 // ------------------------\r
500 // --- 2D Accelleration ---\r
501 // ------------------------\r
502 void Vesa_2D_Fill(void *Ent, Uint16 X, Uint16 Y, Uint16 W, Uint16 H, Uint32 Colour)\r
503 {\r
504          int    scrnwidth = gVesa_Modes[giVesaCurrentMode].width;\r
505         Uint32  *buf = (Uint32*)gpVesa_Framebuffer + Y*scrnwidth + X;\r
506         while( H -- ) {\r
507                 memsetd(buf, Colour, W);\r
508                 buf += scrnwidth;\r
509         }\r
510 }\r
511 \r
512 void Vesa_2D_Blit(void *Ent, Uint16 DstX, Uint16 DstY, Uint16 SrcX, Uint16 SrcY, Uint16 W, Uint16 H)\r
513 {\r
514          int    scrnpitch = gVesa_Modes[giVesaCurrentMode].pitch;\r
515          int    dst = DstY*scrnpitch + DstX;\r
516          int    src = SrcY*scrnpitch + SrcX;\r
517          int    tmp;\r
518         \r
519         //Log("Vesa_2D_Blit: (Ent=%p, DstX=%i, DstY=%i, SrcX=%i, SrcY=%i, W=%i, H=%i)",\r
520         //      Ent, DstX, DstY, SrcX, SrcY, W, H);\r
521         \r
522         if(SrcX + W > gVesa_Modes[giVesaCurrentMode].width)\r
523                 W = gVesa_Modes[giVesaCurrentMode].width - SrcX;\r
524         if(DstX + W > gVesa_Modes[giVesaCurrentMode].width)\r
525                 W = gVesa_Modes[giVesaCurrentMode].width - DstX;\r
526         if(SrcY + H > gVesa_Modes[giVesaCurrentMode].height)\r
527                 H = gVesa_Modes[giVesaCurrentMode].height - SrcY;\r
528         if(DstY + H > gVesa_Modes[giVesaCurrentMode].height)\r
529                 H = gVesa_Modes[giVesaCurrentMode].height - DstY;\r
530         \r
531         //Debug("W = %i, H = %i", W, H);\r
532         \r
533         if( dst > src ) {\r
534                 // Reverse copy\r
535                 dst += H*scrnpitch;\r
536                 src += H*scrnpitch;\r
537                 while( H -- ) {\r
538                         dst -= scrnpitch;\r
539                         src -= scrnpitch;\r
540                         tmp = W;\r
541                         for( tmp = W; tmp --; ) {\r
542                                 *(Uint32*)(gpVesa_Framebuffer + dst + tmp) = *(Uint32*)(gpVesa_Framebuffer + src + tmp);\r
543                         }\r
544                 }\r
545         }\r
546         else {\r
547                 // Normal copy is OK\r
548                 while( H -- ) {\r
549                         memcpy((void*)gpVesa_Framebuffer + dst, (void*)gpVesa_Framebuffer + src, W*sizeof(Uint32));\r
550                         dst += scrnpitch;\r
551                         src += scrnpitch;\r
552                 }\r
553         }\r
554 }\r

UCC git Repository :: git.ucc.asn.au