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 /* logging */
  29 #if 0
  30 #define CDR_LOG SysPrintf
  31 #else
  32 #define CDR_LOG(...)
  33 #endif
  34 #if 0
  35 #define CDR_LOG_I SysPrintf
  36 #else
  37 #define CDR_LOG_I(...)
  38 #endif
  39 #if 0
  40 #define CDR_LOG_IO SysPrintf
  41 #else
  42 #define CDR_LOG_IO(...)
  43 #endif
  44 //#define CDR_LOG_CMD_IRQ
  45
  46 cdrStruct cdr;
  47 static unsigned char *pTransfer;
  48
  49 /* CD-ROM magic numbers */
  50 #define CdlSync        0
  51 #define CdlNop         1
  52 #define CdlSetloc      2
  53 #define CdlPlay        3
  54 #define CdlForward     4
  55 #define CdlBackward    5
  56 #define CdlReadN       6
  57 #define CdlStandby     7
  58 #define CdlStop        8
  59 #define CdlPause       9
  60 #define CdlInit        10
  61 #define CdlMute        11
  62 #define CdlDemute      12
  63 #define CdlSetfilter   13
  64 #define CdlSetmode     14
  65 #define CdlGetmode     15
  66 #define CdlGetlocL     16
  67 #define CdlGetlocP     17
  68 #define CdlReadT       18
  69 #define CdlGetTN       19
  70 #define CdlGetTD       20
  71 #define CdlSeekL       21
  72 #define CdlSeekP       22
  73 #define CdlSetclock    23
  74 #define CdlGetclock    24
  75 #define CdlTest        25
  76 #define CdlID          26
  77 #define CdlReadS       27
  78 #define CdlReset       28
  79 #define CdlReadToc     30
  80
  81 char *CmdName[0x100]= {
  82     "CdlSync",     "CdlNop",       "CdlSetloc",  "CdlPlay",
  83     "CdlForward",  "CdlBackward",  "CdlReadN",   "CdlStandby",
  84     "CdlStop",     "CdlPause",     "CdlInit",    "CdlMute",
  85     "CdlDemute",   "CdlSetfilter", "CdlSetmode", "CdlGetmode",
  86     "CdlGetlocL",  "CdlGetlocP",   "CdlReadT",   "CdlGetTN",
  87     "CdlGetTD",    "CdlSeekL",     "CdlSeekP",   "CdlSetclock",
  88     "CdlGetclock", "CdlTest",      "CdlID",      "CdlReadS",
  89     "CdlReset",    NULL,           "CDlReadToc", NULL
  90 };
  91
  92 unsigned char Test04[] = { 0 };
  93 unsigned char Test05[] = { 0 };
  94 unsigned char Test20[] = { 0x98, 0x06, 0x10, 0xC3 };
  95 unsigned char Test22[] = { 0x66, 0x6F, 0x72, 0x20, 0x45, 0x75, 0x72, 0x6F };
  96 unsigned char Test23[] = { 0x43, 0x58, 0x44, 0x32, 0x39 ,0x34, 0x30, 0x51 };
  97
  98 // cdr.Stat:
  99 #define NoIntr          0
 100 #define DataReady       1
 101 #define Complete        2
 102 #define Acknowledge     3
 103 #define DataEnd         4
 104 #define DiskError       5
 105
 106 /* Modes flags */
 107 #define MODE_SPEED       (1<<7) // 0x80
 108 #define MODE_STRSND      (1<<6) // 0x40 ADPCM on/off
 109 #define MODE_SIZE_2340   (1<<5) // 0x20
 110 #define MODE_SIZE_2328   (1<<4) // 0x10
 111 #define MODE_SF          (1<<3) // 0x08 channel on/off
 112 #define MODE_REPORT      (1<<2) // 0x04
 113 #define MODE_AUTOPAUSE   (1<<1) // 0x02
 114 #define MODE_CDDA        (1<<0) // 0x01
 115
 116 /* Status flags */
 117 #define STATUS_PLAY      (1<<7) // 0x80
 118 #define STATUS_SEEK      (1<<6) // 0x40
 119 #define STATUS_READ      (1<<5) // 0x20
 120 #define STATUS_SHELLOPEN (1<<4) // 0x10
 121 #define STATUS_UNKNOWN3  (1<<3) // 0x08
 122 #define STATUS_UNKNOWN2  (1<<2) // 0x04
 123 #define STATUS_ROTATING  (1<<1) // 0x02
 124 #define STATUS_ERROR     (1<<0) // 0x01
 125
 126
 127
 128 // 1x = 75 sectors per second
 129 // PSXCLK = 1 sec in the ps
 130 // so (PSXCLK / 75) = cdr read time (linuzappz)
 131 #define cdReadTime (PSXCLK / 75)
 132
 133 // for cdr.Seeked
 134 enum seeked_state {
 135         SEEK_PENDING = 0,
 136         SEEK_DONE = 1,
 137 };
 138
 139 static struct CdrStat stat;
 140
 141 static unsigned int msf2sec(const u8 *msf) {
 142         return ((msf[0] * 60 + msf[1]) * 75) + msf[2];
 143 }
 144
 145 // for that weird psemu API..
 146 static unsigned int fsm2sec(const u8 *msf) {
 147         return ((msf[2] * 60 + msf[1]) * 75) + msf[0];
 148 }
 149
 150 static void sec2msf(unsigned int s, u8 *msf) {
 151         msf[0] = s / 75 / 60;
 152         s = s - msf[0] * 75 * 60;
 153         msf[1] = s / 75;
 154         s = s - msf[1] * 75;
 155         msf[2] = s;
 156 }
 157
 158 // cdrInterrupt
 159 #define CDR_INT(eCycle) { \
 160         psxRegs.interrupt |= (1 << PSXINT_CDR); \
 161         psxRegs.intCycle[PSXINT_CDR].cycle = eCycle; \
 162         psxRegs.intCycle[PSXINT_CDR].sCycle = psxRegs.cycle; \
 163         new_dyna_set_event(PSXINT_CDR, eCycle); \
 164 }
 165
 166 // cdrReadInterrupt
 167 #define CDREAD_INT(eCycle) { \
 168         psxRegs.interrupt |= (1 << PSXINT_CDREAD); \
 169         psxRegs.intCycle[PSXINT_CDREAD].cycle = eCycle; \
 170         psxRegs.intCycle[PSXINT_CDREAD].sCycle = psxRegs.cycle; \
 171         new_dyna_set_event(PSXINT_CDREAD, eCycle); \
 172 }
 173
 174 // cdrLidSeekInterrupt
 175 #define CDRLID_INT(eCycle) { \
 176         psxRegs.interrupt |= (1 << PSXINT_CDRLID); \
 177         psxRegs.intCycle[PSXINT_CDRLID].cycle = eCycle; \
 178         psxRegs.intCycle[PSXINT_CDRLID].sCycle = psxRegs.cycle; \
 179         new_dyna_set_event(PSXINT_CDRLID, eCycle); \
 180 }
 181
 182 // cdrPlayInterrupt
 183 #define CDRMISC_INT(eCycle) { \
 184         psxRegs.interrupt |= (1 << PSXINT_CDRPLAY); \
 185         psxRegs.intCycle[PSXINT_CDRPLAY].cycle = eCycle; \
 186         psxRegs.intCycle[PSXINT_CDRPLAY].sCycle = psxRegs.cycle; \
 187         new_dyna_set_event(PSXINT_CDRPLAY, eCycle); \
 188 }
 189
 190 #define StopReading() { \
 191         if (cdr.Reading) { \
 192                 cdr.Reading = 0; \
 193                 psxRegs.interrupt &= ~(1 << PSXINT_CDREAD); \
 194         } \
 195         cdr.StatP &= ~STATUS_READ;\
 196 }
 197
 198 #define StopCdda() { \
 199         if (cdr.Play) { \
 200                 if (!Config.Cdda) CDR_stop(); \
 201                 cdr.StatP &= ~STATUS_PLAY; \
 202                 cdr.Play = FALSE; \
 203                 cdr.FastForward = 0; \
 204                 cdr.FastBackward = 0; \
 205                 /*SPU_registerCallback( SPUirq );*/ \
 206         } \
 207 }
 208
 209 #define SetResultSize(size) { \
 210         cdr.ResultP = 0; \
 211         cdr.ResultC = size; \
 212         cdr.ResultReady = 1; \
 213 }
 214
 215 static void setIrq(void)
 216 {
 217         if (cdr.Stat & cdr.Reg2)
 218                 psxHu32ref(0x1070) |= SWAP32((u32)0x4);
 219 }
 220
 221 void cdrLidSeekInterrupt()
 222 {
 223         // turn back on checking
 224         if( cdr.LidCheck == 0x10 )
 225         {
 226                 cdr.LidCheck = 0;
 227         }
 228
 229         // official lid close
 230         else if( cdr.LidCheck == 0x30 )
 231         {
 232                 // GS CDX 3.3: $13
 233                 cdr.StatP |= STATUS_ROTATING;
 234
 235
 236                 // GS CDX 3.3 - ~50 getlocp tries
 237                 CDRLID_INT( cdReadTime * 3 );
 238                 cdr.LidCheck = 0x40;
 239         }
 240
 241         // turn off ready
 242         else if( cdr.LidCheck == 0x40 )
 243         {
 244                 // GS CDX 3.3: $01
 245                 cdr.StatP &= ~STATUS_SHELLOPEN;
 246                 cdr.StatP &= ~STATUS_ROTATING;
 247
 248
 249                 // GS CDX 3.3 - ~50 getlocp tries
 250                 CDRLID_INT( cdReadTime * 3 );
 251                 cdr.LidCheck = 0x50;
 252         }
 253
 254         // now seek
 255         else if( cdr.LidCheck == 0x50 )
 256         {
 257                 // GameShark Lite: Start seeking ($42)
 258                 cdr.StatP |= STATUS_SEEK;
 259                 cdr.StatP |= STATUS_ROTATING;
 260                 cdr.StatP &= ~STATUS_ERROR;
 261
 262
 263                 CDRLID_INT( cdReadTime * 3 );
 264                 cdr.LidCheck = 0x60;
 265         }
 266
 267         // done = cd ready
 268         else if( cdr.LidCheck == 0x60 )
 269         {
 270                 // GameShark Lite: Seek detection done ($02)
 271                 cdr.StatP &= ~STATUS_SEEK;
 272
 273                 cdr.LidCheck = 0;
 274         }
 275 }
 276
 277 static void Check_Shell( int Irq )
 278 {
 279         // check case open/close
 280         if (cdr.LidCheck > 0)
 281         {
 282                 CDR_LOG( "LidCheck\n" );
 283
 284                 // $20 = check lid state
 285                 if( cdr.LidCheck == 0x20 )
 286                 {
 287                         u32 i;
 288
 289                         i = stat.Status;
 290                         if (CDR_getStatus(&stat) != -1)
 291                         {
 292                                 // BIOS hangs + BIOS error messages
 293                                 //if (stat.Type == 0xff)
 294                                         //cdr.Stat = DiskError;
 295
 296                                 // case now open
 297                                 if (stat.Status & STATUS_SHELLOPEN)
 298                                 {
 299                                         // Vib Ribbon: pre-CD swap
 300                                         StopCdda();
 301
 302
 303                                         // GameShark Lite: Death if DiskError happens
 304                                         //
 305                                         // Vib Ribbon: Needs DiskError for CD swap
 306
 307                                         if (Irq != CdlNop)
 308                                         {
 309                                                 cdr.Stat = DiskError;
 310
 311                                                 cdr.StatP |= STATUS_ERROR;
 312                                                 cdr.Result[0] |= STATUS_ERROR;
 313                                         }
 314
 315                                         // GameShark Lite: Wants -exactly- $10
 316                                         cdr.StatP |= STATUS_SHELLOPEN;
 317                                         cdr.StatP &= ~STATUS_ROTATING;
 318
 319
 320                                         CDRLID_INT( cdReadTime * 3 );
 321                                         cdr.LidCheck = 0x10;
 322
 323
 324                                         // GS CDX 3.3 = $11
 325                                 }
 326
 327                                 // case just closed
 328                                 else if ( i & STATUS_SHELLOPEN )
 329                                 {
 330                                         cdr.StatP |= STATUS_ROTATING;
 331
 332                                         CheckCdrom();
 333
 334
 335                                         if( cdr.Stat == NoIntr )
 336                                                 cdr.Stat = Acknowledge;
 337
 338                                         setIrq();
 339
 340                                         // begin close-seek-ready cycle
 341                                         CDRLID_INT( cdReadTime * 3 );
 342                                         cdr.LidCheck = 0x30;
 343
 344
 345                                         // GameShark Lite: Wants -exactly- $42, then $02
 346                                         // GS CDX 3.3: Wants $11/$80, $13/$80, $01/$00
 347                                 }
 348
 349                                 // case still closed - wait for recheck
 350                                 else
 351                                 {
 352                                         CDRLID_INT( cdReadTime * 3 );
 353                                         cdr.LidCheck = 0x10;
 354                                 }
 355                         }
 356                 }
 357
 358
 359                 // GS CDX: clear all values but #1,#2
 360                 if( (cdr.LidCheck >= 0x30) || (cdr.StatP & STATUS_SHELLOPEN) )
 361                 {
 362                         SetResultSize(16);
 363                         memset( cdr.Result, 0, 16 );
 364
 365                         cdr.Result[0] = cdr.StatP;
 366
 367
 368                         // GS CDX: special return value
 369                         if( cdr.StatP & STATUS_SHELLOPEN )
 370                         {
 371                                 cdr.Result[1] = 0x80;
 372                         }
 373
 374
 375                         if( cdr.Stat == NoIntr )
 376                                 cdr.Stat = Acknowledge;
 377
 378                         setIrq();
 379                 }
 380         }
 381 }
 382
 383 static void Find_CurTrack(const u8 *time)
 384 {
 385         int current, sect;
 386
 387         current = msf2sec(time);
 388
 389         for (cdr.CurTrack = 1; cdr.CurTrack < cdr.ResultTN[1]; cdr.CurTrack++) {
 390                 CDR_getTD(cdr.CurTrack + 1, cdr.ResultTD);
 391                 sect = fsm2sec(cdr.ResultTD);
 392                 if (sect - current >= 150)
 393                         break;
 394         }
 395 }
 396
 397 static void generate_subq(const u8 *time)
 398 {
 399         unsigned char start[3], next[3];
 400         unsigned int this_s, start_s, next_s, pregap;
 401         int relative_s;
 402
 403         CDR_getTD(cdr.CurTrack, start);
 404         if (cdr.CurTrack + 1 <= cdr.ResultTN[1]) {
 405                 pregap = 150;
 406                 CDR_getTD(cdr.CurTrack + 1, next);
 407         }
 408         else {
 409                 // last track - cd size
 410                 pregap = 0;
 411                 next[0] = cdr.SetSectorEnd[2];
 412                 next[1] = cdr.SetSectorEnd[1];
 413                 next[2] = cdr.SetSectorEnd[0];
 414         }
 415
 416         this_s = msf2sec(time);
 417         start_s = fsm2sec(start);
 418         next_s = fsm2sec(next);
 419
 420         cdr.TrackChanged = FALSE;
 421
 422         if (next_s - this_s < pregap) {
 423                 cdr.TrackChanged = TRUE;
 424                 cdr.CurTrack++;
 425                 start_s = next_s;
 426         }
 427
 428         cdr.subq.Index = 1;
 429
 430         relative_s = this_s - start_s;
 431         if (relative_s < 0) {
 432                 cdr.subq.Index = 0;
 433                 relative_s = -relative_s;
 434         }
 435         sec2msf(relative_s, cdr.subq.Relative);
 436
 437         cdr.subq.Track = itob(cdr.CurTrack);
 438         cdr.subq.Relative[0] = itob(cdr.subq.Relative[0]);
 439         cdr.subq.Relative[1] = itob(cdr.subq.Relative[1]);
 440         cdr.subq.Relative[2] = itob(cdr.subq.Relative[2]);
 441         cdr.subq.Absolute[0] = itob(time[0]);
 442         cdr.subq.Absolute[1] = itob(time[1]);
 443         cdr.subq.Absolute[2] = itob(time[2]);
 444 }
 445
 446 static void ReadTrack(const u8 *time) {
 447         unsigned char tmp[3];
 448         struct SubQ *subq;
 449         u16 crc;
 450
 451         tmp[0] = itob(time[0]);
 452         tmp[1] = itob(time[1]);
 453         tmp[2] = itob(time[2]);
 454
 455         if (memcmp(cdr.Prev, tmp, 3) == 0)
 456                 return;
 457
 458         CDR_LOG("ReadTrack *** %02x:%02x:%02x\n", tmp[0], tmp[1], tmp[2]);
 459
 460         cdr.RErr = CDR_readTrack(tmp);
 461         memcpy(cdr.Prev, tmp, 3);
 462
 463         if (CheckSBI(time))
 464                 return;
 465
 466         subq = (struct SubQ *)CDR_getBufferSub();
 467         if (subq != NULL && cdr.CurTrack == 1) {
 468                 crc = calcCrc((u8 *)subq + 12, 10);
 469                 if (crc == (((u16)subq->CRC[0] << 8) | subq->CRC[1])) {
 470                         cdr.subq.Track = subq->TrackNumber;
 471                         cdr.subq.Index = subq->IndexNumber;
 472                         memcpy(cdr.subq.Relative, subq->TrackRelativeAddress, 3);
 473                         memcpy(cdr.subq.Absolute, subq->AbsoluteAddress, 3);
 474                 }
 475                 else {
 476                         CDR_LOG_I("subq bad crc @%02x:%02x:%02x\n",
 477                                 tmp[0], tmp[1], tmp[2]);
 478                 }
 479         }
 480         else {
 481                 generate_subq(time);
 482         }
 483
 484         CDR_LOG(" -> %02x,%02x %02x:%02x:%02x %02x:%02x:%02x\n",
 485                 cdr.subq.Track, cdr.subq.Index,
 486                 cdr.subq.Relative[0], cdr.subq.Relative[1], cdr.subq.Relative[2],
 487                 cdr.subq.Absolute[0], cdr.subq.Absolute[1], cdr.subq.Absolute[2]);
 488 }
 489
 490 static void AddIrqQueue(unsigned char irq, unsigned long ecycle) {
 491         if (cdr.Irq != 0)
 492                 CDR_LOG_I("cdr: override cmd %02x -> %02x\n", cdr.Irq, irq);
 493
 494         cdr.Irq = irq;
 495         cdr.eCycle = ecycle;
 496
 497         CDR_INT(ecycle);
 498 }
 499
 500 static void cdrPlayInterrupt_Autopause()
 501 {
 502         if ((cdr.Mode & MODE_AUTOPAUSE) && cdr.TrackChanged) {
 503                 CDR_LOG( "CDDA STOP\n" );
 504
 505                 // Magic the Gathering
 506                 // - looping territory cdda
 507
 508                 // ...?
 509                 //cdr.ResultReady = 1;
 510                 //cdr.Stat = DataReady;
 511                 cdr.Stat = DataEnd;
 512                 setIrq();
 513
 514                 StopCdda();
 515         }
 516         else if (cdr.Mode & MODE_REPORT) {
 517
 518                 cdr.Result[0] = cdr.StatP;
 519                 cdr.Result[1] = cdr.subq.Track;
 520                 cdr.Result[2] = cdr.subq.Index;
 521
 522                 if (cdr.subq.Absolute[2] & 0x10) {
 523                         cdr.Result[3] = cdr.subq.Relative[0];
 524                         cdr.Result[4] = cdr.subq.Relative[1] | 0x80;
 525                         cdr.Result[5] = cdr.subq.Relative[2];
 526                 }
 527                 else {
 528                         cdr.Result[3] = cdr.subq.Absolute[0];
 529                         cdr.Result[4] = cdr.subq.Absolute[1];
 530                         cdr.Result[5] = cdr.subq.Absolute[2];
 531                 }
 532
 533                 cdr.Result[6] = 0;
 534                 cdr.Result[7] = 0;
 535
 536                 // Rayman: Logo freeze (resultready + dataready)
 537                 cdr.ResultReady = 1;
 538                 cdr.Stat = DataReady;
 539
 540                 SetResultSize(8);
 541                 setIrq();
 542         }
 543 }
 544
 545 // also handles seek
 546 void cdrPlayInterrupt()
 547 {
 548         if (cdr.Seeked == SEEK_PENDING) {
 549                 if (cdr.Stat) {
 550                         CDR_LOG_I("cdrom: seek stat hack\n");
 551                         CDRMISC_INT(0x1000);
 552                         return;
 553                 }
 554                 SetResultSize(1);
 555                 cdr.StatP |= STATUS_ROTATING;
 556                 cdr.StatP &= ~STATUS_SEEK;
 557                 cdr.Result[0] = cdr.StatP;
 558                 cdr.Seeked = SEEK_DONE;
 559                 if (cdr.Irq == 0) {
 560                         cdr.Stat = Complete;
 561                         setIrq();
 562                 }
 563
 564                 memcpy(cdr.SetSectorPlay, cdr.SetSector, 4);
 565                 Find_CurTrack(cdr.SetSectorPlay);
 566                 ReadTrack(cdr.SetSectorPlay);
 567                 cdr.TrackChanged = FALSE;
 568         }
 569
 570         if (!cdr.Play) return;
 571
 572         CDR_LOG( "CDDA - %d:%d:%d\n",
 573                 cdr.SetSectorPlay[0], cdr.SetSectorPlay[1], cdr.SetSectorPlay[2] );
 574
 575         if (memcmp(cdr.SetSectorPlay, cdr.SetSectorEnd, 3) == 0) {
 576                 StopCdda();
 577                 cdr.TrackChanged = TRUE;
 578         }
 579
 580         if (!cdr.Irq && !cdr.Stat && (cdr.Mode & (MODE_AUTOPAUSE|MODE_REPORT)))
 581                 cdrPlayInterrupt_Autopause();
 582
 583         if (!cdr.Play) return;
 584
 585         cdr.SetSectorPlay[2]++;
 586         if (cdr.SetSectorPlay[2] == 75) {
 587                 cdr.SetSectorPlay[2] = 0;
 588                 cdr.SetSectorPlay[1]++;
 589                 if (cdr.SetSectorPlay[1] == 60) {
 590                         cdr.SetSectorPlay[1] = 0;
 591                         cdr.SetSectorPlay[0]++;
 592                 }
 593         }
 594
 595         CDRMISC_INT(cdReadTime);
 596
 597         // update for CdlGetlocP/autopause
 598         generate_subq(cdr.SetSectorPlay);
 599 }
 600
 601 void cdrInterrupt() {
 602         int i;
 603         unsigned char Irq = cdr.Irq;
 604
 605         // Reschedule IRQ
 606         if (cdr.Stat) {
 607                 CDR_LOG_I("cdrom: stat hack: %02x %x\n", cdr.Irq, cdr.Stat);
 608                 CDR_INT(0x1000);
 609                 return;
 610         }
 611
 612         cdr.Irq = 0;
 613         cdr.Ctrl &= ~0x80;
 614
 615         switch (Irq) {
 616                 case CdlSync:
 617                         SetResultSize(1);
 618                         cdr.StatP |= STATUS_ROTATING;
 619                         cdr.Result[0] = cdr.StatP;
 620                         cdr.Stat = Acknowledge;
 621                         break;
 622
 623                 case CdlNop:
 624                         SetResultSize(1);
 625                         cdr.Result[0] = cdr.StatP;
 626                         cdr.Stat = Acknowledge;
 627
 628                         if (cdr.LidCheck == 0) cdr.LidCheck = 0x20;
 629                         break;
 630
 631                 case CdlSetloc:
 632                         cdr.CmdProcess = 0;
 633                         SetResultSize(1);
 634                         cdr.StatP |= STATUS_ROTATING;
 635                         cdr.Result[0] = cdr.StatP;
 636                         cdr.Stat = Acknowledge;
 637                         break;
 638
 639                 case CdlPlay:
 640                         if (cdr.Seeked == SEEK_PENDING) {
 641                                 // XXX: wrong, should seek instead..
 642                                 memcpy( cdr.SetSectorPlay, cdr.SetSector, 4 );
 643                                 cdr.Seeked = SEEK_DONE;
 644                         }
 645
 646                         // BIOS CD Player
 647                         // - Pause player, hit Track 01/02/../xx (Setloc issued!!)
 648
 649                         if (cdr.ParamC == 0 || cdr.Param[0] == 0) {
 650                                 CDR_LOG("PLAY Resume @ %d:%d:%d\n",
 651                                         cdr.SetSectorPlay[0], cdr.SetSectorPlay[1], cdr.SetSectorPlay[2]);
 652                         }
 653                         else
 654                         {
 655                                 int track = btoi( cdr.Param[0] );
 656
 657                                 if (track <= cdr.ResultTN[1])
 658                                         cdr.CurTrack = track;
 659
 660                                 CDR_LOG("PLAY track %d\n", cdr.CurTrack);
 661
 662                                 if (CDR_getTD((u8)cdr.CurTrack, cdr.ResultTD) != -1) {
 663                                         cdr.SetSectorPlay[0] = cdr.ResultTD[2];
 664                                         cdr.SetSectorPlay[1] = cdr.ResultTD[1];
 665                                         cdr.SetSectorPlay[2] = cdr.ResultTD[0];
 666                                 }
 667                         }
 668
 669                         /*
 670                         Rayman: detect track changes
 671                         - fixes logo freeze
 672
 673                         Twisted Metal 2: skip PREGAP + starting accurate SubQ
 674                         - plays tracks without retry play
 675
 676                         Wild 9: skip PREGAP + starting accurate SubQ
 677                         - plays tracks without retry play
 678                         */
 679                         Find_CurTrack(cdr.SetSectorPlay);
 680                         ReadTrack(cdr.SetSectorPlay);
 681                         cdr.TrackChanged = FALSE;
 682
 683                         if (!Config.Cdda)
 684                                 CDR_play(cdr.SetSectorPlay);
 685
 686                         // Vib Ribbon: gameplay checks flag
 687                         cdr.StatP &= ~STATUS_SEEK;
 688
 689                         cdr.CmdProcess = 0;
 690                         SetResultSize(1);
 691                         cdr.StatP |= STATUS_ROTATING;
 692                         cdr.Result[0] = cdr.StatP;
 693                         cdr.Stat = Acknowledge;
 694
 695                         cdr.StatP |= STATUS_PLAY;
 696
 697
 698                         // BIOS player - set flag again
 699                         cdr.Play = TRUE;
 700
 701                         CDRMISC_INT( cdReadTime );
 702                         break;
 703
 704                 case CdlForward:
 705                         cdr.CmdProcess = 0;
 706                         SetResultSize(1);
 707                         cdr.StatP |= STATUS_ROTATING;
 708                         cdr.Result[0] = cdr.StatP;
 709                         cdr.Stat = Complete;
 710
 711
 712                         // GameShark CD Player: Calls 2x + Play 2x
 713                         if( cdr.FastForward == 0 ) cdr.FastForward = 2;
 714                         else cdr.FastForward++;
 715
 716                         cdr.FastBackward = 0;
 717                         break;
 718
 719                 case CdlBackward:
 720                         cdr.CmdProcess = 0;
 721                         SetResultSize(1);
 722                         cdr.StatP |= STATUS_ROTATING;
 723                         cdr.Result[0] = cdr.StatP;
 724                         cdr.Stat = Complete;
 725
 726
 727                         // GameShark CD Player: Calls 2x + Play 2x
 728                         if( cdr.FastBackward == 0 ) cdr.FastBackward = 2;
 729                         else cdr.FastBackward++;
 730
 731                         cdr.FastForward = 0;
 732                         break;
 733
 734                 case CdlStandby:
 735                         cdr.CmdProcess = 0;
 736                         SetResultSize(1);
 737                         cdr.StatP |= STATUS_ROTATING;
 738                         cdr.Result[0] = cdr.StatP;
 739                         cdr.Stat = Complete;
 740                         break;
 741
 742                 case CdlStop:
 743                         cdr.CmdProcess = 0;
 744                         SetResultSize(1);
 745                         cdr.StatP &= ~STATUS_ROTATING;
 746                         cdr.Result[0] = cdr.StatP;
 747                         cdr.Stat = Complete;
 748 //                      cdr.Stat = Acknowledge;
 749
 750                         if (cdr.LidCheck == 0) cdr.LidCheck = 0x20;
 751                         break;
 752
 753                 case CdlPause:
 754                         SetResultSize(1);
 755                         cdr.Result[0] = cdr.StatP;
 756                         cdr.Stat = Acknowledge;
 757
 758                         /*
 759                         Gundam Battle Assault 2: much slower (*)
 760                         - Fixes boot, gameplay
 761
 762                         Hokuto no Ken 2: slower
 763                         - Fixes intro + subtitles
 764
 765                         InuYasha - Feudal Fairy Tale: slower
 766                         - Fixes battles
 767                         */
 768                         AddIrqQueue(CdlPause + 0x20, cdReadTime * 3);
 769                         cdr.Ctrl |= 0x80;
 770                         break;
 771
 772                 case CdlPause + 0x20:
 773                         SetResultSize(1);
 774                         cdr.StatP &= ~STATUS_READ;
 775                         cdr.StatP |= STATUS_ROTATING;
 776                         cdr.Result[0] = cdr.StatP;
 777                         cdr.Stat = Complete;
 778                         break;
 779
 780                 case CdlInit:
 781                         SetResultSize(1);
 782                         cdr.StatP = STATUS_ROTATING;
 783                         cdr.Result[0] = cdr.StatP;
 784                         cdr.Stat = Acknowledge;
 785 //                      if (!cdr.Init) {
 786                                 AddIrqQueue(CdlInit + 0x20, 0x800);
 787 //                      }
 788                 break;
 789
 790                 case CdlInit + 0x20:
 791                         SetResultSize(1);
 792                         cdr.Result[0] = cdr.StatP;
 793                         cdr.Stat = Complete;
 794                         cdr.Init = 1;
 795                         break;
 796
 797                 case CdlMute:
 798                         SetResultSize(1);
 799                         cdr.StatP |= STATUS_ROTATING;
 800                         cdr.Result[0] = cdr.StatP;
 801                         cdr.Stat = Acknowledge;
 802                         break;
 803
 804                 case CdlDemute:
 805                         SetResultSize(1);
 806                         cdr.StatP |= STATUS_ROTATING;
 807                         cdr.Result[0] = cdr.StatP;
 808                         cdr.Stat = Acknowledge;
 809                         break;
 810
 811                 case CdlSetfilter:
 812                         SetResultSize(1);
 813                         cdr.StatP |= STATUS_ROTATING;
 814                         cdr.Result[0] = cdr.StatP;
 815                         cdr.Stat = Acknowledge;
 816                         break;
 817
 818                 case CdlSetmode:
 819                         SetResultSize(1);
 820                         cdr.StatP |= STATUS_ROTATING;
 821                         cdr.Result[0] = cdr.StatP;
 822                         cdr.Stat = Acknowledge;
 823                         break;
 824
 825                 case CdlGetmode:
 826                         SetResultSize(6);
 827                         cdr.StatP |= STATUS_ROTATING;
 828                         cdr.Result[0] = cdr.StatP;
 829                         cdr.Result[1] = cdr.Mode;
 830                         cdr.Result[2] = cdr.File;
 831                         cdr.Result[3] = cdr.Channel;
 832                         cdr.Result[4] = 0;
 833                         cdr.Result[5] = 0;
 834                         cdr.Stat = Acknowledge;
 835                         break;
 836
 837                 case CdlGetlocL:
 838                         SetResultSize(8);
 839                         for (i = 0; i < 8; i++)
 840                                 cdr.Result[i] = cdr.Transfer[i];
 841                         cdr.Stat = Acknowledge;
 842                         break;
 843
 844                 case CdlGetlocP:
 845                         SetResultSize(8);
 846                         memcpy(&cdr.Result, &cdr.subq, 8);
 847
 848                         if (!cdr.Play && !cdr.Reading)
 849                                 cdr.Result[1] = 0; // HACK?
 850
 851                         cdr.Stat = Acknowledge;
 852                         break;
 853
 854                 case CdlGetTN:
 855                         // 5-Star Racing: don't stop CDDA
 856                         //
 857                         // Vib Ribbon: CD swap
 858                         StopReading();
 859
 860                         cdr.CmdProcess = 0;
 861                         SetResultSize(3);
 862                         cdr.StatP |= STATUS_ROTATING;
 863                         cdr.Result[0] = cdr.StatP;
 864                         if (CDR_getTN(cdr.ResultTN) == -1) {
 865                                 cdr.Stat = DiskError;
 866                                 cdr.Result[0] |= STATUS_ERROR;
 867                         } else {
 868                                 cdr.Stat = Acknowledge;
 869                                 cdr.Result[1] = itob(cdr.ResultTN[0]);
 870                                 cdr.Result[2] = itob(cdr.ResultTN[1]);
 871                         }
 872                         break;
 873
 874                 case CdlGetTD:
 875                         cdr.CmdProcess = 0;
 876                         cdr.Track = btoi(cdr.Param[0]);
 877                         SetResultSize(4);
 878                         cdr.StatP |= STATUS_ROTATING;
 879                         if (CDR_getTD(cdr.Track, cdr.ResultTD) == -1) {
 880                                 cdr.Stat = DiskError;
 881                                 cdr.Result[0] |= STATUS_ERROR;
 882                         } else {
 883                                 cdr.Stat = Acknowledge;
 884                                 cdr.Result[0] = cdr.StatP;
 885                                 cdr.Result[1] = itob(cdr.ResultTD[2]);
 886                                 cdr.Result[2] = itob(cdr.ResultTD[1]);
 887                                 cdr.Result[3] = itob(cdr.ResultTD[0]);
 888                         }
 889                         break;
 890
 891                 case CdlSeekL:
 892                 case CdlSeekP:
 893                         SetResultSize(1);
 894                         cdr.StatP |= STATUS_ROTATING;
 895                         cdr.Result[0] = cdr.StatP;
 896                         cdr.StatP |= STATUS_SEEK;
 897                         cdr.Stat = Acknowledge;
 898
 899                         /*
 900                         Crusaders of Might and Magic = 0.5x-4x
 901                         - fix cutscene speech start
 902
 903                         Eggs of Steel = 2x-?
 904                         - fix new game
 905
 906                         Medievil = ?-4x
 907                         - fix cutscene speech
 908
 909                         Rockman X5 = 0.5-4x
 910                         - fix capcom logo
 911                         */
 912                         CDRMISC_INT(cdr.Seeked == SEEK_DONE ? 0x800 : cdReadTime * 4);
 913                         cdr.Seeked = SEEK_PENDING;
 914                         break;
 915
 916                 case CdlTest:
 917                         cdr.Stat = Acknowledge;
 918                         switch (cdr.Param[0]) {
 919                                 case 0x20: // System Controller ROM Version
 920                                         SetResultSize(4);
 921                                         memcpy(cdr.Result, Test20, 4);
 922                                         break;
 923                                 case 0x22:
 924                                         SetResultSize(8);
 925                                         memcpy(cdr.Result, Test22, 4);
 926                                         break;
 927                                 case 0x23: case 0x24:
 928                                         SetResultSize(8);
 929                                         memcpy(cdr.Result, Test23, 4);
 930                                         break;
 931                         }
 932                         break;
 933
 934                 case CdlID:
 935                         SetResultSize(1);
 936                         cdr.StatP |= STATUS_ROTATING;
 937                         cdr.Result[0] = cdr.StatP;
 938                         cdr.Stat = Acknowledge;
 939                         AddIrqQueue(CdlID + 0x20, 0x800);
 940                         break;
 941
 942                 case CdlID + 0x20:
 943                         SetResultSize(8);
 944
 945                         if (CDR_getStatus(&stat) == -1) {
 946                                 cdr.Result[0] = 0x00; // 0x08 and cdr.Result[1]|0x10 : audio cd, enters cd player
 947                                 cdr.Result[1] = 0x80; // 0x80 leads to the menu in the bios, else loads CD
 948                         }
 949                         else {
 950                                 if (stat.Type == 2) {
 951                                         // Music CD
 952                                         cdr.Result[0] = 0x08;
 953                                         cdr.Result[1] = 0x10;
 954
 955                                         cdr.Result[1] |= 0x80;
 956                                 }
 957                                 else {
 958                                         // Data CD
 959                                         if (CdromId[0] == '\0') {
 960                                                 cdr.Result[0] = 0x00;
 961                                                 cdr.Result[1] = 0x80;
 962                                         }
 963                                         else {
 964                                                 cdr.Result[0] = 0x08;
 965                                                 cdr.Result[1] = 0x00;
 966                                         }
 967                                 }
 968                         }
 969
 970                         cdr.Result[2] = 0x00;
 971                         cdr.Result[3] = 0x00;
 972                         strncpy((char *)&cdr.Result[4], "PCSX", 4);
 973                         cdr.Stat = Complete;
 974                         break;
 975
 976                 case CdlReset:
 977                         SetResultSize(1);
 978                         cdr.StatP = STATUS_ROTATING;
 979                         cdr.Result[0] = cdr.StatP;
 980                         cdr.Stat = Acknowledge;
 981                         break;
 982
 983                 case CdlReadT:
 984                         SetResultSize(1);
 985                         cdr.StatP |= STATUS_ROTATING;
 986                         cdr.Result[0] = cdr.StatP;
 987                         cdr.Stat = Acknowledge;
 988                         AddIrqQueue(CdlReadT + 0x20, 0x800);
 989                         break;
 990
 991                 case CdlReadT + 0x20:
 992                         SetResultSize(1);
 993                         cdr.StatP |= STATUS_ROTATING;
 994                         cdr.Result[0] = cdr.StatP;
 995                         cdr.Stat = Complete;
 996                         break;
 997
 998                 case CdlReadToc:
 999                         SetResultSize(1);
1000                         cdr.StatP |= STATUS_ROTATING;
1001                         cdr.Result[0] = cdr.StatP;
1002                         cdr.Stat = Acknowledge;
1003                         AddIrqQueue(CdlReadToc + 0x20, 0x800);
1004                         break;
1005
1006                 case CdlReadToc + 0x20:
1007                         SetResultSize(1);
1008                         cdr.StatP |= STATUS_ROTATING;
1009                         cdr.Result[0] = cdr.StatP;
1010                         cdr.Stat = Complete;
1011                         break;
1012
1013                 case CdlReadN:
1014                 case CdlReadS:
1015                         if (!cdr.Reading) return;
1016
1017                         // Fighting Force 2 - update subq time immediately
1018                         // - fixes new game
1019                         Find_CurTrack(cdr.SetSector);
1020                         ReadTrack(cdr.SetSector);
1021
1022
1023                         // Crusaders of Might and Magic - update getlocl now
1024                         // - fixes cutscene speech
1025                         {
1026                                 u8 *buf = CDR_getBuffer();
1027                                 if (buf != NULL)
1028                                         memcpy(cdr.Transfer, buf, 8);
1029                         }
1030
1031                         /*
1032                         Duke Nukem: Land of the Babes - seek then delay read for one frame
1033                         - fixes cutscenes
1034                         C-12 - Final Resistance - doesn't like seek
1035                         */
1036
1037                         if (cdr.Seeked != SEEK_DONE) {
1038                                 cdr.StatP |= STATUS_SEEK;
1039                                 cdr.StatP &= ~STATUS_READ;
1040
1041                                 // Crusaders of Might and Magic - use short time
1042                                 // - fix cutscene speech (startup)
1043
1044                                 // ??? - use more accurate seek time later
1045                                 CDREAD_INT((cdr.Mode & 0x80) ? (cdReadTime / 2) : cdReadTime * 1);
1046                         } else {
1047                                 cdr.StatP |= STATUS_READ;
1048                                 cdr.StatP &= ~STATUS_SEEK;
1049
1050                                 CDREAD_INT((cdr.Mode & 0x80) ? (cdReadTime / 2) : cdReadTime * 1);
1051                         }
1052
1053                         SetResultSize(1);
1054                         cdr.StatP |= STATUS_ROTATING;
1055                         cdr.Result[0] = cdr.StatP;
1056                         cdr.Stat = Acknowledge;
1057                         break;
1058
1059                 default:
1060                         cdr.Stat = Complete;
1061                         break;
1062         }
1063
1064         Check_Shell( Irq );
1065
1066         cdr.ParamC = 0;
1067
1068         setIrq();
1069
1070 #ifdef CDR_LOG_CMD_IRQ
1071         SysPrintf("cdrInterrupt() Log: CDR Interrupt IRQ %d %02x: ",
1072                 cdr.Stat != NoIntr && cdr.Reg2 != 0x18, Irq);
1073         for (i = 0; i < cdr.ResultC; i++)
1074                 SysPrintf("%02x ", cdr.Result[i]);
1075         SysPrintf("\n");
1076 #endif
1077 }
1078
1079 #ifdef __ARM_ARCH_7A__
1080  #define ssat32_to_16(v) \
1081   asm("ssat %0,#16,%1" : "=r" (v) : "r" (v))
1082 #else
1083  #define ssat32_to_16(v) do { \
1084   if (v < -32768) v = -32768; \
1085   else if (v > 32767) v = 32767; \
1086  } while (0)
1087 #endif
1088
1089 void cdrAttenuate(s16 *buf, int samples, int stereo)
1090 {
1091         int i, l, r;
1092         int ll = cdr.AttenuatorLeftToLeft;
1093         int lr = cdr.AttenuatorLeftToRight;
1094         int rl = cdr.AttenuatorRightToLeft;
1095         int rr = cdr.AttenuatorRightToRight;
1096
1097         if (lr == 0 && rl == 0 && 0x78 <= ll && ll <= 0x88 && 0x78 <= rr && rr <= 0x88)
1098                 return;
1099
1100         if (!stereo && ll == 0x40 && lr == 0x40 && rl == 0x40 && rr == 0x40)
1101                 return;
1102
1103         if (stereo) {
1104                 for (i = 0; i < samples; i++) {
1105                         l = buf[i * 2];
1106                         r = buf[i * 2 + 1];
1107                         l = (l * ll + r * rl) >> 7;
1108                         r = (r * rr + l * lr) >> 7;
1109                         ssat32_to_16(l);
1110                         ssat32_to_16(r);
1111                         buf[i * 2] = l;
1112                         buf[i * 2 + 1] = r;
1113                 }
1114         }
1115         else {
1116                 for (i = 0; i < samples; i++) {
1117                         l = buf[i];
1118                         l = l * (ll + rl) >> 7;
1119                         //r = r * (rr + lr) >> 7;
1120                         ssat32_to_16(l);
1121                         //ssat32_to_16(r);
1122                         buf[i] = l;
1123                 }
1124         }
1125 }
1126
1127 void cdrReadInterrupt() {
1128         u8 *buf;
1129
1130         if (!cdr.Reading)
1131                 return;
1132
1133         if (cdr.Irq || cdr.Stat) {
1134                 CDR_LOG_I("cdrom: read stat hack %02x %x\n", cdr.Irq, cdr.Stat);
1135                 CDREAD_INT(0x1000);
1136                 return;
1137         }
1138
1139         cdr.OCUP = 1;
1140         SetResultSize(1);
1141         cdr.StatP |= STATUS_READ|STATUS_ROTATING;
1142         cdr.StatP &= ~STATUS_SEEK;
1143         cdr.Result[0] = cdr.StatP;
1144         cdr.Seeked = SEEK_DONE;
1145
1146         ReadTrack(cdr.SetSector);
1147
1148         buf = CDR_getBuffer();
1149         if (buf == NULL)
1150                 cdr.RErr = -1;
1151
1152         if (cdr.RErr == -1) {
1153                 CDR_LOG_I("cdrReadInterrupt() Log: err\n");
1154                 memset(cdr.Transfer, 0, DATA_SIZE);
1155                 cdr.Stat = DiskError;
1156                 cdr.Result[0] |= STATUS_ERROR;
1157                 CDREAD_INT((cdr.Mode & 0x80) ? (cdReadTime / 2) : cdReadTime);
1158                 return;
1159         }
1160
1161         memcpy(cdr.Transfer, buf, DATA_SIZE);
1162         CheckPPFCache(cdr.Transfer, cdr.Prev[0], cdr.Prev[1], cdr.Prev[2]);
1163
1164
1165         CDR_LOG("cdrReadInterrupt() Log: cdr.Transfer %x:%x:%x\n", cdr.Transfer[0], cdr.Transfer[1], cdr.Transfer[2]);
1166
1167         if ((!cdr.Muted) && (cdr.Mode & MODE_STRSND) && (!Config.Xa) && (cdr.FirstSector != -1)) { // CD-XA
1168                 // Firemen 2: Multi-XA files - briefings, cutscenes
1169                 if( cdr.FirstSector == 1 && (cdr.Mode & MODE_SF)==0 ) {
1170                         cdr.File = cdr.Transfer[4 + 0];
1171                         cdr.Channel = cdr.Transfer[4 + 1];
1172                 }
1173
1174                 if ((cdr.Transfer[4 + 2] & 0x4) &&
1175                          (cdr.Transfer[4 + 1] == cdr.Channel) &&
1176                         (cdr.Transfer[4 + 0] == cdr.File)) {
1177                         int ret = xa_decode_sector(&cdr.Xa, cdr.Transfer+4, cdr.FirstSector);
1178                         if (!ret) {
1179
1180                                 cdrAttenuate(cdr.Xa.pcm, cdr.Xa.nsamples, cdr.Xa.stereo);
1181                                 SPU_playADPCMchannel(&cdr.Xa);
1182                                 cdr.FirstSector = 0;
1183
1184 #if 0
1185                                 // Crash Team Racing: music, speech
1186                                 // - done using cdda decoded buffer (spu irq)
1187                                 // - don't do here
1188
1189                                 // signal ADPCM data ready
1190                                 setIrq();
1191 #endif
1192                         }
1193                         else cdr.FirstSector = -1;
1194                 }
1195         }
1196
1197         cdr.SetSector[2]++;
1198         if (cdr.SetSector[2] == 75) {
1199                 cdr.SetSector[2] = 0;
1200                 cdr.SetSector[1]++;
1201                 if (cdr.SetSector[1] == 60) {
1202                         cdr.SetSector[1] = 0;
1203                         cdr.SetSector[0]++;
1204                 }
1205         }
1206
1207         cdr.Readed = 0;
1208
1209         CDREAD_INT((cdr.Mode & MODE_SPEED) ? (cdReadTime / 2) : cdReadTime);
1210
1211         /*
1212         Croc 2: $40 - only FORM1 (*)
1213         Judge Dredd: $C8 - only FORM1 (*)
1214         Sim Theme Park - no adpcm at all (zero)
1215         */
1216
1217         if (!(cdr.Mode & MODE_STRSND) || !(cdr.Transfer[4+2] & 0x4)) {
1218                 cdr.Stat = DataReady;
1219                 setIrq();
1220         }
1221
1222         // update for CdlGetlocP
1223         ReadTrack(cdr.SetSector);
1224
1225         Check_Shell(0);
1226 }
1227
1228 /*
1229 cdrRead0:
1230         bit 0,1 - mode
1231         bit 2 - unknown
1232         bit 3 - unknown
1233         bit 4 - unknown
1234         bit 5 - 1 result ready
1235         bit 6 - 1 dma ready
1236         bit 7 - 1 command being processed
1237 */
1238
1239 unsigned char cdrRead0(void) {
1240         if (cdr.ResultReady)
1241                 cdr.Ctrl |= 0x20;
1242         else
1243                 cdr.Ctrl &= ~0x20;
1244
1245         if (cdr.OCUP)
1246                 cdr.Ctrl |= 0x40;
1247 //  else
1248 //              cdr.Ctrl &= ~0x40;
1249
1250         // What means the 0x10 and the 0x08 bits? I only saw it used by the bios
1251         cdr.Ctrl |= 0x18;
1252
1253         CDR_LOG_IO("cdr r0: %02x\n", cdr.Ctrl);
1254
1255         return psxHu8(0x1800) = cdr.Ctrl;
1256 }
1257
1258 void cdrWrite0(unsigned char rt) {
1259         CDR_LOG_IO("cdr w0: %02x\n", rt);
1260
1261         cdr.Ctrl = (rt & 3) | (cdr.Ctrl & ~3);
1262 }
1263
1264 unsigned char cdrRead1(void) {
1265         if ((cdr.ResultP & 0xf) < cdr.ResultC)
1266                 psxHu8(0x1801) = cdr.Result[cdr.ResultP & 0xf];
1267         else
1268                 psxHu8(0x1801) = 0;
1269         cdr.ResultP++;
1270         if (cdr.ResultP == cdr.ResultC)
1271                 cdr.ResultReady = 0;
1272
1273         CDR_LOG_IO("cdr r1: %02x\n", psxHu8(0x1801));
1274
1275         return psxHu8(0x1801);
1276 }
1277
1278 void cdrWrite1(unsigned char rt) {
1279         u8 set_loc[3];
1280         int i;
1281
1282         CDR_LOG_IO("cdr w1: %02x\n", rt);
1283
1284         switch (cdr.Ctrl & 3) {
1285         case 0:
1286                 break;
1287         case 3:
1288                 cdr.AttenuatorRightToRightT = rt;
1289                 return;
1290         default:
1291                 return;
1292         }
1293
1294         cdr.Cmd = rt;
1295         cdr.OCUP = 0;
1296
1297 #ifdef CDR_LOG_CMD_IRQ
1298         SysPrintf("cdrWrite1() Log: CD1 write: %x (%s)", rt, CmdName[rt]);
1299         if (cdr.ParamC) {
1300                 SysPrintf(" Param[%d] = {", cdr.ParamC);
1301                 for (i = 0; i < cdr.ParamC; i++)
1302                         SysPrintf(" %x,", cdr.Param[i]);
1303                 SysPrintf("}\n");
1304         } else {
1305                 SysPrintf("\n");
1306         }
1307 #endif
1308
1309         cdr.ResultReady = 0;
1310         cdr.Ctrl |= 0x80;
1311         // cdr.Stat = NoIntr;
1312         AddIrqQueue(cdr.Cmd, 0x800);
1313
1314         switch (cdr.Cmd) {
1315         case CdlSync:
1316         case CdlNop:
1317         case CdlForward:
1318         case CdlBackward:
1319         case CdlReadT:
1320         case CdlTest:
1321         case CdlID:
1322         case CdlReadToc:
1323         case CdlGetmode:
1324         case CdlGetlocL:
1325         case CdlGetlocP:
1326         case CdlGetTD:
1327                 break;
1328
1329         case CdlSetloc:
1330                 StopReading();
1331                 for (i = 0; i < 3; i++)
1332                         set_loc[i] = btoi(cdr.Param[i]);
1333
1334                 // FIXME: clean up this SetSector/SetSectorPlay mess,
1335                 // there should be single var tracking current sector pos
1336                 if (cdr.Play)
1337                         i = msf2sec(cdr.SetSectorPlay);
1338                 else
1339                         i = msf2sec(cdr.SetSector);
1340                 i = abs(i - msf2sec(set_loc));
1341                 if (i > 16)
1342                         cdr.Seeked = SEEK_PENDING;
1343
1344                 memcpy(cdr.SetSector, set_loc, 3);
1345                 cdr.SetSector[3] = 0;
1346                 break;
1347
1348         case CdlPlay:
1349                 // Vib Ribbon: try same track again
1350                 StopCdda();
1351
1352 #if 0
1353                 if (!cdr.SetSector[0] & !cdr.SetSector[1] & !cdr.SetSector[2]) {
1354                         if (CDR_getTN(cdr.ResultTN) != -1) {
1355                                 if (cdr.CurTrack > cdr.ResultTN[1])
1356                                         cdr.CurTrack = cdr.ResultTN[1];
1357                                 if (CDR_getTD((unsigned char)(cdr.CurTrack), cdr.ResultTD) != -1) {
1358                                         int tmp = cdr.ResultTD[2];
1359                                         cdr.ResultTD[2] = cdr.ResultTD[0];
1360                                         cdr.ResultTD[0] = tmp;
1361                                         if (!Config.Cdda) CDR_play(cdr.ResultTD);
1362                                 }
1363                         }
1364                 }
1365 #endif
1366                 // Vib Ribbon - decoded buffer IRQ for CDDA reading
1367                 // - fixes ribbon timing + music CD mode
1368                 //TODO?
1369                 //CDRDBUF_INT( PSXCLK / 44100 * 0x100 );
1370
1371                 cdr.Play = TRUE;
1372
1373                 cdr.StatP |= STATUS_SEEK;
1374                 cdr.StatP &= ~STATUS_ROTATING;
1375                 break;
1376
1377         case CdlReadN:
1378                 StopReading();
1379                 cdr.Reading = 1;
1380                 cdr.FirstSector = 1;
1381                 cdr.Readed = 0xff;
1382                 break;
1383
1384         case CdlStandby:
1385                 StopCdda();
1386                 StopReading();
1387                 break;
1388
1389         case CdlStop:
1390                 // GameShark CD Player: Reset CDDA to track start
1391                 if (cdr.Play) {
1392                         // grab time for current track
1393                         CDR_getTD((u8)(cdr.CurTrack), cdr.ResultTD);
1394
1395                         cdr.SetSectorPlay[0] = cdr.ResultTD[2];
1396                         cdr.SetSectorPlay[1] = cdr.ResultTD[1];
1397                         cdr.SetSectorPlay[2] = cdr.ResultTD[0];
1398                 }
1399
1400                 StopCdda();
1401                 StopReading();
1402                 break;
1403
1404         case CdlPause:
1405                 /*
1406                    GameShark CD Player: save time for resume
1407
1408                    Twisted Metal - World Tour: don't mix Setloc / CdlPlay cursors
1409                 */
1410
1411                 StopCdda();
1412                 StopReading();
1413                 break;
1414
1415         case CdlReset:
1416         case CdlInit:
1417                 cdr.Seeked = SEEK_DONE;
1418                 StopCdda();
1419                 StopReading();
1420                 break;
1421
1422         case CdlMute:
1423                 cdr.Muted = TRUE;
1424                         // Duke Nukem - Time to Kill
1425                         // - do not directly set cd-xa volume
1426                         //SPU_writeRegister( H_CDLeft, 0x0000 );
1427                         //SPU_writeRegister( H_CDRight, 0x0000 );
1428                 break;
1429
1430         case CdlDemute:
1431                 cdr.Muted = FALSE;
1432
1433                         // Duke Nukem - Time to Kill
1434                         // - do not directly set cd-xa volume
1435                         //SPU_writeRegister( H_CDLeft, 0x7f00 );
1436                         //SPU_writeRegister( H_CDRight, 0x7f00 );
1437                 break;
1438
1439         case CdlSetfilter:
1440                 cdr.File = cdr.Param[0];
1441                 cdr.Channel = cdr.Param[1];
1442                 break;
1443
1444         case CdlSetmode:
1445                 CDR_LOG("cdrWrite1() Log: Setmode %x\n", cdr.Param[0]);
1446
1447                 cdr.Mode = cdr.Param[0];
1448
1449                 // Squaresoft on PlayStation 1998 Collector's CD Vol. 1
1450                 // - fixes choppy movie sound
1451                 if( cdr.Play && (cdr.Mode & MODE_CDDA) == 0 )
1452                         StopCdda();
1453                 break;
1454
1455         case CdlGetTN:
1456                 //AddIrqQueue(cdr.Cmd, 0x800);
1457
1458                 // GameShark CDX CD Player: very long time
1459                 AddIrqQueue(cdr.Cmd, 0x100000);
1460                 break;
1461
1462         case CdlSeekL:
1463         case CdlSeekP:
1464                 // Tomb Raider 2 - reset cdda
1465                 StopCdda();
1466                 StopReading();
1467                 break;
1468
1469         case CdlReadS:
1470                 StopReading();
1471                 cdr.Reading = 2;
1472                 cdr.FirstSector = 1;
1473                 cdr.Readed = 0xff;
1474                 break;
1475
1476         default:
1477                 cdr.ParamC = 0;
1478                 CDR_LOG_I("cdrWrite1() Log: Unknown command: %x\n", cdr.Cmd);
1479                 return;
1480         }
1481 }
1482
1483 unsigned char cdrRead2(void) {
1484         unsigned char ret;
1485
1486         if (cdr.Readed == 0) {
1487                 ret = 0;
1488         } else {
1489                 ret = *pTransfer++;
1490         }
1491
1492         CDR_LOG_IO("cdr r2: %02x\n", ret);
1493         return ret;
1494 }
1495
1496 void cdrWrite2(unsigned char rt) {
1497         CDR_LOG_IO("cdr w2: %02x\n", rt);
1498
1499         switch (cdr.Ctrl & 3) {
1500         case 0:
1501                 if (cdr.ParamC < 8) // FIXME: size and wrapping
1502                         cdr.Param[cdr.ParamC++] = rt;
1503                 return;
1504         case 1:
1505                 cdr.Reg2 = rt;
1506                 setIrq();
1507                 return;
1508         case 2:
1509                 cdr.AttenuatorLeftToLeftT = rt;
1510                 return;
1511         case 3:
1512                 cdr.AttenuatorRightToLeftT = rt;
1513                 return;
1514         }
1515 }
1516
1517 unsigned char cdrRead3(void) {
1518         if (cdr.Ctrl & 0x1)
1519                 psxHu8(0x1803) = cdr.Stat | 0xE0;
1520         else
1521                 psxHu8(0x1803) = cdr.Reg2 | 0xE0;
1522
1523         CDR_LOG_IO("cdr r3: %02x\n", psxHu8(0x1803));
1524         return psxHu8(0x1803);
1525 }
1526
1527 void cdrWrite3(unsigned char rt) {
1528         CDR_LOG_IO("cdr w3: %02x\n", rt);
1529
1530         switch (cdr.Ctrl & 3) {
1531         case 0:
1532                 break; // transfer
1533         case 1:
1534                 cdr.Stat &= ~rt;
1535
1536                 if (rt & 0x40)
1537                         cdr.ParamC = 0;
1538                 return;
1539         case 2:
1540                 cdr.AttenuatorLeftToRightT = rt;
1541                 return;
1542         case 3:
1543                 if (rt & 0x20) {
1544                         memcpy(&cdr.AttenuatorLeftToLeft, &cdr.AttenuatorLeftToLeftT, 4);
1545                         CDR_LOG_I("CD-XA Volume: %02x %02x | %02x %02x\n",
1546                                 cdr.AttenuatorLeftToLeft, cdr.AttenuatorLeftToRight,
1547                                 cdr.AttenuatorRightToLeft, cdr.AttenuatorRightToRight);
1548                 }
1549                 return;
1550         }
1551
1552         if ((rt & 0x80) && cdr.Readed == 0) {
1553                 cdr.Readed = 1;
1554                 pTransfer = cdr.Transfer;
1555
1556                 switch (cdr.Mode & 0x30) {
1557                         case MODE_SIZE_2328:
1558                         case 0x00:
1559                                 pTransfer += 12;
1560                                 break;
1561
1562                         case MODE_SIZE_2340:
1563                                 pTransfer += 0;
1564                                 break;
1565
1566                         default:
1567                                 break;
1568                 }
1569         }
1570 }
1571
1572 void psxDma3(u32 madr, u32 bcr, u32 chcr) {
1573         u32 cdsize;
1574         int size;
1575         u8 *ptr;
1576
1577         CDR_LOG("psxDma3() Log: *** DMA 3 *** %x addr = %x size = %x\n", chcr, madr, bcr);
1578
1579         switch (chcr) {
1580                 case 0x11000000:
1581                 case 0x11400100:
1582                         if (cdr.Readed == 0) {
1583                                 CDR_LOG("psxDma3() Log: *** DMA 3 *** NOT READY\n");
1584                                 break;
1585                         }
1586
1587                         cdsize = (bcr & 0xffff) * 4;
1588
1589                         // Ape Escape: bcr = 0001 / 0000
1590                         // - fix boot
1591                         if( cdsize == 0 )
1592                         {
1593                                 switch (cdr.Mode & 0x30) {
1594                                         case 0x00: cdsize = 2048; break;
1595                                         case MODE_SIZE_2328: cdsize = 2328; break;
1596                                         case MODE_SIZE_2340: cdsize = 2340; break;
1597                                 }
1598                         }
1599
1600
1601                         ptr = (u8 *)PSXM(madr);
1602                         if (ptr == NULL) {
1603                                 CDR_LOG("psxDma3() Log: *** DMA 3 *** NULL Pointer!\n");
1604                                 break;
1605                         }
1606
1607                         /*
1608                         GS CDX: Enhancement CD crash
1609                         - Setloc 0:0:0
1610                         - CdlPlay
1611                         - Spams DMA3 and gets buffer overrun
1612                         */
1613                         size = CD_FRAMESIZE_RAW - (pTransfer - cdr.Transfer);
1614                         if (size > cdsize)
1615                                 size = cdsize;
1616                         if (size > 0)
1617                         {
1618                                 memcpy(ptr, pTransfer, size);
1619                         }
1620
1621                         psxCpu->Clear(madr, cdsize / 4);
1622                         pTransfer += cdsize;
1623
1624
1625                         // burst vs normal
1626                         if( chcr == 0x11400100 ) {
1627                                 CDRDMA_INT( (cdsize/4) / 4 );
1628                         }
1629                         else if( chcr == 0x11000000 ) {
1630                                 CDRDMA_INT( (cdsize/4) * 1 );
1631                         }
1632                         return;
1633
1634                 default:
1635                         CDR_LOG("psxDma3() Log: Unknown cddma %x\n", chcr);
1636                         break;
1637         }
1638
1639         HW_DMA3_CHCR &= SWAP32(~0x01000000);
1640         DMA_INTERRUPT(3);
1641 }
1642
1643 void cdrDmaInterrupt()
1644 {
1645         if (HW_DMA3_CHCR & SWAP32(0x01000000))
1646         {
1647                 HW_DMA3_CHCR &= SWAP32(~0x01000000);
1648                 DMA_INTERRUPT(3);
1649         }
1650 }
1651
1652 static void getCdInfo(void)
1653 {
1654         u8 tmp;
1655
1656         CDR_getTN(cdr.ResultTN);
1657         CDR_getTD(0, cdr.SetSectorEnd);
1658         tmp = cdr.SetSectorEnd[0];
1659         cdr.SetSectorEnd[0] = cdr.SetSectorEnd[2];
1660         cdr.SetSectorEnd[2] = tmp;
1661 }
1662
1663 void cdrReset() {
1664         memset(&cdr, 0, sizeof(cdr));
1665         cdr.CurTrack = 1;
1666         cdr.File = 1;
1667         cdr.Channel = 1;
1668         pTransfer = cdr.Transfer;
1669
1670         // BIOS player - default values
1671         cdr.AttenuatorLeftToLeft = 0x80;
1672         cdr.AttenuatorLeftToRight = 0x00;
1673         cdr.AttenuatorRightToLeft = 0x00;
1674         cdr.AttenuatorRightToRight = 0x80;
1675
1676         getCdInfo();
1677 }
1678
1679 int cdrFreeze(void *f, int Mode) {
1680         u32 tmp;
1681         u8 tmpp[3];
1682
1683         if (Mode == 0 && !Config.Cdda)
1684                 CDR_stop();
1685
1686         cdr.freeze_ver = 0x63647201;
1687         gzfreeze(&cdr, sizeof(cdr));
1688
1689         if (Mode == 1) {
1690                 cdr.ParamP = cdr.ParamC;
1691                 tmp = pTransfer - cdr.Transfer;
1692         }
1693
1694         gzfreeze(&tmp, sizeof(tmp));
1695
1696         if (Mode == 0) {
1697                 getCdInfo();
1698
1699                 pTransfer = cdr.Transfer + tmp;
1700
1701                 // read right sub data
1702                 memcpy(tmpp, cdr.Prev, 3);
1703                 cdr.Prev[0]++;
1704                 ReadTrack(tmpp);
1705
1706                 if (cdr.Play) {
1707                         Find_CurTrack(cdr.SetSectorPlay);
1708                         if (!Config.Cdda)
1709                                 CDR_play(cdr.SetSectorPlay);
1710                 }
1711
1712                 if ((cdr.freeze_ver & 0xffffff00) != 0x63647200) {
1713                         // old versions did not latch Reg2, have to fixup..
1714                         if (cdr.Reg2 == 0) {
1715                                 SysPrintf("cdrom: fixing up old savestate\n");
1716                                 cdr.Reg2 = 7;
1717                         }
1718                 }
1719         }
1720
1721         return 0;
1722 }
1723
1724 void LidInterrupt() {
1725         cdr.LidCheck = 0x20; // start checker
1726
1727         getCdInfo();
1728
1729         StopCdda();
1730         CDRLID_INT( cdReadTime * 3 );
1731
1732         // generate interrupt if none active - open or close
1733         if (cdr.Irq == 0 || cdr.Irq == 0xff) {
1734                 cdr.Ctrl |= 0x80;
1735                 cdr.Stat = NoIntr;
1736                 AddIrqQueue(CdlNop, 0x800);
1737         }
1738 }