UIQ3 update, some makefile unification, rm old configs, stuff
[libpicofe.git] / common / emu.c
index 5b69357..7dbac50 100644 (file)
 #include "fonts.h"\r
 #include "lprintf.h"\r
 #include "config.h"\r
+#include "common.h"\r
 \r
 #include <Pico/PicoInt.h>\r
 #include <Pico/Patch.h>\r
 #include <Pico/cd/cue.h>\r
 #include <zlib/zlib.h>\r
 \r
-#if   defined(__GP2X__)\r
- #include "../gp2x/gp2x.h"\r
- #define SCREEN_WIDTH 320\r
- #define SCREEN_BUFFER gp2x_screen\r
-#elif defined(__GIZ__)\r
- #include "../gizmondo/giz.h"\r
- #define SCREEN_WIDTH 321\r
- #define SCREEN_BUFFER giz_screen\r
-#elif defined(PSP)\r
- #include "../psp/psp.h"\r
- #define SCREEN_WIDTH 512\r
- #define SCREEN_BUFFER psp_screen\r
-#endif\r
 \r
 char *PicoConfigFile = "config.cfg";\r
 currentConfig_t currentConfig, defaultConfig;\r
 int rom_loaded = 0;\r
-char noticeMsg[64];\r
+char noticeMsg[64] = { 0, };\r
 int state_slot = 0;\r
 int config_slot = 0, config_slot_current = 0;\r
-char lastRomFile[512];\r
+char loadedRomFName[512] = { 0, };\r
 int kb_combo_keys = 0, kb_combo_acts = 0;      // keys and actions which need button combos\r
 int pico_inp_mode = 0;\r
 \r
@@ -49,10 +37,8 @@ unsigned char *movie_data = NULL;
 static int movie_size = 0;\r
 \r
 // provided by platform code:\r
-extern char romFileName[];\r
 extern void emu_noticeMsgUpdated(void);\r
-extern void emu_getMainDir(char *dst, int len);\r
-extern void emu_setDefaultConfig(void);\r
+extern int  emu_getMainDir(char *dst, int len);\r
 extern void menu_romload_prepare(const char *rom_name);\r
 extern void menu_romload_end(void);\r
 \r
@@ -63,17 +49,17 @@ static void strlwr_(char* string)
        while ( (*string++ = (char)tolower(*string)) );\r
 }\r
 \r
