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