123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050 |
- // (c) Copyright 2006-2008 notaz, All rights reserved.
- // Free for non-commercial use.
- // For commercial use, separate licencing terms must be obtained.
- #include <stdio.h>
- #include <stdlib.h>
- #include <sys/time.h>
- #include <sys/stat.h>
- #include <sys/types.h>
- #include <linux/limits.h>
- #include <ctype.h>
- #include <unistd.h>
- #include <stdarg.h>
- #include "../gp2x/emu.h"
- #include "../gp2x/usbjoy.h"
- #include "../gp2x/menu.h"
- #include "../common/arm_utils.h"
- #include "../common/fonts.h"
- #include "../common/emu.h"
- #include "../common/config.h"
- #include "../common/common.h"
- #include "asm_utils.h"
- #include <Pico/PicoInt.h>
- #include <Pico/Patch.h>
- #include <Pico/sound/mix.h>
- #include <zlib/zlib.h>
- //#define PFRAMES
- #define BENCHMARK
- //#define USE_320_SCREEN 1
- #ifdef BENCHMARK
- #define OSD_FPS_X (800-200)
- #else
- #define OSD_FPS_X (800-120)
- #endif
- int engineState;
- int select_exits = 0;
- char romFileName[PATH_MAX];
- static short __attribute__((aligned(4))) sndBuffer[2*44100/50];
- static struct timeval noticeMsgTime = { 0, 0 }; // when started showing
- static int osd_fps_x;
- unsigned char *PicoDraw2FB = NULL; // temporary buffer for alt renderer
- int reset_timing = 0;
- #define PICO_PEN_ADJUST_X 4
- #define PICO_PEN_ADJUST_Y 2
- static int pico_pen_x = SCREEN_WIDTH/2, pico_pen_y = 240/2;
- static void emu_msg_cb(const char *msg);
- static void emu_msg_tray_open(void);
- void emu_noticeMsgUpdated(void)
- {
- gettimeofday(¬iceMsgTime, 0);
- }
- int emu_getMainDir(char *dst, int len)
- {
- extern char **g_argv;
- int j;
- 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; }
- return j + 1;
- }
- void emu_Init(void)
- {
- // make temp buffer for alt renderer
- PicoDraw2FB = malloc((8+320)*(8+240+8));
- if (!PicoDraw2FB)
- {
- printf("PicoDraw2FB == 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;
- }
- static void scaling_update(void)
- {
- 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
- }
- }
- void emu_Deinit(void)
- {
- // save SRAM
- if((currentConfig.EmuOpt & 1) && SRam.changed) {
- emu_SaveLoadGame(0, 1);
- SRam.changed = 0;
- }
- if (!(currentConfig.EmuOpt & 0x20)) {
- config_writelrom(PicoConfigFile);
- #ifndef NO_SYNC
- sync();
- #endif
- }
- free(PicoDraw2FB);
- PicoExit();
- }
- void emu_prepareDefaultConfig(void)
- {
- memset(&defaultConfig, 0, sizeof(defaultConfig));
- defaultConfig.EmuOpt = 0x8f | 0x00600; // | <- confirm_save, cd_leds
- defaultConfig.s_PicoOpt = 0x0f | POPT_EXT_FM|POPT_EN_MCD_PCM|POPT_EN_MCD_CDDA|POPT_EN_SVP_DRC;
- defaultConfig.s_PicoOpt |= POPT_ACC_SPRITES|POPT_EN_MCD_GFX;
- defaultConfig.s_PicoOpt &= ~POPT_EN_SVP_DRC; // crashes :(
- defaultConfig.EmuOpt &= ~8; // no save gzip
- defaultConfig.s_PsndRate = 44100;
- defaultConfig.s_PicoRegion = 0;
- defaultConfig.s_PicoAutoRgnOrder = 0x184; // US, EU, JP
- defaultConfig.s_PicoCDBuffers = 0;
- defaultConfig.Frameskip = 0;
- defaultConfig.CPUclock = 200;
- defaultConfig.volume = 50;
- defaultConfig.scaling = 0;
- defaultConfig.turbo_rate = 15;
- }
- static void textOut16(int x, int y, const char *text)
- {
- int i,l,len=strlen(text);
- unsigned int *screen = (unsigned int *)((unsigned short *)SCREEN_BUFFER + (x&~1) + y*SCREEN_WIDTH);
- for (i = 0; i < len; i++)
- {
- for (l=0;l<16;)
- {
- unsigned char fd = fontdata8x8[((text[i])*8)+l/2];
- unsigned int *d = &screen[l*SCREEN_WIDTH/2];
- if (fd&0x80) d[0]=0xffffffff;
- if (fd&0x40) d[1]=0xffffffff;
- if (fd&0x20) d[2]=0xffffffff;
- if (fd&0x10) d[3]=0xffffffff;
- if (fd&0x08) d[4]=0xffffffff;
- if (fd&0x04) d[5]=0xffffffff;
- if (fd&0x02) d[6]=0xffffffff;
- if (fd&0x01) d[7]=0xffffffff;
- l++; d = &screen[l*SCREEN_WIDTH/2];
- if (fd&0x80) d[0]=0xffffffff;
- if (fd&0x40) d[1]=0xffffffff;
- if (fd&0x20) d[2]=0xffffffff;
- if (fd&0x10) d[3]=0xffffffff;
- if (fd&0x08) d[4]=0xffffffff;
- if (fd&0x04) d[5]=0xffffffff;
- if (fd&0x02) d[6]=0xffffffff;
- if (fd&0x01) d[7]=0xffffffff;
- l++;
- }
- screen += 8;
- }
- }
- void osd_text(int x, int y, const char *text)
- {
- 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+SCREEN_WIDTH*(y+h));
- for (i = len; i; i--, p++) *p = 0xe0e0e0e0;
- }
- emu_textOut8(x, y, text);
- } else {
- int *p, i, h;
- x &= ~1; // align x
- len++;
- for (h = 0; h < 16; h++) {
- p = (int *) ((unsigned short *) gp2x_screen+x+SCREEN_WIDTH*(y+h));
- for (i = len; i; i--, p++) *p = 0;//(*p>>2)&0x39e7;
- }
- textOut16(x, y, text);
- }
- }
- static void draw_cd_leds(void)
- {
- // static
- int old_reg;
- // if (!((Pico_mcd->s68k_regs[0] ^ old_reg) & 3)) return; // no change // mmu hack problems?
- old_reg = Pico_mcd->s68k_regs[0];
- 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 + SCREEN_WIDTH*2+ 4) =
- *(unsigned int *)((char *)gp2x_screen + SCREEN_WIDTH*3+ 4) =
- *(unsigned int *)((char *)gp2x_screen + SCREEN_WIDTH*4+ 4) = col_g;
- *(unsigned int *)((char *)gp2x_screen + SCREEN_WIDTH*2+12) =
- *(unsigned int *)((char *)gp2x_screen + SCREEN_WIDTH*3+12) =
- *(unsigned int *)((char *)gp2x_screen + SCREEN_WIDTH*4+12) = col_r;
- } else {
- // 16-bit modes
- unsigned int *p = (unsigned int *)((short *)gp2x_screen + SCREEN_WIDTH*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 += SCREEN_WIDTH/2 - 12/2;
- *p++ = col_g; *p++ = col_g; p+=2; *p++ = col_r; *p++ = col_r; p += SCREEN_WIDTH/2 - 12/2;
- *p++ = col_g; *p++ = col_g; p+=2; *p++ = col_r; *p++ = col_r;
- }
- }
- static void draw_pico_ptr(void)
- {
- unsigned short *p = (unsigned short *)gp2x_screen;
- // only if pen enabled and for 16bit modes
- if (pico_inp_mode == 0 || (PicoOpt&0x10) || !(currentConfig.EmuOpt&0x80)) return;
- if (!(Pico.video.reg[12]&1) && !(PicoOpt&POPT_DIS_32C_BORDER))
- p += 32;
- p += SCREEN_WIDTH * (pico_pen_y + PICO_PEN_ADJUST_Y);
- p += pico_pen_x + PICO_PEN_ADJUST_X;
- p[0] ^= 0xffff;
- p[319] ^= 0xffff;
- p[320] ^= 0xffff;
- p[321] ^= 0xffff;
- p[640] ^= 0xffff;
- }
- #ifdef USE_320_SCREEN
- static int EmuScanBegin16(unsigned int num)
- {
- if (!(Pico.video.reg[1]&8)) num += 8;
- DrawLineDest = (unsigned short *)gp2x_screen + num*800 + 800/2 - 320/2;
- //int w = (Pico.video.reg[12]&1) ? 320 : 256;
- //DrawLineDest = (unsigned short *)gp2x_screen + num*w;
- return 0;
- }
- #else // USE_320_SCREEN
- static int EmuScanEnd16(unsigned int num)
- {
- unsigned char *ps=HighCol+8;
- unsigned short *pd;
- unsigned short *pal=HighPal;
- int sh = Pico.video.reg[0xC]&8;
- int len, mask = 0xff;
- if (!(Pico.video.reg[1]&8)) num += 8;
- pd=(unsigned short *)gp2x_screen + num*800*2 + 800/2 - 320*2/2;
- if (Pico.m.dirtyPal)
- PicoDoHighPal555(sh);
- if (Pico.video.reg[12]&1) {
- len = 320;
- } else {
- pd += 32*2;
- len = 256;
- }
- if (!sh && (rendstatus & PDRAW_ACC_SPRITES))
- mask=0x3f; // accurate sprites, upper bits are priority stuff
- #if 1
- clut_line(pd, ps, pal, (mask<<16) | len);
- #else
- for (; len > 0; len--)
- {
- unsigned int p = pal[*ps++ & mask];
- p |= p << 16;
- *(unsigned int *)pd = p;
- *(unsigned int *)(&pd[800]) = p;
- pd += 2;
- }
- #endif
- return 0;
- }
- #endif // USE_320_SCREEN
- static int EmuScanBegin8(unsigned int num)
- {
- if (!(Pico.video.reg[1]&8)) num += 8;
- DrawLineDest = (unsigned char *) gp2x_screen + SCREEN_WIDTH * num;
- return 0;
- }
- int localPal[0x100];
- static void (*vidCpyM2)(void *dest, void *src) = NULL;
- static void blit(const char *fps, const char *notice)
- {
- int emu_opt = currentConfig.EmuOpt;
- if (PicoOpt&0x10)
- {
- // 8bit fast renderer
- if (Pico.m.dirtyPal) {
- Pico.m.dirtyPal = 0;
- vidConvCpyRGB32(localPal, Pico.cram, 0x40);
- // feed new palette to our device
- gp2x_video_setpalette(localPal, 0x40);
- }
- // a hack for VR
- if (PicoRead16Hook == PicoSVPRead16)
- memset32((int *)(PicoDraw2FB+328*8+328*223), 0xe0e0e0e0, 328);
- // do actual copy
- vidCpyM2((unsigned char *)gp2x_screen+SCREEN_WIDTH*8, PicoDraw2FB+328*8);
- }
- else if (!(emu_opt&0x80))
- {
- // 8bit accurate renderer
- if (Pico.m.dirtyPal)
- {
- int pallen = 0x40;
- 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);
- memcpy32(localPal+0xc0, localPal+0x40, 0x40);
- pallen = 0x100;
- }
- else if (rendstatus & PDRAW_ACC_SPRITES) {
- vidConvCpyRGB32(localPal, Pico.cram, 0x40);
- memcpy32(localPal+0x40, localPal, 0x40);
- memcpy32(localPal+0x80, localPal, 0x40);
- memcpy32(localPal+0xc0, localPal, 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);
- pallen = 0xc0;
- }
- else {
- vidConvCpyRGB32(localPal, Pico.cram, 0x40);
- }
- 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 || (emu_opt & 2)) {
- int h = SCREEN_HEIGHT-16;
- if (currentConfig.scaling == 2 && !(Pico.video.reg[1]&8)) h -= 16;
- 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();
- {
- //static int u=0;
- //memset((char *)gp2x_screen+800*471*2, (u++)>>1, 800*9*2);
- }
- //gp2x_video_wait_vsync();
- gp2x_video_flip();
- }
- // clears whole screen or just the notice area (in all buffers)
- static void clearArea(int full)
- {
- if ((PicoOpt&0x10)||!(currentConfig.EmuOpt&0x80)) {
- // 8-bit renderers
- if (full) gp2x_memset_all_buffers(0, 0xe0, SCREEN_WIDTH*240);
- else gp2x_memset_all_buffers(SCREEN_WIDTH*232, 0xe0, SCREEN_WIDTH*8);
- } else {
- // 16bit accurate renderer
- if (full) gp2x_memset_all_buffers(0, 0, SCREEN_WIDTH*SCREEN_HEIGHT*2);
- else gp2x_memset_all_buffers(SCREEN_WIDTH*(SCREEN_HEIGHT-16)*2, 0, SCREEN_WIDTH*16*2);
- }
- }
- static void vidResetMode(void)
- {
- if (PicoOpt&0x10) {
- gp2x_video_changemode(8);
- } else if (currentConfig.EmuOpt&0x80) {
- gp2x_video_changemode(16);
- #ifdef USE_320_SCREEN
- PicoDrawSetColorFormat(1);
- PicoScanBegin = EmuScanBegin16;
- #else
- PicoDrawSetColorFormat(-1);
- PicoScanEnd = EmuScanEnd16;
- #endif
- } else {
- gp2x_video_changemode(8);
- PicoDrawSetColorFormat(2);
- PicoScanBegin = EmuScanBegin8;
- }
- 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);
- }
- static void emu_msg_cb(const char *msg)
- {
- if ((PicoOpt&0x10)||!(currentConfig.EmuOpt&0x80)) {
- // 8-bit renderers
- gp2x_memset_all_buffers(SCREEN_WIDTH*(SCREEN_HEIGHT-16), 0xe0, SCREEN_WIDTH*16);
- osd_text(4, SCREEN_HEIGHT-16, msg);
- gp2x_memcpy_all_buffers((char *)gp2x_screen+SCREEN_WIDTH*(SCREEN_HEIGHT-16),
- SCREEN_WIDTH*(SCREEN_HEIGHT-16), SCREEN_WIDTH*16);
- } else {
- // 16bit accurate renderer
- gp2x_memset_all_buffers(SCREEN_WIDTH*(SCREEN_HEIGHT-16)*2, 0, SCREEN_WIDTH*16*2);
- osd_text(4, SCREEN_HEIGHT-16, msg);
- gp2x_memcpy_all_buffers((char *)gp2x_screen+SCREEN_WIDTH*(SCREEN_HEIGHT-16)*2,
- SCREEN_WIDTH*(SCREEN_HEIGHT-16)*2, SCREEN_WIDTH*16*2);
- }
- gettimeofday(¬iceMsgTime, 0);
- noticeMsgTime.tv_sec -= 2;
- /* assumption: emu_msg_cb gets called only when something slow is about to happen */
- reset_timing = 1;
- }
- static void emu_state_cb(const char *str)
- {
- clearArea(0);
- blit("", str);
- }
- static void emu_msg_tray_open(void)
- {
- strcpy(noticeMsg, "CD tray opened");
- gettimeofday(¬iceMsgTime, 0);
- }
- static void RunEventsPico(unsigned int events, unsigned int gp2x_keys)
- {
- int ret, px, py, lim_x;
- static int pdown_frames = 0;
- emu_RunEventsPico(events);
- if (pico_inp_mode == 0) return;
- // 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;
- }
- PicoPad[0] &= ~0x0f; // release UDLR
- if (gp2x_keys & GP2X_UP) pico_pen_y--;
- if (gp2x_keys & GP2X_DOWN) pico_pen_y++;
- if (gp2x_keys & GP2X_LEFT) pico_pen_x--;
- if (gp2x_keys & GP2X_RIGHT) pico_pen_x++;
- lim_x = (Pico.video.reg[12]&1) ? 319 : 255;
- if (pico_pen_y < 8) pico_pen_y = 8;
- if (pico_pen_y > 224-PICO_PEN_ADJUST_Y) pico_pen_y = 224-PICO_PEN_ADJUST_Y;
- if (pico_pen_x < 0) pico_pen_x = 0;
- if (pico_pen_x > lim_x-PICO_PEN_ADJUST_X) pico_pen_x = lim_x-PICO_PEN_ADJUST_X;
- PicoPicohw.pen_pos[0] = pico_pen_x;
- if (!(Pico.video.reg[12]&1)) PicoPicohw.pen_pos[0] += pico_pen_x/4;
- PicoPicohw.pen_pos[0] += 0x3c;
- PicoPicohw.pen_pos[1] = pico_inp_mode == 1 ? (0x2f8 + pico_pen_y) : (0x1fc + pico_pen_y);
- }
- static void update_volume(int has_changed, int is_up)
- {
- static int prev_frame = 0, wait_frames = 0;
- int vol = currentConfig.volume;
- if (has_changed)
- {
- if (vol < 5 && (PicoOpt&8) && 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;
- gp2x_sound_volume(vol, vol);
- currentConfig.volume = vol;
- }
- sprintf(noticeMsg, "VOL: %02i", vol);
- gettimeofday(¬iceMsgTime, 0);
- prev_frame = Pico.m.frame_count;
- }
- // set the right mixer func
- if (!(PicoOpt&8)) return; // just use defaults for mono
- 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;
- }
- }
- static void RunEvents(unsigned int which)
- {
- if (which & 0x1800) // save or load (but not both)
- {
- int do_it = 1;
- if ( emu_checkSaveFile(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;
- while ( gp2x_joystick_read(1) & (GP2X_X|GP2X_Y) ) // wait for release
- usleep(50*1024);
- clearArea(0);
- }
- if (do_it) {
- osd_text(4, SCREEN_HEIGHT-16, (which & 0x1000) ? "LOADING GAME" : "SAVING GAME");
- PicoStateProgressCB = emu_state_cb;
- gp2x_memcpy_all_buffers(gp2x_screen, 0, SCREEN_WIDTH*SCREEN_HEIGHT*2);
- emu_SaveLoadGame((which & 0x1000) >> 12, 0);
- PicoStateProgressCB = NULL;
- }
- 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");
- }
- 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_checkSaveFile(state_slot) ? "USED" : "FREE");
- gettimeofday(¬iceMsgTime, 0);
- }
- if (which & 0x0080) {
- engineState = PGS_Menu;
- }
- }
- static void updateKeys(void)
- {
- unsigned int keys, keys2, allActions[2] = { 0, 0 }, events;
- static unsigned int 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);
- }
- keys &= CONFIGURABLE_KEYS;
- keys2 = keys;
- for (i = 0; i < 32; i++)
- {
- if (keys2 & (1 << i))
- {
- int pl, acts = currentConfig.KeyBinds[i];
- if (!acts) continue;
- pl = (acts >> 16) & 1;
- if (kb_combo_keys & (1 << i))
- {
- int u = i+1, acts_c = acts & kb_combo_acts;
- // let's try to find the other one
- if (acts_c) {
- for (; u < 32; u++)
- if ( (keys2 & (1 << u)) && (currentConfig.KeyBinds[u] & acts_c) ) {
- allActions[pl] |= acts_c & currentConfig.KeyBinds[u];
- keys2 &= ~((1 << i) | (1 << u));
- break;
- }
- }
- // add non-combo actions if combo ones were not found
- if (!acts_c || u == 32)
- allActions[pl] |= acts & ~kb_combo_acts;
- } else {
- allActions[pl] |= acts;
- }
- }
- }
- // add joy inputs
- if (num_of_joys > 0)
- {
- gp2x_usbjoy_update();
- for (joy = 0; joy < num_of_joys; joy++) {
- int btns = gp2x_usbjoy_check2(joy);
- for (i = 0; i < 32; i++) {
- if (btns & (1 << i)) {
- int acts = currentConfig.JoyBinds[joy][i];
- int pl = (acts >> 16) & 1;
- allActions[pl] |= acts;
- }
- }
- }
- }
- PicoPad[0] = allActions[0] & 0xfff;
- PicoPad[1] = allActions[1] & 0xfff;
- if (allActions[0] & 0x7000) emu_DoTurbo(&PicoPad[0], allActions[0]);
- if (allActions[1] & 0x7000) emu_DoTurbo(&PicoPad[1], allActions[1]);
- events = (allActions[0] | allActions[1]) >> 16;
- // volume is treated in special way and triggered every frame
- if (events & 0x6000)
- update_volume(1, events & 0x2000);
- if ((events ^ prevEvents) & 0x40) {
- emu_changeFastForward(events & 0x40);
- update_volume(0, 0);
- reset_timing = 1;
- }
- events &= ~prevEvents;
- if (PicoAHW == PAHW_PICO)
- RunEventsPico(events, keys);
- if (events) RunEvents(events);
- if (movie_data) emu_updateMovie();
- prevEvents = (allActions[0] | allActions[1]) >> 16;
- }
- static void updateSound(int len)
- {
- if (PicoOpt&8) len<<=1;
- /* avoid writing audio when lagging behind to prevent audio lag */
- if (PicoSkipFrame != 2)
- gp2x_sound_write(PsndOut, len<<1);
- }
- static void SkipFrame(int do_audio)
- {
- PicoSkipFrame=do_audio ? 1 : 2;
- PicoFrame();
- PicoSkipFrame=0;
- }
- void emu_forcedFrame(int opts)
- {
- int po_old = PicoOpt;
- int eo_old = currentConfig.EmuOpt;
- PicoOpt &= ~0x10;
- PicoOpt |= opts|POPT_ACC_SPRITES; // acc_sprites
- currentConfig.EmuOpt |= 0x80;
- //vidResetMode();
- #ifdef USE_320_SCREEN
- PicoDrawSetColorFormat(1);
- PicoScanBegin = EmuScanBegin16;
- #else
- PicoDrawSetColorFormat(-1);
- PicoScanEnd = EmuScanEnd16;
- #endif
- Pico.m.dirtyPal = 1;
- PicoFrameDrawOnly();
- /*
- if (!(Pico.video.reg[12]&1)) {
- vidCpyM2 = vidCpyM2_32col;
- clearArea(1);
- } else vidCpyM2 = vidCpyM2_40col;
- vidCpyM2((unsigned char *)gp2x_screen+SCREEN_WIDTH*8, PicoDraw2FB+328*8);
- vidConvCpyRGB32(localPal, Pico.cram, 0x40);
- gp2x_video_setpalette(localPal, 0x40);
- */
- PicoOpt = po_old;
- currentConfig.EmuOpt = eo_old;
- }
- static void simpleWait(int thissec, int lim_time)
- {
- struct timeval tval;
- spend_cycles(1024);
- gettimeofday(&tval, 0);
- if (thissec != tval.tv_sec) tval.tv_usec+=1000000;
- while (tval.tv_usec < lim_time)
- {
- spend_cycles(1024);
- gettimeofday(&tval, 0);
- if (thissec != tval.tv_sec) tval.tv_usec+=1000000;
- }
- }
- void emu_Loop(void)
- {
- static int PsndRate_old = 0, PicoOpt_old = 0, pal_old = 0;
- char fpsbuff[24]; // fps count c string
- struct timeval tval; // timing
- int pframes_done, pframes_shown, pthissec; // "period" frames, used for sync
- int frames_done, frames_shown, thissec; // actual frames
- int oldmodes = 0, target_fps, target_frametime, lim_time, vsync_offset, i;
- char *notice = 0;
- printf("entered emu_Loop()\n");
- fpsbuff[0] = 0;
- // make sure we are in correct mode
- vidResetMode();
- scaling_update();
- Pico.m.dirtyPal = 1;
- oldmodes = ((Pico.video.reg[12]&1)<<2) ^ 0xc;
- emu_findKeyBindCombos();
- // pal/ntsc might have changed, reset related stuff
- target_fps = Pico.m.pal ? 50 : 60;
- target_frametime = 1000000/target_fps;
- reset_timing = 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)
- PsndRerate(Pico.m.frame_count ? 1 : 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);
- PicoWriteSound = updateSound;
- update_volume(0, 0);
- memset(sndBuffer, 0, sizeof(sndBuffer));
- PsndOut = sndBuffer;
- PsndRate_old = PsndRate;
- PicoOpt_old = PicoOpt;
- pal_old = Pico.m.pal;
- } else {
- PsndOut = NULL;
- }
- // prepare CD buffer
- if (PicoAHW & PAHW_MCD) 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;
- frames_done = frames_shown = thissec =
- pframes_done = pframes_shown = pthissec = 0;
- // loop
- while (engineState == PGS_Running)
- {
- int modes;
- gettimeofday(&tval, 0);
- if (reset_timing) {
- reset_timing = 0;
- pthissec = tval.tv_sec;
- pframes_shown = pframes_done = tval.tv_usec/target_frametime;
- }
- // 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 = SCREEN_WIDTH;
- 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);
- }
- // 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 == 4) {
- bench = 0;
- bench_fps_s = bench_fps / 4;
- bf[bfp++ & 3] = bench_fps / 4;
- bench_fps = 0;
- }
- bench_fps += frames_shown;
- sprintf(fpsbuff, "%3i/%3i/%3i", frames_shown, bench_fps_s, (bf[0]+bf[1]+bf[2]+bf[3])>>2);
- printf("%s\n", fpsbuff);
- #else
- if (currentConfig.EmuOpt & 2) {
- sprintf(fpsbuff, "%3i/%3i", frames_shown, frames_done);
- if (fpsbuff[5] == 0) { fpsbuff[5] = fpsbuff[6] = ' '; fpsbuff[7] = 0; }
- }
- #endif
- frames_shown = frames_done = 0;
- thissec = tval.tv_sec;
- }
- #ifdef PFRAMES
- sprintf(fpsbuff, "%i", Pico.m.frame_count);
- #endif
- if (pthissec != tval.tv_sec)
- {
- if (PsndOut == 0 && currentConfig.Frameskip >= 0) {
- pframes_done = pframes_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 && pframes_done < target_fps && pframes_done > target_fps-5) {
- updateKeys();
- SkipFrame(1); pframes_done++;
- }
- pframes_done -= target_fps; if (pframes_done < 0) pframes_done = 0;
- pframes_shown -= target_fps; if (pframes_shown < 0) pframes_shown = 0;
- if (pframes_shown > pframes_done) pframes_shown = pframes_done;
- }
- pthissec = tval.tv_sec;
- }
- lim_time = (pframes_done+1) * target_frametime + vsync_offset;
- if (currentConfig.Frameskip >= 0) // frameskip enabled
- {
- for(i = 0; i < currentConfig.Frameskip; i++) {
- updateKeys();
- SkipFrame(1); pframes_done++; frames_done++;
- if (PsndOut && !reset_timing) { // do framelimitting if sound is enabled
- gettimeofday(&tval, 0);
- if (pthissec != tval.tv_sec) tval.tv_usec+=1000000;
- if (tval.tv_usec < lim_time) { // we are too fast
- simpleWait(pthissec, 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 >= 300000) {
- /* 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); pframes_done++; frames_done++;
- continue;
- }
- updateKeys();
- PicoFrame();
- // check time
- gettimeofday(&tval, 0);
- if (pthissec != tval.tv_sec) tval.tv_usec+=1000000;
- if (currentConfig.Frameskip < 0 && tval.tv_usec - lim_time >= 300000) // 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 (!reset_timing && tval.tv_usec < lim_time)
- {
- // we are too fast
- if (vsync_offset) {
- if (lim_time - tval.tv_usec > target_frametime/2)
- simpleWait(pthissec, lim_time - target_frametime/4);
- gp2x_video_wait_vsync();
- } else {
- simpleWait(pthissec, lim_time);
- }
- }
- }
- */
- blit(fpsbuff, notice);
- pframes_done++; pframes_shown++;
- frames_done++; frames_shown++;
- }
- emu_changeFastForward(0);
- if (PicoAHW & PAHW_MCD) PicoCDBufferFree();
- // save SRAM
- if((currentConfig.EmuOpt & 1) && SRam.changed) {
- emu_state_cb("Writing SRAM/BRAM..");
- emu_SaveLoadGame(0, 1);
- SRam.changed = 0;
- }
- // if in 8bit mode, generate 16bit image for menu background
- if ((PicoOpt&0x10) || !(currentConfig.EmuOpt&0x80))
- emu_forcedFrame(POPT_EN_SOFTSCALE);
- }
- void emu_ResetGame(void)
- {
- PicoReset();
- reset_timing = 1;
- }
|