some audio problems fixed, missing files added
[libpicofe.git] / gp2x / 940ctl_ym2612.c
index 29fd8bf..1059b5d 100644 (file)
@@ -12,9 +12,8 @@
 #include "emu.h"\r
 #include "menu.h"\r
 #include "asmutils.h"\r
+#include "mp3.h"\r
 #include "../../Pico/PicoInt.h"\r
-\r
-// tmp\r
 #include "../../Pico/sound/mix.h"\r
 \r
 /* we will need some gp2x internals here */\r
@@ -23,8 +22,8 @@ extern volatile unsigned long  *gp2x_memregl;
 \r
 static unsigned char *shared_mem = 0;\r
 static _940_data_t *shared_data = 0;\r
-static _940_ctl_t *shared_ctl = 0;\r
-static unsigned char *mp3_mem = 0;\r
+_940_ctl_t *shared_ctl = 0;\r
+unsigned char *mp3_mem = 0;\r
 \r
 #define MP3_SIZE_MAX (0x1000000 - 4*640*480)\r
 \r
@@ -226,26 +225,17 @@ int YM2612PicoTick_940(int n)
        return 0;\r
 }\r
 \r
-static int g_busy = 10;\r
 \r
-static void wait_busy_940(void)\r
+#define CHECK_BUSY(job) \\r
+       (gp2x_memregs[0x3b46>>1] & (1<<(job-1)))\r
+\r
+static void wait_busy_940(int job)\r
 {\r
        int i;\r
-#if 0\r
-       printf("940 busy, entering wait loop.. (cnt: %i, wc: %i, ve: ", shared_ctl->loopc, shared_ctl->waitc);\r
-       for (i = 0; i < 8; i++)\r
-               printf("%i ", shared_ctl->vstarts[i]);\r
-       printf(")\n");\r
 \r
-       for (i = 0; shared_ctl->busy; i++)\r
-       {\r
-               spend_cycles(1024); /* needs tuning */\r
-       }\r
-       printf("wait iterations: %i\n", i);\r
-#else\r
-       for (i = 0; /*shared_ctl->busy*/gp2x_memregs[0x3B3E>>1] && i < 0x10000; i++)\r
+       job--;\r
+       for (i = 0; (gp2x_memregs[0x3b46>>1] & (1<<job)) && i < 0x10000; i++)\r
                spend_cycles(8*1024); // tested to be best for mp3 dec\r
-       //printf("i = 0x%x\n", i);\r
        if (i < 0x10000) return;\r
 \r
        /* 940 crashed */\r
@@ -253,39 +243,36 @@ static void wait_busy_940(void)
        for (i = 0; i < 8; i++)\r
                printf("%i ", shared_ctl->vstarts[i]);\r
        printf(")\n");\r
-       printf("irq pending flags: DUALCPU %04x (see 15?), SRCPND %08lx (see 26), INTPND %08lx\n",\r
+       printf("irq pending flags: DUALCPU %04x, SRCPND %08lx (see 26), INTPND %08lx\n",\r
                gp2x_memregs[0x3b46>>1], gp2x_memregl[0x4500>>2], gp2x_memregl[0x4510>>2]);\r
-       printf("last irq PC: %08x, lastjob: 0x%03x, busy: %x, lastbusy: %x, g_busy: %x\n", shared_ctl->last_irq_pc,\r
-                       shared_ctl->lastjob, gp2x_memregs[0x3B3E>>1]/*shared_ctl->busy*/, shared_ctl->lastbusy, g_busy);\r
+       printf("last lr: %08x, lastjob: %i\n", shared_ctl->last_lr, shared_ctl->lastjob);\r
        printf("trying to interrupt..\n");\r
        gp2x_memregs[0x3B3E>>1] = 0xffff;\r
-       for (i = 0; /*shared_ctl->busy*/gp2x_memregs[0x3B3E>>1] && i < 0x10000; i++)\r
+       for (i = 0; gp2x_memregs[0x3b46>>1] && i < 0x10000; i++)\r
                spend_cycles(8*1024);\r
        printf("i = 0x%x\n", i);\r
-       printf("irq pending flags: DUALCPU %04x (see 15?), SRCPND %08lx (see 26), INTPND %08lx\n",\r
+       printf("irq pending flags: DUALCPU %04x, SRCPND %08lx (see 26), INTPND %08lx\n",\r
                gp2x_memregs[0x3b46>>1], gp2x_memregl[0x4500>>2], gp2x_memregl[0x4510>>2]);\r
-       printf("last irq PC: %08x, lastjob: 0x%03x, busy: %x\n", shared_ctl->last_irq_pc, shared_ctl->lastjob, gp2x_memregs[0x3B3E>>1]/*shared_ctl->busy*/);\r
+       printf("last lr: %08x, lastjob: %i\n", shared_ctl->last_lr, shared_ctl->lastjob);\r
 \r
        strcpy(menuErrorMsg, "940 crashed.");\r
        engineState = PGS_Menu;\r
        crashed_940 = 1;\r
-#endif\r
 }\r
 \r
 \r
-static void add_job_940(int job0, int job1)\r
+static void add_job_940(int job)\r
 {\r
-/*     if (gp2x_memregs[0x3b46>>1] || shared_ctl->busy)\r
-       {\r
-               printf("!!add_job_940: irq pending flags: DUALCPU %04x (see 15?), SRCPND %08lx (see 26), INTPND %08lx, busy: %x\n",\r
-                               gp2x_memregs[0x3b46>>1], gp2x_memregl[0x4500>>2], gp2x_memregl[0x4510>>2], shared_ctl->busy);\r
+       if (job <= 0 || job > 16) {\r
+               printf("add_job_940: bad job: %i\n", job);\r
+               return;\r
        }\r
-*/\r
-       shared_ctl->jobs[0] = job0;\r
-       shared_ctl->jobs[1] = job1;\r
-       //shared_ctl->busy = ++g_busy; // 1;\r
-       gp2x_memregs[0x3B3E>>1] = ++g_busy; // set busy flag\r
-//     gp2x_memregs[0x3B3E>>1] = 0xffff; // cause interrupt\r
+\r
+       // generate interrupt for this job\r
+       job--;\r
+       gp2x_memregs[(0x3B20+job*2)>>1] = 1;\r
+\r
+//     printf("added %i, pending %04x\n", job+1, gp2x_memregs[0x3b46>>1]);\r
 }\r
 \r
 \r
@@ -293,8 +280,6 @@ void YM2612PicoStateLoad_940(void)
 {\r
        int i, old_A1 = addr_A1;\r
 \r
-       if (/*shared_ctl->busy*/gp2x_memregs[0x3B3E>>1]) wait_busy_940();\r
-\r
        // feed all the registers and update internal state\r
        for(i = 0; i < 0x100; i++) {\r
                YM2612Write_940(0, i);\r
@@ -307,7 +292,7 @@ void YM2612PicoStateLoad_940(void)
 \r
        addr_A1 = old_A1;\r
 \r
-       add_job_940(JOB940_PICOSTATELOAD, 0);\r
+       add_job_940(JOB940_PICOSTATELOAD);\r
 }\r
 \r
 \r
@@ -338,6 +323,11 @@ void YM2612Init_940(int baseclock, int rate)
        gp2x_memregs[0x3B40>>1] = 0;      // disable DUALCPU interrupts for 920\r
        gp2x_memregs[0x3B42>>1] = 1;      // enable  DUALCPU interrupts for 940\r
 \r
+       gp2x_memregl[0x4504>>2] = 0;        // make sure no FIQs will be generated\r
+       gp2x_memregl[0x4508>>2] = ~(1<<26); // unmask DUALCPU ints in the undocumented 940's interrupt controller\r
+\r
+\r
+\r
        if (shared_mem == NULL)\r
        {\r
                shared_mem = (unsigned char *) mmap(0, 0x210000, PROT_READ|PROT_WRITE, MAP_SHARED, memdev, 0x2000000);\r
@@ -406,24 +396,20 @@ void YM2612Init_940(int baseclock, int rate)
 \r
        loaded_mp3 = 0;\r
 \r
-       /* now cause 940 to init it's ym2612 stuff */\r
-       shared_ctl->baseclock = baseclock;\r
-       shared_ctl->rate = rate;\r
-       shared_ctl->jobs[0] = JOB940_INITALL;\r
-       shared_ctl->jobs[1] = 0;\r
-       //shared_ctl->busy = 1;\r
-       gp2x_memregs[0x3B3E>>1] = 1; // set busy flag\r
-\r
        gp2x_memregs[0x3B46>>1] = 0xffff; // clear pending DUALCPU interrupts for 940\r
-       gp2x_memregl[0x4500>>2] = 0; // clear pending IRQs in SRCPND\r
-       gp2x_memregl[0x4510>>2] = 0; // clear pending IRQs in INTPND\r
-       gp2x_memregl[0x4508>>2] = ~(1<<26); // unmask DUALCPU ints in the undocumented 940's interrupt controller\r
+       gp2x_memregl[0x4500>>2] = 0xffffffff; // clear pending IRQs in SRCPND\r
+       gp2x_memregl[0x4510>>2] = 0xffffffff; // clear pending IRQs in INTPND\r
 \r
        /* start the 940 */\r
        Reset940(0, 2);\r
        Pause940(0);\r
 \r
        // YM2612ResetChip_940(); // will be done on JOB940_YM2612INIT\r
+\r
+       /* now cause 940 to init it's ym2612 stuff */\r
+       shared_ctl->baseclock = baseclock;\r
+       shared_ctl->rate = rate;\r
+       add_job_940(JOB940_INITALL);\r
 }\r
 \r
 \r
@@ -435,72 +421,85 @@ void YM2612ResetChip_940(void)
                return;\r
        }\r
 \r
-       if (/*shared_ctl->busy*/gp2x_memregs[0x3B3E>>1]) wait_busy_940();\r
-\r
        internal_reset();\r
 \r
-       add_job_940(JOB940_YM2612RESETCHIP, 0);\r
+       add_job_940(JOB940_YM2612RESETCHIP);\r
 }\r
 \r
 \r
-//extern int pcm_buffer[2*44100/50];\r
-/*\r
-static void mix_samples(int *dest_buf, short *mp3_buf, int len, int stereo)\r
+int YM2612UpdateOne_940(int *buffer, int length, int stereo, int is_buf_empty)\r
 {\r
-//     int *pcm = pcm_buffer + offset * 2;\r
+       int *ym_buf = shared_data->ym_buffer;\r
 \r
-       if (stereo)\r
-       {\r
-               for (; len > 0; len--)\r
-               {\r
-                       int lm, rm;\r
-                       lm = *mp3_buf++; rm = *mp3_buf++;\r
-                       *dest_buf++ += lm - lm/2; *dest_buf++ += rm - rm/2;\r
-               }\r
+       //printf("YM2612UpdateOne_940()\n");\r
+\r
+       if (CHECK_BUSY(JOB940_YM2612UPDATEONE)) wait_busy_940(JOB940_YM2612UPDATEONE);\r
+\r
+       // mix in ym buffer\r
+       if (is_buf_empty) memcpy32(buffer, ym_buf, length<<stereo);\r
+       // else TODO\r
+\r
+//     for (len = length << stereo; len > 0; len--)\r
+//     {\r
+//             *dest_buf++ += *ym_buf++;\r
+//     }\r
+\r
+       if (shared_ctl->writebuffsel == 1) {\r
+               shared_ctl->writebuff0[writebuff_ptr] = 0xffff;\r
        } else {\r
-               for (; len > 0; len--)\r
-               {\r
-                       int l = *mp3_buf++;\r
-                       *dest_buf++ = l - l/2;\r
-               }\r
+               shared_ctl->writebuff1[writebuff_ptr] = 0xffff;\r
        }\r
+       writebuff_ptr = 0;\r
+\r
+       /* predict sample counter for next frame */\r
+       if (PsndLen_exc_add) {\r
+               if (PsndLen_exc_cnt + PsndLen_exc_add >= 0x10000) length = PsndLen + 1;\r
+               else length = PsndLen;\r
+       }\r
+\r
+       /* give 940 ym job */\r
+       shared_ctl->writebuffsel ^= 1;\r
+       shared_ctl->length = length;\r
+       shared_ctl->stereo = stereo;\r
+\r
+       add_job_940(JOB940_YM2612UPDATEONE);\r
+\r
+       return 1;\r
 }\r
