debug bgm player, sound code refactoring
[libpicofe.git] / psp / emu.c
index 46de80c..015c320 100644 (file)
--- a/psp/emu.c
+++ b/psp/emu.c
@@ -21,7 +21,8 @@
 #include "../common/emu.h"
 #include "../common/config.h"
 #include "../common/lprintf.h"
-#include "../../Pico/PicoInt.h"
+#include <pico/pico_int.h>
+#include <pico/cd/cue.h>
 
 #define OSD_FPS_X 432
 
@@ -34,11 +35,14 @@ int sceAudioOutput2GetRestSample();
 
 char romFileName[PATH_MAX];
 unsigned char *PicoDraw2FB = (unsigned char *)VRAM_CACHED_STUFF + 8; // +8 to be able to skip border with 1 quadword..
-int engineState = PGS_Menu;
+int engineState = PGS_Menu, engineStateSuspend;
 
 static unsigned int noticeMsgTime = 0;
 int reset_timing = 0; // do we need this?
 
+#define PICO_PEN_ADJUST_X 4
+#define PICO_PEN_ADJUST_Y 2
+static int pico_pen_x = 320/2, pico_pen_y = 240/2;
 
 static void sound_init(void);
 static void sound_deinit(void);
@@ -50,9 +54,10 @@ void emu_noticeMsgUpdated(void)
        noticeMsgTime = sceKernelGetSystemTimeLow();
 }
 
-void emu_getMainDir(char *dst, int len)
+int emu_getMainDir(char *dst, int len)
 {
        if (len > 0) *dst = 0;
+       return 0;
 }
 
 static void osd_text(int x, const char *text, int is_active, int clear_all)
@@ -122,7 +127,7 @@ void emu_prepareDefaultConfig(void)
 {
        memset(&defaultConfig, 0, sizeof(defaultConfig));
        defaultConfig.EmuOpt    = 0x1d | 0x680; // | <- confirm_save, cd_leds, acc rend
-       defaultConfig.s_PicoOpt = 0x0f | POPT_EN_MCD_PCM|POPT_EN_MCD_CDDA|POPT_EN_MCD_GFX;
+       defaultConfig.s_PicoOpt = 0x0f | POPT_EN_MCD_PCM|POPT_EN_MCD_CDDA|POPT_EN_MCD_GFX|POPT_ACC_SPRITES;
        defaultConfig.s_PsndRate = 22050;
        defaultConfig.s_PicoRegion = 0; // auto
        defaultConfig.s_PicoAutoRgnOrder = 0x184; // US, EU, JP
@@ -148,20 +153,14 @@ void emu_prepareDefaultConfig(void)
        defaultConfig.scale = 1.20;    // fullscreen
        defaultConfig.hscale40 = 1.25;
        defaultConfig.hscale32 = 1.56;
-}
-
-void emu_setDefaultConfig(void)
-{
-       memcpy(&currentConfig, &defaultConfig, sizeof(currentConfig));
-       PicoOpt = currentConfig.s_PicoOpt;
-       PsndRate = currentConfig.s_PsndRate;
-       PicoRegionOverride = currentConfig.s_PicoRegion;
-       PicoAutoRgnOrder = currentConfig.s_PicoAutoRgnOrder;
-       PicoCDBuffers = currentConfig.s_PicoCDBuffers;
+       defaultConfig.turbo_rate = 15;
 }
 
 
 extern void amips_clut(unsigned short *dst, unsigned char *src, unsigned short *pal, int count);
+extern void amips_clut_6bit(unsigned short *dst, unsigned char *src, unsigned short *pal, int count);
+
+static void (*amips_clut_f)(unsigned short *dst, unsigned char *src, unsigned short *pal, int count) = NULL;
 
 struct Vertex
 {
@@ -235,7 +234,7 @@ static void set_scaling_params(void)
        */
 }
 
-static void do_pal_update(int allow_sh)
+static void do_pal_update(int allow_sh, int allow_as)
 {
        unsigned int *dpal=(void *)localPal;
        int i;
@@ -244,6 +243,9 @@ static void do_pal_update(int allow_sh)
        //      dpal[i] = ((spal[i]&0x000f000f)<< 1)|((spal[i]&0x00f000f0)<<3)|((spal[i]&0x0f000f00)<<4);
        do_pal_convert(localPal, Pico.cram, currentConfig.gamma, currentConfig.gamma2);
 
+       Pico.m.dirtyPal = 0;
+       need_pal_upload = 1;
+
        if (allow_sh && (Pico.video.reg[0xC]&8)) // shadow/hilight?
        {
                // shadowed pixels
@@ -259,9 +261,12 @@ static void do_pal_update(int allow_sh)
                        localPal[0x80|i]=(unsigned short)t;
                }
                localPal[0xe0] = 0;
+               localPal[0xf0] = 0x001f;
+       }
+       else if (allow_as && (rendstatus & PDRAW_SPR_LO_ON_HI))
+       {
+               memcpy32((int *)dpal+0x80/2, (void *)localPal, 0x40*2/4);
        }
