notaz.gp2x.de / libpicofe.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
renderers (interlace and stuff)
[libpicofe.git] / gp2x / 940ctl.c
CommitLineData
6ab2f79c 1// Code for communication with ARM940 and control of it.\r
2// (c) Copyright 2007, Grazvydas "notaz" Ignotas\r
3\r
720ee7f6 4#include <stdio.h>\r
5#include <stdlib.h>\r
6#include <string.h>\r
7#include <unistd.h>\r
8#include <sys/mman.h>\r
9#include <sys/ioctl.h>\r
10#include <fcntl.h>\r
11#include <errno.h>\r
12\r
b30a8e67 13#include "code940/940shared.h"\r
720ee7f6 14#include "gp2x.h"\r
15#include "emu.h"\r
16#include "menu.h"\r
edbb82f8 17#include "mp3.h"\r
c7a4ff64 18#include "../common/arm_utils.h"\r
19#include "../common/menu.h"\r
f013066e 20#include "../common/emu.h"\r
598e7c06 21#include "../../Pico/PicoInt.h"\r
31a77bde 22#include "../../Pico/sound/ym2612.h"\r
49fe50f0 23#include "../../Pico/sound/mix.h"\r
24\r
720ee7f6 25/* we will need some gp2x internals here */\r
26extern volatile unsigned short *gp2x_memregs; /* from minimal library rlyeh */\r
27extern volatile unsigned long *gp2x_memregl;\r
28\r
8f1b51ef 29extern int reset_timing;\r
720ee7f6 30static unsigned char *shared_mem = 0;\r
31static _940_data_t *shared_data = 0;\r
edbb82f8 32_940_ctl_t *shared_ctl = 0;\r
33unsigned char *mp3_mem = 0;\r
598e7c06 34\r
60b4b403 35#define MP3_SIZE_MAX (0x400000 + 0x800000) // 12M\r
95151aea 36#define CODE940_FILE "pico940.bin"\r
720ee7f6 37\r
38int crashed_940 = 0;\r
39\r
979ba09f 40static FILE *loaded_mp3 = 0;\r
720ee7f6 41\r
42/***********************************************************/\r
43\r
44#define MAXOUT (+32767)\r
45#define MINOUT (-32768)\r
46\r
47/* limitter */\r
48#define Limit(val, max,min) { \\r
49 if ( val > max ) val = max; \\r
50 else if ( val < min ) val = min; \\r
51}\r
52\r
53/* these will be managed locally on our side */\r
54extern int *ym2612_dacen;\r
55extern INT32 *ym2612_dacout;\r
720ee7f6 56static UINT8 *REGS = 0; /* we will also keep local copy of regs for savestates and such */\r
31a77bde 57static INT32 *addr_A1; /* address line A1 */\r
58\r
59static int dacen;\r
720ee7f6 60static INT32 dacout;\r
61static UINT8 ST_address; /* address register */\r
62static UINT8 ST_status; /* status flag */\r
63static UINT8 ST_mode; /* mode CSM / 3SLOT */\r
64static int ST_TA; /* timer a */\r
65static int ST_TAC; /* timer a maxval */\r
66static int ST_TAT; /* timer a ticker */\r
67static UINT8 ST_TB; /* timer b */\r
68static int ST_TBC; /* timer b maxval */\r
69static int ST_TBT; /* timer b ticker */\r
70\r
71static int writebuff_ptr = 0;\r
72\r
73\r
74/* OPN Mode Register Write */\r
79cad122 75static int set_timers( int v )\r
720ee7f6 76{\r
79cad122 77 int change;\r
78\r
720ee7f6 79 /* b7 = CSM MODE */\r
80 /* b6 = 3 slot mode */\r
81 /* b5 = reset b */\r
82 /* b4 = reset a */\r
83 /* b3 = timer enable b */\r
84 /* b2 = timer enable a */\r
85 /* b1 = load b */\r
86 /* b0 = load a */\r
79cad122 87 change = (ST_mode ^ v) & 0xc0;\r
720ee7f6 88 ST_mode = v;\r
89\r
90 /* reset Timer b flag */\r
91 if( v & 0x20 )\r
92 ST_status &= ~2;\r
93\r
94 /* reset Timer a flag */\r
95 if( v & 0x10 )\r
96 ST_status &= ~1;\r
79cad122 97\r
98 return change;\r
720ee7f6 99}\r
100\r
101/* YM2612 write */\r
102/* a = address */\r
103/* v = value */\r
104/* returns 1 if sample affecting state changed */\r
105int YM2612Write_940(unsigned int a, unsigned int v)\r
106{\r
79cad122 107 int addr;\r
108 int upd = 1; /* the write affects sample generation */\r
720ee7f6 109\r
110 v &= 0xff; /* adjust to 8 bit bus */\r
111 a &= 3;\r
112\r
79cad122 113 //printf("%05i:%03i: ym w ([%i] %02x)\n", Pico.m.frame_count, Pico.m.scanline, a, v);\r
114\r
720ee7f6 115 switch( a ) {\r
116 case 0: /* address port 0 */\r
31a77bde 117 if (!*addr_A1 && ST_address == v)\r
d032c15a 118 return 0; /* address already selected, don't send this command to 940 */\r
720ee7f6 119 ST_address = v;\r
d032c15a 120 /* don't send DAC or timer related address changes to 940 */\r
31a77bde 121 if (!*addr_A1 && (v & 0xf0) == 0x20 &&\r
d032c15a 122 (v == 0x24 || v == 0x25 || v == 0x26 || v == 0x2a))\r
123 return 0;\r
31a77bde 124 *addr_A1 = 0;\r
79cad122 125 upd = 0;\r
720ee7f6 126 break;\r
127\r
128 case 1: /* data port 0 */\r
31a77bde 129 if (*addr_A1 != 0) {\r
720ee7f6 130 return 0; /* verified on real YM2608 */\r
131 }\r
132\r
133 addr = ST_address;\r
134 REGS[addr] = v;\r
135\r
136 switch( addr & 0xf0 )\r
137 {\r
138 case 0x20: /* 0x20-0x2f Mode */\r
139 switch( addr )\r
140 {\r
141 case 0x24: { // timer A High 8\r
142 int TAnew = (ST_TA & 0x03)|(((int)v)<<2);\r
143 if(ST_TA != TAnew) {\r
144 // we should reset ticker only if new value is written. Outrun requires this.\r
145 ST_TA = TAnew;\r
146 ST_TAC = (1024-TAnew)*18;\r
147 ST_TAT = 0;\r
148 }\r
149 return 0;\r
150 }\r
151 case 0x25: { // timer A Low 2\r
152 int TAnew = (ST_TA & 0x3fc)|(v&3);\r
153 if(ST_TA != TAnew) {\r
154 ST_TA = TAnew;\r
155 ST_TAC = (1024-TAnew)*18;\r
156 ST_TAT = 0;\r
157 }\r
158 return 0;\r
159 }\r
160 case 0x26: // timer B\r
161 if(ST_TB != v) {\r
162 ST_TB = v;\r
163 ST_TBC = (256-v)<<4;\r
164 ST_TBC *= 18;\r
165 ST_TBT = 0;\r
166 }\r
167 return 0;\r
168 case 0x27: /* mode, timer control */\r
79cad122 169 if (set_timers( v ))\r
170 break; // other side needs ST.mode for 3slot mode\r
171 return 0;\r
720ee7f6 172 case 0x2a: /* DAC data (YM2612) */\r
173 dacout = ((int)v - 0x80) << 6; /* level unknown (notaz: 8 seems to be too much) */\r
174 return 0;\r
175 case 0x2b: /* DAC Sel (YM2612) */\r
176 /* b7 = dac enable */\r
177 dacen = v & 0x80;\r
79cad122 178 upd = 0;\r
720ee7f6 179 break; // other side has to know this\r
180 default:\r
181 break;\r
182 }\r
183 break;\r
184 }\r
185 break;\r
186\r
187 case 2: /* address port 1 */\r
31a77bde 188 if (*addr_A1 && ST_address == v)\r
d032c15a 189 return 0;\r
720ee7f6 190 ST_address = v;\r
31a77bde 191 *addr_A1 = 1;\r
79cad122 192 upd = 0;\r
720ee7f6 193 break;\r
194\r
195 case 3: /* data port 1 */\r
31a77bde 196 if (*addr_A1 != 1) {\r
720ee7f6 197 return 0; /* verified on real YM2608 */\r
198 }\r
199\r
200 addr = ST_address | 0x100;\r
201 REGS[addr] = v;\r
202 break;\r
203 }\r
204\r
79cad122 205 //printf("ym pass\n");\r
206\r
720ee7f6 207 if(currentConfig.EmuOpt & 4) {\r
79cad122 208 UINT16 *writebuff = shared_ctl->writebuffsel ? shared_ctl->writebuff0 : shared_ctl->writebuff1;\r
209\r
210 /* detect rapid ym updates */\r
211 if (upd && !(writebuff_ptr & 0x80000000) && Pico.m.scanline < 224) {\r
212 int mid = Pico.m.pal ? 68 : 93;\r
213 if (Pico.m.scanline > mid) {\r
214 //printf("%05i:%03i: rapid ym\n", Pico.m.frame_count, Pico.m.scanline);\r
215 writebuff[writebuff_ptr++ & 0xffff] = 0xfffe;\r
216 writebuff_ptr |= 0x80000000;\r
217 //printf("%05i:%03i: ym w ([%02x] %02x, upd=%i)\n", Pico.m.frame_count, Pico.m.scanline, addr, v, upd);\r
720ee7f6 218 }\r
79cad122 219 }\r
220\r
221 /* queue this write for 940 */\r
222 if ((writebuff_ptr&0xffff) < 2047) {\r
223 writebuff[writebuff_ptr++ & 0xffff] = (a<<8)|v;\r
720ee7f6 224 } else {\r
d032c15a 225 printf("warning: writebuff_ptr > 2047 ([%i] %02x)\n", a, v);\r
720ee7f6 226 }\r
227 }\r
228\r
229 return 0; // cause the engine to do updates once per frame only\r
230}\r
231\r
232UINT8 YM2612Read_940(void)\r
233{\r
234 return ST_status;\r
235}\r
236\r
237\r
238int YM2612PicoTick_940(int n)\r
239{\r
240 //int ret = 0;\r
241\r
242 // timer A\r
243 if(ST_mode & 0x01 && (ST_TAT+=64*n) >= ST_TAC) {\r
244 ST_TAT -= ST_TAC;\r
245 if(ST_mode & 0x04) ST_status |= 1;\r
246 // CSM mode total level latch and auto key on\r
247/* FIXME\r
248 if(ST_mode & 0x80) {\r
249 CSMKeyControll( &(ym2612_940->CH[2]) ); // Vectorman2, etc.\r
250 ret = 1;\r
251 }\r
252*/\r
253 }\r
254\r
255 // timer B\r
256 if(ST_mode & 0x02 && (ST_TBT+=64*n) >= ST_TBC) {\r
257 ST_TBT -= ST_TBC;\r
258 if(ST_mode & 0x08) ST_status |= 2;\r
259 }\r
260\r
261 return 0;\r
262}\r
263\r
264\r
edbb82f8 265#define CHECK_BUSY(job) \\r
266 (gp2x_memregs[0x3b46>>1] & (1<<(job-1)))\r
267\r
268static void wait_busy_940(int job)\r
720ee7f6 269{\r
270 int i;\r
720ee7f6 271\r
edbb82f8 272 job--;\r
273 for (i = 0; (gp2x_memregs[0x3b46>>1] & (1<<job)) && i < 0x10000; i++)\r
b30a8e67 274 spend_cycles(8*1024); // tested to be best for mp3 dec\r
720ee7f6 275 if (i < 0x10000) return;\r
276\r
277 /* 940 crashed */\r
b30a8e67 278 printf("940 crashed (cnt: %i, ve: ", shared_ctl->loopc);\r
720ee7f6 279 for (i = 0; i < 8; i++)\r
280 printf("%i ", shared_ctl->vstarts[i]);\r
281 printf(")\n");\r
edbb82f8 282 printf("irq pending flags: DUALCPU %04x, SRCPND %08lx (see 26), INTPND %08lx\n",\r
49fe50f0 283 gp2x_memregs[0x3b46>>1], gp2x_memregl[0x4500>>2], gp2x_memregl[0x4510>>2]);\r
edbb82f8 284 printf("last lr: %08x, lastjob: %i\n", shared_ctl->last_lr, shared_ctl->lastjob);\r
49fe50f0 285 printf("trying to interrupt..\n");\r
286 gp2x_memregs[0x3B3E>>1] = 0xffff;\r
edbb82f8 287 for (i = 0; gp2x_memregs[0x3b46>>1] && i < 0x10000; i++)\r
49fe50f0 288 spend_cycles(8*1024);\r
289 printf("i = 0x%x\n", i);\r
edbb82f8 290 printf("irq pending flags: DUALCPU %04x, SRCPND %08lx (see 26), INTPND %08lx\n",\r
49fe50f0 291 gp2x_memregs[0x3b46>>1], gp2x_memregl[0x4500>>2], gp2x_memregl[0x4510>>2]);\r
edbb82f8 292 printf("last lr: %08x, lastjob: %i\n", shared_ctl->last_lr, shared_ctl->lastjob);\r
49fe50f0 293\r
6ab2f79c 294 strcpy(menuErrorMsg, "940 crashed, too much overclock?");\r
720ee7f6 295 engineState = PGS_Menu;\r
296 crashed_940 = 1;\r
720ee7f6 297}\r
298\r
299\r
edbb82f8 300static void add_job_940(int job)\r
720ee7f6 301{\r
edbb82f8 302 if (job <= 0 || job > 16) {\r
303 printf("add_job_940: bad job: %i\n", job);\r
304 return;\r
49fe50f0 305 }\r
edbb82f8 306\r
307 // generate interrupt for this job\r
308 job--;\r
309 gp2x_memregs[(0x3B20+job*2)>>1] = 1;\r
310\r
311// printf("added %i, pending %04x\n", job+1, gp2x_memregs[0x3b46>>1]);\r
720ee7f6 312}\r
313\r
314\r
315void YM2612PicoStateLoad_940(void)\r
316{\r
31a77bde 317 int i, old_A1 = *addr_A1;\r
720ee7f6 318\r
fb88e614 319 /* make sure JOB940_PICOSTATELOAD gets done before next JOB940_YM2612UPDATEONE */\r
320 add_job_940(JOB940_PICOSTATELOAD);\r
321 if (CHECK_BUSY(JOB940_PICOSTATELOAD)) wait_busy_940(JOB940_PICOSTATELOAD);\r
322\r
323 writebuff_ptr = 0;\r
324\r
720ee7f6 325 // feed all the registers and update internal state\r
326 for(i = 0; i < 0x100; i++) {\r
327 YM2612Write_940(0, i);\r
328 YM2612Write_940(1, REGS[i]);\r
329 }\r
330 for(i = 0; i < 0x100; i++) {\r
331 YM2612Write_940(2, i);\r
332 YM2612Write_940(3, REGS[i|0x100]);\r
333 }\r
334\r
31a77bde 335 *addr_A1 = old_A1;\r
720ee7f6 336}\r
337\r
338\r
339static void internal_reset(void)\r
340{\r
341 writebuff_ptr = 0;\r
342 ST_mode = 0;\r
343 ST_status = 0; /* normal mode */\r
344 ST_TA = 0;\r
345 ST_TAC = 0;\r
346 ST_TB = 0;\r
347 ST_TBC = 0;\r
31a77bde 348 dacen = 0;\r
349 dacout = 0;\r
350 ST_address= 0;\r
720ee7f6 351}\r
352\r
353\r
52d3dd5f 354/* this must be called after mmu hack, the allocated regions must not get cached */\r
355void sharedmem_init(void)\r
356{\r
357 if (shared_mem != NULL) return;\r
358\r
359 shared_mem = (unsigned char *) mmap(0, 0x210000, PROT_READ|PROT_WRITE, MAP_SHARED, memdev, 0x2000000);\r
360 if(shared_mem == MAP_FAILED)\r
361 {\r
362 printf("mmap(shared_data) failed with %i\n", errno);\r
363 exit(1);\r
364 }\r
365 shared_data = (_940_data_t *) (shared_mem+0x100000);\r
366 /* this area must not get buffered on either side */\r
367 shared_ctl = (_940_ctl_t *) (shared_mem+0x200000);\r
60b4b403 368 mp3_mem = (unsigned char *) mmap(0, MP3_SIZE_MAX, PROT_READ|PROT_WRITE, MAP_SHARED, memdev, 0x2400000);\r
52d3dd5f 369 if (mp3_mem == MAP_FAILED)\r
370 {\r
371 printf("mmap(mp3_mem) failed with %i\n", errno);\r
372 exit(1);\r
373 }\r
374 crashed_940 = 1;\r
375}\r
376\r
377\r
4dfd9f42 378void sharedmem_deinit(void)\r
379{\r
380 munmap(shared_mem, 0x210000);\r
381 munmap(mp3_mem, MP3_SIZE_MAX);\r
382 shared_mem = mp3_mem = NULL;\r
383 shared_data = NULL;\r
384 shared_ctl = NULL;\r
385}\r
386\r
387\r
720ee7f6 388extern char **g_argv;\r
389\r
390/* none of the functions in this file should be called before this one */\r
391void YM2612Init_940(int baseclock, int rate)\r
392{\r
393 printf("YM2612Init_940()\n");\r
8dfb9fd5 394 printf("Mem usage: shared_data: %i, shared_ctl: %i\n", sizeof(*shared_data), sizeof(*shared_ctl));\r
720ee7f6 395\r
8dfb9fd5 396 Reset940(1, 2);\r
720ee7f6 397 Pause940(1);\r
398\r
49fe50f0 399 gp2x_memregs[0x3B40>>1] = 0; // disable DUALCPU interrupts for 920\r
400 gp2x_memregs[0x3B42>>1] = 1; // enable DUALCPU interrupts for 940\r
720ee7f6 401\r
edbb82f8 402 gp2x_memregl[0x4504>>2] = 0; // make sure no FIQs will be generated\r
403 gp2x_memregl[0x4508>>2] = ~(1<<26); // unmask DUALCPU ints in the undocumented 940's interrupt controller\r
404\r
405\r
720ee7f6 406 if (crashed_940)\r
407 {\r
408 unsigned char ucData[1024];\r
409 int nRead, i, nLen = 0;\r
410 char binpath[1024];\r
411 FILE *fp;\r
412\r
413 strncpy(binpath, g_argv[0], 1023);\r
414 binpath[1023] = 0;\r
415 for (i = strlen(binpath); i > 0; i--)\r
416 if (binpath[i] == '/') { binpath[i] = 0; break; }\r
95151aea 417 strcat(binpath, "/" CODE940_FILE);\r
720ee7f6 418\r
419 fp = fopen(binpath, "rb");\r
420 if(!fp)\r
421 {\r
13059a60 422 memset(gp2x_screen, 0, 320*240*2);\r
423 text_out16(10, 100, "failed to open required file:");\r
424 text_out16(10, 110, CODE940_FILE);\r
425 gp2x_video_flip2();\r
720ee7f6 426 printf("failed to open %s\n", binpath);\r
427 exit(1);\r
428 }\r
429\r
430 while(1)\r
431 {\r
432 nRead = fread(ucData, 1, 1024, fp);\r
433 if(nRead <= 0)\r
434 break;\r
435 memcpy(shared_mem + nLen, ucData, nRead);\r
436 nLen += nRead;\r
437 }\r
438 fclose(fp);\r
439 crashed_940 = 0;\r
440 }\r
441\r
442 memset(shared_data, 0, sizeof(*shared_data));\r
443 memset(shared_ctl, 0, sizeof(*shared_ctl));\r
444\r
31a77bde 445 /* cause local ym2612 to init REGS */\r
446 YM2612Init_(baseclock, rate);\r
447\r
720ee7f6 448 REGS = YM2612GetRegs();\r
31a77bde 449 addr_A1 = (INT32 *) (REGS + 0x200);\r
720ee7f6 450\r
451 ym2612_dacen = &dacen;\r
452 ym2612_dacout = &dacout;\r
453\r
454 internal_reset();\r
455\r
979ba09f 456 loaded_mp3 = 0;\r
457\r
49fe50f0 458 gp2x_memregs[0x3B46>>1] = 0xffff; // clear pending DUALCPU interrupts for 940\r
edbb82f8 459 gp2x_memregl[0x4500>>2] = 0xffffffff; // clear pending IRQs in SRCPND\r
460 gp2x_memregl[0x4510>>2] = 0xffffffff; // clear pending IRQs in INTPND\r
720ee7f6 461\r
462 /* start the 940 */\r
8dfb9fd5 463 Reset940(0, 2);\r
720ee7f6 464 Pause940(0);\r
465\r
466 // YM2612ResetChip_940(); // will be done on JOB940_YM2612INIT\r
edbb82f8 467\r
468 /* now cause 940 to init it's ym2612 stuff */\r
469 shared_ctl->baseclock = baseclock;\r
470 shared_ctl->rate = rate;\r
471 add_job_940(JOB940_INITALL);\r
720ee7f6 472}\r
473\r
474\r
475void YM2612ResetChip_940(void)\r
476{\r
477 printf("YM2612ResetChip_940()\n");\r
478 if (shared_data == NULL) {\r
479 printf("YM2612ResetChip_940: reset before init?\n");\r
480 return;\r
481 }\r
482\r
720ee7f6 483 internal_reset();\r
484\r
edbb82f8 485 add_job_940(JOB940_YM2612RESETCHIP);\r
720ee7f6 486}\r
487\r
488\r
edbb82f8 489int YM2612UpdateOne_940(int *buffer, int length, int stereo, int is_buf_empty)\r
598e7c06 490{\r
edbb82f8 491 int *ym_buf = shared_data->ym_buffer;\r
4dfd9f42 492 int ym_active_chs;\r
49fe50f0 493\r
edbb82f8 494 //printf("YM2612UpdateOne_940()\n");\r
495\r
496 if (CHECK_BUSY(JOB940_YM2612UPDATEONE)) wait_busy_940(JOB940_YM2612UPDATEONE);\r
497\r
4dfd9f42 498 ym_active_chs = shared_ctl->ym_active_chs;\r
edbb82f8 499\r
4dfd9f42 500 // mix in ym buffer. is_buf_empty means nobody mixed there anything yet and it may contain trash\r
501 if (is_buf_empty && ym_active_chs) memcpy32(buffer, ym_buf, length<<stereo);\r
502 else memset32(buffer, 0, length<<stereo);\r
edbb82f8 503\r
504 if (shared_ctl->writebuffsel == 1) {\r
79cad122 505 shared_ctl->writebuff0[writebuff_ptr & 0xffff] = 0xffff;\r
49fe50f0 506 } else {\r
79cad122 507 shared_ctl->writebuff1[writebuff_ptr & 0xffff] = 0xffff;\r
598e7c06 508 }\r
edbb82f8 509 writebuff_ptr = 0;\r
510\r
511 /* predict sample counter for next frame */\r
512 if (PsndLen_exc_add) {\r
513 if (PsndLen_exc_cnt + PsndLen_exc_add >= 0x10000) length = PsndLen + 1;\r
514 else length = PsndLen;\r
515 }\r
516\r
517 /* give 940 ym job */\r
518 shared_ctl->writebuffsel ^= 1;\r
519 shared_ctl->length = length;\r
520 shared_ctl->stereo = stereo;\r
521\r
522 add_job_940(JOB940_YM2612UPDATEONE);\r
523\r
4dfd9f42 524 return ym_active_chs;\r
598e7c06 525}\r
598e7c06 526\r
598e7c06 527\r
979ba09f 528static int mp3_samples_ready = 0, mp3_buffer_offs = 0;\r
edbb82f8 529static int mp3_play_bufsel = 0, mp3_job_started = 0;\r
598e7c06 530\r
edbb82f8 531void mp3_update(int *buffer, int length, int stereo)\r
720ee7f6 532{\r
edbb82f8 533 int length_mp3;\r
534 int cdda_on;\r
49fe50f0 535\r
edbb82f8 536 // not data track, CDC is reading, playback was started, track not ended\r
537 cdda_on = !(Pico_mcd->s68k_regs[0x36] & 1) && (Pico_mcd->scd.Status_CDC & 1) &&\r
538 loaded_mp3 && shared_ctl->mp3_offs < shared_ctl->mp3_len;\r
720ee7f6 539\r
edbb82f8 540 if (!cdda_on) return;\r
720ee7f6 541\r
edbb82f8 542 if (!(PicoOpt&0x200)) {\r
543 mp3_update_local(buffer, length, stereo);\r
544 return;\r
545 }\r
720ee7f6 546\r
edbb82f8 547 length_mp3 = length;\r
548 if (PsndRate == 22050) length_mp3 <<= 1; // mp3s are locked to 44100Hz stereo\r
549 else if (PsndRate == 11025) length_mp3 <<= 2; // so make length 44100ish\r
49fe50f0 550\r
edbb82f8 551 /* do we have to wait? */\r
552 if (mp3_job_started && mp3_samples_ready < length_mp3) {\r
553 if (CHECK_BUSY(JOB940_MP3DECODE)) wait_busy_940(JOB940_MP3DECODE);\r
554 mp3_job_started = 0;\r
555 mp3_samples_ready += 1152;\r
556 }\r
598e7c06 557\r
49fe50f0 558 /* mix mp3 data, only stereo */\r
edbb82f8 559 if (mp3_samples_ready >= length_mp3)\r
598e7c06 560 {\r
49fe50f0 561 int shr = 0;\r
562 void (*mix_samples)(int *dest_buf, short *mp3_buf, int count) = mix_16h_to_32;\r
563 if (PsndRate == 22050) { mix_samples = mix_16h_to_32_s1; shr = 1; }\r
564 else if (PsndRate == 11025) { mix_samples = mix_16h_to_32_s2; shr = 2; }\r
598e7c06 565\r
49fe50f0 566 if (1152 - mp3_buffer_offs >= length_mp3) {\r
edbb82f8 567 mix_samples(buffer, shared_data->mp3_buffer[mp3_play_bufsel] + mp3_buffer_offs*2, length<<1);\r
49fe50f0 568\r
569 mp3_buffer_offs += length_mp3;\r
598e7c06 570 } else {\r
edbb82f8 571 // collect samples from both buffers..\r
598e7c06 572 int left = 1152 - mp3_buffer_offs;\r
49fe50f0 573 if (mp3_play_bufsel == 0)\r
574 {\r
edbb82f8 575 mix_samples(buffer, shared_data->mp3_buffer[0] + mp3_buffer_offs*2, length<<1);\r
49fe50f0 576 mp3_buffer_offs = length_mp3 - left;\r
577 mp3_play_bufsel = 1;\r
578 } else {\r
579 mix_samples(buffer, shared_data->mp3_buffer[1] + mp3_buffer_offs*2, (left>>shr)<<1);\r
580 mp3_buffer_offs = length_mp3 - left;\r
581 mix_samples(buffer + ((left>>shr)<<1),\r
582 shared_data->mp3_buffer[0], (mp3_buffer_offs>>shr)<<1);\r
583 mp3_play_bufsel = 0;\r
584 }\r
720ee7f6 585 }\r
49fe50f0 586 mp3_samples_ready -= length_mp3;\r
720ee7f6 587 }\r
588\r
edbb82f8 589 // ask to decode more if we already can\r
590 if (!mp3_job_started)\r
598e7c06 591 {\r
edbb82f8 592 mp3_job_started = 1;\r
598e7c06 593 shared_ctl->mp3_buffsel ^= 1;\r
edbb82f8 594 add_job_940(JOB940_MP3DECODE);\r
598e7c06 595 }\r
720ee7f6 596}\r
598e7c06 597\r
598\r
599/***********************************************************/\r
600\r
601void mp3_start_play(FILE *f, int pos) // pos is 0-1023\r
602{\r
603 int byte_offs = 0;\r
604\r
7bc9cd7f 605 if (!(PicoOpt&0x800)) { // cdda disabled?\r
598e7c06 606 return;\r
607 }\r
608\r
609 if (loaded_mp3 != f)\r
610 {\r
dfa4c846 611 if (PicoMessage != NULL)\r
612 {\r
613 fseek(f, 0, SEEK_END);\r
614 if (ftell(f) > 2*1024*1024)\r
615 PicoMessage("Loading MP3...");\r
616 }\r
598e7c06 617 fseek(f, 0, SEEK_SET);\r
618 fread(mp3_mem, 1, MP3_SIZE_MAX, f);\r
60b4b403 619 if (!feof(f)) printf("Warning: mp3 was too large, not all data loaded.\n");\r
598e7c06 620 shared_ctl->mp3_len = ftell(f);\r
621 loaded_mp3 = f;\r
edbb82f8 622\r
623 if (PicoOpt&0x200) {\r
624 // as we are going to change 940's cacheable area, we must invalidate it's cache..\r
625 if (CHECK_BUSY(JOB940_MP3DECODE)) wait_busy_940(JOB940_MP3DECODE);\r
626 add_job_940(JOB940_INVALIDATE_DCACHE);\r
627 }\r
8f1b51ef 628 reset_timing = 1;\r
598e7c06 629 }\r
630\r
631 // seek..\r
632 if (pos) {\r
633 byte_offs = (shared_ctl->mp3_len << 6) >> 10;\r
634 byte_offs *= pos;\r
635 byte_offs >>= 6;\r
636 }\r
49fe50f0 637 // printf("mp3 pos1024: %i, byte_offs %i/%i\n", pos, byte_offs, shared_ctl->mp3_len);\r
598e7c06 638\r
639 shared_ctl->mp3_offs = byte_offs;\r
979ba09f 640\r
edbb82f8 641 // reset buffer pointers and stuff..\r
979ba09f 642 mp3_samples_ready = mp3_buffer_offs = mp3_play_bufsel = 0;\r
edbb82f8 643 mp3_job_started = 0;\r
979ba09f 644 shared_ctl->mp3_buffsel = 1; // will change to 0 on first decode\r
edbb82f8 645\r
646 if (!(PicoOpt&0x200)) mp3_start_local();\r
598e7c06 647}\r
648\r
649\r
98c9d8d9 650int mp3_get_offset(void)\r
651{\r
652 int offs1024 = 0;\r
653 int cdda_on;\r
654\r
7bc9cd7f 655 cdda_on = (PicoMCD & 1) && (PicoOpt&0x800) && !(Pico_mcd->s68k_regs[0x36] & 1) &&\r
edbb82f8 656 (Pico_mcd->scd.Status_CDC & 1) && loaded_mp3;\r
98c9d8d9 657\r
658 if (cdda_on) {\r
659 offs1024 = shared_ctl->mp3_offs << 7;\r
660 offs1024 /= shared_ctl->mp3_len;\r
661 offs1024 <<= 3;\r
662 }\r
663 printf("offs1024=%i (%i/%i)\n", offs1024, shared_ctl->mp3_offs, shared_ctl->mp3_len);\r
664\r
665 return offs1024;\r
666}\r
667\r
668\r
PicoDrive's frontend in a lib