X-Git-Url: https://notaz.gp2x.de/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=gp2x%2Femu.c;h=df9faac8d6fc8bb5f20e08e5b53c5620e256aaf2;hb=ca69c3e5a0ecf407c02dc85c6f3282ebb1efc5a2;hp=27e9d13dbffbefcd6b46da2eaa1cf8a1814b55c9;hpb=5963319865fac11b85e02280ae911bcfc26f2d8f;p=libpicofe.git diff --git a/gp2x/emu.c b/gp2x/emu.c index 27e9d13..df9faac 100644 --- a/gp2x/emu.c +++ b/gp2x/emu.c @@ -1,1591 +1,915 @@ -// (c) Copyright 2006-2007 notaz, All rights reserved. -// Free for non-commercial use. - -// For commercial use, separate licencing terms must be obtained. +/* + * (c) Copyright 2006-2010 notaz, All rights reserved. + * + * For performance reasons 3 renderers are exported for both MD and 32x modes: + * - 16bpp line renderer + * - 8bpp line renderer (slightly faster) + * - 8bpp tile renderer + * In 32x mode: + * - 32x layer is overlayed on top of 16bpp one + * - line internal one done on PicoDraw2FB, then mixed with 32x + * - tile internal one done on PicoDraw2FB, then mixed with 32x + */ #include #include -#include -#include -#include -#include -#include #include -#include - -#include "emu.h" -#include "gp2x.h" -#include "usbjoy.h" -#include "menu.h" -#include "asmutils.h" -#include "cpuctrl.h" - -#include -#include +#include "plat_gp2x.h" +#include "soc.h" +#include "soc_pollux.h" +#include "../common/plat.h" +#include "../common/menu.h" +#include "../common/arm_utils.h" +#include "../common/fonts.h" +#include "../common/emu.h" +#include "../common/config.h" +#include "../common/input.h" +#include "../linux/sndout_oss.h" +#include "version.h" + +#include +#include +#include #include - #ifdef BENCHMARK #define OSD_FPS_X 220 #else #define OSD_FPS_X 260 #endif -// PicoPad[] format: SACB RLDU -char *actionNames[] = { - "UP", "DOWN", "LEFT", "RIGHT", "B", "C", "A", "START", - 0, 0, 0, 0, 0, 0, 0, 0, // Z, Y, X, MODE (enabled only when needed), ?, ?, ?, ? - 0, 0, 0, 0, 0, 0, 0, "ENTER MENU", // player2_flag, ?, ?, ?, ?, ?, ?, menu - "NEXT SAVE SLOT", "PREV SAVE SLOT", "SWITCH RENDERER", "SAVE STATE", - "LOAD STATE", "VOLUME UP", "VOLUME DOWN", "DONE" -}; -int engineState; -int select_exits = 0; -char *PicoConfigFile = "picoconfig.bin"; -currentConfig_t currentConfig; +extern int crashed_940; -char romFileName[PATH_MAX]; -unsigned char *rom_data = NULL; +static short __attribute__((aligned(4))) sndBuffer[2*(44100+100)/50]; +static unsigned char PicoDraw2FB_[(8+320) * (8+240+8)]; +unsigned char *PicoDraw2FB = PicoDraw2FB_; +static int osd_fps_x, osd_y, doing_bg_frame; +const char *renderer_names[] = { "16bit accurate", " 8bit accurate", " 8bit fast", NULL }; +const char *renderer_names32x[] = { "accurate", "faster", "fastest", NULL }; +enum renderer_types { RT_16BIT, RT_8BIT_ACC, RT_8BIT_FAST, RT_COUNT }; -extern int crashed_940; +static int (*emu_scan_begin)(unsigned int num) = NULL; +static int (*emu_scan_end)(unsigned int num) = NULL; + +extern void *gp2x_screens[4]; -static short sndBuffer[2*44100/50]; -static char noticeMsg[64]; // notice msg to draw -static struct timeval noticeMsgTime = { 0, 0 }; // when started showing -static int osd_fps_x; -static int combo_keys = 0, combo_acts = 0; // keys and actions which need button combos -static int gp2x_old_gamma = 100; -static unsigned char *movie_data = NULL; -static int movie_size = 0; -unsigned char *framebuff = 0; // temporary buffer for alt renderer -int state_slot = 0; -int reset_timing = 0; -int config_slot = 0, config_slot_current = 0; - - -// utilities -static void strlwr(char* string) -{ - while ( (*string++ = (char)tolower(*string)) ); -} -static int try_rfn_cut(void) +void pemu_prep_defconfig(void) { - FILE *tmp; - char *p; + gp2x_soc_t soc; - p = romFileName + strlen(romFileName) - 1; - for (; p > romFileName; p--) - if (*p == '.') break; - *p = 0; + defaultConfig.CPUclock = default_cpu_clock; + defaultConfig.renderer32x = RT_8BIT_FAST; + defaultConfig.analog_deadzone = 50; - if((tmp = fopen(romFileName, "rb"))) { - fclose(tmp); - return 1; + soc = soc_detect(); + if (soc == SOCID_MMSP2) + defaultConfig.s_PicoOpt |= POPT_EXT_FM; + else if (soc == SOCID_POLLUX) { + defaultConfig.EmuOpt |= EOPT_WIZ_TEAR_FIX|EOPT_SHOW_RTC; + defaultConfig.s_PicoOpt |= POPT_EN_MCD_GFX; } - return 0; } -static void get_ext(char *file, char *ext) +void pemu_validate_config(void) { - char *p; + if (gp2x_dev_id != GP2X_DEV_GP2X) + PicoOpt &= ~POPT_EXT_FM; + if (gp2x_dev_id != GP2X_DEV_WIZ) + currentConfig.EmuOpt &= ~EOPT_WIZ_TEAR_FIX; - p = file + strlen(file) - 4; - if (p < file) p = file; - strncpy(ext, p, 4); - ext[4] = 0; - strlwr(ext); -} - -char *biosfiles_us[] = { "us_scd2_9306", "SegaCDBIOS9303", "us_scd1_9210" }; -char *biosfiles_eu[] = { "eu_mcd2_9306", "eu_mcd2_9303", "eu_mcd1_9210" }; -char *biosfiles_jp[] = { "jp_mcd1_9112", "jp_mcd1_9111" }; + if (currentConfig.gamma < 10 || currentConfig.gamma > 300) + currentConfig.gamma = 100; -extern char **g_argv; + if (currentConfig.CPUclock < 10 || currentConfig.CPUclock > 1024) + currentConfig.CPUclock = default_cpu_clock; +} -int find_bios(int region, char **bios_file) +static int get_renderer(void) { - static char bios_path[1024]; - int i, j, count; - char **files; - FILE *f = NULL; - - if (region == 4) { // US - files = biosfiles_us; - count = sizeof(biosfiles_us) / sizeof(char *); - } else if (region == 8) { // EU - files = biosfiles_eu; - count = sizeof(biosfiles_eu) / sizeof(char *); - } else if (region == 1 || region == 2) { - files = biosfiles_jp; - count = sizeof(biosfiles_jp) / sizeof(char *); - } else { - return 0; - } - - for (i = 0; i < count; i++) - { - strncpy(bios_path, g_argv[0], 1023); - bios_path[1024-32] = 0; - for (j = strlen(bios_path); j > 0; j--) - if (bios_path[j] == '/') { bios_path[j+1] = 0; break; } - strcat(bios_path, files[i]); - strcat(bios_path, ".bin"); - f = fopen(bios_path, "rb"); - if (f) break; - - bios_path[strlen(bios_path) - 4] = 0; - strcat(bios_path, ".zip"); - f = fopen(bios_path, "rb"); - if (f) break; - } - - if (f) { - printf("using bios: %s\n", bios_path); - fclose(f); - if (bios_file) *bios_file = bios_path; - return 1; - } else { - sprintf(menuErrorMsg, "no %s BIOS files found, read docs", - region != 4 ? (region == 8 ? "EU" : "JAP") : "USA"); - printf("%s\n", menuErrorMsg); - return 0; - } + if (PicoAHW & PAHW_32X) + return currentConfig.renderer32x; + else + return currentConfig.renderer; } -/* checks if romFileName points to valid MegaCD image - * if so, checks for suitable BIOS */ -int emu_cd_check(char **bios_file) +static void change_renderer(int diff) { - unsigned char buf[32]; - pm_file *cd_f; - int type = 0, region = 4; // 1: Japan, 4: US, 8: Europe - - cd_f = pm_open(romFileName); - if (!cd_f) return 0; // let the upper level handle this + int *r; + if (PicoAHW & PAHW_32X) + r = ¤tConfig.renderer32x; + else + r = ¤tConfig.renderer; + *r += diff; - if (pm_read(buf, 32, cd_f) != 32) { - pm_close(cd_f); - return 0; - } + // 8bpp fast is not there (yet?) + if ((PicoAHW & PAHW_SMS) && *r == RT_8BIT_FAST) + (*r)++; - if (!strncasecmp("SEGADISCSYSTEM", (char *)buf+0x00, 14)) type = 1; // Sega CD (ISO) - if (!strncasecmp("SEGADISCSYSTEM", (char *)buf+0x10, 14)) type = 2; // Sega CD (BIN) - if (type == 0) { - pm_close(cd_f); - return 0; - } + if (*r >= RT_COUNT) + *r = 0; + else if (*r < 0) + *r = RT_COUNT - 1; +} - /* it seems we have a CD image here. Try to detect region now.. */ - pm_seek(cd_f, (type == 1) ? 0x100+0x10B : 0x110+0x10B, SEEK_SET); - pm_read(buf, 1, cd_f); - pm_close(cd_f); +#define is_16bit_mode() \ + (get_renderer() == RT_16BIT || (PicoAHW & PAHW_32X)) - if (buf[0] == 0x64) region = 8; // EU - if (buf[0] == 0xa1) region = 1; // JAP +static void (*osd_text)(int x, int y, const char *text); - printf("detected %s Sega/Mega CD image with %s region\n", - type == 2 ? "BIN" : "ISO", region != 4 ? (region == 8 ? "EU" : "JAP") : "USA"); +static void osd_text8(int x, int y, const char *text) +{ + int len = strlen(text)*8; + int *p, i, h, offs; - if (PicoRegionOverride) { - region = PicoRegionOverride; - printf("overrided region to %s\n", region != 4 ? (region == 8 ? "EU" : "JAP") : "USA"); + len = (len+3) >> 2; + for (h = 0; h < 8; h++) { + offs = (x + g_screen_width * (y+h)) & ~3; + p = (int *) ((char *)g_screen_ptr + offs); + for (i = len; i; i--, p++) + *p = 0xe0e0e0e0; } - - if (bios_file == NULL) return type; - - if (find_bios(region, bios_file)) - return type; // CD and BIOS detected - - return -1; // CD detected but load failed + emu_text_out8(x, y, text); } -int emu_ReloadRom(void) +static void osd_text16(int x, int y, const char *text) { - unsigned int rom_size = 0; - char *used_rom_name = romFileName; - char ext[5]; - pm_file *rom; - int ret, cd_state; - - printf("emu_ReloadRom(%s)\n", romFileName); - - get_ext(romFileName, ext); + int len = strlen(text)*8; + int *p, i, h, offs; - // detect wrong extensions - if(!strcmp(ext, ".srm") || !strcmp(ext, "s.gz") || !strcmp(ext, ".mds")) { // s.gz ~ .mds.gz - sprintf(menuErrorMsg, "Not a ROM selected."); - return 0; + len = (len+1) >> 1; + for (h = 0; h < 8; h++) { + offs = (x + g_screen_width * (y+h)) & ~1; + p = (int *) ((short *)g_screen_ptr + offs); + for (i = len; i; i--, p++) + *p = (*p >> 2) & 0x39e7; } + emu_text_out16(x, y, text); +} - PicoPatchUnload(); +static void osd_text8_rot(int x, int y, const char *text) +{ + int len = strlen(text) * 8; + char *p = (char *)g_screen_ptr + 240*(320-x) + y; - // check for movie file - if(movie_data) { - free(movie_data); - movie_data = 0; + while (len--) { + memset(p, 0xe0, 8); + p -= 240; } - if(!strcmp(ext, ".gmv")) { - // check for both gmv and rom - int dummy; - FILE *movie_file = fopen(romFileName, "rb"); - if(!movie_file) { - sprintf(menuErrorMsg, "Failed to open movie."); - return 0; - } - fseek(movie_file, 0, SEEK_END); - movie_size = ftell(movie_file); - fseek(movie_file, 0, SEEK_SET); - if(movie_size < 64+3) { - sprintf(menuErrorMsg, "Invalid GMV file."); - fclose(movie_file); - return 0; - } - movie_data = malloc(movie_size); - if(movie_data == NULL) { - sprintf(menuErrorMsg, "low memory."); - fclose(movie_file); - return 0; - } - fread(movie_data, 1, movie_size, movie_file); - fclose(movie_file); - if (strncmp((char *)movie_data, "Gens Movie TEST", 15) != 0) { - sprintf(menuErrorMsg, "Invalid GMV file."); - return 0; - } - dummy = try_rfn_cut() || try_rfn_cut(); - if (!dummy) { - sprintf(menuErrorMsg, "Could't find a ROM for movie."); - return 0; - } - get_ext(romFileName, ext); - } - else if (!strcmp(ext, ".pat")) { - int dummy; - PicoPatchLoad(romFileName); - dummy = try_rfn_cut() || try_rfn_cut(); - if (!dummy) { - sprintf(menuErrorMsg, "Could't find a ROM to patch."); - return 0; - } - get_ext(romFileName, ext); - } - - if ((PicoMCD & 1) && Pico_mcd != NULL) - Stop_CD(); - // check for MegaCD image - cd_state = emu_cd_check(&used_rom_name); - if (cd_state > 0) { - PicoMCD |= 1; - get_ext(used_rom_name, ext); - } else if (cd_state == -1) { - // bios_help() ? - return 0; - } else { - if (PicoMCD & 1) PicoExitMCD(); - PicoMCD &= ~1; - } + emu_text_out8_rot(x, y, text); +} - rom = pm_open(used_rom_name); - if(!rom) { - sprintf(menuErrorMsg, "Failed to open rom."); - return 0; - } +static void osd_text16_rot(int x, int y, const char *text) +{ + int len = strlen(text) * 8; + short *p = (short *)g_screen_ptr + 240*(320-x) + y; - if(rom_data) { - free(rom_data); - rom_data = 0; - rom_size = 0; + while (len--) { + memset(p, 0, 8*2); + p -= 240; } - if( (ret = PicoCartLoad(rom, &rom_data, &rom_size)) ) { - sprintf(menuErrorMsg, "PicoCartLoad() failed."); - printf("%s\n", menuErrorMsg); - pm_close(rom); - return 0; - } - pm_close(rom); - - // detect wrong files (Pico crashes on very small files), also see if ROM EP is good - if(rom_size <= 0x200 || strncmp((char *)rom_data, "Pico", 4) == 0 || - ((*(unsigned char *)(rom_data+4)<<16)|(*(unsigned short *)(rom_data+6))) >= (int)rom_size) { - if (rom_data) free(rom_data); - rom_data = 0; - sprintf(menuErrorMsg, "Not a ROM selected."); - return 0; - } + emu_text_out16_rot(x, y, text); +} - // load config for this ROM (do this before insert to get correct region) - ret = emu_ReadConfig(1); - if (!ret) - emu_ReadConfig(0); +static void draw_cd_leds(void) +{ + int led_reg, pitch, scr_offs, led_offs; + led_reg = Pico_mcd->s68k_regs[0]; - printf("PicoCartInsert(%p, %d);\n", rom_data, rom_size); - if(PicoCartInsert(rom_data, rom_size)) { - sprintf(menuErrorMsg, "Failed to load ROM."); - return 0; + if (currentConfig.EmuOpt & EOPT_WIZ_TEAR_FIX) { + pitch = 240; + led_offs = -pitch * 6; + scr_offs = pitch * (320 - 4); + } else { + pitch = 320; + led_offs = 4; + scr_offs = pitch * 2 + 4; } - Pico.m.frame_count = 0; - - // insert CD if it was detected - if (cd_state > 0) { - ret = Insert_CD(romFileName, cd_state == 2); - if (ret != 0) { - sprintf(menuErrorMsg, "Insert_CD() failed, invalid CD image?"); - printf("%s\n", menuErrorMsg); - return 0; - } + if (!is_16bit_mode()) { + #define p(x) px[(x) >> 2] + // 8-bit modes + unsigned int *px = (unsigned int *)((char *)g_screen_ptr + scr_offs); + unsigned int col_g = (led_reg & 2) ? 0xc0c0c0c0 : 0xe0e0e0e0; + unsigned int col_r = (led_reg & 1) ? 0xd0d0d0d0 : 0xe0e0e0e0; + p(pitch*0) = p(pitch*1) = p(pitch*2) = col_g; + p(pitch*0 + led_offs) = p(pitch*1 + led_offs) = p(pitch*2 + led_offs) = col_r; + #undef p + } else { + #define p(x) px[(x)*2 >> 2] = px[((x)*2 >> 2) + 1] + // 16-bit modes + unsigned int *px = (unsigned int *)((short *)g_screen_ptr + scr_offs); + unsigned int col_g = (led_reg & 2) ? 0x06000600 : 0; + unsigned int col_r = (led_reg & 1) ? 0xc000c000 : 0; + p(pitch*0) = p(pitch*1) = p(pitch*2) = col_g; + p(pitch*0 + led_offs) = p(pitch*1 + led_offs) = p(pitch*2 + led_offs) = col_r; + #undef p } +} - // emu_ReadConfig() might have messed currentConfig.lastRomFile - strncpy(currentConfig.lastRomFile, romFileName, sizeof(currentConfig.lastRomFile)-1); - currentConfig.lastRomFile[sizeof(currentConfig.lastRomFile)-1] = 0; +static void draw_pico_ptr(void) +{ + unsigned short *p = (unsigned short *)g_screen_ptr; + int x, y, pitch = 320; - if (PicoPatches) { - PicoPatchPrepare(); - PicoPatchApply(); - } + // only if pen enabled and for 16bit modes + if (pico_inp_mode == 0 || currentConfig.EmuOpt != RT_16BIT) + return; - // additional movie stuff - if(movie_data) { - if(movie_data[0x14] == '6') - PicoOpt |= 0x20; // 6 button pad - else PicoOpt &= ~0x20; - PicoOpt |= 0x40; // accurate timing - if(movie_data[0xF] >= 'A') { - if(movie_data[0x16] & 0x80) { - PicoRegionOverride = 8; - } else { - PicoRegionOverride = 4; - } - PicoReset(0); - // TODO: bits 6 & 5 - } - movie_data[0x18+30] = 0; - sprintf(noticeMsg, "MOVIE: %s", (char *) &movie_data[0x18]); - } - else - { - if(Pico.m.pal) { - strcpy(noticeMsg, "PAL SYSTEM / 50 FPS"); - } else { - strcpy(noticeMsg, "NTSC SYSTEM / 60 FPS"); - } - } - gettimeofday(¬iceMsgTime, 0); + x = pico_pen_x + PICO_PEN_ADJUST_X; + y = pico_pen_y + PICO_PEN_ADJUST_Y; + if (!(Pico.video.reg[12]&1) && !(PicoOpt & POPT_DIS_32C_BORDER)) + x += 32; - // load SRAM for this ROM - if(currentConfig.EmuOpt & 1) - emu_SaveLoadGame(1, 1); + if (currentConfig.EmuOpt & EOPT_WIZ_TEAR_FIX) { + pitch = 240; + p += (319 - x) * pitch + y; + } else + p += x + y * pitch; - return 1; + p[0] ^= 0xffff; + p[pitch-1] ^= 0xffff; + p[pitch] ^= 0xffff; + p[pitch+1] ^= 0xffff; + p[pitch*2] ^= 0xffff; } +/* rot thing for Wiz */ +static unsigned char __attribute__((aligned(4))) rot_buff[320*4*2]; -static void emu_msg_cb(const char *msg); -static void emu_msg_tray_open(void); - -void emu_Init(void) +static int EmuScanBegin16_rot(unsigned int num) { - // make temp buffer for alt renderer - framebuff = malloc((8+320)*(8+240+8)); - if (!framebuff) - { - printf("framebuff == 0\n"); - } - - // make dirs for saves, cfgs, etc. - mkdir("mds", 0777); - mkdir("srm", 0777); - mkdir("brm", 0777); - mkdir("cfg", 0777); - - PicoInit(); - PicoMessage = emu_msg_cb; - PicoMCDopenTray = emu_msg_tray_open; - PicoMCDcloseTray = menu_loop_tray; + DrawLineDest = rot_buff + (num & 3) * 320 * 2; + return 0; } - -static void romfname_ext(char *dst, const char *prefix, const char *ext) +static int EmuScanEnd16_rot(unsigned int num) { - char *p; - int prefix_len = 0; - - // make save filename - for (p = romFileName+strlen(romFileName)-1; p >= romFileName && *p != '/'; p--); p++; - *dst = 0; - if (prefix) { - strcpy(dst, prefix); - prefix_len = strlen(prefix); - } - strncpy(dst + prefix_len, p, 511-prefix_len); - dst[511-8] = 0; - if (dst[strlen(dst)-4] == '.') dst[strlen(dst)-4] = 0; - if (ext) strcat(dst, ext); + if ((num & 3) != 3) + return 0; + rotated_blit16(g_screen_ptr, rot_buff, num + 1, + !(Pico.video.reg[12] & 1) && !(PicoOpt & POPT_EN_SOFTSCALE)); + return 0; } - -static void find_combos(void) +static int EmuScanBegin8_rot(unsigned int num) { - int act, u; - - // find out which keys and actions are combos - combo_keys = combo_acts = 0; - for (act = 0; act < 32; act++) - { - int keyc = 0; - if (act == 16) continue; // player2 flag - for (u = 0; u < 32; u++) - { - if (currentConfig.KeyBinds[u] & (1 << act)) keyc++; - } - if (keyc > 1) - { - // loop again and mark those keys and actions as combo - for (u = 0; u < 32; u++) - { - if (currentConfig.KeyBinds[u] & (1 << act)) { - combo_keys |= 1 << u; - combo_acts |= 1 << act; - } - } - } - } - // printf("combo keys/acts: %08x %08x\n", combo_keys, combo_acts); + DrawLineDest = rot_buff + (num & 3) * 320; + return 0; } - -void scaling_update(void) +static int EmuScanEnd8_rot(unsigned int num) { - PicoOpt &= ~0x4100; - switch (currentConfig.scaling) { - default: break; // off - case 1: // hw hor - case 2: PicoOpt |= 0x0100; break; // hw hor+vert - case 3: PicoOpt |= 0x4000; break; // sw hor - } + if ((num & 3) != 3) + return 0; + rotated_blit8(g_screen_ptr, rot_buff, num + 1, + !(Pico.video.reg[12] & 1)); + return 0; } +/* line doublers */ +static unsigned int ld_counter; +static int ld_left, ld_lines; -int emu_ReadConfig(int game) +static int EmuScanBegin16_ld(unsigned int num) { - FILE *f; - char cfg[512], extbuf[16]; - int bread = 0; - - if (!game) - { - // set default config - memset(¤tConfig, 0, sizeof(currentConfig)); - currentConfig.lastRomFile[0] = 0; - currentConfig.EmuOpt = 0x1f | 0x600; // | confirm_save, cd_leds - currentConfig.PicoOpt = 0x0f | 0xe00; // | use_940, cd_pcm, cd_cdda - currentConfig.PsndRate = 22050; // 44100; - currentConfig.PicoRegion = 0; // auto - currentConfig.PicoAutoRgnOrder = 0x184; // US, EU, JP - currentConfig.Frameskip = -1; // auto - currentConfig.CPUclock = 200; - currentConfig.volume = 50; - currentConfig.KeyBinds[ 0] = 1<<0; // SACB RLDU - currentConfig.KeyBinds[ 4] = 1<<1; - currentConfig.KeyBinds[ 2] = 1<<2; - currentConfig.KeyBinds[ 6] = 1<<3; - currentConfig.KeyBinds[14] = 1<<4; - currentConfig.KeyBinds[13] = 1<<5; - currentConfig.KeyBinds[12] = 1<<6; - currentConfig.KeyBinds[ 8] = 1<<7; - currentConfig.KeyBinds[15] = 1<<26; // switch rend - currentConfig.KeyBinds[10] = 1<<27; // save state - currentConfig.KeyBinds[11] = 1<<28; // load state - currentConfig.KeyBinds[23] = 1<<29; // vol up - currentConfig.KeyBinds[22] = 1<<30; // vol down - currentConfig.gamma = 100; - currentConfig.PicoCDBuffers = 64; - currentConfig.scaling = 0; - strncpy(cfg, PicoConfigFile, 511); - if (config_slot != 0) - { - char *p = strrchr(cfg, '.'); - if (p == NULL) p = cfg + strlen(cfg); - sprintf(extbuf, ".%i.pbcfg", config_slot); - strncpy(p, extbuf, 511 - (p - cfg)); - } - cfg[511] = 0; - } else { - if (config_slot != 0) - sprintf(extbuf, ".%i.pbcfg", config_slot); - else strcpy(extbuf, ".pbcfg"); - romfname_ext(cfg, "cfg/", extbuf); - f = fopen(cfg, "rb"); - if (!f) romfname_ext(cfg, NULL, ".pbcfg"); - else fclose(f); - } + if ((signed int)(ld_counter - num) > 100) + ld_counter = 0; - printf("emu_ReadConfig: %s ", cfg); - f = fopen(cfg, "rb"); - if (f) { - bread = fread(¤tConfig, 1, sizeof(currentConfig), f); - fclose(f); - } - printf(bread > 0 ? "(ok)\n" : "(failed)\n"); - - PicoOpt = currentConfig.PicoOpt; - PsndRate = currentConfig.PsndRate; - PicoRegionOverride = currentConfig.PicoRegion; - PicoAutoRgnOrder = currentConfig.PicoAutoRgnOrder; - PicoCDBuffers = currentConfig.PicoCDBuffers; - if (PicoOpt & 0x20) { - actionNames[ 8] = "Z"; actionNames[ 9] = "Y"; - actionNames[10] = "X"; actionNames[11] = "MODE"; - } - scaling_update(); - // some sanity checks - if (currentConfig.CPUclock < 10 || currentConfig.CPUclock > 4096) currentConfig.CPUclock = 200; - if (currentConfig.gamma < 10 || currentConfig.gamma > 300) currentConfig.gamma = 100; - if (currentConfig.volume < 0 || currentConfig.volume > 99) currentConfig.volume = 50; - // if volume keys are unbound, bind them to volume control - if (!currentConfig.KeyBinds[23] && !currentConfig.KeyBinds[22]) { - currentConfig.KeyBinds[23] = 1<<29; // vol up - currentConfig.KeyBinds[22] = 1<<30; // vol down - } + if (emu_scan_begin) + return emu_scan_begin(ld_counter); + else + DrawLineDest = (char *)g_screen_ptr + 320 * ld_counter * gp2x_current_bpp / 8; - if (bread > 0) config_slot_current = config_slot; - return (bread > 0); // == sizeof(currentConfig)); + return 0; } - -int emu_WriteConfig(int game) +static int EmuScanEnd16_ld(unsigned int num) { - FILE *f; - char cfg[512], extbuf[16]; - int bwrite = 0; + void *oldline = DrawLineDest; - if (!game) - { - strncpy(cfg, PicoConfigFile, 511); - if (config_slot != 0) - { - char *p = strrchr(cfg, '.'); - if (p == NULL) p = cfg + strlen(cfg); - sprintf(extbuf, ".%i.pbcfg", config_slot); - strncpy(p, extbuf, 511 - (p - cfg)); - } - cfg[511] = 0; - } else { - if (config_slot != 0) - sprintf(extbuf, ".%i.pbcfg", config_slot); - else strcpy(extbuf, ".pbcfg"); - romfname_ext(cfg, "cfg/", extbuf); - } + if (emu_scan_end) + emu_scan_end(ld_counter); - printf("emu_WriteConfig: %s ", cfg); - f = fopen(cfg, "wb"); - if (f) { - currentConfig.PicoOpt = PicoOpt; - currentConfig.PsndRate = PsndRate; - currentConfig.PicoRegion = PicoRegionOverride; - currentConfig.PicoAutoRgnOrder = PicoAutoRgnOrder; - currentConfig.PicoCDBuffers = PicoCDBuffers; - bwrite = fwrite(¤tConfig, 1, sizeof(currentConfig), f); - fflush(f); - fclose(f); -#ifndef NO_SYNC - sync(); -#endif - } - printf((bwrite == sizeof(currentConfig)) ? "(ok)\n" : "(failed)\n"); - - if (bwrite == sizeof(currentConfig)) config_slot_current = config_slot; - return (bwrite == sizeof(currentConfig)); -} + ld_counter++; + ld_left--; + if (ld_left <= 0) { + ld_left = ld_lines; + EmuScanBegin16_ld(num); + memcpy32(DrawLineDest, oldline, 320 * gp2x_current_bpp / 8 / 4); + if (emu_scan_end) + emu_scan_end(ld_counter); -void emu_Deinit(void) -{ - // save SRAM - if((currentConfig.EmuOpt & 1) && SRam.changed) { - emu_SaveLoadGame(0, 1); - SRam.changed = 0; + ld_counter++; } - if (!(currentConfig.EmuOpt & 0x20)) { - FILE *f = fopen(PicoConfigFile, "r+b"); - if (!f) emu_WriteConfig(0); - else { - // if we already have config, reload it, except last ROM - fseek(f, sizeof(currentConfig.lastRomFile), SEEK_SET); - fread(¤tConfig.EmuOpt, 1, sizeof(currentConfig) - sizeof(currentConfig.lastRomFile), f); - fseek(f, 0, SEEK_SET); - fwrite(¤tConfig, 1, sizeof(currentConfig), f); - fflush(f); - fclose(f); -#ifndef NO_SYNC - sync(); -#endif - } - } - - free(framebuff); - - PicoExit(); - - // restore gamma - if (gp2x_old_gamma != 100) - set_gamma(100, 0); + return 0; } +static int localPal[0x100]; +static void (*vidcpyM2)(void *dest, void *src, int m32col, int with_32c_border); +static int (*make_local_pal)(int fast_mode); -void osd_text(int x, int y, const char *text) +static int make_local_pal_md(int fast_mode) { - int len = strlen(text)*8; - - if ((PicoOpt&0x10)||!(currentConfig.EmuOpt&0x80)) { - int *p, i, h; - x &= ~3; // align x - len = (len+3) >> 2; - for (h = 0; h < 8; h++) { - p = (int *) ((unsigned char *) gp2x_screen+x+320*(y+h)); - for (i = len; i; i--, p++) *p = 0xe0e0e0e0; - } - gp2x_text_out8_2(x, y, text, 0xf0); - } else { - int *p, i, h; - x &= ~1; // align x - len = (len+1) >> 1; - for (h = 0; h < 8; h++) { - p = (int *) ((unsigned short *) gp2x_screen+x+320*(y+h)); - for (i = len; i; i--, p++) *p = (*p>>2)&0x39e7; - } - gp2x_text_out15(x, y, text); - } -} + int pallen = 0xc0; -static void cd_leds(void) -{ - // mmu problems? -// static - int old_reg; -// if (!((Pico_mcd->s68k_regs[0] ^ old_reg) & 3)) return; // no change - old_reg = Pico_mcd->s68k_regs[0]; + bgr444_to_rgb32(localPal, Pico.cram); + if (fast_mode) + return 0x40; - if ((PicoOpt&0x10)||!(currentConfig.EmuOpt&0x80)) { - // 8-bit modes - unsigned int col_g = (old_reg & 2) ? 0xc0c0c0c0 : 0xe0e0e0e0; - unsigned int col_r = (old_reg & 1) ? 0xd0d0d0d0 : 0xe0e0e0e0; - *(unsigned int *)((char *)gp2x_screen + 320*2+ 4) = - *(unsigned int *)((char *)gp2x_screen + 320*3+ 4) = - *(unsigned int *)((char *)gp2x_screen + 320*4+ 4) = col_g; - *(unsigned int *)((char *)gp2x_screen + 320*2+12) = - *(unsigned int *)((char *)gp2x_screen + 320*3+12) = - *(unsigned int *)((char *)gp2x_screen + 320*4+12) = col_r; - } else { - // 16-bit modes - unsigned int *p = (unsigned int *)((short *)gp2x_screen + 320*2+4); - unsigned int col_g = (old_reg & 2) ? 0x06000600 : 0; - unsigned int col_r = (old_reg & 1) ? 0xc000c000 : 0; - *p++ = col_g; *p++ = col_g; p+=2; *p++ = col_r; *p++ = col_r; p += 320/2 - 12/2; - *p++ = col_g; *p++ = col_g; p+=2; *p++ = col_r; *p++ = col_r; p += 320/2 - 12/2; - *p++ = col_g; *p++ = col_g; p+=2; *p++ = col_r; *p++ = col_r; p += 320/2 - 12/2; + if (Pico.video.reg[0xC] & 8) { // shadow/hilight mode + bgr444_to_rgb32_sh(localPal, Pico.cram); + localPal[0xc0] = 0x0000c000; + localPal[0xd0] = 0x00c00000; + localPal[0xe0] = 0x00000000; // reserved pixels for OSD + localPal[0xf0] = 0x00ffffff; + pallen = 0x100; } -} - -static int EmuScan16(unsigned int num, void *sdata) -{ - if (!(Pico.video.reg[1]&8)) num += 8; - DrawLineDest = (unsigned short *) gp2x_screen + 320*(num+1); + else if (rendstatus & PDRAW_SONIC_MODE) { // mid-frame palette changes + bgr444_to_rgb32(localPal+0x40, HighPal); + bgr444_to_rgb32(localPal+0x80, HighPal+0x40); + } + else + memcpy32(localPal+0x80, localPal, 0x40); // for spr prio mess - return 0; + return pallen; } -static int EmuScan8(unsigned int num, void *sdata) +static int make_local_pal_sms(int fast_mode) { - if (!(Pico.video.reg[1]&8)) num += 8; - DrawLineDest = (unsigned char *) gp2x_screen + 320*(num+1); + unsigned short *spal = Pico.cram; + unsigned int *dpal = (void *)localPal; + unsigned int i, t; - return 0; -} + for (i = 0x40; i > 0; i--) { + t = *spal++; + t = ((t & 0x0003) << 22) | ((t & 0x000c) << 12) | ((t & 0x0030) << 2); + t |= t >> 2; + t |= t >> 4; + *dpal++ = t; + } -int localPal[0x100]; -static void (*vidCpyM2)(void *dest, void *src) = NULL; + return 0x40; +} -static void blit(const char *fps, const char *notice) +void pemu_finalize_frame(const char *fps, const char *notice) { int emu_opt = currentConfig.EmuOpt; + int ret; - if (PicoOpt&0x10) { + if (PicoAHW & PAHW_32X) + ; // nothing to do + else if (get_renderer() == RT_8BIT_FAST) + { // 8bit fast renderer if (Pico.m.dirtyPal) { Pico.m.dirtyPal = 0; - vidConvCpyRGB32(localPal, Pico.cram, 0x40); + ret = make_local_pal(1); // feed new palette to our device - gp2x_video_setpalette(localPal, 0x40); + gp2x_video_setpalette(localPal, ret); } - vidCpyM2((unsigned char *)gp2x_screen+320*8, framebuff+328*8); - } else if (!(emu_opt&0x80)) { + // a hack for VR + if (PicoAHW & PAHW_SVP) + memset32((int *)(PicoDraw2FB+328*8+328*223), 0xe0e0e0e0, 328); + // do actual copy + vidcpyM2(g_screen_ptr, PicoDraw2FB+328*8, + !(Pico.video.reg[12] & 1), !(PicoOpt & POPT_DIS_32C_BORDER)); + } + else if (get_renderer() == RT_8BIT_ACC) + { // 8bit accurate renderer - if (Pico.m.dirtyPal) { + if (Pico.m.dirtyPal) + { Pico.m.dirtyPal = 0; - if(Pico.video.reg[0xC]&8) { // shadow/hilight mode - vidConvCpyRGB32(localPal, Pico.cram, 0x40); - vidConvCpyRGB32sh(localPal+0x40, Pico.cram, 0x40); - vidConvCpyRGB32hi(localPal+0x80, Pico.cram, 0x40); - blockcpy(localPal+0xc0, localPal+0x40, 0x40*4); - localPal[0xc0] = 0x0000c000; - localPal[0xd0] = 0x00c00000; - localPal[0xe0] = 0x00000000; // reserved pixels for OSD - localPal[0xf0] = 0x00ffffff; - gp2x_video_setpalette(localPal, 0x100); - } else if (rendstatus & 0x20) { // mid-frame palette changes - vidConvCpyRGB32(localPal, Pico.cram, 0x40); - vidConvCpyRGB32(localPal+0x40, HighPal, 0x40); - vidConvCpyRGB32(localPal+0x80, HighPal+0x40, 0x40); - gp2x_video_setpalette(localPal, 0xc0); - } else { - vidConvCpyRGB32(localPal, Pico.cram, 0x40); - gp2x_video_setpalette(localPal, 0x40); - } + ret = make_local_pal(0); + gp2x_video_setpalette(localPal, ret); } } - if (notice || (emu_opt & 2)) { - int h = 232; - if (currentConfig.scaling == 2 && !(Pico.video.reg[1]&8)) h -= 8; - if (notice) osd_text(4, h, notice); - if (emu_opt & 2) - osd_text(osd_fps_x, h, fps); - } - if ((emu_opt & 0x400) && (PicoMCD & 1)) - cd_leds(); + if (notice) + osd_text(4, osd_y, notice); + if (emu_opt & EOPT_SHOW_FPS) + osd_text(osd_fps_x, osd_y, fps); + if ((PicoAHW & PAHW_MCD) && (emu_opt & EOPT_EN_CD_LEDS)) + draw_cd_leds(); + if (PicoAHW & PAHW_PICO) + draw_pico_ptr(); +} - //gp2x_video_wait_vsync(); +void plat_video_flip(void) +{ + int stride = g_screen_width; gp2x_video_flip(); - if (!(PicoOpt&0x10)) { - if (!(Pico.video.reg[1]&8)) { - if (currentConfig.EmuOpt&0x80) { - DrawLineDest = (unsigned short *) gp2x_screen + 320*8; - } else { - DrawLineDest = (unsigned char *) gp2x_screen + 320*8; - } - } else { - DrawLineDest = gp2x_screen; - } - } + if (is_16bit_mode()) + stride *= 2; + PicoDrawSetOutBuf(g_screen_ptr, stride); } - -// clears whole screen or just the notice area (in all buffers) -static void clearArea(int full) +/* XXX */ +#ifdef __GP2X__ +unsigned int plat_get_ticks_ms(void) { - if ((PicoOpt&0x10)||!(currentConfig.EmuOpt&0x80)) { - // 8-bit renderers - if (full) gp2x_memset_all_buffers(0, 0xe0, 320*240); - else gp2x_memset_all_buffers(320*232, 0xe0, 320*8); - } else { - // 16bit accurate renderer - if (full) gp2x_memset_all_buffers(0, 0, 320*240*2); - else gp2x_memset_all_buffers(320*232*2, 0, 320*8*2); - } + return gp2x_get_ticks_ms(); } - -static void vidResetMode(void) +unsigned int plat_get_ticks_us(void) { - if (PicoOpt&0x10) { - gp2x_video_changemode(8); - } else if (currentConfig.EmuOpt&0x80) { - gp2x_video_changemode(15); - PicoDrawSetColorFormat(1); - PicoScan = EmuScan16; - PicoScan(0, 0); - } else { - gp2x_video_changemode(8); - PicoDrawSetColorFormat(2); - PicoScan = EmuScan8; - PicoScan(0, 0); - } - if ((PicoOpt&0x10)||!(currentConfig.EmuOpt&0x80)) { - // setup pal for 8-bit modes - localPal[0xc0] = 0x0000c000; // MCD LEDs - localPal[0xd0] = 0x00c00000; - localPal[0xe0] = 0x00000000; // reserved pixels for OSD - localPal[0xf0] = 0x00ffffff; - gp2x_video_setpalette(localPal, 0x100); - gp2x_memset_all_buffers(0, 0xe0, 320*240); - gp2x_video_flip(); - } - Pico.m.dirtyPal = 1; - // reset scaling - if (currentConfig.scaling == 2 && !(Pico.video.reg[1]&8)) - gp2x_video_RGB_setscaling(8, (PicoOpt&0x100)&&!(Pico.video.reg[12]&1) ? 256 : 320, 224); - else gp2x_video_RGB_setscaling(0, (PicoOpt&0x100)&&!(Pico.video.reg[12]&1) ? 256 : 320, 240); + return gp2x_get_ticks_us(); } +#endif - -static void emu_msg_cb(const char *msg) +void plat_wait_till_us(unsigned int us_to) { - if ((PicoOpt&0x10)||!(currentConfig.EmuOpt&0x80)) { - // 8-bit renderers - gp2x_memset_all_buffers(320*232, 0xe0, 320*8); - osd_text(4, 232, msg); - gp2x_memcpy_all_buffers((char *)gp2x_screen+320*232, 320*232, 320*8); - } else { - // 16bit accurate renderer - gp2x_memset_all_buffers(320*232*2, 0, 320*8*2); - osd_text(4, 232, msg); - gp2x_memcpy_all_buffers((char *)gp2x_screen+320*232*2, 320*232*2, 320*8*2); - } - gettimeofday(¬iceMsgTime, 0); - noticeMsgTime.tv_sec -= 2; + unsigned int now; - /* assumption: emu_msg_cb gets called only when something slow is about to happen */ - reset_timing = 1; -} + spend_cycles(1024); + now = plat_get_ticks_us(); -static void emu_state_cb(const char *str) -{ - clearArea(0); - blit("", str); + while ((signed int)(us_to - now) > 512) + { + spend_cycles(1024); + now = plat_get_ticks_us(); + } } -static void emu_msg_tray_open(void) +void plat_video_wait_vsync(void) { - strcpy(noticeMsg, "CD tray opened"); - gettimeofday(¬iceMsgTime, 0); + gp2x_video_wait_vsync(); } -static void RunEvents(unsigned int which) +void plat_status_msg_clear(void) { - if(which & 0x1800) { // save or load (but not both) - int do_it = 1; - if ( emu_check_save_file(state_slot) && - (( (which & 0x1000) && (currentConfig.EmuOpt & 0x800)) || // load - (!(which & 0x1000) && (currentConfig.EmuOpt & 0x200))) ) { // save - unsigned long keys; - blit("", (which & 0x1000) ? "LOAD STATE? (Y=yes, X=no)" : "OVERWRITE SAVE? (Y=yes, X=no)"); - while( !((keys = gp2x_joystick_read(1)) & (GP2X_X|GP2X_Y)) ) - usleep(50*1024); - if (keys & GP2X_X) do_it = 0; - clearArea(0); - } - if (do_it) { - osd_text(4, 232, (which & 0x1000) ? "LOADING GAME" : "SAVING GAME"); - PicoStateProgressCB = emu_state_cb; - gp2x_memcpy_all_buffers(gp2x_screen, 0, 320*240*2); - emu_SaveLoadGame((which & 0x1000) >> 12, 0); - PicoStateProgressCB = NULL; + int is_8bit = !is_16bit_mode(); + if (currentConfig.EmuOpt & EOPT_WIZ_TEAR_FIX) { + /* ugh.. */ + int i, u, *p; + if (is_8bit) { + for (i = 0; i < 4; i++) { + p = (int *)gp2x_screens[i] + (240-8) / 4; + for (u = 320; u > 0; u--, p += 240/4) + p[0] = p[1] = 0xe0e0e0e0; + } + } else { + for (i = 0; i < 4; i++) { + p = (int *)gp2x_screens[i] + (240-8)*2 / 4; + for (u = 320; u > 0; u--, p += 240*2/4) + p[0] = p[1] = p[2] = p[3] = 0; + } } - - reset_timing = 1; + return; } - if(which & 0x0400) { // switch renderer - if ( PicoOpt&0x10) { PicoOpt&=~0x10; currentConfig.EmuOpt |= 0x80; } - else if (!(currentConfig.EmuOpt&0x80)) PicoOpt|= 0x10; - else currentConfig.EmuOpt &= ~0x80; - vidResetMode(); + if (is_8bit) + gp2x_memset_all_buffers(320*232, 0xe0, 320*8); + else + gp2x_memset_all_buffers(320*232*2, 0, 320*8*2); +} - if (PicoOpt&0x10) { - strcpy(noticeMsg, " 8bit fast renderer"); - } else if (currentConfig.EmuOpt&0x80) { - strcpy(noticeMsg, "16bit accurate renderer"); - } else { - strcpy(noticeMsg, " 8bit accurate renderer"); - } +void plat_status_msg_busy_next(const char *msg) +{ + plat_status_msg_clear(); + pemu_finalize_frame("", msg); + plat_video_flip(); + emu_status_msg(""); - gettimeofday(¬iceMsgTime, 0); - } - if(which & 0x0300) { - if(which&0x0200) { - state_slot -= 1; - if(state_slot < 0) state_slot = 9; - } else { - state_slot += 1; - if(state_slot > 9) state_slot = 0; - } - sprintf(noticeMsg, "SAVE SLOT %i [%s]", state_slot, emu_check_save_file(state_slot) ? "USED" : "FREE"); - gettimeofday(¬iceMsgTime, 0); - } - if(which & 0x0080) { - engineState = PGS_Menu; - } + /* assumption: msg_busy_next gets called only when + * something slow is about to happen */ + reset_timing = 1; } - -static void updateMovie(void) +void plat_status_msg_busy_first(const char *msg) { - int offs = Pico.m.frame_count*3 + 0x40; - if (offs+3 > movie_size) { - free(movie_data); - movie_data = 0; - strcpy(noticeMsg, "END OF MOVIE."); - printf("END OF MOVIE.\n"); - gettimeofday(¬iceMsgTime, 0); - } else { - // MXYZ SACB RLDU - PicoPad[0] = ~movie_data[offs] & 0x8f; // ! SCBA RLDU - if(!(movie_data[offs] & 0x10)) PicoPad[0] |= 0x40; // A - if(!(movie_data[offs] & 0x20)) PicoPad[0] |= 0x10; // B - if(!(movie_data[offs] & 0x40)) PicoPad[0] |= 0x20; // A - PicoPad[1] = ~movie_data[offs+1] & 0x8f; // ! SCBA RLDU - if(!(movie_data[offs+1] & 0x10)) PicoPad[1] |= 0x40; // A - if(!(movie_data[offs+1] & 0x20)) PicoPad[1] |= 0x10; // B - if(!(movie_data[offs+1] & 0x40)) PicoPad[1] |= 0x20; // A - PicoPad[0] |= (~movie_data[offs+2] & 0x0A) << 8; // ! MZYX - if(!(movie_data[offs+2] & 0x01)) PicoPad[0] |= 0x0400; // X - if(!(movie_data[offs+2] & 0x04)) PicoPad[0] |= 0x0100; // Z - PicoPad[1] |= (~movie_data[offs+2] & 0xA0) << 4; // ! MZYX - if(!(movie_data[offs+2] & 0x10)) PicoPad[1] |= 0x0400; // X - if(!(movie_data[offs+2] & 0x40)) PicoPad[1] |= 0x0100; // Z - } + gp2x_memcpy_all_buffers(g_screen_ptr, 0, 320*240*2); + plat_status_msg_busy_next(msg); } - -static void updateKeys(void) +static void vid_reset_mode(void) { - unsigned long keys, allActions[2] = { 0, 0 }, events; - static unsigned long prevEvents = 0; - int joy, i; - - keys = gp2x_joystick_read(0); - if (keys & GP2X_SELECT) { - engineState = select_exits ? PGS_Quit : PGS_Menu; - // wait until select is released, so menu would not resume game - while (gp2x_joystick_read(1) & GP2X_SELECT) usleep(50*1000); - } + int gp2x_mode = 16; + int renderer = get_renderer(); - keys &= CONFIGURABLE_KEYS; + PicoOpt &= ~POPT_ALT_RENDERER; + emu_scan_begin = NULL; + emu_scan_end = NULL; - for (i = 0; i < 32; i++) - { - if (keys & (1 << i)) { - int pl, acts = currentConfig.KeyBinds[i]; - if (!acts) continue; - pl = (acts >> 16) & 1; - if (combo_keys & (1 << i)) { - int u = i+1, acts_c = acts & combo_acts; - // let's try to find the other one - if (acts_c) - for (; u < 32; u++) - if ( (currentConfig.KeyBinds[u] & acts_c) && (keys & (1 << u)) ) { - allActions[pl] |= acts_c; - keys &= ~((1 << i) | (1 << u)); - break; - } - // add non-combo actions if combo ones were not found - if (!acts_c || u == 32) - allActions[pl] |= acts & ~combo_acts; - } else { - allActions[pl] |= acts; - } + switch (renderer) { + case RT_16BIT: + PicoDrawSetOutFormat(PDF_RGB555, 0); + PicoDrawSetOutBuf(g_screen_ptr, g_screen_width * 2); + break; + case RT_8BIT_ACC: + PicoDrawSetOutFormat(PDF_8BIT, 0); + PicoDrawSetOutBuf(g_screen_ptr, g_screen_width); + gp2x_mode = 8; + break; + case RT_8BIT_FAST: + PicoOpt |= POPT_ALT_RENDERER; + PicoDrawSetOutFormat(PDF_NONE, 0); + vidcpyM2 = vidcpy_m2; + gp2x_mode = 8; + break; + default: + printf("bad renderer\n"); + break; + } + + if (PicoAHW & PAHW_32X) { + // Wiz 16bit is an exception, uses line rendering due to rotation mess + if (renderer == RT_16BIT && (currentConfig.EmuOpt & EOPT_WIZ_TEAR_FIX)) { + PicoDrawSetOutFormat(PDF_RGB555, 1); + PicoDraw32xSetFrameMode(0, 0); + } + else { + PicoDrawSetOutFormat(PDF_NONE, 0); + PicoDraw32xSetFrameMode(1, 0); } + PicoDrawSetOutBuf(g_screen_ptr, g_screen_width * 2); + gp2x_mode = 16; } - // add joy inputs - if (num_of_joys > 0) - { - gp2x_usbjoy_update(); - for (joy = 0; joy < num_of_joys; joy++) { - int keys = gp2x_usbjoy_check2(joy); - for (i = 0; i < 32; i++) { - if (keys & (1 << i)) { - int acts = currentConfig.JoyBinds[joy][i]; - int pl = (acts >> 16) & 1; - allActions[pl] |= acts; - } - } + if (currentConfig.EmuOpt & EOPT_WIZ_TEAR_FIX) { + if ((PicoAHW & PAHW_32X) || renderer == RT_16BIT) { + emu_scan_begin = EmuScanBegin16_rot; + emu_scan_end = EmuScanEnd16_rot; + } + else if (renderer == RT_8BIT_ACC) { + emu_scan_begin = EmuScanBegin8_rot; + emu_scan_end = EmuScanEnd8_rot; } + else if (renderer == RT_8BIT_FAST) + vidcpyM2 = vidcpy_m2_rot; } - PicoPad[0] = (unsigned short) allActions[0]; - PicoPad[1] = (unsigned short) allActions[1]; + PicoDrawSetCallbacks(emu_scan_begin, emu_scan_end); - events = (allActions[0] | allActions[1]) >> 16; + if (is_16bit_mode()) + osd_text = (currentConfig.EmuOpt & EOPT_WIZ_TEAR_FIX) ? osd_text16_rot : osd_text16; + else + osd_text = (currentConfig.EmuOpt & EOPT_WIZ_TEAR_FIX) ? osd_text8_rot : osd_text8; - // volume is treated in special way and triggered every frame - if(events & 0x6000) { - int vol = currentConfig.volume; - if (events & 0x2000) { - if (vol < 99) vol++; - } else { - if (vol > 0) vol--; - } - gp2x_sound_volume(vol, vol); - sprintf(noticeMsg, "VOL: %02i", vol); - gettimeofday(¬iceMsgTime, 0); - currentConfig.volume = vol; + gp2x_video_wait_vsync(); + if (!is_16bit_mode()) { + // setup pal for 8-bit modes + localPal[0xc0] = 0x0000c000; // MCD LEDs + localPal[0xd0] = 0x00c00000; + localPal[0xe0] = 0x00000000; // reserved pixels for OSD + localPal[0xf0] = 0x00ffffff; + gp2x_video_setpalette(localPal, 0x100); + gp2x_memset_all_buffers(0, 0xe0, 320*240); } + else + gp2x_memset_all_buffers(0, 0, 320*240*2); - events &= ~prevEvents; - if (events) RunEvents(events); - if (movie_data) updateMovie(); + if (currentConfig.EmuOpt & EOPT_WIZ_TEAR_FIX) + gp2x_mode = -gp2x_mode; - prevEvents = (allActions[0] | allActions[1]) >> 16; -} + gp2x_video_changemode(gp2x_mode); + Pico.m.dirtyPal = 1; -static void updateSound(int len) -{ - if (PicoOpt&8) len<<=1; + PicoOpt &= ~POPT_EN_SOFTSCALE; + if (currentConfig.scaling == EOPT_SCALE_SW) + PicoOpt |= POPT_EN_SOFTSCALE; - /* avoid writing audio when lagging behind to prevent audio lag */ - if (PicoSkipFrame != 2) - gp2x_sound_write(PsndOut, len<<1); + // palette converters for 8bit modes + make_local_pal = (PicoAHW & PAHW_SMS) ? make_local_pal_sms : make_local_pal_md; } - -static void SkipFrame(int do_audio) +void emu_video_mode_change(int start_line, int line_count, int is_32cols) { - PicoSkipFrame=do_audio ? 1 : 2; - PicoFrame(); - PicoSkipFrame=0; -} + int scalex = 320, scaley = 240; + int ln_offs = 0; + if (doing_bg_frame) + return; -void emu_forced_frame(void) -{ - int po_old = PicoOpt; + osd_fps_x = OSD_FPS_X; + osd_y = 232; - PicoOpt |= 0x10; - PicoFrameFull(); + /* set up hwscaling here */ + PicoOpt &= ~POPT_DIS_32C_BORDER; + if (is_32cols && currentConfig.scaling == EOPT_SCALE_HW) { + scalex = 256; + PicoOpt |= POPT_DIS_32C_BORDER; + osd_fps_x = OSD_FPS_X - 64; + } - if (!(Pico.video.reg[12]&1)) { - vidCpyM2 = vidCpyM2_32col; - clearArea(1); - } else vidCpyM2 = vidCpyM2_40col; + if (currentConfig.vscaling == EOPT_SCALE_HW) { + ln_offs = start_line; + scaley = line_count; + osd_y = start_line + line_count - 8; + } - vidCpyM2((unsigned char *)gp2x_screen+320*8, framebuff+328*8); - vidConvCpyRGB32(localPal, Pico.cram, 0x40); - gp2x_video_setpalette(localPal, 0x40); + gp2x_video_RGB_setscaling(ln_offs, scalex, scaley); - PicoOpt = po_old; + /* line doubling */ + if (currentConfig.vscaling == EOPT_SCALE_SW && line_count < 240) { + ld_lines = ld_left = line_count / (240 - line_count); + PicoDrawSetCallbacks(EmuScanBegin16_ld, EmuScanEnd16_ld); + } + + // clear whole screen in all buffers + if (!is_16bit_mode()) + gp2x_memset_all_buffers(0, 0xe0, 320*240); + else + gp2x_memset_all_buffers(0, 0, 320*240*2); } -static void simpleWait(int thissec, int lim_time) +void plat_video_toggle_renderer(int change, int is_menu_call) { - struct timeval tval; + change_renderer(change); - spend_cycles(1024); - gettimeofday(&tval, 0); - if(thissec != tval.tv_sec) tval.tv_usec+=1000000; + if (is_menu_call) + return; - while(tval.tv_usec < lim_time) - { - spend_cycles(1024); - gettimeofday(&tval, 0); - if(thissec != tval.tv_sec) tval.tv_usec+=1000000; - } -} + vid_reset_mode(); + rendstatus_old = -1; + if (PicoAHW & PAHW_32X) + emu_status_msg(renderer_names32x[get_renderer()]); + else + emu_status_msg(renderer_names[get_renderer()]); +} -void emu_Loop(void) +#if 0 // TODO +static void RunEventsPico(unsigned int events) { - static int gp2x_old_clock = 200; - static int PsndRate_old = 0, PicoOpt_old = 0, EmuOpt_old = 0, PsndLen_real = 0, pal_old = 0; - char fpsbuff[24]; // fps count c string - struct timeval tval; // timing - int thissec = 0, frames_done = 0, frames_shown = 0, oldmodes = 0; - int target_fps, target_frametime, lim_time, vsync_offset, i; - char *notice = 0; - - printf("entered emu_Loop()\n"); - - if (gp2x_old_clock != currentConfig.CPUclock) { - printf("changing clock to %i...", currentConfig.CPUclock); fflush(stdout); - set_FCLK(currentConfig.CPUclock); - gp2x_old_clock = currentConfig.CPUclock; - printf(" done\n"); - } + int ret, px, py, lim_x; + static int pdown_frames = 0; - if (gp2x_old_gamma != currentConfig.gamma || (EmuOpt_old&0x1000) != (currentConfig.EmuOpt&0x1000)) { - set_gamma(currentConfig.gamma, !!(currentConfig.EmuOpt&0x1000)); - gp2x_old_gamma = currentConfig.gamma; - printf("updated gamma to %i, A_SN's curve: %i\n", currentConfig.gamma, !!(currentConfig.EmuOpt&0x1000)); - } + // for F200 + ret = gp2x_touchpad_read(&px, &py); + if (ret >= 0) + { + if (ret > 35000) + { + if (pdown_frames++ > 5) + PicoPad[0] |= 0x20; + + pico_pen_x = px; + pico_pen_y = py; + if (!(Pico.video.reg[12]&1)) { + pico_pen_x -= 32; + if (pico_pen_x < 0) pico_pen_x = 0; + if (pico_pen_x > 248) pico_pen_x = 248; + } + if (pico_pen_y > 224) pico_pen_y = 224; + } + else + pdown_frames = 0; - if ((EmuOpt_old&0x2000) != (currentConfig.EmuOpt&0x2000)) { - if (currentConfig.EmuOpt&0x2000) - set_LCD_custom_rate(Pico.m.pal ? LCDR_100 : LCDR_120); - else unset_LCD_custom_rate(); + //if (ret == 0) + // PicoPicohw.pen_pos[0] = PicoPicohw.pen_pos[1] = 0x8000; } +} +#endif - EmuOpt_old = currentConfig.EmuOpt; - fpsbuff[0] = 0; - - // make sure we are in correct mode - vidResetMode(); - Pico.m.dirtyPal = 1; - oldmodes = ((Pico.video.reg[12]&1)<<2) ^ 0xc; - find_combos(); +void plat_update_volume(int has_changed, int is_up) +{ + static int prev_frame = 0, wait_frames = 0; + int vol = currentConfig.volume; + int need_low_volume = 0; + gp2x_soc_t soc; - // pal/ntsc might have changed, reset related stuff - target_fps = Pico.m.pal ? 50 : 60; - target_frametime = 1000000/target_fps; - reset_timing = 1; + soc = soc_detect(); + if ((PicoOpt & POPT_EN_STEREO) && soc == SOCID_MMSP2) + need_low_volume = 1; - // prepare sound stuff - if(currentConfig.EmuOpt & 4) { - int snd_excess_add; - if(PsndRate != PsndRate_old || (PicoOpt&0x20b) != (PicoOpt_old&0x20b) || Pico.m.pal != pal_old || crashed_940) { - /* if 940 is turned off, we need it to be put back to sleep */ - if (!(PicoOpt&0x200) && ((PicoOpt^PicoOpt_old)&0x200)) { - Reset940(1, 2); - Pause940(1); + if (has_changed) + { + if (need_low_volume && vol < 5 && prev_frame == Pico.m.frame_count - 1 && wait_frames < 12) + wait_frames++; + else { + if (is_up) { + if (vol < 99) vol++; + } else { + if (vol > 0) vol--; } - sound_rerate(1); + wait_frames = 0; + sndout_oss_setvol(vol, vol); + currentConfig.volume = vol; } - //excess_samples = PsndRate - PsndLen*target_fps; - snd_excess_add = ((PsndRate - PsndLen*target_fps)<<16) / target_fps; - printf("starting audio: %i len: %i (ex: %04x) stereo: %i, pal: %i\n", PsndRate, PsndLen, snd_excess_add, (PicoOpt&8)>>3, Pico.m.pal); - gp2x_start_sound(PsndRate, 16, (PicoOpt&8)>>3); - gp2x_sound_volume(currentConfig.volume, currentConfig.volume); - PicoWriteSound = updateSound; - memset(sndBuffer, 0, sizeof(sndBuffer)); - PsndOut = sndBuffer; - PsndRate_old = PsndRate; - PsndLen_real = PsndLen; - PicoOpt_old = PicoOpt; - pal_old = Pico.m.pal; - } else { - PsndOut = 0; + emu_status_msg("VOL: %02i", vol); + prev_frame = Pico.m.frame_count; } - // prepare CD buffer - if (PicoMCD & 1) PicoCDBufferInit(); - - // calc vsync offset to sync timing code with vsync - if (currentConfig.EmuOpt&0x2000) { - gettimeofday(&tval, 0); - gp2x_video_wait_vsync(); - gettimeofday(&tval, 0); - vsync_offset = tval.tv_usec; - while (vsync_offset >= target_frametime) - vsync_offset -= target_frametime; - if (!vsync_offset) vsync_offset++; - printf("vsync_offset: %i\n", vsync_offset); - } else - vsync_offset = 0; + if (!need_low_volume) + return; - // loop? - while (engineState == PGS_Running) - { - int modes; - - gettimeofday(&tval, 0); - if(reset_timing) { - reset_timing = 0; - thissec = tval.tv_sec; - frames_shown = frames_done = tval.tv_usec/target_frametime; - } + /* set the right mixer func */ + if (vol >= 5) + PsndMix_32_to_16l = mix_32_to_16l_stereo; + else { + mix_32_to_16l_level = 5 - vol; + PsndMix_32_to_16l = mix_32_to_16l_stereo_lvl; + } +} - // show notice message? - if(noticeMsgTime.tv_sec) { - static int noticeMsgSum; - if((tval.tv_sec*1000000+tval.tv_usec) - (noticeMsgTime.tv_sec*1000000+noticeMsgTime.tv_usec) > 2000000) { // > 2.0 sec - noticeMsgTime.tv_sec = noticeMsgTime.tv_usec = 0; - clearArea(0); - notice = 0; - } else { - int sum = noticeMsg[0]+noticeMsg[1]+noticeMsg[2]; - if (sum != noticeMsgSum) { clearArea(0); noticeMsgSum = sum; } - notice = noticeMsg; - } - } +static void oss_write_nonblocking(int len) +{ + // sndout_oss_can_write() is not reliable, only use with no_frmlimit + if ((currentConfig.EmuOpt & EOPT_NO_FRMLIMIT) && !sndout_oss_can_write(len)) + return; - // check for mode changes - modes = ((Pico.video.reg[12]&1)<<2)|(Pico.video.reg[1]&8); - if (modes != oldmodes) { - int scalex = 320; - osd_fps_x = OSD_FPS_X; - if (modes & 4) { - vidCpyM2 = vidCpyM2_40col; - } else { - if (PicoOpt & 0x100) { - vidCpyM2 = vidCpyM2_32col_nobord; - scalex = 256; - osd_fps_x = OSD_FPS_X - 64; - } else { - vidCpyM2 = vidCpyM2_32col; - } - } - if (currentConfig.scaling == 2 && !(modes&8)) // want vertical scaling and game is not in 240 line mode - gp2x_video_RGB_setscaling(8, scalex, 224); - else gp2x_video_RGB_setscaling(0, scalex, 240); - oldmodes = modes; - clearArea(1); - } + sndout_oss_write_nb(PsndOut, len); +} - // second changed? - if(thissec != tval.tv_sec) { -#ifdef BENCHMARK - static int bench = 0, bench_fps = 0, bench_fps_s = 0, bfp = 0, bf[4]; - if(++bench == 10) { - bench = 0; - bench_fps_s = bench_fps; - bf[bfp++ & 3] = bench_fps; - bench_fps = 0; - } - bench_fps += frames_shown; - sprintf(fpsbuff, "%02i/%02i/%02i", frames_shown, bench_fps_s, (bf[0]+bf[1]+bf[2]+bf[3])>>2); -#else - if(currentConfig.EmuOpt & 2) - sprintf(fpsbuff, "%02i/%02i", frames_shown, frames_done); -#endif - thissec = tval.tv_sec; +void pemu_sound_start(void) +{ + static int PsndRate_old = 0, PicoOpt_old = 0, pal_old = 0; - if(PsndOut == 0 && currentConfig.Frameskip >= 0) { - frames_done = frames_shown = 0; - } else { - // it is quite common for this implementation to leave 1 fame unfinished - // when second changes, but we don't want buffer to starve. - if(PsndOut && frames_done < target_fps && frames_done > target_fps-5) { - updateKeys(); - SkipFrame(1); frames_done++; - } - - frames_done -= target_fps; if (frames_done < 0) frames_done = 0; - frames_shown -= target_fps; if (frames_shown < 0) frames_shown = 0; - if (frames_shown > frames_done) frames_shown = frames_done; - } - } + PsndOut = NULL; - lim_time = (frames_done+1) * target_frametime + vsync_offset; - if(currentConfig.Frameskip >= 0) { // frameskip enabled - for(i = 0; i < currentConfig.Frameskip; i++) { - updateKeys(); - SkipFrame(1); frames_done++; - if (PsndOut) { // do framelimitting if sound is enabled - gettimeofday(&tval, 0); - if(thissec != tval.tv_sec) tval.tv_usec+=1000000; - if(tval.tv_usec < lim_time) { // we are too fast - simpleWait(thissec, lim_time); - } - } - lim_time += target_frametime; - } - } else if(tval.tv_usec > lim_time) { // auto frameskip - // no time left for this frame - skip - if (tval.tv_usec - lim_time >= 0x300000) { - /* something caused a slowdown for us (disk access? cache flush?) - * try to recover by resetting timing... */ - reset_timing = 1; - continue; - } - updateKeys(); - SkipFrame(tval.tv_usec < lim_time+target_frametime*2); frames_done++; - continue; - } + // prepare sound stuff + if (currentConfig.EmuOpt & EOPT_EN_SOUND) + { + int is_stereo = (PicoOpt & POPT_EN_STEREO) ? 1 : 0; + int snd_rate_oss = PsndRate; + gp2x_soc_t soc; - updateKeys(); - PicoFrame(); + memset(sndBuffer, 0, sizeof(sndBuffer)); + PsndOut = sndBuffer; + PicoWriteSound = oss_write_nonblocking; + plat_update_volume(0, 0); -#if 0 -if (Pico.m.frame_count == 31563) { - FILE *f; - f = fopen("ram_p.bin", "wb"); - if (!f) { printf("!f\n"); exit(1); } - fwrite(Pico.ram, 1, 0x10000, f); - fclose(f); - exit(0); -} -#endif -#if 0 - // debug - { - #define BYTE unsigned char - #define WORD unsigned short - struct - { - BYTE IDLength; /* 00h Size of Image ID field */ - BYTE ColorMapType; /* 01h Color map type */ - BYTE ImageType; /* 02h Image type code */ - WORD CMapStart; /* 03h Color map origin */ - WORD CMapLength; /* 05h Color map length */ - BYTE CMapDepth; /* 07h Depth of color map entries */ - WORD XOffset; /* 08h X origin of image */ - WORD YOffset; /* 0Ah Y origin of image */ - WORD Width; /* 0Ch Width of image */ - WORD Height; /* 0Eh Height of image */ - BYTE PixelDepth; /* 10h Image pixel size */ - BYTE ImageDescriptor; /* 11h Image descriptor byte */ - } __attribute__((packed)) TGAHEAD; - static unsigned short oldscr[320*240]; - FILE *f; char name[128]; int i; - - memset(&TGAHEAD, 0, sizeof(TGAHEAD)); - TGAHEAD.ImageType = 2; - TGAHEAD.Width = 320; - TGAHEAD.Height = 240; - TGAHEAD.PixelDepth = 16; - TGAHEAD.ImageDescriptor = 2<<4; // image starts at top-left - - #define CONV(X) (((X>>1)&0x7fe0)|(X&0x1f)) // 555? - - for (i = 0; i < 320*240; i++) - if(oldscr[i] != CONV(((unsigned short *)gp2x_screen)[i])) break; - if (i < 320*240) - { - for (i = 0; i < 320*240; i++) - oldscr[i] = CONV(((unsigned short *)gp2x_screen)[i]); - sprintf(name, "%05i.tga", Pico.m.frame_count); - f = fopen(name, "wb"); - if (!f) { printf("!f\n"); exit(1); } - fwrite(&TGAHEAD, 1, sizeof(TGAHEAD), f); - fwrite(oldscr, 1, 320*240*2, f); - fclose(f); - } - } -#endif + printf("starting audio: %i len: %i stereo: %i, pal: %i\n", + PsndRate, PsndLen, is_stereo, Pico.m.pal); + sndout_oss_start(snd_rate_oss, is_stereo, 1); + sndout_oss_setvol(currentConfig.volume, currentConfig.volume); - // check time - gettimeofday(&tval, 0); - if (thissec != tval.tv_sec) tval.tv_usec+=1000000; + soc = soc_detect(); + if (soc == SOCID_POLLUX) + PsndRate = pollux_get_real_snd_rate(PsndRate); - if (currentConfig.Frameskip < 0 && tval.tv_usec - lim_time >= 0x300000) // slowdown detection - reset_timing = 1; - else if (PsndOut != NULL || currentConfig.Frameskip < 0) - { - // sleep or vsync if we are still too fast - // usleep sleeps for ~20ms minimum, so it is not a solution here - if(tval.tv_usec < lim_time) - { - // we are too fast - if (vsync_offset) { - if (lim_time - tval.tv_usec > target_frametime/2) - simpleWait(thissec, lim_time - target_frametime/4); - gp2x_video_wait_vsync(); - } else { - simpleWait(thissec, lim_time); - } - } + #define SOUND_RERATE_FLAGS (POPT_EN_FM|POPT_EN_PSG|POPT_EN_STEREO|POPT_EXT_FM|POPT_EN_MCD_CDDA) + if (PsndRate != PsndRate_old || Pico.m.pal != pal_old || ((PicoOpt & POPT_EXT_FM) && crashed_940) || + ((PicoOpt ^ PicoOpt_old) & SOUND_RERATE_FLAGS)) { + PsndRerate(Pico.m.frame_count ? 1 : 0); } - blit(fpsbuff, notice); - - frames_done++; frames_shown++; + PsndRate_old = PsndRate; + PicoOpt_old = PicoOpt; + pal_old = Pico.m.pal; } +} +static const int sound_rates[] = { 44100, 32000, 22050, 16000, 11025, 8000 }; - if (PicoMCD & 1) PicoCDBufferFree(); +void pemu_sound_stop(void) +{ + int i; - // save SRAM - if((currentConfig.EmuOpt & 1) && SRam.changed) { - emu_state_cb("Writing SRAM/BRAM.."); - emu_SaveLoadGame(0, 1); - SRam.changed = 0; + /* get back from Pollux pain */ + PsndRate += 1000; + for (i = 0; i < ARRAY_SIZE(sound_rates); i++) { + if (PsndRate >= sound_rates[i]) { + PsndRate = sound_rates[i]; + break; + } } - - // if in 16bit mode, generate 8it image for menu background - if (!(PicoOpt&0x10) && (currentConfig.EmuOpt&0x80)) - emu_forced_frame(); - - // for menu bg - gp2x_memcpy_buffers((1<<2), gp2x_screen, 0, 320*240*2); } - -void emu_ResetGame(void) +void pemu_sound_wait(void) { - PicoReset(0); - reset_timing = 1; + // don't need to do anything, writes will block by themselves } - -size_t gzRead2(void *p, size_t _size, size_t _n, void *file) +void pemu_forced_frame(int no_scale, int do_emu) { - return gzread(file, p, _n); -} + doing_bg_frame = 1; + PicoDrawSetOutBuf(g_screen_ptr, g_screen_width * 2); + PicoDraw32xSetFrameMode(0, 0); + PicoDrawSetCallbacks(NULL, NULL); + Pico.m.dirtyPal = 1; + emu_cmn_forced_frame(no_scale, do_emu); -size_t gzWrite2(void *p, size_t _size, size_t _n, void *file) -{ - return gzwrite(file, p, _n); + g_menubg_src_ptr = g_screen_ptr; + doing_bg_frame = 0; } -static int try_ropen_file(const char *fname) +void plat_debug_cat(char *str) { - FILE *f; - - f = fopen(fname, "rb"); - if (f) { - fclose(f); - return 1; - } - return 0; } -char *emu_GetSaveFName(int load, int is_sram, int slot) +#if 0 +static void tga_dump(void) { - static char saveFname[512]; - char ext[16]; - - if (is_sram) +#define BYTE unsigned char +#define WORD unsigned short + struct { - romfname_ext(saveFname, (PicoMCD&1) ? "brm/" : "srm/", (PicoMCD&1) ? ".brm" : ".srm"); - if (load) { - if (try_ropen_file(saveFname)) return saveFname; - // try in current dir.. - romfname_ext(saveFname, NULL, (PicoMCD&1) ? ".brm" : ".srm"); - if (try_ropen_file(saveFname)) return saveFname; - return NULL; // give up - } - } - else + BYTE IDLength; /* 00h Size of Image ID field */ + BYTE ColorMapType; /* 01h Color map type */ + BYTE ImageType; /* 02h Image type code */ + WORD CMapStart; /* 03h Color map origin */ + WORD CMapLength; /* 05h Color map length */ + BYTE CMapDepth; /* 07h Depth of color map entries */ + WORD XOffset; /* 08h X origin of image */ + WORD YOffset; /* 0Ah Y origin of image */ + WORD Width; /* 0Ch Width of image */ + WORD Height; /* 0Eh Height of image */ + BYTE PixelDepth; /* 10h Image pixel size */ + BYTE ImageDescriptor; /* 11h Image descriptor byte */ + } __attribute__((packed)) TGAHEAD; + static unsigned short oldscr[320*240]; + FILE *f; char name[128]; int i; + + memset(&TGAHEAD, 0, sizeof(TGAHEAD)); + TGAHEAD.ImageType = 2; + TGAHEAD.Width = 320; + TGAHEAD.Height = 240; + TGAHEAD.PixelDepth = 16; + TGAHEAD.ImageDescriptor = 2<<4; // image starts at top-left + +#define CONV(X) (((X>>1)&0x7fe0)|(X&0x1f)) // 555? + + for (i = 0; i < 320*240; i++) + if(oldscr[i] != CONV(((unsigned short *)g_screen_ptr)[i])) break; + if (i < 320*240) { - ext[0] = 0; - if(slot > 0 && slot < 10) sprintf(ext, ".%i", slot); - strcat(ext, (currentConfig.EmuOpt & 8) ? ".mds.gz" : ".mds"); - - romfname_ext(saveFname, "mds/", ext); - if (load) { - if (try_ropen_file(saveFname)) return saveFname; - romfname_ext(saveFname, NULL, ext); - if (try_ropen_file(saveFname)) return saveFname; - if (currentConfig.EmuOpt & 8) { - ext[0] = 0; - if(slot > 0 && slot < 10) sprintf(ext, ".%i", slot); - strcat(ext, ".mds"); - - romfname_ext(saveFname, "mds/", ext); - if (try_ropen_file(saveFname)) return saveFname; - romfname_ext(saveFname, NULL, ext); - if (try_ropen_file(saveFname)) return saveFname; - } - return NULL; - } + for (i = 0; i < 320*240; i++) + oldscr[i] = CONV(((unsigned short *)g_screen_ptr)[i]); + sprintf(name, "%05i.tga", Pico.m.frame_count); + f = fopen(name, "wb"); + if (!f) { printf("!f\n"); exit(1); } + fwrite(&TGAHEAD, 1, sizeof(TGAHEAD), f); + fwrite(oldscr, 1, 320*240*2, f); + fclose(f); } - - return saveFname; } +#endif -int emu_check_save_file(int slot) +void pemu_loop_prep(void) { - return emu_GetSaveFName(1, 0, slot) ? 1 : 0; -} + static int gp2x_old_clock = -1, EmuOpt_old = 0, pal_old = 0; + static int gp2x_old_gamma = 100; + gp2x_soc_t soc; -void emu_set_save_cbs(int gz) -{ - if (gz) { - areaRead = gzRead2; - areaWrite = gzWrite2; - areaEof = (areaeof *) gzeof; - areaSeek = (areaseek *) gzseek; - areaClose = (areaclose *) gzclose; - } else { - areaRead = (arearw *) fread; - areaWrite = (arearw *) fwrite; - areaEof = (areaeof *) feof; - areaSeek = (areaseek *) fseek; - areaClose = (areaclose *) fclose; + soc = soc_detect(); + + if ((EmuOpt_old ^ currentConfig.EmuOpt) & EOPT_RAM_TIMINGS) { + if (currentConfig.EmuOpt & EOPT_RAM_TIMINGS) + set_ram_timings(); + else + unset_ram_timings(); } -} -int emu_SaveLoadGame(int load, int sram) -{ - int ret = 0; - char *saveFname; - - // make save filename - saveFname = emu_GetSaveFName(load, sram, state_slot); - if (saveFname == NULL) { - if (!sram) { - strcpy(noticeMsg, load ? "LOAD FAILED (missing file)" : "SAVE FAILED "); - gettimeofday(¬iceMsgTime, 0); - } - return -1; + if (gp2x_old_clock < 0) + gp2x_old_clock = default_cpu_clock; + if (gp2x_old_clock != currentConfig.CPUclock && gp2x_set_cpuclk != NULL) { + printf("changing clock to %i...", currentConfig.CPUclock); fflush(stdout); + gp2x_set_cpuclk(currentConfig.CPUclock); + gp2x_old_clock = currentConfig.CPUclock; + printf(" done\n"); } - printf("saveLoad (%i, %i): %s\n", load, sram, saveFname); - - if(sram) { - FILE *sramFile; - int sram_size; - unsigned char *sram_data; - int truncate = 1; - if (PicoMCD&1) { - if (PicoOpt&0x8000) { // MCD RAM cart? - sram_size = 0x12000; - sram_data = SRam.data; - if (sram_data) - memcpy32((int *)sram_data, (int *)Pico_mcd->bram, 0x2000/4); - } else { - sram_size = 0x2000; - sram_data = Pico_mcd->bram; - truncate = 0; // the .brm may contain RAM cart data after normal brm - } - } else { - sram_size = SRam.end-SRam.start+1; - if(SRam.reg_back & 4) sram_size=0x2000; - sram_data = SRam.data; - } - if (!sram_data) return 0; // SRam forcefully disabled for this game - - if (load) { - sramFile = fopen(saveFname, "rb"); - if(!sramFile) return -1; - fread(sram_data, 1, sram_size, sramFile); - fclose(sramFile); - if ((PicoMCD&1) && (PicoOpt&0x8000)) - memcpy32((int *)Pico_mcd->bram, (int *)sram_data, 0x2000/4); - } else { - // sram save needs some special processing - // see if we have anything to save - for (; sram_size > 0; sram_size--) - if (sram_data[sram_size-1]) break; - - if (sram_size) { - sramFile = fopen(saveFname, truncate ? "wb" : "r+b"); - if (!sramFile) sramFile = fopen(saveFname, "wb"); // retry - if (!sramFile) return -1; - ret = fwrite(sram_data, 1, sram_size, sramFile); - ret = (ret != sram_size) ? -1 : 0; - fclose(sramFile); -#ifndef NO_SYNC - sync(); -#endif - } - } - return ret; + if (gp2x_old_gamma != currentConfig.gamma || ((EmuOpt_old ^ currentConfig.EmuOpt) & EOPT_A_SN_GAMMA)) { + set_lcd_gamma(currentConfig.gamma, !!(currentConfig.EmuOpt & EOPT_A_SN_GAMMA)); + gp2x_old_gamma = currentConfig.gamma; + printf("updated gamma to %i, A_SN's curve: %i\n", currentConfig.gamma, !!(currentConfig.EmuOpt&0x1000)); } - else - { - void *PmovFile = NULL; - if (strcmp(saveFname + strlen(saveFname) - 3, ".gz") == 0) { - if( (PmovFile = gzopen(saveFname, load ? "rb" : "wb")) ) { - emu_set_save_cbs(1); - if(!load) gzsetparams(PmovFile, 9, Z_DEFAULT_STRATEGY); - } - } - else - { - if( (PmovFile = fopen(saveFname, load ? "rb" : "wb")) ) { - emu_set_save_cbs(0); - } - } - if(PmovFile) { - ret = PmovState(load ? 6 : 5, PmovFile); - areaClose(PmovFile); - PmovFile = 0; - if (load) Pico.m.dirtyPal=1; -#ifndef NO_SYNC - else sync(); -#endif - } - else ret = -1; - if (!ret) - strcpy(noticeMsg, load ? "GAME LOADED " : "GAME SAVED "); - else - { - strcpy(noticeMsg, load ? "LOAD FAILED " : "SAVE FAILED "); - ret = -1; - } - gettimeofday(¬iceMsgTime, 0); - return ret; + if (((EmuOpt_old ^ currentConfig.EmuOpt) & EOPT_VSYNC) || Pico.m.pal != pal_old) { + if ((currentConfig.EmuOpt & EOPT_VSYNC) || soc == SOCID_POLLUX) + set_lcd_custom_rate(Pico.m.pal); + else if (EmuOpt_old & EOPT_VSYNC) + unset_lcd_custom_rate(); } + + if (gp2x_dev_id == GP2X_DEV_CAANOO) + in_set_config_int(in_name_to_id("evdev:pollux-analog"), IN_CFG_ABS_DEAD_ZONE, + currentConfig.analog_deadzone); + + if ((EmuOpt_old ^ currentConfig.EmuOpt) & EOPT_MMUHACK) + gp2x_make_fb_bufferable(currentConfig.EmuOpt & EOPT_MMUHACK); + + EmuOpt_old = currentConfig.EmuOpt; + pal_old = Pico.m.pal; + + // make sure we are in correct mode + change_renderer(0); + vid_reset_mode(); + + // dirty buffers better go now than during gameplay + sync(); + sleep(0); + + pemu_sound_start(); +} + +void pemu_loop_end(void) +{ + pemu_sound_stop(); + + /* do one more frame for menu bg */ + pemu_forced_frame(0, 1); } +