cc68a136 |
1 | // mainloop with window server event handling\r |
2 | // event polling mechnism was taken from\r |
3 | // Peter van Sebille's projects\r |
4 | \r |
5 | // (c) Copyright 2006, notaz\r |
6 | // All Rights Reserved\r |
7 | \r |
8 | #include <e32base.h>\r |
9 | #include <hal.h>\r |
10 | #include <e32keys.h>\r |
11 | #include <w32std.h>\r |
12 | \r |
13 | #include <stdio.h>\r |
14 | #include <stdlib.h>\r |
15 | #include <sys/time.h>\r |
16 | \r |
17 | #include "debug.h"\r |
18 | #include "../Engine.h"\r |
19 | \r |
ca482e5d |
20 | #include <Pico/PicoInt.h>\r |
21 | #include "../../common/emu.h"\r |
22 | #include "../emu.h"\r |
cc68a136 |
23 | #include "vid.h"\r |
ca482e5d |
24 | #include "PolledAS.h"\r |
cc68a136 |
25 | //#include "audio.h"\r |
26 | #include "audio_mediaserver.h"\r |
27 | \r |
ca482e5d |
28 | //#include <ezlib.h>\r |
29 | #include <zlib/zlib.h>\r |
cc68a136 |
30 | \r |
31 | \r |
32 | //#define BENCHMARK\r |
33 | \r |
34 | \r |
35 | // scancodes we care about\r |
36 | enum TUsedScanCodes {\r |
37 | EStdKeyM600JogUp = EStdKeyDevice1,\r |
38 | EStdKeyM600JogDown = EStdKeyDevice2,\r |
39 | };\r |
40 | \r |
41 | static unsigned char keyFlags[256]; // lsb->msb: key_down, pulse_only, ?, ?, ?, ?, not_configurable, disabled\r |
42 | static unsigned char pressedKeys[11]; // List of pressed key scancodes, up to 10\r |
43 | \r |
44 | // list of areas\r |
45 | TPicoAreaConfigEntry areaConfig[] = {\r |
46 | { TRect( 0, 0, 0, 0) },\r |
47 | // small corner bottons\r |
48 | { TRect( 0, 0, 15, 15) },\r |
49 | { TRect(224, 0, 239, 15) },\r |
50 | { TRect( 0, 304, 15, 319) },\r |
51 | { TRect(224, 304, 239, 319) },\r |
52 | // normal buttons\r |
53 | { TRect( 0, 0, 79, 63) },\r |
54 | { TRect( 80, 0, 159, 63) },\r |
55 | { TRect(160, 0, 239, 63) },\r |
56 | { TRect( 0, 64, 79, 127) },\r |
57 | { TRect( 80, 64, 159, 127) },\r |
58 | { TRect(160, 64, 239, 127) },\r |
59 | { TRect( 0, 128, 79, 191) },\r |
60 | { TRect( 80, 128, 159, 191) },\r |
61 | { TRect(160, 128, 239, 191) },\r |
62 | { TRect( 0, 192, 79, 255) },\r |
63 | { TRect( 80, 192, 159, 255) },\r |
64 | { TRect(160, 192, 239, 255) },\r |
65 | { TRect( 0, 256, 79, 319) },\r |
66 | { TRect( 80, 256, 159, 319) },\r |
67 | { TRect(160, 256, 239, 319) },\r |
68 | { TRect( 0, 0, 0, 0) }\r |
69 | };\r |
70 | \r |
71 | // PicoPad[] format: SACB RLDU\r |
72 | const char *actionNames[] = {\r |
73 | "UP", "DOWN", "LEFT", "RIGHT", "B", "C", "A", "START",\r |
74 | 0, 0, 0, 0, 0, 0, 0, 0, // Z, Y, X, MODE (enabled only when needed), ?, ?, ?, ?\r |
75 | 0, 0, 0, 0, "VOLUME@UP", "VOLUME@DOWN", "NEXT@SAVE@SLOT", "PREV@SAVE@SLOT", // ?, ?, ?, ?, vol_up, vol_down, next_slot, prev_slot\r |
76 | 0, 0, "PAUSE@EMU", "SAVE@STATE", "LOAD@STATE", 0, 0, "DONE" // ?, switch_renderer, [...], "FRAMESKIP@8", "AUTO@FRAMESKIP"\r |
77 | };\r |
78 | \r |
79 | \r |
80 | // globals are allowed, so why not to (ab)use them?\r |
81 | //TInt machineUid = 0;\r |
82 | int gamestate = PGS_Paused, gamestate_next = PGS_Paused;\r |
ca482e5d |
83 | char *loadrom_fname = NULL;\r |
84 | int loadrom_result = 0;\r |
cc68a136 |
85 | static timeval noticeMsgTime = { 0, 0 }; // when started showing\r |
86 | static CGameAudioMS *gameAudio = 0; // the audio object itself\r |
ca482e5d |
87 | static int reset_timing;\r |
88 | extern int pico_was_reset;\r |
cc68a136 |
89 | extern RSemaphore initSemaphore;\r |
90 | extern RSemaphore pauseSemaphore;\r |
ca482e5d |
91 | extern RSemaphore loadWaitSemaphore;\r |
cc68a136 |
92 | \r |
93 | // some forward declarations\r |
94 | static void MainInit();\r |
95 | static void MainExit();\r |
96 | static void DumpMemInfo();\r |
cc68a136 |
97 | \r |
98 | \r |
99 | class TPicoDirectScreenAccess : public MDirectScreenAccess\r |
100 | {\r |
101 | public: // implements MDirectScreenAccess\r |
102 | void Restart(RDirectScreenAccess::TTerminationReasons aReason);\r |
103 | public: // implements MAbortDirectScreenAccess\r |
104 | void AbortNow(RDirectScreenAccess::TTerminationReasons aReason);\r |
105 | };\r |
106 | \r |
107 | \r |
108 | // just for a nicer grouping of WS related stuff\r |
109 | class CGameWindow\r |
110 | {\r |
111 | public:\r |
112 | static void ConstructResourcesL(void);\r |
113 | static void FreeResources(void);\r |
114 | static void DoKeys(void);\r |
115 | static void DoKeysConfig(TUint &which);\r |
116 | static void RunEvents(TUint32 which);\r |
117 | \r |
118 | static RWsSession* iWsSession;\r |
119 | static RWindowGroup iWsWindowGroup;\r |
120 | static RWindow iWsWindow;\r |
121 | static CWsScreenDevice* iWsScreen;\r |
122 | static CWindowGc* iWindowGc;\r |
123 | static TRequestStatus iWsEventStatus;\r |
124 | // static TThreadId iLauncherThreadId;\r |
125 | // static RDirectScreenAccess* iDSA;\r |
126 | // static TRequestStatus iDSAstatus;\r |
127 | static TPicoDirectScreenAccess iPDSA;\r |
128 | static CDirectScreenAccess* iDSA;\r |
129 | };\r |
130 | \r |
131 | \r |
ca482e5d |
132 | static void updateSound(int len)\r |
cc68a136 |
133 | {\r |
cc68a136 |
134 | PsndOut = gameAudio->NextFrameL(len);\r |
135 | if(!PsndOut) { // sound output problems?\r |
136 | strcpy(noticeMsg, "SOUND@OUTPUT@ERROR;@SOUND@DISABLED");\r |
137 | gettimeofday(¬iceMsgTime, 0);\r |
138 | }\r |
139 | }\r |
140 | \r |
141 | \r |
142 | static void SkipFrame(void)\r |
143 | {\r |
144 | PicoSkipFrame=1;\r |
145 | PicoFrame();\r |
146 | PicoSkipFrame=0;\r |
147 | }\r |
148 | \r |
149 | \r |
150 | static void simpleWait(int thissec, int lim_time)\r |
151 | {\r |
152 | struct timeval tval;\r |
153 | int sleep = 0;\r |
154 | \r |
155 | gettimeofday(&tval, 0);\r |
156 | if(thissec != tval.tv_sec) tval.tv_usec+=1000000;\r |
157 | \r |
158 | sleep = lim_time - tval.tv_usec - 2000;\r |
159 | if (sleep > 0) {\r |
160 | // User::After((sleep = lim_time - tval.tv_usec));\r |
161 | User::AfterHighRes(sleep);\r |
162 | }\r |
163 | }\r |
164 | \r |
165 | \r |
166 | static void TargetEpocGameL()\r |
167 | {\r |
168 | char buff[24]; // fps count c string\r |
169 | struct timeval tval; // timing\r |
170 | int thissec = 0, frames_done = 0, frames_shown = 0;\r |
171 | int target_fps, target_frametime;\r |
172 | int i, lim_time;\r |
173 | //TRawEvent blevent;\r |
174 | \r |
175 | MainInit();\r |
176 | buff[0] = 0;\r |
177 | \r |
ca482e5d |
178 | PicoInit();\r |
179 | \r |
cc68a136 |
180 | // just to keep the backlight on (works only on UIQ2)\r |
181 | //blevent.Set(TRawEvent::EActive);\r |
182 | \r |
183 | // loop?\r |
ca482e5d |
184 | for(;;)\r |
185 | {\r |
186 | if (gamestate == PGS_Running)\r |
187 | {\r |
cc68a136 |
188 | // switch context to other thread\r |
189 | User::After(50000);\r |
190 | // prepare window and stuff\r |
191 | CGameWindow::ConstructResourcesL();\r |
192 | \r |
193 | // if the system has something to do, it should better do it now\r |
194 | User::After(50000);\r |
195 | //CPolledActiveScheduler::Instance()->Schedule();\r |
196 | \r |
197 | // pal/ntsc might have changed, reset related stuff\r |
198 | if(Pico.m.pal) {\r |
199 | target_fps = 50;\r |
200 | if(!noticeMsgTime.tv_sec) strcpy(noticeMsg, "PAL@SYSTEM@/@50@FPS");\r |
201 | } else {\r |
202 | target_fps = 60;\r |
203 | if(!noticeMsgTime.tv_sec) strcpy(noticeMsg, "NTSC@SYSTEM@/@60@FPS");\r |
204 | }\r |
205 | target_frametime = 1000000/target_fps;\r |
206 | if(!noticeMsgTime.tv_sec && pico_was_reset)\r |
207 | gettimeofday(¬iceMsgTime, 0);\r |
208 | \r |
ca482e5d |
209 | // prepare CD buffer\r |
210 | if (PicoAHW & PAHW_MCD) PicoCDBufferInit();\r |
cc68a136 |
211 | \r |
212 | pico_was_reset = 0;\r |
213 | reset_timing = 1;\r |
214 | \r |
ca482e5d |
215 | while (gamestate == PGS_Running)\r |
216 | {\r |
cc68a136 |
217 | gettimeofday(&tval, 0);\r |
218 | if(reset_timing) {\r |
219 | reset_timing = 0;\r |
220 | thissec = tval.tv_sec;\r |
221 | frames_done = tval.tv_usec/target_frametime;\r |
222 | }\r |
223 | \r |
224 | // show notice message?\r |
225 | char *notice = 0;\r |
226 | if(noticeMsgTime.tv_sec) {\r |
227 | if((tval.tv_sec*1000000+tval.tv_usec) - (noticeMsgTime.tv_sec*1000000+noticeMsgTime.tv_usec) > 2000000) // > 2.0 sec\r |
228 | noticeMsgTime.tv_sec = noticeMsgTime.tv_usec = 0;\r |
229 | else notice = noticeMsg;\r |
230 | }\r |
231 | \r |
232 | // second changed?\r |
ca482e5d |
233 | if (thissec != tval.tv_sec)\r |
234 | {\r |
cc68a136 |
235 | #ifdef BENCHMARK\r |
236 | static int bench = 0, bench_fps = 0, bench_fps_s = 0, bfp = 0, bf[4];\r |
237 | if(++bench == 10) {\r |
238 | bench = 0;\r |
239 | bench_fps_s = bench_fps;\r |
240 | bf[bfp++ & 3] = bench_fps;\r |
241 | bench_fps = 0;\r |
242 | }\r |
243 | bench_fps += frames_shown;\r |
244 | sprintf(buff, "%02i/%02i/%02i", frames_shown, bench_fps_s, (bf[0]+bf[1]+bf[2]+bf[3])>>2);\r |
245 | #else\r |
ca482e5d |
246 | if (currentConfig.EmuOpt & EOPT_SHOW_FPS) \r |
cc68a136 |
247 | sprintf(buff, "%02i/%02i", frames_shown, frames_done);\r |
248 | #endif\r |
249 | \r |
250 | \r |
251 | thissec = tval.tv_sec;\r |
252 | \r |
ca482e5d |
253 | if(PsndOut == 0 && currentConfig.Frameskip >= 0) {\r |
cc68a136 |
254 | frames_done = frames_shown = 0;\r |
255 | } else {\r |
256 | // it is quite common for this implementation to leave 1 fame unfinished\r |
257 | // when second changes, but we don't want buffer to starve.\r |
258 | if(PsndOut && frames_done < target_fps && frames_done > target_fps-5) {\r |
259 | SkipFrame(); frames_done++;\r |
260 | }\r |
261 | \r |
262 | frames_done -= target_fps; if (frames_done < 0) frames_done = 0;\r |
263 | frames_shown -= target_fps; if (frames_shown < 0) frames_shown = 0;\r |
264 | if (frames_shown > frames_done) frames_shown = frames_done;\r |
265 | }\r |
266 | }\r |
267 | \r |
268 | \r |
269 | lim_time = (frames_done+1) * target_frametime;\r |
ca482e5d |
270 | if (currentConfig.Frameskip >= 0) // frameskip enabled\r |
271 | {\r |
272 | for (i = 0; i < currentConfig.Frameskip && gamestate == PGS_Running; i++)\r |
273 | {\r |
cc68a136 |
274 | CGameWindow::DoKeys();\r |
275 | SkipFrame(); frames_done++;\r |
276 | if (PsndOut) { // do framelimitting if sound is enabled\r |
277 | gettimeofday(&tval, 0);\r |
278 | if(thissec != tval.tv_sec) tval.tv_usec+=1000000;\r |
279 | if(tval.tv_usec < lim_time) { // we are too fast\r |
280 | simpleWait(thissec, lim_time);\r |
281 | }\r |
282 | }\r |
283 | lim_time += target_frametime;\r |
284 | }\r |
ca482e5d |
285 | }\r |
286 | else if(tval.tv_usec > lim_time) { // auto frameskip\r |
cc68a136 |
287 | // no time left for this frame - skip\r |
288 | CGameWindow::DoKeys();\r |
289 | SkipFrame(); frames_done++;\r |
290 | continue;\r |
291 | }\r |
292 | \r |
ca482e5d |
293 | // we might have lost focus already\r |
294 | if (gamestate != PGS_Running) break;\r |
295 | \r |
cc68a136 |
296 | CGameWindow::DoKeys();\r |
297 | PicoFrame();\r |
298 | \r |
299 | // check time\r |
300 | gettimeofday(&tval, 0);\r |
301 | if(thissec != tval.tv_sec) tval.tv_usec+=1000000;\r |
302 | \r |
303 | // sleep if we are still too fast\r |
ca482e5d |
304 | if(PsndOut != 0 || currentConfig.Frameskip < 0)\r |
cc68a136 |
305 | {\r |
306 | // TODO: check if User::After() is accurate\r |
307 | gettimeofday(&tval, 0);\r |
308 | if(thissec != tval.tv_sec) tval.tv_usec+=1000000;\r |
309 | if(tval.tv_usec < lim_time)\r |
310 | {\r |
311 | // we are too fast\r |
312 | simpleWait(thissec, lim_time);\r |
313 | }\r |
314 | }\r |
315 | \r |
316 | CPolledActiveScheduler::Instance()->Schedule();\r |
317 | \r |
318 | if (gamestate != PGS_Paused)\r |
319 | vidDrawFrame(notice, buff, frames_shown);\r |
320 | \r |
321 | frames_done++; frames_shown++;\r |
ca482e5d |
322 | } // while\r |
323 | \r |
324 | if (PicoAHW & PAHW_MCD) PicoCDBufferFree();\r |
cc68a136 |
325 | \r |
326 | // save SRAM\r |
ca482e5d |
327 | if ((currentConfig.EmuOpt & EOPT_USE_SRAM) && SRam.changed) {\r |
328 | emu_SaveLoadGame(0, 1);\r |
cc68a136 |
329 | SRam.changed = 0;\r |
330 | }\r |
ca482e5d |
331 | CPolledActiveScheduler::Instance()->Schedule();\r |
cc68a136 |
332 | CGameWindow::FreeResources();\r |
ca482e5d |
333 | }\r |
334 | else if(gamestate == PGS_ReloadRom)\r |
335 | {\r |
336 | loadrom_result = emu_ReloadRom(loadrom_fname);\r |
337 | pico_was_reset = 1;\r |
338 | if (loadrom_result)\r |
339 | gamestate = PGS_Running;\r |
340 | else\r |
341 | gamestate = PGS_Paused;\r |
342 | DEBUGPRINT(_L("done loading ROM, retval=%i"), loadrom_result);\r |
343 | loadWaitSemaphore.Signal();\r |
344 | User::After(50000);\r |
345 | }\r |
346 | else if(gamestate == PGS_Paused) {\r |
cc68a136 |
347 | DEBUGPRINT(_L("pausing.."));\r |
348 | pauseSemaphore.Wait();\r |
ca482e5d |
349 | }\r |
350 | else if(gamestate == PGS_KeyConfig)\r |
351 | {\r |
cc68a136 |
352 | // switch context to other thread\r |
353 | User::After(50000);\r |
354 | // prepare window and stuff\r |
355 | CGameWindow::ConstructResourcesL();\r |
356 | \r |
357 | TUint whichAction = 0;\r |
358 | while(gamestate == PGS_KeyConfig) {\r |
359 | CGameWindow::DoKeysConfig(whichAction);\r |
360 | CPolledActiveScheduler::Instance()->Schedule();\r |
361 | if (gamestate != PGS_Paused)\r |
362 | vidKeyConfigFrame(whichAction);\r |
363 | User::After(150000);\r |
364 | }\r |
365 | \r |
366 | CGameWindow::FreeResources();\r |
367 | } else if(gamestate == PGS_DebugHeap) {\r |
368 | #ifdef __DEBUG_PRINT\r |
369 | TInt cells = User::CountAllocCells();\r |
370 | TInt mem;\r |
371 | User::AllocSize(mem);\r |
372 | DEBUGPRINT(_L("worker: cels=%d, size=%d KB"), cells, mem/1024);\r |
373 | gamestate = gamestate_next;\r |
374 | #endif\r |
375 | } else if(gamestate == PGS_Quit) {\r |
376 | break;\r |
377 | }\r |
378 | }\r |
379 | \r |
ca482e5d |
380 | // this thread has to close it's own handles,\r |
381 | // other one will crash trying to do that\r |
382 | PicoExit();\r |
383 | \r |
cc68a136 |
384 | MainExit();\r |
385 | }\r |
386 | \r |
387 | \r |
388 | // main initialization\r |
389 | static void MainInit()\r |
390 | {\r |
391 | DEBUGPRINT(_L("\r\n\r\nstarting.."));\r |
392 | \r |
cc68a136 |
393 | DEBUGPRINT(_L("CPolledActiveScheduler::NewL()"));\r |
394 | CPolledActiveScheduler::NewL(); // create Polled AS for the sound engine\r |
395 | \r |
396 | // HAL::Get(HALData::EMachineUid, machineUid); // find out the machine UID\r |
397 | \r |
398 | DumpMemInfo();\r |
399 | \r |
400 | // try to start pico\r |
ca482e5d |
401 | DEBUGPRINT(_L("PicoInit()"));\r |
cc68a136 |
402 | PicoDrawSetColorFormat(2);\r |
403 | PicoWriteSound = updateSound;\r |
404 | \r |
405 | // if (pauseSemaphore.Handle() <= 0)\r |
406 | // pauseSemaphore.CreateLocal(0);\r |
407 | DEBUGPRINT(_L("initSemaphore.Signal()"));\r |
408 | initSemaphore.Signal();\r |
409 | }\r |
410 | \r |
411 | \r |
412 | // does not return\r |
413 | static void MainExit()\r |
414 | {\r |
415 | RThread thisThread;\r |
416 | \r |
417 | DEBUGPRINT(_L("%i: cleaning up.."), (TInt32) thisThread.Id());\r |
418 | \r |
cc68a136 |
419 | // pauseSemaphore.Close();\r |
420 | \r |
421 | if(gameAudio) delete gameAudio;\r |
422 | \r |
423 | // Polled AS\r |
424 | delete CPolledActiveScheduler::Instance();\r |
425 | }\r |
426 | \r |
cc68a136 |
427 | static void DumpMemInfo()\r |
428 | {\r |
429 | TInt ramSize, ramSizeFree, romSize;\r |
430 | \r |
431 | HAL::Get(HALData::EMemoryRAM, ramSize);\r |
432 | HAL::Get(HALData::EMemoryRAMFree, ramSizeFree);\r |
433 | HAL::Get(HALData::EMemoryROM, romSize);\r |
434 | \r |
435 | DEBUGPRINT(_L("ram=%dKB, ram_free=%dKB, rom=%dKB"), ramSize/1024, ramSizeFree/1024, romSize/1024);\r |
436 | }\r |
437 | \r |
438 | \r |
ca482e5d |
439 | extern "C" TInt my_SetExceptionHandler(TInt, TExceptionHandler, TUint32);\r |
440 | \r |
cc68a136 |
441 | TInt EmuThreadFunction(TAny*)\r |
442 | {\r |
ca482e5d |
443 | TInt ret;\r |
cc68a136 |
444 | const TUint32 exs = KExceptionAbort|KExceptionKill|KExceptionUserInterrupt|KExceptionFpe|KExceptionFault|KExceptionInteger|KExceptionDebug;\r |
445 | \r |
ca482e5d |
446 | DEBUGPRINT(_L("EmuThreadFunction(), def ExceptionHandler %08x, my %08x"),\r |
447 | User::ExceptionHandler(), ExceptionHandler);\r |
448 | User::SetJustInTime(1);\r |
449 | ret = User::SetExceptionHandler(ExceptionHandler, exs/*(TUint32) -1*/); // does not work :(\r |
450 | // my_SetExceptionHandler(KCurrentThreadHandle, ExceptionHandler, 0xffffffff);\r |
451 | DEBUGPRINT(_L("SetExceptionHandler %i, %08x"), ret, User::ExceptionHandler());\r |
452 | User::ModifyExceptionMask(0, exs);\r |
cc68a136 |
453 | \r |
454 | //TInt pc, sp;\r |
455 | //asm volatile ("str pc, %0" : "=m" (pc) );\r |
456 | //asm volatile ("str sp, %0" : "=m" (sp) );\r |
457 | //RDebug::Print(_L("executing @ 0x%08x, sp=0x%08x"), pc, sp);\r |
458 | \r |
459 | /*\r |
460 | RDebug::Print(_L("Base Bottom Top Size RW Name"));\r |
461 | TBuf<4> l_r(_L("R")), l_w(_L("W")), l_d(_L("-"));\r |
462 | RChunk chunk;\r |
463 | TFullName chunkname;\r |
464 | TFindChunk findChunk(_L("*"));\r |
465 | while( findChunk.Next(chunkname) != KErrNotFound ) {\r |
466 | chunk.Open(findChunk);\r |
467 | RDebug::Print(_L("%08x %08x %08x %08x %S%S %S"), chunk.Base(), chunk.Base()+chunk.Bottom(), chunk.Base()+chunk.Top(), chunk.Size(), chunk.IsReadable() ? &l_r : &l_d, chunk.IsWritable() ? &l_w : &l_d, &chunkname);\r |
468 | chunk.Close();\r |
469 | }\r |
470 | */\r |
471 | \r |
472 | // can't do that, will crash here\r |
473 | // if(cleanup) {\r |
474 | // DEBUGPRINT(_L("found old CTrapCleanup, deleting.."));\r |
475 | // delete cleanup;\r |
476 | // }\r |
477 | \r |
478 | CTrapCleanup *cleanup = CTrapCleanup::New();\r |
479 | \r |
480 | TRAPD(error, TargetEpocGameL());\r |
481 | \r |
ca482e5d |
482 | __ASSERT_ALWAYS(!error, User::Panic(_L("PicoDrive"), error));\r |
cc68a136 |
483 | delete cleanup;\r |
484 | \r |
485 | DEBUGPRINT(_L("exitting..")); \r |
486 | return 1;\r |
487 | }\r |
488 | \r |
489 | \r |
490 | void TPicoDirectScreenAccess::Restart(RDirectScreenAccess::TTerminationReasons aReason)\r |
491 | {\r |
492 | DEBUGPRINT(_L("TPicoDirectScreenAccess::Restart(%i)"), aReason);\r |
493 | \r |
494 | // if (CGameWindow::iDSA) {\r |
495 | // TRAPD(error, CGameWindow::iDSA->StartL());\r |
496 | // if (error) DEBUGPRINT(_L("iDSA->StartL() error: %i"), error);\r |
497 | // }\r |
498 | }\r |
499 | \r |
500 | \r |
501 | void TPicoDirectScreenAccess::AbortNow(RDirectScreenAccess::TTerminationReasons aReason)\r |
502 | {\r |
503 | DEBUGPRINT(_L("TPicoDirectScreenAccess::AbortNow(%i)"), aReason);\r |
504 | \r |
505 | // the WS wants us to stop, so let's obey\r |
506 | gamestate = PGS_Paused;\r |
507 | }\r |
508 | \r |
509 | \r |
510 | void CGameWindow::ConstructResourcesL()\r |
511 | {\r |
512 | DEBUGPRINT(_L("ConstructResourcesL()"));\r |
513 | // connect to window server\r |
514 | // tried to create it globally and not re-connect everytime,\r |
515 | // but my window started to lose focus strangely\r |
516 | iWsSession = new(ELeave) RWsSession();\r |
517 | User::LeaveIfError(iWsSession->Connect());\r |
518 | \r |
519 | // * Tell the Window Server not to mess about with our process priority\r |
520 | // * Also, because of the way legacy games are written, they never sleep\r |
521 | // * and thus never voluntarily yield the CPU. We set our process priority\r |
522 | // * to EPriorityForeground and hope that a Telephony application on\r |
523 | // * this device runs at EPriorityForeground as well. If not, tough! ;-)\r |
524 | \r |
525 | iWsSession->ComputeMode(RWsSession::EPriorityControlDisabled);\r |
526 | RProcess me;\r |
527 | me.SetPriority(EPriorityForeground);\r |
528 | \r |
529 | iWsScreen = new(ELeave) CWsScreenDevice(*iWsSession);\r |
530 | User::LeaveIfError(iWsScreen->Construct());\r |
531 | // User::LeaveIfError(iWsScreen->CreateContext(iWindowGc));\r |
532 | \r |
533 | iWsWindowGroup = RWindowGroup(*iWsSession);\r |
534 | User::LeaveIfError(iWsWindowGroup.Construct((TUint32)&iWsWindowGroup));\r |
535 | //iWsWindowGroup.SetOrdinalPosition(0);\r |
536 | //iWsWindowGroup.SetName(KServerWGName);\r |
537 | iWsWindowGroup.EnableScreenChangeEvents(); // flip events (EEventScreenDeviceChanged)\r |
538 | iWsWindowGroup.EnableFocusChangeEvents(); // EEventFocusGroupChanged\r |
539 | iWsWindowGroup.SetOrdinalPosition(0, 1); // TInt aPos, TInt aOrdinalPriority\r |
540 | \r |
541 | iWsWindow=RWindow(*iWsSession);\r |
542 | User::LeaveIfError(iWsWindow.Construct(iWsWindowGroup, (TUint32)&iWsWindow));\r |
543 | iWsWindow.SetSize(iWsScreen->SizeInPixels());\r |
544 | iWsWindow.PointerFilter(EPointerFilterDrag, 0);\r |
545 | iWsWindow.SetPointerGrab(ETrue);\r |
546 | iWsWindow.SetVisible(ETrue);\r |
547 | iWsWindow.Activate();\r |
548 | \r |
549 | #if 0\r |
550 | // request access through RDirectScreenAccess api, but don't care about the result\r |
551 | // hangs?\r |
552 | RRegion *dsa_region = 0;\r |
553 | iDSA = new(ELeave) RDirectScreenAccess(*iWsSession);\r |
554 | if(iDSA->Construct() == KErrNone)\r |
555 | iDSA->Request(dsa_region, iDSAstatus, iWsWindow);\r |
556 | DEBUGPRINT(_L("DSA: %i"), dsa_region ? dsa_region->Count() : -1);\r |
557 | #endif\r |
558 | \r |
559 | TInt ret;\r |
560 | \r |
561 | // request access through CDirectScreenAccess\r |
562 | iDSA = CDirectScreenAccess::NewL(*iWsSession, *iWsScreen, iWsWindow, iPDSA);\r |
563 | \r |
564 | // now get the screenbuffer\r |
565 | TScreenInfoV01 screenInfo;\r |
566 | TPckg<TScreenInfoV01> sI(screenInfo);\r |
567 | UserSvr::ScreenInfo(sI);\r |
568 | \r |
569 | if(!screenInfo.iScreenAddressValid)\r |
570 | User::Leave(KErrNotSupported);\r |
571 | \r |
572 | DEBUGPRINT(_L("framebuffer=0x%08x (%dx%d)"), screenInfo.iScreenAddress,\r |
573 | screenInfo.iScreenSize.iWidth, screenInfo.iScreenSize.iHeight);\r |
574 | \r |
575 | // vidInit\r |
576 | DEBUGPRINT(_L("vidInit()"));\r |
577 | ret = vidInit((void *)screenInfo.iScreenAddress, 0);\r |
578 | DEBUGPRINT(_L("vidInit() done (%i)"), ret);\r |
579 | \r |
580 | User::LeaveIfError(ret);\r |
581 | \r |
582 | memset(keyFlags, 0, 256);\r |
583 | keyFlags[EStdKeyM600JogUp] = keyFlags[EStdKeyM600JogDown] = 2; // add "pulse only" for jog up/down\r |
584 | keyFlags[EStdKeyOff] = 0x40; // not configurable\r |
585 | \r |
586 | // try to start the audio engine\r |
587 | static int PsndRate_old = 0, PicoOpt_old = 0, pal_old = 0;\r |
588 | \r |
ca482e5d |
589 | if (gamestate == PGS_Running && (currentConfig.EmuOpt & EOPT_EN_SOUND))\r |
590 | {\r |
cc68a136 |
591 | TInt err = 0;\r |
592 | if(PsndRate != PsndRate_old || (PicoOpt&11) != (PicoOpt_old&11) || Pico.m.pal != pal_old) {\r |
593 | // if rate changed, reset all enabled chips, else reset only those chips, which were recently enabled\r |
594 | //sound_reset(PsndRate != PsndRate_old ? PicoOpt : (PicoOpt&(PicoOpt^PicoOpt_old)));\r |
ca482e5d |
595 | PsndRerate(1);\r |
cc68a136 |
596 | }\r |
597 | if(!gameAudio || PsndRate != PsndRate_old || ((PicoOpt&8) ^ (PicoOpt_old&8)) || Pico.m.pal != pal_old) { // rate or stereo or pal/ntsc changed\r |
598 | if(gameAudio) delete gameAudio; gameAudio = 0;\r |
599 | DEBUGPRINT(_L("starting audio: %i len: %i stereo: %i, pal: %i"), PsndRate, PsndLen, PicoOpt&8, Pico.m.pal);\r |
ca482e5d |
600 | TRAP(err, gameAudio = CGameAudioMS::NewL(PsndRate, (PicoOpt&8) ? 1 : 0,\r |
601 | Pico.m.pal ? 50 : 60, currentConfig.volume));\r |
cc68a136 |
602 | }\r |
603 | if( gameAudio) {\r |
604 | TRAP(err, PsndOut = gameAudio->ResumeL());\r |
605 | }\r |
606 | if(err) {\r |
607 | if(gameAudio) delete gameAudio;\r |
608 | gameAudio = 0;\r |
609 | PsndOut = 0;\r |
610 | strcpy(noticeMsg, "SOUND@STARTUP@FAILED");\r |
611 | gettimeofday(¬iceMsgTime, 0);\r |
612 | }\r |
613 | PsndRate_old = PsndRate;\r |
614 | PicoOpt_old = PicoOpt;\r |
615 | pal_old = Pico.m.pal;\r |
616 | } else {\r |
617 | if(gameAudio) delete gameAudio;\r |
618 | gameAudio = 0;\r |
619 | PsndOut = 0;\r |
620 | }\r |
621 | \r |
622 | CPolledActiveScheduler::Instance()->Schedule();\r |
623 | \r |
624 | // start key WS event polling\r |
625 | iWsSession->EventReady(&iWsEventStatus);\r |
626 | \r |
627 | iWsSession->Flush(); // check: short hang in UIQ2\r |
628 | User::After(1);\r |
629 | \r |
630 | // I don't know why but the Window server sometimes hangs completely (hanging the phone too) after calling StartL()\r |
631 | // Is this a sync broblem? weird bug?\r |
632 | TRAP(ret, iDSA->StartL());\r |
633 | if (ret) DEBUGPRINT(_L("iDSA->StartL() error: %i"), ret);\r |
634 | \r |
635 | // User::After(1);\r |
636 | // CPolledActiveScheduler::Instance()->Schedule();\r |
637 | \r |
638 | DEBUGPRINT(_L("CGameWindow::ConstructResourcesL() finished."));\r |
639 | }\r |
640 | \r |
641 | // this may be run even if there is nothing to free\r |
642 | void CGameWindow::FreeResources()\r |
643 | {\r |
644 | if(gameAudio) gameAudio->Pause();\r |
645 | \r |
646 | //DEBUGPRINT(_L("CPolledActiveScheduler::Instance(): %08x"), CPolledActiveScheduler::Instance());\r |
647 | if(CPolledActiveScheduler::Instance())\r |
648 | CPolledActiveScheduler::Instance()->Schedule();\r |
649 | \r |
650 | #if 0\r |
651 | // free RDirectScreenAccess stuff (seems to be deleted automatically after crash?)\r |
652 | if(iDSA) {\r |
653 | iDSA->Cancel();\r |
654 | iDSA->Close();\r |
655 | delete iDSA;\r |
656 | }\r |
657 | iDSA = NULL;\r |
658 | #endif\r |
659 | if(iDSA) delete iDSA;\r |
660 | iDSA = 0;\r |
661 | \r |
662 | if(iWsSession->WsHandle() > 0 && iWsEventStatus != KRequestPending) // TODO: 2 UIQ2 (?)\r |
663 | iWsSession->EventReadyCancel();\r |
664 | \r |
665 | if(iWsWindow.WsHandle() > 0)\r |
666 | iWsWindow.Close();\r |
667 | \r |
668 | if(iWsWindowGroup.WsHandle() > 0)\r |
669 | iWsWindowGroup.Close();\r |
670 | \r |
671 | // these must be deleted before calling iWsSession->Close()\r |
672 | if(iWsScreen) {\r |
673 | delete iWsScreen;\r |
674 | iWsScreen = NULL;\r |
675 | }\r |
676 | \r |
677 | if(iWsSession->WsHandle() > 0) {\r |
678 | iWsSession->Close();\r |
679 | delete iWsSession;\r |
680 | }\r |
681 | \r |
682 | vidFree();\r |
cc68a136 |
683 | }\r |
684 | \r |
685 | \r |
686 | void CGameWindow::DoKeys(void)\r |
687 | {\r |
688 | TWsEvent iWsEvent;\r |
689 | TInt iWsEventType;\r |
690 | unsigned long allActions = 0;\r |
691 | static unsigned long areaActions = 0, forceUpdate = 0;\r |
692 | int i, nEvents;\r |
693 | \r |
694 | for(nEvents = 0; iWsEventStatus != KRequestPending; nEvents++)\r |
695 | {\r |
696 | iWsSession->GetEvent(iWsEvent);\r |
697 | iWsEventType = iWsEvent.Type();\r |
698 | \r |
699 | // pointer events?\r |
700 | if(iWsEventType == EEventPointer) {\r |
701 | if(iWsEvent.Pointer()->iType == TPointerEvent::EButton1Up) {\r |
702 | areaActions = 0; // remove all directionals\r |
703 | } else { // if(iWsEvent.Pointer()->iType == TPointerEvent::EButton1Down) {\r |
704 | TPoint p = iWsEvent.Pointer()->iPosition;\r |
705 | const TPicoAreaConfigEntry *e = areaConfig + 1;\r |
706 | for(i = 0; !e->rect.IsEmpty(); e++, i++)\r |
707 | if(e->rect.Contains(p)) {\r |
ca482e5d |
708 | areaActions = currentConfig.KeyBinds[i+256];\r |
cc68a136 |
709 | break;\r |
710 | }\r |
711 | //DEBUGPRINT(_L("pointer event: %i %i"), p.iX, p.iY);\r |
712 | }\r |
713 | }\r |
714 | else if(iWsEventType == EEventKeyDown || iWsEventType == EEventKeyUp) {\r |
715 | TInt iScanCode = iWsEvent.Key()->iScanCode;\r |
716 | //DEBUGPRINT(_L("key event: 0x%02x"), iScanCode);\r |
717 | \r |
718 | if(iScanCode < 256)\r |
719 | {\r |
720 | if(iWsEventType == EEventKeyDown) {\r |
721 | keyFlags[iScanCode] |= 1;\r |
722 | for(i=0; i < 10; i++) {\r |
723 | if( pressedKeys[i] == (TUint8) iScanCode) break;\r |
724 | if(!pressedKeys[i]) { pressedKeys[i] = (TUint8) iScanCode; break; }\r |
725 | }\r |
726 | } else if(!(keyFlags[iScanCode]&2)) {\r |
727 | keyFlags[iScanCode] &= ~1;\r |
728 | for(i=0; i < 10; i++) {\r |
729 | if(pressedKeys[i] == (TUint8) iScanCode) { pressedKeys[i] = 0; break; }\r |
730 | }\r |
731 | }\r |
732 | \r |
733 | // power?\r |
734 | if(iScanCode == EStdKeyOff) gamestate = PGS_Paused;\r |
735 | } else {\r |
736 | DEBUGPRINT(_L("weird scancode: 0x%02x"), iScanCode);\r |
737 | }\r |
738 | }\r |
739 | else if(iWsEventType == EEventScreenDeviceChanged) {\r |
740 | // ???\r |
741 | //User::After(500000);\r |
742 | //reset_timing = 1;\r |
743 | DEBUGPRINT(_L("EEventScreenDeviceChanged, focus: %i, our: %i"),\r |
744 | iWsSession->GetFocusWindowGroup(), iWsWindowGroup.Identifier());\r |
745 | }\r |
746 | else if(iWsEventType == EEventFocusGroupChanged) {\r |
747 | TInt focusGrpId = iWsSession->GetFocusWindowGroup();\r |
748 | DEBUGPRINT(_L("EEventFocusGroupChanged: %i, our: %i"),\r |
749 | focusGrpId, iWsWindowGroup.Identifier());\r |
750 | // if it is not us and not launcher that got focus, pause emu\r |
751 | if(focusGrpId != iWsWindowGroup.Identifier())\r |
752 | gamestate = PGS_Paused;\r |
753 | }\r |
754 | \r |
755 | iWsEventStatus = KRequestPending;\r |
756 | iWsSession->EventReady(&iWsEventStatus);\r |
757 | }\r |
758 | \r |
759 | if(nEvents || forceUpdate) {\r |
760 | allActions = areaActions;\r |
761 | forceUpdate = 0;\r |
762 | \r |
763 | // add all pushed button actions\r |
764 | for(i = 9; i >= 0; i--) {\r |
765 | int scan = pressedKeys[i];\r |
766 | if(scan) {\r |
ca482e5d |
767 | if(keyFlags[scan] & 1) allActions |= currentConfig.KeyBinds[scan];\r |
cc68a136 |
768 | if((keyFlags[scan]& 3)==3) forceUpdate = 1;\r |
769 | if(keyFlags[scan] & 2) keyFlags[scan] &= ~1;\r |
770 | }\r |
771 | }\r |
772 | \r |
773 | PicoPad[0] = (unsigned short) allActions;\r |
774 | if(allActions & 0xFFFF0000) {\r |
775 | RunEvents(allActions >> 16);\r |
776 | areaActions = 0;\r |
777 | }\r |
778 | }\r |
779 | }\r |
780 | \r |
781 | \r |
782 | void CGameWindow::DoKeysConfig(TUint &which)\r |
783 | {\r |
784 | TWsEvent iWsEvent;\r |
785 | int i;\r |
786 | \r |
787 | while(iWsEventStatus != KRequestPending)\r |
788 | {\r |
789 | TUint currentActCode = 1 << which;\r |
790 | \r |
791 | iWsSession->GetEvent(iWsEvent);\r |
792 | \r |
793 | // pointer events?\r |
794 | if(iWsEvent.Type() == EEventPointer) {\r |
795 | TPoint p = iWsEvent.Pointer()->iPosition;\r |
796 | TRect prev(56, 0, 120, 26);\r |
797 | TRect next(120, 0, 180, 26);\r |
798 | \r |
799 | if(iWsEvent.Pointer()->iType == TPointerEvent::EButton1Down) {\r |
800 | if(prev.Contains(p)) do { which = (which-1) & 0x1F; } while(!actionNames[which]);\r |
801 | else if(next.Contains(p)) do { which = (which+1) & 0x1F; } while(!actionNames[which]);\r |
802 | else if(which == 31) gamestate = PGS_Paused; // done\r |
803 | else {\r |
804 | const TPicoAreaConfigEntry *e = areaConfig + 1;\r |
805 | for(i = 0; e->rect != TRect(0,0,0,0); e++, i++)\r |
806 | if(e->rect.Contains(p)) {\r |
ca482e5d |
807 | currentConfig.KeyBinds[i+256] ^= currentActCode;\r |
cc68a136 |
808 | break;\r |
809 | }\r |
810 | }\r |
811 | }\r |
812 | }\r |
813 | else if(iWsEvent.Type() == EEventKeyDown || iWsEvent.Type() == EEventKeyUp)\r |
814 | {\r |
815 | TUint scan = (TUint) iWsEvent.Key()->iScanCode;\r |
816 | \r |
817 | // key events?\r |
818 | if(iWsEvent.Type() == EEventKeyDown) {\r |
819 | if(which == 31) {\r |
820 | gamestate = PGS_Paused;\r |
821 | } else if (scan < 256) {\r |
ca482e5d |
822 | if(!(keyFlags[scan]&0x40)) currentConfig.KeyBinds[scan] ^= currentActCode;\r |
cc68a136 |
823 | }\r |
824 | }\r |
825 | \r |
826 | // power?\r |
827 | if(iWsEvent.Key()->iScanCode == EStdKeyOff) gamestate = PGS_Paused;\r |
828 | }\r |
829 | else if(iWsEvent.Type() == EEventFocusGroupChanged) {\r |
830 | TInt focusGrpId = iWsSession->GetFocusWindowGroup();\r |
831 | // if we lost focus, exit config mode\r |
832 | if(focusGrpId != iWsWindowGroup.Identifier())\r |
833 | gamestate = PGS_Paused;\r |
834 | }\r |
835 | \r |
836 | // iWsEventStatus = KRequestPending;\r |
837 | iWsSession->EventReady(&iWsEventStatus);\r |
838 | }\r |
839 | }\r |
840 | \r |
841 | \r |
842 | void CGameWindow::RunEvents(TUint32 which)\r |
843 | {\r |
ca482e5d |
844 | if (which & 0x4000) currentConfig.Frameskip = -1;\r |
845 | if (which & 0x2000) currentConfig.Frameskip = 8;\r |
846 | if (which & 0x1800) { // save or load (but not both)\r |
cc68a136 |
847 | if(PsndOut) gameAudio->Pause(); // this may take a while, so we pause sound output\r |
848 | \r |
849 | vidDrawNotice((which & 0x1000) ? "LOADING@GAME" : "SAVING@GAME");\r |
ca482e5d |
850 | emu_SaveLoadGame(which & 0x1000, 0);\r |
cc68a136 |
851 | \r |
852 | if(PsndOut) PsndOut = gameAudio->ResumeL();\r |
853 | reset_timing = 1;\r |
854 | }\r |
ca482e5d |
855 | if (which & 0x0400) gamestate = PGS_Paused;\r |
856 | if (which & 0x0200) { // switch renderer\r |
857 | if (!(currentConfig.scaling == TPicoConfig::PMFit &&\r |
858 | (currentConfig.rotation == TPicoConfig::PRot0 || currentConfig.rotation == TPicoConfig::PRot180)))\r |
859 | {\r |
cc68a136 |
860 | PicoOpt^=0x10;\r |
861 | vidInit(0, 1);\r |
862 | \r |
863 | strcpy(noticeMsg, (PicoOpt&0x10) ? "ALT@RENDERER" : "DEFAULT@RENDERER");\r |
864 | gettimeofday(¬iceMsgTime, 0);\r |
865 | }\r |
866 | }\r |
867 | if(which & 0x00c0) {\r |
868 | if(which&0x0080) {\r |
869 | state_slot -= 1;\r |
870 | if(state_slot < 0) state_slot = 9;\r |
871 | } else {\r |
872 | state_slot += 1;\r |
873 | if(state_slot > 9) state_slot = 0;\r |
874 | }\r |
875 | sprintf(noticeMsg, "SAVE@SLOT@%i@SELECTED", state_slot);\r |
876 | gettimeofday(¬iceMsgTime, 0);\r |
877 | }\r |
ca482e5d |
878 | if(which & 0x0020) if(gameAudio) currentConfig.volume = gameAudio->ChangeVolume(0);\r |
879 | if(which & 0x0010) if(gameAudio) currentConfig.volume = gameAudio->ChangeVolume(1);\r |
cc68a136 |
880 | }\r |
881 | \r |
882 | \r |
ca482e5d |
883 | extern "C" void emu_noticeMsgUpdated(void)\r |
cc68a136 |
884 | {\r |
ca482e5d |
885 | char *p = noticeMsg;\r |
886 | while (*p) {\r |
887 | if (*p == ' ') *p = '@';\r |
888 | if (*p < '0' || *p > 'Z') { *p = 0; break; }\r |
889 | p++;\r |
cc68a136 |
890 | }\r |
ca482e5d |
891 | gettimeofday(¬iceMsgTime, 0);\r |
cc68a136 |
892 | }\r |
893 | \r |
894 | // static class members\r |
895 | RWsSession* CGameWindow::iWsSession;\r |
896 | RWindowGroup CGameWindow::iWsWindowGroup;\r |
897 | RWindow CGameWindow::iWsWindow;\r |
898 | CWsScreenDevice* CGameWindow::iWsScreen = NULL;\r |
899 | CWindowGc* CGameWindow::iWindowGc = NULL;\r |
900 | TRequestStatus CGameWindow::iWsEventStatus = KRequestPending;\r |
901 | //RDirectScreenAccess* CGameWindow::iDSA;\r |
902 | //TRequestStatus CGameWindow::iDSAstatus = KRequestPending;\r |
903 | TPicoDirectScreenAccess CGameWindow::iPDSA;\r |
904 | CDirectScreenAccess* CGameWindow::iDSA = NULL;\r |
905 | \r |