+++ /dev/null
-// Code for communication with ARM940 and control of it.\r
-// (c) Copyright 2007, Grazvydas "notaz" Ignotas\r
-\r
-#include <stdio.h>\r
-#include <stdlib.h>\r
-#include <string.h>\r
-#include <unistd.h>\r
-#include <sys/mman.h>\r
-#include <sys/ioctl.h>\r
-#include <fcntl.h>\r
-#include <errno.h>\r
-\r
-#include "code940/940shared.h"\r
-#include "soc_mmsp2.h"\r
-#include "soc.h"\r
-#include "../common/mp3.h"\r
-#include "../common/arm_utils.h"\r
-#include "../common/menu.h"\r
-#include "../common/emu.h"\r
-#include "../common/input.h"\r
-#include "../../pico/pico_int.h"\r
-#include "../../pico/sound/ym2612.h"\r
-#include "../../pico/sound/mix.h"\r
-\r
-static unsigned char *shared_mem = 0;\r
-static _940_data_t *shared_data = 0;\r
-_940_ctl_t *shared_ctl = 0;\r
-unsigned char *mp3_mem = 0;\r
-\r
-#define MP3_SIZE_MAX (0x400000 + 0x800000) // 12M\r
-#define CODE940_FILE "pico940_v3.bin"\r
-\r
-int crashed_940 = 0;\r
-\r
-static FILE *loaded_mp3 = 0;\r
-\r
-/***********************************************************/\r
-\r
-#define MAXOUT (+32767)\r
-#define MINOUT (-32768)\r
-\r
-/* limitter */\r
-#define Limit(val, max,min) { \\r
- if ( val > max ) val = max; \\r
- else if ( val < min ) val = min; \\r
-}\r
-\r
-/* these will be managed locally on our side */\r
-static UINT8 ST_address; /* address register */\r
-static INT32 addr_A1; /* address line A1 */\r
-\r
-static int writebuff_ptr = 0;\r
-\r
-\r
-/* YM2612 write */\r
-/* a = address */\r
-/* v = value */\r
-/* returns 1 if sample affecting state changed */\r
-int YM2612Write_940(unsigned int a, unsigned int v, int scanline)\r
-{\r
- int upd = 1; /* the write affects sample generation */\r
-\r
- a &= 3;\r
-\r
- //printf("%05i:%03i: ym w ([%i] %02x)\n", Pico.m.frame_count, Pico.m.scanline, a, v);\r
-\r
- switch (a)\r
- {\r
- case 0: /* address port 0 */\r
- if (addr_A1 == 0 && ST_address == v)\r
- return 0; /* address already selected, don't send this command to 940 */\r
- ST_address = v;\r
- addr_A1 = 0;\r
- /* don't send DAC or timer related address changes to 940 */\r
- if (v == 0x24 || v == 0x25 || v == 0x26 || v == 0x2a)\r
- return 0;\r
- upd = 0;\r
- break;\r
-\r
- case 2: /* address port 1 */\r
- if (addr_A1 == 1 && ST_address == v)\r
- return 0;\r
- ST_address = v;\r
- addr_A1 = 1;\r
- upd = 0;\r
- break;\r
- }\r
-\r
- //printf("ym pass\n");\r
-\r
- if (currentConfig.EmuOpt & 4)\r
- {\r
- UINT16 *writebuff = shared_ctl->writebuffsel ? shared_ctl->writebuff0 : shared_ctl->writebuff1;\r
-\r
- /* detect rapid ym updates */\r
- if (upd && !(writebuff_ptr & 0x80000000) && scanline < 224)\r
- {\r
- int mid = Pico.m.pal ? 68 : 93;\r
- if (scanline > mid) {\r
- //printf("%05i:%03i: rapid ym\n", Pico.m.frame_count, scanline);\r
- writebuff[writebuff_ptr++ & 0xffff] = 0xfffe;\r
- writebuff_ptr |= 0x80000000;\r
- //printf("%05i:%03i: ym w ([%02x] %02x, upd=%i)\n", Pico.m.frame_count, scanline, addr, v, upd);\r
- }\r
- }\r
-\r
- /* queue this write for 940 */\r
- if ((writebuff_ptr&0xffff) < 2047) {\r
- writebuff[writebuff_ptr++ & 0xffff] = (a<<8)|v;\r
- } else {\r
- printf("warning: writebuff_ptr > 2047 ([%i] %02x)\n", a, v);\r
- }\r
- }\r
-\r
- return 0; // cause the engine to do updates once per frame only\r
-}\r
-\r
-\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
-\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
- if (i < 0x10000) return;\r
-\r
- /* 940 crashed */\r
- printf("940 crashed (cnt: %i, ve: ", shared_ctl->loopc);\r
- for (i = 0; i < 8; i++)\r
- printf("%i ", shared_ctl->vstarts[i]);\r
- printf(")\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 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; 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, SRCPND %08lx (see 26), INTPND %08lx\n",\r
- gp2x_memregs[0x3b46>>1], gp2x_memregl[0x4500>>2], gp2x_memregl[0x4510>>2]);\r
- printf("last lr: %08x, lastjob: %i\n", shared_ctl->last_lr, shared_ctl->lastjob);\r
-\r
- me_update_msg("940 crashed, too much overclock?");\r
- engineState = PGS_Menu;\r
- crashed_940 = 1;\r
-}\r
-\r
-\r
-static void add_job_940(int job)\r
-{\r
- if (job <= 0 || job > 16) {\r
- printf("add_job_940: bad job: %i\n", job);\r
- return;\r
- }\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
-void YM2612PicoStateLoad_940(void)\r
-{\r
- UINT8 *REGS = YM2612GetRegs();\r
-\r
- /* make sure JOB940_PICOSTATELOAD gets done before next JOB940_YM2612UPDATEONE */\r
- add_job_940(JOB940_PICOSTATELOAD);\r
- if (CHECK_BUSY(JOB940_PICOSTATELOAD)) wait_busy_940(JOB940_PICOSTATELOAD);\r
-\r
- writebuff_ptr = 0;\r
- addr_A1 = *(INT32 *) (REGS + 0x200);\r
-}\r
-\r
-void YM2612PicoStateSave2_940(int tat, int tbt)\r
-{\r
- UINT8 *ym_remote_regs, *ym_local_regs;\r
- add_job_940(JOB940_PICOSTATESAVE2);\r
- if (CHECK_BUSY(JOB940_PICOSTATESAVE2)) wait_busy_940(JOB940_PICOSTATESAVE2);\r
-\r
- ym_remote_regs = (UINT8 *) shared_ctl->writebuff0;\r
- ym_local_regs = YM2612GetRegs();\r
- if (*(UINT32 *)(ym_remote_regs + 0x100) != 0x41534d59) {\r
- printf("code940 didn't return valid save data\n");\r
- return;\r
- }\r
-\r
- /* copy addin data only */\r
- memcpy(ym_local_regs, ym_remote_regs, 0x20);\r
- memcpy(ym_local_regs + 0x100, ym_remote_regs + 0x100, 0x30);\r
- memcpy(ym_local_regs + 0x0b8, ym_remote_regs + 0x0b8, 0x48);\r
- memcpy(ym_local_regs + 0x1b8, ym_remote_regs + 0x1b8, 0x48);\r
- *(INT32 *)(ym_local_regs + 0x108) = tat;\r
- *(INT32 *)(ym_local_regs + 0x10c) = tbt;\r
-}\r
-\r
-int YM2612PicoStateLoad2_940(int *tat, int *tbt)\r
-{\r
- UINT8 *ym_remote_regs, *ym_local_regs;\r
- ym_local_regs = YM2612GetRegs();\r
- ym_remote_regs = (UINT8 *) shared_ctl->writebuff0;\r
-\r
- if (*(UINT32 *)(ym_local_regs + 0x100) != 0x41534d59)\r
- return -1;\r
-\r
- *tat = *(INT32 *)(ym_local_regs + 0x108);\r
- *tbt = *(INT32 *)(ym_local_regs + 0x10c);\r
-\r
- if (CHECK_BUSY(JOB940_YM2612UPDATEONE)) wait_busy_940(JOB940_YM2612UPDATEONE);\r
-\r
- /* flush writes */\r
- if (shared_ctl->writebuffsel == 1) {\r
- shared_ctl->writebuff0[writebuff_ptr & 0xffff] = 0xffff;\r
- } else {\r
- shared_ctl->writebuff1[writebuff_ptr & 0xffff] = 0xffff;\r
- }\r
- shared_ctl->writebuffsel ^= 1;\r
- writebuff_ptr = 0;\r
- add_job_940(JOB940_PICOSTATELOAD2_PREP);\r
- if (CHECK_BUSY(JOB940_PICOSTATELOAD2_PREP)) wait_busy_940(JOB940_PICOSTATELOAD2_PREP);\r
-\r
- memcpy(ym_remote_regs, ym_local_regs, 0x200);\r
-\r
- add_job_940(JOB940_PICOSTATELOAD2);\r
- if (CHECK_BUSY(JOB940_PICOSTATELOAD2)) wait_busy_940(JOB940_PICOSTATELOAD2);\r
-\r
- return 0;\r
-}\r
-\r
-\r
-static void internal_reset(void)\r
-{\r
- writebuff_ptr = 0;\r
- ST_address = addr_A1 = -1;\r
-}\r
-\r
-\r
-/* this must be called after mmu hack, the allocated regions must not get cached */\r
-void sharedmem940_init(void)\r
-{\r
- if (shared_mem != NULL) return;\r
-\r
- shared_mem = (unsigned char *) mmap(0, 0x210000, PROT_READ|PROT_WRITE, MAP_SHARED, memdev, 0x2000000);\r
- if (shared_mem == MAP_FAILED)\r
- {\r
- printf("mmap(shared_data) failed with %i\n", errno);\r
- exit(1);\r
- }\r
- shared_data = (_940_data_t *) (shared_mem+0x100000);\r
- /* this area must not get buffered on either side */\r
- shared_ctl = (_940_ctl_t *) (shared_mem+0x200000);\r
- mp3_mem = (unsigned char *) mmap(0, MP3_SIZE_MAX, PROT_READ|PROT_WRITE, MAP_SHARED, memdev, 0x2400000);\r
- if (mp3_mem == MAP_FAILED)\r
- {\r
- printf("mmap(mp3_mem) failed with %i\n", errno);\r
- exit(1);\r
- }\r
- crashed_940 = 1;\r
-}\r
-\r
-\r
-void sharedmem940_finish(void)\r
-{\r
- munmap(shared_mem, 0x210000);\r
- munmap(mp3_mem, MP3_SIZE_MAX);\r
- shared_mem = mp3_mem = NULL;\r
- shared_data = NULL;\r
- shared_ctl = NULL;\r
-}\r
-\r
-\r
-void YM2612Init_940(int baseclock, int rate)\r
-{\r
- printf("YM2612Init_940()\n");\r
- printf("Mem usage: shared_data: %i, shared_ctl: %i\n", sizeof(*shared_data), sizeof(*shared_ctl));\r
-\r
- reset940(1, 2);\r
- pause940(1);\r
-\r
- 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
- if (crashed_940)\r
- {\r
- unsigned char ucData[1024];\r
- int nRead, nLen = 0;\r
- char binpath[512];\r
- FILE *fp;\r
-\r
- emu_make_path(binpath, CODE940_FILE, sizeof(binpath));\r
- fp = fopen(binpath, "rb");\r
- if(!fp)\r
- {\r
- memset(g_screen_ptr, 0, 320*240*2);\r
- text_out16(10, 100, "failed to open required file:");\r
- text_out16(10, 110, CODE940_FILE);\r
- gp2x_video_flip2();\r
- in_menu_wait(PBTN_MOK|PBTN_MBACK, 100);\r
- printf("failed to open %s\n", binpath);\r
- exit(1);\r
- }\r
-\r
- while(1)\r
- {\r
- nRead = fread(ucData, 1, 1024, fp);\r
- if(nRead <= 0)\r
- break;\r
- memcpy(shared_mem + nLen, ucData, nRead);\r
- nLen += nRead;\r
- }\r
- fclose(fp);\r
- crashed_940 = 0;\r
- }\r
-\r
- memset(shared_data, 0, sizeof(*shared_data));\r
- memset(shared_ctl, 0, sizeof(*shared_ctl));\r
-\r
- /* cause local ym2612 to init REGS */\r
- YM2612Init_(baseclock, rate);\r
-\r
- internal_reset();\r
-\r
- loaded_mp3 = 0;\r
-\r
- gp2x_memregs[0x3B46>>1] = 0xffff; // clear pending DUALCPU interrupts for 940\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
-void YM2612ResetChip_940(void)\r
-{\r
- //printf("YM2612ResetChip_940()\n");\r
- if (shared_data == NULL) {\r
- printf("YM2612ResetChip_940: reset before init?\n");\r
- return;\r
- }\r
-\r
- YM2612ResetChip_();\r
- internal_reset();\r
-\r
- add_job_940(JOB940_YM2612RESETCHIP);\r
-}\r
-\r
-\r
-int YM2612UpdateOne_940(int *buffer, int length, int stereo, int is_buf_empty)\r
-{\r
- int *ym_buf = shared_data->ym_buffer;\r
- int ym_active_chs;\r
-\r
- //printf("YM2612UpdateOne_940()\n");\r
-\r
- if (CHECK_BUSY(JOB940_YM2612UPDATEONE)) wait_busy_940(JOB940_YM2612UPDATEONE);\r
-\r
- ym_active_chs = shared_ctl->ym_active_chs;\r
-\r
- // mix in ym buffer. is_buf_empty means nobody mixed there anything yet and it may contain trash\r
- if (is_buf_empty && ym_active_chs) memcpy32(buffer, ym_buf, length<<stereo);\r
- else memset32(buffer, 0, length<<stereo);\r
-\r
- if (shared_ctl->writebuffsel == 1) {\r
- shared_ctl->writebuff0[writebuff_ptr & 0xffff] = 0xffff;\r
- } else {\r
- shared_ctl->writebuff1[writebuff_ptr & 0xffff] = 0xffff;\r
- }\r
- writebuff_ptr = 0;\r
-\r
- /* predict sample counter for next frame */\r
- if (PsndLen_exc_add) {\r
- length = PsndLen;\r
- if (PsndLen_exc_cnt + PsndLen_exc_add >= 0x10000) length++;\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 ym_active_chs;\r
-}\r
-\r
-\r
-/***********************************************************/\r
-\r
-static int mp3_samples_ready = 0, mp3_buffer_offs = 0;\r
-static int mp3_play_bufsel = 0, mp3_job_started = 0;\r
-\r
-void mp3_update(int *buffer, int length, int stereo)\r
-{\r
- int length_mp3;\r
-\r
- if (!(PicoOpt & POPT_EXT_FM)) {\r
- mp3_update_local(buffer, length, stereo);\r
- return;\r
- }\r
-\r
- // check if playback was started, track not ended\r
- if (loaded_mp3 == NULL || shared_ctl->mp3_offs >= shared_ctl->mp3_len)\r
- return;\r
-\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
- /* 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 (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
- if (PsndRate == 22050) { mix_samples = mix_16h_to_32_s1; shr = 1; }\r
- 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<<1);\r
-\r
- mp3_buffer_offs += length_mp3;\r
- } else {\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<<1);\r
- mp3_buffer_offs = length_mp3 - left;\r
- mp3_play_bufsel = 1;\r
- } else {\r
- mix_samples(buffer, shared_data->mp3_buffer[1] + mp3_buffer_offs*2, (left>>shr)<<1);\r
- mp3_buffer_offs = length_mp3 - left;\r
- mix_samples(buffer + ((left>>shr)<<1),\r
- shared_data->mp3_buffer[0], (mp3_buffer_offs>>shr)<<1);\r
- mp3_play_bufsel = 0;\r
- }\r
- }\r
- mp3_samples_ready -= length_mp3;\r
- }\r
-\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
- add_job_940(JOB940_MP3DECODE);\r
- }\r
-}\r
-\r
-\r
-void mp3_start_play(void *f_, int pos) // pos is 0-1023\r
-{\r
- int byte_offs = 0;\r
- FILE *f = f_;\r
-\r
- if (!(PicoOpt & POPT_EN_MCD_CDDA) || f == NULL)\r
- return;\r
-\r
- if (!(PicoOpt & POPT_EXT_FM)) {\r
- mp3_start_play_local(f, pos);\r
- return;\r
- }\r
-\r
- if (loaded_mp3 != f)\r
- {\r
- if (PicoMessage != NULL)\r
- {\r
- fseek(f, 0, SEEK_END);\r
- if (ftell(f) > 2*1024*1024)\r
- PicoMessage("Loading MP3...");\r
- }\r
- fseek(f, 0, SEEK_SET);\r
- fread(mp3_mem, 1, MP3_SIZE_MAX, f);\r
- if (!feof(f)) printf("Warning: mp3 was too large, not all data loaded.\n");\r
- shared_ctl->mp3_len = ftell(f);\r
- loaded_mp3 = f;\r
-\r
- if (PicoOpt & POPT_EXT_FM) {\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
- reset_timing = 1;\r
- }\r
-\r
- // seek..\r
- if (pos) {\r
- byte_offs = (shared_ctl->mp3_len << 6) >> 10;\r
- byte_offs *= pos;\r
- byte_offs >>= 6;\r
- }\r
- printf(" mp3 pos1024: %i, byte_offs %i/%i\n", pos, byte_offs, shared_ctl->mp3_len);\r
-\r
- shared_ctl->mp3_offs = byte_offs;\r
-\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
- add_job_940(JOB940_MP3RESET);\r
- if (CHECK_BUSY(JOB940_MP3RESET)) wait_busy_940(JOB940_MP3RESET);\r
-}\r
-\r
notaz.gp2x.de / libpicofe.git / blobdiff