-       Pico.m.dirtyPal = 0;
-       need_pal_upload = 1;
 }
 
 static void do_slowmode_lines(int line_to)
@@ -272,7 +277,7 @@ static void do_slowmode_lines(int line_to)
        if (!(Pico.video.reg[1]&8)) { line = 8; dst += 512*8; src += 512*8; }
 
        for (; line < line_to; line++, dst+=512, src+=512)
-               amips_clut(dst, src, localPal, line_len);
+               amips_clut_f(dst, src, localPal, line_len);
 }
 
 static void EmuScanPrepare(void)
@@ -280,9 +285,14 @@ static void EmuScanPrepare(void)
        HighCol = (unsigned char *)VRAM_CACHED_STUFF + 8;
        if (!(Pico.video.reg[1]&8)) HighCol += 8*512;
 
-       dynamic_palette = 0;
+       if (dynamic_palette > 0)
+               dynamic_palette--;
+
        if (Pico.m.dirtyPal)
-               do_pal_update(1);
+               do_pal_update(1, 1);
+       if ((rendstatus & PDRAW_SPR_LO_ON_HI) && !(Pico.video.reg[0xC]&8))
+            amips_clut_f = amips_clut_6bit;
+       else amips_clut_f = amips_clut;
 }
 
 static int EmuScanSlowBegin(unsigned int num)
@@ -302,15 +312,15 @@ static int EmuScanSlowEnd(unsigned int num)
        if (Pico.m.dirtyPal) {
                if (!dynamic_palette) {
                        do_slowmode_lines(num);
-                       dynamic_palette = 1;
+                       dynamic_palette = 3; // last for 2 more frames
                }
-               do_pal_update(1);
+               do_pal_update(1, 1);
        }
 
        if (dynamic_palette) {
                int line_len = (Pico.video.reg[12]&1) ? 320 : 256;
                void *dst = (char *)VRAM_STUFF + 512*240 + 512*2*num;
-               amips_clut(dst, HighCol + 8, localPal, line_len);
+               amips_clut_f(dst, HighCol + 8, localPal, line_len);
        }
 
        return 0;
@@ -327,7 +337,7 @@ static void blitscreen_clut(void)
 
        if (dynamic_palette)
        {
-               if (!blit_16bit_mode) {
+               if (!blit_16bit_mode) { // the current mode is not 16bit
                        sceGuTexMode(GU_PSM_5650, 0, 0, 0);
                        sceGuTexImage(0,512,512,512,(char *)VRAM_STUFF + 512*240);
 
@@ -344,7 +354,7 @@ static void blitscreen_clut(void)
                }
 
                if ((PicoOpt&0x10) && Pico.m.dirtyPal)
-                       do_pal_update(0);
+                       do_pal_update(0, 0);
 
                sceKernelDcacheWritebackAll();
 
@@ -394,6 +404,21 @@ static void cd_leds(void)
        *p++ = col_g; *p++ = col_g; p+=2; *p++ = col_r; *p++ = col_r;
 }
 
+static void draw_pico_ptr(void)
+{
+       unsigned char *p = (unsigned char *)VRAM_STUFF + 16;
+
+       // only if pen enabled and for 8bit mode
+       if (pico_inp_mode == 0 || blit_16bit_mode) return;
+
+       p += 512 * (pico_pen_y + PICO_PEN_ADJUST_Y);
+       p += pico_pen_x + PICO_PEN_ADJUST_X;
+       p[  -1] = 0xe0; p[   0] = 0xf0; p[   1] = 0xe0;
+       p[ 511] = 0xf0; p[ 512] = 0xf0; p[ 513] = 0xf0;
+       p[1023] = 0xe0; p[1024] = 0xf0; p[1025] = 0xe0;
+}
+
+
 #if 0
 static void dbg_text(void)
 {
@@ -425,6 +450,9 @@ void blit1(void)
                        memset32((int *)pd, 0xe0e0e0e0, 320/4);
        }
 
+       if (PicoAHW & PAHW_PICO)
+               draw_pico_ptr();
+
        blitscreen_clut();
 }
 
@@ -489,6 +517,7 @@ static void vidResetMode(void)
        PicoScanEnd = EmuScanSlowEnd;
 
        localPal[0xe0] = 0;
+       localPal[0xf0] = 0x001f;
        Pico.m.dirtyPal = 1;
        blit_16bit_mode = dynamic_palette = 0;
 
@@ -497,6 +526,11 @@ static void vidResetMode(void)
        sceGuSync(0,0);
 }
 
+void emu_platformDebugCat(char *str)
+{
+       strcat(str, blit_16bit_mode ? "soft clut\n" : "hard clut\n");
+}
+
 
 /* sound stuff */
 #define SOUND_BLOCK_SIZE_NTSC (1470*2) // 1024 // 1152
@@ -575,7 +609,7 @@ static void sound_init(void)
                lprintf("sceKernelCreateThread failed: %i\n", thid);
 }
 
-static void sound_prepare(void)
+void emu_startSound(void)
 {
        static int PsndRate_old = 0, PicoOpt_old = 0, pal_old = 0;
        int ret, stereo;
@@ -614,7 +648,7 @@ static void sound_prepare(void)
        }
 }
 
