X-Git-Url: https://notaz.gp2x.de/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=gp2x%2Femu.c;h=acc3881aa31f7aece65f4375d6dd9075d9c53ca3;hb=dd59a74b2061298e73c13ddf1be7287cca3ebc74;hp=d84b053fe03d9315b2647daca5e079e43ecd2e2a;hpb=47f22a1fd8442dbca4ef22cbbc3bb980285fbb0c;p=libpicofe.git diff --git a/gp2x/emu.c b/gp2x/emu.c index d84b053..acc3881 100644 --- a/gp2x/emu.c +++ b/gp2x/emu.c @@ -1,27 +1,28 @@ -// (c) Copyright 2006 notaz, All rights reserved. +// (c) Copyright 2006-2009 notaz, All rights reserved. // Free for non-commercial use. // For commercial use, separate licencing terms must be obtained. #include #include -#include -#include -#include -#include -#include +#include "plat_gp2x.h" +#include "soc.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 "../linux/sndout_oss.h" +#include "version.h" -#include "emu.h" -#include "gp2x.h" -#include "usbjoy.h" -#include "menu.h" -#include "asmutils.h" -#include "cpuctrl.h" - -#include "Pico/PicoInt.h" -#include "zlib/zlib.h" +#include +#include +#include +#include +//#define PFRAMES #ifdef BENCHMARK #define OSD_FPS_X 220 @@ -29,456 +30,256 @@ #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; - -char romFileName[PATH_MAX]; -unsigned char *rom_data = NULL; extern int crashed_940; -static char noticeMsg[64]; // notice msg to draw -static struct timeval noticeMsgTime = { 0, 0 }; // when started showing -static int reset_timing, 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; - -/* -// tmp -static FILE *logf = NULL; - -void pprintf(char *texto, ...) -{ - va_list args; +static short __attribute__((aligned(4))) sndBuffer[2*44100/50]; +static unsigned char PicoDraw2FB_[(8+320) * (8+240+8)]; +unsigned char *PicoDraw2FB = PicoDraw2FB_; +static int osd_fps_x; - va_start(args,texto); - vfprintf(logf,texto,args); - va_end(args); - fflush(logf); - sync(); -} -*/ -// utilities -static void strlwr(char* string) -{ - while ( (*string++ = (char)tolower(*string)) ); -} +extern void *gp2x_screens[4]; -static int try_rfn_ext(char *ext) +int plat_get_root_dir(char *dst, int len) { - FILE *tmp; - char *p; + extern char **g_argv; + int j; - p = romFileName + strlen(romFileName) - 4; - if (p < romFileName) p = romFileName; - strcpy(p, ext); + strncpy(dst, g_argv[0], len); + len -= 32; // reserve + if (len < 0) len = 0; + dst[len] = 0; + for (j = strlen(dst); j > 0; j--) + if (dst[j] == '/') { dst[j+1] = 0; break; } - if((tmp = fopen(romFileName, "rb"))) { - fclose(tmp); - return 1; - } - return 0; + return j + 1; } -int emu_ReloadRom(void) -{ - unsigned int rom_size = 0; - char ext[5], *p; - FILE *rom; - int ret; - - printf("emu_ReloadRom(%s)\n", romFileName); - - // detect wrong extensions (.srm and .mds) - p = romFileName + strlen(romFileName) - 4; - if (p < romFileName) p = romFileName; - strncpy(ext, p, 4); - ext[4] = 0; - strlwr(ext); - - if(!strcmp(ext, ".srm") || !strcmp(ext, "s.gz") || !strcmp(ext, ".mds")) { // s.gz ~ .mds.gz - sprintf(menuErrorMsg, "Not a ROM selected."); - return 0; - } - - // check for movie file - if(movie_data) { - free(movie_data); - movie_data = 0; - } - 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_ext(".zip") || try_rfn_ext(".bin") || - try_rfn_ext(".smd") || try_rfn_ext(".gen"); - if (!dummy) { - sprintf(menuErrorMsg, "Could't find a ROM for movie."); - return 0; - } - } - rom = fopen(romFileName, "rb"); - if(!rom) { - sprintf(menuErrorMsg, "Failed to open rom."); - return 0; - } - - if(rom_data) { - free(rom_data); - rom_data = 0; - rom_size = 0; - } - - // zipfile support - if(!strcasecmp(ext, ".zip")) { - fclose(rom); - ret = CartLoadZip(romFileName, &rom_data, &rom_size); - if(ret) { - if (ret == 4) strcpy(menuErrorMsg, "No ROMs in zip found."); - else sprintf(menuErrorMsg, "Unzip failed with code %i", ret); - printf("%s\n", menuErrorMsg); - return 0; - } - } else { - if( (ret = PicoCartLoad(rom, &rom_data, &rom_size)) ) { - sprintf(menuErrorMsg, "PicoCartLoad() failed."); - printf("%s\n", menuErrorMsg); - fclose(rom); - return 0; - } - fclose(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 short *)(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; - } - - printf("PicoCartInsert(%p, %d);\n", rom_data, rom_size); - if(PicoCartInsert(rom_data, rom_size)) { - sprintf(menuErrorMsg, "Failed to load ROM."); - return 0; - } - - // load config for this ROM - ret = emu_ReadConfig(1); - if (!ret) - emu_ReadConfig(0); - - // emu_ReadConfig() might have messed currentConfig.lastRomFile - strncpy(currentConfig.lastRomFile, romFileName, sizeof(currentConfig.lastRomFile)-1); - currentConfig.lastRomFile[sizeof(currentConfig.lastRomFile)-1] = 0; - - // 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"); - } +static void scaling_update(void) +{ + PicoOpt &= ~(POPT_DIS_32C_BORDER|POPT_EN_SOFTSCALE); + switch (currentConfig.scaling) { + default:break; + case EOPT_SCALE_HW_H: + case EOPT_SCALE_HW_HV: + PicoOpt |= POPT_DIS_32C_BORDER; + break; + case EOPT_SCALE_SW_H: + PicoOpt |= POPT_EN_SOFTSCALE; + break; } - gettimeofday(¬iceMsgTime, 0); - - // load SRAM for this ROM - if(currentConfig.EmuOpt & 1) - emu_SaveLoadGame(1, 1); - - Pico.m.frame_count = 0; - - return 1; } -void emu_Init(void) +void pemu_prep_defconfig(void) { - // make temp buffer for alt renderer - framebuff = malloc((8+320)*(8+240+8)); - if (!framebuff) - { - printf("framebuff == 0\n"); - } - - PicoInit(); - -// logf = fopen("log.txt", "w"); + gp2x_soc_t soc; + + memset(&defaultConfig, 0, sizeof(defaultConfig)); + defaultConfig.EmuOpt = 0x9d | EOPT_RAM_TIMINGS|EOPT_CONFIRM_SAVE|EOPT_EN_CD_LEDS; + defaultConfig.s_PicoOpt = 0x0f | POPT_EN_MCD_PCM|POPT_EN_MCD_CDDA|POPT_EN_SVP_DRC|POPT_ACC_SPRITES; + defaultConfig.s_PsndRate = 44100; + defaultConfig.s_PicoRegion = 0; // auto + defaultConfig.s_PicoAutoRgnOrder = 0x184; // US, EU, JP + defaultConfig.s_PicoCDBuffers = 0; + defaultConfig.Frameskip = -1; // auto + defaultConfig.CPUclock = default_cpu_clock; + defaultConfig.volume = 50; + defaultConfig.gamma = 100; + defaultConfig.scaling = 0; + defaultConfig.turbo_rate = 15; + + 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; } +static void (*osd_text)(int x, int y, const char *text); -static void romfname_ext(char *dst, char *ext) +static void osd_text8(int x, int y, const char *text) { - char *p; - - // make save filename - for (p = romFileName+strlen(romFileName)-1; p >= romFileName && *p != '/'; p--); p++; - strncpy(dst, p, 511); - dst[511-8] = 0; - if(dst[strlen(dst)-4] == '.') dst[strlen(dst)-4] = 0; - strcat(dst, ext); -} + int len = strlen(text)*8; + int *p, i, h, offs; + 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; + } + emu_text_out8(x, y, text); +} -static void find_combos(void) +static void osd_text16(int x, int y, const char *text) { - int act, u; + int len = strlen(text)*8; + int *p, i, h, offs; - // 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; - } - } - } + 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; } - // printf("combo keys/acts: %08x %08x\n", combo_keys, combo_acts); + emu_text_out16(x, y, text); } - -int emu_ReadConfig(int game) +static void osd_text8_rot(int x, int y, const char *text) { - FILE *f; - char cfg[512]; - int bread = 0; + int len = strlen(text) * 8; + char *p = (char *)g_screen_ptr + 240*(320-x) + y; - if (!game) - { - // set default config - memset(¤tConfig, 0, sizeof(currentConfig)); - currentConfig.lastRomFile[0] = 0; - currentConfig.EmuOpt = 0x1f; - currentConfig.PicoOpt = 0x0f; - currentConfig.PsndRate = 22050; - currentConfig.PicoRegion = 0; // auto - 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; - strncpy(cfg, PicoConfigFile, 511); - cfg[511] = 0; - } else { - romfname_ext(cfg, ".pbcfg"); + while (len--) { + memset(p, 0xe0, 8); + p -= 240; } - printf("emu_ReadConfig: %s ", cfg); - f = fopen(cfg, "rb"); - if (f) { - bread = fread(¤tConfig, 1, sizeof(currentConfig), f); - fclose(f); - } - printf((bread == sizeof(currentConfig)) ? "(ok)\n" : "(failed)\n"); - - PicoOpt = currentConfig.PicoOpt; - PsndRate = currentConfig.PsndRate; - PicoRegionOverride = currentConfig.PicoRegion; - if (PicoOpt & 0x20) { - actionNames[ 8] = "Z"; actionNames[ 9] = "Y"; - actionNames[10] = "X"; actionNames[11] = "MODE"; - } - // some sanity checks - if (currentConfig.CPUclock < 1 || currentConfig.CPUclock > 4096) currentConfig.CPUclock = 200; - if (currentConfig.gamma < 10 || currentConfig.gamma > 300) currentConfig.gamma = 100; - // 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 + emu_text_out8_rot(x, y, text); +} + +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; + + while (len--) { + memset(p, 0, 8*2); + p -= 240; } - return (bread == sizeof(currentConfig)); + emu_text_out16_rot(x, y, text); } - -int emu_WriteConfig(int game) +static void draw_cd_leds(void) { - FILE *f; - char cfg[512]; - int bwrite = 0; + int led_reg, pitch, scr_offs, led_offs; + led_reg = Pico_mcd->s68k_regs[0]; - if (!game) - { - strncpy(cfg, PicoConfigFile, 511); - cfg[511] = 0; + if (currentConfig.EmuOpt & EOPT_WIZ_TEAR_FIX) { + pitch = 240; + led_offs = -pitch * 6; + scr_offs = pitch * (320 - 4); } else { - romfname_ext(cfg, ".pbcfg"); - } - - printf("emu_WriteConfig: %s ", cfg); - f = fopen(cfg, "wb"); - if (f) { - currentConfig.PicoOpt = PicoOpt; - currentConfig.PsndRate = PsndRate; - currentConfig.PicoRegion = PicoRegionOverride; - bwrite = fwrite(¤tConfig, 1, sizeof(currentConfig), f); - fflush(f); - fclose(f); - sync(); + pitch = 320; + led_offs = 4; + scr_offs = pitch * 2 + 4; + } + + if ((PicoOpt & POPT_ALT_RENDERER) || !(currentConfig.EmuOpt & EOPT_16BPP)) { + #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 } - printf((bwrite == sizeof(currentConfig)) ? "(ok)\n" : "(failed)\n"); - - return (bwrite == sizeof(currentConfig)); } +static void draw_pico_ptr(void) +{ + unsigned short *p = (unsigned short *)g_screen_ptr; + int x, y, pitch = 320; + + // only if pen enabled and for 16bit modes + if (pico_inp_mode == 0 || (PicoOpt & POPT_ALT_RENDERER) || !(currentConfig.EmuOpt & EOPT_16BPP)) + return; + + 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; + + if (EOPT_WIZ_TEAR_FIX) { + pitch = 240; + p += (319 - x) * pitch + y; + } else + p += x + y * pitch; + + p[0] ^= 0xffff; + p[pitch-1] ^= 0xffff; + p[pitch] ^= 0xffff; + p[pitch+1] ^= 0xffff; + p[pitch*2] ^= 0xffff; +} -void emu_Deinit(void) +static int EmuScanBegin16(unsigned int num) { - // save SRAM - if((currentConfig.EmuOpt & 1) && SRam.changed) { - emu_SaveLoadGame(0, 1); - SRam.changed = 0; - } + if (!(Pico.video.reg[1]&8)) num += 8; + DrawLineDest = (unsigned short *) g_screen_ptr + g_screen_width * num; - if (!(currentConfig.EmuOpt & 0x20)) - emu_WriteConfig(0); - free(framebuff); + return 0; +} - PicoExit(); -// fclose(logf); +static int EmuScanBegin8(unsigned int num) +{ + if (!(Pico.video.reg[1]&8)) num += 8; + DrawLineDest = (unsigned char *) g_screen_ptr + g_screen_width * num; - // restore gamma - if (gp2x_old_gamma != 100) - set_gamma(100); + return 0; } +/* rot thing for Wiz */ +static unsigned char __attribute__((aligned(4))) rot_buff[320*4*2]; -void osd_text(int x, int y, char *text) +static int EmuScanBegin16_rot(unsigned int num) { - int len = strlen(text)*8; - - if ((PicoOpt&0x10)||!(currentConfig.EmuOpt&0x80)) { - int *p, i, h, black, white; - if (PicoOpt&0x10) { - black = 0x40404040; white = 0x41; - } else { - black = 0xe0e0e0e0; white = 0xf0; - } - 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 = black; - } - gp2x_text_out8_2(x, y, text, white); - } 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); - } + DrawLineDest = rot_buff + (num & 3) * 320 * 2; + return 0; } -static int EmuScan16(unsigned int num, void *sdata) +static int EmuScanEnd16_rot(unsigned int num) { - if (!(Pico.video.reg[1]&8)) num += 8; - DrawLineDest = (unsigned short *) gp2x_screen + 320*(num+1); - + if ((num & 3) != 3) + return 0; + if (!(Pico.video.reg[1] & 8)) + num += 8; + rotated_blit16(g_screen_ptr, rot_buff, num + 1, + !(Pico.video.reg[12] & 1) && !(PicoOpt & POPT_EN_SOFTSCALE)); return 0; } -static int EmuScan8(unsigned int num, void *sdata) +static int EmuScanBegin8_rot(unsigned int num) { - if (!(Pico.video.reg[1]&8)) num += 8; - DrawLineDest = (unsigned char *) gp2x_screen + 320*(num+1); + DrawLineDest = rot_buff + (num & 3) * 320; + return 0; +} +static int EmuScanEnd8_rot(unsigned int num) +{ + if ((num & 3) != 3) + return 0; + if (!(Pico.video.reg[1] & 8)) + num += 8; + rotated_blit8(g_screen_ptr, rot_buff, num + 1, + !(Pico.video.reg[12] & 1)); return 0; } -static int localPal[0x100]; -static void (*vidCpyM2)(void *dest, void *src) = NULL; +int localPal[0x100]; +static void (*vidcpyM2)(void *dest, void *src, int m32col, int with_32c_border) = NULL; -static void blit(char *fps, char *notice) +void pemu_update_display(const char *fps, const char *notice) { - if (PicoOpt&0x10) { + int emu_opt = currentConfig.EmuOpt; + + if (PicoOpt & POPT_ALT_RENDERER) + { // 8bit fast renderer if (Pico.m.dirtyPal) { Pico.m.dirtyPal = 0; @@ -486,698 +287,556 @@ static void blit(char *fps, char *notice) // feed new palette to our device gp2x_video_setpalette(localPal, 0x40); } - vidCpyM2((unsigned char *)gp2x_screen+320*8, framebuff+328*8); - } else if (!(currentConfig.EmuOpt&0x80)) { + // a hack for VR + if (PicoRead16Hook == PicoSVPRead16) + 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 (!(emu_opt & EOPT_16BPP)) + { // 8bit accurate renderer - if (Pico.m.dirtyPal) { + if (Pico.m.dirtyPal) + { + int pallen = 0xc0; Pico.m.dirtyPal = 0; - if(Pico.video.reg[0xC]&8) { // shadow/hilight mode + 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[0xe0] = 0x00000000; // reserved pixels for OSD - localPal[0xf0] = 0x00ffffff; - gp2x_video_setpalette(localPal, 0x100); - } else if (rendstatus & 0x20) { // mid-frame palette changes + memcpy32(localPal+0xc0, localPal+0x40, 0x40); + pallen = 0x100; + } + else if (rendstatus & PDRAW_SONIC_MODE) { // 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 { + } + else { vidConvCpyRGB32(localPal, Pico.cram, 0x40); - gp2x_video_setpalette(localPal, 0x40); + memcpy32(localPal+0x80, localPal, 0x40); // for spr prio mess } + if (pallen > 0xc0) { + localPal[0xc0] = 0x0000c000; + localPal[0xd0] = 0x00c00000; + localPal[0xe0] = 0x00000000; // reserved pixels for OSD + localPal[0xf0] = 0x00ffffff; + } + gp2x_video_setpalette(localPal, pallen); } } - if (notice) osd_text(4, 232, notice); - if (currentConfig.EmuOpt & 2) - osd_text(osd_fps_x, 232, fps); + if (notice || (emu_opt & 2)) { + int h = 232; + if (currentConfig.scaling == EOPT_SCALE_HW_HV && !(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) && (PicoAHW & PAHW_MCD)) + draw_cd_leds(); + if (PicoAHW & PAHW_PICO) + draw_pico_ptr(); - //gp2x_video_wait_vsync(); 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; - } - } } - -// 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) { - // 8bit fast renderer - if (full) gp2x_memset_all_buffers(0, 0x40, 320*240); - else gp2x_memset_all_buffers(320*232, 0x40, 320*8); - } else if (currentConfig.EmuOpt&0x80) { - // 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); - } else { - // 8bit accurate renderer - if (full) gp2x_memset_all_buffers(0, 0xe0, 320*240); - else gp2x_memset_all_buffers(320*232, 0xe0, 320*8); - } + return gp2x_get_ticks_ms(); } - -static void vidResetMode(void) +unsigned int plat_get_ticks_us(void) { - if (PicoOpt&0x10) { - localPal[0x40] = 0; - localPal[0x41] = 0x00ffffff; - gp2x_video_changemode(8); - gp2x_video_setpalette(localPal, 0x42); - gp2x_memset_all_buffers(0, 0x40, 320*240); - gp2x_video_flip(); - } else if (currentConfig.EmuOpt&0x80) { - gp2x_video_changemode(15); - PicoDrawSetColorFormat(1); - PicoScan = EmuScan16; - PicoScan(0, 0); - } else { - localPal[0xe0] = 0x00000000; // reserved pixels for OSD - localPal[0xf0] = 0x00ffffff; - gp2x_video_changemode(8); - gp2x_video_setpalette(localPal, 0x100); - gp2x_memset_all_buffers(0, 0xe0, 320*240); - gp2x_video_flip(); - PicoDrawSetColorFormat(2); - PicoScan = EmuScan8; - PicoScan(0, 0); - } - Pico.m.dirtyPal = 1; - // reset scaling - gp2x_video_RGB_setscaling((PicoOpt&0x100)&&!(Pico.video.reg[12]&1) ? 256 : 320, 240); + return gp2x_get_ticks_us(); } +#endif - -static int check_save_file(void) +void plat_wait_till_us(unsigned int us_to) { - char saveFname[512]; - char ext[16]; - FILE *f; + unsigned int now; - ext[0] = 0; - if(state_slot > 0 && state_slot < 10) sprintf(ext, ".%i", state_slot); - strcat(ext, ".mds"); - if(currentConfig.EmuOpt & 8) strcat(ext, ".gz"); + spend_cycles(1024); + now = plat_get_ticks_us(); - romfname_ext(saveFname, ext); - if ((f = fopen(saveFname, "rb"))) { - fclose(f); - return 1; + while ((signed int)(us_to - now) > 512) + { + spend_cycles(1024); + now = plat_get_ticks_us(); } - return 0; } -static void RunEvents(unsigned int which) +void plat_video_wait_vsync(void) { - if(which & 0x1800) { // save or load (but not both) - int do_it = 1; - if (!(which & 0x1000) && (currentConfig.EmuOpt & 0x200) && check_save_file()) { - unsigned long keys; - blit("", "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) { - blit("", (which & 0x1000) ? "LOADING GAME" : "SAVING GAME"); - emu_SaveLoadGame(which & 0x1000, 0); - } - - reset_timing = 1; - } - 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 (PicoOpt&0x10) { - strcpy(noticeMsg, " 8bit fast renderer"); - } else if (currentConfig.EmuOpt&0x80) { - strcpy(noticeMsg, "16bit accurate renderer"); - } else { - strcpy(noticeMsg, " 8bit accurate renderer"); - } + gp2x_video_wait_vsync(); +} - gettimeofday(¬iceMsgTime, 0); - } - if(which & 0x0300) { - if(which&0x0200) { - state_slot -= 1; - if(state_slot < 0) state_slot = 9; +void plat_status_msg_clear(void) +{ + int is_8bit = (PicoOpt & POPT_ALT_RENDERER) || !(currentConfig.EmuOpt & EOPT_16BPP); + 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 { - state_slot += 1; - if(state_slot > 9) state_slot = 0; + 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; + } } - sprintf(noticeMsg, "SAVE SLOT %i [%s]", state_slot, check_save_file() ? "USED" : "FREE"); - gettimeofday(¬iceMsgTime, 0); + return; } - if(which & 0x0080) { - engineState = PGS_Menu; - } -} + if (is_8bit) + gp2x_memset_all_buffers(320*232, 0xe0, 320*8); + else + gp2x_memset_all_buffers(320*232*2, 0, 320*8*2); +} -static void updateKeys(void) +void plat_status_msg_busy_next(const char *msg) { - 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); - } + plat_status_msg_clear(); + pemu_update_display("", msg); + emu_status_msg(""); - keys &= CONFIGURABLE_KEYS; + /* assumption: msg_busy_next gets called only when + * something slow is about to happen */ + reset_timing = 1; +} - 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; - } - } - } +void plat_status_msg_busy_first(const char *msg) +{ + gp2x_memcpy_all_buffers(g_screen_ptr, 0, 320*240*2); + plat_status_msg_busy_next(msg); +} - // 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; - } - } - } - } +static void vidResetMode(void) +{ + PicoScanEnd = NULL; - if(movie_data) - { - 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); + if (PicoOpt & POPT_ALT_RENDERER) { + if (currentConfig.EmuOpt & EOPT_WIZ_TEAR_FIX) { + gp2x_video_changemode(-8); + vidcpyM2 = vidcpy_m2_rot; + osd_text = osd_text8_rot; } 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_video_changemode(8); + vidcpyM2 = vidcpy_m2; + osd_text = osd_text8; } } - else - { - PicoPad[0] = (unsigned short) allActions[0]; - PicoPad[1] = (unsigned short) allActions[1]; + else if (currentConfig.EmuOpt & EOPT_16BPP) { + PicoDrawSetColorFormat(1); + if (currentConfig.EmuOpt & EOPT_WIZ_TEAR_FIX) { + gp2x_video_changemode(-16); + PicoScanBegin = EmuScanBegin16_rot; + PicoScanEnd = EmuScanEnd16_rot; + osd_text = osd_text16_rot; + } else { + gp2x_video_changemode(16); + PicoScanBegin = EmuScanBegin16; + osd_text = osd_text16; + } } - Pico.m.frame_count++; - - events = (allActions[0] | allActions[1]) >> 16; - - // volume is treated in special way and triggered every frame - if(events & 0x6000) { - int vol = currentConfig.volume; - if (events & 0x2000) { - if (vol < 90) vol++; + else { + PicoDrawSetColorFormat(2); + if (currentConfig.EmuOpt & EOPT_WIZ_TEAR_FIX) { + gp2x_video_changemode(-8); + PicoScanBegin = EmuScanBegin8_rot; + PicoScanEnd = EmuScanEnd8_rot; + osd_text = osd_text8_rot; } else { - if (vol > 0) vol--; + gp2x_video_changemode(8); + PicoScanBegin = EmuScanBegin8; + osd_text = osd_text8; } - gp2x_sound_volume(vol, vol); - sprintf(noticeMsg, "VOL: %02i", vol); - gettimeofday(¬iceMsgTime, 0); - currentConfig.volume = vol; } - events &= ~prevEvents; - if (events) RunEvents(events); + if ((PicoOpt & POPT_ALT_RENDERER) || !(currentConfig.EmuOpt & EOPT_16BPP)) { + // 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; - prevEvents = (allActions[0] | allActions[1]) >> 16; + // reset scaling + if (currentConfig.scaling == EOPT_SCALE_HW_HV && !(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); } -static int snd_excess_add = 0, snd_excess_cnt = 0; // hack - -static void updateSound(void) +void plat_video_toggle_renderer(int is_next, int is_menu) { - int len = (PicoOpt&8)?PsndLen*2:PsndLen; - - snd_excess_cnt += snd_excess_add; - if (snd_excess_cnt >= 0x10000) { - snd_excess_cnt -= 0x10000; - if (PicoOpt&8) { - PsndOut[len] = PsndOut[len-2]; - PsndOut[len+1] = PsndOut[len-1]; - len+=2; - } else { - PsndOut[len] = PsndOut[len-1]; - len++; - } + /* alt, 16bpp, 8bpp */ + if (PicoOpt & POPT_ALT_RENDERER) { + PicoOpt &= ~POPT_ALT_RENDERER; + if (is_next) + currentConfig.EmuOpt |= EOPT_16BPP; + } else if (!(currentConfig.EmuOpt & EOPT_16BPP)) { + if (is_next) + PicoOpt |= POPT_ALT_RENDERER; + else + currentConfig.EmuOpt |= EOPT_16BPP; + } else { + currentConfig.EmuOpt &= ~EOPT_16BPP; + if (!is_next) + PicoOpt |= POPT_ALT_RENDERER; } - gp2x_sound_write(PsndOut, len<<1); -} + if (is_menu) + return; + vidResetMode(); -static void SkipFrame(int do_sound) -{ - void *sndbuff_tmp = 0; - if (PsndOut && !do_sound) { - sndbuff_tmp = PsndOut; - PsndOut = 0; + if (PicoOpt & POPT_ALT_RENDERER) { + emu_status_msg(" 8bit fast renderer"); + } else if (currentConfig.EmuOpt & EOPT_16BPP) { + emu_status_msg("16bit accurate renderer"); + } else { + emu_status_msg(" 8bit accurate renderer"); } +} - PicoSkipFrame=1; - PicoFrame(); - PicoSkipFrame=0; +#if 0 // TODO +static void RunEventsPico(unsigned int events) +{ + int ret, px, py, lim_x; + static int pdown_frames = 0; - if (sndbuff_tmp && !do_sound) { - PsndOut = sndbuff_tmp; + // 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 (ret == 0) + // PicoPicohw.pen_pos[0] = PicoPicohw.pen_pos[1] = 0x8000; } } +#endif - -static void simpleWait(int thissec, int lim_time) +void plat_update_volume(int has_changed, int is_up) { - struct timeval tval; + static int prev_frame = 0, wait_frames = 0; + int vol = currentConfig.volume; + int need_low_volume = 0; + gp2x_soc_t soc; - spend_cycles(1024); - gettimeofday(&tval, 0); - if(thissec != tval.tv_sec) tval.tv_usec+=1000000; + soc = soc_detect(); + if ((PicoOpt & POPT_EN_STEREO) && soc == SOCID_MMSP2) + need_low_volume = 1; - while(tval.tv_usec < lim_time) + if (has_changed) { - spend_cycles(1024); - gettimeofday(&tval, 0); - if(thissec != tval.tv_sec) tval.tv_usec+=1000000; + 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--; + } + wait_frames = 0; + sndout_oss_setvol(vol, vol); + currentConfig.volume = vol; + } + emu_status_msg("VOL: %02i", vol); + prev_frame = Pico.m.frame_count; } -} + if (!need_low_volume) + return; + + /* 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; + } +} -void emu_Loop(void) +static void updateSound(int len) { - static int gp2x_old_clock = 200; - static int PsndRate_old = 0, PicoOpt_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, i; - char *notice = 0; + len <<= 1; + if (PicoOpt & POPT_EN_STEREO) + len <<= 1; - printf("entered emu_Loop()\n"); + if ((currentConfig.EmuOpt & EOPT_NO_FRMLIMIT) && !sndout_oss_can_write(len)) + return; - 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"); - } + /* avoid writing audio when lagging behind to prevent audio lag */ + if (PicoSkipFrame != 2) + sndout_oss_write(PsndOut, len); +} - if (gp2x_old_gamma != currentConfig.gamma) { - set_gamma(currentConfig.gamma); - gp2x_old_gamma = currentConfig.gamma; - printf("updated gamma to %i\n", currentConfig.gamma); - } +void pemu_sound_start(void) +{ + static int PsndRate_old = 0, PicoOpt_old = 0, pal_old = 0; - fpsbuff[0] = 0; + PsndOut = NULL; - // make sure we are in correct mode - vidResetMode(); - oldmodes = ((Pico.video.reg[12]&1)<<2) ^ 0xc; - find_combos(); + // prepare sound stuff + if (currentConfig.EmuOpt & EOPT_EN_SOUND) + { + int is_stereo = (PicoOpt & POPT_EN_STEREO) ? 1 : 0; + int target_fps = Pico.m.pal ? 50 : 60; + int frame_samples, snd_excess_add; + 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(); - // prepare sound stuff - if(currentConfig.EmuOpt & 4) { - 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); - Pause940(1); - } - sound_rerate(); + #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); } - //excess_samples = PsndRate - PsndLen*target_fps; - snd_excess_cnt = 0; - 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); + + memset(sndBuffer, 0, sizeof(sndBuffer)); + PsndOut = sndBuffer; PicoWriteSound = updateSound; - PsndOut = calloc((PicoOpt&8) ? (PsndLen*4+4) : (PsndLen*2+2), 1); PsndRate_old = PsndRate; - PsndLen_real = PsndLen; PicoOpt_old = PicoOpt; pal_old = Pico.m.pal; - } else { - PsndOut = 0; + plat_update_volume(0, 0); + + frame_samples = PsndLen; + snd_excess_add = ((PsndRate - PsndLen * target_fps)<<16) / target_fps; + if (snd_excess_add != 0) + frame_samples++; + if (soc == SOCID_POLLUX) + frame_samples *= 2; /* force larger buffer */ + + printf("starting audio: %i len: %i (ex: %04x) stereo: %i, pal: %i\n", + PsndRate, PsndLen, snd_excess_add, is_stereo, Pico.m.pal); + sndout_oss_setvol(currentConfig.volume, currentConfig.volume); + sndout_oss_start(PsndRate, frame_samples, is_stereo); + + /* Wiz's sound hardware needs more prebuffer */ + if (soc == SOCID_POLLUX) + updateSound(frame_samples); } +} - // loop? - while (engineState == PGS_Running) - { - int modes; +void pemu_sound_stop(void) +{ +} - gettimeofday(&tval, 0); - if(reset_timing) { - reset_timing = 0; - thissec = tval.tv_sec; - frames_shown = frames_done = tval.tv_usec/target_frametime; - } +void pemu_sound_wait(void) +{ + // don't need to do anything, writes will block by themselves +} - // 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; - } - } - // 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; - } - } - gp2x_video_RGB_setscaling(scalex, 240); - oldmodes = modes; - clearArea(1); - } +void pemu_forced_frame(int opts) +{ + int po_old = PicoOpt; + int eo_old = currentConfig.EmuOpt; - // 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; + PicoOpt &= ~POPT_ALT_RENDERER; + PicoOpt |= opts|POPT_ACC_SPRITES; + currentConfig.EmuOpt |= EOPT_16BPP; - 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; - } - } + PicoDrawSetColorFormat(1); + PicoScanBegin = EmuScanBegin16; + PicoScanEnd = NULL; + Pico.m.dirtyPal = 1; + PicoFrameDrawOnly(); - lim_time = (frames_done+1) * target_frametime; - 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 - updateKeys(); - SkipFrame(tval.tv_usec < lim_time+target_frametime); frames_done++; - continue; - } + PicoOpt = po_old; + currentConfig.EmuOpt = eo_old; +} - updateKeys(); - PicoFrame(); +void plat_debug_cat(char *str) +{ +} -#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); +void pemu_video_mode_change(int is_32col, int is_240_lines) +{ + int scalex = 320; + osd_fps_x = OSD_FPS_X; + if (is_32col && (PicoOpt & POPT_DIS_32C_BORDER)) { + scalex = 256; + osd_fps_x = OSD_FPS_X - 64; + } + /* want vertical scaling and game is not in 240 line mode */ + if (currentConfig.scaling == EOPT_SCALE_HW_HV && !is_240_lines) + gp2x_video_RGB_setscaling(8, scalex, 224); + else + gp2x_video_RGB_setscaling(0, scalex, 240); + + // clear whole screen in all buffers + if ((PicoOpt & POPT_ALT_RENDERER) || !(currentConfig.EmuOpt & EOPT_16BPP)) + gp2x_memset_all_buffers(0, 0xe0, 320*240); + else + gp2x_memset_all_buffers(0, 0, 320*240*2); } -#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); - } - } +static void tga_dump(void) +{ +#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 *)g_screen_ptr)[i])) break; + if (i < 320*240) + { + 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); + } +} #endif - // check time - gettimeofday(&tval, 0); - if(thissec != tval.tv_sec) tval.tv_usec+=1000000; - - // sleep if we are still too fast - if(PsndOut != 0 || currentConfig.Frameskip < 0) - { - // usleep sleeps for ~20ms minimum, so it is not a solution here - 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); - } - } +void pemu_loop_prep(void) +{ + static int gp2x_old_clock = -1, EmuOpt_old = 0, pal_old = 0; + static int gp2x_old_gamma = 100; - blit(fpsbuff, notice); + if ((EmuOpt_old ^ currentConfig.EmuOpt) & EOPT_RAM_TIMINGS) { + if (currentConfig.EmuOpt & EOPT_RAM_TIMINGS) + set_ram_timings(); + else + unset_ram_timings(); + } - frames_done++; frames_shown++; + if (gp2x_old_clock < 0) + gp2x_old_clock = default_cpu_clock; + if (gp2x_old_clock != currentConfig.CPUclock) { + printf("changing clock to %i...", currentConfig.CPUclock); fflush(stdout); + gp2x_set_cpuclk(currentConfig.CPUclock); + gp2x_old_clock = currentConfig.CPUclock; + printf(" done\n"); } - // save SRAM - if((currentConfig.EmuOpt & 1) && SRam.changed) { - emu_SaveLoadGame(0, 1); - SRam.changed = 0; + if (gp2x_old_gamma != currentConfig.gamma || (EmuOpt_old&0x1000) != (currentConfig.EmuOpt&0x1000)) { + set_lcd_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)); } - if (PsndOut != 0) { - free(PsndOut); - PsndOut = 0; + if (((EmuOpt_old ^ currentConfig.EmuOpt) & EOPT_PSYNC) || Pico.m.pal != pal_old) { + if (currentConfig.EmuOpt & EOPT_PSYNC) + set_lcd_custom_rate(Pico.m.pal); + else + unset_lcd_custom_rate(); } -} + if ((EmuOpt_old ^ currentConfig.EmuOpt) & EOPT_MMUHACK) + gp2x_make_fb_bufferable(currentConfig.EmuOpt & EOPT_MMUHACK); -void emu_ResetGame(void) -{ - PicoReset(0); - reset_timing = 1; -} + EmuOpt_old = currentConfig.EmuOpt; + pal_old = Pico.m.pal; + // make sure we are in correct mode + vidResetMode(); + scaling_update(); -size_t gzRead2(void *p, size_t _size, size_t _n, void *file) -{ - return gzread(file, p, _n); + pemu_sound_start(); } - -size_t gzWrite2(void *p, size_t _size, size_t _n, void *file) +void pemu_loop_end(void) { - return gzwrite(file, p, _n); -} + int po_old = PicoOpt; + int eo_old = currentConfig.EmuOpt; -typedef unsigned int (*STATE_SL_FUNC)(void *, unsigned int, unsigned int, void *); + /* do one more frame for menu bg */ + PicoOpt &= ~POPT_ALT_RENDERER; + PicoOpt |= POPT_EN_SOFTSCALE|POPT_ACC_SPRITES; + currentConfig.EmuOpt |= EOPT_16BPP; -int emu_SaveLoadGame(int load, int sram) -{ - int ret = 0; - char saveFname[512]; - - // make save filename - romfname_ext(saveFname, ""); - if(sram) strcat(saveFname, ".srm"); - else { - if(state_slot > 0 && state_slot < 10) sprintf(saveFname, "%s.%i", saveFname, state_slot); - strcat(saveFname, ".mds"); - } + PicoScanBegin = EmuScanBegin16; + PicoScanEnd = NULL; + PicoDrawSetColorFormat(1); + Pico.m.dirtyPal = 1; + PicoFrame(); - printf("saveLoad (%i, %i): %s\n", load, sram, saveFname); - - if(sram) { - FILE *sramFile; - int sram_size = SRam.end-SRam.start+1; - if(SRam.reg_back & 4) sram_size=0x2000; - 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); - } 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, "wb"); - ret = fwrite(SRam.data, 1, sram_size, sramFile); - ret = (ret != sram_size) ? -1 : 0; - fclose(sramFile); - sync(); - } - } - return ret; - } else { - void *PmovFile = NULL; - // try gzip first - if(currentConfig.EmuOpt & 8) { - strcat(saveFname, ".gz"); - if( (PmovFile = gzopen(saveFname, load ? "rb" : "wb")) ) { - areaRead = gzRead2; - areaWrite = gzWrite2; - if(!load) gzsetparams(PmovFile, 9, Z_DEFAULT_STRATEGY); - } else - saveFname[strlen(saveFname)-3] = 0; - } - if(!PmovFile) { // gzip failed or was disabled - if( (PmovFile = fopen(saveFname, load ? "rb" : "wb")) ) { - areaRead = (STATE_SL_FUNC) fread; - areaWrite = (STATE_SL_FUNC) fwrite; - } - } - if(PmovFile) { - PmovState(load ? 6 : 5, PmovFile); - strcpy(noticeMsg, load ? "GAME LOADED " : "GAME SAVED "); - if(areaRead == gzRead2) - gzclose(PmovFile); - else fclose ((FILE *) PmovFile); - PmovFile = 0; - if (!load) sync(); - else Pico.m.dirtyPal=1; - } else { - strcpy(noticeMsg, load ? "LOAD FAILED " : "SAVE FAILED "); - ret = -1; - } + PicoOpt = po_old; + currentConfig.EmuOpt = eo_old; +} - gettimeofday(¬iceMsgTime, 0); - return ret; - } +const char *plat_get_credits(void) +{ + return "PicoDrive v" VERSION " (c) notaz, 2006-2009\n\n\n" + "Credits:\n" + "fDave: Cyclone 68000 core,\n" + " base code of PicoDrive\n" + "Reesy & FluBBa: DrZ80 core\n" + "MAME devs: YM2612 and SN76496 cores\n" + "rlyeh and others: minimal SDK\n" + "Squidge: mmuhack\n" + "Dzz: ARM940 sample\n" + "GnoStiC / Puck2099: USB joy code\n" + "craigix: GP2X hardware\n" + "ketchupgun: skin design\n" + "\n" + "special thanks (for docs, ideas):\n" + " Charles MacDonald, Haze,\n" + " Stephane Dallongeville,\n" + " Lordus, Exophase, Rokas,\n" + " Nemesis, Tasco Deluxe"; }