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