msu1.c 7.7 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256
  1. #include <string.h>
  2. #include "config.h"
  3. #include "uart.h"
  4. #include "ff.h"
  5. #include "diskio.h"
  6. #include "spi.h"
  7. #include "fpga_spi.h"
  8. #include "cli.h"
  9. #include "fileops.h"
  10. #include "msu1.h"
  11. #include "snes.h"
  12. #include "timer.h"
  13. #include "smc.h"
  14. FIL msufile;
  15. extern snes_romprops_t romprops;
  16. int msu1_check_reset(void) {
  17. static tick_t rising_ticks;
  18. static uint8_t resbutton=0, resbutton_prev=0;
  19. resbutton = get_snes_reset();
  20. if(resbutton && !resbutton_prev) { /* push */
  21. rising_ticks = getticks();
  22. } else if(resbutton && resbutton_prev) { /* hold */
  23. if(getticks() > rising_ticks + 99) {
  24. return 1;
  25. }
  26. }
  27. resbutton_prev = resbutton;
  28. return 0;
  29. }
  30. int msu1_check(uint8_t* filename) {
  31. /* open MSU file */
  32. strcpy((char*)file_buf, (char*)filename);
  33. strcpy(strrchr((char*)file_buf, (int)'.'), ".msu");
  34. printf("MSU datafile: %s\n", file_buf);
  35. if(f_open(&msufile, (const TCHAR*)file_buf, FA_READ) != FR_OK) {
  36. printf("MSU datafile not found\n");
  37. return 0;
  38. }
  39. romprops.fpga_features |= FEAT_MSU1;
  40. return 1;
  41. }
  42. int msu1_loop() {
  43. /* it is assumed that the MSU file is already opened by calling msu1_check(). */
  44. UINT bytes_read = 1024;
  45. UINT bytes_read2 = 1;
  46. FRESULT res;
  47. set_dac_vol(0x00);
  48. while(fpga_status() & 0x4000);
  49. uint16_t fpga_status_prev = fpga_status();
  50. uint16_t fpga_status_now = fpga_status();
  51. uint16_t dac_addr = 0;
  52. uint16_t msu_addr = 0;
  53. uint8_t msu_repeat = 0;
  54. uint16_t msu_track = 0;
  55. uint32_t msu_offset = 0;
  56. uint32_t msu_loop_point = 0;
  57. uint32_t msu_page1_start = 0x0000;
  58. uint32_t msu_page2_start = 0x2000;
  59. uint32_t msu_page_size = 0x2000;
  60. set_msu_addr(0x0);
  61. msu_reset(0x0);
  62. ff_sd_offload=1;
  63. sd_offload_tgt=2;
  64. f_lseek(&msufile, 0L);
  65. ff_sd_offload=1;
  66. sd_offload_tgt=2;
  67. f_read(&msufile, file_buf, 16384, &bytes_read2);
  68. set_dac_addr(dac_addr);
  69. dac_pause();
  70. dac_reset();
  71. /* audio_start, data_start, 0, audio_ctrl[1:0], ctrl_start */
  72. while(1){
  73. cli_entrycheck();
  74. fpga_status_now = fpga_status();
  75. /* Data buffer refill */
  76. if((fpga_status_now & 0x2000) != (fpga_status_prev & 0x2000)) {
  77. DBG_MSU1 printf("data\n");
  78. uint8_t pageno = 0;
  79. if(fpga_status_now & 0x2000) {
  80. msu_addr = 0x0;
  81. msu_page1_start = msu_page2_start + msu_page_size;
  82. pageno = 1;
  83. } else {
  84. msu_addr = 0x2000;
  85. msu_page2_start = msu_page1_start + msu_page_size;
  86. pageno = 2;
  87. }
  88. set_msu_addr(msu_addr);
  89. sd_offload_tgt=2;
  90. ff_sd_offload=1;
  91. res = f_read(&msufile, file_buf, 8192, &bytes_read2);
  92. DBG_MSU1 printf("data buffer refilled. res=%d page1=%08lx page2=%08lx\n", res, msu_page1_start, msu_page2_start);
  93. }
  94. /* Audio buffer refill */
  95. if((fpga_status_now & 0x4000) != (fpga_status_prev & 0x4000)) {
  96. if(fpga_status_now & 0x4000) {
  97. dac_addr = 0;
  98. } else {
  99. dac_addr = MSU_DAC_BUFSIZE/2;
  100. }
  101. set_dac_addr(dac_addr);
  102. sd_offload_tgt=1;
  103. ff_sd_offload=1;
  104. f_read(&file_handle, file_buf, MSU_DAC_BUFSIZE/2, &bytes_read);
  105. }
  106. if(fpga_status_now & 0x0020) {
  107. char suffix[11];
  108. /* get trackno */
  109. msu_track = get_msu_track();
  110. printf("Audio requested! Track=%d\n", msu_track);
  111. /* open file, fill buffer */
  112. f_close(&file_handle);
  113. snprintf(suffix, sizeof(suffix), "-%d.pcm", msu_track);
  114. strcpy((char*)file_buf, (char*)file_lfn);
  115. strcpy(strrchr((char*)file_buf, (int)'.'), suffix);
  116. printf("filename: %s\n", file_buf);
  117. f_open(&file_handle, (const TCHAR*)file_buf, FA_READ);
  118. f_lseek(&file_handle, 4L);
  119. f_read(&file_handle, &msu_loop_point, 4, &bytes_read);
  120. printf("loop point: %ld samples\n", msu_loop_point);
  121. ff_sd_offload=1;
  122. sd_offload_tgt=1;
  123. f_lseek(&file_handle, 8L);
  124. set_dac_addr(0);
  125. dac_pause();
  126. dac_reset();
  127. ff_sd_offload=1;
  128. sd_offload_tgt=1;
  129. f_read(&file_handle, file_buf, MSU_DAC_BUFSIZE, &bytes_read);
  130. /* clear busy bit */
  131. set_msu_status(0x00, 0x20); /* set no bits, reset bit 5 */
  132. }
  133. if(fpga_status_now & 0x0010) {
  134. /* get address */
  135. msu_offset=get_msu_offset();
  136. printf("Data requested! Offset=%08lx page1=%08lx page2=%08lx\n", msu_offset, msu_page1_start, msu_page2_start);
  137. if( ((msu_offset < msu_page1_start)
  138. || (msu_offset >= msu_page1_start + msu_page_size))
  139. && ((msu_offset < msu_page2_start)
  140. || (msu_offset >= msu_page2_start + msu_page_size))) {
  141. printf("offset %08lx out of range (%08lx-%08lx, %08lx-%08lx), reload\n", msu_offset, msu_page1_start,
  142. msu_page1_start+msu_page_size-1, msu_page2_start, msu_page2_start+msu_page_size-1);
  143. /* "cache miss" */
  144. /* fill buffer */
  145. set_msu_addr(0x0);
  146. sd_offload_tgt=2;
  147. ff_sd_offload=1;
  148. res = f_lseek(&msufile, msu_offset);
  149. DBG_MSU1 printf("seek to %08lx, res = %d\n", msu_offset, res);
  150. sd_offload_tgt=2;
  151. ff_sd_offload=1;
  152. res = f_read(&msufile, file_buf, 16384, &bytes_read2);
  153. DBG_MSU1 printf("read res = %d\n", res);
  154. DBG_MSU1 printf("read %d bytes\n", bytes_read2);
  155. msu_reset(0x0);
  156. msu_page1_start = msu_offset;
  157. msu_page2_start = msu_offset + msu_page_size;
  158. } else {
  159. if (msu_offset >= msu_page1_start && msu_offset <= msu_page1_start + msu_page_size) {
  160. msu_reset(0x0000 + msu_offset - msu_page1_start);
  161. DBG_MSU1 printf("inside page1, new offset: %08lx\n", 0x0000 + msu_offset-msu_page1_start);
  162. if(!(msu_page2_start == msu_page1_start + msu_page_size)) {
  163. set_msu_addr(0x2000);
  164. sd_offload_tgt=2;
  165. ff_sd_offload=1;
  166. f_read(&msufile, file_buf, 8192, &bytes_read2);
  167. DBG_MSU1 printf("next page dirty (was: %08lx), loaded page2 (start now: ", msu_page2_start);
  168. msu_page2_start = msu_page1_start + msu_page_size;
  169. DBG_MSU1 printf("%08lx)\n", msu_page2_start);
  170. }
  171. } else if (msu_offset >= msu_page2_start && msu_offset <= msu_page2_start + msu_page_size) {
  172. DBG_MSU1 printf("inside page2, new offset: %08lx\n", 0x2000 + msu_offset-msu_page2_start);
  173. msu_reset(0x2000 + msu_offset - msu_page2_start);
  174. if(!(msu_page1_start == msu_page2_start + msu_page_size)) {
  175. set_msu_addr(0x0);
  176. sd_offload_tgt=2;
  177. ff_sd_offload=1;
  178. f_read(&msufile, file_buf, 8192, &bytes_read2);
  179. DBG_MSU1 printf("next page dirty (was: %08lx), loaded page1 (start now: ", msu_page1_start);
  180. msu_page1_start = msu_page2_start + msu_page_size;
  181. DBG_MSU1 printf("%08lx)\n", msu_page1_start);
  182. }
  183. } else printf("!!!WATWATWAT!!!\n");
  184. }
  185. /* clear bank bit to mask bank reset artifact */
  186. fpga_status_now &= ~0x2000;
  187. fpga_status_prev &= ~0x2000;
  188. /* clear busy bit */
  189. set_msu_status(0x00, 0x10);
  190. }
  191. if(fpga_status_now & 0x0001) {
  192. if(fpga_status_now & 0x0004) {
  193. msu_repeat = 1;
  194. set_msu_status(0x04, 0x01); /* set bit 2, reset bit 0 */
  195. printf("Repeat set!\n");
  196. } else {
  197. msu_repeat = 0;
  198. set_msu_status(0x00, 0x05); /* set no bits, reset bit 0+2 */
  199. printf("Repeat clear!\n");
  200. }
  201. if(fpga_status_now & 0x0002) {
  202. printf("PLAY!\n");
  203. set_msu_status(0x02, 0x01); /* set bit 0, reset bit 1 */
  204. dac_play();
  205. } else {
  206. printf("PAUSE!\n");
  207. set_msu_status(0x00, 0x03); /* set no bits, reset bit 1+0 */
  208. dac_pause();
  209. }
  210. }
  211. fpga_status_prev = fpga_status_now;
  212. /* handle loop / end */
  213. if(bytes_read < MSU_DAC_BUFSIZE / 2) {
  214. ff_sd_offload=0;
  215. sd_offload=0;
  216. if(msu_repeat) {
  217. printf("loop\n");
  218. ff_sd_offload=1;
  219. sd_offload_tgt=1;
  220. f_lseek(&file_handle, 8L+msu_loop_point*4);
  221. ff_sd_offload=1;
  222. sd_offload_tgt=1;
  223. f_read(&file_handle, file_buf, (MSU_DAC_BUFSIZE / 2) - bytes_read, &bytes_read);
  224. } else {
  225. set_msu_status(0x00, 0x02); /* clear play bit */
  226. }
  227. bytes_read = MSU_DAC_BUFSIZE;
  228. }
  229. if(msu1_check_reset()) {
  230. f_close(&msufile);
  231. f_close(&file_handle);
  232. return 1;
  233. }
  234. }
  235. }
  236. /* END OF MSU1 STUFF */