revive pandora and win32 builds, rm gp2x dep for linux, lots of refactoring
[libpicofe.git] / pandora / emu.c
CommitLineData
93c18cb4 1// (c) Copyright 2006-2009 notaz, All rights reserved.\r
492d353a 2// Free for non-commercial use.\r
3\r
4// For commercial use, separate licencing terms must be obtained.\r
5\r
6#include <stdio.h>\r
492d353a 7\r
492d353a 8#include "../common/emu.h"\r
7fd581f4 9#include "../common/menu.h"\r
d2f29611 10#include "../common/plat.h"\r
11#include "../common/arm_utils.h"\r
b3972d82 12#include "../linux/sndout_oss.h"\r
de9b1274 13#include "asm_utils.h"\r
d2f29611 14#include "version.h"\r
492d353a 15\r
f11bad75 16#include <pico/pico_int.h>\r
492d353a 17\r
d2f29611 18#define USE_320_SCREEN 1\r
492d353a 19\r
20\r
492d353a 21static short __attribute__((aligned(4))) sndBuffer[2*44100/50];\r
d2f29611 22static unsigned char temp_frame[g_screen_width * g_screen_height * 2];\r
23unsigned char *PicoDraw2FB = temp_frame;\r
492d353a 24static int osd_fps_x;\r
d2f29611 25char cpu_clk_name[] = "unused";\r
492d353a 26\r
492d353a 27\r
93c18cb4 28void pemu_prep_defconfig(void)\r
492d353a 29{\r
d2f29611 30 // XXX: move elsewhere\r
31 g_menubg_ptr = temp_frame;\r
492d353a 32}\r
33\r
d2f29611 34void pemu_validate_config(void)\r
492d353a 35{\r
492d353a 36}\r
37\r
d2f29611 38// FIXME: cleanup\r
046c4540 39static void osd_text(int x, int y, const char *text)\r
492d353a 40{\r
41 int len = strlen(text)*8;\r
42\r
43 if ((PicoOpt&0x10)||!(currentConfig.EmuOpt&0x80)) {\r
44 int *p, i, h;\r
45 x &= ~3; // align x\r
46 len = (len+3) >> 2;\r
47 for (h = 0; h < 8; h++) {\r
7fd581f4 48 p = (int *) ((unsigned char *) g_screen_ptr+x+g_screen_width*(y+h));\r
492d353a 49 for (i = len; i; i--, p++) *p = 0xe0e0e0e0;\r
50 }\r
b7911801 51 emu_text_out8(x, y, text);\r
492d353a 52 } else {\r
53 int *p, i, h;\r
54 x &= ~1; // align x\r
55 len++;\r
56 for (h = 0; h < 16; h++) {\r
7fd581f4 57 p = (int *) ((unsigned short *) g_screen_ptr+x+g_screen_width*(y+h));\r
de9b1274 58 for (i = len; i; i--, p++) *p = 0;//(*p>>2)&0x39e7;\r
492d353a 59 }\r
b7911801 60 text_out16(x, y, text);\r
492d353a 61 }\r
62}\r
63\r
64static void draw_cd_leds(void)\r
65{\r
66// static\r
67 int old_reg;\r
68// if (!((Pico_mcd->s68k_regs[0] ^ old_reg) & 3)) return; // no change // mmu hack problems?\r
69 old_reg = Pico_mcd->s68k_regs[0];\r
70\r
71 if ((PicoOpt&0x10)||!(currentConfig.EmuOpt&0x80)) {\r
72 // 8-bit modes\r
73 unsigned int col_g = (old_reg & 2) ? 0xc0c0c0c0 : 0xe0e0e0e0;\r
74 unsigned int col_r = (old_reg & 1) ? 0xd0d0d0d0 : 0xe0e0e0e0;\r
7fd581f4 75 *(unsigned int *)((char *)g_screen_ptr + g_screen_width*2+ 4) =\r
76 *(unsigned int *)((char *)g_screen_ptr + g_screen_width*3+ 4) =\r
77 *(unsigned int *)((char *)g_screen_ptr + g_screen_width*4+ 4) = col_g;\r
78 *(unsigned int *)((char *)g_screen_ptr + g_screen_width*2+12) =\r
79 *(unsigned int *)((char *)g_screen_ptr + g_screen_width*3+12) =\r
80 *(unsigned int *)((char *)g_screen_ptr + g_screen_width*4+12) = col_r;\r
492d353a 81 } else {\r
82 // 16-bit modes\r
7fd581f4 83 unsigned int *p = (unsigned int *)((short *)g_screen_ptr + g_screen_width*2+4);\r
492d353a 84 unsigned int col_g = (old_reg & 2) ? 0x06000600 : 0;\r
85 unsigned int col_r = (old_reg & 1) ? 0xc000c000 : 0;\r
e31266dd 86 *p++ = col_g; *p++ = col_g; p+=2; *p++ = col_r; *p++ = col_r; p += g_screen_width/2 - 12/2;\r
87 *p++ = col_g; *p++ = col_g; p+=2; *p++ = col_r; *p++ = col_r; p += g_screen_width/2 - 12/2;\r
492d353a 88 *p++ = col_g; *p++ = col_g; p+=2; *p++ = col_r; *p++ = col_r;\r
89 }\r
90}\r
91\r
de9b1274 92#ifdef USE_320_SCREEN\r
93\r
94static int EmuScanBegin16(unsigned int num)\r
95{\r
7fd581f4 96 DrawLineDest = (unsigned short *)g_screen_ptr + num*800 + 800/2 - 320/2;\r
de9b1274 97 //int w = (Pico.video.reg[12]&1) ? 320 : 256;\r
7fd581f4 98 //DrawLineDest = (unsigned short *)g_screen_ptr + num*w;\r
de9b1274 99\r
100 return 0;\r
101}\r
102\r
103#else // USE_320_SCREEN\r
104\r
492d353a 105static int EmuScanEnd16(unsigned int num)\r
106{\r
107 unsigned char *ps=HighCol+8;\r
108 unsigned short *pd;\r
109 unsigned short *pal=HighPal;\r
110 int sh = Pico.video.reg[0xC]&8;\r
111 int len, mask = 0xff;\r
112\r
7fd581f4 113 pd=(unsigned short *)g_screen_ptr + num*800*2 + 800/2 - 320*2/2;\r
492d353a 114\r
115 if (Pico.m.dirtyPal)\r
116 PicoDoHighPal555(sh);\r
117\r
118 if (Pico.video.reg[12]&1) {\r
119 len = 320;\r
120 } else {\r
de9b1274 121 pd += 32*2;\r
492d353a 122 len = 256;\r
123 }\r
124\r
f11bad75 125 if (!sh && (rendstatus & PDRAW_SPR_LO_ON_HI))\r
126 mask=0x3f; // messed sprites, upper bits are priority stuff\r
492d353a 127\r
de9b1274 128#if 1\r
129 clut_line(pd, ps, pal, (mask<<16) | len);\r
130#else\r
492d353a 131 for (; len > 0; len--)\r
132 {\r
133 unsigned int p = pal[*ps++ & mask];\r
134 p |= p << 16;\r
135 *(unsigned int *)pd = p;\r
136 *(unsigned int *)(&pd[800]) = p;\r
137 pd += 2;\r
138 }\r
de9b1274 139#endif\r
492d353a 140\r
141 return 0;\r
142}\r
143\r
de9b1274 144#endif // USE_320_SCREEN\r
145\r
d2f29611 146void pemu_update_display(const char *fps, const char *notice)\r
492d353a 147{\r
d2f29611 148 if (notice || (currentConfig.EmuOpt & EOPT_SHOW_FPS)) {\r
149 if (notice)\r
150 osd_text(4, 460, notice);\r
151 if (currentConfig.EmuOpt & EOPT_SHOW_FPS)\r
152 osd_text(osd_fps_x, 460, fps);\r
492d353a 153 }\r
d2f29611 154 if ((PicoAHW & PAHW_MCD) && (currentConfig.EmuOpt & EOPT_EN_CD_LEDS))\r
492d353a 155 draw_cd_leds();\r
d2f29611 156}\r
492d353a 157\r
d2f29611 158void plat_video_toggle_renderer(int is_next, int force_16bpp, int is_menu)\r
159{\r
160 // this will auto-select SMS/32X renderers\r
161 PicoDrawSetColorFormat(1);\r
492d353a 162}\r
163\r
d2f29611 164void plat_video_menu_enter(int is_rom_loaded)\r
165{\r
166}\r
492d353a 167\r
d2f29611 168void plat_video_menu_begin(void)\r
492d353a 169{\r
d2f29611 170 memcpy32(g_screen_ptr, g_menubg_ptr, g_screen_width * g_screen_height * 2 / 4);\r
492d353a 171}\r
172\r
d2f29611 173void plat_video_menu_end(void)\r
174{\r
175}\r
492d353a 176\r
d2f29611 177void plat_status_msg_clear(void)\r
492d353a 178{\r
d2f29611 179 unsigned short *d = (unsigned short *)g_screen_ptr + g_screen_width * g_screen_height;\r
180 int l = g_screen_width * 8;\r
181 memset32((int *)(d - l), 0, l * 2 / 4);\r
492d353a 182}\r
183\r
d2f29611 184void plat_status_msg_busy_next(const char *msg)\r
185{\r
186 plat_status_msg_clear();\r
187 pemu_update_display("", msg);\r
188 emu_status_msg("");\r
189 reset_timing = 1;\r
190}\r
492d353a 191\r
d2f29611 192void plat_status_msg_busy_first(const char *msg)\r
193{\r
194// memset32(g_screen_ptr, 0, g_screen_width * g_screen_height * 2 / 4);\r
195 plat_status_msg_busy_next(msg);\r
196}\r
197\r
198void plat_update_volume(int has_changed, int is_up)\r
492d353a 199{\r
200 static int prev_frame = 0, wait_frames = 0;\r
201 int vol = currentConfig.volume;\r
202\r
203 if (has_changed)\r
204 {\r
d2f29611 205 if (is_up) {\r
206 if (vol < 99) vol++;\r
207 } else {\r
208 if (vol > 0) vol--;\r
492d353a 209 }\r
d2f29611 210 wait_frames = 0;\r
211 sndout_oss_setvol(vol, vol);\r
212 currentConfig.volume = vol;\r
213 emu_status_msg("VOL: %02i", vol);\r
492d353a 214 prev_frame = Pico.m.frame_count;\r
215 }\r
492d353a 216}\r
217\r
93c18cb4 218void pemu_forced_frame(int opts)\r
492d353a 219{\r
220 int po_old = PicoOpt;\r
221 int eo_old = currentConfig.EmuOpt;\r
222\r
223 PicoOpt &= ~0x10;\r
224 PicoOpt |= opts|POPT_ACC_SPRITES; // acc_sprites\r
225 currentConfig.EmuOpt |= 0x80;\r
226\r
de9b1274 227#ifdef USE_320_SCREEN\r
228 PicoDrawSetColorFormat(1);\r
229 PicoScanBegin = EmuScanBegin16;\r
230#else\r
492d353a 231 PicoDrawSetColorFormat(-1);\r
232 PicoScanEnd = EmuScanEnd16;\r
de9b1274 233#endif\r
492d353a 234 Pico.m.dirtyPal = 1;\r
235 PicoFrameDrawOnly();\r
236\r
492d353a 237 PicoOpt = po_old;\r
238 currentConfig.EmuOpt = eo_old;\r
239}\r
240\r
d2f29611 241static void updateSound(int len)\r
492d353a 242{\r
d2f29611 243 len <<= 1;\r
244 if (PicoOpt & POPT_EN_STEREO)\r
245 len <<= 1;\r
492d353a 246\r
d2f29611 247 if ((currentConfig.EmuOpt & EOPT_NO_FRMLIMIT) && !sndout_oss_can_write(len))\r
248 return;\r
492d353a 249\r
d2f29611 250 /* avoid writing audio when lagging behind to prevent audio lag */\r
251 if (PicoSkipFrame != 2)\r
252 sndout_oss_write(PsndOut, len);\r
492d353a 253}\r
254\r
93c18cb4 255void pemu_sound_start(void)\r
fce20e73 256{\r
257 static int PsndRate_old = 0, PicoOpt_old = 0, pal_old = 0;\r
258 int target_fps = Pico.m.pal ? 50 : 60;\r
259\r
260 PsndOut = NULL;\r
261\r
262 if (currentConfig.EmuOpt & 4)\r
263 {\r
264 int snd_excess_add;\r
265 if (PsndRate != PsndRate_old || (PicoOpt&0x20b) != (PicoOpt_old&0x20b) || Pico.m.pal != pal_old)\r
266 PsndRerate(Pico.m.frame_count ? 1 : 0);\r
267\r
268 snd_excess_add = ((PsndRate - PsndLen*target_fps)<<16) / target_fps;\r
269 printf("starting audio: %i len: %i (ex: %04x) stereo: %i, pal: %i\n",\r
270 PsndRate, PsndLen, snd_excess_add, (PicoOpt&8)>>3, Pico.m.pal);\r
271 sndout_oss_start(PsndRate, 16, (PicoOpt&8)>>3);\r
272 sndout_oss_setvol(currentConfig.volume, currentConfig.volume);\r
273 PicoWriteSound = updateSound;\r
d2f29611 274 plat_update_volume(0, 0);\r
fce20e73 275 memset(sndBuffer, 0, sizeof(sndBuffer));\r
276 PsndOut = sndBuffer;\r
277 PsndRate_old = PsndRate;\r
278 PicoOpt_old = PicoOpt;\r
279 pal_old = Pico.m.pal;\r
280 }\r
281}\r
282\r
93c18cb4 283void pemu_sound_stop(void)\r
fce20e73 284{\r
285}\r
286\r
93c18cb4 287void pemu_sound_wait(void)\r
fce20e73 288{\r
289 // don't need to do anything, writes will block by themselves\r
290}\r
492d353a 291\r
d2f29611 292void plat_debug_cat(char *str)\r
492d353a 293{\r
d2f29611 294}\r
492d353a 295\r
d2f29611 296void emu_video_mode_change(int start_line, int line_count, int is_32cols)\r
297{\r
298 osd_fps_x = 260;\r
492d353a 299\r
d2f29611 300 // clear whole screen in all buffers\r
301 memset32(g_screen_ptr, 0, g_screen_width * g_screen_height * 2 / 4);\r
302}\r
492d353a 303\r
d2f29611 304void pemu_loop_prep(void)\r
305{\r
306#ifdef USE_320_SCREEN\r
307 PicoDrawSetColorFormat(1);\r
308 PicoScanBegin = EmuScanBegin16;\r
492d353a 309#else\r
d2f29611 310 PicoDrawSetColorFormat(-1);\r
311 PicoScanEnd = EmuScanEnd16;\r
492d353a 312#endif\r
313\r
d2f29611 314 pemu_sound_start();\r
315}\r
492d353a 316\r
d2f29611 317void pemu_loop_end(void)\r
318{\r
319 int po_old = PicoOpt;\r
320 int eo_old = currentConfig.EmuOpt;\r
492d353a 321\r
d2f29611 322 pemu_sound_stop();\r
323 memset32(g_screen_ptr, 0, g_screen_width * g_screen_height * 2 / 4);\r
492d353a 324\r
d2f29611 325 /* do one more frame for menu bg */\r
326 PicoOpt &= ~POPT_ALT_RENDERER;\r
327 PicoOpt |= POPT_EN_SOFTSCALE|POPT_ACC_SPRITES;\r
328 currentConfig.EmuOpt |= EOPT_16BPP;\r
492d353a 329\r
d2f29611 330 PicoDrawSetColorFormat(1);\r
331 Pico.m.dirtyPal = 1;\r
332 PicoFrame();\r
492d353a 333\r
d2f29611 334 PicoOpt = po_old;\r
335 currentConfig.EmuOpt = eo_old;\r
336}\r
492d353a 337\r
d2f29611 338/* XXX: avoid busy wait somehow? */\r
339void plat_wait_till_us(unsigned int us_to)\r
340{\r
341 unsigned int now;\r
492d353a 342\r
d2f29611 343 spend_cycles(1024);\r
344 now = plat_get_ticks_us();\r
492d353a 345\r
d2f29611 346 while ((signed int)(us_to - now) > 512)\r
347 {\r
348 spend_cycles(1024);\r
349 now = plat_get_ticks_us();\r
492d353a 350 }\r
d2f29611 351}\r
492d353a 352\r
d2f29611 353void plat_video_wait_vsync(void)\r
354{\r
492d353a 355}\r
356\r
d2f29611 357const char *plat_get_credits(void)\r
358{\r
359 return "PicoDrive v" VERSION " (c) notaz, 2006-2009\n\n\n"\r
360 "Credits:\n"\r
361 "fDave: Cyclone 68000 core,\n"\r
362 " base code of PicoDrive\n"\r
363 "Reesy & FluBBa: DrZ80 core\n"\r
364 "MAME devs: YM2612 and SN76496 cores\n"\r
365 "rlyeh and others: minimal SDK\n"\r
366 "Squidge: mmuhack\n"\r
367 "Dzz: ARM940 sample\n"\r
368 "GnoStiC / Puck2099: USB joy code\n"\r
369 "craigix: GP2X hardware\n"\r
370 "ketchupgun: skin design\n"\r
371 "\n"\r
372 "special thanks (for docs, ideas):\n"\r
373 " Charles MacDonald, Haze,\n"\r
374 " Stephane Dallongeville,\n"\r
375 " Lordus, Exophase, Rokas,\n"\r
376 " Nemesis, Tasco Deluxe";\r
377}\r