notaz.gp2x.de / picodrive.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
ff bugfix
[picodrive.git] / platform / common / emu.c
CommitLineData
bcc9eda0 1// (c) Copyright 2006-2009 notaz, All rights reserved.\r
ea8c405f 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
7#include <stdlib.h>\r
b24e0f6c 8#include <stdarg.h>\r
ea8c405f 9#ifndef NO_SYNC\r
10#include <unistd.h>\r
11#endif\r
12\r
13#include "emu.h"\r
14#include "menu.h"\r
15#include "fonts.h"\r
16#include "lprintf.h"\r
58c86d00 17#include "config.h"\r
713c9224 18#include "plat.h"\r
d34a42f9 19#include "input.h"\r
f2cf8472 20#include "posix.h"\r
ea8c405f 21\r
efcba75f 22#include <pico/pico_int.h>\r
23#include <pico/patch.h>\r
24#include <pico/cd/cue.h>\r
ea8c405f 25\r
ea8c405f 26\r
54646a39 27#define STATUS_MSG_TIMEOUT 2000\r
28\r
e2de9939 29void *g_screen_ptr;\r
30\r
31#if !SCREEN_SIZE_FIXED\r
32int g_screen_width = SCREEN_WIDTH;\r
33int g_screen_height = SCREEN_HEIGHT;\r
34#endif\r
35\r
c46ffd31 36char *PicoConfigFile = "config.cfg";\r
58c86d00 37currentConfig_t currentConfig, defaultConfig;\r
ea8c405f 38int state_slot = 0;\r
39int config_slot = 0, config_slot_current = 0;\r
f2cf8472 40int pico_pen_x = 320/2, pico_pen_y = 240/2;\r
c060a9ab 41int pico_inp_mode = 0;\r
713c9224 42int engineState = PGS_Menu;\r
43\r
44/* TODO: len checking */\r
45char rom_fname_reload[512] = { 0, };\r
46char rom_fname_loaded[512] = { 0, };\r
47int rom_loaded = 0;\r
f2cf8472 48int reset_timing = 0;\r
b24e0f6c 49static unsigned int notice_msg_time; /* when started showing */\r
50static char noticeMsg[40];\r
ea8c405f 51\r
52unsigned char *movie_data = NULL;\r
53static int movie_size = 0;\r
54\r
ea8c405f 55\r
ee2a3bdf 56/* don't use tolower() for easy old glibc binary compatibility */\r
f8af9634 57static void strlwr_(char *string)\r
ea8c405f 58{\r
f8af9634 59 char *p;\r
60 for (p = string; *p; p++)\r
ee2a3bdf 61 if ('A' <= *p && *p <= 'Z')\r
62 *p += 'a' - 'A';\r
ea8c405f 63}\r
64\r
ca482e5d 65static int try_rfn_cut(char *fname)\r
ea8c405f 66{\r
67 FILE *tmp;\r
68 char *p;\r
69\r
ca482e5d 70 p = fname + strlen(fname) - 1;\r
71 for (; p > fname; p--)\r
ea8c405f 72 if (*p == '.') break;\r
73 *p = 0;\r
74\r
ca482e5d 75 if((tmp = fopen(fname, "rb"))) {\r
ea8c405f 76 fclose(tmp);\r
77 return 1;\r
78 }\r
79 return 0;\r
80}\r
81\r
35e3031a 82static void get_ext(const char *file, char *ext)\r
ea8c405f 83{\r
35e3031a 84 const char *p;\r
ea8c405f 85\r
86 p = file + strlen(file) - 4;\r
87 if (p < file) p = file;\r
88 strncpy(ext, p, 4);\r
89 ext[4] = 0;\r
90 strlwr_(ext);\r
91}\r
92\r
b24e0f6c 93void emu_status_msg(const char *format, ...)\r
94{\r
95 va_list vl;\r
54646a39 96 int ret;\r
b24e0f6c 97\r
98 va_start(vl, format);\r
54646a39 99 ret = vsnprintf(noticeMsg, sizeof(noticeMsg), format, vl);\r
b24e0f6c 100 va_end(vl);\r
101\r
54646a39 102 /* be sure old text gets overwritten */\r
103 for (; ret < 28; ret++)\r
104 noticeMsg[ret] = ' ';\r
105 noticeMsg[ret] = 0;\r
106\r
b24e0f6c 107 notice_msg_time = plat_get_ticks_ms();\r
108}\r
109\r
54646a39 110static const char * const biosfiles_us[] = { "us_scd1_9210", "us_scd2_9306", "SegaCDBIOS9303" };\r
111static const char * const biosfiles_eu[] = { "eu_mcd1_9210", "eu_mcd2_9306", "eu_mcd2_9303" };\r
112static const char * const biosfiles_jp[] = { "jp_mcd1_9112", "jp_mcd1_9111" };\r
ea8c405f 113\r
a47dd663 114static int find_bios(int region, char **bios_file)\r
ea8c405f 115{\r
116 static char bios_path[1024];\r
117 int i, count;\r
54646a39 118 const char * const *files;\r
ea8c405f 119 FILE *f = NULL;\r
120\r
121 if (region == 4) { // US\r
122 files = biosfiles_us;\r
123 count = sizeof(biosfiles_us) / sizeof(char *);\r
124 } else if (region == 8) { // EU\r
125 files = biosfiles_eu;\r
126 count = sizeof(biosfiles_eu) / sizeof(char *);\r
127 } else if (region == 1 || region == 2) {\r
128 files = biosfiles_jp;\r
129 count = sizeof(biosfiles_jp) / sizeof(char *);\r
130 } else {\r
131 return 0;\r
132 }\r
133\r
134 for (i = 0; i < count; i++)\r
135 {\r
27701801 136 emu_make_path(bios_path, files[i], sizeof(bios_path) - 4);\r
ea8c405f 137 strcat(bios_path, ".bin");\r
138 f = fopen(bios_path, "rb");\r
139 if (f) break;\r
140\r
141 bios_path[strlen(bios_path) - 4] = 0;\r
142 strcat(bios_path, ".zip");\r
143 f = fopen(bios_path, "rb");\r
144 if (f) break;\r
145 }\r
146\r
147 if (f) {\r
148 lprintf("using bios: %s\n", bios_path);\r
149 fclose(f);\r
150 if (bios_file) *bios_file = bios_path;\r
151 return 1;\r
152 } else {\r
c6c6c9cd 153 sprintf(bios_path, "no %s BIOS files found, read docs",\r
ea8c405f 154 region != 4 ? (region == 8 ? "EU" : "JAP") : "USA");\r
c6c6c9cd 155 me_update_msg(bios_path);\r
ea8c405f 156 return 0;\r
157 }\r
158}\r
159\r
c6196c0f 160/* check if the name begins with BIOS name */\r
1ca2ea4f 161/*\r
c6196c0f 162static int emu_isBios(const char *name)\r
163{\r
164 int i;\r
165 for (i = 0; i < sizeof(biosfiles_us)/sizeof(biosfiles_us[0]); i++)\r
166 if (strstr(name, biosfiles_us[i]) != NULL) return 1;\r
167 for (i = 0; i < sizeof(biosfiles_eu)/sizeof(biosfiles_eu[0]); i++)\r
168 if (strstr(name, biosfiles_eu[i]) != NULL) return 1;\r
169 for (i = 0; i < sizeof(biosfiles_jp)/sizeof(biosfiles_jp[0]); i++)\r
170 if (strstr(name, biosfiles_jp[i]) != NULL) return 1;\r
171 return 0;\r
172}\r
1ca2ea4f 173*/\r
c6196c0f 174\r
1ca2ea4f 175static unsigned char id_header[0x100];\r
58c86d00 176\r
ca482e5d 177/* checks if fname points to valid MegaCD image\r
ea8c405f 178 * if so, checks for suitable BIOS */\r
35e3031a 179static int emu_cd_check(int *pregion, const char *fname_in)\r
ea8c405f 180{\r
35e3031a 181 const char *fname = fname_in;\r
ea8c405f 182 unsigned char buf[32];\r
183 pm_file *cd_f;\r
9037e45d 184 int region = 4; // 1: Japan, 4: US, 8: Europe\r
35e3031a 185 char ext[5];\r
9037e45d 186 cue_track_type type = CT_UNKNOWN;\r
187 cue_data_t *cue_data = NULL;\r
b923ecbe 188\r
ca482e5d 189 get_ext(fname_in, ext);\r
9037e45d 190 if (strcasecmp(ext, ".cue") == 0) {\r
ca482e5d 191 cue_data = cue_parse(fname_in);\r
9037e45d 192 if (cue_data != NULL) {\r
193 fname = cue_data->tracks[1].fname;\r
194 type = cue_data->tracks[1].type;\r
195 }\r
f9f40f10 196 else\r
197 return -1;\r
9037e45d 198 }\r
199\r
200 cd_f = pm_open(fname);\r
201 if (cue_data != NULL)\r
202 cue_destroy(cue_data);\r
ea8c405f 203\r
f9f40f10 204 if (cd_f == NULL) return 0; // let the upper level handle this\r
ea8c405f 205\r
206 if (pm_read(buf, 32, cd_f) != 32) {\r
207 pm_close(cd_f);\r
f9f40f10 208 return -1;\r
ea8c405f 209 }\r
210\r
9037e45d 211 if (!strncasecmp("SEGADISCSYSTEM", (char *)buf+0x00, 14)) {\r
212 if (type && type != CT_ISO)\r
213 elprintf(EL_STATUS, ".cue has wrong type: %i", type);\r
214 type = CT_ISO; // Sega CD (ISO)\r
215 }\r
216 if (!strncasecmp("SEGADISCSYSTEM", (char *)buf+0x10, 14)) {\r
217 if (type && type != CT_BIN)\r
218 elprintf(EL_STATUS, ".cue has wrong type: %i", type);\r
219 type = CT_BIN; // Sega CD (BIN)\r
220 }\r
221\r
222 if (type == CT_UNKNOWN) {\r
ea8c405f 223 pm_close(cd_f);\r
224 return 0;\r
225 }\r
226\r
9037e45d 227 pm_seek(cd_f, (type == CT_ISO) ? 0x100 : 0x110, SEEK_SET);\r
1ca2ea4f 228 pm_read(id_header, sizeof(id_header), cd_f);\r
58c86d00 229\r
ea8c405f 230 /* it seems we have a CD image here. Try to detect region now.. */\r
9037e45d 231 pm_seek(cd_f, (type == CT_ISO) ? 0x100+0x10B : 0x110+0x10B, SEEK_SET);\r
ea8c405f 232 pm_read(buf, 1, cd_f);\r
233 pm_close(cd_f);\r
234\r
235 if (buf[0] == 0x64) region = 8; // EU\r
236 if (buf[0] == 0xa1) region = 1; // JAP\r
237\r
238 lprintf("detected %s Sega/Mega CD image with %s region\n",\r
9037e45d 239 type == CT_BIN ? "BIN" : "ISO", region != 4 ? (region == 8 ? "EU" : "JAP") : "USA");\r
ea8c405f 240\r
241 if (pregion != NULL) *pregion = region;\r
242\r
243 return type;\r
244}\r
245\r
7a87643e 246static int extract_text(char *dest, const unsigned char *src, int len, int swab)\r
58c86d00 247{\r
248 char *p = dest;\r
249 int i;\r
250\r
251 if (swab) swab = 1;\r
252\r
253 for (i = len - 1; i >= 0; i--)\r
254 {\r
255 if (src[i^swab] != ' ') break;\r
256 }\r
257 len = i + 1;\r
258\r
259 for (i = 0; i < len; i++)\r
260 {\r
261 unsigned char s = src[i^swab];\r
262 if (s >= 0x20 && s < 0x7f && s != '#' && s != '|' &&\r
263 s != '[' && s != ']' && s != '\\')\r
264 {\r
265 *p++ = s;\r
266 }\r
267 else\r
268 {\r
269 sprintf(p, "\\%02x", s);\r
270 p += 3;\r
271 }\r
272 }\r
273\r
274 return p - dest;\r
275}\r
276\r
a47dd663 277static char *emu_make_rom_id(void)\r
58c86d00 278{\r
ca482e5d 279 static char id_string[3+0xe*3+0x3*3+0x30*3+3];\r
bdec53c9 280 int pos, swab = 1;\r
58c86d00 281\r
602133e1 282 if (PicoAHW & PAHW_MCD) {\r
bdec53c9 283 strcpy(id_string, "CD|");\r
284 swab = 0;\r
285 }\r
1ca2ea4f 286 else strcpy(id_string, "MD|");\r
58c86d00 287 pos = 3;\r
288\r
bdec53c9 289 pos += extract_text(id_string + pos, id_header + 0x80, 0x0e, swab); // serial\r
58c86d00 290 id_string[pos] = '|'; pos++;\r
bdec53c9 291 pos += extract_text(id_string + pos, id_header + 0xf0, 0x03, swab); // region\r
58c86d00 292 id_string[pos] = '|'; pos++;\r
bdec53c9 293 pos += extract_text(id_string + pos, id_header + 0x50, 0x30, swab); // overseas name\r
58c86d00 294 id_string[pos] = 0;\r
295\r
58c86d00 296 return id_string;\r
297}\r
298\r
ca482e5d 299// buffer must be at least 150 byte long\r
a47dd663 300void emu_get_game_name(char *str150)\r
ca482e5d 301{\r
302 int ret, swab = (PicoAHW & PAHW_MCD) ? 0 : 1;\r
303 char *s, *d;\r
304\r
305 ret = extract_text(str150, id_header + 0x50, 0x30, swab); // overseas name\r
306\r
307 for (s = d = str150 + 1; s < str150+ret; s++)\r
308 {\r
309 if (*s == 0) break;\r
310 if (*s != ' ' || d[-1] != ' ')\r
311 *d++ = *s;\r
312 }\r
313 *d = 0;\r
314}\r
315\r
a47dd663 316static void shutdown_MCD(void)\r
317{\r
318 if ((PicoAHW & PAHW_MCD) && Pico_mcd != NULL)\r
319 Stop_CD();\r
320 PicoAHW &= ~PAHW_MCD;\r
321}\r
322\r
ca482e5d 323// note: this function might mangle rom_fname\r
a47dd663 324int emu_reload_rom(char *rom_fname)\r
ea8c405f 325{\r
326 unsigned int rom_size = 0;\r
ca482e5d 327 char *used_rom_name = rom_fname;\r
eacee137 328 unsigned char *rom_data = NULL;\r
ea8c405f 329 char ext[5];\r
f9f40f10 330 pm_file *rom = NULL;\r
ea8c405f 331 int ret, cd_state, cd_region, cfg_loaded = 0;\r
332\r
ca482e5d 333 lprintf("emu_ReloadRom(%s)\n", rom_fname);\r
ea8c405f 334\r
ca482e5d 335 get_ext(rom_fname, ext);\r
ea8c405f 336\r
337 // detect wrong extensions\r
eacee137 338 if (!strcmp(ext, ".srm") || !strcmp(ext, "s.gz") || !strcmp(ext, ".mds")) { // s.gz ~ .mds.gz\r
c6c6c9cd 339 me_update_msg("Not a ROM/CD selected.");\r
ea8c405f 340 return 0;\r
341 }\r
342\r
343 PicoPatchUnload();\r
344\r
345 // check for movie file\r
eacee137 346 if (movie_data) {\r
ea8c405f 347 free(movie_data);\r
348 movie_data = 0;\r
349 }\r
2d2247c2 350 if (!strcmp(ext, ".gmv"))\r
351 {\r
ea8c405f 352 // check for both gmv and rom\r
353 int dummy;\r
ca482e5d 354 FILE *movie_file = fopen(rom_fname, "rb");\r
ea8c405f 355 if(!movie_file) {\r
c6c6c9cd 356 me_update_msg("Failed to open movie.");\r
ea8c405f 357 return 0;\r
358 }\r
359 fseek(movie_file, 0, SEEK_END);\r
360 movie_size = ftell(movie_file);\r
361 fseek(movie_file, 0, SEEK_SET);\r
362 if(movie_size < 64+3) {\r
c6c6c9cd 363 me_update_msg("Invalid GMV file.");\r
ea8c405f 364 fclose(movie_file);\r
365 return 0;\r
366 }\r
367 movie_data = malloc(movie_size);\r
368 if(movie_data == NULL) {\r
c6c6c9cd 369 me_update_msg("low memory.");\r
ea8c405f 370 fclose(movie_file);\r
371 return 0;\r
372 }\r
373 fread(movie_data, 1, movie_size, movie_file);\r
374 fclose(movie_file);\r
375 if (strncmp((char *)movie_data, "Gens Movie TEST", 15) != 0) {\r
c6c6c9cd 376 me_update_msg("Invalid GMV file.");\r
ea8c405f 377 return 0;\r
378 }\r
ca482e5d 379 dummy = try_rfn_cut(rom_fname) || try_rfn_cut(rom_fname);\r
ea8c405f 380 if (!dummy) {\r
c6c6c9cd 381 me_update_msg("Could't find a ROM for movie.");\r
ea8c405f 382 return 0;\r
383 }\r
ca482e5d 384 get_ext(rom_fname, ext);\r
f8af9634 385 lprintf("gmv loaded for %s\n", rom_fname);\r
ea8c405f 386 }\r
ca482e5d 387 else if (!strcmp(ext, ".pat"))\r
388 {\r
ea8c405f 389 int dummy;\r
ca482e5d 390 PicoPatchLoad(rom_fname);\r
391 dummy = try_rfn_cut(rom_fname) || try_rfn_cut(rom_fname);\r
ea8c405f 392 if (!dummy) {\r
c6c6c9cd 393 me_update_msg("Could't find a ROM to patch.");\r
ea8c405f 394 return 0;\r
395 }\r
ca482e5d 396 get_ext(rom_fname, ext);\r
ea8c405f 397 }\r
398\r
a47dd663 399 shutdown_MCD();\r
ea8c405f 400\r
401 // check for MegaCD image\r
a47dd663 402 cd_state = emu_cd_check(&cd_region, rom_fname);\r
f9f40f10 403 if (cd_state >= 0 && cd_state != CIT_NOT_CD)\r
ea8c405f 404 {\r
602133e1 405 PicoAHW |= PAHW_MCD;\r
ea8c405f 406 // valid CD image, check for BIOS..\r
407\r
408 // we need to have config loaded at this point\r
490eb480 409 ret = emu_read_config(1, 0);\r
410 if (!ret) emu_read_config(0, 0);\r
ea8c405f 411 cfg_loaded = 1;\r
412\r
413 if (PicoRegionOverride) {\r
414 cd_region = PicoRegionOverride;\r
415 lprintf("overrided region to %s\n", cd_region != 4 ? (cd_region == 8 ? "EU" : "JAP") : "USA");\r
416 }\r
a47dd663 417 if (!find_bios(cd_region, &used_rom_name)) {\r
602133e1 418 PicoAHW &= ~PAHW_MCD;\r
ea8c405f 419 return 0;\r
420 }\r
421\r
ea8c405f 422 get_ext(used_rom_name, ext);\r
423 }\r
424 else\r
425 {\r
602133e1 426 if (PicoAHW & PAHW_MCD) Stop_CD();\r
427 PicoAHW &= ~PAHW_MCD;\r
ea8c405f 428 }\r
429\r
430 rom = pm_open(used_rom_name);\r
eacee137 431 if (!rom) {\r
c6c6c9cd 432 me_update_msg("Failed to open ROM/CD image");\r
f9f40f10 433 goto fail;\r
434 }\r
435\r
436 if (cd_state < 0) {\r
c6c6c9cd 437 me_update_msg("Invalid CD image");\r
f9f40f10 438 goto fail;\r
ea8c405f 439 }\r
440\r
4b167c12 441 menu_romload_prepare(used_rom_name); // also CD load\r
ea8c405f 442\r
eacee137 443 PicoCartUnload();\r
444 rom_loaded = 0;\r
ea8c405f 445\r
eacee137 446 if ( (ret = PicoCartLoad(rom, &rom_data, &rom_size)) ) {\r
c6c6c9cd 447 if (ret == 2) me_update_msg("Out of memory");\r
448 else if (ret == 3) me_update_msg("Read failed");\r
449 else me_update_msg("PicoCartLoad() failed.");\r
f9f40f10 450 goto fail2;\r
ea8c405f 451 }\r
452 pm_close(rom);\r
f9f40f10 453 rom = NULL;\r
ea8c405f 454\r
455 // detect wrong files (Pico crashes on very small files), also see if ROM EP is good\r
eacee137 456 if (rom_size <= 0x200 || strncmp((char *)rom_data, "Pico", 4) == 0 ||\r
ea8c405f 457 ((*(unsigned char *)(rom_data+4)<<16)|(*(unsigned short *)(rom_data+6))) >= (int)rom_size) {\r
458 if (rom_data) free(rom_data);\r
c6c6c9cd 459 me_update_msg("Not a ROM selected.");\r
f9f40f10 460 goto fail2;\r
ea8c405f 461 }\r
462\r
463 // load config for this ROM (do this before insert to get correct region)\r
602133e1 464 if (!(PicoAHW & PAHW_MCD))\r
1ca2ea4f 465 memcpy(id_header, rom_data + 0x100, sizeof(id_header));\r
ea8c405f 466 if (!cfg_loaded) {\r
490eb480 467 ret = emu_read_config(1, 0);\r
468 if (!ret) emu_read_config(0, 0);\r
ea8c405f 469 }\r
470\r
471 lprintf("PicoCartInsert(%p, %d);\n", rom_data, rom_size);\r
eacee137 472 if (PicoCartInsert(rom_data, rom_size)) {\r
c6c6c9cd 473 me_update_msg("Failed to load ROM.");\r
f9f40f10 474 goto fail2;\r
ea8c405f 475 }\r
476\r
ea8c405f 477 // insert CD if it was detected\r
b923ecbe 478 if (cd_state != CIT_NOT_CD) {\r
ca482e5d 479 ret = Insert_CD(rom_fname, cd_state);\r
ea8c405f 480 if (ret != 0) {\r
c6c6c9cd 481 me_update_msg("Insert_CD() failed, invalid CD image?");\r
f9f40f10 482 goto fail2;\r
ea8c405f 483 }\r
484 }\r
485\r
4b167c12 486 menu_romload_end();\r
487\r
ea8c405f 488 if (PicoPatches) {\r
489 PicoPatchPrepare();\r
490 PicoPatchApply();\r
491 }\r
492\r
493 // additional movie stuff\r
f9f40f10 494 if (movie_data)\r
495 {\r
496 if (movie_data[0x14] == '6')\r
602133e1 497 PicoOpt |= POPT_6BTN_PAD; // 6 button pad\r
498 else PicoOpt &= ~POPT_6BTN_PAD;\r
2aa27095 499 PicoOpt |= POPT_DIS_VDP_FIFO; // no VDP fifo timing\r
f9f40f10 500 if (movie_data[0xF] >= 'A') {\r
501 if (movie_data[0x16] & 0x80) {\r
ea8c405f 502 PicoRegionOverride = 8;\r
503 } else {\r
504 PicoRegionOverride = 4;\r
505 }\r
1cb1584b 506 PicoReset();\r
ea8c405f 507 // TODO: bits 6 & 5\r
508 }\r
509 movie_data[0x18+30] = 0;\r
b24e0f6c 510 emu_status_msg("MOVIE: %s", (char *) &movie_data[0x18]);\r
ea8c405f 511 }\r
512 else\r
513 {\r
602133e1 514 PicoOpt &= ~POPT_DIS_VDP_FIFO;\r
b24e0f6c 515 emu_status_msg(Pico.m.pal ? "PAL SYSTEM / 50 FPS" : "NTSC SYSTEM / 60 FPS");\r
ea8c405f 516 }\r
ea8c405f 517\r
bcc9eda0 518 strncpy(rom_fname_loaded, rom_fname, sizeof(rom_fname_loaded)-1);\r
519 rom_fname_loaded[sizeof(rom_fname_loaded)-1] = 0;\r
520 rom_loaded = 1;\r
521\r
ea8c405f 522 // load SRAM for this ROM\r
a47dd663 523 if (currentConfig.EmuOpt & EOPT_EN_SRAM)\r
524 emu_save_load_game(1, 1);\r
ea8c405f 525\r
526 return 1;\r
f9f40f10 527\r
528fail2:\r
529 menu_romload_end();\r
530fail:\r
531 if (rom != NULL) pm_close(rom);\r
532 return 0;\r
ea8c405f 533}\r
534\r
35e3031a 535int emu_swap_cd(const char *fname)\r
536{\r
537 cd_img_type cd_type;\r
538 int ret = -1;\r
539\r
540 cd_type = emu_cd_check(NULL, fname);\r
541 if (cd_type != CIT_NOT_CD)\r
542 ret = Insert_CD(fname, cd_type);\r
543 if (ret != 0) {\r
544 me_update_msg("Load failed, invalid CD image?");\r
545 return 0;\r
546 }\r
547\r
548 strncpy(rom_fname_loaded, fname, sizeof(rom_fname_loaded)-1);\r
549 rom_fname_loaded[sizeof(rom_fname_loaded)-1] = 0;\r
550 return 1;\r
551}\r
552\r
ea8c405f 553static void romfname_ext(char *dst, const char *prefix, const char *ext)\r
554{\r
555 char *p;\r
556 int prefix_len = 0;\r
557\r
558 // make save filename\r
713c9224 559 p = rom_fname_loaded + strlen(rom_fname_loaded) - 1;\r
560 for (; p >= rom_fname_loaded && *p != PATH_SEP_C; p--); p++;\r
ea8c405f 561 *dst = 0;\r
562 if (prefix) {\r
f2cf8472 563 int len = plat_get_root_dir(dst, 512);\r
ca482e5d 564 strcpy(dst + len, prefix);\r
565 prefix_len = len + strlen(prefix);\r
ea8c405f 566 }\r
ca482e5d 567#ifdef UIQ3\r
713c9224 568 else p = rom_fname_loaded; // backward compatibility\r
ca482e5d 569#endif\r
ea8c405f 570 strncpy(dst + prefix_len, p, 511-prefix_len);\r
571 dst[511-8] = 0;\r
572 if (dst[strlen(dst)-4] == '.') dst[strlen(dst)-4] = 0;\r
573 if (ext) strcat(dst, ext);\r
574}\r
575\r
27701801 576void emu_make_path(char *buff, const char *end, int size)\r
08fe8094 577{\r
27701801 578 int pos, end_len;\r
579\r
580 end_len = strlen(end);\r
581 pos = plat_get_root_dir(buff, size);\r
582 strncpy(buff + pos, end, size - pos);\r
583 buff[size - 1] = 0;\r
584 if (pos + end_len > size - 1)\r
585 lprintf("Warning: path truncated: %s\n", buff);\r
586}\r
587\r
588static void make_config_cfg(char *cfg_buff_512)\r
589{\r
590 emu_make_path(cfg_buff_512, PicoConfigFile, 512-6);\r
08fe8094 591 if (config_slot != 0)\r
592 {\r
27701801 593 char *p = strrchr(cfg_buff_512, '.');\r
594 if (p == NULL)\r
595 p = cfg_buff_512 + strlen(cfg_buff_512);\r
08fe8094 596 sprintf(p, ".%i.cfg", config_slot);\r
597 }\r
27701801 598 cfg_buff_512[511] = 0;\r
08fe8094 599}\r
600\r
d90f5bd7 601void emu_set_defconfig(void)\r
ca482e5d 602{\r
a47dd663 603 memcpy(&currentConfig, &defaultConfig, sizeof(currentConfig));\r
ca482e5d 604 PicoOpt = currentConfig.s_PicoOpt;\r
605 PsndRate = currentConfig.s_PsndRate;\r
606 PicoRegionOverride = currentConfig.s_PicoRegion;\r
607 PicoAutoRgnOrder = currentConfig.s_PicoAutoRgnOrder;\r
608 PicoCDBuffers = currentConfig.s_PicoCDBuffers;\r
609}\r
610\r
a47dd663 611int emu_read_config(int game, int no_defaults)\r
ea8c405f 612{\r
58c86d00 613 char cfg[512];\r
58c86d00 614 int ret;\r
ea8c405f 615\r
490eb480 616 if (!no_defaults)\r
617 emu_set_defconfig();\r
618\r
ea8c405f 619 if (!game)\r
620 {\r
08fe8094 621 make_config_cfg(cfg);\r
58c86d00 622 ret = config_readsect(cfg, NULL);\r
ea8c405f 623 }\r
58c86d00 624 else\r
625 {\r
a47dd663 626 char *sect = emu_make_rom_id();\r
ea8c405f 627\r
58c86d00 628 // try new .cfg way\r
629 if (config_slot != 0)\r
630 sprintf(cfg, "game.%i.cfg", config_slot);\r
631 else strcpy(cfg, "game.cfg");\r
1ca2ea4f 632\r
633 ret = -1;\r
08fe8094 634 if (config_havesect(cfg, sect))\r
635 {\r
636 // read user's config\r
7b802576 637 int vol = currentConfig.volume;\r
d90f5bd7 638 emu_set_defconfig();\r
1ca2ea4f 639 ret = config_readsect(cfg, sect);\r
7b802576 640 currentConfig.volume = vol; // make vol global (bah)\r
1ca2ea4f 641 }\r
a39b7867 642 else\r
08fe8094 643 {\r
644 // read global config, and apply game_def.cfg on top\r
645 make_config_cfg(cfg);\r
646 config_readsect(cfg, NULL);\r
d8afe7b8 647 emu_make_path(cfg, "game_def.cfg", sizeof(cfg));\r
648 ret = config_readsect(cfg, sect);\r
08fe8094 649 }\r
58c86d00 650\r
ca482e5d 651 if (ret == 0)\r
58c86d00 652 {\r
1ca2ea4f 653 lprintf("loaded cfg from sect \"%s\"\n", sect);\r
58c86d00 654 }\r
ea8c405f 655 }\r
58c86d00 656\r
ee2a3bdf 657 plat_validate_config();\r
658\r
ea8c405f 659 // some sanity checks\r
2445b7cb 660#ifdef PSP\r
ee2a3bdf 661 /* TODO: mv to plat_validate_config() */\r
662 if (currentConfig.CPUclock < 10 || currentConfig.CPUclock > 4096) currentConfig.CPUclock = 200;\r
2445b7cb 663 if (currentConfig.gamma < -4 || currentConfig.gamma > 16) currentConfig.gamma = 0;\r
6fc57144 664 if (currentConfig.gamma2 < 0 || currentConfig.gamma2 > 2) currentConfig.gamma2 = 0;\r
2445b7cb 665#endif\r
ee2a3bdf 666 if (currentConfig.volume < 0 || currentConfig.volume > 99)\r
667 currentConfig.volume = 50;\r
668\r
669 if (ret == 0)\r
670 config_slot_current = config_slot;\r
991473ad 671\r
58c86d00 672 return (ret == 0);\r
ea8c405f 673}\r
674\r
675\r
a47dd663 676int emu_write_config(int is_game)\r
ea8c405f 677{\r
58c86d00 678 char cfg[512], *game_sect = NULL;\r
679 int ret, write_lrom = 0;\r
ea8c405f 680\r
58c86d00 681 if (!is_game)\r
ea8c405f 682 {\r
ca482e5d 683 make_config_cfg(cfg);\r
58c86d00 684 write_lrom = 1;\r
ea8c405f 685 } else {\r
686 if (config_slot != 0)\r
58c86d00 687 sprintf(cfg, "game.%i.cfg", config_slot);\r
688 else strcpy(cfg, "game.cfg");\r
a47dd663 689 game_sect = emu_make_rom_id();\r
690 lprintf("emu_write_config: sect \"%s\"\n", game_sect);\r
ea8c405f 691 }\r
692\r
a47dd663 693 lprintf("emu_write_config: %s ", cfg);\r
58c86d00 694 ret = config_writesect(cfg, game_sect);\r
1ca2ea4f 695 if (write_lrom) config_writelrom(cfg);\r
ea8c405f 696#ifndef NO_SYNC\r
58c86d00 697 sync();\r
ea8c405f 698#endif\r
58c86d00 699 lprintf((ret == 0) ? "(ok)\n" : "(failed)\n");\r
ea8c405f 700\r
58c86d00 701 if (ret == 0) config_slot_current = config_slot;\r
702 return ret == 0;\r
ea8c405f 703}\r
704\r
705\r
e2de9939 706/* always using built-in font */\r
707\r
cc41eb4f 708#define mk_text_out(name, type, val, topleft, step_x, step_y) \\r
e2de9939 709void name(int x, int y, const char *text) \\r
710{ \\r
711 int i, l, len = strlen(text); \\r
cc41eb4f 712 type *screen = (type *)(topleft) + x * step_x + y * step_y; \\r
e2de9939 713 \\r
cc41eb4f 714 for (i = 0; i < len; i++, screen += 8 * step_x) \\r
e2de9939 715 { \\r
716 for (l = 0; l < 8; l++) \\r
717 { \\r
718 unsigned char fd = fontdata8x8[text[i] * 8 + l];\\r
cc41eb4f 719 type *s = screen + l * step_y; \\r
720 if (fd&0x80) s[step_x * 0] = val; \\r
721 if (fd&0x40) s[step_x * 1] = val; \\r
722 if (fd&0x20) s[step_x * 2] = val; \\r
723 if (fd&0x10) s[step_x * 3] = val; \\r
724 if (fd&0x08) s[step_x * 4] = val; \\r
725 if (fd&0x04) s[step_x * 5] = val; \\r
726 if (fd&0x02) s[step_x * 6] = val; \\r
727 if (fd&0x01) s[step_x * 7] = val; \\r
e2de9939 728 } \\r
729 } \\r
ea8c405f 730}\r
731\r
cc41eb4f 732mk_text_out(emu_text_out8, unsigned char, 0xf0, g_screen_ptr, 1, g_screen_width)\r
733mk_text_out(emu_text_out16, unsigned short, 0xffff, g_screen_ptr, 1, g_screen_width)\r
734mk_text_out(emu_text_out8_rot, unsigned char, 0xf0,\r
735 (char *)g_screen_ptr + (g_screen_width - 1) * g_screen_height, -g_screen_height, 1)\r
736mk_text_out(emu_text_out16_rot, unsigned short, 0xffff,\r
737 (short *)g_screen_ptr + (g_screen_width - 1) * g_screen_height, -g_screen_height, 1)\r
ea8c405f 738\r
e2de9939 739#undef mk_text_out\r
ea8c405f 740\r
741\r
d34a42f9 742void update_movie(void)\r
ea8c405f 743{\r
744 int offs = Pico.m.frame_count*3 + 0x40;\r
745 if (offs+3 > movie_size) {\r
746 free(movie_data);\r
747 movie_data = 0;\r
b24e0f6c 748 emu_status_msg("END OF MOVIE.");\r
ea8c405f 749 lprintf("END OF MOVIE.\n");\r
ea8c405f 750 } else {\r
751 // MXYZ SACB RLDU\r
752 PicoPad[0] = ~movie_data[offs] & 0x8f; // ! SCBA RLDU\r
f8af9634 753 if(!(movie_data[offs] & 0x10)) PicoPad[0] |= 0x40; // C\r
754 if(!(movie_data[offs] & 0x20)) PicoPad[0] |= 0x10; // A\r
755 if(!(movie_data[offs] & 0x40)) PicoPad[0] |= 0x20; // B\r
ea8c405f 756 PicoPad[1] = ~movie_data[offs+1] & 0x8f; // ! SCBA RLDU\r
f8af9634 757 if(!(movie_data[offs+1] & 0x10)) PicoPad[1] |= 0x40; // C\r
758 if(!(movie_data[offs+1] & 0x20)) PicoPad[1] |= 0x10; // A\r
759 if(!(movie_data[offs+1] & 0x40)) PicoPad[1] |= 0x20; // B\r
ea8c405f 760 PicoPad[0] |= (~movie_data[offs+2] & 0x0A) << 8; // ! MZYX\r
761 if(!(movie_data[offs+2] & 0x01)) PicoPad[0] |= 0x0400; // X\r
762 if(!(movie_data[offs+2] & 0x04)) PicoPad[0] |= 0x0100; // Z\r
763 PicoPad[1] |= (~movie_data[offs+2] & 0xA0) << 4; // ! MZYX\r
764 if(!(movie_data[offs+2] & 0x10)) PicoPad[1] |= 0x0400; // X\r
765 if(!(movie_data[offs+2] & 0x40)) PicoPad[1] |= 0x0100; // Z\r
766 }\r
767}\r
768\r
ea8c405f 769static int try_ropen_file(const char *fname)\r
770{\r
771 FILE *f;\r
772\r
773 f = fopen(fname, "rb");\r
774 if (f) {\r
775 fclose(f);\r
776 return 1;\r
777 }\r
778 return 0;\r
779}\r
780\r
a47dd663 781char *emu_get_save_fname(int load, int is_sram, int slot)\r
ea8c405f 782{\r
783 static char saveFname[512];\r
784 char ext[16];\r
785\r
786 if (is_sram)\r
787 {\r
d687ef50 788 romfname_ext(saveFname, (PicoAHW & PAHW_MCD) ? "brm"PATH_SEP : "srm"PATH_SEP,\r
789 (PicoAHW & PAHW_MCD) ? ".brm" : ".srm");\r
ea8c405f 790 if (load) {\r
791 if (try_ropen_file(saveFname)) return saveFname;\r
792 // try in current dir..\r
602133e1 793 romfname_ext(saveFname, NULL, (PicoAHW & PAHW_MCD) ? ".brm" : ".srm");\r
ea8c405f 794 if (try_ropen_file(saveFname)) return saveFname;\r
795 return NULL; // give up\r
796 }\r
797 }\r
798 else\r
799 {\r
800 ext[0] = 0;\r
801 if(slot > 0 && slot < 10) sprintf(ext, ".%i", slot);\r
ca482e5d 802 strcat(ext, (currentConfig.EmuOpt & EOPT_GZIP_SAVES) ? ".mds.gz" : ".mds");\r
ea8c405f 803\r
ca482e5d 804 romfname_ext(saveFname, "mds" PATH_SEP, ext);\r
ea8c405f 805 if (load) {\r
806 if (try_ropen_file(saveFname)) return saveFname;\r
807 romfname_ext(saveFname, NULL, ext);\r
808 if (try_ropen_file(saveFname)) return saveFname;\r
ca482e5d 809 // no gzipped states, search for non-gzipped\r
810 if (currentConfig.EmuOpt & EOPT_GZIP_SAVES)\r
811 {\r
ea8c405f 812 ext[0] = 0;\r
813 if(slot > 0 && slot < 10) sprintf(ext, ".%i", slot);\r
814 strcat(ext, ".mds");\r
815\r
ca482e5d 816 romfname_ext(saveFname, "mds"PATH_SEP, ext);\r
ea8c405f 817 if (try_ropen_file(saveFname)) return saveFname;\r
818 romfname_ext(saveFname, NULL, ext);\r
819 if (try_ropen_file(saveFname)) return saveFname;\r
820 }\r
821 return NULL;\r
822 }\r
823 }\r
824\r
825 return saveFname;\r
826}\r
827\r
a47dd663 828int emu_check_save_file(int slot)\r
ea8c405f 829{\r
a47dd663 830 return emu_get_save_fname(1, 0, slot) ? 1 : 0;\r
ea8c405f 831}\r
832\r
a47dd663 833int emu_save_load_game(int load, int sram)\r
ea8c405f 834{\r
835 int ret = 0;\r
836 char *saveFname;\r
837\r
838 // make save filename\r
a47dd663 839 saveFname = emu_get_save_fname(load, sram, state_slot);\r
ea8c405f 840 if (saveFname == NULL) {\r
d34a42f9 841 if (!sram)\r
b24e0f6c 842 emu_status_msg(load ? "LOAD FAILED (missing file)" : "SAVE FAILED");\r
ea8c405f 843 return -1;\r
844 }\r
845\r
846 lprintf("saveLoad (%i, %i): %s\n", load, sram, saveFname);\r
847\r
da42200b 848 if (sram)\r
849 {\r
ea8c405f 850 FILE *sramFile;\r
851 int sram_size;\r
852 unsigned char *sram_data;\r
853 int truncate = 1;\r
602133e1 854 if (PicoAHW & PAHW_MCD)\r
855 {\r
856 if (PicoOpt&POPT_EN_MCD_RAMCART) {\r
ea8c405f 857 sram_size = 0x12000;\r
858 sram_data = SRam.data;\r
859 if (sram_data)\r
860 memcpy32((int *)sram_data, (int *)Pico_mcd->bram, 0x2000/4);\r
861 } else {\r
862 sram_size = 0x2000;\r
863 sram_data = Pico_mcd->bram;\r
864 truncate = 0; // the .brm may contain RAM cart data after normal brm\r
865 }\r
866 } else {\r
867 sram_size = SRam.end-SRam.start+1;\r
868 if(Pico.m.sram_reg & 4) sram_size=0x2000;\r
869 sram_data = SRam.data;\r
870 }\r
871 if (!sram_data) return 0; // SRam forcefully disabled for this game\r
872\r
602133e1 873 if (load)\r
874 {\r
ea8c405f 875 sramFile = fopen(saveFname, "rb");\r
876 if(!sramFile) return -1;\r
877 fread(sram_data, 1, sram_size, sramFile);\r
878 fclose(sramFile);\r
602133e1 879 if ((PicoAHW & PAHW_MCD) && (PicoOpt&POPT_EN_MCD_RAMCART))\r
ea8c405f 880 memcpy32((int *)Pico_mcd->bram, (int *)sram_data, 0x2000/4);\r
881 } else {\r
882 // sram save needs some special processing\r
883 // see if we have anything to save\r
884 for (; sram_size > 0; sram_size--)\r
885 if (sram_data[sram_size-1]) break;\r
886\r
887 if (sram_size) {\r
888 sramFile = fopen(saveFname, truncate ? "wb" : "r+b");\r
889 if (!sramFile) sramFile = fopen(saveFname, "wb"); // retry\r
890 if (!sramFile) return -1;\r
891 ret = fwrite(sram_data, 1, sram_size, sramFile);\r
892 ret = (ret != sram_size) ? -1 : 0;\r
893 fclose(sramFile);\r
894#ifndef NO_SYNC\r
895 sync();\r
896#endif\r
897 }\r
898 }\r
899 return ret;\r
900 }\r
901 else\r
902 {\r
bcc9eda0 903 ret = PicoState(saveFname, !load);\r
904 if (!ret) {\r
ea8c405f 905#ifndef NO_SYNC\r
bcc9eda0 906 if (!load) sync();\r
ea8c405f 907#endif\r
54646a39 908 emu_status_msg(load ? "STATE LOADED" : "STATE SAVED");\r
bcc9eda0 909 } else {\r
b24e0f6c 910 emu_status_msg(load ? "LOAD FAILED" : "SAVE FAILED");\r
ea8c405f 911 ret = -1;\r
912 }\r
913\r
ea8c405f 914 return ret;\r
915 }\r
916}\r
bdec53c9 917\r
a47dd663 918void emu_set_fastforward(int set_on)\r
c060a9ab 919{\r
920 static void *set_PsndOut = NULL;\r
921 static int set_Frameskip, set_EmuOpt, is_on = 0;\r
922\r
923 if (set_on && !is_on) {\r
924 set_PsndOut = PsndOut;\r
925 set_Frameskip = currentConfig.Frameskip;\r
926 set_EmuOpt = currentConfig.EmuOpt;\r
927 PsndOut = NULL;\r
928 currentConfig.Frameskip = 8;\r
929 currentConfig.EmuOpt &= ~4;\r
930 currentConfig.EmuOpt |= 0x40000;\r
931 is_on = 1;\r
b24e0f6c 932 emu_status_msg("FAST FORWARD");\r
c060a9ab 933 }\r
934 else if (!set_on && is_on) {\r
935 PsndOut = set_PsndOut;\r
936 currentConfig.Frameskip = set_Frameskip;\r
937 currentConfig.EmuOpt = set_EmuOpt;\r
938 PsndRerate(1);\r
939 is_on = 0;\r
940 }\r
941}\r
942\r
d687ef50 943static void emu_tray_open(void)\r
c060a9ab 944{\r
d687ef50 945 engineState = PGS_TrayMenu;\r
946}\r
947\r
948static void emu_tray_close(void)\r
949{\r
950 emu_status_msg("CD tray closed.");\r
f2cf8472 951}\r
952\r
953void emu_reset_game(void)\r
954{\r
955 PicoReset();\r
956 reset_timing = 1;\r
957}\r
958\r
959void run_events_pico(unsigned int events)\r
960{\r
961 int lim_x;\r
962\r
963 if (events & PEV_PICO_SWINP) {\r
c060a9ab 964 pico_inp_mode++;\r
d34a42f9 965 if (pico_inp_mode > 2)\r
966 pico_inp_mode = 0;\r
c060a9ab 967 switch (pico_inp_mode) {\r
b24e0f6c 968 case 2: emu_status_msg("Input: Pen on Pad"); break;\r
969 case 1: emu_status_msg("Input: Pen on Storyware"); break;\r
970 case 0: emu_status_msg("Input: Joystick");\r
c060a9ab 971 PicoPicohw.pen_pos[0] = PicoPicohw.pen_pos[1] = 0x8000;\r
972 break;\r
973 }\r
c060a9ab 974 }\r
f2cf8472 975 if (events & PEV_PICO_PPREV) {\r
c060a9ab 976 PicoPicohw.page--;\r
d34a42f9 977 if (PicoPicohw.page < 0)\r
978 PicoPicohw.page = 0;\r
b24e0f6c 979 emu_status_msg("Page %i", PicoPicohw.page);\r
c060a9ab 980 }\r
f2cf8472 981 if (events & PEV_PICO_PNEXT) {\r
c060a9ab 982 PicoPicohw.page++;\r
d34a42f9 983 if (PicoPicohw.page > 6)\r
984 PicoPicohw.page = 6;\r
b24e0f6c 985 emu_status_msg("Page %i", PicoPicohw.page);\r
c060a9ab 986 }\r
f2cf8472 987\r
988 if (pico_inp_mode == 0)\r
989 return;\r
990\r
991 /* handle other input modes */\r
992 if (PicoPad[0] & 1) pico_pen_y--;\r
993 if (PicoPad[0] & 2) pico_pen_y++;\r
994 if (PicoPad[0] & 4) pico_pen_x--;\r
995 if (PicoPad[0] & 8) pico_pen_x++;\r
996 PicoPad[0] &= ~0x0f; // release UDLR\r
997\r
998 lim_x = (Pico.video.reg[12]&1) ? 319 : 255;\r
999 if (pico_pen_y < 8)\r
1000 pico_pen_y = 8;\r
1001 if (pico_pen_y > 224 - PICO_PEN_ADJUST_Y)\r
1002 pico_pen_y = 224 - PICO_PEN_ADJUST_Y;\r
1003 if (pico_pen_x < 0)\r
1004 pico_pen_x = 0;\r
1005 if (pico_pen_x > lim_x - PICO_PEN_ADJUST_X)\r
1006 pico_pen_x = lim_x - PICO_PEN_ADJUST_X;\r
1007\r
1008 PicoPicohw.pen_pos[0] = pico_pen_x;\r
1009 if (!(Pico.video.reg[12] & 1))\r
1010 PicoPicohw.pen_pos[0] += pico_pen_x / 4;\r
1011 PicoPicohw.pen_pos[0] += 0x3c;\r
1012 PicoPicohw.pen_pos[1] = pico_inp_mode == 1 ? (0x2f8 + pico_pen_y) : (0x1fc + pico_pen_y);\r
c060a9ab 1013}\r
1014\r
d34a42f9 1015static void do_turbo(int *pad, int acts)\r
f0f0d2df 1016{\r
1017 static int turbo_pad = 0;\r
1018 static unsigned char turbo_cnt[3] = { 0, 0, 0 };\r
1019 int inc = currentConfig.turbo_rate * 2;\r
1020\r
1021 if (acts & 0x1000) {\r
1022 turbo_cnt[0] += inc;\r
1023 if (turbo_cnt[0] >= 60)\r
1024 turbo_pad ^= 0x10, turbo_cnt[0] = 0;\r
1025 }\r
1026 if (acts & 0x2000) {\r
1027 turbo_cnt[1] += inc;\r
1028 if (turbo_cnt[1] >= 60)\r
1029 turbo_pad ^= 0x20, turbo_cnt[1] = 0;\r
1030 }\r
1031 if (acts & 0x4000) {\r
1032 turbo_cnt[2] += inc;\r
1033 if (turbo_cnt[2] >= 60)\r
1034 turbo_pad ^= 0x40, turbo_cnt[2] = 0;\r
1035 }\r
1036 *pad |= turbo_pad & (acts >> 8);\r
1037}\r
c060a9ab 1038\r
f2cf8472 1039static void run_events_ui(unsigned int which)\r
d34a42f9 1040{\r
1041 if (which & (PEV_STATE_LOAD|PEV_STATE_SAVE))\r
1042 {\r
1043 int do_it = 1;\r
a47dd663 1044 if ( emu_check_save_file(state_slot) &&\r
d34a42f9 1045 (((which & PEV_STATE_LOAD) && (currentConfig.EmuOpt & EOPT_CONFIRM_LOAD)) ||\r
1046 ((which & PEV_STATE_SAVE) && (currentConfig.EmuOpt & EOPT_CONFIRM_SAVE))) )\r
1047 {\r
1048 const char *nm;\r
1049 char tmp[64];\r
1050 int keys, len;\r
1051\r
1052 strcpy(tmp, (which & PEV_STATE_LOAD) ? "LOAD STATE?" : "OVERWRITE SAVE?");\r
1053 len = strlen(tmp);\r
1054 nm = in_get_key_name(-1, -PBTN_MA3);\r
1055 snprintf(tmp + len, sizeof(tmp) - len, "(%s=yes, ", nm);\r
1056 len = strlen(tmp);\r
1057 nm = in_get_key_name(-1, -PBTN_MBACK);\r
1058 snprintf(tmp + len, sizeof(tmp) - len, "%s=no)", nm);\r
1059\r
1060 plat_status_msg_busy_first(tmp);\r
1061\r
1062 in_set_blocking(1);\r
1063 while (in_menu_wait_any(50) & (PBTN_MA3|PBTN_MBACK))\r
1064 ;\r
1065 while ( !((keys = in_menu_wait_any(50)) & (PBTN_MA3|PBTN_MBACK)) )\r
1066 ;\r
1067 if (keys & PBTN_MBACK)\r
1068 do_it = 0;\r
1069 while (in_menu_wait_any(50) & (PBTN_MA3|PBTN_MBACK))\r
1070 ;\r
1071 in_set_blocking(0);\r
1072 }\r
1073 if (do_it) {\r
54646a39 1074 plat_status_msg_busy_first((which & PEV_STATE_LOAD) ? "LOADING STATE" : "SAVING STATE");\r
d34a42f9 1075 PicoStateProgressCB = plat_status_msg_busy_next;\r
a47dd663 1076 emu_save_load_game((which & PEV_STATE_LOAD) ? 1 : 0, 0);\r
d34a42f9 1077 PicoStateProgressCB = NULL;\r
1078 }\r
1079 }\r
1080 if (which & PEV_SWITCH_RND)\r
1081 {\r
d90f5bd7 1082 plat_video_toggle_renderer(1, 0);\r
d34a42f9 1083 }\r
1084 if (which & (PEV_SSLOT_PREV|PEV_SSLOT_NEXT))\r
1085 {\r
1086 if (which & PEV_SSLOT_PREV) {\r
1087 state_slot -= 1;\r
1088 if (state_slot < 0)\r
1089 state_slot = 9;\r
1090 } else {\r
1091 state_slot += 1;\r
1092 if (state_slot > 9)\r
1093 state_slot = 0;\r
1094 }\r
1095\r
b24e0f6c 1096 emu_status_msg("SAVE SLOT %i [%s]", state_slot,\r
a47dd663 1097 emu_check_save_file(state_slot) ? "USED" : "FREE");\r
d34a42f9 1098 }\r
1099 if (which & PEV_MENU)\r
1100 engineState = PGS_Menu;\r
1101}\r
1102\r
1103void emu_update_input(void)\r
1104{\r
093b8a42 1105 static int prev_events = 0;\r
1106 int actions[IN_BINDTYPE_COUNT] = { 0, };\r
1107 int pl_actions[2];\r
1108 int events;\r
d34a42f9 1109\r
093b8a42 1110 in_update(actions);\r
d34a42f9 1111\r
093b8a42 1112 pl_actions[0] = actions[IN_BINDTYPE_PLAYER12];\r
1113 pl_actions[1] = actions[IN_BINDTYPE_PLAYER12] >> 16;\r
d34a42f9 1114\r
093b8a42 1115 PicoPad[0] = pl_actions[0] & 0xfff;\r
1116 PicoPad[1] = pl_actions[1] & 0xfff;\r
d34a42f9 1117\r
093b8a42 1118 if (pl_actions[0] & 0x7000)\r
1119 do_turbo(&PicoPad[0], pl_actions[0]);\r
1120 if (pl_actions[1] & 0x7000)\r
1121 do_turbo(&PicoPad[1], pl_actions[1]);\r
1122\r
1123 events = actions[IN_BINDTYPE_EMU] & PEV_MASK;\r
d34a42f9 1124\r
1125 // volume is treated in special way and triggered every frame\r
1126 if (events & (PEV_VOL_DOWN|PEV_VOL_UP))\r
1127 plat_update_volume(1, events & PEV_VOL_UP);\r
1128\r
093b8a42 1129 if ((events ^ prev_events) & PEV_FF) {\r
a47dd663 1130 emu_set_fastforward(events & PEV_FF);\r
d34a42f9 1131 plat_update_volume(0, 0);\r
f2cf8472 1132 reset_timing = 1;\r
d34a42f9 1133 }\r
1134\r
093b8a42 1135 events &= ~prev_events;\r
d34a42f9 1136\r
f2cf8472 1137 if (PicoAHW == PAHW_PICO)\r
1138 run_events_pico(events);\r
d34a42f9 1139 if (events)\r
f2cf8472 1140 run_events_ui(events);\r
d34a42f9 1141 if (movie_data)\r
1142 update_movie();\r
1143\r
093b8a42 1144 prev_events = actions[IN_BINDTYPE_EMU] & PEV_MASK;\r
d34a42f9 1145}\r
1146\r
f2cf8472 1147static void mkdir_path(char *path_with_reserve, int pos, const char *name)\r
1148{\r
1149 strcpy(path_with_reserve + pos, name);\r
1150 if (plat_is_dir(path_with_reserve))\r
1151 return;\r
1152 if (mkdir(path_with_reserve, 0777) < 0)\r
1153 lprintf("failed to create: %s\n", path_with_reserve);\r
1154}\r
1155\r
1156void emu_init(void)\r
1157{\r
27701801 1158 char path[512];\r
f2cf8472 1159 int pos;\r
1160\r
1161 /* make dirs for saves */\r
27701801 1162 pos = plat_get_root_dir(path, sizeof(path) - 4);\r
1163 mkdir_path(path, pos, "mds");\r
1164 mkdir_path(path, pos, "srm");\r
1165 mkdir_path(path, pos, "brm");\r
1166\r
1167 make_config_cfg(path);\r
1168 config_readlrom(path);\r
f2cf8472 1169\r
1170 PicoInit();\r
1171 PicoMessage = plat_status_msg_busy_next;\r
d687ef50 1172 PicoMCDopenTray = emu_tray_open;\r
1173 PicoMCDcloseTray = emu_tray_close;\r
f2cf8472 1174}\r
1175\r
1176void emu_finish(void)\r
1177{\r
1178 // save SRAM\r
a47dd663 1179 if ((currentConfig.EmuOpt & EOPT_EN_SRAM) && SRam.changed) {\r
1180 emu_save_load_game(0, 1);\r
f2cf8472 1181 SRam.changed = 0;\r
1182 }\r
1183\r
27701801 1184 if (!(currentConfig.EmuOpt & EOPT_NO_AUTOSVCFG)) {\r
1185 char cfg[512];\r
1186 make_config_cfg(cfg);\r
1187 config_writelrom(cfg);\r
1188#ifndef NO_SYNC\r
1189 sync();\r
1190#endif\r
1191 }\r
f2cf8472 1192\r
1193 PicoExit();\r
1194}\r
1195\r
b24e0f6c 1196static void skip_frame(int do_audio)\r
1197{\r
1198 PicoSkipFrame = do_audio ? 1 : 2;\r
1199 PicoFrame();\r
1200 PicoSkipFrame = 0;\r
1201}\r
1202\r
1203/* our tick here is 1 us right now */\r
1204#define ms_to_ticks(x) (unsigned int)(x * 1000)\r
1205#define get_ticks() plat_get_ticks_us()\r
1206\r
1207void emu_loop(void)\r
1208{\r
1209 int pframes_done; /* "period" frames, used for sync */\r
1210 int frames_done, frames_shown; /* actual frames for fps counter */\r
1211 int oldmodes, target_fps, target_frametime;\r
1212 unsigned int timestamp_base = 0, timestamp_fps;\r
1213 char *notice_msg = NULL;\r
1214 char fpsbuff[24];\r
1215 int i;\r
1216\r
1217 fpsbuff[0] = 0;\r
1218\r
1219 /* make sure we are in correct mode */\r
1220 oldmodes = ((Pico.video.reg[12]&1)<<2) ^ 0xc;\r
1221 Pico.m.dirtyPal = 1;\r
1222\r
1223 /* number of ticks per frame */\r
1224 if (Pico.m.pal) {\r
1225 target_fps = 50;\r
1226 target_frametime = ms_to_ticks(1000) / 50;\r
1227 } else {\r
1228 target_fps = 60;\r
1229 target_frametime = ms_to_ticks(1000) / 60 + 1;\r
1230 }\r
1231\r
1232 // prepare CD buffer\r
1233 if (PicoAHW & PAHW_MCD)\r
1234 PicoCDBufferInit();\r
1235\r
b24e0f6c 1236 pemu_loop_prep();\r
1237\r
1238 timestamp_fps = get_ticks();\r
1239 reset_timing = 1;\r
1240\r
1241 frames_done = frames_shown = pframes_done = 0;\r
1242\r
7b436906 1243 plat_video_wait_vsync();\r
1244\r
b24e0f6c 1245 /* loop with resync every 1 sec. */\r
1246 while (engineState == PGS_Running)\r
1247 {\r
1248 unsigned int timestamp;\r
1249 int diff, diff_lim;\r
1250 int modes;\r
1251\r
1252 timestamp = get_ticks();\r
1253 if (reset_timing) {\r
1254 reset_timing = 0;\r
1255 timestamp_base = timestamp;\r
1256 pframes_done = 0;\r
1257 }\r
1258\r
1259 // show notice_msg message?\r
1260 if (notice_msg_time != 0)\r
1261 {\r
1262 static int noticeMsgSum;\r
54646a39 1263 if (timestamp - ms_to_ticks(notice_msg_time) > ms_to_ticks(STATUS_MSG_TIMEOUT)) {\r
b24e0f6c 1264 notice_msg_time = 0;\r
1265 plat_status_msg_clear();\r
1266 notice_msg = NULL;\r
1267 } else {\r
1268 int sum = noticeMsg[0] + noticeMsg[1] + noticeMsg[2];\r
1269 if (sum != noticeMsgSum) {\r
1270 plat_status_msg_clear();\r
1271 noticeMsgSum = sum;\r
1272 }\r
1273 notice_msg = noticeMsg;\r
1274 }\r
1275 }\r
1276\r
1277 // check for mode changes\r
1278 modes = ((Pico.video.reg[12]&1)<<2) | (Pico.video.reg[1]&8);\r
1279 if (modes != oldmodes) {\r
1280 oldmodes = modes;\r
1281 pemu_video_mode_change(!(modes & 4), (modes & 8));\r
1282 }\r
1283\r
1284 // second changed?\r
1285 if (timestamp - timestamp_fps >= ms_to_ticks(1000))\r
1286 {\r
1287#ifdef BENCHMARK\r
1288 static int bench = 0, bench_fps = 0, bench_fps_s = 0, bfp = 0, bf[4];\r
1289 if (++bench == 10) {\r
1290 bench = 0;\r
1291 bench_fps_s = bench_fps;\r
1292 bf[bfp++ & 3] = bench_fps;\r
1293 bench_fps = 0;\r
1294 }\r
1295 bench_fps += frames_shown;\r
1296 sprintf(fpsbuff, "%02i/%02i/%02i", frames_shown, bench_fps_s, (bf[0]+bf[1]+bf[2]+bf[3])>>2);\r
1297#else\r
1298 if (currentConfig.EmuOpt & EOPT_SHOW_FPS) {\r
1299 sprintf(fpsbuff, "%02i/%02i", frames_shown, frames_done);\r
1300 if (fpsbuff[5] == 0) { fpsbuff[5] = fpsbuff[6] = ' '; fpsbuff[7] = 0; }\r
1301 }\r
1302#endif\r
1303 frames_shown = frames_done = 0;\r
1304 timestamp_fps += ms_to_ticks(1000);\r
1305 }\r
1306#ifdef PFRAMES\r
1307 sprintf(fpsbuff, "%i", Pico.m.frame_count);\r
1308#endif\r
1309\r
1310 if (timestamp - timestamp_base >= ms_to_ticks(1000))\r
1311 {\r
21ecaf23 1312 if ((currentConfig.EmuOpt & EOPT_NO_FRMLIMIT) && currentConfig.Frameskip >= 0)\r
b24e0f6c 1313 pframes_done = 0;\r
21ecaf23 1314 else {\r
b24e0f6c 1315 pframes_done -= target_fps;\r
21ecaf23 1316 /* don't allow it to drift during heavy slowdowns */\r
54646a39 1317 if (pframes_done < -5) {\r
1318 reset_timing = 1;\r
1319 continue;\r
1320 }\r
21ecaf23 1321 if (pframes_done < -2)\r
1322 pframes_done = -2;\r
1323 }\r
b24e0f6c 1324 timestamp_base += ms_to_ticks(1000);\r
1325 }\r
1326\r
1327 diff = timestamp - timestamp_base;\r
1328 diff_lim = (pframes_done + 1) * target_frametime;\r
1329\r
1330 if (currentConfig.Frameskip >= 0) // frameskip enabled\r
1331 {\r
1332 for (i = 0; i < currentConfig.Frameskip; i++) {\r
1333 emu_update_input();\r
1334 skip_frame(1);\r
1335 pframes_done++; frames_done++;\r
1336 diff_lim += target_frametime;\r
1337\r
21ecaf23 1338 if (!(currentConfig.EmuOpt & EOPT_NO_FRMLIMIT)) {\r
b24e0f6c 1339 timestamp = get_ticks();\r
1340 diff = timestamp - timestamp_base;\r
0d83abe2 1341 if (!reset_timing && diff < diff_lim) // we are too fast\r
b24e0f6c 1342 plat_wait_till_us(timestamp_base + diff_lim);\r
1343 }\r
1344 }\r
1345 }\r
1346 else if (diff > diff_lim)\r
1347 {\r
1348 /* no time left for this frame - skip */\r
54646a39 1349 if (diff - diff_lim >= ms_to_ticks(200)) {\r
b24e0f6c 1350 /* if too much behind, reset instead */\r
1351 reset_timing = 1;\r
1352 continue;\r
1353 }\r
1354 emu_update_input();\r
1355 skip_frame(diff < diff_lim + target_frametime * 2);\r
1356 pframes_done++; frames_done++;\r
1357 continue;\r
1358 }\r
1359\r
1360 emu_update_input();\r
1361 PicoFrame();\r
1362\r
1363 /* frame limiter */\r
21ecaf23 1364 if (!reset_timing && !(currentConfig.EmuOpt & EOPT_NO_FRMLIMIT))\r
b24e0f6c 1365 {\r
1366 timestamp = get_ticks();\r
1367 diff = timestamp - timestamp_base;\r
1368\r
1369 // sleep or vsync if we are still too fast\r
1370 if (diff < diff_lim)\r
1371 {\r
1372 // we are too fast\r
7b436906 1373 plat_wait_till_us(timestamp_base + diff_lim - target_frametime / 4);\r
1374 if (currentConfig.EmuOpt & EOPT_VSYNC)\r
b24e0f6c 1375 plat_video_wait_vsync();\r
b24e0f6c 1376 }\r
1377 }\r
1378\r
1379 pemu_update_display(fpsbuff, notice_msg);\r
1380\r
1381 pframes_done++; frames_done++; frames_shown++;\r
1382 }\r
1383\r
1384 emu_set_fastforward(0);\r
1385\r
b24e0f6c 1386 // save SRAM\r
1387 if ((currentConfig.EmuOpt & EOPT_EN_SRAM) && SRam.changed) {\r
1388 plat_status_msg_busy_first("Writing SRAM/BRAM...");\r
1389 emu_save_load_game(0, 1);\r
1390 SRam.changed = 0;\r
1391 }\r
1392\r
b24e0f6c 1393 pemu_loop_end();\r
730259b7 1394\r
1395 // pemu_loop_end() might want to do 1 frame for bg image,\r
1396 // so free CD buffer here\r
1397 if (PicoAHW & PAHW_MCD)\r
1398 PicoCDBufferFree();\r
b24e0f6c 1399}\r
1400\r
fast MegaDrive/MegaCD/32X emulator