platform/gp2x/940ctl.c

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