emu.c 22 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885
  1. // (c) Copyright 2006-2009 notaz, All rights reserved.
  2. // Free for non-commercial use.
  3. // For commercial use, separate licencing terms must be obtained.
  4. #include <stdio.h>
  5. #include <stdlib.h>
  6. #include "plat_gp2x.h"
  7. #include "soc.h"
  8. #include "../common/plat.h"
  9. #include "../common/menu.h"
  10. #include "../common/arm_utils.h"
  11. #include "../common/fonts.h"
  12. #include "../common/emu.h"
  13. #include "../common/config.h"
  14. #include "../linux/sndout_oss.h"
  15. #include "version.h"
  16. #include <pico/pico_int.h>
  17. #include <pico/patch.h>
  18. #include <pico/sound/mix.h>
  19. #include <zlib/zlib.h>
  20. //#define PFRAMES
  21. #ifdef BENCHMARK
  22. #define OSD_FPS_X 220
  23. #else
  24. #define OSD_FPS_X 260
  25. #endif
  26. extern int crashed_940;
  27. static short __attribute__((aligned(4))) sndBuffer[2*(44100+100)/50];
  28. static unsigned char PicoDraw2FB_[(8+320) * (8+240+8)];
  29. unsigned char *PicoDraw2FB = PicoDraw2FB_;
  30. static int osd_fps_x, osd_y;
  31. extern void *gp2x_screens[4];
  32. int plat_get_root_dir(char *dst, int len)
  33. {
  34. extern char **g_argv;
  35. int j;
  36. strncpy(dst, g_argv[0], len);
  37. len -= 32; // reserve
  38. if (len < 0) len = 0;
  39. dst[len] = 0;
  40. for (j = strlen(dst); j > 0; j--)
  41. if (dst[j] == '/') { dst[j+1] = 0; break; }
  42. return j + 1;
  43. }
  44. static void scaling_update(void)
  45. {
  46. PicoOpt &= ~(POPT_DIS_32C_BORDER|POPT_EN_SOFTSCALE);
  47. switch (currentConfig.scaling) {
  48. default:break;
  49. case EOPT_SCALE_HW_H:
  50. case EOPT_SCALE_HW_HV:
  51. PicoOpt |= POPT_DIS_32C_BORDER;
  52. break;
  53. case EOPT_SCALE_SW_H:
  54. PicoOpt |= POPT_EN_SOFTSCALE;
  55. break;
  56. }
  57. }
  58. void pemu_prep_defconfig(void)
  59. {
  60. gp2x_soc_t soc;
  61. memset(&defaultConfig, 0, sizeof(defaultConfig));
  62. defaultConfig.EmuOpt = 0x9d | EOPT_RAM_TIMINGS|EOPT_CONFIRM_SAVE|EOPT_EN_CD_LEDS;
  63. defaultConfig.s_PicoOpt = 0x0f | POPT_EN_MCD_PCM|POPT_EN_MCD_CDDA|POPT_EN_SVP_DRC|POPT_ACC_SPRITES;
  64. defaultConfig.s_PsndRate = 44100;
  65. defaultConfig.s_PicoRegion = 0; // auto
  66. defaultConfig.s_PicoAutoRgnOrder = 0x184; // US, EU, JP
  67. defaultConfig.s_PicoCDBuffers = 0;
  68. defaultConfig.Frameskip = -1; // auto
  69. defaultConfig.CPUclock = default_cpu_clock;
  70. defaultConfig.volume = 50;
  71. defaultConfig.gamma = 100;
  72. defaultConfig.scaling = 0;
  73. defaultConfig.turbo_rate = 15;
  74. soc = soc_detect();
  75. if (soc == SOCID_MMSP2)
  76. defaultConfig.s_PicoOpt |= POPT_EXT_FM;
  77. else if (soc == SOCID_POLLUX)
  78. defaultConfig.EmuOpt |= EOPT_WIZ_TEAR_FIX|EOPT_SHOW_RTC;
  79. }
  80. static void (*osd_text)(int x, int y, const char *text);
  81. static void osd_text8(int x, int y, const char *text)
  82. {
  83. int len = strlen(text)*8;
  84. int *p, i, h, offs;
  85. len = (len+3) >> 2;
  86. for (h = 0; h < 8; h++) {
  87. offs = (x + g_screen_width * (y+h)) & ~3;
  88. p = (int *) ((char *)g_screen_ptr + offs);
  89. for (i = len; i; i--, p++)
  90. *p = 0xe0e0e0e0;
  91. }
  92. emu_text_out8(x, y, text);
  93. }
  94. static void osd_text16(int x, int y, const char *text)
  95. {
  96. int len = strlen(text)*8;
  97. int *p, i, h, offs;
  98. len = (len+1) >> 1;
  99. for (h = 0; h < 8; h++) {
  100. offs = (x + g_screen_width * (y+h)) & ~1;
  101. p = (int *) ((short *)g_screen_ptr + offs);
  102. for (i = len; i; i--, p++)
  103. *p = (*p >> 2) & 0x39e7;
  104. }
  105. emu_text_out16(x, y, text);
  106. }
  107. static void osd_text8_rot(int x, int y, const char *text)
  108. {
  109. int len = strlen(text) * 8;
  110. char *p = (char *)g_screen_ptr + 240*(320-x) + y;
  111. while (len--) {
  112. memset(p, 0xe0, 8);
  113. p -= 240;
  114. }
  115. emu_text_out8_rot(x, y, text);
  116. }
  117. static void osd_text16_rot(int x, int y, const char *text)
  118. {
  119. int len = strlen(text) * 8;
  120. short *p = (short *)g_screen_ptr + 240*(320-x) + y;
  121. while (len--) {
  122. memset(p, 0, 8*2);
  123. p -= 240;
  124. }
  125. emu_text_out16_rot(x, y, text);
  126. }
  127. static void draw_cd_leds(void)
  128. {
  129. int led_reg, pitch, scr_offs, led_offs;
  130. led_reg = Pico_mcd->s68k_regs[0];
  131. if (currentConfig.EmuOpt & EOPT_WIZ_TEAR_FIX) {
  132. pitch = 240;
  133. led_offs = -pitch * 6;
  134. scr_offs = pitch * (320 - 4);
  135. } else {
  136. pitch = 320;
  137. led_offs = 4;
  138. scr_offs = pitch * 2 + 4;
  139. }
  140. if ((PicoOpt & POPT_ALT_RENDERER) || !(currentConfig.EmuOpt & EOPT_16BPP)) {
  141. #define p(x) px[(x) >> 2]
  142. // 8-bit modes
  143. unsigned int *px = (unsigned int *)((char *)g_screen_ptr + scr_offs);
  144. unsigned int col_g = (led_reg & 2) ? 0xc0c0c0c0 : 0xe0e0e0e0;
  145. unsigned int col_r = (led_reg & 1) ? 0xd0d0d0d0 : 0xe0e0e0e0;
  146. p(pitch*0) = p(pitch*1) = p(pitch*2) = col_g;
  147. p(pitch*0 + led_offs) = p(pitch*1 + led_offs) = p(pitch*2 + led_offs) = col_r;
  148. #undef p
  149. } else {
  150. #define p(x) px[(x)*2 >> 2] = px[((x)*2 >> 2) + 1]
  151. // 16-bit modes
  152. unsigned int *px = (unsigned int *)((short *)g_screen_ptr + scr_offs);
  153. unsigned int col_g = (led_reg & 2) ? 0x06000600 : 0;
  154. unsigned int col_r = (led_reg & 1) ? 0xc000c000 : 0;
  155. p(pitch*0) = p(pitch*1) = p(pitch*2) = col_g;
  156. p(pitch*0 + led_offs) = p(pitch*1 + led_offs) = p(pitch*2 + led_offs) = col_r;
  157. #undef p
  158. }
  159. }
  160. static void draw_pico_ptr(void)
  161. {
  162. unsigned short *p = (unsigned short *)g_screen_ptr;
  163. int x, y, pitch = 320;
  164. // only if pen enabled and for 16bit modes
  165. if (pico_inp_mode == 0 || (PicoOpt & POPT_ALT_RENDERER) || !(currentConfig.EmuOpt & EOPT_16BPP))
  166. return;
  167. x = pico_pen_x + PICO_PEN_ADJUST_X;
  168. y = pico_pen_y + PICO_PEN_ADJUST_Y;
  169. if (!(Pico.video.reg[12]&1) && !(PicoOpt & POPT_DIS_32C_BORDER))
  170. x += 32;
  171. if (currentConfig.EmuOpt & EOPT_WIZ_TEAR_FIX) {
  172. pitch = 240;
  173. p += (319 - x) * pitch + y;
  174. } else
  175. p += x + y * pitch;
  176. p[0] ^= 0xffff;
  177. p[pitch-1] ^= 0xffff;
  178. p[pitch] ^= 0xffff;
  179. p[pitch+1] ^= 0xffff;
  180. p[pitch*2] ^= 0xffff;
  181. }
  182. static int EmuScanBegin16(unsigned int num)
  183. {
  184. DrawLineDest = (unsigned short *) g_screen_ptr + g_screen_width * num;
  185. return 0;
  186. }
  187. static int EmuScanBegin8(unsigned int num)
  188. {
  189. DrawLineDest = (unsigned char *) g_screen_ptr + g_screen_width * num;
  190. return 0;
  191. }
  192. /* rot thing for Wiz */
  193. static unsigned char __attribute__((aligned(4))) rot_buff[320*4*2];
  194. static int EmuScanBegin16_rot(unsigned int num)
  195. {
  196. DrawLineDest = rot_buff + (num & 3) * 320 * 2;
  197. return 0;
  198. }
  199. static int EmuScanEnd16_rot(unsigned int num)
  200. {
  201. if ((num & 3) != 3)
  202. return 0;
  203. rotated_blit16(g_screen_ptr, rot_buff, num + 1,
  204. !(Pico.video.reg[12] & 1) && !(PicoOpt & POPT_EN_SOFTSCALE));
  205. return 0;
  206. }
  207. static int EmuScanBegin8_rot(unsigned int num)
  208. {
  209. DrawLineDest = rot_buff + (num & 3) * 320;
  210. return 0;
  211. }
  212. static int EmuScanEnd8_rot(unsigned int num)
  213. {
  214. if ((num & 3) != 3)
  215. return 0;
  216. rotated_blit8(g_screen_ptr, rot_buff, num + 1,
  217. !(Pico.video.reg[12] & 1));
  218. return 0;
  219. }
  220. static int localPal[0x100];
  221. static void (*vidcpyM2)(void *dest, void *src, int m32col, int with_32c_border);
  222. static int (*make_local_pal)(int fast_mode);
  223. static int make_local_pal_md(int fast_mode)
  224. {
  225. int pallen = 0xc0;
  226. bgr444_to_rgb32(localPal, Pico.cram);
  227. if (fast_mode)
  228. return 0x40;
  229. if (Pico.video.reg[0xC] & 8) { // shadow/hilight mode
  230. bgr444_to_rgb32_sh(localPal, Pico.cram);
  231. localPal[0xc0] = 0x0000c000;
  232. localPal[0xd0] = 0x00c00000;
  233. localPal[0xe0] = 0x00000000; // reserved pixels for OSD
  234. localPal[0xf0] = 0x00ffffff;
  235. pallen = 0x100;
  236. }
  237. else if (rendstatus & PDRAW_SONIC_MODE) { // mid-frame palette changes
  238. bgr444_to_rgb32(localPal+0x40, HighPal);
  239. bgr444_to_rgb32(localPal+0x80, HighPal+0x40);
  240. }
  241. else
  242. memcpy32(localPal+0x80, localPal, 0x40); // for spr prio mess
  243. return pallen;
  244. }
  245. static int make_local_pal_sms(int fast_mode)
  246. {
  247. unsigned short *spal = Pico.cram;
  248. unsigned int *dpal = (void *)localPal;
  249. unsigned int i, t;
  250. for (i = 0x40; i > 0; i--) {
  251. t = *spal++;
  252. t = ((t & 0x0003) << 22) | ((t & 0x000c) << 12) | ((t & 0x0030) << 2);
  253. t |= t >> 2;
  254. t |= t >> 4;
  255. *dpal++ = t;
  256. }
  257. return 0x40;
  258. }
  259. void pemu_update_display(const char *fps, const char *notice)
  260. {
  261. int emu_opt = currentConfig.EmuOpt;
  262. int ret;
  263. if (PicoOpt & POPT_ALT_RENDERER)
  264. {
  265. // 8bit fast renderer
  266. if (Pico.m.dirtyPal) {
  267. Pico.m.dirtyPal = 0;
  268. ret = make_local_pal(1);
  269. // feed new palette to our device
  270. gp2x_video_setpalette(localPal, ret);
  271. }
  272. // a hack for VR
  273. if (PicoAHW & PAHW_SVP)
  274. memset32((int *)(PicoDraw2FB+328*8+328*223), 0xe0e0e0e0, 328);
  275. // do actual copy
  276. vidcpyM2(g_screen_ptr, PicoDraw2FB+328*8,
  277. !(Pico.video.reg[12] & 1), !(PicoOpt & POPT_DIS_32C_BORDER));
  278. }
  279. else if (!(emu_opt & EOPT_16BPP))
  280. {
  281. // 8bit accurate renderer
  282. if (Pico.m.dirtyPal)
  283. {
  284. Pico.m.dirtyPal = 0;
  285. ret = make_local_pal(0);
  286. gp2x_video_setpalette(localPal, ret);
  287. }
  288. }
  289. if (notice || (emu_opt & 2)) {
  290. if (notice)
  291. osd_text(4, osd_y, notice);
  292. if (emu_opt & 2)
  293. osd_text(osd_fps_x, osd_y, fps);
  294. }
  295. if ((emu_opt & 0x400) && (PicoAHW & PAHW_MCD))
  296. draw_cd_leds();
  297. if (PicoAHW & PAHW_PICO)
  298. draw_pico_ptr();
  299. gp2x_video_flip();
  300. }
  301. /* XXX */
  302. #ifdef __GP2X__
  303. unsigned int plat_get_ticks_ms(void)
  304. {
  305. return gp2x_get_ticks_ms();
  306. }
  307. unsigned int plat_get_ticks_us(void)
  308. {
  309. return gp2x_get_ticks_us();
  310. }
  311. #endif
  312. void plat_wait_till_us(unsigned int us_to)
  313. {
  314. unsigned int now;
  315. spend_cycles(1024);
  316. now = plat_get_ticks_us();
  317. while ((signed int)(us_to - now) > 512)
  318. {
  319. spend_cycles(1024);
  320. now = plat_get_ticks_us();
  321. }
  322. }
  323. void plat_video_wait_vsync(void)
  324. {
  325. gp2x_video_wait_vsync();
  326. }
  327. void plat_status_msg_clear(void)
  328. {
  329. int is_8bit = (PicoOpt & POPT_ALT_RENDERER) || !(currentConfig.EmuOpt & EOPT_16BPP);
  330. if (currentConfig.EmuOpt & EOPT_WIZ_TEAR_FIX) {
  331. /* ugh.. */
  332. int i, u, *p;
  333. if (is_8bit) {
  334. for (i = 0; i < 4; i++) {
  335. p = (int *)gp2x_screens[i] + (240-8) / 4;
  336. for (u = 320; u > 0; u--, p += 240/4)
  337. p[0] = p[1] = 0xe0e0e0e0;
  338. }
  339. } else {
  340. for (i = 0; i < 4; i++) {
  341. p = (int *)gp2x_screens[i] + (240-8)*2 / 4;
  342. for (u = 320; u > 0; u--, p += 240*2/4)
  343. p[0] = p[1] = p[2] = p[3] = 0;
  344. }
  345. }
  346. return;
  347. }
  348. if (is_8bit)
  349. gp2x_memset_all_buffers(320*232, 0xe0, 320*8);
  350. else
  351. gp2x_memset_all_buffers(320*232*2, 0, 320*8*2);
  352. }
  353. void plat_status_msg_busy_next(const char *msg)
  354. {
  355. plat_status_msg_clear();
  356. pemu_update_display("", msg);
  357. emu_status_msg("");
  358. /* assumption: msg_busy_next gets called only when
  359. * something slow is about to happen */
  360. reset_timing = 1;
  361. }
  362. void plat_status_msg_busy_first(const char *msg)
  363. {
  364. gp2x_memcpy_all_buffers(g_screen_ptr, 0, 320*240*2);
  365. plat_status_msg_busy_next(msg);
  366. }
  367. static void vidResetMode(void)
  368. {
  369. PicoScanEnd = NULL;
  370. if (PicoOpt & POPT_ALT_RENDERER) {
  371. if (currentConfig.EmuOpt & EOPT_WIZ_TEAR_FIX) {
  372. gp2x_video_changemode(-8);
  373. vidcpyM2 = vidcpy_m2_rot;
  374. osd_text = osd_text8_rot;
  375. } else {
  376. gp2x_video_changemode(8);
  377. vidcpyM2 = vidcpy_m2;
  378. osd_text = osd_text8;
  379. }
  380. }
  381. else if (currentConfig.EmuOpt & EOPT_16BPP) {
  382. PicoDrawSetColorFormat(1);
  383. if (currentConfig.EmuOpt & EOPT_WIZ_TEAR_FIX) {
  384. gp2x_video_changemode(-16);
  385. PicoScanBegin = EmuScanBegin16_rot;
  386. PicoScanEnd = EmuScanEnd16_rot;
  387. osd_text = osd_text16_rot;
  388. } else {
  389. gp2x_video_changemode(16);
  390. PicoScanBegin = EmuScanBegin16;
  391. osd_text = osd_text16;
  392. }
  393. }
  394. else {
  395. PicoDrawSetColorFormat(2);
  396. if (currentConfig.EmuOpt & EOPT_WIZ_TEAR_FIX) {
  397. gp2x_video_changemode(-8);
  398. PicoScanBegin = EmuScanBegin8_rot;
  399. PicoScanEnd = EmuScanEnd8_rot;
  400. osd_text = osd_text8_rot;
  401. } else {
  402. gp2x_video_changemode(8);
  403. PicoScanBegin = EmuScanBegin8;
  404. osd_text = osd_text8;
  405. }
  406. }
  407. if ((PicoOpt & POPT_ALT_RENDERER) || !(currentConfig.EmuOpt & EOPT_16BPP)) {
  408. // setup pal for 8-bit modes
  409. localPal[0xc0] = 0x0000c000; // MCD LEDs
  410. localPal[0xd0] = 0x00c00000;
  411. localPal[0xe0] = 0x00000000; // reserved pixels for OSD
  412. localPal[0xf0] = 0x00ffffff;
  413. gp2x_video_setpalette(localPal, 0x100);
  414. gp2x_memset_all_buffers(0, 0xe0, 320*240);
  415. gp2x_video_flip();
  416. }
  417. Pico.m.dirtyPal = 1;
  418. // reset scaling
  419. if (currentConfig.scaling == EOPT_SCALE_HW_HV && !(Pico.video.reg[1]&8))
  420. gp2x_video_RGB_setscaling(8, (PicoOpt&0x100)&&!(Pico.video.reg[12]&1) ? 256 : 320, 224);
  421. else gp2x_video_RGB_setscaling(0, (PicoOpt&0x100)&&!(Pico.video.reg[12]&1) ? 256 : 320, 240);
  422. // palette converters for 8bit modes
  423. make_local_pal = (PicoAHW & PAHW_SMS) ? make_local_pal_sms : make_local_pal_md;
  424. }
  425. void plat_video_toggle_renderer(int is_next, int is_menu)
  426. {
  427. /* alt, 16bpp, 8bpp */
  428. if (PicoOpt & POPT_ALT_RENDERER) {
  429. PicoOpt &= ~POPT_ALT_RENDERER;
  430. if (is_next)
  431. currentConfig.EmuOpt |= EOPT_16BPP;
  432. } else if (!(currentConfig.EmuOpt & EOPT_16BPP)) {
  433. if (is_next)
  434. PicoOpt |= POPT_ALT_RENDERER;
  435. else
  436. currentConfig.EmuOpt |= EOPT_16BPP;
  437. } else {
  438. currentConfig.EmuOpt &= ~EOPT_16BPP;
  439. if (!is_next)
  440. PicoOpt |= POPT_ALT_RENDERER;
  441. }
  442. if (is_menu)
  443. return;
  444. vidResetMode();
  445. rendstatus_old = -1;
  446. if (PicoOpt & POPT_ALT_RENDERER) {
  447. emu_status_msg(" 8bit fast renderer");
  448. } else if (currentConfig.EmuOpt & EOPT_16BPP) {
  449. emu_status_msg("16bit accurate renderer");
  450. } else {
  451. emu_status_msg(" 8bit accurate renderer");
  452. }
  453. }
  454. #if 0 // TODO
  455. static void RunEventsPico(unsigned int events)
  456. {
  457. int ret, px, py, lim_x;
  458. static int pdown_frames = 0;
  459. // for F200
  460. ret = gp2x_touchpad_read(&px, &py);
  461. if (ret >= 0)
  462. {
  463. if (ret > 35000)
  464. {
  465. if (pdown_frames++ > 5)
  466. PicoPad[0] |= 0x20;
  467. pico_pen_x = px;
  468. pico_pen_y = py;
  469. if (!(Pico.video.reg[12]&1)) {
  470. pico_pen_x -= 32;
  471. if (pico_pen_x < 0) pico_pen_x = 0;
  472. if (pico_pen_x > 248) pico_pen_x = 248;
  473. }
  474. if (pico_pen_y > 224) pico_pen_y = 224;
  475. }
  476. else
  477. pdown_frames = 0;
  478. //if (ret == 0)
  479. // PicoPicohw.pen_pos[0] = PicoPicohw.pen_pos[1] = 0x8000;
  480. }
  481. }
  482. #endif
  483. void plat_update_volume(int has_changed, int is_up)
  484. {
  485. static int prev_frame = 0, wait_frames = 0;
  486. int vol = currentConfig.volume;
  487. int need_low_volume = 0;
  488. gp2x_soc_t soc;
  489. soc = soc_detect();
  490. if ((PicoOpt & POPT_EN_STEREO) && soc == SOCID_MMSP2)
  491. need_low_volume = 1;
  492. if (has_changed)
  493. {
  494. if (need_low_volume && vol < 5 && prev_frame == Pico.m.frame_count - 1 && wait_frames < 12)
  495. wait_frames++;
  496. else {
  497. if (is_up) {
  498. if (vol < 99) vol++;
  499. } else {
  500. if (vol > 0) vol--;
  501. }
  502. wait_frames = 0;
  503. sndout_oss_setvol(vol, vol);
  504. currentConfig.volume = vol;
  505. }
  506. emu_status_msg("VOL: %02i", vol);
  507. prev_frame = Pico.m.frame_count;
  508. }
  509. if (!need_low_volume)
  510. return;
  511. /* set the right mixer func */
  512. if (vol >= 5)
  513. PsndMix_32_to_16l = mix_32_to_16l_stereo;
  514. else {
  515. mix_32_to_16l_level = 5 - vol;
  516. PsndMix_32_to_16l = mix_32_to_16l_stereo_lvl;
  517. }
  518. }
  519. static void updateSound(int len)
  520. {
  521. len <<= 1;
  522. if (PicoOpt & POPT_EN_STEREO)
  523. len <<= 1;
  524. if ((currentConfig.EmuOpt & EOPT_NO_FRMLIMIT) && !sndout_oss_can_write(len))
  525. return;
  526. /* avoid writing audio when lagging behind to prevent audio lag */
  527. if (PicoSkipFrame != 2)
  528. sndout_oss_write(PsndOut, len);
  529. }
  530. void pemu_sound_start(void)
  531. {
  532. static int PsndRate_old = 0, PicoOpt_old = 0, pal_old = 0;
  533. PsndOut = NULL;
  534. // prepare sound stuff
  535. if (currentConfig.EmuOpt & EOPT_EN_SOUND)
  536. {
  537. int is_stereo = (PicoOpt & POPT_EN_STEREO) ? 1 : 0;
  538. int target_fps = Pico.m.pal ? 50 : 60;
  539. int frame_samples, snd_excess_add;
  540. int snd_rate_oss = PsndRate;
  541. gp2x_soc_t soc;
  542. soc = soc_detect();
  543. if (soc == SOCID_POLLUX) {
  544. /* POLLUX pain: DPLL1 / mclk_div / bitclk_div / 4 */
  545. switch (PsndRate) {
  546. case 44100: PsndRate = 44171; break; // 44170.673077
  547. case 22050: PsndRate = 22086; break; // 22085.336538
  548. case 11025: PsndRate = 11043; break; // 11042.668269
  549. default: break;
  550. }
  551. }
  552. #define SOUND_RERATE_FLAGS (POPT_EN_FM|POPT_EN_PSG|POPT_EN_STEREO|POPT_EXT_FM|POPT_EN_MCD_CDDA)
  553. if (PsndRate != PsndRate_old || Pico.m.pal != pal_old || ((PicoOpt & POPT_EXT_FM) && crashed_940) ||
  554. ((PicoOpt ^ PicoOpt_old) & SOUND_RERATE_FLAGS)) {
  555. PsndRerate(Pico.m.frame_count ? 1 : 0);
  556. }
  557. memset(sndBuffer, 0, sizeof(sndBuffer));
  558. PsndOut = sndBuffer;
  559. PicoWriteSound = updateSound;
  560. PsndRate_old = PsndRate;
  561. PicoOpt_old = PicoOpt;
  562. pal_old = Pico.m.pal;
  563. plat_update_volume(0, 0);
  564. frame_samples = PsndLen;
  565. snd_excess_add = ((PsndRate - PsndLen * target_fps)<<16) / target_fps;
  566. if (snd_excess_add != 0)
  567. frame_samples++;
  568. if (soc == SOCID_POLLUX)
  569. frame_samples *= 2; /* force larger buffer */
  570. printf("starting audio: %i len: %i (ex: %04x) stereo: %i, pal: %i\n",
  571. PsndRate, PsndLen, snd_excess_add, is_stereo, Pico.m.pal);
  572. sndout_oss_setvol(currentConfig.volume, currentConfig.volume);
  573. sndout_oss_start(snd_rate_oss, frame_samples, is_stereo);
  574. /* Wiz's sound hardware needs more prebuffer */
  575. if (soc == SOCID_POLLUX)
  576. updateSound(frame_samples);
  577. }
  578. }
  579. void pemu_sound_stop(void)
  580. {
  581. /* get back from Wiz pain */
  582. switch (PsndRate) {
  583. case 44171: PsndRate = 44100; break;
  584. case 22086: PsndRate = 22050; break;
  585. case 11043: PsndRate = 11025; break;
  586. default: break;
  587. }
  588. }
  589. void pemu_sound_wait(void)
  590. {
  591. // don't need to do anything, writes will block by themselves
  592. }
  593. void pemu_forced_frame(int opts)
  594. {
  595. int po_old = PicoOpt;
  596. int eo_old = currentConfig.EmuOpt;
  597. PicoOpt &= ~POPT_ALT_RENDERER;
  598. PicoOpt |= opts|POPT_ACC_SPRITES;
  599. currentConfig.EmuOpt |= EOPT_16BPP;
  600. PicoDrawSetColorFormat(1);
  601. PicoScanBegin = EmuScanBegin16;
  602. PicoScanEnd = NULL;
  603. Pico.m.dirtyPal = 1;
  604. PicoFrameDrawOnly();
  605. PicoOpt = po_old;
  606. currentConfig.EmuOpt = eo_old;
  607. }
  608. void plat_debug_cat(char *str)
  609. {
  610. }
  611. void emu_video_mode_change(int start_line, int line_count, int is_32cols)
  612. {
  613. int scalex = 320;
  614. osd_fps_x = OSD_FPS_X;
  615. osd_y = 232;
  616. if (is_32cols && (PicoOpt & POPT_DIS_32C_BORDER)) {
  617. scalex = 256;
  618. osd_fps_x = OSD_FPS_X - 64;
  619. }
  620. /* want vertical scaling and game is not in 240 line mode */
  621. if (currentConfig.scaling == EOPT_SCALE_HW_HV) {
  622. gp2x_video_RGB_setscaling(start_line, scalex, line_count);
  623. osd_y = start_line + line_count - 8;
  624. } else
  625. gp2x_video_RGB_setscaling(0, scalex, 240);
  626. // clear whole screen in all buffers
  627. if ((PicoOpt & POPT_ALT_RENDERER) || !(currentConfig.EmuOpt & EOPT_16BPP))
  628. gp2x_memset_all_buffers(0, 0xe0, 320*240);
  629. else
  630. gp2x_memset_all_buffers(0, 0, 320*240*2);
  631. }
  632. #if 0
  633. static void tga_dump(void)
  634. {
  635. #define BYTE unsigned char
  636. #define WORD unsigned short
  637. struct
  638. {
  639. BYTE IDLength; /* 00h Size of Image ID field */
  640. BYTE ColorMapType; /* 01h Color map type */
  641. BYTE ImageType; /* 02h Image type code */
  642. WORD CMapStart; /* 03h Color map origin */
  643. WORD CMapLength; /* 05h Color map length */
  644. BYTE CMapDepth; /* 07h Depth of color map entries */
  645. WORD XOffset; /* 08h X origin of image */
  646. WORD YOffset; /* 0Ah Y origin of image */
  647. WORD Width; /* 0Ch Width of image */
  648. WORD Height; /* 0Eh Height of image */
  649. BYTE PixelDepth; /* 10h Image pixel size */
  650. BYTE ImageDescriptor; /* 11h Image descriptor byte */
  651. } __attribute__((packed)) TGAHEAD;
  652. static unsigned short oldscr[320*240];
  653. FILE *f; char name[128]; int i;
  654. memset(&TGAHEAD, 0, sizeof(TGAHEAD));
  655. TGAHEAD.ImageType = 2;
  656. TGAHEAD.Width = 320;
  657. TGAHEAD.Height = 240;
  658. TGAHEAD.PixelDepth = 16;
  659. TGAHEAD.ImageDescriptor = 2<<4; // image starts at top-left
  660. #define CONV(X) (((X>>1)&0x7fe0)|(X&0x1f)) // 555?
  661. for (i = 0; i < 320*240; i++)
  662. if(oldscr[i] != CONV(((unsigned short *)g_screen_ptr)[i])) break;
  663. if (i < 320*240)
  664. {
  665. for (i = 0; i < 320*240; i++)
  666. oldscr[i] = CONV(((unsigned short *)g_screen_ptr)[i]);
  667. sprintf(name, "%05i.tga", Pico.m.frame_count);
  668. f = fopen(name, "wb");
  669. if (!f) { printf("!f\n"); exit(1); }
  670. fwrite(&TGAHEAD, 1, sizeof(TGAHEAD), f);
  671. fwrite(oldscr, 1, 320*240*2, f);
  672. fclose(f);
  673. }
  674. }
  675. #endif
  676. void pemu_loop_prep(void)
  677. {
  678. static int gp2x_old_clock = -1, EmuOpt_old = 0, pal_old = 0;
  679. static int gp2x_old_gamma = 100;
  680. gp2x_soc_t soc;
  681. soc = soc_detect();
  682. if ((EmuOpt_old ^ currentConfig.EmuOpt) & EOPT_RAM_TIMINGS) {
  683. if (currentConfig.EmuOpt & EOPT_RAM_TIMINGS)
  684. set_ram_timings();
  685. else
  686. unset_ram_timings();
  687. }
  688. if (gp2x_old_clock < 0)
  689. gp2x_old_clock = default_cpu_clock;
  690. if (gp2x_old_clock != currentConfig.CPUclock) {
  691. printf("changing clock to %i...", currentConfig.CPUclock); fflush(stdout);
  692. gp2x_set_cpuclk(currentConfig.CPUclock);
  693. gp2x_old_clock = currentConfig.CPUclock;
  694. printf(" done\n");
  695. }
  696. if (gp2x_old_gamma != currentConfig.gamma || ((EmuOpt_old ^ currentConfig.EmuOpt) & EOPT_A_SN_GAMMA)) {
  697. set_lcd_gamma(currentConfig.gamma, !!(currentConfig.EmuOpt & EOPT_A_SN_GAMMA));
  698. gp2x_old_gamma = currentConfig.gamma;
  699. printf("updated gamma to %i, A_SN's curve: %i\n", currentConfig.gamma, !!(currentConfig.EmuOpt&0x1000));
  700. }
  701. if (((EmuOpt_old ^ currentConfig.EmuOpt) & EOPT_VSYNC) || Pico.m.pal != pal_old) {
  702. if ((currentConfig.EmuOpt & EOPT_VSYNC) || soc == SOCID_POLLUX)
  703. set_lcd_custom_rate(Pico.m.pal);
  704. else if (EmuOpt_old & EOPT_VSYNC)
  705. unset_lcd_custom_rate();
  706. }
  707. if ((EmuOpt_old ^ currentConfig.EmuOpt) & EOPT_MMUHACK)
  708. gp2x_make_fb_bufferable(currentConfig.EmuOpt & EOPT_MMUHACK);
  709. EmuOpt_old = currentConfig.EmuOpt;
  710. pal_old = Pico.m.pal;
  711. // make sure we are in correct mode
  712. vidResetMode();
  713. scaling_update();
  714. pemu_sound_start();
  715. }
  716. void pemu_loop_end(void)
  717. {
  718. int po_old = PicoOpt;
  719. int eo_old = currentConfig.EmuOpt;
  720. pemu_sound_stop();
  721. memset32(g_screen_ptr, 0, 320*240*2/4);
  722. /* do one more frame for menu bg */
  723. PicoOpt &= ~POPT_ALT_RENDERER;
  724. PicoOpt |= POPT_EN_SOFTSCALE|POPT_ACC_SPRITES;
  725. currentConfig.EmuOpt |= EOPT_16BPP;
  726. PicoScanBegin = EmuScanBegin16;
  727. PicoScanEnd = NULL;
  728. PicoDrawSetColorFormat(1);
  729. Pico.m.dirtyPal = 1;
  730. PicoFrame();
  731. PicoOpt = po_old;
  732. currentConfig.EmuOpt = eo_old;
  733. }
  734. const char *plat_get_credits(void)
  735. {
  736. return "PicoDrive v" VERSION " (c) notaz, 2006-2009\n\n\n"
  737. "Credits:\n"
  738. "fDave: Cyclone 68000 core,\n"
  739. " base code of PicoDrive\n"
  740. "Reesy & FluBBa: DrZ80 core\n"
  741. "MAME devs: YM2612 and SN76496 cores\n"
  742. "rlyeh and others: minimal SDK\n"
  743. "Squidge: mmuhack\n"
  744. "Dzz: ARM940 sample\n"
  745. "GnoStiC / Puck2099: USB joy code\n"
  746. "craigix: GP2X hardware\n"
  747. "ketchupgun: skin design\n"
  748. "\n"
  749. "special thanks (for docs, ideas):\n"
  750. " Charles MacDonald, Haze,\n"
  751. " Stephane Dallongeville,\n"
  752. " Lordus, Exophase, Rokas,\n"
  753. " Nemesis, Tasco Deluxe";
  754. }