-static int try_rfn_cut(void)\r
+static int try_rfn_cut(char *fname)\r
 {\r
        FILE *tmp;\r
        char *p;\r
 \r
-       p = romFileName + strlen(romFileName) - 1;\r
-       for (; p > romFileName; p--)\r
+       p = fname + strlen(fname) - 1;\r
+       for (; p > fname; p--)\r
                if (*p == '.') break;\r
        *p = 0;\r
 \r
-       if((tmp = fopen(romFileName, "rb"))) {\r
+       if((tmp = fopen(fname, "rb"))) {\r
                fclose(tmp);\r
                return 1;\r
        }\r
@@ -159,35 +145,37 @@ static int emu_isBios(const char *name)
 \r
 static unsigned char id_header[0x100];\r
 \r
-/* checks if romFileName points to valid MegaCD image\r
+/* checks if fname points to valid MegaCD image\r
  * if so, checks for suitable BIOS */\r
-int emu_cdCheck(int *pregion)\r
+int emu_cdCheck(int *pregion, char *fname_in)\r
 {\r
        unsigned char buf[32];\r
        pm_file *cd_f;\r
        int region = 4; // 1: Japan, 4: US, 8: Europe\r
-       char ext[5], *fname = romFileName;\r
+       char ext[5], *fname = fname_in;\r
        cue_track_type type = CT_UNKNOWN;\r
        cue_data_t *cue_data = NULL;\r
 \r
-       get_ext(romFileName, ext);\r
+       get_ext(fname_in, ext);\r
        if (strcasecmp(ext, ".cue") == 0) {\r
-               cue_data = cue_parse(romFileName);\r
+               cue_data = cue_parse(fname_in);\r
                if (cue_data != NULL) {\r
                        fname = cue_data->tracks[1].fname;\r
                        type  = cue_data->tracks[1].type;\r
                }\r
+               else\r
+                       return -1;\r
        }\r
 \r
        cd_f = pm_open(fname);\r
        if (cue_data != NULL)\r
                cue_destroy(cue_data);\r
 \r
-       if (!cd_f) return 0; // let the upper level handle this\r
+       if (cd_f == NULL) return 0; // let the upper level handle this\r
 \r
        if (pm_read(buf, 32, cd_f) != 32) {\r
                pm_close(cd_f);\r
-               return 0;\r
+               return -1;\r
        }\r
 \r
        if (!strncasecmp("SEGADISCSYSTEM", (char *)buf+0x00, 14)) {\r
@@ -258,7 +246,7 @@ static int extract_text(char *dest, const unsigned char *src, int len, int swab)
 \r
 char *emu_makeRomId(void)\r
 {\r
-       static char id_string[3+0x11+0x11+0x30+16];\r
+       static char id_string[3+0xe*3+0x3*3+0x30*3+3];\r
        int pos, swab = 1;\r
 \r
        if (PicoAHW & PAHW_MCD) {\r
@@ -278,22 +266,40 @@ char *emu_makeRomId(void)
        return id_string;\r
 }\r
 \r
-int emu_ReloadRom(void)\r
+// buffer must be at least 150 byte long\r
+void emu_getGameName(char *str150)\r
+{\r
+       int ret, swab = (PicoAHW & PAHW_MCD) ? 0 : 1;\r
+       char *s, *d;\r
+\r
+       ret = extract_text(str150, id_header + 0x50, 0x30, swab); // overseas name\r
+\r
+       for (s = d = str150 + 1; s < str150+ret; s++)\r
+       {\r
+               if (*s == 0) break;\r
+               if (*s != ' ' || d[-1] != ' ')\r
+                       *d++ = *s;\r
+       }\r
+       *d = 0;\r
+}\r
+\r
+// note: this function might mangle rom_fname\r
+int emu_ReloadRom(char *rom_fname)\r
 {\r
        unsigned int rom_size = 0;\r
-       char *used_rom_name = romFileName;\r
+       char *used_rom_name = rom_fname;\r
        unsigned char *rom_data = NULL;\r
        char ext[5];\r
-       pm_file *rom;\r
+       pm_file *rom = NULL;\r
        int ret, cd_state, cd_region, cfg_loaded = 0;\r
 \r
-       lprintf("emu_ReloadRom(%s)\n", romFileName);\r
+       lprintf("emu_ReloadRom(%s)\n", rom_fname);\r
 \r
-       get_ext(romFileName, ext);\r
+       get_ext(rom_fname, ext);\r
 \r
        // detect wrong extensions\r
        if (!strcmp(ext, ".srm") || !strcmp(ext, "s.gz") || !strcmp(ext, ".mds")) { // s.gz ~ .mds.gz\r
-               sprintf(menuErrorMsg, "Not a ROM selected.");\r
+               sprintf(menuErrorMsg, "Not a ROM/CD selected.");\r
                return 0;\r
        }\r
 \r
@@ -308,7 +314,7 @@ int emu_ReloadRom(void)
        {\r
                // check for both gmv and rom\r
                int dummy;\r
-               FILE *movie_file = fopen(romFileName, "rb");\r
+               FILE *movie_file = fopen(rom_fname, "rb");\r
                if(!movie_file) {\r
                        sprintf(menuErrorMsg, "Failed to open movie.");\r
                        return 0;\r
@@ -333,30 +339,30 @@ int emu_ReloadRom(void)
                        sprintf(menuErrorMsg, "Invalid GMV file.");\r
                        return 0;\r
                }\r
-               dummy = try_rfn_cut() || try_rfn_cut();\r
+               dummy = try_rfn_cut(rom_fname) || try_rfn_cut(rom_fname);\r
                if (!dummy) {\r
                        sprintf(menuErrorMsg, "Could't find a ROM for movie.");\r
                        return 0;\r
                }\r
-               get_ext(romFileName, ext);\r
+               get_ext(rom_fname, ext);\r
        }\r
-       else if (!strcmp(ext, ".pat")) {\r
+       else if (!strcmp(ext, ".pat"))\r
+       {\r
                int dummy;\r
-               PicoPatchLoad(romFileName);\r
-               dummy = try_rfn_cut() || try_rfn_cut();\r
+               PicoPatchLoad(rom_fname);\r
+               dummy = try_rfn_cut(rom_fname) || try_rfn_cut(rom_fname);\r
                if (!dummy) {\r
                        sprintf(menuErrorMsg, "Could't find a ROM to patch.");\r
                        return 0;\r
                }\r
-               get_ext(romFileName, ext);\r
+               get_ext(rom_fname, ext);\r
        }\r
 \r
-       if ((PicoAHW & PAHW_MCD) && Pico_mcd != NULL)\r
-               Stop_CD();\r
+       emu_shutdownMCD();\r
 \r
        // check for MegaCD image\r
-       cd_state = emu_cdCheck(&cd_region);\r
-       if (cd_state != CIT_NOT_CD)\r
+       cd_state = emu_cdCheck(&cd_region, rom_fname);\r
+       if (cd_state >= 0 && cd_state != CIT_NOT_CD)\r
        {\r
                PicoAHW |= PAHW_MCD;\r
                // valid CD image, check for BIOS..\r
@@ -386,8 +392,13 @@ int emu_ReloadRom(void)
 \r
        rom = pm_open(used_rom_name);\r
        if (!rom) {\r
-               sprintf(menuErrorMsg, "Failed to open rom.");\r
-               return 0;\r
+               sprintf(menuErrorMsg, "Failed to open ROM/CD image");\r
+               goto fail;\r
+       }\r
+\r
+       if (cd_state < 0) {\r
+               sprintf(menuErrorMsg, "Invalid CD image");\r
+               goto fail;\r
        }\r
 \r
        menu_romload_prepare(used_rom_name); // also CD load\r
@@ -398,19 +409,17 @@ int emu_ReloadRom(void)
        if ( (ret = PicoCartLoad(rom, &rom_data, &rom_size)) ) {\r
                sprintf(menuErrorMsg, "PicoCartLoad() failed.");\r
                lprintf("%s\n", menuErrorMsg);\r
-               pm_close(rom);\r
-               menu_romload_end();\r
-               return 0;\r
+               goto fail2;\r
        }\r
        pm_close(rom);\r
+       rom = NULL;\r
 \r
        // detect wrong files (Pico crashes on very small files), also see if ROM EP is good\r
        if (rom_size <= 0x200 || strncmp((char *)rom_data, "Pico", 4) == 0 ||\r
          ((*(unsigned char *)(rom_data+4)<<16)|(*(unsigned short *)(rom_data+6))) >= (int)rom_size) {\r
                if (rom_data) free(rom_data);\r
                sprintf(menuErrorMsg, "Not a ROM selected.");\r
-               menu_romload_end();\r
-               return 0;\r
+               goto fail2;\r
        }\r
 \r
        // load config for this ROM (do this before insert to get correct region)\r
@@ -424,18 +433,16 @@ int emu_ReloadRom(void)
        lprintf("PicoCartInsert(%p, %d);\n", rom_data, rom_size);\r
        if (PicoCartInsert(rom_data, rom_size)) {\r
                sprintf(menuErrorMsg, "Failed to load ROM.");\r
-               menu_romload_end();\r
-               return 0;\r
+               goto fail2;\r
        }\r
 \r
        // insert CD if it was detected\r
        if (cd_state != CIT_NOT_CD) {\r
-               ret = Insert_CD(romFileName, cd_state);\r
+               ret = Insert_CD(rom_fname, cd_state);\r
                if (ret != 0) {\r
                        sprintf(menuErrorMsg, "Insert_CD() failed, invalid CD image?");\r
                        lprintf("%s\n", menuErrorMsg);\r
-                       menu_romload_end();\r
-                       return 0;\r
+                       goto fail2;\r
                }\r
        }\r
 \r
@@ -447,13 +454,14 @@ int emu_ReloadRom(void)
        }\r
 \r
        // additional movie stuff\r
-       if (movie_data) {\r
-               if(movie_data[0x14] == '6')\r
+       if (movie_data)\r
+       {\r
+               if (movie_data[0x14] == '6')\r
                     PicoOpt |=  POPT_6BTN_PAD; // 6 button pad\r
                else PicoOpt &= ~POPT_6BTN_PAD;\r
                PicoOpt |= POPT_DIS_VDP_FIFO; // no VDP fifo timing\r
-               if(movie_data[0xF] >= 'A') {\r
-                       if(movie_data[0x16] & 0x80) {\r
+               if (movie_data[0xF] >= 'A') {\r
+                       if (movie_data[0x16] & 0x80) {\r
                                PicoRegionOverride = 8;\r
                        } else {\r
                                PicoRegionOverride = 4;\r
@@ -467,7 +475,7 @@ int emu_ReloadRom(void)
        else\r
        {\r
                PicoOpt &= ~POPT_DIS_VDP_FIFO;\r
-               if(Pico.m.pal) {\r
+               if (Pico.m.pal) {\r
                        strcpy(noticeMsg, "PAL SYSTEM / 50 FPS");\r
                } else {\r
                        strcpy(noticeMsg, "NTSC SYSTEM / 60 FPS");\r
@@ -476,28 +484,46 @@ int emu_ReloadRom(void)
        emu_noticeMsgUpdated();\r
 \r
        // load SRAM for this ROM\r
-       if (currentConfig.EmuOpt & 1)\r
+       if (currentConfig.EmuOpt & EOPT_USE_SRAM)\r
                emu_SaveLoadGame(1, 1);\r
 \r
-       strncpy(lastRomFile, romFileName, sizeof(lastRomFile)-1);\r
-       lastRomFile[sizeof(lastRomFile)-1] = 0;\r
+       strncpy(loadedRomFName, rom_fname, sizeof(loadedRomFName)-1);\r
+       loadedRomFName[sizeof(loadedRomFName)-1] = 0;\r
        rom_loaded = 1;\r
        return 1;\r
+\r
+fail2:\r
+       menu_romload_end();\r
+fail:\r
+       if (rom != NULL) pm_close(rom);\r
+       return 0;\r
 }\r
 \r
 \r
+void emu_shutdownMCD(void)\r
+{\r
+       if ((PicoAHW & PAHW_MCD) && Pico_mcd != NULL)\r
+               Stop_CD();\r
+       PicoAHW &= ~PAHW_MCD;\r
+}\r
+\r
 static void romfname_ext(char *dst, const char *prefix, const char *ext)\r
 {\r
        char *p;\r
        int prefix_len = 0;\r
 \r
        // make save filename\r
-       for (p = romFileName+strlen(romFileName)-1; p >= romFileName && *p != '/'; p--); p++;\r
+       p = loadedRomFName+strlen(loadedRomFName)-1;\r
+       for (; p >= loadedRomFName && *p != PATH_SEP_C; p--); p++;\r
        *dst = 0;\r
        if (prefix) {\r
-               strcpy(dst, prefix);\r
-               prefix_len = strlen(prefix);\r
+               int len = emu_getMainDir(dst, 512);\r
+               strcpy(dst + len, prefix);\r
+               prefix_len = len + strlen(prefix);\r
        }\r
+#ifdef UIQ3\r
+       else p = loadedRomFName; // backward compatibility\r
+#endif\r
        strncpy(dst + prefix_len, p, 511-prefix_len);\r
        dst[511-8] = 0;\r
        if (dst[strlen(dst)-4] == '.') dst[strlen(dst)-4] = 0;\r
@@ -507,7 +533,9 @@ static void romfname_ext(char *dst, const char *prefix, const char *ext)
 \r
 static void make_config_cfg(char *cfg)\r
 {\r
-       strncpy(cfg, PicoConfigFile, 511);\r
+       int len;\r
+       len = emu_getMainDir(cfg, 512);\r
+       strncpy(cfg + len, PicoConfigFile, 512-6-1-len);\r
        if (config_slot != 0)\r
        {\r
                char *p = strrchr(cfg, '.');\r
@@ -517,10 +545,34 @@ static void make_config_cfg(char *cfg)
        cfg[511] = 0;\r
 }\r
 \r
+void emu_packConfig(void)\r
+{\r
+       currentConfig.s_PicoOpt = PicoOpt;\r
+       currentConfig.s_PsndRate = PsndRate;\r
+       currentConfig.s_PicoRegion = PicoRegionOverride;\r
+       currentConfig.s_PicoAutoRgnOrder = PicoAutoRgnOrder;\r
+       currentConfig.s_PicoCDBuffers = PicoCDBuffers;\r
+}\r
+\r
+void emu_unpackConfig(void)\r
+{\r
+       PicoOpt = currentConfig.s_PicoOpt;\r
+       PsndRate = currentConfig.s_PsndRate;\r
+       PicoRegionOverride = currentConfig.s_PicoRegion;\r
+       PicoAutoRgnOrder = currentConfig.s_PicoAutoRgnOrder;\r
+       PicoCDBuffers = currentConfig.s_PicoCDBuffers;\r
+}\r
+\r
+static void emu_setDefaultConfig(void)\r
+{\r
+       memcpy(&currentConfig, &defaultConfig, sizeof(currentConfig));\r
+       emu_unpackConfig();\r
+}\r
+\r
+\r
 int emu_ReadConfig(int game, int no_defaults)\r
 {\r
        char cfg[512];\r
-       FILE *f;\r
        int ret;\r
 \r
        if (!game)\r
@@ -556,37 +608,7 @@ int emu_ReadConfig(int game, int no_defaults)
                        ret = config_readsect("game_def.cfg", sect);\r
                }\r
 \r
-               if (ret != 0)\r
-               {\r
-                       // fall back to old game specific cfg\r
-                       char extbuf[16];\r
-                       if (config_slot != 0)\r
-                               sprintf(extbuf, ".%i.pbcfg", config_slot);\r
-                       else strcpy(extbuf, ".pbcfg");\r
-                       romfname_ext(cfg, "cfg/", extbuf);\r
-                       f = fopen(cfg, "rb");\r
-                       if (!f) {\r
-                               romfname_ext(cfg, NULL, ".pbcfg");\r
-                               f = fopen(cfg, "rb");\r
-                       }\r
-                       if (f) {\r
-                               int bread;\r
-                               fseek(f, 512, SEEK_SET); // skip unused lrom buffer\r
-                               bread = fread(&currentConfig, 1, sizeof(currentConfig), f);\r
-                               lprintf("emu_ReadConfig: %s %s\n", cfg, bread > 0 ? "(ok)" : "(failed)");\r
-                               fclose(f);\r
-                               ret = 0;\r
-                       }\r
-\r
-                       if (ret == 0) {\r
-                               PicoOpt = currentConfig.s_PicoOpt;\r
-                               PsndRate = currentConfig.s_PsndRate;\r
-                               PicoRegionOverride = currentConfig.s_PicoRegion;\r
-                               PicoAutoRgnOrder = currentConfig.s_PicoAutoRgnOrder;\r
-                               // PicoCDBuffers = currentConfig.s_PicoCDBuffers; // ignore in this case\r
-                       }\r
-               }\r
-               else\r
+               if (ret == 0)\r
                {\r
                        lprintf("loaded cfg from sect \"%s\"\n", sect);\r
                }\r
@@ -620,14 +642,7 @@ int emu_WriteConfig(int is_game)
 \r
        if (!is_game)\r
        {\r
-               strncpy(cfg, PicoConfigFile, 511);\r
-               if (config_slot != 0)\r
-               {\r
-                       char *p = strrchr(cfg, '.');\r
-                       if (p == NULL) p = cfg + strlen(cfg);\r
-                       sprintf(p, ".%i.cfg", config_slot);\r
-               }\r
-               cfg[511] = 0;\r
+               make_config_cfg(cfg);\r
                write_lrom = 1;\r
        } else {\r
                if (config_slot != 0)\r
@@ -650,6 +665,7 @@ int emu_WriteConfig(int is_game)
 }\r
 \r
 \r
+#ifndef UIQ3\r
 void emu_textOut8(int x, int y, const char *text)\r
 {\r
        int i,l,len=strlen(text);\r
@@ -696,6 +712,7 @@ void emu_textOut16(int x, int y, const char *text)
                screen += 8;\r
        }\r
 }\r
+#endif\r
 \r
 #ifdef PSP\r
 #define MAX_COMBO_KEY 23\r
@@ -804,7 +821,7 @@ char *emu_GetSaveFName(int load, int is_sram, int slot)
 \r
        if (is_sram)\r
        {\r
-               romfname_ext(saveFname, (PicoAHW&1) ? "brm/" : "srm/", (PicoAHW&1) ? ".brm" : ".srm");\r
+               romfname_ext(saveFname, (PicoAHW&1) ? "brm"PATH_SEP : "srm"PATH_SEP, (PicoAHW&1) ? ".brm" : ".srm");\r
                if (load) {\r
                        if (try_ropen_file(saveFname)) return saveFname;\r
                        // try in current dir..\r
@@ -817,19 +834,21 @@ char *emu_GetSaveFName(int load, int is_sram, int slot)
        {\r
                ext[0] = 0;\r
                if(slot > 0 && slot < 10) sprintf(ext, ".%i", slot);\r
-               strcat(ext, (currentConfig.EmuOpt & 8) ? ".mds.gz" : ".mds");\r
+               strcat(ext, (currentConfig.EmuOpt & EOPT_GZIP_SAVES) ? ".mds.gz" : ".mds");\r
 \r
-               romfname_ext(saveFname, "mds/", ext);\r
+               romfname_ext(saveFname, "mds" PATH_SEP, ext);\r
                if (load) {\r
                        if (try_ropen_file(saveFname)) return saveFname;\r
                        romfname_ext(saveFname, NULL, ext);\r
                        if (try_ropen_file(saveFname)) return saveFname;\r
-                       if (currentConfig.EmuOpt & 8) {\r
+                       // no gzipped states, search for non-gzipped\r
+                       if (currentConfig.EmuOpt & EOPT_GZIP_SAVES)\r
+                       {\r
                                ext[0] = 0;\r
                                if(slot > 0 && slot < 10) sprintf(ext, ".%i", slot);\r
                                strcat(ext, ".mds");\r
 \r
-                               romfname_ext(saveFname, "mds/", ext);\r
+                               romfname_ext(saveFname, "mds"PATH_SEP, ext);\r
                                if (try_ropen_file(saveFname)) return saveFname;\r
                                romfname_ext(saveFname, NULL, ext);\r
                                if (try_ropen_file(saveFname)) return saveFname;\r