• Home
  • Line#
  • Scopes#
  • Navigate#
  • Raw
  • Download
1 /*
2     SDL - Simple DirectMedia Layer
3     Copyright (C) 1997-2012 Sam Lantinga
4 
5     This library is free software; you can redistribute it and/or
6     modify it under the terms of the GNU Library General Public
7     License as published by the Free Software Foundation; either
8     version 2 of the License, or (at your option) any later version.
9 
10     This library is distributed in the hope that it will be useful,
11     but WITHOUT ANY WARRANTY; without even the implied warranty of
12     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13     Library General Public License for more details.
14 
15     You should have received a copy of the GNU Library General Public
16     License along with this library; if not, write to the Free
17     Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
18 
19     Sam Lantinga
20     slouken@devolution.com
21 */
22 
23 /*
24     SDL_epocvideo.cpp
25     Epoc based SDL video driver implementation
26 
27     Thanks to Peter van Sebille, the author of EMame. It is a great example of
28     low level graphics coding in Epoc.
29 
30     Epoc version by Hannu Viitala (hannu.j.viitala@mbnet.fi)
31 	Assembler routines by Kimmo Kinnunen
32 */
33 
34 
35 
36 #include <stdlib.h>
37 #include <stdio.h>
38 #include <string.h>
39 
40 extern "C" {
41 #include "SDL_error.h"
42 #include "SDL_timer.h"
43 #include "SDL_video.h"
44 #undef NULL
45 #include "SDL_pixels_c.h"
46 #include "SDL.h"
47 };
48 
49 #include "SDL_epocvideo.h"
50 #include "SDL_epocevents_c.h"
51 
52 #include "sdl_epocruntime.h"
53 
54 #include <hal.h>
55 #include <coedef.h>
56 #include <flogger.h>
57 
58 #ifdef SYMBIAN_QUARTZ
59 SDL_VideoDevice* _thisDevice;
60 #endif
61 
62 _LIT(KLibName, "SDL");
63 
64 /* For debugging */
65 
66 //if old SOS, from 7.x this is public!
67 class CLockable : public CFbsBitmap
68     {
69     public:
Lockable(CFbsBitmap * aBmp)70         static  CLockable* Lockable(CFbsBitmap* aBmp) {return static_cast<CLockable*>(aBmp);}
Lock()71         void Lock() {LockHeap();}
Unlock()72         void Unlock() {UnlockHeap();}
73     };
74 #define LockHeap(x) CLockable::Lockable(x)->Lock()
75 #define UnlockHeap(x) CLockable::Lockable(x)->Unlock()
76 
RDebug_Print_b(char * error_str,void * param)77 void RDebug_Print_b(char* error_str, void* param)
78     {
79     TBuf8<128> error8((TUint8*)error_str);
80     TBuf<128> error;
81     error.Copy(error8);
82 
83 #ifndef TRACE_TO_FILE
84     if (param) //!! Do not work if the parameter is really 0!!
85         RDebug::Print(error, param);
86     else
87         RDebug::Print(error);
88 #else
89     if (param) //!! Do not work if the parameter is really 0!!
90         RFileLogger::WriteFormat(KLibName, _L("SDL.txt"), EFileLoggingModeAppend, error, param);
91     else
92         RFileLogger::Write(KLibName, _L("SDL.txt"), EFileLoggingModeAppend, error);
93 #endif
94 
95     }
96 
RDebug_Print(char * error_str,void * param)97 extern "C" void RDebug_Print(char* error_str, void* param)
98     {
99     RDebug_Print_b(error_str, param);
100     }
101 
102 
Debug_AvailMem2()103 int Debug_AvailMem2()
104     {
105     //User::CompressAllHeaps();
106     TMemoryInfoV1Buf membuf;
107     User::LeaveIfError(UserHal::MemoryInfo(membuf));
108     TMemoryInfoV1 minfo = membuf();
109 	return(minfo.iFreeRamInBytes);
110     }
111 
Debug_AvailMem()112 extern "C" int Debug_AvailMem()
113     {
114     return(Debug_AvailMem2());
115     }
116 
117 
118 extern "C" {
119 
120 /* Initialization/Query functions */
121 
122 static int EPOC_VideoInit(_THIS, SDL_PixelFormat *vformat);
123 static SDL_Rect **EPOC_ListModes(_THIS, SDL_PixelFormat *format, Uint32 flags);
124 static SDL_Surface *EPOC_SetVideoMode(_THIS, SDL_Surface *current, int width, int height, int bpp, Uint32 flags);
125 static int EPOC_SetColors(_THIS, int firstcolor, int ncolors,
126 			  SDL_Color *colors);
127 static void EPOC_VideoQuit(_THIS);
128 
129 /* Hardware surface functions */
130 
131 static int EPOC_AllocHWSurface(_THIS, SDL_Surface *surface);
132 static int EPOC_LockHWSurface(_THIS, SDL_Surface *surface);
133 static int EPOC_FlipHWSurface(_THIS, SDL_Surface *surface);
134 static void EPOC_UnlockHWSurface(_THIS, SDL_Surface *surface);
135 static void EPOC_FreeHWSurface(_THIS, SDL_Surface *surface);
136 static void EPOC_DirectUpdate(_THIS, int numrects, SDL_Rect *rects);
137 
138 static int EPOC_Available(void);
139 static SDL_VideoDevice *EPOC_CreateDevice(int devindex);
140 
141 void DrawBackground(_THIS);
142 void DirectDraw(_THIS, int numrects, SDL_Rect *rects, TUint16* screenBuffer);
143 void DirectDrawRotated(_THIS, int numrects, SDL_Rect *rects, TUint16* screenBuffer);
144 
145 /* Mouse functions */
146 
147 static WMcursor *EPOC_CreateWMCursor(_THIS, Uint8 *data, Uint8 *mask, int w, int h, int hot_x, int hot_y);
148 static void EPOC_FreeWMCursor(_THIS, WMcursor *cursor);
149 static int EPOC_ShowWMCursor(_THIS, WMcursor *cursor);
150 
151 
152 
153 /* !!For 12 bit screen HW. Table for fast conversion from 8 bit to 12 bit */
154 // TUint16 is enough, but using TUint32 so we can use better instruction selection on ARMI
155 static TUint32 EPOC_HWPalette_256_to_Screen[256];
156 
157 VideoBootStrap EPOC_bootstrap = {
158 	"epoc", "EPOC system",
159     EPOC_Available, EPOC_CreateDevice
160 };
161 
162 const TUint32 WindowClientHandle = 9210; //!! const
163 
164 /* Epoc video driver bootstrap functions */
165 
EPOC_Available(void)166 static int EPOC_Available(void)
167 {
168     return 1; /* Always available */
169 }
170 
EPOC_DeleteDevice(SDL_VideoDevice * device)171 static void EPOC_DeleteDevice(SDL_VideoDevice *device)
172 {
173 	free(device->hidden);
174 	free(device);
175 }
176 
EPOC_CreateDevice(int)177 static SDL_VideoDevice *EPOC_CreateDevice(int /*devindex*/)
178 {
179 	SDL_VideoDevice *device;
180 
181 	SDL_TRACE("SDL:EPOC_CreateDevice");
182 
183 	/* Allocate all variables that we free on delete */
184 	device = (SDL_VideoDevice *)malloc(sizeof(SDL_VideoDevice));
185 	if ( device ) {
186 		memset(device, 0, (sizeof *device));
187 		device->hidden = (struct SDL_PrivateVideoData *)
188 				malloc((sizeof *device->hidden));
189 	}
190 	if ( (device == NULL) || (device->hidden == NULL) ) {
191 		SDL_OutOfMemory();
192 		if ( device ) {
193 			free(device);
194 		}
195 		return(0);
196 	}
197 	memset(device->hidden, 0, (sizeof *device->hidden));
198 
199 	/* Set the function pointers */
200 	device->VideoInit = EPOC_VideoInit;
201 	device->ListModes = EPOC_ListModes;
202 	device->SetVideoMode = EPOC_SetVideoMode;
203 	device->SetColors = EPOC_SetColors;
204 	device->UpdateRects = NULL;
205 	device->VideoQuit = EPOC_VideoQuit;
206 	device->AllocHWSurface = EPOC_AllocHWSurface;
207 	device->CheckHWBlit = NULL;
208 	device->FillHWRect = NULL;
209 	device->SetHWColorKey = NULL;
210 	device->SetHWAlpha = NULL;
211 	device->LockHWSurface = EPOC_LockHWSurface;
212 	device->UnlockHWSurface = EPOC_UnlockHWSurface;
213 	device->FlipHWSurface = EPOC_FlipHWSurface;
214 	device->FreeHWSurface = EPOC_FreeHWSurface;
215 	device->SetIcon = NULL;
216 	device->SetCaption = NULL;
217 	device->GetWMInfo = NULL;
218 	device->FreeWMCursor = EPOC_FreeWMCursor;
219 	device->CreateWMCursor = EPOC_CreateWMCursor;
220 	device->ShowWMCursor = EPOC_ShowWMCursor;
221 	device->WarpWMCursor = NULL;
222 	device->InitOSKeymap = EPOC_InitOSKeymap;
223 	device->PumpEvents = EPOC_PumpEvents;
224 	device->free = EPOC_DeleteDevice;
225 
226 	return device;
227 }
228 
229 
GetBpp(TDisplayMode displaymode)230 int GetBpp(TDisplayMode displaymode)
231 {
232     /*TInt numColors = TDisplayModeUtils::NumDisplayModeColors(displaymode);
233     TInt bitsPerPixel = 1;
234     for (TInt32 i = 2; i < numColors; i <<= 1, bitsPerPixel++);
235     return bitsPerPixel;*/
236     return  TDisplayModeUtils::NumDisplayModeBitsPerPixel(displaymode);
237 }
238 
239 
DisableKeyBlocking(_THIS)240 void DisableKeyBlocking(_THIS)
241     {
242     // Disable key blocking
243     TRawEvent event;
244     event.Set((TRawEvent::TType)/*EDisableKeyBlock*/51); // !!EDisableKeyBlock not found in epoc32\include!
245     Private->EPOC_WsSession.SimulateRawEvent(event);
246     }
247 
ConstructWindowL(_THIS)248 void ConstructWindowL(_THIS)
249 {
250 	TInt	error;
251 
252 	SDL_TRACE("SDL:ConstructWindowL");
253 	error = Private->EPOC_WsSession.Connect();
254 	User::LeaveIfError(error);
255 	Private->EPOC_WsScreen=new(ELeave) CWsScreenDevice(Private->EPOC_WsSession);
256 	User::LeaveIfError(Private->EPOC_WsScreen->Construct());
257 	User::LeaveIfError(Private->EPOC_WsScreen->CreateContext(Private->EPOC_WindowGc));
258 
259 	Private->EPOC_WsWindowGroup=RWindowGroup(Private->EPOC_WsSession);
260 	User::LeaveIfError(Private->EPOC_WsWindowGroup.Construct(WindowClientHandle));
261 	Private->EPOC_WsWindowGroup.SetOrdinalPosition(0);
262 
263 	// Set window group name (the same as process name)) !!Gives always "EPOC" in WINS
264 	RProcess thisProcess;
265 	TParse exeName;
266 	exeName.Set(thisProcess.FileName(), NULL, NULL);
267     TBuf<32> winGroupName;
268     winGroupName.Append(0);
269     winGroupName.Append(0);
270     winGroupName.Append(0);// uid
271     winGroupName.Append(0);
272     winGroupName.Append(exeName.Name()); // caption
273     winGroupName.Append(0);
274     winGroupName.Append(0); //doc name
275 	Private->EPOC_WsWindowGroup.SetName(winGroupName);
276 
277 	Private->EPOC_WsWindow=RWindow(Private->EPOC_WsSession);
278   // Markus, it was:
279   // User::LeaveIfError(Private->EPOC_WsWindow.Construct(Private->EPOC_WsWindowGroup,WindowClientHandle ));
280   // but SOS 7.0s debug does not accept same window handle twice
281 	User::LeaveIfError(Private->EPOC_WsWindow.Construct(Private->EPOC_WsWindowGroup,WindowClientHandle - 1));
282 	Private->EPOC_WsWindow.SetBackgroundColor(KRgbWhite);
283     Private->EPOC_WsWindow.Activate();
284 	Private->EPOC_WsWindow.SetSize(Private->EPOC_WsScreen->SizeInPixels());
285 	Private->EPOC_WsWindow.SetVisible(ETrue);
286 
287     Private->EPOC_WsWindowGroupID = Private->EPOC_WsWindowGroup.Identifier();
288     Private->EPOC_IsWindowFocused = EFalse;
289 
290     DisableKeyBlocking(_this); //disable key blocking
291 }
292 
EPOC_VideoInit(_THIS,SDL_PixelFormat * vformat)293 int EPOC_VideoInit(_THIS, SDL_PixelFormat *vformat)
294 {
295     // !!TODO:handle leave functions!
296 
297     int i;
298 
299 	SDL_TRACE("SDL:EPOC_VideoInit");
300 
301 	/* Initialize all variables that we clean on shutdown */
302 
303 	for ( i=0; i<SDL_NUMMODES; ++i ) {
304 		Private->SDL_modelist[i] = (SDL_Rect *)malloc(sizeof(SDL_Rect));
305 		Private->SDL_modelist[i]->x = Private->SDL_modelist[i]->y = 0;
306 	}
307 
308 	/* Modes sorted largest to smallest */
309 	Private->SDL_modelist[0]->w = 800; Private->SDL_modelist[0]->h = 250;
310 	Private->SDL_modelist[1]->w = 640; Private->SDL_modelist[1]->h = 480;
311 	Private->SDL_modelist[2]->w = 480; Private->SDL_modelist[2]->h = 600;
312 	Private->SDL_modelist[3]->w = 640; Private->SDL_modelist[3]->h = 400;
313 	Private->SDL_modelist[4]->w = 352; Private->SDL_modelist[4]->h = 416;
314 	Private->SDL_modelist[5]->w = 416; Private->SDL_modelist[5]->h = 352;
315 	Private->SDL_modelist[6]->w = 416; Private->SDL_modelist[6]->h = 312;
316 	Private->SDL_modelist[7]->w = 352; Private->SDL_modelist[7]->h = 264;
317 	Private->SDL_modelist[8]->w = 800; Private->SDL_modelist[8]->h = 240; //for doom all these..
318 	Private->SDL_modelist[9]->w = 640; Private->SDL_modelist[9]->h = 240;
319 	Private->SDL_modelist[10]->w = 480; Private->SDL_modelist[10]->h = 240;
320 	Private->SDL_modelist[11]->w = 640; Private->SDL_modelist[11]->h = 240;
321 	Private->SDL_modelist[12]->w = 352; Private->SDL_modelist[12]->h = 240;
322 	Private->SDL_modelist[13]->w = 416; Private->SDL_modelist[13]->h = 240;
323 	Private->SDL_modelist[14]->w = 416; Private->SDL_modelist[14]->h = 240;
324 	Private->SDL_modelist[15]->w = 352; Private->SDL_modelist[15]->h = 240;
325     Private->SDL_modelist[16]->w = 640; Private->SDL_modelist[16]->h = 200;
326 	Private->SDL_modelist[17]->w = 320; Private->SDL_modelist[17]->h = 240; //...for doom, currently engine renders no-higher windows :-(, propably should get fixed
327 	Private->SDL_modelist[18]->w = 320; Private->SDL_modelist[18]->h = 200;
328 	Private->SDL_modelist[19]->w = 256; Private->SDL_modelist[19]->h = 192;
329 	Private->SDL_modelist[20]->w = 176; Private->SDL_modelist[20]->h = 208;
330 	Private->SDL_modelist[21]->w = 208; Private->SDL_modelist[21]->h = 176; // Rotated
331 	Private->SDL_modelist[22]->w = 160; Private->SDL_modelist[22]->h = 144;
332 
333     Private->SDL_modelist[23]->w = 640; Private->SDL_modelist[2]->h = 200;  //s80 some new modes
334     Private->SDL_modelist[24]->w = 640; Private->SDL_modelist[2]->h = 320;  //s90 modes are added
335     Private->SDL_modelist[25]->w = 640; Private->SDL_modelist[2]->h = 240;  //here
336 	Private->SDL_modelist[26]->w = 640; Private->SDL_modelist[4]->h = 200;  //now
337 
338 	Private->SDL_modelist[27] = NULL;
339 
340     /* Construct Epoc window */
341 
342     ConstructWindowL(_this);
343 
344     /* Initialise Epoc frame buffer */
345 
346     TDisplayMode displayMode = Private->EPOC_WsScreen->DisplayMode();
347 
348 #if !defined(__WINS__) && !defined(TEST_BM_DRAW)
349 
350     TScreenInfoV01 screenInfo;
351 	TPckg<TScreenInfoV01> sInfo(screenInfo);
352 	UserSvr::ScreenInfo(sInfo);
353 
354 	Private->EPOC_ScreenSize		= screenInfo.iScreenSize;
355 	Private->EPOC_DisplayMode		= displayMode;
356     Private->EPOC_HasFrameBuffer	= screenInfo.iScreenAddressValid;
357 	Private->EPOC_FrameBuffer		= Private->EPOC_HasFrameBuffer ? (TUint8*) screenInfo.iScreenAddress : NULL;
358 	Private->EPOC_BytesPerPixel	    = ((GetBpp(displayMode)-1) / 8) + 1;
359 
360     Private->EPOC_BytesPerScanLine	= screenInfo.iScreenSize.iWidth * Private->EPOC_BytesPerPixel;
361 	Private->EPOC_BytesPerScreen	= Private->EPOC_BytesPerScanLine * Private->EPOC_ScreenSize.iHeight;
362 
363     SDL_TRACE1("Screen width %d", screenInfo.iScreenSize.iWidth);
364     SDL_TRACE1("Screen height %d", screenInfo.iScreenSize.iHeight);
365     SDL_TRACE1("Screen dmode %d", displayMode);
366     SDL_TRACE1("Screen valid %d", screenInfo.iScreenAddressValid);
367 
368     SDL_TRACE1("bpp %d", Private->EPOC_BytesPerPixel);
369     SDL_TRACE1("bpsl %d", Private->EPOC_BytesPerScanLine);
370     SDL_TRACE1("bps %d", Private->EPOC_BytesPerScreen);
371 
372 
373     /* It seems that in SA1100 machines for 8bpp displays there is a 512 palette table at the
374      * beginning of the frame buffer. E.g. Series 7 and Netbook.
375      * In 12 bpp machines the table has 16 entries.
376 	 */
377 	if (Private->EPOC_HasFrameBuffer && GetBpp(displayMode) == 8)
378         {
379 		Private->EPOC_FrameBuffer += 512;
380         }
381 	else
382         {
383         Private->EPOC_FrameBuffer += 32;
384         }
385         /*if (Private->EPOC_HasFrameBuffer && GetBpp(displayMode) == 12)
386 		Private->EPOC_FrameBuffer += 16 * 2;
387     if (Private->EPOC_HasFrameBuffer && GetBpp(displayMode) == 16)
388 		Private->EPOC_FrameBuffer += 16 * 2;
389     */
390 #else /* defined __WINS__ */
391 
392     /* Create bitmap, device and context for screen drawing */
393     Private->EPOC_ScreenSize        = Private->EPOC_WsScreen->SizeInPixels();
394 
395 	Private->EPOC_Bitmap = new (ELeave) CWsBitmap(Private->EPOC_WsSession);
396 	Private->EPOC_Bitmap->Create(Private->EPOC_ScreenSize, displayMode);
397 
398 	Private->EPOC_DisplayMode	    = displayMode;
399     Private->EPOC_HasFrameBuffer    = ETrue;
400     Private->EPOC_FrameBuffer       = NULL; /* Private->EPOC_Bitmap->DataAddress() can change any time */
401 	Private->EPOC_BytesPerPixel	    = ((GetBpp(displayMode)-1) / 8) + 1;
402 	Private->EPOC_BytesPerScanLine  = Private->EPOC_WsScreen->SizeInPixels().iWidth * Private->EPOC_BytesPerPixel;
403 
404 #endif /* __WINS__ */
405 
406 #ifndef SYMBIAN_CRYSTAL
407 	// Get draw device for updating the screen
408 	TScreenInfoV01 screenInfo2;
409 
410     Epoc_Runtime::GetScreenInfo(screenInfo2);
411 
412 	TRAPD(status, Private->EPOC_DrawDevice = CFbsDrawDevice::NewScreenDeviceL(screenInfo2, displayMode));
413 	User::LeaveIfError(status);
414 #endif
415 
416     /* The "best" video format should be returned to caller. */
417 
418     vformat->BitsPerPixel       = /*!!GetBpp(displayMode) */ 8;
419     vformat->BytesPerPixel      = /*!!Private->EPOC_BytesPerPixel*/ 1;
420 
421     /* Activate events for me */
422 
423 	Private->EPOC_WsEventStatus = KRequestPending;
424 	Private->EPOC_WsSession.EventReady(&Private->EPOC_WsEventStatus);
425 
426     SDL_TRACE("SDL:WsEventStatus");
427     User::WaitForRequest(Private->EPOC_WsEventStatus); //Markus: I added this and ...
428 
429 	Private->EPOC_RedrawEventStatus = KRequestPending;
430 	Private->EPOC_WsSession.RedrawReady(&Private->EPOC_RedrawEventStatus);
431 
432     SDL_TRACE("SDL:RedrawEventStatus");
433     User::WaitForRequest(Private->EPOC_RedrawEventStatus); //...this, if not catches a stray event is risen
434                                                            //if there are active objects used, or confucing
435                                                            //actions with User::WaitForAnyRequest
436     Private->EPOC_WsWindow.PointerFilter(EPointerFilterDrag, 0);
437 
438     Private->EPOC_ScreenOffset = TPoint(0, 0);
439 
440 #if defined(__WINS__) || defined(TEST_BM_DRAW)
441 	LockHeap(Private->EPOC_Bitmap); // Lock bitmap heap
442 #endif
443 
444     SDL_TRACE("SDL:DrawBackground");
445 	DrawBackground(_this); // Clear screen
446 
447 #if defined(__WINS__) || defined(TEST_BM_DRAW)
448 	UnlockHeap(Private->EPOC_Bitmap); // Unlock bitmap heap
449 #endif
450     //!! TODO: error handling
451     //if (ret != KErrNone)
452     //    return(-1);
453     //else
454 	    return(0);
455 }
456 
457 
EPOC_ListModes(_THIS,SDL_PixelFormat * format,Uint32)458 SDL_Rect **EPOC_ListModes(_THIS, SDL_PixelFormat *format, Uint32 /*flags*/)
459 {
460     if (format->BitsPerPixel == 12 || format->BitsPerPixel == 8)
461         return Private->SDL_modelist;
462     return NULL;
463 }
464 
EPOC_SetColors(_THIS,int firstcolor,int ncolors,SDL_Color * colors)465 int EPOC_SetColors(_THIS, int firstcolor, int ncolors, SDL_Color *colors)
466 {
467 	if ((firstcolor+ncolors) > 256)
468 		return -1;
469 //    SDL_TRACE1("colors %d", (TDisplayModeUtils::NumDisplayModeColors(Private->EPOC_DisplayMode)));
470     if(TDisplayModeUtils::NumDisplayModeColors(Private->EPOC_DisplayMode) == 4096)
471         {
472 	// Set 12 bit palette
473         for(int i = firstcolor; i < ncolors; i++)
474             {
475 	        // 4k value: 0000 rrrr gggg bbbb
476 	        TUint32 color4K	 = (colors[i].r & 0x0000f0) << 4;
477 	        color4K			|= (colors[i].g & 0x0000f0);
478 	        color4K			|= (colors[i].b & 0x0000f0) >> 4;
479             EPOC_HWPalette_256_to_Screen[i] = color4K;
480             }
481         }
482     else if(TDisplayModeUtils::NumDisplayModeColors(Private->EPOC_DisplayMode) == 65536)
483         {
484         for(int i = firstcolor; i < ncolors; i++)
485             {
486 			// 64k-colour displays effectively support RGB values
487 			// with 5 bits allocated to red, 6 to green and 5 to blue
488 			// 64k value: rrrr rggg gggb bbbb
489 	        TUint32 color64K = (colors[i].r & 0x0000f8) << 8;
490 	        color64K		|= (colors[i].g & 0x0000fc) << 3;
491 	        color64K		|= (colors[i].b & 0x0000f8) >> 3;
492             EPOC_HWPalette_256_to_Screen[i] = color64K;
493             }
494         }
495     else if(TDisplayModeUtils::NumDisplayModeColors(Private->EPOC_DisplayMode) == 16777216)
496         {
497         for(int i = firstcolor; i < ncolors; i++)
498             {
499 			// 16M-colour
500             //0000 0000 rrrr rrrr gggg gggg bbbb bbbb
501 	        TUint32 color16M = colors[i].r << 16;
502 	        color16M		|= colors[i].g << 8;
503 	        color16M		|= colors[i].b;
504             EPOC_HWPalette_256_to_Screen[i] = color16M;
505             }
506         }
507     else
508         {
509         return -2;
510         }
511 	return(0);
512 }
513 
514 
EPOC_SetVideoMode(_THIS,SDL_Surface * current,int width,int height,int bpp,Uint32)515 SDL_Surface *EPOC_SetVideoMode(_THIS, SDL_Surface *current,
516 				int width, int height, int bpp, Uint32 /*flags*/)
517 {
518 	SDL_TRACE("SDL:EPOC_SetVideoMode");
519     /* Check parameters */
520 #ifdef SYMBIAN_CRYSTAL
521    if (! (bpp == 8 || bpp == 12 || bpp == 16) &&
522 		 (
523 		  (width == 640 && height == 200) ||
524           (width == 640 && height == 400) ||
525           (width == 640 && height == 480) ||
526           (width == 320 && height == 200) ||
527           (width == 320 && height == 240)
528 		 )) {
529 		SDL_SetError("Requested video mode is not supported");
530         return NULL;
531     }
532 #else // SYMBIAN_SERIES60
533    if (! (bpp == 8 || bpp == 12 || bpp == 16) &&
534 		 (
535 		  (width == 320 && height == 200) ||
536           (width == 320 && height == 240) ||
537 		  (width == 256 && height == 192) ||
538 		  (width == 176 && height == 208) ||
539 		  (width == 208 && height == 176) || // Rotated
540 		  (width == 160 && height == 144)
541 		 )) {
542 		SDL_SetError("Requested video mode is not supported");
543         return NULL;
544     }
545 #endif
546 
547     if (current && current->pixels) {
548         free(current->pixels);
549         current->pixels = NULL;
550     }
551 	if ( ! SDL_ReallocFormat(current, bpp, 0, 0, 0, 0) ) {
552 		return(NULL);
553 	}
554 
555     /* Set up the new mode framebuffer */
556     if (bpp == 8)
557 	    current->flags = (SDL_FULLSCREEN|SDL_SWSURFACE|SDL_PREALLOC|SDL_HWPALETTE);
558     else // 12 bpp, 16 bpp
559 	    current->flags = (SDL_FULLSCREEN|SDL_SWSURFACE|SDL_PREALLOC);
560 	current->w = width;
561 	current->h = height;
562     int numBytesPerPixel = ((bpp-1)>>3) + 1;
563 	current->pitch = numBytesPerPixel * width; // Number of bytes in scanline
564 	current->pixels = malloc(width * height * numBytesPerPixel);
565 	memset(current->pixels, 0, width * height * numBytesPerPixel);
566 
567 	/* Set the blit function */
568 	_this->UpdateRects = EPOC_DirectUpdate;
569 
570     /*
571      *  Logic for getting suitable screen dimensions, offset, scaling and orientation
572      */
573 
574 	int w = current->w;
575 	int h = current->h;
576 
577 	// Rotate, if the screen does not fit horizontally and it is landscape screen
578 /*
579 	if ((width>Private->EPOC_ScreenSize.iWidth) &&  (width>height)) {
580 		Private->EPOC_ScreenOrientation = CFbsBitGc::EGraphicsOrientationRotated270;
581 		w = current->h;
582 		h = current->w;
583 	}
584 */
585 	// Get nearest stepwise scale values for width and height. The smallest supported scaled screen is 1/2.
586 	TInt scaleValue = 0;
587 	Private->EPOC_ScreenXScaleValue = 1;
588 	Private->EPOC_ScreenYScaleValue = 1;
589 	if (w > Private->EPOC_ScreenSize.iWidth) {
590 		// Find the biggest scale value that result the width that fits in the screen HW
591 		for (scaleValue = 2; scaleValue++;) {
592 			TInt scaledWidth = (w * (scaleValue-1))/scaleValue;
593 			if (scaledWidth > Private->EPOC_ScreenSize.iWidth)
594 				break;
595 		}
596 		Private->EPOC_ScreenXScaleValue = Max(2, scaleValue - 1);
597 		w = (w * (Private->EPOC_ScreenXScaleValue-1))/Private->EPOC_ScreenXScaleValue;
598 	}
599 	if (h > Private->EPOC_ScreenSize.iHeight) {
600 		// Find the biggest scale value that result the height that fits in the screen HW
601 		for (scaleValue = 2; scaleValue++;) {
602 			TInt scaledHeight = (h * (scaleValue-1))/scaleValue;
603 			if (scaledHeight > Private->EPOC_ScreenSize.iHeight)
604 				break;
605 		}
606 		Private->EPOC_ScreenYScaleValue = Max(2, scaleValue - 1);
607 		h = (h * (Private->EPOC_ScreenYScaleValue-1))/Private->EPOC_ScreenYScaleValue;
608 	}
609 
610     /* Centralize game window on device screen  */
611     Private->EPOC_ScreenOffset.iX = (Private->EPOC_ScreenSize.iWidth - w) / 2;
612 	if (Private->EPOC_ScreenOffset.iX < 0)
613 		Private->EPOC_ScreenOffset.iX = 0;
614     Private->EPOC_ScreenOffset.iY = (Private->EPOC_ScreenSize.iHeight - h) / 2;
615 	if (Private->EPOC_ScreenOffset.iY < 0)
616 		Private->EPOC_ScreenOffset.iY = 0;
617 
618 
619     SDL_TRACE1("View width %d", w);
620     SDL_TRACE1("View height %d", h);
621     SDL_TRACE1("View bmode %d", bpp);
622     SDL_TRACE1("View s %d", scaleValue);
623     SDL_TRACE1("View x %d", Private->EPOC_ScreenOffset.iX);
624     SDL_TRACE1("View y %d", Private->EPOC_ScreenOffset.iY);
625 
626 	/* We're done */
627 	return(current);
628 }
629 
630 
RedrawWindowL(_THIS)631 void RedrawWindowL(_THIS)
632 {
633 
634 #if defined(__WINS__) || defined(TEST_BM_DRAW)
635 	    LockHeap(Private->EPOC_Bitmap); // Lock bitmap heap
636 	    Private->EPOC_WindowGc->Activate(Private->EPOC_WsWindow);
637 #endif
638 
639     int w = _this->screen->w;
640     int h = _this->screen->h;
641 	if (Private->EPOC_ScreenOrientation == CFbsBitGc::EGraphicsOrientationRotated270) {
642 		w = _this->screen->h;
643 		h = _this->screen->w;
644 	}
645     if ((w < Private->EPOC_ScreenSize.iWidth)
646         || (h < Private->EPOC_ScreenSize.iHeight)) {
647 		DrawBackground(_this);
648     }
649 
650     /* Tell the system that something has been drawn */
651 	TRect  rect = TRect(Private->EPOC_WsWindow.Size());
652   	Private->EPOC_WsWindow.Invalidate(rect);
653 
654 #if defined(__WINS__) || defined(TEST_BM_DRAW)
655 	Private->EPOC_WsWindow.BeginRedraw(rect);
656 	Private->EPOC_WindowGc->BitBlt(TPoint(), Private->EPOC_Bitmap);
657 	Private->EPOC_WsWindow.EndRedraw();
658 	Private->EPOC_WindowGc->Deactivate();
659     UnlockHeap(Private->EPOC_Bitmap);; // Unlock bitmap heap
660 	Private->EPOC_WsSession.Flush();
661 #endif
662 
663     /* Draw current buffer */
664     SDL_Rect fullScreen;
665     fullScreen.x = 0;
666     fullScreen.y = 0;
667     fullScreen.w = _this->screen->w;
668     fullScreen.h = _this->screen->h;
669     EPOC_DirectUpdate(_this, 1, &fullScreen);
670 }
671 
672 
DrawBackground(_THIS)673 void DrawBackground(_THIS)
674 {
675 	/* Draw background */
676 #if defined(__WINS__) || defined(TEST_BM_DRAW)
677 	//warning heap is not locked! - a function calling must ensure that it's ok
678     TUint16* screenBuffer = (TUint16*)Private->EPOC_Bitmap->DataAddress();
679 #else
680     TUint16* screenBuffer = (TUint16*)Private->EPOC_FrameBuffer;
681 #endif
682 	// Draw black background
683 	Mem::FillZ(screenBuffer, Private->EPOC_BytesPerScreen);
684 
685 #if 0
686     for (int y = 0; y < Private->EPOC_ScreenSize.iHeight; y++) {
687 		for (int x = 0; x < Private->EPOC_ScreenSize.iWidth; x++) {
688 #ifdef SYMBIAN_CRYSTAL
689 			const TUint16 color = 0; // ((x+y)>>1) & 0xf; /* Draw blue stripes pattern, because in e.g. 320x200 mode there is a big background area*/
690 #else // SYMBIAN_SERIES60
691             const TUint16 color = 0; /* Draw black background */
692 #endif
693             *screenBuffer++ = color;
694 		}
695 	}
696 #endif
697 }
698 
699 
700 /* We don't actually allow hardware surfaces other than the main one */
EPOC_AllocHWSurface(_THIS,SDL_Surface *)701 static int EPOC_AllocHWSurface(_THIS, SDL_Surface* /*surface*/)
702 {
703 	return(-1);
704 }
EPOC_FreeHWSurface(_THIS,SDL_Surface *)705 static void EPOC_FreeHWSurface(_THIS, SDL_Surface* /*surface*/)
706 {
707 	return;
708 }
709 
EPOC_LockHWSurface(_THIS,SDL_Surface *)710 static int EPOC_LockHWSurface(_THIS, SDL_Surface* /*surface*/)
711 {
712 	return(0);
713 }
EPOC_UnlockHWSurface(_THIS,SDL_Surface *)714 static void EPOC_UnlockHWSurface(_THIS, SDL_Surface* /*surface*/)
715 {
716 	return;
717 }
718 
EPOC_FlipHWSurface(_THIS,SDL_Surface *)719 static int EPOC_FlipHWSurface(_THIS, SDL_Surface* /*surface*/)
720 {
721 	return(0);
722 }
723 
EPOC_DirectUpdate(_THIS,int numrects,SDL_Rect * rects)724 static void EPOC_DirectUpdate(_THIS, int numrects, SDL_Rect *rects)
725 {
726     //TInt focusWindowGroupId = Private->EPOC_WsSession.GetFocusWindowGroup();//these are async services
727    // if (focusWindowGroupId != Private->EPOC_WsWindowGroupID) {              //for that cannot be called from
728                                                                             //SDL threads ???
729     if (!Private->EPOC_IsWindowFocused)
730         {
731         /* Force focus window to redraw again for cleaning away SDL screen graphics */
732 /*
733         TInt pos = Private->EPOC_WsWindowGroup.OrdinalPosition();
734         Private->EPOC_WsWindowGroup.SetOrdinalPosition(0, KMaxTInt);
735        	TRect  rect = TRect(Private->EPOC_WsWindow.Size());
736         Private->EPOC_WsWindow.Invalidate(rect);
737         Private->EPOC_WsWindowGroup.SetOrdinalPosition(pos, ECoeWinPriorityNormal);
738        */ /* If this is not the topmost window, wait here! Sleep for 1 second to give cpu time to
739            multitasking and poll for being the topmost window.
740         */
741     //    if (Private->EPOC_WsSession.GetFocusWindowGroup() != Private->EPOC_WsWindowGroupID) {
742 
743 		   /* !!TODO: Could call GetRedraw() etc. for WsSession and redraw the screen if needed. That might be
744 		      needed if a small dialog comes in front of Game screen.
745 		   */
746            // while (Private->EPOC_WsSession.GetFocusWindowGroup() != Private->EPOC_WsWindowGroupID)
747 
748         SDL_PauseAudio(1);
749         SDL_Delay(1000);
750         return;
751       //  }
752 
753     //    RedrawWindowL(_this);
754     }
755 
756     SDL_PauseAudio(0);
757 
758 	// if we are not focused, do not draw
759 //	if (!Private->EPOC_IsWindowFocused)
760 //		return;
761 #if defined(__WINS__) || defined(TEST_BM_DRAW)
762 	TBitmapUtil lock(Private->EPOC_Bitmap);
763     lock.Begin(TPoint(0,0)); // Lock bitmap heap
764 	Private->EPOC_WindowGc->Activate(Private->EPOC_WsWindow);
765     TUint16* screenBuffer = (TUint16*)Private->EPOC_Bitmap->DataAddress();
766 #else
767     TUint16* screenBuffer = (TUint16*)Private->EPOC_FrameBuffer;
768 #endif
769 
770 	if (Private->EPOC_ScreenOrientation == CFbsBitGc::EGraphicsOrientationRotated270)
771 		DirectDrawRotated(_this, numrects, rects, screenBuffer);
772 	else
773 		DirectDraw(_this, numrects, rects, screenBuffer);
774 
775 
776 #if defined(__WINS__) || defined(TEST_BM_DRAW)
777 
778 	TRect  rect = TRect(Private->EPOC_WsWindow.Size());
779 	Private->EPOC_WsWindow.Invalidate(rect);
780 	Private->EPOC_WsWindow.BeginRedraw(rect);
781 	Private->EPOC_WindowGc->BitBlt(TPoint(), Private->EPOC_Bitmap);
782 	Private->EPOC_WsWindow.EndRedraw();
783 	Private->EPOC_WindowGc->Deactivate();
784     lock.End(); // Unlock bitmap heap
785 	Private->EPOC_WsSession.Flush();
786 #else
787 #ifndef SYMBIAN_CRYSTAL
788 	// This is not needed in Crystal. What is the performance penalty in SERIES60?
789     TRect  rect2 = TRect(Private->EPOC_WsWindow.Size());
790 
791     Private->EPOC_DrawDevice->UpdateRegion(rect2); // Should we update rects parameter area only??
792     Private->EPOC_DrawDevice->Update();
793 #endif
794 #endif
795 
796     /* Update virtual cursor. !!Do not yet work properly
797     Private->EPOC_WsSession.SetPointerCursorPosition(Private->EPOC_WsSession.PointerCursorPosition());
798     */
799 
800     /*static int foo = 1;
801 
802     	for ( int i=0; i < numrects; ++i ) {
803         const SDL_Rect& currentRect = rects[i];
804         SDL_Rect rect2;
805         rect2.x = currentRect.x;
806         rect2.y = currentRect.y;
807         rect2.w = currentRect.w;
808         rect2.h = currentRect.h;
809 
810         if (rect2.w <= 0 || rect2.h <= 0)
811             continue;
812 
813 
814     foo++;
815     if((foo % 200) == 0)
816         {
817         SDL_TRACE1("foo %d", foo);
818         CFbsBitmap* b = new (ELeave) CFbsBitmap;
819         SDL_TRACE1("bee %d", (int)b);
820         int e = b->Create(TSize(currentRect.w, currentRect.h), Private->EPOC_DisplayMode);
821 
822         SDL_TRACE1("err %d", e);
823         if(e != KErrNone)
824             User::Panic(_L("damn"), e);
825 
826         TBitmapUtil u(b);
827         u.Begin(TPoint(0, 0));
828         TUint32* d = b->DataAddress();
829 
830         SDL_TRACE1("addr %d", (int)d);
831 
832         for(TInt o = 0; o < currentRect.h; o++)
833             for(TInt p = 0; p < currentRect.w; p++)
834                 {
835                 u.SetPos(TPoint(p, o));
836                 u.SetPixel(0xFFFF);
837                 }
838 
839         SDL_TRACE1("w %d", (int)currentRect.w);
840         SDL_TRACE1("h %d", (int)currentRect.h);
841 
842         SDL_TRACE1("addr %d", (int)Private->EPOC_DisplayMode);
843 
844 
845         const TUint f = (TUint)Private->EPOC_FrameBuffer;
846         const TUint y = (TUint)Private->EPOC_BytesPerScreen;
847 
848 
849         SDL_TRACE1("frame %u", f);
850         SDL_TRACE1("bytes %u", y);
851 
852         Mem::Copy(d, Private->EPOC_FrameBuffer, Private->EPOC_BytesPerScreen);
853 
854         SDL_TRACE("kopied");
855 
856         u.End();
857         TBuf<32> name;
858         name.Format(_L("C:\\nokia\\images\\doom%d.mbm"), (foo / 200));
859         e= b->Save(name);
860         if(e != KErrNone)
861             User::Panic(_L("damned"), e);
862         delete b;
863             }}*/
864 }
865 
866 
DirectDraw(_THIS,int numrects,SDL_Rect * rects,TUint16 * screenBuffer)867 void DirectDraw(_THIS, int numrects, SDL_Rect *rects, TUint16* screenBuffer)
868 {
869 	TInt i;
870 
871     const TInt sourceNumBytesPerPixel = ((_this->screen->format->BitsPerPixel-1)>>3) + 1;
872     const TPoint fixedOffset = Private->EPOC_ScreenOffset;
873     const TInt screenW = _this->screen->w;
874     const TInt screenH = _this->screen->h;
875     const TInt sourceScanlineLength = screenW;
876     const TInt targetScanlineLength = Private->EPOC_ScreenSize.iWidth;
877 
878 	/* Render the rectangles in the list */
879 
880 	for ( i=0; i < numrects; ++i ) {
881         const SDL_Rect& currentRect = rects[i];
882         SDL_Rect rect2;
883         rect2.x = currentRect.x;
884         rect2.y = currentRect.y;
885         rect2.w = currentRect.w;
886         rect2.h = currentRect.h;
887 
888         if (rect2.w <= 0 || rect2.h <= 0) /* sanity check */
889             continue;
890 
891         /* All variables are measured in pixels */
892 
893         /* Check rects validity, i.e. upper and lower bounds */
894         TInt maxX = Min(screenW - 1, rect2.x + rect2.w - 1);
895         TInt maxY = Min(screenH - 1, rect2.y + rect2.h - 1);
896         if (maxX < 0 || maxY < 0) /* sanity check */
897             continue;
898 		/* Clip from bottom */
899         maxY = Min(maxY, Private->EPOC_ScreenSize.iHeight-1);
900 		/* TODO: Clip from the right side */
901 
902         const TInt sourceRectWidth = maxX - rect2.x + 1;
903         const TInt sourceRectWidthInBytes = sourceRectWidth * sourceNumBytesPerPixel;
904         const TInt sourceRectHeight = maxY - rect2.y + 1;
905         const TInt sourceStartOffset = rect2.x + rect2.y * sourceScanlineLength;
906 		const TUint skipValue = 1; // no skip
907 
908         TInt targetStartOffset = fixedOffset.iX + rect2.x + (fixedOffset.iY +rect2.y) * targetScanlineLength;
909 
910         // Nokia7650 native mode: 12 bpp --> 12 bpp
911         //
912 
913         switch (_this->screen->format->BitsPerPixel)
914 			{
915 		case 12:
916 			{
917 			TUint16* bitmapLine = (TUint16*)_this->screen->pixels + sourceStartOffset;
918 			TUint16* screenMemory = screenBuffer + targetStartOffset;
919 			if (skipValue == 1)
920 				{
921 				for(TInt y = 0 ; y < sourceRectHeight ; y++)
922 					{
923 					Mem::Copy(screenMemory, bitmapLine, sourceRectWidthInBytes);
924 					}
925 					bitmapLine += sourceScanlineLength;
926 					screenMemory += targetScanlineLength;
927 				}
928 			else
929 				{
930 				for(TInt y = 0 ; y < sourceRectHeight ; y++)
931 					{
932 					//TODO: optimize: separate loops for 1, 2 and n skip. Mem::Copy() can be used in unscaled case.
933 					TUint16* bitmapPos = bitmapLine; /* 2 bytes per pixel */
934 					TUint16* screenMemoryLinePos = screenMemory; /* 2 bytes per pixel */
935 					for(TInt x = 0 ; x < sourceRectWidth ; x++)
936 						{
937 						__ASSERT_DEBUG(screenMemory < (screenBuffer + Private->EPOC_ScreenSize.iWidth * Private->EPOC_ScreenSize.iHeight), User::Panic(_L("SDL"), KErrCorrupt));
938 						__ASSERT_DEBUG(screenMemory >= screenBuffer, User::Panic(_L("SDL"), KErrCorrupt));
939 						__ASSERT_DEBUG(bitmapLine < ((TUint16*)_this->screen->pixels + (_this->screen->w * _this->screen->h)), User::Panic(_L("SDL"), KErrCorrupt));
940 						__ASSERT_DEBUG(bitmapLine >=  (TUint16*)_this->screen->pixels, User::Panic(_L("SDL"), KErrCorrupt));
941 
942 						*screenMemoryLinePos++ = *bitmapPos;
943 						bitmapPos+=skipValue;
944 						}
945 					bitmapLine += sourceScanlineLength;
946 					screenMemory += targetScanlineLength;
947 					}
948 				}
949 			}
950 			break;
951         // 256 color paletted mode: 8 bpp  --> 12 bpp
952         //
953 		default:
954 			{
955             if(Private->EPOC_BytesPerPixel <= 2)
956                 {
957 			    TUint8* bitmapLine = (TUint8*)_this->screen->pixels + sourceStartOffset;
958                 TUint16* screenMemory = screenBuffer + targetStartOffset;
959 				    for(TInt y = 0 ; y < sourceRectHeight ; y++)
960 					    {
961 					    TUint8* bitmapPos = bitmapLine; /* 1 byte per pixel */
962 					    TUint16* screenMemoryLinePos = screenMemory; /* 2 bytes per pixel */
963 					    /* Convert each pixel from 256 palette to 4k color values */
964 					    for(TInt x = 0 ; x < sourceRectWidth ; x++)
965 						    {
966 						    __ASSERT_DEBUG(screenMemoryLinePos < (screenBuffer + (Private->EPOC_ScreenSize.iWidth * Private->EPOC_ScreenSize.iHeight)), User::Panic(_L("SDL"), KErrCorrupt));
967 						    __ASSERT_DEBUG(screenMemoryLinePos >= screenBuffer, User::Panic(_L("SDL"), KErrCorrupt));
968 						    __ASSERT_DEBUG(bitmapPos < ((TUint8*)_this->screen->pixels + (_this->screen->w * _this->screen->h)), User::Panic(_L("SDL"), KErrCorrupt));
969 						    __ASSERT_DEBUG(bitmapPos >= (TUint8*)_this->screen->pixels, User::Panic(_L("SDL"), KErrCorrupt));
970 						    *screenMemoryLinePos++ = EPOC_HWPalette_256_to_Screen[*bitmapPos++];
971     //						bitmapPos+=skipValue; //TODO: optimize: separate loops for 1, 2 and n skip
972 						    }
973 					    bitmapLine += sourceScanlineLength;
974 					    screenMemory += targetScanlineLength;
975 					    }
976                 }
977             else
978                 {
979                 TUint8* bitmapLine = (TUint8*)_this->screen->pixels + sourceStartOffset;
980                 TUint32* screenMemory = reinterpret_cast<TUint32*>(screenBuffer + targetStartOffset);
981 				    for(TInt y = 0 ; y < sourceRectHeight ; y++)
982 					    {
983 					    TUint8* bitmapPos = bitmapLine; /* 1 byte per pixel */
984 					    TUint32* screenMemoryLinePos = screenMemory; /* 2 bytes per pixel */
985 					    /* Convert each pixel from 256 palette to 4k color values */
986 					    for(TInt x = 0 ; x < sourceRectWidth ; x++)
987 						    {
988 						    __ASSERT_DEBUG(screenMemoryLinePos < (reinterpret_cast<TUint32*>(screenBuffer) + (Private->EPOC_ScreenSize.iWidth * Private->EPOC_ScreenSize.iHeight)), User::Panic(_L("SDL"), KErrCorrupt));
989 						    __ASSERT_DEBUG(screenMemoryLinePos >= reinterpret_cast<TUint32*>(screenBuffer), User::Panic(_L("SDL"), KErrCorrupt));
990 						    __ASSERT_DEBUG(bitmapPos < ((TUint8*)_this->screen->pixels + (_this->screen->w * _this->screen->h)), User::Panic(_L("SDL"), KErrCorrupt));
991 						    __ASSERT_DEBUG(bitmapPos >= (TUint8*)_this->screen->pixels, User::Panic(_L("SDL"), KErrCorrupt));
992 						    *screenMemoryLinePos++ = EPOC_HWPalette_256_to_Screen[*bitmapPos++];
993     //						bitmapPos+=skipValue; //TODO: optimize: separate loops for 1, 2 and n skip
994 						    }
995 					    bitmapLine += sourceScanlineLength;
996 					    screenMemory += targetScanlineLength;
997 					    }
998                 }
999 			}
1000 		} // switch
1001 	} // for
1002 }
1003 
1004 /*
1005 void DirectDraw(_THIS, int numrects, SDL_Rect *rects, TUint16* screenBuffer)
1006 {
1007 	TInt i;
1008     const TInt sourceNumBytesPerPixel = ((_this->screen->format->BitsPerPixel-1)>>3) + 1;
1009     const TPoint fixedOffset = Private->EPOC_ScreenOffset;
1010     const TInt screenW = _this->screen->w;
1011     const TInt screenH = _this->screen->h;
1012     const TInt sourceScanlineLength = screenW;
1013     const TInt targetScanlineLength = Private->EPOC_ScreenSize.iWidth;
1014 
1015 	/* Render the rectangles in the list */
1016 
1017 /*	for ( i=0; i < numrects; ++i ) {
1018         const SDL_Rect& currentRect = rects[i];
1019         SDL_Rect rect2;
1020         rect2.x = currentRect.x;
1021         rect2.y = currentRect.y;
1022         rect2.w = currentRect.w;
1023         rect2.h = currentRect.h;
1024 
1025         if (rect2.w <= 0 || rect2.h <= 0) /* sanity check */
1026 /*            continue;
1027 
1028         /* All variables are measured in pixels */
1029 
1030         /* Check rects validity, i.e. upper and lower bounds */
1031 /*        TInt maxX = Min(screenW - 1, rect2.x + rect2.w - 1);
1032         TInt maxY = Min(screenH - 1, rect2.y + rect2.h - 1);
1033         if (maxX < 0 || maxY < 0) /* sanity check */
1034 /*            continue;
1035 		/* Clip from bottom */
1036 /*        maxY = Min(maxY, Private->EPOC_ScreenSize.iHeight-1);
1037 		/* TODO: Clip from the right side */
1038 
1039 /*		TInt sourceRectWidth = maxX - rect2.x + 1;
1040         const TInt sourceRectWidthInBytes = sourceRectWidth * sourceNumBytesPerPixel;
1041         const TInt sourceRectHeight = maxY - rect2.y + 1;
1042         const TInt sourceStartOffset = rect2.x + rect2.y * sourceScanlineLength;
1043 		const TUint skipValue = Private->EPOC_ScreenXScaleValue; //1; // no skip
1044 
1045 		const TInt targetStartOffset = // = (fixedOffset.iX + (rect2.x / skipValue) + (fixedOffset.iY + rect2.y) * targetScanlineLength ) ;
1046 			(skipValue > 1 ?
1047 			(fixedOffset.iX + (rect2.x / skipValue) + (fixedOffset.iY + rect2.y) * targetScanlineLength ) :
1048 			(fixedOffset.iX +  rect2.x              + (fixedOffset.iY + rect2.y) * targetScanlineLength ));
1049 
1050 		__ASSERT_DEBUG(skipValue >= 1, User::Panic(KLibName, KErrArgument));
1051 
1052         // Nokia7650 native mode: 12 bpp --> 12 bpp
1053         //
1054         switch (_this->screen->format->BitsPerPixel)
1055 			{
1056 		case 12:
1057 			{
1058 			TUint16* bitmapLine = (TUint16*)_this->screen->pixels + sourceStartOffset;
1059 			TUint16* screenMemory = screenBuffer + targetStartOffset;
1060 			if (skipValue == 1)
1061 				{
1062 				for(TInt y = 0 ; y < sourceRectHeight ; y++)
1063 					{
1064 					Mem::Copy(screenMemory, bitmapLine, sourceRectWidthInBytes);
1065 					}
1066 					bitmapLine += sourceScanlineLength;
1067 					screenMemory += targetScanlineLength;
1068 				}
1069 			else
1070 				{
1071 				for(TInt y = 0 ; y < sourceRectHeight ; y++)
1072 					{
1073 					//TODO: optimize: separate loops for 1, 2 and n skip. Mem::Copy() can be used in unscaled case.
1074 					TUint16* bitmapPos = bitmapLine; /* 2 bytes per pixel */
1075 /*					TUint16* screenMemoryLinePos = screenMemory; /* 2 bytes per pixel */
1076 /*					for(TInt x = 0 ; x < sourceRectWidth ; x++)
1077 						{
1078 						__ASSERT_DEBUG(screenMemory < (screenBuffer + Private->EPOC_ScreenSize.iWidth * Private->EPOC_ScreenSize.iHeight), User::Panic(KLibName, KErrCorrupt));
1079 						__ASSERT_DEBUG(screenMemory >= screenBuffer, User::Panic(KLibName, KErrCorrupt));
1080 						__ASSERT_DEBUG(bitmapLine < ((TUint16*)_this->screen->pixels + (_this->screen->w * _this->screen->h)), User::Panic(KLibName, KErrCorrupt));
1081 						__ASSERT_DEBUG(bitmapLine >=  (TUint16*)_this->screen->pixels, User::Panic(KLibName, KErrCorrupt));
1082 
1083 						*screenMemoryLinePos++ = *bitmapPos;
1084 						bitmapPos+=skipValue;
1085 						}
1086 					bitmapLine += sourceScanlineLength;
1087 					screenMemory += targetScanlineLength;
1088 					}
1089 				}
1090 			}
1091 			break;
1092         // 256 color paletted mode: 8 bpp  --> 12 bpp
1093         //
1094 		default:
1095 			{
1096 			TUint8* bitmapLine = (TUint8*)_this->screen->pixels + sourceStartOffset;
1097             TUint16* screenMemory = screenBuffer + targetStartOffset;
1098 			if (skipValue > 1)
1099 				sourceRectWidth /= skipValue;
1100 #if defined __MARM_ARMI__
1101 			__asm volatile("
1102 				mov		%4, %4, lsl #1	@ targetScanLineLength is in pixels, we need it in bytes
1103 			1:
1104 				mov		r6, %0			@ bitmapLine
1105 				mov		r7, %2			@ screenMemory
1106 				mov		r8, %6			@ sourceRectWidth
1107 			2:
1108 				ldrb	r4, [%0], %7			@ r4 = *bitmapPos; bitmapPos += skipValue
1109 				ldr		r5, [%1, r4, lsl #2]	@ only 16 lower bits actually used
1110 				subs	r8, r8, #1				@ x--
1111 				strh	r5, [%2], #2			@ *screenMemoryLinePos++ = r4
1112 				bne		2b
1113 
1114 				add		%0, r6, %3		@ bitmapLine += sourceScanlineLength
1115 				add		%2, r7, %4		@ screenMemory += targetScanlineLength
1116 				subs    %5, %5, #1		@ sourceRectHeight--
1117 				bne		1b
1118 				"
1119 				: // no output
1120 				//		%0								%1							%2						%3							%4						%5							%6					%7
1121 				: "r" (bitmapLine), "r" (&EPOC_HWPalette_256_to_Screen[0]), "r" (screenMemory), "r" (sourceScanlineLength), "r" (targetScanlineLength), "r" (sourceRectHeight), "r" (sourceRectWidth), "r" (skipValue)
1122 				: "r4", "r5", "r6", "r7", "r8"
1123 			);
1124 #else
1125 			for(TInt y = 0 ; y < sourceRectHeight ; y++)
1126 				{
1127 				TUint8* bitmapPos = bitmapLine; /* 1 byte per pixel */
1128 /*				TUint16* screenMemoryLinePos = screenMemory; /* 2 bytes per pixel */
1129 				/* Convert each pixel from 256 palette to 4k color values */
1130 /*				for (TInt x = 0 ; x < sourceRectWidth ; x++)
1131 					{
1132 					//__ASSERT_DEBUG(screenMemoryLinePos < (screenBuffer + (Private->EPOC_ScreenSize.iWidth * Private->EPOC_ScreenSize.iHeight)), User::Panic(KLibName, KErrCorrupt));
1133 					//__ASSERT_DEBUG(screenMemoryLinePos >= screenBuffer, User::Panic(KLibName, KErrCorrupt));
1134 					//__ASSERT_DEBUG(bitmapPos < ((TUint8*)_this->screen->pixels + (_this->screen->w * _this->screen->h)), User::Panic(KLibName, KErrCorrupt));
1135 					//__ASSERT_DEBUG(bitmapPos >= (TUint8*)_this->screen->pixels, User::Panic(KLibName, KErrCorrupt));
1136 
1137 					*screenMemoryLinePos++ = EPOC_HWPalette_256_to_Screen[*bitmapPos];
1138 					bitmapPos += skipValue;
1139 					}
1140 				bitmapLine += sourceScanlineLength;
1141 				screenMemory += targetScanlineLength;
1142 				}
1143 //#endif
1144 			}
1145 		} // switch
1146 	} // for
1147 }
1148 */
1149 
DirectDrawRotated(_THIS,int numrects,SDL_Rect * rects,TUint16 * screenBuffer)1150 void DirectDrawRotated(_THIS, int numrects, SDL_Rect *rects, TUint16* screenBuffer)
1151 {
1152 	TInt i;
1153 //    TInt sourceNumBytesPerPixel = ((_this->screen->format->BitsPerPixel-1)>>3) + 1;
1154     TPoint fixedScreenOffset = Private->EPOC_ScreenOffset;
1155     TInt bufferW = _this->screen->w;
1156     TInt bufferH = _this->screen->h;
1157     TInt ScreenW = Private->EPOC_ScreenSize.iWidth;
1158 //    TInt ScreenH = Private->EPOC_ScreenSize.iWidth;
1159     TInt sourceW = bufferW;
1160     TInt sourceH = bufferH;
1161     TInt targetW = ScreenW - fixedScreenOffset.iX * 2;
1162 //    TInt targetH = ScreenH - fixedScreenOffset.iY * 2;
1163 	TInt sourceScanlineLength = bufferW;
1164     TInt targetScanlineLength = Private->EPOC_ScreenSize.iWidth;
1165 
1166 	/* Render the rectangles in the list */
1167 
1168 	for ( i=0; i < numrects; ++i ) {
1169         SDL_Rect rect2;
1170         const SDL_Rect& currentRect = rects[i];
1171         rect2.x = currentRect.x;
1172         rect2.y = currentRect.y;
1173         rect2.w = currentRect.w;
1174         rect2.h = currentRect.h;
1175 
1176         if (rect2.w <= 0 || rect2.h <= 0) /* sanity check */
1177             continue;
1178 
1179         /* All variables are measured in pixels */
1180 
1181         /* Check rects validity, i.e. upper and lower bounds */
1182         TInt maxX = Min(sourceW - 1, rect2.x + rect2.w - 1);
1183         TInt maxY = Min(sourceH - 1, rect2.y + rect2.h - 1);
1184         if (maxX < 0 || maxY < 0) /* sanity check */
1185             continue;
1186 		/* Clip from bottom */
1187         //maxX = Min(maxX, Private->EPOC_ScreenSize.iHeight-1);
1188 		/* TODO: Clip from the right side */
1189 
1190         TInt sourceRectWidth = maxX - rect2.x + 1;
1191 //        TInt sourceRectWidthInBytes = sourceRectWidth * sourceNumBytesPerPixel;
1192         TInt sourceRectHeight = maxY - rect2.y + 1;
1193         TInt sourceStartOffset = rect2.x + rect2.y * sourceScanlineLength;
1194         TInt targetStartOffset = fixedScreenOffset.iX + (targetW-1 - rect2.y) + (fixedScreenOffset.iY +rect2.x) * targetScanlineLength;
1195 
1196         // Nokia7650 native mode: 12 bpp --> 12 bpp
1197         if (_this->screen->format->BitsPerPixel == 12) {
1198 
1199             /* !!TODO: not yet implemented
1200 
1201 	        TUint16* bitmapLine = (TUint16*)_this->screen->pixels + sourceStartOffset;
1202             TUint16* screenMemory = screenBuffer + targetStartOffset;
1203             for(TInt y = 0 ; y < sourceRectHeight ; y++) {
1204 				//TODO: optimize: separate loops for 1, 2 and n skip
1205 		        //Mem::Copy(screenMemory, bitmapLine, sourceRectWidthInBytes);
1206                 TUint16* bitmapPos = bitmapLine; // 2 bytes per pixel
1207                 TUint16* screenMemoryLinePos = screenMemory; // 2 bytes per pixel
1208 				for(TInt x = 0 ; x < sourceRectWidth ; x++) {
1209 
1210 					__ASSERT_DEBUG(screenMemory < (screenBuffer + Private->EPOC_ScreenSize.iWidth * Private->EPOC_ScreenSize.iHeight), User::Panic(KLibName, KErrCorrupt));
1211 					__ASSERT_DEBUG(screenMemory >= screenBuffer, User::Panic(KLibName, KErrCorrupt));
1212 					__ASSERT_DEBUG(bitmapLine < ((TUint16*)_this->screen->pixels + (_this->screen->w * _this->screen->h)), User::Panic(KLibName, KErrCorrupt));
1213 					__ASSERT_DEBUG(bitmapLine >=  (TUint16*)_this->screen->pixels, User::Panic(KLibName, KErrCorrupt));
1214 
1215                       *screenMemoryLinePos = *bitmapPos;
1216                     bitmapPos++;
1217                     screenMemoryLinePos += targetScanlineLength;
1218                 }
1219 		        bitmapLine += sourceScanlineLength;
1220 		        screenMemory--;
1221             }
1222 
1223             */
1224         }
1225         // 256 color paletted mode: 8 bpp  --> 12 bpp
1226         else {
1227 	        TUint8* bitmapLine = (TUint8*)_this->screen->pixels + sourceStartOffset;
1228             TUint16* screenMemory = screenBuffer + targetStartOffset;
1229 			TInt screenXScaleValue = Private->EPOC_ScreenXScaleValue;
1230 			TInt debug_ycount=0;
1231             for(TInt y = 0 ; y < sourceRectHeight ; y++) {
1232 				if(--screenXScaleValue) {
1233 					TUint8* bitmapPos = bitmapLine; /* 1 byte per pixel */
1234 					TUint16* screenMemoryLinePos = screenMemory; /* 2 bytes per pixel */
1235 					TInt screenYScaleValue = Private->EPOC_ScreenYScaleValue;
1236 					TInt debug_xcount=0;
1237 					/* Convert each pixel from 256 palette to 4k color values */
1238 					for(TInt x = 0 ; x < sourceRectWidth ; x++) {
1239 						if(--screenYScaleValue) {
1240 
1241                             __ASSERT_DEBUG(screenMemoryLinePos < (screenBuffer + (Private->EPOC_ScreenSize.iWidth * Private->EPOC_ScreenSize.iHeight)), User::Panic(KLibName, KErrCorrupt));
1242 							__ASSERT_DEBUG(screenMemoryLinePos >= screenBuffer, User::Panic(KLibName, KErrCorrupt));
1243 							__ASSERT_DEBUG(bitmapPos < ((TUint8*)_this->screen->pixels + (_this->screen->w * _this->screen->h)), User::Panic(KLibName, KErrCorrupt));
1244 							__ASSERT_DEBUG(bitmapPos >= (TUint8*)_this->screen->pixels, User::Panic(KLibName, KErrCorrupt));
1245 
1246                             *screenMemoryLinePos = TUint16(EPOC_HWPalette_256_to_Screen[*bitmapPos]);
1247 							screenMemoryLinePos += targetScanlineLength; debug_xcount++;
1248 						}
1249 						else
1250 							screenYScaleValue = Private->EPOC_ScreenYScaleValue;
1251 						bitmapPos++;
1252 					}
1253 					screenMemory--; debug_ycount++;
1254 				} // endif
1255 				else
1256 					screenXScaleValue = Private->EPOC_ScreenXScaleValue;
1257 				bitmapLine += sourceScanlineLength;
1258              }
1259 	    }
1260     }
1261 }
1262 
1263 
1264 /* Note:  If we are terminated, this could be called in the middle of
1265    another SDL video routine -- notably UpdateRects.
1266 */
EPOC_VideoQuit(_THIS)1267 void EPOC_VideoQuit(_THIS)
1268 {
1269 	int i;
1270 
1271 	/* Free video mode lists */
1272 	for ( i=0; i<SDL_NUMMODES; ++i ) {
1273 		if ( Private->SDL_modelist[i] != NULL ) {
1274 			free(Private->SDL_modelist[i]);
1275 			Private->SDL_modelist[i] = NULL;
1276 		}
1277 	}
1278 
1279     if ( _this->screen && (_this->screen->flags & SDL_HWSURFACE) ) {
1280 		/* Direct screen access, no memory buffer */
1281 		_this->screen->pixels = NULL;
1282 	}
1283 
1284     if (_this->screen && _this->screen->pixels) {
1285         free(_this->screen->pixels);
1286         _this->screen->pixels = NULL;
1287     }
1288 
1289     /* Free Epoc resources */
1290 
1291     /* Disable events for me */
1292 	if (Private->EPOC_WsEventStatus != KRequestPending)
1293 		Private->EPOC_WsSession.EventReadyCancel();
1294 	if (Private->EPOC_RedrawEventStatus != KRequestPending)
1295 		Private->EPOC_WsSession.RedrawReadyCancel();
1296 
1297 	#if defined(__WINS__) || defined(TEST_BM_DRAW)
1298 	delete Private->EPOC_Bitmap;
1299 	Private->EPOC_Bitmap = NULL;
1300 	#else
1301     #endif
1302 
1303 #ifndef SYMBIAN_CRYSTAL
1304 	free(Private->EPOC_DrawDevice);
1305 #endif
1306 
1307 	if (Private->EPOC_WsWindow.WsHandle())
1308 		Private->EPOC_WsWindow.Close();
1309 
1310 	if (Private->EPOC_WsWindowGroup.WsHandle())
1311 		Private->EPOC_WsWindowGroup.Close();
1312 
1313 	delete Private->EPOC_WindowGc;
1314 	Private->EPOC_WindowGc = NULL;
1315 
1316 	delete Private->EPOC_WsScreen;
1317 	Private->EPOC_WsScreen = NULL;
1318 
1319 	if (Private->EPOC_WsSession.WsHandle())
1320 		Private->EPOC_WsSession.Close();
1321 }
1322 
1323 
EPOC_CreateWMCursor(_THIS,Uint8 *,Uint8 *,int,int,int,int)1324 WMcursor *EPOC_CreateWMCursor(_THIS, Uint8* /*data*/, Uint8* /*mask*/, int /*w*/, int /*h*/, int /*hot_x*/, int /*hot_y*/)
1325 {
1326 	return (WMcursor *) 9210; // it's ok to return something unuseful but true
1327 }
1328 
EPOC_FreeWMCursor(_THIS,WMcursor *)1329 void EPOC_FreeWMCursor(_THIS, WMcursor* /*cursor*/)
1330 {
1331     /* Disable virtual cursor */
1332     HAL::Set(HAL::EMouseState, HAL::EMouseState_Invisible);
1333     Private->EPOC_WsSession.SetPointerCursorMode(EPointerCursorNone);
1334 }
1335 
EPOC_ShowWMCursor(_THIS,WMcursor * cursor)1336 int EPOC_ShowWMCursor(_THIS, WMcursor *cursor)
1337 {
1338 
1339     if (cursor ==  (WMcursor *)9210) {
1340         /* Enable virtual cursor */
1341 	    Private->EPOC_WsSession.SetPointerCursorMode(EPointerCursorNormal);
1342         if (isCursorVisible)
1343 	        HAL::Set(HAL::EMouseState, HAL::EMouseState_Visible);
1344         else
1345             Private->EPOC_WsSession.SetPointerCursorMode(EPointerCursorNone);
1346     }
1347     else {
1348         /* Disable virtual cursor */
1349         HAL::Set(HAL::EMouseState, HAL::EMouseState_Invisible);
1350         Private->EPOC_WsSession.SetPointerCursorMode(EPointerCursorNone);
1351     }
1352 
1353 	return(1);
1354 }
1355 
1356 }; // extern "C"
1357