-*/\r
 \r
-// here we assume that length is different between games, but constant in one game\r
 \r
 static int mp3_samples_ready = 0, mp3_buffer_offs = 0;\r
-static int mp3_play_bufsel = 0;\r
+static int mp3_play_bufsel = 0, mp3_job_started = 0;\r
 \r
-int YM2612UpdateOne_940(int *buffer, int length, int stereo, int is_buf_empty)\r
+void mp3_update(int *buffer, int length, int stereo)\r
 {\r
-       int length_mp3 = Pico.m.pal ? 44100/50 : 44100/60; // mp3s are locked to 44100Hz stereo\r
-       int *ym_buf = shared_data->mix_buffer;\r
-//     int *dest_buf = buffer;\r
-       int cdda_on, mp3_job = 0;\r
-//     int len;\r
+       int length_mp3;\r
+       int cdda_on;\r
 \r
-       // emulating CD, enabled in opts, not data track, CDC is reading, playback was started, track not ended\r
-       cdda_on = (PicoMCD & 1) && (PicoOpt & 0x800) && !(Pico_mcd->s68k_regs[0x36] & 1) &&\r
-               (Pico_mcd->scd.Status_CDC & 1) && loaded_mp3;\r
+       // not data track, CDC is reading, playback was started, track not ended\r
+       cdda_on = !(Pico_mcd->s68k_regs[0x36] & 1) && (Pico_mcd->scd.Status_CDC & 1) &&\r
+                       loaded_mp3 && shared_ctl->mp3_offs < shared_ctl->mp3_len;\r
 \r
-       //printf("YM2612UpdateOne_940()\n");\r
-       if (/*shared_ctl->busy*/gp2x_memregs[0x3B3E>>1]) wait_busy_940();\r
+       if (!cdda_on) return;\r
 \r
-       // track ended?\r
-       cdda_on = cdda_on && shared_ctl->mp3_offs < shared_ctl->mp3_len;\r
+       if (!(PicoOpt&0x200)) {\r
+               mp3_update_local(buffer, length, stereo);\r
+               return;\r
+       }\r
 \r
-       // mix in ym buffer\r
-       if (is_buf_empty) memcpy32(buffer, ym_buf, length<<stereo);\r
-       // else TODO\r
+       length_mp3 = length;\r
+       if (PsndRate == 22050) length_mp3 <<= 1;        // mp3s are locked to 44100Hz stereo\r
+       else if (PsndRate == 11025) length_mp3 <<= 2;   // so make length 44100ish\r
 \r
-//     for (len = length << stereo; len > 0; len--)\r
-//     {\r
-//             *dest_buf++ += *ym_buf++;\r
-//     }\r
+       /* do we have to wait? */\r
+       if (mp3_job_started && mp3_samples_ready < length_mp3) {\r
+               if (CHECK_BUSY(JOB940_MP3DECODE)) wait_busy_940(JOB940_MP3DECODE);\r
+               mp3_job_started = 0;\r
+               mp3_samples_ready += 1152;\r
+       }\r
 \r
        /* mix mp3 data, only stereo */\r
-       if (cdda_on && mp3_samples_ready >= length_mp3)\r
+       if (mp3_samples_ready >= length_mp3)\r
        {\r
                int shr = 0;\r
                void (*mix_samples)(int *dest_buf, short *mp3_buf, int count) = mix_16h_to_32;\r
@@ -508,15 +507,15 @@ int YM2612UpdateOne_940(int *buffer, int length, int stereo, int is_buf_empty)
                else if (PsndRate == 11025) { mix_samples = mix_16h_to_32_s2; shr = 2; }\r
 \r
                if (1152 - mp3_buffer_offs >= length_mp3) {\r
-                       mix_samples(buffer, shared_data->mp3_buffer[mp3_play_bufsel] + mp3_buffer_offs*2, (length_mp3>>shr)<<1);\r
+                       mix_samples(buffer, shared_data->mp3_buffer[mp3_play_bufsel] + mp3_buffer_offs*2, length<<1);\r
 \r
                        mp3_buffer_offs += length_mp3;\r
                } else {\r
-                       // collect from both buffers..\r
+                       // collect samples from both buffers..\r
                        int left = 1152 - mp3_buffer_offs;\r
                        if (mp3_play_bufsel == 0)\r
                        {\r
-                               mix_samples(buffer, shared_data->mp3_buffer[0] + mp3_buffer_offs*2, (length_mp3>>shr)<<1);\r
+                               mix_samples(buffer, shared_data->mp3_buffer[0] + mp3_buffer_offs*2, length<<1);\r
                                mp3_buffer_offs = length_mp3 - left;\r
                                mp3_play_bufsel = 1;\r
                        } else {\r
@@ -530,38 +529,13 @@ int YM2612UpdateOne_940(int *buffer, int length, int stereo, int is_buf_empty)
                mp3_samples_ready -= length_mp3;\r
        }\r
 \r
-       if (shared_ctl->writebuffsel == 1) {\r
-               shared_ctl->writebuff0[writebuff_ptr] = 0xffff;\r
-       } else {\r
-               shared_ctl->writebuff1[writebuff_ptr] = 0xffff;\r
-       }\r
-       writebuff_ptr = 0;\r
-\r
-       /* predict sample counter for next frame */\r
-       if (PsndLen_exc_add) {\r
-               if (PsndLen_exc_cnt + PsndLen_exc_add >= 0x10000) length = PsndLen + 1;\r
-               else length = PsndLen;\r
-       }\r
-\r
-       /* give 940 ym job */\r
-       shared_ctl->writebuffsel ^= 1;\r
-       shared_ctl->length = length;\r
-       shared_ctl->stereo = stereo;\r
-\r
-       // make sure we will have enough mp3 samples next frame\r
-       if (cdda_on && mp3_samples_ready < length_mp3)\r
+       // ask to decode more if we already can\r
+       if (!mp3_job_started)\r
        {\r
+               mp3_job_started = 1;\r
                shared_ctl->mp3_buffsel ^= 1;\r
-               mp3_job = JOB940_MP3DECODE;\r
-               mp3_samples_ready += 1152;\r
+               add_job_940(JOB940_MP3DECODE);\r
        }\r
-\r
-       add_job_940(JOB940_YM2612UPDATEONE, mp3_job);\r
-       //spend_cycles(512);\r
-       //printf("SRCPND: %08lx, INTMODE: %08lx, INTMASK: %08lx, INTPEND: %08lx\n",\r
-       //      gp2x_memregl[0x4500>>2], gp2x_memregl[0x4504>>2], gp2x_memregl[0x4508>>2], gp2x_memregl[0x4510>>2]);\r
-\r
-       return 1;\r
 }\r
 \r
 \r
@@ -584,6 +558,12 @@ void mp3_start_play(FILE *f, int pos) // pos is 0-1023
                // else printf("done. mp3 too large, not all data loaded.\n");\r
                shared_ctl->mp3_len = ftell(f);\r
                loaded_mp3 = f;\r
+\r
+               if (PicoOpt&0x200) {\r
+                       // as we are going to change 940's cacheable area, we must invalidate it's cache..\r
+                       if (CHECK_BUSY(JOB940_MP3DECODE)) wait_busy_940(JOB940_MP3DECODE);\r
+                       add_job_940(JOB940_INVALIDATE_DCACHE);\r
+               }\r
        }\r
 \r
        // seek..\r
@@ -596,9 +576,12 @@ void mp3_start_play(FILE *f, int pos) // pos is 0-1023
 \r
        shared_ctl->mp3_offs = byte_offs;\r
 \r
-       // reset buffer pointers..\r
+       // reset buffer pointers and stuff..\r
        mp3_samples_ready = mp3_buffer_offs = mp3_play_bufsel = 0;\r
+       mp3_job_started = 0;\r
        shared_ctl->mp3_buffsel = 1; // will change to 0 on first decode\r
+\r
+       if (!(PicoOpt&0x200)) mp3_start_local();\r
 }\r
 \r
 \r
@@ -608,7 +591,7 @@ int mp3_get_offset(void)
        int cdda_on;\r
 \r
        cdda_on = (PicoMCD & 1) && (PicoOpt&0x800) && !(Pico_mcd->s68k_regs[0x36] & 1) &&\r
-                       (Pico_mcd->scd.Status_CDC & 1) && loaded_mp3 && shared_ctl->mp3_offs < shared_ctl->mp3_len;\r
+                       (Pico_mcd->scd.Status_CDC & 1) && loaded_mp3;\r
 \r
        if (cdda_on) {\r
                offs1024  = shared_ctl->mp3_offs << 7;\r