libpcsxcore/cdrom.c

   1 /***************************************************************************
   2  *   Copyright (C) 2007 Ryan Schultz, PCSX-df Team, PCSX team              *
   3  *                                                                         *
   4  *   This program is free software; you can redistribute it and/or modify  *
   5  *   it under the terms of the GNU General Public License as published by  *
   6  *   the Free Software Foundation; either version 2 of the License, or     *
   7  *   (at your option) any later version.                                   *
   8  *                                                                         *
   9  *   This program is distributed in the hope that it will be useful,       *
  10  *   but WITHOUT ANY WARRANTY; without even the implied warranty of        *
  11  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the         *
  12  *   GNU General Public License for more details.                          *
  13  *                                                                         *
  14  *   You should have received a copy of the GNU General Public License     *
  15  *   along with this program; if not, write to the                         *
  16  *   Free Software Foundation, Inc.,                                       *
  17  *   51 Franklin Street, Fifth Floor, Boston, MA 02111-1307 USA.           *
  18  ***************************************************************************/
  19
  20 /*
  21 * Handles all CD-ROM registers and functions.
  22 */
  23
  24 #include "cdrom.h"
  25 #include "ppf.h"
  26 #include "psxdma.h"
  27
  28 cdrStruct cdr;
  29
  30 /* CD-ROM magic numbers */
  31 #define CdlSync        0
  32 #define CdlNop         1
  33 #define CdlSetloc      2
  34 #define CdlPlay        3
  35 #define CdlForward     4
  36 #define CdlBackward    5
  37 #define CdlReadN       6
  38 #define CdlStandby     7
  39 #define CdlStop        8
  40 #define CdlPause       9
  41 #define CdlInit        10
  42 #define CdlMute        11
  43 #define CdlDemute      12
  44 #define CdlSetfilter   13
  45 #define CdlSetmode     14
  46 #define CdlGetmode     15
  47 #define CdlGetlocL     16
  48 #define CdlGetlocP     17
  49 #define CdlReadT       18
  50 #define CdlGetTN       19
  51 #define CdlGetTD       20
  52 #define CdlSeekL       21
  53 #define CdlSeekP       22
  54 #define CdlSetclock    23
  55 #define CdlGetclock    24
  56 #define CdlTest        25
  57 #define CdlID          26
  58 #define CdlReadS       27
  59 #define CdlReset       28
  60 #define CdlReadToc     30
  61
  62 #define AUTOPAUSE      249
  63 #define READ_ACK       250
  64 #define READ           251
  65 #define REPPLAY_ACK    252
  66 #define REPPLAY        253
  67 #define ASYNC          254
  68 /* don't set 255, it's reserved */
  69
  70 char *CmdName[0x100]= {
  71     "CdlSync",     "CdlNop",       "CdlSetloc",  "CdlPlay",
  72     "CdlForward",  "CdlBackward",  "CdlReadN",   "CdlStandby",
  73     "CdlStop",     "CdlPause",     "CdlInit",    "CdlMute",
  74     "CdlDemute",   "CdlSetfilter", "CdlSetmode", "CdlGetmode",
  75     "CdlGetlocL",  "CdlGetlocP",   "CdlReadT",   "CdlGetTN",
  76     "CdlGetTD",    "CdlSeekL",     "CdlSeekP",   "CdlSetclock",
  77     "CdlGetclock", "CdlTest",      "CdlID",      "CdlReadS",
  78     "CdlReset",    NULL,           "CDlReadToc", NULL
  79 };
  80
  81 unsigned char Test04[] = { 0 };
  82 unsigned char Test05[] = { 0 };
  83 unsigned char Test20[] = { 0x98, 0x06, 0x10, 0xC3 };
  84 unsigned char Test22[] = { 0x66, 0x6F, 0x72, 0x20, 0x45, 0x75, 0x72, 0x6F };
  85 unsigned char Test23[] = { 0x43, 0x58, 0x44, 0x32, 0x39 ,0x34, 0x30, 0x51 };
  86
  87 // cdr.Stat:
  88 #define NoIntr          0
  89 #define DataReady       1
  90 #define Complete        2
  91 #define Acknowledge     3
  92 #define DataEnd         4
  93 #define DiskError       5
  94
  95 /* Modes flags */
  96 #define MODE_SPEED       (1<<7) // 0x80
  97 #define MODE_STRSND      (1<<6) // 0x40 ADPCM on/off
  98 #define MODE_SIZE_2340   (1<<5) // 0x20
  99 #define MODE_SIZE_2328   (1<<4) // 0x10
 100 #define MODE_SF          (1<<3) // 0x08 channel on/off
 101 #define MODE_REPORT      (1<<2) // 0x04
 102 #define MODE_AUTOPAUSE   (1<<1) // 0x02
 103 #define MODE_CDDA        (1<<0) // 0x01
 104
 105 /* Status flags */
 106 #define STATUS_PLAY      (1<<7) // 0x80
 107 #define STATUS_SEEK      (1<<6) // 0x40
 108 #define STATUS_READ      (1<<5) // 0x20
 109 #define STATUS_SHELLOPEN (1<<4) // 0x10
 110 #define STATUS_UNKNOWN3  (1<<3) // 0x08
 111 #define STATUS_UNKNOWN2  (1<<2) // 0x04
 112 #define STATUS_ROTATING  (1<<1) // 0x02
 113 #define STATUS_ERROR     (1<<0) // 0x01
 114
 115
 116
 117 // 1x = 75 sectors per second
 118 // PSXCLK = 1 sec in the ps
 119 // so (PSXCLK / 75) = cdr read time (linuzappz)
 120 #define cdReadTime (PSXCLK / 75)
 121
 122 static struct CdrStat stat;
 123
 124 static unsigned int msf2sec(char *msf) {
 125         return ((msf[0] * 60 + msf[1]) * 75) + msf[2];
 126 }
 127
 128 static void sec2msf(unsigned int s, char *msf) {
 129         msf[0] = s / 75 / 60;
 130         s = s - msf[0] * 75 * 60;
 131         msf[1] = s / 75;
 132         s = s - msf[1] * 75;
 133         msf[2] = s;
 134 }
 135
 136
 137 #define CDR_INT(eCycle) { \
 138         psxRegs.interrupt |= (1 << PSXINT_CDR); \
 139         psxRegs.intCycle[PSXINT_CDR].cycle = eCycle; \
 140         psxRegs.intCycle[PSXINT_CDR].sCycle = psxRegs.cycle; \
 141         new_dyna_set_event(PSXINT_CDR, eCycle); \
 142 }
 143
 144 #define CDREAD_INT(eCycle) { \
 145         psxRegs.interrupt |= (1 << PSXINT_CDREAD); \
 146         psxRegs.intCycle[PSXINT_CDREAD].cycle = eCycle; \
 147         psxRegs.intCycle[PSXINT_CDREAD].sCycle = psxRegs.cycle; \
 148         new_dyna_set_event(PSXINT_CDREAD, eCycle); \
 149 }
 150
 151 #define CDRLID_INT(eCycle) { \
 152         psxRegs.interrupt |= (1 << PSXINT_CDRLID); \
 153         psxRegs.intCycle[PSXINT_CDRLID].cycle = eCycle; \
 154         psxRegs.intCycle[PSXINT_CDRLID].sCycle = psxRegs.cycle; \
 155         new_dyna_set_event(PSXINT_CDRLID, eCycle); \
 156 }
 157
 158 #define CDRPLAY_INT(eCycle) { \
 159         psxRegs.interrupt |= (1 << PSXINT_CDRPLAY); \
 160         psxRegs.intCycle[PSXINT_CDRPLAY].cycle = eCycle; \
 161         psxRegs.intCycle[PSXINT_CDRPLAY].sCycle = psxRegs.cycle; \
 162         new_dyna_set_event(PSXINT_CDRPLAY, eCycle); \
 163 }
 164
 165 #define StartReading(type, eCycle) { \
 166         cdr.Reading = type; \
 167         cdr.FirstSector = 1; \
 168         cdr.Readed = 0xff; \
 169         AddIrqQueue(READ_ACK, eCycle); \
 170 }
 171
 172 #define StopReading() { \
 173         if (cdr.Reading) { \
 174                 cdr.Reading = 0; \
 175                 psxRegs.interrupt &= ~(1 << PSXINT_CDREAD); \
 176         } \
 177         cdr.StatP &= ~STATUS_READ;\
 178 }
 179
 180 #define StopCdda() { \
 181         if (cdr.Play) { \
 182                 if (!Config.Cdda) CDR_stop(); \
 183                 cdr.StatP &= ~STATUS_PLAY; \
 184                 cdr.Play = FALSE; \
 185                 cdr.FastForward = 0; \
 186                 cdr.FastBackward = 0; \
 187                 /*SPU_registerCallback( SPUirq );*/ \
 188         } \
 189 }
 190
 191 #define SetResultSize(size) { \
 192     cdr.ResultP = 0; \
 193         cdr.ResultC = size; \
 194         cdr.ResultReady = 1; \
 195 }
 196
 197
 198 void cdrLidSeekInterrupt()
 199 {
 200         // turn back on checking
 201         if( cdr.LidCheck == 0x10 )
 202         {
 203                 cdr.LidCheck = 0;
 204         }
 205
 206         // official lid close
 207         else if( cdr.LidCheck == 0x30 )
 208         {
 209                 // GS CDX 3.3: $13
 210                 cdr.StatP |= STATUS_ROTATING;
 211
 212
 213                 // GS CDX 3.3 - ~50 getlocp tries
 214                 CDRLID_INT( cdReadTime * 3 );
 215                 cdr.LidCheck = 0x40;
 216         }
 217
 218         // turn off ready
 219         else if( cdr.LidCheck == 0x40 )
 220         {
 221                 // GS CDX 3.3: $01
 222                 cdr.StatP &= ~STATUS_SHELLOPEN;
 223                 cdr.StatP &= ~STATUS_ROTATING;
 224
 225
 226                 // GS CDX 3.3 - ~50 getlocp tries
 227                 CDRLID_INT( cdReadTime * 3 );
 228                 cdr.LidCheck = 0x50;
 229         }
 230
 231         // now seek
 232         else if( cdr.LidCheck == 0x50 )
 233         {
 234                 // GameShark Lite: Start seeking ($42)
 235                 cdr.StatP |= STATUS_SEEK;
 236                 cdr.StatP |= STATUS_ROTATING;
 237                 cdr.StatP &= ~STATUS_ERROR;
 238
 239
 240                 CDRLID_INT( cdReadTime * 3 );
 241                 cdr.LidCheck = 0x60;
 242         }
 243
 244         // done = cd ready
 245         else if( cdr.LidCheck == 0x60 )
 246         {
 247                 // GameShark Lite: Seek detection done ($02)
 248                 cdr.StatP &= ~STATUS_SEEK;
 249
 250                 cdr.LidCheck = 0;
 251         }
 252 }
 253
 254
 255 static void Check_Shell( int Irq )
 256 {
 257         // check case open/close
 258         if (cdr.LidCheck > 0)
 259         {
 260 #ifdef CDR_LOG
 261                 CDR_LOG( "LidCheck\n" );
 262 #endif
 263
 264                 // $20 = check lid state
 265                 if( cdr.LidCheck == 0x20 )
 266                 {
 267                         u32 i;
 268
 269                         i = stat.Status;
 270                         if (CDR_getStatus(&stat) != -1)
 271                         {
 272                                 // BIOS hangs + BIOS error messages
 273                                 //if (stat.Type == 0xff)
 274                                         //cdr.Stat = DiskError;
 275
 276                                 // case now open
 277                                 if (stat.Status & STATUS_SHELLOPEN)
 278                                 {
 279                                         // Vib Ribbon: pre-CD swap
 280                                         StopCdda();
 281
 282
 283                                         // GameShark Lite: Death if DiskError happens
 284                                         //
 285                                         // Vib Ribbon: Needs DiskError for CD swap
 286
 287                                         if (Irq != CdlNop)
 288                                         {
 289                                                 cdr.Stat = DiskError;
 290
 291                                                 cdr.StatP |= STATUS_ERROR;
 292                                                 cdr.Result[0] |= STATUS_ERROR;
 293                                         }
 294
 295                                         // GameShark Lite: Wants -exactly- $10
 296                                         cdr.StatP |= STATUS_SHELLOPEN;
 297                                         cdr.StatP &= ~STATUS_ROTATING;
 298
 299
 300                                         CDRLID_INT( cdReadTime * 3 );
 301                                         cdr.LidCheck = 0x10;
 302
 303
 304                                         // GS CDX 3.3 = $11
 305                                 }
 306
 307                                 // case just closed
 308                                 else if ( i & STATUS_SHELLOPEN )
 309                                 {
 310                                         cdr.StatP |= STATUS_ROTATING;
 311
 312                                         CheckCdrom();
 313
 314
 315                                         if( cdr.Stat == NoIntr )
 316                                                 cdr.Stat = Acknowledge;
 317
 318                                         psxHu32ref(0x1070) |= SWAP32((u32)0x4);
 319
 320
 321                                         // begin close-seek-ready cycle
 322                                         CDRLID_INT( cdReadTime * 3 );
 323                                         cdr.LidCheck = 0x30;
 324
 325
 326                                         // GameShark Lite: Wants -exactly- $42, then $02
 327                                         // GS CDX 3.3: Wants $11/$80, $13/$80, $01/$00
 328                                 }
 329
 330                                 // case still closed - wait for recheck
 331                                 else
 332                                 {
 333                                         CDRLID_INT( cdReadTime * 3 );
 334                                         cdr.LidCheck = 0x10;
 335                                 }
 336                         }
 337                 }
 338
 339
 340                 // GS CDX: clear all values but #1,#2
 341                 if( (cdr.LidCheck >= 0x30) || (cdr.StatP & STATUS_SHELLOPEN) )
 342                 {
 343                         SetResultSize(16);
 344                         memset( cdr.Result, 0, 16 );
 345
 346                         cdr.Result[0] = cdr.StatP;
 347
 348
 349                         // GS CDX: special return value
 350                         if( cdr.StatP & STATUS_SHELLOPEN )
 351                         {
 352                                 cdr.Result[1] = 0x80;
 353                         }
 354
 355
 356                         if( cdr.Stat == NoIntr )
 357                                 cdr.Stat = Acknowledge;
 358
 359                         psxHu32ref(0x1070) |= SWAP32((u32)0x4);
 360                 }
 361         }
 362 }
 363
 364
 365 void Find_CurTrack() {
 366         cdr.CurTrack = 0;
 367
 368         if (CDR_getTN(cdr.ResultTN) != -1) {
 369                 int lcv;
 370
 371                 for( lcv = 1; lcv <= cdr.ResultTN[1]; lcv++ ) {
 372                         if (CDR_getTD((u8)(lcv), cdr.ResultTD) != -1) {
 373                                 u32 sect1, sect2;
 374
 375 #ifdef CDR_LOG___0
 376                                 CDR_LOG( "curtrack %d %d %d | %d %d %d | %d\n",
 377                                         cdr.SetSectorPlay[0], cdr.SetSectorPlay[1], cdr.SetSectorPlay[2],
 378                                         cdr.ResultTD[2], cdr.ResultTD[1], cdr.ResultTD[0],
 379                                         cdr.CurTrack );
 380 #endif
 381
 382                                 // find next track boundary - only need m:s accuracy
 383                                 sect1 = cdr.SetSectorPlay[0] * 60 * 75 + cdr.SetSectorPlay[1] * 75;
 384                                 sect2 = cdr.ResultTD[2] * 60 * 75 + cdr.ResultTD[1] * 75;
 385
 386                                 // Twisted Metal 4 - psx cdda pregap (2-sec)
 387                                 // - fix in-game music
 388                                 sect2 -= 75 * 2;
 389
 390                                 if( sect1 >= sect2 ) {
 391                                         cdr.CurTrack++;
 392                                         continue;
 393                                 }
 394                         }
 395
 396                         break;
 397                 }
 398         }
 399 }
 400
 401 static void ReadTrack( u8 *time ) {
 402         cdr.Prev[0] = itob( time[0] );
 403         cdr.Prev[1] = itob( time[1] );
 404         cdr.Prev[2] = itob( time[2] );
 405
 406 #ifdef CDR_LOG
 407         CDR_LOG("ReadTrack() Log: KEY *** %x:%x:%x\n", cdr.Prev[0], cdr.Prev[1], cdr.Prev[2]);
 408 #endif
 409         cdr.RErr = CDR_readTrack(cdr.Prev);
 410 }
 411
 412
 413 void AddIrqQueue(unsigned char irq, unsigned long ecycle) {
 414         cdr.Irq = irq;
 415         cdr.eCycle = ecycle;
 416
 417         // Doom: Force rescheduling
 418         // - Fixes boot
 419         CDR_INT(ecycle);
 420 }
 421
 422
 423 void Set_Track()
 424 {
 425         if (CDR_getTN(cdr.ResultTN) != -1) {
 426                 int lcv;
 427
 428                 for( lcv = 1; lcv < cdr.ResultTN[1]; lcv++ ) {
 429                         if (CDR_getTD((u8)(lcv), cdr.ResultTD) != -1) {
 430 #ifdef CDR_LOG___0
 431                                 CDR_LOG( "settrack %d %d %d | %d %d %d | %d\n",
 432                                         cdr.SetSectorPlay[0], cdr.SetSectorPlay[1], cdr.SetSectorPlay[2],
 433                                         cdr.ResultTD[2], cdr.ResultTD[1], cdr.ResultTD[0],
 434                                         cdr.CurTrack );
 435 #endif
 436
 437                                 // check if time matches track start (only need min, sec accuracy)
 438                                 // - m:s:f vs f:s:m
 439                                 if( cdr.SetSectorPlay[0] == cdr.ResultTD[2] &&
 440                                                 cdr.SetSectorPlay[1] == cdr.ResultTD[1] ) {
 441                                         // skip pregap frames
 442                                         if( cdr.SetSectorPlay[2] < cdr.ResultTD[0] )
 443                                                 cdr.SetSectorPlay[2] = cdr.ResultTD[0];
 444
 445                                         break;
 446                                 }
 447                                 else if( cdr.SetSectorPlay[0] < cdr.ResultTD[2] )
 448                                         break;
 449                         }
 450                 }
 451         }
 452 }
 453
 454
 455 static u8 fake_subq_local[3], fake_subq_real[3], fake_subq_index, fake_subq_change;
 456 static void Create_Fake_Subq()
 457 {
 458         u8 temp_cur[3], temp_next[3], temp_start[3], pregap;
 459         int diff;
 460
 461         if (CDR_getTN(cdr.ResultTN) == -1) return;
 462         if( cdr.CurTrack+1 <= cdr.ResultTN[1] ) {
 463                 pregap = 150;
 464                 if( CDR_getTD(cdr.CurTrack+1, cdr.ResultTD) == -1 ) return;
 465         } else {
 466                 // last track - cd size
 467                 pregap = 0;
 468                 if( CDR_getTD(0, cdr.ResultTD) == -1 ) return;
 469         }
 470
 471         if( cdr.Play == TRUE ) {
 472                 temp_cur[0] = cdr.SetSectorPlay[0];
 473                 temp_cur[1] = cdr.SetSectorPlay[1];
 474                 temp_cur[2] = cdr.SetSectorPlay[2];
 475         } else {
 476                 temp_cur[0] = btoi( cdr.Prev[0] );
 477                 temp_cur[1] = btoi( cdr.Prev[1] );
 478                 temp_cur[2] = btoi( cdr.Prev[2] );
 479         }
 480
 481         fake_subq_real[0] = temp_cur[0];
 482         fake_subq_real[1] = temp_cur[1];
 483         fake_subq_real[2] = temp_cur[2];
 484
 485         temp_next[0] = cdr.ResultTD[2];
 486         temp_next[1] = cdr.ResultTD[1];
 487         temp_next[2] = cdr.ResultTD[0];
 488
 489
 490         // flag- next track
 491         if( msf2sec(temp_cur) >= msf2sec( temp_next )-pregap ) {
 492                 fake_subq_change = 1;
 493
 494                 cdr.CurTrack++;
 495
 496                 // end cd
 497                 if( pregap == 0 ) StopCdda();
 498         }
 499
 500         //////////////////////////////////////////////////
 501         //////////////////////////////////////////////////
 502
 503         // repair
 504         if( cdr.CurTrack <= cdr.ResultTN[1] ) {
 505                 if( CDR_getTD(cdr.CurTrack, cdr.ResultTD) == -1 ) return;
 506         } else {
 507                 // last track - cd size
 508                 if( CDR_getTD(0, cdr.ResultTD) == -1 ) return;
 509         }
 510
 511         temp_start[0] = cdr.ResultTD[2];
 512         temp_start[1] = cdr.ResultTD[1];
 513         temp_start[2] = cdr.ResultTD[0];
 514
 515
 516 #ifdef CDR_LOG
 517         CDR_LOG( "CDDA FAKE SUB - %d:%d:%d / %d:%d:%d / %d:%d:%d\n",
 518                 temp_cur[0], temp_cur[1], temp_cur[2],
 519                 temp_start[0], temp_start[1], temp_start[2],
 520                 temp_next[0], temp_next[1], temp_next[2]);
 521 #endif
 522
 523
 524
 525         // local time - pregap / real
 526         diff = msf2sec(temp_cur) - msf2sec( temp_start );
 527         if( diff < 0 ) {
 528                 fake_subq_index = 0;
 529
 530                 sec2msf( -diff, fake_subq_local );
 531         } else {
 532                 fake_subq_index = 1;
 533
 534                 sec2msf( diff, fake_subq_local );
 535         }
 536 }
 537
 538
 539 static void cdrPlayInterrupt_Autopause()
 540 {
 541         struct SubQ *subq = (struct SubQ *)CDR_getBufferSub();
 542         int track_changed = 0;
 543         if (subq != NULL ) {
 544 #ifdef CDR_LOG
 545                 CDR_LOG( "CDDA SUB - %X:%X:%X\n",
 546                         subq->AbsoluteAddress[0], subq->AbsoluteAddress[1], subq->AbsoluteAddress[2] );
 547 #endif
 548
 549                 /*
 550                 CDDA Autopause
 551
 552                 Silhouette Mirage ($3)
 553                 Tomb Raider 1 ($7)
 554                 */
 555
 556                 if( cdr.CurTrack < btoi( subq->TrackNumber ) )
 557                         track_changed = 1;
 558         } else {
 559                 Create_Fake_Subq();
 560 #ifdef CDR_LOG___0
 561                 CDR_LOG( "CDDA FAKE SUB - %d:%d:%d\n",
 562                         fake_subq_real[0], fake_subq_real[1], fake_subq_real[2] );
 563 #endif
 564
 565                 track_changed = fake_subq_change;
 566                 fake_subq_change = 0;
 567         }
 568
 569         if ((cdr.Mode & MODE_AUTOPAUSE) && track_changed) {
 570 #ifdef CDR_LOG
 571                 CDR_LOG( "CDDA STOP\n" );
 572 #endif
 573
 574                 // Magic the Gathering
 575                 // - looping territory cdda
 576
 577                 // ...?
 578                 //cdr.ResultReady = 1;
 579                 //cdr.Stat = DataReady;
 580                 cdr.Stat = DataEnd;
 581                 psxHu32ref(0x1070) |= SWAP32((u32)0x4);
 582
 583                 StopCdda();
 584         }
 585         if (cdr.Mode & MODE_REPORT) {
 586                 if (subq != NULL) {
 587 #ifdef CDR_LOG
 588                         CDR_LOG( "REPPLAY SUB - %X:%X:%X\n",
 589                                 subq->AbsoluteAddress[0], subq->AbsoluteAddress[1], subq->AbsoluteAddress[2] );
 590 #endif
 591                         cdr.CurTrack = btoi( subq->TrackNumber );
 592
 593                         if (subq->AbsoluteAddress[2] & 0xf)
 594                                 return;
 595
 596                         cdr.Result[0] = cdr.StatP;
 597                         // BIOS CD Player: data already BCD format
 598                         cdr.Result[1] = subq->TrackNumber;
 599                         cdr.Result[2] = subq->IndexNumber;
 600
 601                         cdr.Result[3] = subq->AbsoluteAddress[0];
 602                         cdr.Result[4] = subq->AbsoluteAddress[1];
 603                         cdr.Result[5] = subq->AbsoluteAddress[2];
 604                 } else {
 605 #ifdef CDR_LOG___0
 606                         CDR_LOG( "REPPLAY FAKE - %d:%d:%d\n",
 607                                 fake_subq_real[0], fake_subq_real[1], fake_subq_real[2] );
 608 #endif
 609
 610                         if (fake_subq_real[2] & 0xf)
 611                                 return;
 612
 613                         cdr.Result[0] = cdr.StatP;
 614                         // track # / index #
 615                         cdr.Result[1] = itob(cdr.CurTrack);
 616                         cdr.Result[2] = itob(fake_subq_index);
 617                         // absolute
 618                         cdr.Result[3] = itob( fake_subq_real[0] );
 619                         cdr.Result[4] = itob( fake_subq_real[1] );
 620                         cdr.Result[5] = itob( fake_subq_real[2] );
 621                 }
 622
 623                 // Rayman: Logo freeze (resultready + dataready)
 624                 cdr.ResultReady = 1;
 625                 cdr.Stat = DataReady;
 626
 627                 SetResultSize(8);
 628                 psxHu32ref(0x1070) |= SWAP32((u32)0x4);
 629         }
 630 }
 631
 632 void cdrPlayInterrupt()
 633 {
 634         if( !cdr.Play ) return;
 635
 636 #ifdef CDR_LOG
 637         CDR_LOG( "CDDA - %d:%d:%d\n",
 638                 cdr.SetSectorPlay[0], cdr.SetSectorPlay[1], cdr.SetSectorPlay[2] );
 639 #endif
 640         CDRPLAY_INT( cdReadTime );
 641
 642         if (!cdr.Irq && !cdr.Stat && (cdr.Mode & MODE_CDDA) && (cdr.Mode & (MODE_AUTOPAUSE|MODE_REPORT)))
 643                 cdrPlayInterrupt_Autopause();
 644
 645         cdr.SetSectorPlay[2]++;
 646         if (cdr.SetSectorPlay[2] == 75) {
 647                 cdr.SetSectorPlay[2] = 0;
 648                 cdr.SetSectorPlay[1]++;
 649                 if (cdr.SetSectorPlay[1] == 60) {
 650                         cdr.SetSectorPlay[1] = 0;
 651                         cdr.SetSectorPlay[0]++;
 652                 }
 653         }
 654
 655         //Check_Shell(0);
 656 }
 657
 658 void cdrInterrupt() {
 659         int i;
 660         unsigned char Irq = cdr.Irq;
 661         struct SubQ *subq;
 662
 663         // Reschedule IRQ
 664         if (cdr.Stat) {
 665                 CDR_INT( 0x100 );
 666                 return;
 667         }
 668
 669         cdr.Irq = 0xff;
 670         cdr.Ctrl &= ~0x80;
 671
 672         switch (Irq) {
 673                 case CdlSync:
 674                         SetResultSize(1);
 675                         cdr.StatP |= STATUS_ROTATING;
 676                         cdr.Result[0] = cdr.StatP;
 677                         cdr.Stat = Acknowledge;
 678                         break;
 679
 680                 case CdlNop:
 681                         SetResultSize(1);
 682                         cdr.Result[0] = cdr.StatP;
 683                         cdr.Stat = Acknowledge;
 684
 685                         if (cdr.LidCheck == 0) cdr.LidCheck = 0x20;
 686                         break;
 687
 688                 case CdlSetloc:
 689                         cdr.CmdProcess = 0;
 690                         SetResultSize(1);
 691                         cdr.StatP |= STATUS_ROTATING;
 692                         cdr.Result[0] = cdr.StatP;
 693                         cdr.Stat = Acknowledge;
 694                         break;
 695
 696                 case CdlPlay:
 697                         fake_subq_change = 0;
 698
 699                         if( cdr.Seeked == FALSE ) {
 700                                 memcpy( cdr.SetSectorPlay, cdr.SetSector, 4 );
 701                                 cdr.Seeked = TRUE;
 702                         }
 703
 704                         /*
 705                         Rayman: detect track changes
 706                         - fixes logo freeze
 707
 708                         Twisted Metal 2: skip PREGAP + starting accurate SubQ
 709                         - plays tracks without retry play
 710
 711                         Wild 9: skip PREGAP + starting accurate SubQ
 712                         - plays tracks without retry play
 713                         */
 714                         /* unneeded with correct cdriso?
 715                         Set_Track();
 716                         */
 717                         Find_CurTrack();
 718                         ReadTrack( cdr.SetSectorPlay );
 719
 720                         // GameShark CD Player: Calls 2x + Play 2x
 721                         if( cdr.FastBackward || cdr.FastForward ) {
 722                                 if( cdr.FastForward ) cdr.FastForward--;
 723                                 if( cdr.FastBackward ) cdr.FastBackward--;
 724
 725                                 if( cdr.FastBackward == 0 && cdr.FastForward == 0 ) {
 726                                         if( cdr.Play && CDR_getStatus(&stat) != -1 ) {
 727                                                 cdr.SetSectorPlay[0] = stat.Time[0];
 728                                                 cdr.SetSectorPlay[1] = stat.Time[1];
 729                                                 cdr.SetSectorPlay[2] = stat.Time[2];
 730                                         }
 731                                 }
 732                         }
 733
 734
 735                         if (!Config.Cdda) {
 736                                 // BIOS CD Player
 737                                 // - Pause player, hit Track 01/02/../xx (Setloc issued!!)
 738
 739                                 // GameShark CD Player: Resume play
 740                                 if( cdr.ParamC == 0 ) {
 741 #ifdef CDR_LOG___0
 742                                         CDR_LOG( "PLAY Resume @ %d:%d:%d\n",
 743                                                 cdr.SetSectorPlay[0], cdr.SetSectorPlay[1], cdr.SetSectorPlay[2] );
 744 #endif
 745
 746                                         //CDR_play( cdr.SetSectorPlay );
 747                                 }
 748                                 else
 749                                 {
 750                                         // BIOS CD Player: Resume play
 751                                         if( cdr.Param[0] == 0 ) {
 752 #ifdef CDR_LOG___0
 753                                                 CDR_LOG( "PLAY Resume T0 @ %d:%d:%d\n",
 754                                                         cdr.SetSectorPlay[0], cdr.SetSectorPlay[1], cdr.SetSectorPlay[2] );
 755 #endif
 756
 757                                                 //CDR_play( cdr.SetSectorPlay );
 758                                         }
 759                                         else {
 760 #ifdef CDR_LOG___0
 761                                                 CDR_LOG( "PLAY Resume Td @ %d:%d:%d\n",
 762                                                         cdr.SetSectorPlay[0], cdr.SetSectorPlay[1], cdr.SetSectorPlay[2] );
 763 #endif
 764
 765                                                 // BIOS CD Player: Allow track replaying
 766                                                 StopCdda();
 767
 768
 769                                                 cdr.CurTrack = btoi( cdr.Param[0] );
 770
 771                                                 if (CDR_getTN(cdr.ResultTN) != -1) {
 772                                                         // check last track
 773                                                         if (cdr.CurTrack > cdr.ResultTN[1])
 774                                                                 cdr.CurTrack = cdr.ResultTN[1];
 775
 776                                                         if (CDR_getTD((u8)(cdr.CurTrack), cdr.ResultTD) != -1) {
 777                                                                 cdr.SetSectorPlay[0] = cdr.ResultTD[2];
 778                                                                 cdr.SetSectorPlay[1] = cdr.ResultTD[1];
 779                                                                 cdr.SetSectorPlay[2] = cdr.ResultTD[0];
 780
 781                                                                 // reset data
 782                                                                 Set_Track();
 783                                                                 Find_CurTrack();
 784                                                                 ReadTrack( cdr.SetSectorPlay );
 785
 786                                                                 //CDR_play(cdr.SetSectorPlay);
 787                                                         }
 788                                                 }
 789                                         }
 790                                 }
 791                         }
 792
 793
 794                         // Vib Ribbon: gameplay checks flag
 795                         cdr.StatP &= ~STATUS_SEEK;
 796
 797
 798                         cdr.CmdProcess = 0;
 799                         SetResultSize(1);
 800                         cdr.StatP |= STATUS_ROTATING;
 801                         cdr.Result[0] = cdr.StatP;
 802                         cdr.Stat = Acknowledge;
 803
 804                         cdr.StatP |= STATUS_PLAY;
 805
 806
 807                         // BIOS player - set flag again
 808                         cdr.Play = TRUE;
 809
 810                         CDRPLAY_INT( cdReadTime );
 811                         break;
 812
 813                 case CdlForward:
 814                         cdr.CmdProcess = 0;
 815                         SetResultSize(1);
 816                         cdr.StatP |= STATUS_ROTATING;
 817                         cdr.Result[0] = cdr.StatP;
 818                         cdr.Stat = Complete;
 819
 820
 821                         // GameShark CD Player: Calls 2x + Play 2x
 822                         if( cdr.FastForward == 0 ) cdr.FastForward = 2;
 823                         else cdr.FastForward++;
 824
 825                         cdr.FastBackward = 0;
 826                         break;
 827
 828                 case CdlBackward:
 829                         cdr.CmdProcess = 0;
 830                         SetResultSize(1);
 831                         cdr.StatP |= STATUS_ROTATING;
 832                         cdr.Result[0] = cdr.StatP;
 833                         cdr.Stat = Complete;
 834
 835
 836                         // GameShark CD Player: Calls 2x + Play 2x
 837                         if( cdr.FastBackward == 0 ) cdr.FastBackward = 2;
 838                         else cdr.FastBackward++;
 839
 840                         cdr.FastForward = 0;
 841                         break;
 842
 843                 case CdlStandby:
 844                         cdr.CmdProcess = 0;
 845                         SetResultSize(1);
 846                         cdr.StatP |= STATUS_ROTATING;
 847                         cdr.Result[0] = cdr.StatP;
 848                         cdr.Stat = Complete;
 849                         break;
 850
 851                 case CdlStop:
 852                         cdr.CmdProcess = 0;
 853                         SetResultSize(1);
 854                         cdr.StatP &= ~STATUS_ROTATING;
 855                         cdr.Result[0] = cdr.StatP;
 856                         cdr.Stat = Complete;
 857 //                      cdr.Stat = Acknowledge;
 858
 859                         if (cdr.LidCheck == 0) cdr.LidCheck = 0x20;
 860                         break;
 861
 862                 case CdlPause:
 863                         SetResultSize(1);
 864                         cdr.Result[0] = cdr.StatP;
 865                         cdr.Stat = Acknowledge;
 866
 867                         /*
 868                         Gundam Battle Assault 2: much slower (*)
 869                         - Fixes boot, gameplay
 870
 871                         Hokuto no Ken 2: slower
 872                         - Fixes intro + subtitles
 873
 874                         InuYasha - Feudal Fairy Tale: slower
 875                         - Fixes battles
 876                         */
 877                         AddIrqQueue(CdlPause + 0x20, cdReadTime * 3);
 878                         cdr.Ctrl |= 0x80;
 879                         break;
 880
 881                 case CdlPause + 0x20:
 882                         SetResultSize(1);
 883                         cdr.StatP &= ~STATUS_READ;
 884                         cdr.StatP |= STATUS_ROTATING;
 885                         cdr.Result[0] = cdr.StatP;
 886                         cdr.Stat = Complete;
 887                         break;
 888
 889                 case CdlInit:
 890                         SetResultSize(1);
 891                         cdr.StatP = STATUS_ROTATING;
 892                         cdr.Result[0] = cdr.StatP;
 893                         cdr.Stat = Acknowledge;
 894 //                      if (!cdr.Init) {
 895                                 AddIrqQueue(CdlInit + 0x20, 0x800);
 896 //                      }
 897                 break;
 898
 899                 case CdlInit + 0x20:
 900                         SetResultSize(1);
 901                         cdr.Result[0] = cdr.StatP;
 902                         cdr.Stat = Complete;
 903                         cdr.Init = 1;
 904                         break;
 905
 906                 case CdlMute:
 907                         SetResultSize(1);
 908                         cdr.StatP |= STATUS_ROTATING;
 909                         cdr.Result[0] = cdr.StatP;
 910                         cdr.Stat = Acknowledge;
 911                         break;
 912
 913                 case CdlDemute:
 914                         SetResultSize(1);
 915                         cdr.StatP |= STATUS_ROTATING;
 916                         cdr.Result[0] = cdr.StatP;
 917                         cdr.Stat = Acknowledge;
 918                         break;
 919
 920                 case CdlSetfilter:
 921                         SetResultSize(1);
 922                         cdr.StatP |= STATUS_ROTATING;
 923                         cdr.Result[0] = cdr.StatP;
 924                         cdr.Stat = Acknowledge;
 925                         break;
 926
 927                 case CdlSetmode:
 928                         SetResultSize(1);
 929                         cdr.StatP |= STATUS_ROTATING;
 930                         cdr.Result[0] = cdr.StatP;
 931                         cdr.Stat = Acknowledge;
 932                         break;
 933
 934                 case CdlGetmode:
 935                         SetResultSize(6);
 936                         cdr.StatP |= STATUS_ROTATING;
 937                         cdr.Result[0] = cdr.StatP;
 938                         cdr.Result[1] = cdr.Mode;
 939                         cdr.Result[2] = cdr.File;
 940                         cdr.Result[3] = cdr.Channel;
 941                         cdr.Result[4] = 0;
 942                         cdr.Result[5] = 0;
 943                         cdr.Stat = Acknowledge;
 944                         break;
 945
 946                 case CdlGetlocL:
 947                         SetResultSize(8);
 948                         for (i = 0; i < 8; i++)
 949                                 cdr.Result[i] = cdr.Transfer[i];
 950                         cdr.Stat = Acknowledge;
 951                         break;
 952
 953                 case CdlGetlocP:
 954                         // GameShark CDX CD Player: uses 17 bytes output (wraps around)
 955                         SetResultSize(17);
 956                         memset( cdr.Result, 0, 16 );
 957
 958                         subq = (struct SubQ *)CDR_getBufferSub();
 959
 960                         if (subq != NULL) {
 961                                 cdr.Result[0] = subq->TrackNumber;
 962                                 cdr.Result[1] = subq->IndexNumber;
 963                                 memcpy(cdr.Result + 2, subq->TrackRelativeAddress, 3);
 964                                 memcpy(cdr.Result + 5, subq->AbsoluteAddress, 3);
 965
 966
 967                                 // subQ integrity check - data only (skip audio)
 968                                 if( subq->TrackNumber == 1 && stat.Type == 0x01 ) {
 969                                 if (calcCrc((u8 *)subq + 12, 10) != (((u16)subq->CRC[0] << 8) | subq->CRC[1])) {
 970                                         memset(cdr.Result + 2, 0, 3 + 3); // CRC wrong, wipe out time data
 971                                 }
 972                                 }
 973                         } else {
 974                                 if( cdr.Play == FALSE || !(cdr.Mode & MODE_CDDA) || !(cdr.Mode & (MODE_AUTOPAUSE|MODE_REPORT)) )
 975                                         Create_Fake_Subq();
 976
 977
 978                                 // track # / index #
 979                                 cdr.Result[0] = itob(cdr.CurTrack);
 980                                 cdr.Result[1] = itob(fake_subq_index);
 981
 982                                 // local
 983                                 cdr.Result[2] = itob( fake_subq_local[0] );
 984                                 cdr.Result[3] = itob( fake_subq_local[1] );
 985                                 cdr.Result[4] = itob( fake_subq_local[2] );
 986
 987                                 // absolute
 988                                 cdr.Result[5] = itob( fake_subq_real[0] );
 989                                 cdr.Result[6] = itob( fake_subq_real[1] );
 990                                 cdr.Result[7] = itob( fake_subq_real[2] );
 991                         }
 992
 993                         // redump.org - wipe time
 994                         if( !cdr.Play && CheckSBI(cdr.Result+5) ) {
 995                                 memset( cdr.Result+2, 0, 6 );
 996                         }
 997
 998                         cdr.Stat = Acknowledge;
 999                         break;
1000
1001                 case CdlGetTN:
1002                         // 5-Star Racing: don't stop CDDA
1003                         //
1004                         // Vib Ribbon: CD swap
1005                         StopReading();
1006
1007                         cdr.CmdProcess = 0;
1008                         SetResultSize(3);
1009                         cdr.StatP |= STATUS_ROTATING;
1010                         cdr.Result[0] = cdr.StatP;
1011                         if (CDR_getTN(cdr.ResultTN) == -1) {
1012                                 cdr.Stat = DiskError;
1013                                 cdr.Result[0] |= STATUS_ERROR;
1014                         } else {
1015                                 cdr.Stat = Acknowledge;
1016                                 cdr.Result[1] = itob(cdr.ResultTN[0]);
1017                                 cdr.Result[2] = itob(cdr.ResultTN[1]);
1018                         }
1019                         break;
1020
1021                 case CdlGetTD:
1022                         cdr.CmdProcess = 0;
1023                         cdr.Track = btoi(cdr.Param[0]);
1024                         SetResultSize(4);
1025                         cdr.StatP |= STATUS_ROTATING;
1026                         if (CDR_getTD(cdr.Track, cdr.ResultTD) == -1) {
1027                                 cdr.Stat = DiskError;
1028                                 cdr.Result[0] |= STATUS_ERROR;
1029                         } else {
1030                                 cdr.Stat = Acknowledge;
1031                                 cdr.Result[0] = cdr.StatP;
1032                                 cdr.Result[1] = itob(cdr.ResultTD[2]);
1033                                 cdr.Result[2] = itob(cdr.ResultTD[1]);
1034                                 cdr.Result[3] = itob(cdr.ResultTD[0]);
1035                         }
1036                         break;
1037
1038                 case CdlSeekL:
1039                         SetResultSize(1);
1040                         cdr.StatP |= STATUS_ROTATING;
1041                         cdr.Result[0] = cdr.StatP;
1042                         cdr.StatP |= STATUS_SEEK;
1043                         cdr.Stat = Acknowledge;
1044
1045                         /*
1046                         Crusaders of Might and Magic = 0.5x-4x
1047                         - fix cutscene speech start
1048
1049                         Eggs of Steel = 2x-?
1050                         - fix new game
1051
1052                         Medievil = ?-4x
1053                         - fix cutscene speech
1054
1055                         Rockman X5 = 0.5-4x
1056                         - fix capcom logo
1057                         */
1058                         AddIrqQueue(CdlSeekL + 0x20, cdReadTime * 4);
1059                         break;
1060
1061                 case CdlSeekL + 0x20:
1062                         SetResultSize(1);
1063                         cdr.StatP |= STATUS_ROTATING;
1064                         cdr.StatP &= ~STATUS_SEEK;
1065                         cdr.Result[0] = cdr.StatP;
1066                         cdr.Seeked = TRUE;
1067                         cdr.Stat = Complete;
1068
1069
1070                         // Mega Man Legends 2: must update read cursor for getlocp
1071                         ReadTrack( cdr.SetSector );
1072                         break;
1073
1074                 case CdlSeekP:
1075                         SetResultSize(1);
1076                         cdr.StatP |= STATUS_ROTATING;
1077                         cdr.Result[0] = cdr.StatP;
1078                         cdr.StatP |= STATUS_SEEK;
1079                         cdr.Stat = Acknowledge;
1080                         AddIrqQueue(CdlSeekP + 0x20, cdReadTime * 1);
1081                         break;
1082
1083                 case CdlSeekP + 0x20:
1084                         SetResultSize(1);
1085                         cdr.StatP |= STATUS_ROTATING;
1086                         cdr.StatP &= ~STATUS_SEEK;
1087                         cdr.Result[0] = cdr.StatP;
1088                         cdr.Stat = Complete;
1089                         cdr.Seeked = TRUE;
1090
1091                         // GameShark Music Player
1092                         memcpy( cdr.SetSectorPlay, cdr.SetSector, 4 );
1093
1094                         // Tomb Raider 2: must update read cursor for getlocp
1095                         Find_CurTrack();
1096                         ReadTrack( cdr.SetSectorPlay );
1097                         break;
1098
1099                 case CdlTest:
1100                         cdr.Stat = Acknowledge;
1101                         switch (cdr.Param[0]) {
1102                                 case 0x20: // System Controller ROM Version
1103                                         SetResultSize(4);
1104                                         memcpy(cdr.Result, Test20, 4);
1105                                         break;
1106                                 case 0x22:
1107                                         SetResultSize(8);
1108                                         memcpy(cdr.Result, Test22, 4);
1109                                         break;
1110                                 case 0x23: case 0x24:
1111                                         SetResultSize(8);
1112                                         memcpy(cdr.Result, Test23, 4);
1113                                         break;
1114                         }
1115                         break;
1116
1117                 case CdlID:
1118                         SetResultSize(1);
1119                         cdr.StatP |= STATUS_ROTATING;
1120                         cdr.Result[0] = cdr.StatP;
1121                         cdr.Stat = Acknowledge;
1122                         AddIrqQueue(CdlID + 0x20, 0x800);
1123                         break;
1124
1125                 case CdlID + 0x20:
1126                         SetResultSize(8);
1127
1128                         if (CDR_getStatus(&stat) == -1) {
1129                                 cdr.Result[0] = 0x00; // 0x08 and cdr.Result[1]|0x10 : audio cd, enters cd player
1130                                 cdr.Result[1] = 0x80; // 0x80 leads to the menu in the bios, else loads CD
1131                         }
1132                         else {
1133                                 if (stat.Type == 2) {
1134                                         // Music CD
1135                                         cdr.Result[0] = 0x08;
1136                                         cdr.Result[1] = 0x10;
1137
1138                                         cdr.Result[1] |= 0x80;
1139                                 }
1140                                 else {
1141                                         // Data CD
1142                                         if (CdromId[0] == '\0') {
1143                                                 cdr.Result[0] = 0x00;
1144                                                 cdr.Result[1] = 0x80;
1145                                         }
1146                                         else {
1147                                                 cdr.Result[0] = 0x08;
1148                                                 cdr.Result[1] = 0x00;
1149                                         }
1150                                 }
1151                         }
1152
1153                         cdr.Result[2] = 0x00;
1154                         cdr.Result[3] = 0x00;
1155                         strncpy((char *)&cdr.Result[4], "PCSX", 4);
1156                         cdr.Stat = Complete;
1157                         break;
1158
1159                 case CdlReset:
1160                         SetResultSize(1);
1161                         cdr.StatP = STATUS_ROTATING;
1162                         cdr.Result[0] = cdr.StatP;
1163                         cdr.Stat = Acknowledge;
1164                         break;
1165
1166                 case CdlReadT:
1167                         SetResultSize(1);
1168                         cdr.StatP |= STATUS_ROTATING;
1169                         cdr.Result[0] = cdr.StatP;
1170                         cdr.Stat = Acknowledge;
1171                         AddIrqQueue(CdlReadT + 0x20, 0x800);
1172                         break;
1173
1174                 case CdlReadT + 0x20:
1175                         SetResultSize(1);
1176                         cdr.StatP |= STATUS_ROTATING;
1177                         cdr.Result[0] = cdr.StatP;
1178                         cdr.Stat = Complete;
1179                         break;
1180
1181                 case CdlReadToc:
1182                         SetResultSize(1);
1183                         cdr.StatP |= STATUS_ROTATING;
1184                         cdr.Result[0] = cdr.StatP;
1185                         cdr.Stat = Acknowledge;
1186                         AddIrqQueue(CdlReadToc + 0x20, 0x800);
1187                         break;
1188
1189                 case CdlReadToc + 0x20:
1190                         SetResultSize(1);
1191                         cdr.StatP |= STATUS_ROTATING;
1192                         cdr.Result[0] = cdr.StatP;
1193                         cdr.Stat = Complete;
1194                         break;
1195
1196                 case AUTOPAUSE:
1197                         cdr.OCUP = 0;
1198 /*                      SetResultSize(1);
1199                         StopCdda();
1200                         StopReading();
1201                         cdr.OCUP = 0;
1202                         cdr.StatP&=~0x20;
1203                         cdr.StatP|= 0x2;
1204                         cdr.Result[0] = cdr.StatP;
1205                         cdr.Stat = DataEnd;
1206 */                      AddIrqQueue(CdlPause, 0x800);
1207                         break;
1208
1209                 case READ_ACK:
1210                         if (!cdr.Reading) return;
1211
1212
1213                         // Fighting Force 2 - update subq time immediately
1214                         // - fixes new game
1215                         ReadTrack( cdr.SetSector );
1216
1217
1218                         // Crusaders of Might and Magic - update getlocl now
1219                         // - fixes cutscene speech
1220                         {
1221                                 u8 *buf = CDR_getBuffer();
1222                                 if (buf != NULL)
1223                                         memcpy(cdr.Transfer, buf, 8);
1224                         }
1225
1226
1227                         /*
1228                         Duke Nukem: Land of the Babes - seek then delay read for one frame
1229                         - fixes cutscenes
1230                         C-12 - Final Resistance - doesn't like seek
1231                         */
1232
1233                         if (!cdr.Seeked) {
1234                                 cdr.Seeked = TRUE;
1235
1236                                 cdr.StatP |= STATUS_SEEK;
1237                                 cdr.StatP &= ~STATUS_READ;
1238
1239                                 // Crusaders of Might and Magic - use short time
1240                                 // - fix cutscene speech (startup)
1241
1242                                 // ??? - use more accurate seek time later
1243                                 CDREAD_INT((cdr.Mode & 0x80) ? (cdReadTime / 2) : cdReadTime * 1);
1244                         } else {
1245                                 cdr.StatP |= STATUS_READ;
1246                                 cdr.StatP &= ~STATUS_SEEK;
1247
1248                                 CDREAD_INT((cdr.Mode & 0x80) ? (cdReadTime / 2) : cdReadTime * 1);
1249                         }
1250
1251                         SetResultSize(1);
1252                         cdr.StatP |= STATUS_ROTATING;
1253                         cdr.Result[0] = cdr.StatP;
1254                         cdr.Stat = Acknowledge;
1255                         break;
1256
1257                 case 0xff:
1258                         return;
1259
1260                 default:
1261                         cdr.Stat = Complete;
1262                         break;
1263         }
1264
1265         Check_Shell( Irq );
1266
1267         if (cdr.Stat != NoIntr && cdr.Reg2 != 0x18) {
1268                 psxHu32ref(0x1070) |= SWAP32((u32)0x4);
1269         }
1270
1271 #ifdef CDR_LOG
1272         CDR_LOG("cdrInterrupt() Log: CDR Interrupt IRQ %x\n", Irq);
1273 #endif
1274 }
1275
1276 void cdrReadInterrupt() {
1277         u8 *buf;
1278
1279         if (!cdr.Reading)
1280                 return;
1281
1282         if (cdr.Irq || cdr.Stat) {
1283                 CDREAD_INT(0x100);
1284                 return;
1285         }
1286
1287 #ifdef CDR_LOG
1288         CDR_LOG("cdrReadInterrupt() Log: KEY END");
1289 #endif
1290
1291         cdr.OCUP = 1;
1292         SetResultSize(1);
1293         cdr.StatP |= STATUS_READ|STATUS_ROTATING;
1294         cdr.StatP &= ~STATUS_SEEK;
1295         cdr.Result[0] = cdr.StatP;
1296
1297         ReadTrack( cdr.SetSector );
1298
1299         buf = CDR_getBuffer();
1300         if (buf == NULL)
1301                 cdr.RErr = -1;
1302
1303         if (cdr.RErr == -1) {
1304 #ifdef CDR_LOG
1305                 fprintf(emuLog, "cdrReadInterrupt() Log: err\n");
1306 #endif
1307                 memset(cdr.Transfer, 0, DATA_SIZE);
1308                 cdr.Stat = DiskError;
1309                 cdr.Result[0] |= STATUS_ERROR;
1310                 CDREAD_INT((cdr.Mode & 0x80) ? (cdReadTime / 2) : cdReadTime);
1311                 return;
1312         }
1313
1314         memcpy(cdr.Transfer, buf, DATA_SIZE);
1315         CheckPPFCache(cdr.Transfer, cdr.Prev[0], cdr.Prev[1], cdr.Prev[2]);
1316
1317
1318 #ifdef CDR_LOG
1319         fprintf(emuLog, "cdrReadInterrupt() Log: cdr.Transfer %x:%x:%x\n", cdr.Transfer[0], cdr.Transfer[1], cdr.Transfer[2]);
1320 #endif
1321
1322         if ((!cdr.Muted) && (cdr.Mode & MODE_STRSND) && (!Config.Xa) && (cdr.FirstSector != -1)) { // CD-XA
1323                 // Firemen 2: Multi-XA files - briefings, cutscenes
1324                 if( cdr.FirstSector == 1 && (cdr.Mode & MODE_SF)==0 ) {
1325                         cdr.File = cdr.Transfer[4 + 0];
1326                         cdr.Channel = cdr.Transfer[4 + 1];
1327                 }
1328
1329                 if ((cdr.Transfer[4 + 2] & 0x4) &&
1330                          (cdr.Transfer[4 + 1] == cdr.Channel) &&
1331                         (cdr.Transfer[4 + 0] == cdr.File)) {
1332                         int ret = xa_decode_sector(&cdr.Xa, cdr.Transfer+4, cdr.FirstSector);
1333
1334                         if (!ret) {
1335                                 // only handle attenuator basic channel switch for now
1336                                 if (cdr.Xa.stereo) {
1337                                         int i;
1338                                         if ((cdr.AttenuatorLeft[0] | cdr.AttenuatorLeft[1])
1339                                             && !(cdr.AttenuatorRight[0] | cdr.AttenuatorRight[1]))
1340                                         {
1341                                                 for (i = 0; i < cdr.Xa.nsamples; i++)
1342                                                         cdr.Xa.pcm[i*2 + 1] = cdr.Xa.pcm[i*2];
1343                                         }
1344                                         else if (!(cdr.AttenuatorLeft[0] | cdr.AttenuatorLeft[1])
1345                                             && (cdr.AttenuatorRight[0] | cdr.AttenuatorRight[1]))
1346                                         {
1347                                                 for (i = 0; i < cdr.Xa.nsamples; i++)
1348                                                         cdr.Xa.pcm[i*2] = cdr.Xa.pcm[i*2 + 1];
1349                                         }
1350                                 }
1351
1352                                 SPU_playADPCMchannel(&cdr.Xa);
1353                                 cdr.FirstSector = 0;
1354
1355 #if 0
1356                                 // Crash Team Racing: music, speech
1357                                 // - done using cdda decoded buffer (spu irq)
1358                                 // - don't do here
1359
1360                                 // signal ADPCM data ready
1361                                 psxHu32ref(0x1070) |= SWAP32((u32)0x200);
1362 #endif
1363                         }
1364                         else cdr.FirstSector = -1;
1365                 }
1366         }
1367
1368         cdr.SetSector[2]++;
1369         if (cdr.SetSector[2] == 75) {
1370                 cdr.SetSector[2] = 0;
1371                 cdr.SetSector[1]++;
1372                 if (cdr.SetSector[1] == 60) {
1373                         cdr.SetSector[1] = 0;
1374                         cdr.SetSector[0]++;
1375                 }
1376         }
1377
1378         cdr.Readed = 0;
1379
1380         // G-Police: Don't autopause ADPCM even if mode set (music)
1381         if ((cdr.Transfer[4 + 2] & 0x80) && (cdr.Mode & MODE_AUTOPAUSE) &&
1382                         (cdr.Transfer[4 + 2] & 0x4) != 0x4 ) { // EOF
1383 #ifdef CDR_LOG
1384                 CDR_LOG("cdrReadInterrupt() Log: Autopausing read\n");
1385 #endif
1386 //              AddIrqQueue(AUTOPAUSE, 0x2000);
1387                 AddIrqQueue(CdlPause, 0x2000);
1388         }
1389         else {
1390                 CDREAD_INT((cdr.Mode & MODE_SPEED) ? (cdReadTime / 2) : cdReadTime);
1391         }
1392
1393         /*
1394         Croc 2: $40 - only FORM1 (*)
1395         Judge Dredd: $C8 - only FORM1 (*)
1396         Sim Theme Park - no adpcm at all (zero)
1397         */
1398
1399         if( (cdr.Mode & MODE_STRSND) == 0 || (cdr.Transfer[4+2] & 0x4) != 0x4 ) {
1400                 cdr.Stat = DataReady;
1401         } else {
1402                 // Breath of Fire 3 - fix inn sleeping
1403                 // Rockman X5 - no music restart problem
1404                 cdr.Stat = NoIntr;
1405         }
1406         psxHu32ref(0x1070) |= SWAP32((u32)0x4);
1407
1408         Check_Shell(0);
1409 }
1410
1411 /*
1412 cdrRead0:
1413         bit 0 - 0 REG1 command send / 1 REG1 data read
1414         bit 1 - 0 data transfer finish / 1 data transfer ready/in progress
1415         bit 2 - unknown
1416         bit 3 - unknown
1417         bit 4 - unknown
1418         bit 5 - 1 result ready
1419         bit 6 - 1 dma ready
1420         bit 7 - 1 command being processed
1421 */
1422
1423 unsigned char cdrRead0(void) {
1424         if (cdr.ResultReady)
1425                 cdr.Ctrl |= 0x20;
1426         else
1427                 cdr.Ctrl &= ~0x20;
1428
1429         if (cdr.OCUP)
1430                 cdr.Ctrl |= 0x40;
1431 //  else
1432 //              cdr.Ctrl &= ~0x40;
1433
1434         // What means the 0x10 and the 0x08 bits? I only saw it used by the bios
1435         cdr.Ctrl |= 0x18;
1436
1437 #ifdef CDR_LOG
1438         CDR_LOG("cdrRead0() Log: CD0 Read: %x\n", cdr.Ctrl);
1439 #endif
1440
1441         return psxHu8(0x1800) = cdr.Ctrl;
1442 }
1443
1444 /*
1445 cdrWrite0:
1446         0 - to send a command / 1 - to get the result
1447 */
1448
1449 void cdrWrite0(unsigned char rt) {
1450 #ifdef CDR_LOG
1451         CDR_LOG("cdrWrite0() Log: CD0 write: %x\n", rt);
1452 #endif
1453         cdr.Ctrl = rt | (cdr.Ctrl & ~0x3);
1454
1455         if (rt == 0) {
1456                 cdr.ParamP = 0;
1457                 cdr.ParamC = 0;
1458                 cdr.ResultReady = 0;
1459         }
1460 }
1461
1462 unsigned char cdrRead1(void) {
1463     if (cdr.ResultReady) { // && cdr.Ctrl & 0x1) {
1464                 // GameShark CDX CD Player: uses 17 bytes output (wraps around)
1465                 psxHu8(0x1801) = cdr.Result[cdr.ResultP & 0xf];
1466                 cdr.ResultP++;
1467                 if (cdr.ResultP == cdr.ResultC)
1468                         cdr.ResultReady = 0;
1469         } else {
1470                 psxHu8(0x1801) = 0;
1471         }
1472 #ifdef CDR_LOG
1473         CDR_LOG("cdrRead1() Log: CD1 Read: %x\n", psxHu8(0x1801));
1474 #endif
1475         return psxHu8(0x1801);
1476 }
1477
1478 void cdrWrite1(unsigned char rt) {
1479         char set_loc[3];
1480         int i;
1481
1482 #ifdef CDR_LOG
1483         CDR_LOG("cdrWrite1() Log: CD1 write: %x (%s)\n", rt, CmdName[rt]);
1484 #endif
1485
1486
1487         // Tekken: CDXA fade-out
1488         if( (cdr.Ctrl & 3) == 3 ) {
1489                 cdr.AttenuatorRight[0] = rt;
1490         }
1491
1492
1493 //      psxHu8(0x1801) = rt;
1494         cdr.Cmd = rt;
1495         cdr.OCUP = 0;
1496
1497 #ifdef CDRCMD_DEBUG
1498         SysPrintf("cdrWrite1() Log: CD1 write: %x (%s)", rt, CmdName[rt]);
1499         if (cdr.ParamC) {
1500                 SysPrintf(" Param[%d] = {", cdr.ParamC);
1501                 for (i = 0; i < cdr.ParamC; i++)
1502                         SysPrintf(" %x,", cdr.Param[i]);
1503                 SysPrintf("}\n");
1504         } else {
1505                 SysPrintf("\n");
1506         }
1507 #endif
1508
1509         if (cdr.Ctrl & 0x1) return;
1510
1511         switch (cdr.Cmd) {
1512         case CdlSync:
1513                 cdr.Ctrl |= 0x80;
1514                 cdr.Stat = NoIntr;
1515                 AddIrqQueue(cdr.Cmd, 0x800);
1516                 break;
1517
1518         case CdlNop:
1519                 cdr.Ctrl |= 0x80;
1520                 cdr.Stat = NoIntr;
1521
1522                 // Twisted Metal 3 - fix music
1523                 AddIrqQueue(cdr.Cmd, 0x800);
1524                 break;
1525
1526         case CdlSetloc:
1527                 StopReading();
1528                 for (i = 0; i < 3; i++)
1529                         set_loc[i] = btoi(cdr.Param[i]);
1530                 i = abs(msf2sec(cdr.SetSector) - msf2sec(set_loc));
1531                 if (i > 16)
1532                         cdr.Seeked = FALSE;
1533                 memcpy(cdr.SetSector, set_loc, 3);
1534                 cdr.SetSector[3] = 0;
1535
1536                 /*
1537                    if ((cdr.SetSector[0] | cdr.SetSector[1] | cdr.SetSector[2]) == 0) {
1538                  *(u32 *)cdr.SetSector = *(u32 *)cdr.SetSectorSeek;
1539                  }*/
1540
1541                 cdr.Ctrl |= 0x80;
1542                 cdr.Stat = NoIntr;
1543                 AddIrqQueue(cdr.Cmd, 0x800);
1544                 break;
1545
1546         case CdlPlay:
1547                 // Vib Ribbon: try same track again
1548                 StopCdda();
1549
1550                 if (!cdr.SetSector[0] & !cdr.SetSector[1] & !cdr.SetSector[2]) {
1551                         if (CDR_getTN(cdr.ResultTN) != -1) {
1552                                 if (cdr.CurTrack > cdr.ResultTN[1])
1553                                         cdr.CurTrack = cdr.ResultTN[1];
1554                                 if (CDR_getTD((unsigned char)(cdr.CurTrack), cdr.ResultTD) != -1) {
1555                                         int tmp = cdr.ResultTD[2];
1556                                         cdr.ResultTD[2] = cdr.ResultTD[0];
1557                                         cdr.ResultTD[0] = tmp;
1558                                         if (!Config.Cdda) CDR_play(cdr.ResultTD);
1559                                 }
1560                         }
1561                 } else if (!Config.Cdda) {
1562                         CDR_play(cdr.SetSector);
1563                 }
1564
1565                 // Vib Ribbon - decoded buffer IRQ for CDDA reading
1566                 // - fixes ribbon timing + music CD mode
1567                 //TODO?
1568                 //CDRDBUF_INT( PSXCLK / 44100 * 0x100 );
1569
1570
1571                 cdr.Play = TRUE;
1572
1573                 cdr.StatP |= STATUS_SEEK;
1574                 cdr.StatP &= ~STATUS_ROTATING;
1575
1576                 cdr.Ctrl |= 0x80;
1577                 cdr.Stat = NoIntr;
1578                 AddIrqQueue(cdr.Cmd, 0x800);
1579                 break;
1580
1581         case CdlForward:
1582                 //if (cdr.CurTrack < 0xaa)
1583                 //      cdr.CurTrack++;
1584                 cdr.Ctrl |= 0x80;
1585                 cdr.Stat = NoIntr;
1586                 AddIrqQueue(cdr.Cmd, 0x800);
1587                 break;
1588
1589         case CdlBackward:
1590                 //if (cdr.CurTrack > 1)
1591                 //cdr.CurTrack--;
1592                 cdr.Ctrl |= 0x80;
1593                 cdr.Stat = NoIntr;
1594                 AddIrqQueue(cdr.Cmd, 0x800);
1595                 break;
1596
1597         case CdlReadN:
1598                 cdr.Irq = 0;
1599                 StopReading();
1600                 cdr.Ctrl|= 0x80;
1601                 cdr.Stat = NoIntr;
1602                 StartReading(1, 0x800);
1603                 break;
1604
1605         case CdlStandby:
1606                 StopCdda();
1607                 StopReading();
1608                 cdr.Ctrl |= 0x80;
1609                 cdr.Stat = NoIntr;
1610                 AddIrqQueue(cdr.Cmd, 0x800);
1611                 break;
1612
1613         case CdlStop:
1614                 // GameShark CD Player: Reset CDDA to track start
1615                 if( cdr.Play && CDR_getStatus(&stat) != -1 ) {
1616                         cdr.SetSectorPlay[0] = stat.Time[0];
1617                         cdr.SetSectorPlay[1] = stat.Time[1];
1618                         cdr.SetSectorPlay[2] = stat.Time[2];
1619
1620                         Find_CurTrack();
1621
1622
1623                         // grab time for current track
1624                         CDR_getTD((u8)(cdr.CurTrack), cdr.ResultTD);
1625
1626                         cdr.SetSectorPlay[0] = cdr.ResultTD[2];
1627                         cdr.SetSectorPlay[1] = cdr.ResultTD[1];
1628                         cdr.SetSectorPlay[2] = cdr.ResultTD[0];
1629                 }
1630
1631                 StopCdda();
1632                 StopReading();
1633
1634                 cdr.Ctrl |= 0x80;
1635                 cdr.Stat = NoIntr;
1636                 AddIrqQueue(cdr.Cmd, 0x800);
1637                 break;
1638
1639         case CdlPause:
1640                 /*
1641                    GameShark CD Player: save time for resume
1642
1643                    Twisted Metal - World Tour: don't mix Setloc / CdlPlay cursors
1644                 */
1645
1646                 StopCdda();
1647                 StopReading();
1648                 cdr.Ctrl |= 0x80;
1649                 cdr.Stat = NoIntr;
1650
1651                 AddIrqQueue(cdr.Cmd, 0x800);
1652                 break;
1653
1654         case CdlReset:
1655         case CdlInit:
1656                 StopCdda();
1657                 StopReading();
1658                 cdr.Ctrl |= 0x80;
1659                 cdr.Stat = NoIntr;
1660                 AddIrqQueue(cdr.Cmd, 0x800);
1661                 break;
1662
1663         case CdlMute:
1664                 cdr.Muted = TRUE;
1665                 cdr.Ctrl |= 0x80;
1666                 cdr.Stat = NoIntr;
1667                 AddIrqQueue(cdr.Cmd, 0x800);
1668
1669                         // Duke Nukem - Time to Kill
1670                         // - do not directly set cd-xa volume
1671                         //SPU_writeRegister( H_CDLeft, 0x0000 );
1672                         //SPU_writeRegister( H_CDRight, 0x0000 );
1673                 break;
1674
1675         case CdlDemute:
1676                 cdr.Muted = FALSE;
1677                 cdr.Ctrl |= 0x80;
1678                 cdr.Stat = NoIntr;
1679                 AddIrqQueue(cdr.Cmd, 0x800);
1680
1681                         // Duke Nukem - Time to Kill
1682                         // - do not directly set cd-xa volume
1683                         //SPU_writeRegister( H_CDLeft, 0x7f00 );
1684                         //SPU_writeRegister( H_CDRight, 0x7f00 );
1685                 break;
1686
1687         case CdlSetfilter:
1688                 cdr.File = cdr.Param[0];
1689                 cdr.Channel = cdr.Param[1];
1690                 cdr.Ctrl |= 0x80;
1691                 cdr.Stat = NoIntr;
1692                 AddIrqQueue(cdr.Cmd, 0x800);
1693                 break;
1694
1695         case CdlSetmode:
1696 #ifdef CDR_LOG
1697                 CDR_LOG("cdrWrite1() Log: Setmode %x\n", cdr.Param[0]);
1698 #endif
1699                 cdr.Mode = cdr.Param[0];
1700                 cdr.Ctrl |= 0x80;
1701                 cdr.Stat = NoIntr;
1702                 AddIrqQueue(cdr.Cmd, 0x800);
1703
1704                 // Squaresoft on PlayStation 1998 Collector's CD Vol. 1
1705                 // - fixes choppy movie sound
1706                 if( cdr.Play && (cdr.Mode & MODE_CDDA) == 0 )
1707                         StopCdda();
1708                 break;
1709
1710         case CdlGetmode:
1711                 cdr.Ctrl |= 0x80;
1712                 cdr.Stat = NoIntr;
1713                 AddIrqQueue(cdr.Cmd, 0x800);
1714                 break;
1715
1716         case CdlGetlocL:
1717                 cdr.Ctrl |= 0x80;
1718                 cdr.Stat = NoIntr;
1719
1720                 // Crusaders of Might and Magic - cutscene speech
1721                 AddIrqQueue(cdr.Cmd, 0x800);
1722                 break;
1723
1724         case CdlGetlocP:
1725                 cdr.Ctrl |= 0x80;
1726                 cdr.Stat = NoIntr;
1727
1728                 // GameShark CDX / Lite Player: pretty narrow time window
1729                 // - doesn't always work due to time inprecision
1730                 //AddIrqQueue(cdr.Cmd, 0x28);
1731
1732                 // Tomb Raider 2 - cdda
1733                 //AddIrqQueue(cdr.Cmd, 0x40);
1734
1735                 // rearmed: the above works in pcsxr-svn, but breaks here
1736                 // (TOCA world touring cars), perhaps some other code is not merged yet
1737                 AddIrqQueue(cdr.Cmd, 0x1000);
1738                 break;
1739
1740         case CdlGetTN:
1741                 cdr.Ctrl |= 0x80;
1742                 cdr.Stat = NoIntr;
1743                 //AddIrqQueue(cdr.Cmd, 0x800);
1744
1745                 // GameShark CDX CD Player: very long time
1746                 AddIrqQueue(cdr.Cmd, 0x100000);
1747                 break;
1748
1749         case CdlGetTD:
1750                 cdr.Ctrl |= 0x80;
1751                 cdr.Stat = NoIntr;
1752                 AddIrqQueue(cdr.Cmd, 0x800);
1753                 break;
1754
1755         case CdlSeekL:
1756 //                      ((u32 *)cdr.SetSectorSeek)[0] = ((u32 *)cdr.SetSector)[0];
1757                 cdr.Ctrl |= 0x80;
1758                 cdr.Stat = NoIntr;
1759                 AddIrqQueue(cdr.Cmd, 0x800);
1760
1761                 StopCdda();
1762                 StopReading();
1763
1764                 break;
1765
1766         case CdlSeekP:
1767 //              ((u32 *)cdr.SetSectorSeek)[0] = ((u32 *)cdr.SetSector)[0];
1768                 cdr.Ctrl |= 0x80;
1769                 cdr.Stat = NoIntr;
1770
1771                 // Tomb Raider 2 - reset cdda
1772                 StopCdda();
1773                 StopReading();
1774
1775                 AddIrqQueue(cdr.Cmd, 0x800);
1776                 break;
1777
1778         // Destruction Derby: read TOC? GetTD after this
1779         case CdlReadT:
1780                 cdr.Ctrl |= 0x80;
1781                 cdr.Stat = NoIntr;
1782                 AddIrqQueue(cdr.Cmd, 0x800);
1783                 break;
1784
1785         case CdlTest:
1786                 cdr.Ctrl |= 0x80;
1787                 cdr.Stat = NoIntr;
1788                 AddIrqQueue(cdr.Cmd, 0x800);
1789                 break;
1790
1791         case CdlID:
1792                 cdr.Ctrl |= 0x80;
1793                 cdr.Stat = NoIntr;
1794                 AddIrqQueue(cdr.Cmd, 0x800);
1795                 break;
1796
1797         case CdlReadS:
1798                 cdr.Irq = 0;
1799                 StopReading();
1800                 cdr.Ctrl |= 0x80;
1801                 cdr.Stat = NoIntr;
1802                 StartReading(2, 0x800);
1803                 break;
1804
1805         case CdlReadToc:
1806                 cdr.Ctrl |= 0x80;
1807                 cdr.Stat = NoIntr;
1808                 AddIrqQueue(cdr.Cmd, 0x800);
1809                 break;
1810
1811         default:
1812 #ifdef CDR_LOG
1813                 CDR_LOG("cdrWrite1() Log: Unknown command: %x\n", cdr.Cmd);
1814 #endif
1815                 return;
1816         }
1817         if (cdr.Stat != NoIntr) {
1818                 psxHu32ref(0x1070) |= SWAP32((u32)0x4);
1819         }
1820 }
1821
1822 unsigned char cdrRead2(void) {
1823         unsigned char ret;
1824
1825         if (cdr.Readed == 0) {
1826                 ret = 0;
1827         } else {
1828                 ret = *cdr.pTransfer++;
1829         }
1830
1831 #ifdef CDR_LOG
1832         CDR_LOG("cdrRead2() Log: CD2 Read: %x\n", ret);
1833 #endif
1834         return ret;
1835 }
1836
1837 void cdrWrite2(unsigned char rt) {
1838 #ifdef CDR_LOG
1839         CDR_LOG("cdrWrite2() Log: CD2 write: %x\n", rt);
1840 #endif
1841
1842         // Tekken: CDXA fade-out
1843         if( (cdr.Ctrl & 3) == 2 ) {
1844                 cdr.AttenuatorLeft[0] = rt;
1845         }
1846         else if( (cdr.Ctrl & 3) == 3 ) {
1847                 cdr.AttenuatorRight[1] = rt;
1848         }
1849
1850
1851         if (cdr.Ctrl & 0x1) {
1852                 switch (rt) {
1853                         case 0x07:
1854                                 cdr.ParamP = 0;
1855                                 cdr.ParamC = 0;
1856                                 cdr.ResultReady = 1; //0;
1857                                 cdr.Ctrl &= ~3; //cdr.Ctrl = 0;
1858                                 break;
1859
1860                         default:
1861                                 cdr.Reg2 = rt;
1862                                 break;
1863                 }
1864         } else if (!(cdr.Ctrl & 0x1) && cdr.ParamP < 8) {
1865                 cdr.Param[cdr.ParamP++] = rt;
1866                 cdr.ParamC++;
1867         }
1868 }
1869
1870 unsigned char cdrRead3(void) {
1871         if (cdr.Stat) {
1872                 if (cdr.Ctrl & 0x1)
1873                         psxHu8(0x1803) = cdr.Stat | 0xE0;
1874                 else
1875                         psxHu8(0x1803) = 0xff;
1876         } else {
1877                 psxHu8(0x1803) = 0;
1878         }
1879 #ifdef CDR_LOG
1880         CDR_LOG("cdrRead3() Log: CD3 Read: %x\n", psxHu8(0x1803));
1881 #endif
1882         return psxHu8(0x1803);
1883 }
1884
1885 void cdrWrite3(unsigned char rt) {
1886 #ifdef CDR_LOG
1887         CDR_LOG("cdrWrite3() Log: CD3 write: %x\n", rt);
1888 #endif
1889
1890         // Tekken: CDXA fade-out
1891         if( (cdr.Ctrl & 3) == 2 ) {
1892                 cdr.AttenuatorLeft[1] = rt;
1893         }
1894         else if( (cdr.Ctrl & 3) == 3 && rt == 0x20 ) {
1895 #ifdef CDR_LOG
1896                 CDR_LOG( "CD-XA Volume: %X %X | %X %X\n",
1897                         cdr.AttenuatorLeft[0], cdr.AttenuatorLeft[1],
1898                         cdr.AttenuatorRight[0], cdr.AttenuatorRight[1] );
1899 #endif
1900         }
1901
1902
1903         // GameShark CDX CD Player: Irq timing mania
1904         if( rt == 0 &&
1905                         cdr.Irq != 0 && cdr.Irq != 0xff &&
1906                         cdr.ResultReady == 0 ) {
1907
1908                 // GS CDX: ~0x28 cycle timing - way too precise
1909                 if( cdr.Irq == CdlGetlocP ) {
1910                         cdrInterrupt();
1911
1912                         psxRegs.interrupt &= ~(1 << PSXINT_CDR);
1913                 }
1914         }
1915
1916
1917         if (rt == 0x07 && cdr.Ctrl & 0x1) {
1918                 cdr.Stat = 0;
1919
1920                 if (cdr.Irq == 0xff) {
1921                         cdr.Irq = 0;
1922                         return;
1923                 }
1924
1925                 // XA streaming - incorrect timing because of this reschedule
1926                 // - Final Fantasy Tactics
1927                 // - various other games
1928
1929                 if (cdr.Reading && !cdr.ResultReady) {
1930                         int left = psxRegs.intCycle[PSXINT_CDREAD].sCycle + psxRegs.intCycle[PSXINT_CDREAD].cycle - psxRegs.cycle;
1931                         int time = (cdr.Mode & MODE_SPEED) ? (cdReadTime / 2) : cdReadTime;
1932                         if (Config.CdrReschedule != 2)
1933                         if (left < time / 2 || Config.CdrReschedule) { // rearmed guesswork hack
1934                                 //printf("-- resched %d -> %d\n", left, time);
1935                                 CDREAD_INT(time);
1936                         }
1937                 }
1938
1939                 return;
1940         }
1941
1942         if (rt == 0x80 && !(cdr.Ctrl & 0x1) && cdr.Readed == 0) {
1943                 cdr.Readed = 1;
1944                 cdr.pTransfer = cdr.Transfer;
1945
1946                 switch (cdr.Mode & 0x30) {
1947                         case MODE_SIZE_2328:
1948                         case 0x00:
1949                                 cdr.pTransfer += 12;
1950                                 break;
1951
1952                         case MODE_SIZE_2340:
1953                                 cdr.pTransfer += 0;
1954                                 break;
1955
1956                         default:
1957                                 break;
1958                 }
1959         }
1960 }
1961
1962 void psxDma3(u32 madr, u32 bcr, u32 chcr) {
1963         u32 cdsize;
1964         int size;
1965         u8 *ptr;
1966
1967 #ifdef CDR_LOG
1968         CDR_LOG("psxDma3() Log: *** DMA 3 *** %x addr = %x size = %x\n", chcr, madr, bcr);
1969 #endif
1970
1971         switch (chcr) {
1972                 case 0x11000000:
1973                 case 0x11400100:
1974                         if (cdr.Readed == 0) {
1975 #ifdef CDR_LOG
1976                                 CDR_LOG("psxDma3() Log: *** DMA 3 *** NOT READY\n");
1977 #endif
1978                                 break;
1979                         }
1980
1981                         cdsize = (bcr & 0xffff) * 4;
1982
1983                         // Ape Escape: bcr = 0001 / 0000
1984                         // - fix boot
1985                         if( cdsize == 0 )
1986                         {
1987                                 switch (cdr.Mode & 0x30) {
1988                                         case 0x00: cdsize = 2048; break;
1989                                         case MODE_SIZE_2328: cdsize = 2328; break;
1990                                         case MODE_SIZE_2340: cdsize = 2340; break;
1991                                 }
1992                         }
1993
1994
1995                         ptr = (u8 *)PSXM(madr);
1996                         if (ptr == NULL) {
1997 #ifdef CPU_LOG
1998                                 CDR_LOG("psxDma3() Log: *** DMA 3 *** NULL Pointer!\n");
1999 #endif
2000                                 break;
2001                         }
2002
2003                         /*
2004                         GS CDX: Enhancement CD crash
2005                         - Setloc 0:0:0
2006                         - CdlPlay
2007                         - Spams DMA3 and gets buffer overrun
2008                         */
2009                         size = CD_FRAMESIZE_RAW - (cdr.pTransfer - cdr.Transfer);
2010                         if (size > cdsize)
2011                                 size = cdsize;
2012                         if (size > 0)
2013                         {
2014                                 memcpy(ptr, cdr.pTransfer, size);
2015                         }
2016
2017                         psxCpu->Clear(madr, cdsize / 4);
2018                         cdr.pTransfer += cdsize;
2019
2020
2021                         // burst vs normal
2022                         if( chcr == 0x11400100 ) {
2023                                 CDRDMA_INT( (cdsize/4) / 4 );
2024                         }
2025                         else if( chcr == 0x11000000 ) {
2026                                 CDRDMA_INT( (cdsize/4) * 1 );
2027                         }
2028                         return;
2029
2030                 default:
2031 #ifdef CDR_LOG
2032                         CDR_LOG("psxDma3() Log: Unknown cddma %x\n", chcr);
2033 #endif
2034                         break;
2035         }
2036
2037         HW_DMA3_CHCR &= SWAP32(~0x01000000);
2038         DMA_INTERRUPT(3);
2039 }
2040
2041 void cdrDmaInterrupt()
2042 {
2043         if (HW_DMA3_CHCR & SWAP32(0x01000000))
2044         {
2045                 HW_DMA3_CHCR &= SWAP32(~0x01000000);
2046                 DMA_INTERRUPT(3);
2047         }
2048 }
2049
2050 void cdrReset() {
2051         memset(&cdr, 0, sizeof(cdr));
2052         cdr.CurTrack = 1;
2053         cdr.File = 1;
2054         cdr.Channel = 1;
2055
2056         // BIOS player - default values
2057         cdr.AttenuatorLeft[0] = 0x80;
2058         cdr.AttenuatorLeft[1] = 0x00;
2059         cdr.AttenuatorRight[0] = 0x80;
2060         cdr.AttenuatorRight[1] = 0x00;
2061 }
2062
2063 int cdrFreeze(gzFile f, int Mode) {
2064         uintptr_t tmp;
2065
2066
2067         if( Mode == 0 ) {
2068                 StopCdda();
2069         }
2070
2071         gzfreeze(&cdr, sizeof(cdr));
2072
2073         if (Mode == 1)
2074                 tmp = cdr.pTransfer - cdr.Transfer;
2075
2076         gzfreeze(&tmp, sizeof(tmp));
2077
2078         if (Mode == 0) {
2079                 cdr.pTransfer = cdr.Transfer + tmp;
2080
2081                 if (cdr.Play && !Config.Cdda)
2082                         CDR_play(cdr.SetSectorPlay);
2083         }
2084
2085         return 0;
2086 }
2087
2088 void LidInterrupt() {
2089         cdr.LidCheck = 0x20; // start checker
2090
2091         CDRLID_INT( cdReadTime * 3 );
2092
2093         // generate interrupt if none active - open or close
2094         if (cdr.Irq == 0 || cdr.Irq == 0xff) {
2095                 cdr.Ctrl |= 0x80;
2096                 cdr.Stat = NoIntr;
2097                 AddIrqQueue(CdlNop, 0x800);
2098         }
2099 }