-static void sound_end(void)
+void emu_endSound(void)
 {
        int i;
        if (samples_done == 0)
@@ -633,6 +667,14 @@ static void sound_end(void)
        sceAudio_5C37C0AE();
 }
 
+/* wait until we can write more sound */
+void emu_waitSound(void)
+{
+       // TODO: test this
+       while (!sound_thread_exit && samples_made - samples_done > samples_block * 4)
+               psp_msleep(10);
+}
+
 static void sound_deinit(void)
 {
        sound_thread_exit = 1;
@@ -674,13 +716,13 @@ static void SkipFrame(void)
        PicoSkipFrame=0;
 }
 
-void emu_forcedFrame(void)
+void emu_forcedFrame(int opts)
 {
        int po_old = PicoOpt;
        int eo_old = currentConfig.EmuOpt;
 
-       PicoOpt &= ~0x0010;
-       PicoOpt |=  0x4080; // soft_scale | acc_sprites
+       PicoOpt &= ~0x10;
+       PicoOpt |= opts|POPT_ACC_SPRITES;
        currentConfig.EmuOpt |= 0x80;
 
        vidResetMode();
@@ -701,6 +743,29 @@ void emu_forcedFrame(void)
 }
 
 
+static void RunEventsPico(unsigned int events, unsigned int keys)
+{
+       emu_RunEventsPico(events);
+
+       if (pico_inp_mode != 0)
+       {
+               PicoPad[0] &= ~0x0f; // release UDLR
+               if (keys & BTN_UP)   { pico_pen_y--; if (pico_pen_y < 8) pico_pen_y = 8; }
+               if (keys & BTN_DOWN) { pico_pen_y++; if (pico_pen_y > 224-PICO_PEN_ADJUST_Y) pico_pen_y = 224-PICO_PEN_ADJUST_Y; }
+               if (keys & BTN_LEFT) { pico_pen_x--; if (pico_pen_x < 0) pico_pen_x = 0; }
+               if (keys & BTN_RIGHT) {
+                       int lim = (Pico.video.reg[12]&1) ? 319 : 255;
+                       pico_pen_x++;
+                       if (pico_pen_x > lim-PICO_PEN_ADJUST_X)
+                               pico_pen_x = lim-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 RunEvents(unsigned int which)
 {
        if (which & 0x1800) // save or load (but not both)
@@ -804,12 +869,23 @@ static void updateKeys(void)
                }
        }
 
-       PicoPad[0] = (unsigned short) allActions[0];
-       PicoPad[1] = (unsigned short) allActions[1];
+       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;
 
+       if ((events ^ prevEvents) & 0x40) {
+               emu_changeFastForward(events & 0x40);
+               reset_timing = 1;
+       }
+
        events &= ~prevEvents;
+
+       if (PicoAHW == PAHW_PICO)
+               RunEventsPico(events, keys);
        if (events) RunEvents(events);
        if (movie_data) emu_updateMovie();
 
@@ -876,7 +952,7 @@ void emu_Loop(void)
        PsndOut = NULL;
        if (currentConfig.EmuOpt & 4)
        {
-               sound_prepare();
+               emu_startSound();
        }
 
        sceDisplayWaitVblankStart();
@@ -1017,11 +1093,13 @@ void emu_Loop(void)
        }
 
 
+       emu_changeFastForward(0);
+
        if (PicoAHW & PAHW_MCD) PicoCDBufferFree();
 
        if (PsndOut != NULL) {
+               emu_endSound();
                PsndOut = NULL;
-               sound_end();
        }
 
        // save SRAM
@@ -1046,15 +1124,31 @@ void emu_HandleResume(void)
 {
        if (!(PicoAHW & PAHW_MCD)) return;
 
-       // reopen files..
+       // reopen first CD track
        if (Pico_mcd->TOC.Tracks[0].F != NULL)
        {
-               lprintf("emu_HandleResume: reopen %s\n", romFileName);
+               char *fname = romFileName;
+               int len = strlen(romFileName);
+               cue_data_t *cue_data = NULL;
+
+               if (len > 4 && strcasecmp(fname + len - 4,  ".cue") == 0)
+               {
+                       cue_data = cue_parse(romFileName);
+                       if (cue_data != NULL)
+                               fname = cue_data->tracks[1].fname;
+               }
+
+               lprintf("emu_HandleResume: reopen %s\n", fname);
                pm_close(Pico_mcd->TOC.Tracks[0].F);
-               Pico_mcd->TOC.Tracks[0].F = pm_open(romFileName);
+               Pico_mcd->TOC.Tracks[0].F = pm_open(fname);
                lprintf("reopen %s\n", Pico_mcd->TOC.Tracks[0].F != NULL ? "ok" : "failed");
+
+               if (cue_data != NULL) cue_destroy(cue_data);
        }
 
        mp3_reopen_file();
+
+       if (!(Pico_mcd->s68k_regs[0x36] & 1) && (Pico_mcd->scd.Status_CDC & 1))
+               cdda_start_play();
 }