1820b5a7 |
1 | #include <sys/stat.h> |
2 | #include <sys/types.h> |
3 | #include <sys/syslimits.h> // PATH_MAX |
4 | |
7d4906bf |
5 | #include <pspthreadman.h> |
70357ce5 |
6 | #include <pspdisplay.h> |
9112b6ce |
7 | #include <psputils.h> |
8 | #include <pspgu.h> |
a4221917 |
9 | #include <pspaudio.h> |
7d4906bf |
10 | |
11 | #include "psp.h" |
12 | #include "menu.h" |
13 | #include "emu.h" |
14 | #include "../common/emu.h" |
15 | #include "../common/lprintf.h" |
1820b5a7 |
16 | #include "../../Pico/PicoInt.h" |
17 | |
8ab3e3c1 |
18 | #define OSD_FPS_X 420 |
7d4906bf |
19 | |
a4221917 |
20 | // additional pspaudio imports, credits to crazyc |
21 | int sceAudio_38553111(unsigned short samples, unsigned short freq, char unknown); // play with conversion? |
22 | int sceAudio_5C37C0AE(void); // end play? |
23 | int sceAudio_E0727056(int volume, void *buffer); // blocking output |
24 | int sceAudioOutput2GetRestSample(); |
25 | |
26 | |
1820b5a7 |
27 | char romFileName[PATH_MAX]; |
9112b6ce |
28 | unsigned char *PicoDraw2FB = (unsigned char *)VRAM_CACHED_STUFF + 8; // +8 to be able to skip border with 1 quadword.. |
1820b5a7 |
29 | int engineState; |
30 | |
7d4906bf |
31 | static int combo_keys = 0, combo_acts = 0; // keys and actions which need button combos |
32 | static unsigned int noticeMsgTime = 0; |
33 | int reset_timing = 0; // do we need this? |
34 | |
35 | |
a4221917 |
36 | static void sound_init(void); |
37 | static void sound_deinit(void); |
8ab3e3c1 |
38 | static void blit2(const char *fps, const char *notice); |
7d4906bf |
39 | static void clearArea(int full); |
1820b5a7 |
40 | |
41 | void emu_noticeMsgUpdated(void) |
42 | { |
7d4906bf |
43 | noticeMsgTime = sceKernelGetSystemTimeLow(); |
1820b5a7 |
44 | } |
45 | |
46 | void emu_getMainDir(char *dst, int len) |
47 | { |
7d4906bf |
48 | if (len > 0) *dst = 0; |
1820b5a7 |
49 | } |
50 | |
8ab3e3c1 |
51 | static void osd_text(int x, const char *text, int is_active) |
1820b5a7 |
52 | { |
8ab3e3c1 |
53 | unsigned short *screen = is_active ? psp_video_get_active_fb() : psp_screen; |
54 | int len = strlen(text) * 8 / 2; |
55 | int *p, h; |
56 | void *tmp; |
57 | for (h = 0; h < 8; h++) { |
58 | p = (int *) (screen+x+512*(264+h)); |
59 | p = (int *) ((int)p & ~3); // align |
60 | memset32(p, 0, len); |
61 | } |
62 | if (is_active) { tmp = psp_screen; psp_screen = screen; } // nasty pointer tricks |
63 | emu_textOut16(x, 264, text); |
64 | if (is_active) psp_screen = tmp; |
65 | } |
7d4906bf |
66 | |
8ab3e3c1 |
67 | void emu_msg_cb(const char *msg) |
68 | { |
69 | osd_text(4, msg, 1); |
7d4906bf |
70 | noticeMsgTime = sceKernelGetSystemTimeLow() - 2000000; |
71 | |
72 | /* assumption: emu_msg_cb gets called only when something slow is about to happen */ |
73 | reset_timing = 1; |
1820b5a7 |
74 | } |
75 | |
7d4906bf |
76 | static void emu_msg_tray_open(void) |
1820b5a7 |
77 | { |
7d4906bf |
78 | strcpy(noticeMsg, "CD tray opened"); |
79 | noticeMsgTime = sceKernelGetSystemTimeLow(); |
1820b5a7 |
80 | } |
81 | |
7d4906bf |
82 | |
1820b5a7 |
83 | void emu_Init(void) |
84 | { |
85 | // make dirs for saves, cfgs, etc. |
86 | mkdir("mds", 0777); |
87 | mkdir("srm", 0777); |
88 | mkdir("brm", 0777); |
89 | mkdir("cfg", 0777); |
90 | |
a4221917 |
91 | sound_init(); |
92 | |
1820b5a7 |
93 | PicoInit(); |
7d4906bf |
94 | PicoMessage = emu_msg_cb; |
95 | PicoMCDopenTray = emu_msg_tray_open; |
96 | PicoMCDcloseTray = menu_loop_tray; |
1820b5a7 |
97 | } |
98 | |
99 | void emu_Deinit(void) |
100 | { |
101 | // save SRAM |
7d4906bf |
102 | if ((currentConfig.EmuOpt & 1) && SRam.changed) { |
1820b5a7 |
103 | emu_SaveLoadGame(0, 1); |
104 | SRam.changed = 0; |
105 | } |
106 | |
107 | if (!(currentConfig.EmuOpt & 0x20)) { |
108 | FILE *f = fopen(PicoConfigFile, "r+b"); |
109 | if (!f) emu_WriteConfig(0); |
110 | else { |
111 | // if we already have config, reload it, except last ROM |
112 | fseek(f, sizeof(currentConfig.lastRomFile), SEEK_SET); |
113 | fread(¤tConfig.EmuOpt, 1, sizeof(currentConfig) - sizeof(currentConfig.lastRomFile), f); |
114 | fseek(f, 0, SEEK_SET); |
115 | fwrite(¤tConfig, 1, sizeof(currentConfig), f); |
116 | fflush(f); |
117 | fclose(f); |
118 | } |
119 | } |
7d4906bf |
120 | |
1820b5a7 |
121 | PicoExit(); |
a4221917 |
122 | sound_deinit(); |
1820b5a7 |
123 | } |
124 | |
7d4906bf |
125 | void emu_setDefaultConfig(void) |
126 | { |
127 | memset(¤tConfig, 0, sizeof(currentConfig)); |
128 | currentConfig.lastRomFile[0] = 0; |
129 | currentConfig.EmuOpt = 0x1f | 0x680; // | confirm_save, cd_leds, 16bit rend |
e41da5ce |
130 | currentConfig.PicoOpt = 0x0f | 0xc00; // | cd_pcm, cd_cdda |
7d4906bf |
131 | currentConfig.PsndRate = 22050; |
132 | currentConfig.PicoRegion = 0; // auto |
133 | currentConfig.PicoAutoRgnOrder = 0x184; // US, EU, JP |
134 | currentConfig.Frameskip = -1; // auto |
135 | currentConfig.volume = 50; |
70357ce5 |
136 | currentConfig.CPUclock = 222; |
7d4906bf |
137 | currentConfig.KeyBinds[ 4] = 1<<0; // SACB RLDU |
138 | currentConfig.KeyBinds[ 6] = 1<<1; |
139 | currentConfig.KeyBinds[ 7] = 1<<2; |
140 | currentConfig.KeyBinds[ 5] = 1<<3; |
141 | currentConfig.KeyBinds[14] = 1<<4; |
142 | currentConfig.KeyBinds[13] = 1<<5; |
143 | currentConfig.KeyBinds[15] = 1<<6; |
144 | currentConfig.KeyBinds[ 3] = 1<<7; |
7d4906bf |
145 | currentConfig.KeyBinds[ 8] = 1<<27; // save state |
146 | currentConfig.KeyBinds[ 9] = 1<<28; // load state |
147 | currentConfig.PicoCDBuffers = 0; |
8ab3e3c1 |
148 | currentConfig.scaling = 1; // bilinear filtering for psp |
149 | currentConfig.scale = currentConfig.hscale32 = currentConfig.hscale40 = 1.0; |
7d4906bf |
150 | } |
151 | |
152 | |
8ab3e3c1 |
153 | extern void amips_clut(unsigned short *dst, unsigned char *src, unsigned short *pal, int count); |
9112b6ce |
154 | |
155 | struct Vertex |
156 | { |
157 | short u,v; |
158 | short x,y,z; |
159 | }; |
160 | |
8ab3e3c1 |
161 | static struct Vertex __attribute__((aligned(4))) g_vertices[2]; |
162 | static unsigned short __attribute__((aligned(16))) localPal[0x100]; |
163 | static int dynamic_palette = 0, need_pal_upload = 0, blit_16bit_mode = 0; |
164 | static int fbimg_offs = 0; |
165 | |
166 | static void set_scaling_params(void) |
9112b6ce |
167 | { |
8ab3e3c1 |
168 | int src_width, fbimg_width, fbimg_height, fbimg_xoffs, fbimg_yoffs; |
169 | g_vertices[0].x = g_vertices[0].y = |
170 | g_vertices[0].z = g_vertices[1].z = 0; |
171 | |
172 | fbimg_height = (int)(240.0 * currentConfig.scale + 0.5); |
173 | if (Pico.video.reg[12] & 1) { |
174 | fbimg_width = (int)(320.0 * currentConfig.scale * currentConfig.hscale40 + 0.5); |
175 | src_width = 320; |
176 | } else { |
177 | fbimg_width = (int)(256.0 * currentConfig.scale * currentConfig.hscale32 + 0.5); |
178 | src_width = 256; |
179 | } |
9112b6ce |
180 | |
8ab3e3c1 |
181 | if (fbimg_width >= 480) { |
182 | g_vertices[0].u = (fbimg_width-480)/2; |
183 | g_vertices[1].u = src_width - (fbimg_width-480)/2; |
184 | fbimg_width = 480; |
185 | fbimg_xoffs = 0; |
186 | } else { |
187 | g_vertices[0].u = 0; |
188 | g_vertices[1].u = src_width; |
189 | fbimg_xoffs = 240 - fbimg_width/2; |
190 | } |
191 | |
192 | if (fbimg_height >= 272) { |
193 | g_vertices[0].v = (fbimg_height-272)/2; |
194 | g_vertices[1].v = 240 - (fbimg_height-272)/2; |
195 | fbimg_height = 272; |
196 | fbimg_yoffs = 0; |
197 | } else { |
198 | g_vertices[0].v = 0; |
199 | g_vertices[1].v = 240; |
200 | fbimg_yoffs = 136 - fbimg_height/2; |
201 | } |
202 | |
203 | g_vertices[1].x = fbimg_width; |
204 | g_vertices[1].y = fbimg_height; |
205 | if (fbimg_xoffs < 0) fbimg_xoffs = 0; |
206 | if (fbimg_yoffs < 0) fbimg_yoffs = 0; |
207 | fbimg_offs = (fbimg_yoffs*512 + fbimg_xoffs) * 2; // dst is always 16bit |
208 | |
209 | lprintf("set_scaling_params:\n"); |
210 | lprintf("offs: %i, %i\n", fbimg_xoffs, fbimg_yoffs); |
211 | lprintf("xy0, xy1: %i, %i; %i, %i\n", g_vertices[0].x, g_vertices[0].y, g_vertices[1].x, g_vertices[1].y); |
212 | lprintf("uv0, uv1: %i, %i; %i, %i\n", g_vertices[0].u, g_vertices[0].v, g_vertices[1].u, g_vertices[1].v); |
9112b6ce |
213 | } |
214 | |
8ab3e3c1 |
215 | static void do_slowmode_pal(void) |
7d4906bf |
216 | { |
8ab3e3c1 |
217 | unsigned int *spal=(void *)Pico.cram; |
218 | unsigned int *dpal=(void *)localPal; |
219 | int i; |
9112b6ce |
220 | |
8ab3e3c1 |
221 | for (i = 0x3f/2; i >= 0; i--) |
222 | dpal[i] = ((spal[i]&0x000f000f)<< 1)|((spal[i]&0x00f000f0)<<3)|((spal[i]&0x0f000f00)<<4); |
9112b6ce |
223 | |
8ab3e3c1 |
224 | if (Pico.video.reg[0xC]&8) // shadow/hilight? |
225 | { |
226 | // shadowed pixels |
9112b6ce |
227 | for (i = 0x3f/2; i >= 0; i--) |
8ab3e3c1 |
228 | dpal[0x20|i] = dpal[0x60|i] = (spal[i]>>1)&0x738e738e; |
229 | // hilighted pixels |
230 | for (i = 0x3f; i >= 0; i--) { |
231 | int t=localPal[i]&0xe71c;t+=0x4208; |
232 | if (t&0x20) t|=0x1c; |
233 | if (t&0x800) t|=0x700; |
234 | if (t&0x10000) t|=0xe000; |
235 | t&=0xe71c; |
236 | localPal[0x80|i]=(unsigned short)t; |
237 | } |
238 | localPal[0xe0] = 0; |
9112b6ce |
239 | } |
8ab3e3c1 |
240 | Pico.m.dirtyPal = 0; |
241 | need_pal_upload = 1; |
242 | } |
9112b6ce |
243 | |
8ab3e3c1 |
244 | static void do_slowmode_lines(int line_to) |
245 | { |
246 | int line = 0, line_len = (Pico.video.reg[12]&1) ? 320 : 256; |
247 | unsigned short *dst = (unsigned short *)VRAM_STUFF + 512*240/2; |
248 | unsigned char *src = (unsigned char *)VRAM_CACHED_STUFF + 16; |
249 | if (!(Pico.video.reg[1]&8)) { line = 8; dst += 512*8; src += 512*8; } |
9112b6ce |
250 | |
8ab3e3c1 |
251 | for (; line < line_to; line++, dst+=512, src+=512) |
252 | amips_clut(dst, src, localPal, line_len); |
253 | } |
9112b6ce |
254 | |
8ab3e3c1 |
255 | static void EmuScanPrepare(void) |
256 | { |
257 | HighCol = (unsigned char *)VRAM_CACHED_STUFF + 8; |
258 | if (!(Pico.video.reg[1]&8)) HighCol += 8*512; |
9112b6ce |
259 | |
8ab3e3c1 |
260 | dynamic_palette = 0; |
261 | if (Pico.m.dirtyPal) |
262 | do_slowmode_pal(); |
263 | } |
264 | |
265 | static int EmuScanSlow(unsigned int num, void *sdata) |
266 | { |
267 | if (!(Pico.video.reg[1]&8)) num += 8; |
268 | |
269 | if (Pico.m.dirtyPal) { |
270 | if (!dynamic_palette) { |
271 | do_slowmode_lines(num); |
272 | dynamic_palette = 1; |
273 | } |
274 | do_slowmode_pal(); |
275 | } |
276 | |
277 | if (dynamic_palette) { |
278 | int line_len = (Pico.video.reg[12]&1) ? 320 : 256; |
279 | void *dst = (char *)VRAM_STUFF + 512*240 + 512*2*num; |
280 | amips_clut(dst, HighCol + 8, localPal, line_len); |
281 | } else |
282 | HighCol = (unsigned char *)VRAM_CACHED_STUFF + (num+1)*512 + 8; |
9112b6ce |
283 | |
7d4906bf |
284 | return 0; |
285 | } |
286 | |
8ab3e3c1 |
287 | static void blitscreen_clut(void) |
9112b6ce |
288 | { |
8ab3e3c1 |
289 | int offs = fbimg_offs; |
290 | offs += (psp_screen == VRAM_FB0) ? VRAMOFFS_FB0 : VRAMOFFS_FB1; |
9112b6ce |
291 | |
8ab3e3c1 |
292 | sceKernelDcacheWritebackAll(); |
9112b6ce |
293 | |
294 | sceGuSync(0,0); // sync with prev |
295 | sceGuStart(GU_DIRECT, guCmdList); |
8ab3e3c1 |
296 | sceGuDrawBuffer(GU_PSM_5650, (void *)offs, 512); // point to back buffer |
9112b6ce |
297 | |
8ab3e3c1 |
298 | if (dynamic_palette) |
299 | { |
300 | if (!blit_16bit_mode) { |
301 | sceGuTexMode(GU_PSM_5650, 0, 0, 0); |
302 | sceGuTexImage(0,512,512,512,(char *)VRAM_STUFF + 512*240); |
9112b6ce |
303 | |
8ab3e3c1 |
304 | blit_16bit_mode = 1; |
305 | } |
9112b6ce |
306 | } |
8ab3e3c1 |
307 | else |
9112b6ce |
308 | { |
8ab3e3c1 |
309 | if (blit_16bit_mode) { |
310 | sceGuClutMode(GU_PSM_5650,0,0xff,0); |
311 | sceGuTexMode(GU_PSM_T8,0,0,0); // 8-bit image |
312 | sceGuTexImage(0,512,512,512,(char *)VRAM_STUFF + 16); |
313 | blit_16bit_mode = 0; |
314 | } |
9112b6ce |
315 | |
8ab3e3c1 |
316 | if ((PicoOpt&0x10) && Pico.m.dirtyPal) |
317 | { |
318 | int i, *dpal = (void *)localPal, *spal = (int *)Pico.cram; |
319 | for (i = 0x3f/2; i >= 0; i--) |
320 | dpal[i] = ((spal[i]&0x000f000f)<< 1)|((spal[i]&0x00f000f0)<<3)|((spal[i]&0x0f000f00)<<4); |
321 | localPal[0xe0] = 0; |
322 | Pico.m.dirtyPal = 0; |
323 | need_pal_upload = 1; |
324 | } |
9112b6ce |
325 | |
8ab3e3c1 |
326 | if (need_pal_upload) { |
327 | need_pal_upload = 0; |
328 | sceGuClutLoad((256/8), localPal); // upload 32*8 entries (256) |
329 | } |
330 | } |
7d4906bf |
331 | |
8ab3e3c1 |
332 | #if 1 |
333 | if (g_vertices[0].u == 0 && g_vertices[1].u == g_vertices[1].x) |
334 | { |
335 | struct Vertex* vertices; |
336 | int x; |
7d4906bf |
337 | |
8ab3e3c1 |
338 | #define SLICE_WIDTH 32 |
339 | for (x = 0; x < g_vertices[1].x; x += SLICE_WIDTH) |
340 | { |
341 | // render sprite |
342 | vertices = (struct Vertex*)sceGuGetMemory(2 * sizeof(struct Vertex)); |
343 | memcpy(vertices, g_vertices, 2 * sizeof(struct Vertex)); |
344 | vertices[0].u = vertices[0].x = x; |
345 | vertices[1].u = vertices[1].x = x + SLICE_WIDTH; |
346 | sceGuDrawArray(GU_SPRITES,GU_TEXTURE_16BIT|GU_VERTEX_16BIT|GU_TRANSFORM_2D,2,0,vertices); |
347 | } |
348 | // lprintf("listlen: %iB\n", sceGuCheckList()); // ~480 only |
7d4906bf |
349 | } |
8ab3e3c1 |
350 | else |
351 | #endif |
352 | sceGuDrawArray(GU_SPRITES,GU_TEXTURE_16BIT|GU_VERTEX_16BIT|GU_TRANSFORM_2D,2,0,g_vertices); |
353 | |
354 | sceGuFinish(); |
7d4906bf |
355 | } |
356 | |
357 | |
358 | static void cd_leds(void) |
359 | { |
360 | static int old_reg = 0; |
361 | unsigned int col_g, col_r, *p; |
362 | |
363 | if (!((Pico_mcd->s68k_regs[0] ^ old_reg) & 3)) return; // no change |
364 | old_reg = Pico_mcd->s68k_regs[0]; |
365 | |
366 | p = (unsigned int *)((short *)psp_screen + 512*2+4+2); |
367 | col_g = (old_reg & 2) ? 0x06000600 : 0; |
368 | col_r = (old_reg & 1) ? 0xc000c000 : 0; |
369 | *p++ = col_g; *p++ = col_g; p+=2; *p++ = col_r; *p++ = col_r; p += 512/2 - 12/2; |
370 | *p++ = col_g; *p++ = col_g; p+=2; *p++ = col_r; *p++ = col_r; p += 512/2 - 12/2; |
371 | *p++ = col_g; *p++ = col_g; p+=2; *p++ = col_r; *p++ = col_r; |
372 | } |
373 | |
374 | |
8ab3e3c1 |
375 | static void dbg_text(void) |
7d4906bf |
376 | { |
8ab3e3c1 |
377 | int *p, h, len; |
378 | char text[128]; |
7d4906bf |
379 | |
8ab3e3c1 |
380 | sprintf(text, "sl: %i, 16b: %i", g_vertices[0].u == 0 && g_vertices[1].u == g_vertices[1].x, blit_16bit_mode); |
381 | len = strlen(text) * 8 / 2; |
382 | for (h = 0; h < 8; h++) { |
383 | p = (int *) ((unsigned short *) psp_screen+2+512*(256+h)); |
384 | p = (int *) ((int)p & ~3); // align |
385 | memset32(p, 0, len); |
7d4906bf |
386 | } |
8ab3e3c1 |
387 | emu_textOut16(2, 256, text); |
388 | } |
389 | |
390 | |
391 | /* called after rendering is done, but frame emulation is not finished */ |
392 | void blit1(void) |
393 | { |
394 | if (PicoOpt&0x10) |
7d4906bf |
395 | { |
8ab3e3c1 |
396 | int i; |
397 | unsigned char *pd; |
398 | // clear top and bottom trash |
399 | for (pd = PicoDraw2FB+8, i = 8; i > 0; i--, pd += 512) |
400 | memset32((int *)pd, 0xe0e0e0e0, 320/4); |
401 | for (pd = PicoDraw2FB+512*232+8, i = 8; i > 0; i--, pd += 512) |
402 | memset32((int *)pd, 0xe0e0e0e0, 320/4); |
7d4906bf |
403 | } |
8ab3e3c1 |
404 | |
405 | blitscreen_clut(); |
406 | } |
407 | |
408 | |
409 | static void blit2(const char *fps, const char *notice) |
410 | { |
411 | int emu_opt = currentConfig.EmuOpt; |
412 | |
413 | sceGuSync(0,0); |
7d4906bf |
414 | |
415 | if (notice || (emu_opt & 2)) { |
8ab3e3c1 |
416 | if (notice) osd_text(4, notice, 0); |
417 | if (emu_opt & 2) osd_text(OSD_FPS_X, fps, 0); |
7d4906bf |
418 | } |
419 | |
8ab3e3c1 |
420 | dbg_text(); |
421 | |
7d4906bf |
422 | if ((emu_opt & 0x400) && (PicoMCD & 1)) |
423 | cd_leds(); |
424 | |
425 | psp_video_flip(0); |
426 | } |
427 | |
428 | // clears whole screen or just the notice area (in all buffers) |
429 | static void clearArea(int full) |
430 | { |
431 | if (full) { |
432 | memset32(psp_screen, 0, 512*272*2/4); |
433 | psp_video_flip(0); |
434 | memset32(psp_screen, 0, 512*272*2/4); |
8ab3e3c1 |
435 | memset32(VRAM_CACHED_STUFF, 0xe0e0e0e0, 512*240/4); |
436 | memset32((int *)VRAM_CACHED_STUFF+512*240/4, 0, 512*240*2/4); |
7d4906bf |
437 | } else { |
438 | void *fb = psp_video_get_active_fb(); |
439 | memset32((int *)((char *)psp_screen + 512*264*2), 0, 512*8*2/4); |
440 | memset32((int *)((char *)fb + 512*264*2), 0, 512*8*2/4); |
441 | } |
442 | } |
443 | |
444 | static void vidResetMode(void) |
445 | { |
9112b6ce |
446 | // setup GU |
447 | sceGuSync(0,0); // sync with prev |
448 | sceGuStart(GU_DIRECT, guCmdList); |
449 | |
450 | sceGuClutMode(GU_PSM_5650,0,0xff,0); |
9112b6ce |
451 | sceGuTexMode(GU_PSM_T8,0,0,0); // 8-bit image |
452 | sceGuTexFunc(GU_TFX_REPLACE,GU_TCC_RGB); |
8ab3e3c1 |
453 | if (currentConfig.scaling) |
454 | sceGuTexFilter(GU_LINEAR, GU_LINEAR); |
455 | else sceGuTexFilter(GU_NEAREST, GU_NEAREST); |
9112b6ce |
456 | sceGuTexScale(1.0f,1.0f); |
457 | sceGuTexOffset(0.0f,0.0f); |
9112b6ce |
458 | |
8ab3e3c1 |
459 | sceGuTexImage(0,512,512,512,(char *)VRAM_STUFF + 16); |
9112b6ce |
460 | |
8ab3e3c1 |
461 | // slow rend. |
462 | PicoDrawSetColorFormat(-1); |
463 | PicoScan = EmuScanSlow; |
9112b6ce |
464 | |
8ab3e3c1 |
465 | localPal[0xe0] = 0; |
7d4906bf |
466 | Pico.m.dirtyPal = 1; |
8ab3e3c1 |
467 | blit_16bit_mode = dynamic_palette = 0; |
7d4906bf |
468 | |
9112b6ce |
469 | sceGuFinish(); |
8ab3e3c1 |
470 | set_scaling_params(); |
9112b6ce |
471 | sceGuSync(0,0); |
7d4906bf |
472 | } |
8ab3e3c1 |
473 | |
a4221917 |
474 | |
475 | /* sound stuff */ |
e41da5ce |
476 | #define SOUND_BLOCK_SIZE_NTSC (2940*2) // 1024 // 1152 |
477 | #define SOUND_BLOCK_SIZE_PAL (3528*2) |
a4221917 |
478 | #define SOUND_BLOCK_COUNT 4 |
479 | |
e41da5ce |
480 | static short __attribute__((aligned(4))) sndBuffer[SOUND_BLOCK_SIZE_PAL*SOUND_BLOCK_COUNT + 44100/50*2]; |
481 | static short *snd_playptr = NULL, *sndBuffer_endptr = NULL; |
482 | static int samples_made = 0, samples_done = 0, samples_block = 0; |
a4221917 |
483 | static int sound_thread_exit = 0; |
484 | static SceUID sound_sem = -1; |
485 | |
486 | static void writeSound(int len); |
487 | |
488 | static int sound_thread(SceSize args, void *argp) |
7d4906bf |
489 | { |
a4221917 |
490 | int ret; |
491 | |
492 | lprintf("sound_thread: started, priority %i\n", sceKernelGetThreadCurrentPriority()); |
493 | |
494 | while (!sound_thread_exit) |
495 | { |
496 | if (samples_made - samples_done < samples_block) { |
497 | // wait for data... |
498 | //lprintf("sthr: wait... (%i/%i)\n", samples_done, samples_made); |
499 | ret = sceKernelWaitSema(sound_sem, 1, 0); |
500 | //lprintf("sthr: sceKernelWaitSema: %i\n", ret); |
501 | continue; |
502 | } |
503 | |
504 | //lprintf("sthr: got data: %i\n", samples_made - samples_done); |
505 | |
506 | ret = sceAudio_E0727056(PSP_AUDIO_VOLUME_MAX, snd_playptr); |
507 | |
508 | samples_done += samples_block; |
509 | snd_playptr += samples_block; |
e41da5ce |
510 | if (snd_playptr >= sndBuffer_endptr) |
a4221917 |
511 | snd_playptr = sndBuffer; |
512 | if (ret) |
513 | lprintf("sthr: outf: %i; pos %i/%i\n", ret, samples_done, samples_made); |
514 | } |
515 | |
516 | lprintf("sthr: exit\n"); |
517 | sceKernelExitDeleteThread(0); |
518 | return 0; |
519 | } |
520 | |
521 | static void sound_init(void) |
522 | { |
523 | SceUID thid; |
524 | |
525 | sound_sem = sceKernelCreateSema("sndsem", 0, 0, 1, NULL); |
526 | if (sound_sem < 0) lprintf("sceKernelCreateSema() failed: %i\n", sound_sem); |
527 | |
528 | sound_thread_exit = 0; |
529 | thid = sceKernelCreateThread("sndthread", sound_thread, 0x12, 0x10000, 0, NULL); |
530 | if (thid >= 0) |
531 | { |
532 | sceKernelStartThread(thid, 0, 0); |
533 | } |
534 | else |
535 | lprintf("sceKernelCreateThread failed: %i\n", thid); |
536 | } |
537 | |
538 | static void sound_prepare(void) |
539 | { |
540 | static int PsndRate_old = 0, PicoOpt_old = 0, pal_old = 0; |
541 | int ret, stereo; |
542 | |
543 | samples_made = samples_done = 0; |
544 | |
545 | if (PsndRate != PsndRate_old || (PicoOpt&0x0b) != (PicoOpt_old&0x0b) || Pico.m.pal != pal_old) { |
546 | sound_rerate(Pico.m.frame_count ? 1 : 0); |
547 | } |
548 | stereo=(PicoOpt&8)>>3; |
e41da5ce |
549 | |
550 | samples_block = Pico.m.pal ? SOUND_BLOCK_SIZE_PAL : SOUND_BLOCK_SIZE_NTSC; |
551 | if (PsndRate == 22050) samples_block /= 2; |
552 | else if (PsndRate == 11025) samples_block /= 4; |
553 | sndBuffer_endptr = &sndBuffer[samples_block*SOUND_BLOCK_COUNT]; |
a4221917 |
554 | |
555 | lprintf("starting audio: %i, len: %i, stereo: %i, pal: %i, block samples: %i\n", |
556 | PsndRate, PsndLen, stereo, Pico.m.pal, samples_block); |
557 | |
558 | while (sceAudioOutput2GetRestSample() > 0) psp_msleep(100); |
559 | sceAudio_5C37C0AE(); |
e41da5ce |
560 | ret = sceAudio_38553111(samples_block/2, PsndRate, 2); // seems to not need that stupid 64byte alignment |
a4221917 |
561 | if (ret < 0) { |
562 | lprintf("sceAudio_38553111() failed: %i\n", ret); |
563 | sprintf(noticeMsg, "sound init failed (%i), snd disabled", ret); |
564 | noticeMsgTime = sceKernelGetSystemTimeLow(); |
565 | currentConfig.EmuOpt &= ~4; |
566 | } else { |
a4221917 |
567 | PicoWriteSound = writeSound; |
568 | memset32((int *)(void *)sndBuffer, 0, sizeof(sndBuffer)/4); |
e41da5ce |
569 | snd_playptr = sndBuffer_endptr - samples_block; |
570 | samples_made = samples_block; // send 1 empty block first.. |
a4221917 |
571 | PsndOut = sndBuffer; |
572 | PsndRate_old = PsndRate; |
573 | PicoOpt_old = PicoOpt; |
574 | pal_old = Pico.m.pal; |
575 | } |
576 | } |
577 | |
578 | static void sound_end(void) |
579 | { |
e41da5ce |
580 | while (samples_made - samples_done >= samples_block || sceAudioOutput2GetRestSample() > 0) |
581 | psp_msleep(100); |
582 | sceAudio_5C37C0AE(); |
a4221917 |
583 | } |
584 | |
585 | static void sound_deinit(void) |
586 | { |
587 | sound_thread_exit = 1; |
588 | sceKernelSignalSema(sound_sem, 1); |
589 | } |
590 | |
591 | static void writeSound(int len) |
592 | { |
593 | int ret; |
7d4906bf |
594 | if (PicoOpt&8) len<<=1; |
595 | |
a4221917 |
596 | PsndOut += len; |
e41da5ce |
597 | /*if (PsndOut > sndBuffer_endptr) { |
a4221917 |
598 | memcpy32((int *)(void *)sndBuffer, (int *)endptr, (PsndOut - endptr + 1) / 2); |
599 | PsndOut = &sndBuffer[PsndOut - endptr]; |
e41da5ce |
600 | lprintf("mov\n"); |
a4221917 |
601 | } |
e41da5ce |
602 | else*/ |
603 | if (PsndOut >= sndBuffer_endptr) |
604 | PsndOut = sndBuffer; |
a4221917 |
605 | |
606 | // signal the snd thread |
607 | samples_made += len; |
608 | if (samples_made - samples_done >= samples_block) { |
e41da5ce |
609 | // lprintf("signal, %i/%i\n", samples_done, samples_made); |
a4221917 |
610 | ret = sceKernelSignalSema(sound_sem, 1); |
e41da5ce |
611 | // lprintf("signal ret %i\n", ret); |
a4221917 |
612 | } |
7d4906bf |
613 | } |
a4221917 |
614 | |
7d4906bf |
615 | |
616 | static void SkipFrame(void) |
617 | { |
618 | PicoSkipFrame=1; |
619 | PicoFrame(); |
620 | PicoSkipFrame=0; |
621 | } |
622 | |
623 | void emu_forcedFrame(void) |
624 | { |
625 | int po_old = PicoOpt; |
626 | int eo_old = currentConfig.EmuOpt; |
627 | |
628 | PicoOpt &= ~0x0010; |
629 | PicoOpt |= 0x4080; // soft_scale | acc_sprites |
630 | currentConfig.EmuOpt |= 0x80; |
631 | |
8ab3e3c1 |
632 | vidResetMode(); |
633 | memset32(VRAM_CACHED_STUFF, 0xe0e0e0e0, 512*8/4); // borders |
634 | memset32((int *)VRAM_CACHED_STUFF + 512*232/4, 0xe0e0e0e0, 512*8/4); |
a4221917 |
635 | memset32((int *)psp_screen + 512*264*2/4, 0, 512*8*2/4); |
8ab3e3c1 |
636 | |
637 | PicoDrawSetColorFormat(-1); |
638 | PicoScan = EmuScanSlow; |
9112b6ce |
639 | EmuScanPrepare(); |
7d4906bf |
640 | PicoFrameDrawOnly(); |
8ab3e3c1 |
641 | blit1(); |
642 | sceGuSync(0,0); |
7d4906bf |
643 | |
644 | PicoOpt = po_old; |
645 | currentConfig.EmuOpt = eo_old; |
646 | } |
647 | |
648 | |
649 | static void RunEvents(unsigned int which) |
650 | { |
651 | if (which & 0x1800) // save or load (but not both) |
652 | { |
653 | int do_it = 1; |
654 | |
655 | if ( emu_checkSaveFile(state_slot) && |
656 | (( (which & 0x1000) && (currentConfig.EmuOpt & 0x800)) || // load |
657 | (!(which & 0x1000) && (currentConfig.EmuOpt & 0x200))) ) // save |
658 | { |
659 | int keys; |
8ab3e3c1 |
660 | blit2("", (which & 0x1000) ? "LOAD STATE? (X=yes, O=no)" : "OVERWRITE SAVE? (X=yes, O=no)"); |
7d4906bf |
661 | while( !((keys = psp_pad_read(1)) & (BTN_X|BTN_CIRCLE)) ) |
662 | psp_msleep(50); |
663 | if (keys & BTN_CIRCLE) do_it = 0; |
664 | while( ((keys = psp_pad_read(1)) & (BTN_X|BTN_CIRCLE)) ) // wait for release |
665 | psp_msleep(50); |
666 | clearArea(0); |
667 | } |
668 | |
669 | if (do_it) |
670 | { |
8ab3e3c1 |
671 | osd_text(4, (which & 0x1000) ? "LOADING GAME" : "SAVING GAME", 1); |
672 | PicoStateProgressCB = emu_msg_cb; |
7d4906bf |
673 | emu_SaveLoadGame((which & 0x1000) >> 12, 0); |
674 | PicoStateProgressCB = NULL; |
675 | psp_msleep(0); |
676 | } |
677 | |
678 | reset_timing = 1; |
679 | } |
680 | if (which & 0x0400) // switch renderer |
681 | { |
682 | if (PicoOpt&0x10) { PicoOpt&=~0x10; currentConfig.EmuOpt |= 0x80; } |
683 | else { PicoOpt|= 0x10; currentConfig.EmuOpt &= ~0x80; } |
684 | |
685 | vidResetMode(); |
686 | |
687 | if (PicoOpt&0x10) { |
688 | strcpy(noticeMsg, " 8bit fast renderer"); |
689 | } else if (currentConfig.EmuOpt&0x80) { |
690 | strcpy(noticeMsg, "16bit accurate renderer"); |
691 | } else { |
692 | strcpy(noticeMsg, " 8bit accurate renderer"); |
693 | } |
694 | |
695 | noticeMsgTime = sceKernelGetSystemTimeLow(); |
696 | } |
697 | if (which & 0x0300) |
698 | { |
699 | if(which&0x0200) { |
700 | state_slot -= 1; |
701 | if(state_slot < 0) state_slot = 9; |
702 | } else { |
703 | state_slot += 1; |
704 | if(state_slot > 9) state_slot = 0; |
705 | } |
706 | sprintf(noticeMsg, "SAVE SLOT %i [%s]", state_slot, emu_checkSaveFile(state_slot) ? "USED" : "FREE"); |
707 | noticeMsgTime = sceKernelGetSystemTimeLow(); |
708 | } |
709 | } |
710 | |
711 | static void updateKeys(void) |
712 | { |
713 | unsigned int keys, allActions[2] = { 0, 0 }, events; |
714 | static unsigned int prevEvents = 0; |
715 | int i; |
716 | |
717 | keys = psp_pad_read(0); |
70357ce5 |
718 | if (keys & PSP_CTRL_HOME) |
719 | sceDisplayWaitVblankStart(); |
720 | |
7d4906bf |
721 | if (keys & BTN_SELECT) |
722 | engineState = PGS_Menu; |
723 | |
724 | keys &= CONFIGURABLE_KEYS; |
725 | |
726 | for (i = 0; i < 32; i++) |
727 | { |
728 | if (keys & (1 << i)) |
729 | { |
730 | int pl, acts = currentConfig.KeyBinds[i]; |
731 | if (!acts) continue; |
732 | pl = (acts >> 16) & 1; |
733 | if (combo_keys & (1 << i)) |
734 | { |
735 | int u = i+1, acts_c = acts & combo_acts; |
736 | // let's try to find the other one |
737 | if (acts_c) |
738 | for (; u < 32; u++) |
739 | if ( (currentConfig.KeyBinds[u] & acts_c) && (keys & (1 << u)) ) { |
740 | allActions[pl] |= acts_c; |
741 | keys &= ~((1 << i) | (1 << u)); |
742 | break; |
743 | } |
744 | // add non-combo actions if combo ones were not found |
745 | if (!acts_c || u == 32) |
746 | allActions[pl] |= acts & ~combo_acts; |
747 | } else { |
748 | allActions[pl] |= acts; |
749 | } |
750 | } |
751 | } |
752 | |
753 | PicoPad[0] = (unsigned short) allActions[0]; |
754 | PicoPad[1] = (unsigned short) allActions[1]; |
755 | |
756 | events = (allActions[0] | allActions[1]) >> 16; |
757 | |
758 | // volume is treated in special way and triggered every frame |
759 | if ((events & 0x6000) && PsndOut != NULL) |
760 | { |
761 | int vol = currentConfig.volume; |
762 | if (events & 0x2000) { |
763 | if (vol < 100) vol++; |
764 | } else { |
765 | if (vol > 0) vol--; |
766 | } |
767 | // FrameworkAudio_SetVolume(vol, vol); // TODO |
768 | sprintf(noticeMsg, "VOL: %02i ", vol); |
769 | noticeMsgTime = sceKernelGetSystemTimeLow(); |
770 | currentConfig.volume = vol; |
771 | } |
772 | |
773 | events &= ~prevEvents; |
774 | if (events) RunEvents(events); |
775 | if (movie_data) emu_updateMovie(); |
776 | |
777 | prevEvents = (allActions[0] | allActions[1]) >> 16; |
778 | } |
779 | |
780 | static void find_combos(void) |
781 | { |
782 | int act, u; |
783 | |
784 | // find out which keys and actions are combos |
785 | combo_keys = combo_acts = 0; |
786 | for (act = 0; act < 32; act++) |
787 | { |
788 | int keyc = 0; |
789 | if (act == 16 || act == 17) continue; // player2 flag |
790 | for (u = 0; u < 32; u++) |
791 | { |
792 | if (currentConfig.KeyBinds[u] & (1 << act)) keyc++; |
793 | } |
794 | if (keyc > 1) |
795 | { |
796 | // loop again and mark those keys and actions as combo |
797 | for (u = 0; u < 32; u++) |
798 | { |
799 | if (currentConfig.KeyBinds[u] & (1 << act)) { |
800 | combo_keys |= 1 << u; |
801 | combo_acts |= 1 << act; |
802 | } |
803 | } |
804 | } |
805 | } |
806 | } |
807 | |
808 | |
809 | static void simpleWait(unsigned int until) |
810 | { |
811 | unsigned int tval; |
812 | int diff; |
813 | |
814 | tval = sceKernelGetSystemTimeLow(); |
815 | diff = (int)until - (int)tval; |
816 | if (diff >= 512 && diff < 100*1024) |
817 | sceKernelDelayThread(diff); |
818 | } |
819 | |
820 | void emu_Loop(void) |
821 | { |
7d4906bf |
822 | char fpsbuff[24]; // fps count c string |
823 | unsigned int tval, tval_prev = 0, tval_thissec = 0; // timing |
824 | int frames_done = 0, frames_shown = 0, oldmodes = 0; |
825 | int target_fps, target_frametime, lim_time, tval_diff, i; |
826 | char *notice = NULL; |
827 | |
828 | lprintf("entered emu_Loop()\n"); |
829 | |
830 | fpsbuff[0] = 0; |
831 | |
70357ce5 |
832 | if (currentConfig.CPUclock != psp_get_cpu_clock()) { |
833 | lprintf("setting cpu clock to %iMHz... ", currentConfig.CPUclock); |
834 | i = psp_set_cpu_clock(currentConfig.CPUclock); |
835 | lprintf(i ? "failed\n" : "done\n"); |
836 | currentConfig.CPUclock = psp_get_cpu_clock(); |
837 | } |
838 | |
7d4906bf |
839 | // make sure we are in correct mode |
840 | vidResetMode(); |
8ab3e3c1 |
841 | clearArea(1); |
7d4906bf |
842 | Pico.m.dirtyPal = 1; |
843 | oldmodes = ((Pico.video.reg[12]&1)<<2) ^ 0xc; |
844 | find_combos(); |
845 | |
846 | // pal/ntsc might have changed, reset related stuff |
847 | target_fps = Pico.m.pal ? 50 : 60; |
848 | target_frametime = Pico.m.pal ? (1000000<<8)/50 : (1000000<<8)/60+1; |
849 | reset_timing = 1; |
850 | |
851 | // prepare CD buffer |
852 | if (PicoMCD & 1) PicoCDBufferInit(); |
853 | |
854 | // prepare sound stuff |
855 | PsndOut = NULL; |
7d4906bf |
856 | if (currentConfig.EmuOpt & 4) |
857 | { |
a4221917 |
858 | sound_prepare(); |
7d4906bf |
859 | } |
7d4906bf |
860 | |
861 | // loop? |
862 | while (engineState == PGS_Running) |
863 | { |
864 | int modes; |
865 | |
866 | tval = sceKernelGetSystemTimeLow(); |
867 | if (reset_timing || tval < tval_prev) { |
868 | //stdbg("timing reset"); |
869 | reset_timing = 0; |
870 | tval_thissec = tval; |
871 | frames_shown = frames_done = 0; |
872 | } |
873 | |
874 | // show notice message? |
875 | if (noticeMsgTime) { |
876 | static int noticeMsgSum; |
877 | if (tval - noticeMsgTime > 2000000) { // > 2.0 sec |
878 | noticeMsgTime = 0; |
879 | clearArea(0); |
880 | notice = 0; |
881 | } else { |
882 | int sum = noticeMsg[0]+noticeMsg[1]+noticeMsg[2]; |
883 | if (sum != noticeMsgSum) { clearArea(0); noticeMsgSum = sum; } |
884 | notice = noticeMsg; |
885 | } |
886 | } |
887 | |
888 | // check for mode changes |
889 | modes = ((Pico.video.reg[12]&1)<<2)|(Pico.video.reg[1]&8); |
890 | if (modes != oldmodes) { |
891 | oldmodes = modes; |
892 | clearArea(1); |
8ab3e3c1 |
893 | set_scaling_params(); |
7d4906bf |
894 | } |
895 | |
896 | // second passed? |
897 | if (tval - tval_thissec >= 1000000) |
898 | { |
e41da5ce |
899 | // missing 1 frame? |
900 | if (currentConfig.Frameskip < 0 && frames_done < target_fps) { |
901 | SkipFrame(); frames_done++; |
7d4906bf |
902 | } |
e41da5ce |
903 | |
904 | if (currentConfig.EmuOpt & 2) |
905 | sprintf(fpsbuff, "%02i/%02i ", frames_shown, frames_done); |
906 | |
7d4906bf |
907 | tval_thissec += 1000000; |
908 | |
909 | if (currentConfig.Frameskip < 0) { |
910 | frames_done -= target_fps; if (frames_done < 0) frames_done = 0; |
911 | frames_shown -= target_fps; if (frames_shown < 0) frames_shown = 0; |
912 | if (frames_shown > frames_done) frames_shown = frames_done; |
913 | } else { |
914 | frames_done = frames_shown = 0; |
915 | } |
916 | } |
917 | #ifdef PFRAMES |
918 | sprintf(fpsbuff, "%i", Pico.m.frame_count); |
919 | #endif |
920 | |
921 | tval_prev = tval; |
922 | lim_time = (frames_done+1) * target_frametime; |
923 | if (currentConfig.Frameskip >= 0) // frameskip enabled |
924 | { |
925 | for (i = 0; i < currentConfig.Frameskip; i++) { |
926 | updateKeys(); |
927 | SkipFrame(); frames_done++; |
928 | if (PsndOut) { // do framelimitting if sound is enabled |
929 | int tval_diff; |
930 | tval = sceKernelGetSystemTimeLow(); |
931 | tval_diff = (int)(tval - tval_thissec) << 8; |
932 | if (tval_diff < lim_time) // we are too fast |
933 | simpleWait(tval + ((lim_time - tval_diff)>>8)); |
934 | } |
935 | lim_time += target_frametime; |
936 | } |
937 | } |
938 | else // auto frameskip |
939 | { |
940 | int tval_diff; |
941 | tval = sceKernelGetSystemTimeLow(); |
942 | tval_diff = (int)(tval - tval_thissec) << 8; |
943 | if (tval_diff > lim_time) |
944 | { |
945 | // no time left for this frame - skip |
946 | if (tval_diff - lim_time >= (300000<<8)) { |
947 | /* something caused a slowdown for us (disk access? cache flush?) |
948 | * try to recover by resetting timing... */ |
949 | reset_timing = 1; |
950 | continue; |
951 | } |
952 | updateKeys(); |
953 | SkipFrame(); frames_done++; |
954 | continue; |
955 | } |
956 | } |
957 | |
958 | updateKeys(); |
959 | |
960 | if (!(PicoOpt&0x10)) |
9112b6ce |
961 | EmuScanPrepare(); |
7d4906bf |
962 | |
963 | PicoFrame(); |
964 | |
8ab3e3c1 |
965 | blit2(fpsbuff, notice); |
7d4906bf |
966 | |
967 | // check time |
968 | tval = sceKernelGetSystemTimeLow(); |
969 | tval_diff = (int)(tval - tval_thissec) << 8; |
970 | |
971 | if (currentConfig.Frameskip < 0 && tval_diff - lim_time >= (300000<<8)) // slowdown detection |
972 | reset_timing = 1; |
973 | else if (PsndOut != NULL || currentConfig.Frameskip < 0) |
974 | { |
975 | // sleep if we are still too fast |
976 | if (tval_diff < lim_time) |
977 | { |
978 | // we are too fast |
979 | simpleWait(tval + ((lim_time - tval_diff) >> 8)); |
980 | } |
981 | } |
982 | |
983 | frames_done++; frames_shown++; |
984 | } |
985 | |
986 | |
987 | if (PicoMCD & 1) PicoCDBufferFree(); |
a4221917 |
988 | |
7d4906bf |
989 | if (PsndOut != NULL) { |
a4221917 |
990 | PsndOut = NULL; |
991 | sound_end(); |
7d4906bf |
992 | } |
a4221917 |
993 | |
7d4906bf |
994 | // save SRAM |
995 | if ((currentConfig.EmuOpt & 1) && SRam.changed) { |
8ab3e3c1 |
996 | emu_msg_cb("Writing SRAM/BRAM.."); |
7d4906bf |
997 | emu_SaveLoadGame(0, 1); |
998 | SRam.changed = 0; |
999 | } |
a4221917 |
1000 | |
1001 | // draw a frame for bg.. |
1002 | emu_forcedFrame(); |
7d4906bf |
1003 | } |
1004 | |
1005 | |
1820b5a7 |
1006 | void emu_ResetGame(void) |
1007 | { |
1008 | PicoReset(0); |
7d4906bf |
1009 | reset_timing = 1; |
1820b5a7 |
1010 | } |
1011 | |