cdriso: simplify read code
[pcsx_rearmed.git] / 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 void cdrReadInterrupt() {
1080         u8 *buf;
1081
1082         if (!cdr.Reading)
1083                 return;
1084
1085         if (cdr.Irq || cdr.Stat) {
1086                 CDR_LOG_I("cdrom: read stat hack %02x %x\n", cdr.Irq, cdr.Stat);
1087                 CDREAD_INT(0x1000);
1088                 return;
1089         }
1090
1091         cdr.OCUP = 1;
1092         SetResultSize(1);
1093         cdr.StatP |= STATUS_READ|STATUS_ROTATING;
1094         cdr.StatP &= ~STATUS_SEEK;
1095         cdr.Result[0] = cdr.StatP;
1096         cdr.Seeked = SEEK_DONE;
1097
1098         ReadTrack(cdr.SetSector);
1099
1100         buf = CDR_getBuffer();
1101         if (buf == NULL)
1102                 cdr.RErr = -1;
1103
1104         if (cdr.RErr == -1) {
1105                 CDR_LOG_I("cdrReadInterrupt() Log: err\n");
1106                 memset(cdr.Transfer, 0, DATA_SIZE);
1107                 cdr.Stat = DiskError;
1108                 cdr.Result[0] |= STATUS_ERROR;
1109                 CDREAD_INT((cdr.Mode & 0x80) ? (cdReadTime / 2) : cdReadTime);
1110                 return;
1111         }
1112
1113         memcpy(cdr.Transfer, buf, DATA_SIZE);
1114         CheckPPFCache(cdr.Transfer, cdr.Prev[0], cdr.Prev[1], cdr.Prev[2]);
1115
1116
1117         CDR_LOG("cdrReadInterrupt() Log: cdr.Transfer %x:%x:%x\n", cdr.Transfer[0], cdr.Transfer[1], cdr.Transfer[2]);
1118
1119         if ((!cdr.Muted) && (cdr.Mode & MODE_STRSND) && (!Config.Xa) && (cdr.FirstSector != -1)) { // CD-XA
1120                 // Firemen 2: Multi-XA files - briefings, cutscenes
1121                 if( cdr.FirstSector == 1 && (cdr.Mode & MODE_SF)==0 ) {
1122                         cdr.File = cdr.Transfer[4 + 0];
1123                         cdr.Channel = cdr.Transfer[4 + 1];
1124                 }
1125
1126                 if ((cdr.Transfer[4 + 2] & 0x4) &&
1127                          (cdr.Transfer[4 + 1] == cdr.Channel) &&
1128                         (cdr.Transfer[4 + 0] == cdr.File)) {
1129                         int ret = xa_decode_sector(&cdr.Xa, cdr.Transfer+4, cdr.FirstSector);
1130
1131                         if (!ret) {
1132                                 // only handle attenuator basic channel switch for now
1133                                 if (cdr.Xa.stereo) {
1134                                         int i;
1135                                         if ((cdr.AttenuatorLeft[0] | cdr.AttenuatorLeft[1])
1136                                             && !(cdr.AttenuatorRight[0] | cdr.AttenuatorRight[1]))
1137                                         {
1138                                                 for (i = 0; i < cdr.Xa.nsamples; i++)
1139                                                         cdr.Xa.pcm[i*2 + 1] = cdr.Xa.pcm[i*2];
1140                                         }
1141                                         else if (!(cdr.AttenuatorLeft[0] | cdr.AttenuatorLeft[1])
1142                                             && (cdr.AttenuatorRight[0] | cdr.AttenuatorRight[1]))
1143                                         {
1144                                                 for (i = 0; i < cdr.Xa.nsamples; i++)
1145                                                         cdr.Xa.pcm[i*2] = cdr.Xa.pcm[i*2 + 1];
1146                                         }
1147                                 }
1148
1149                                 SPU_playADPCMchannel(&cdr.Xa);
1150                                 cdr.FirstSector = 0;
1151
1152 #if 0
1153                                 // Crash Team Racing: music, speech
1154                                 // - done using cdda decoded buffer (spu irq)
1155                                 // - don't do here
1156
1157                                 // signal ADPCM data ready
1158                                 setIrq();
1159 #endif
1160                         }
1161                         else cdr.FirstSector = -1;
1162                 }
1163         }
1164
1165         cdr.SetSector[2]++;
1166         if (cdr.SetSector[2] == 75) {
1167                 cdr.SetSector[2] = 0;
1168                 cdr.SetSector[1]++;
1169                 if (cdr.SetSector[1] == 60) {
1170                         cdr.SetSector[1] = 0;
1171                         cdr.SetSector[0]++;
1172                 }
1173         }
1174
1175         cdr.Readed = 0;
1176
1177         CDREAD_INT((cdr.Mode & MODE_SPEED) ? (cdReadTime / 2) : cdReadTime);
1178
1179         /*
1180         Croc 2: $40 - only FORM1 (*)
1181         Judge Dredd: $C8 - only FORM1 (*)
1182         Sim Theme Park - no adpcm at all (zero)
1183         */
1184
1185         if (!(cdr.Mode & MODE_STRSND) || !(cdr.Transfer[4+2] & 0x4)) {
1186                 cdr.Stat = DataReady;
1187                 setIrq();
1188         }
1189
1190         // update for CdlGetlocP
1191         ReadTrack(cdr.SetSector);
1192
1193         Check_Shell(0);
1194 }
1195
1196 /*
1197 cdrRead0:
1198         bit 0,1 - mode
1199         bit 2 - unknown
1200         bit 3 - unknown
1201         bit 4 - unknown
1202         bit 5 - 1 result ready
1203         bit 6 - 1 dma ready
1204         bit 7 - 1 command being processed
1205 */
1206
1207 unsigned char cdrRead0(void) {
1208         if (cdr.ResultReady)
1209                 cdr.Ctrl |= 0x20;
1210         else
1211                 cdr.Ctrl &= ~0x20;
1212
1213         if (cdr.OCUP)
1214                 cdr.Ctrl |= 0x40;
1215 //  else
1216 //              cdr.Ctrl &= ~0x40;
1217
1218         // What means the 0x10 and the 0x08 bits? I only saw it used by the bios
1219         cdr.Ctrl |= 0x18;
1220
1221         CDR_LOG_IO("cdr r0: %02x\n", cdr.Ctrl);
1222
1223         return psxHu8(0x1800) = cdr.Ctrl;
1224 }
1225
1226 void cdrWrite0(unsigned char rt) {
1227         CDR_LOG_IO("cdr w0: %02x\n", rt);
1228
1229         cdr.Ctrl = (rt & 3) | (cdr.Ctrl & ~3);
1230 }
1231
1232 unsigned char cdrRead1(void) {
1233         if ((cdr.ResultP & 0xf) < cdr.ResultC)
1234                 psxHu8(0x1801) = cdr.Result[cdr.ResultP & 0xf];
1235         else
1236                 psxHu8(0x1801) = 0;
1237         cdr.ResultP++;
1238         if (cdr.ResultP == cdr.ResultC)
1239                 cdr.ResultReady = 0;
1240
1241         CDR_LOG_IO("cdr r1: %02x\n", psxHu8(0x1801));
1242
1243         return psxHu8(0x1801);
1244 }
1245
1246 void cdrWrite1(unsigned char rt) {
1247         u8 set_loc[3];
1248         int i;
1249
1250         CDR_LOG_IO("cdr w1: %02x\n", rt);
1251
1252         switch (cdr.Ctrl & 3) {
1253         case 0:
1254                 break;
1255         case 3:
1256                 cdr.AttenuatorRight[1] = rt;
1257                 return;
1258         default:
1259                 return;
1260         }
1261
1262         cdr.Cmd = rt;
1263         cdr.OCUP = 0;
1264
1265 #ifdef CDR_LOG_CMD_IRQ
1266         SysPrintf("cdrWrite1() Log: CD1 write: %x (%s)", rt, CmdName[rt]);
1267         if (cdr.ParamC) {
1268                 SysPrintf(" Param[%d] = {", cdr.ParamC);
1269                 for (i = 0; i < cdr.ParamC; i++)
1270                         SysPrintf(" %x,", cdr.Param[i]);
1271                 SysPrintf("}\n");
1272         } else {
1273                 SysPrintf("\n");
1274         }
1275 #endif
1276
1277         cdr.ResultReady = 0;
1278         cdr.Ctrl |= 0x80;
1279         // cdr.Stat = NoIntr; 
1280         AddIrqQueue(cdr.Cmd, 0x800);
1281
1282         switch (cdr.Cmd) {
1283         case CdlSync:
1284         case CdlNop:
1285         case CdlForward:
1286         case CdlBackward:
1287         case CdlReadT:
1288         case CdlTest:
1289         case CdlID:
1290         case CdlReadToc:
1291         case CdlGetmode:
1292         case CdlGetlocL:
1293         case CdlGetlocP:
1294         case CdlGetTD:
1295                 break;
1296
1297         case CdlSetloc:
1298                 StopReading();
1299                 for (i = 0; i < 3; i++)
1300                         set_loc[i] = btoi(cdr.Param[i]);
1301
1302                 // FIXME: clean up this SetSector/SetSectorPlay mess,
1303                 // there should be single var tracking current sector pos
1304                 if (cdr.Play)
1305                         i = msf2sec(cdr.SetSectorPlay);
1306                 else
1307                         i = msf2sec(cdr.SetSector);
1308                 i = abs(i - msf2sec(set_loc));
1309                 if (i > 16)
1310                         cdr.Seeked = SEEK_PENDING;
1311
1312                 memcpy(cdr.SetSector, set_loc, 3);
1313                 cdr.SetSector[3] = 0;
1314                 break;
1315
1316         case CdlPlay:
1317                 // Vib Ribbon: try same track again
1318                 StopCdda();
1319
1320 #if 0
1321                 if (!cdr.SetSector[0] & !cdr.SetSector[1] & !cdr.SetSector[2]) {
1322                         if (CDR_getTN(cdr.ResultTN) != -1) {
1323                                 if (cdr.CurTrack > cdr.ResultTN[1])
1324                                         cdr.CurTrack = cdr.ResultTN[1];
1325                                 if (CDR_getTD((unsigned char)(cdr.CurTrack), cdr.ResultTD) != -1) {
1326                                         int tmp = cdr.ResultTD[2];
1327                                         cdr.ResultTD[2] = cdr.ResultTD[0];
1328                                         cdr.ResultTD[0] = tmp;
1329                                         if (!Config.Cdda) CDR_play(cdr.ResultTD);
1330                                 }
1331                         }
1332                 }
1333 #endif
1334                 // Vib Ribbon - decoded buffer IRQ for CDDA reading
1335                 // - fixes ribbon timing + music CD mode
1336                 //TODO?
1337                 //CDRDBUF_INT( PSXCLK / 44100 * 0x100 );
1338
1339                 cdr.Play = TRUE;
1340
1341                 cdr.StatP |= STATUS_SEEK;
1342                 cdr.StatP &= ~STATUS_ROTATING;
1343                 break;
1344
1345         case CdlReadN:
1346                 StopReading();
1347                 cdr.Reading = 1;
1348                 cdr.FirstSector = 1;
1349                 cdr.Readed = 0xff;
1350                 break;
1351
1352         case CdlStandby:
1353                 StopCdda();
1354                 StopReading();
1355                 break;
1356
1357         case CdlStop:
1358                 // GameShark CD Player: Reset CDDA to track start
1359                 if (cdr.Play) {
1360                         // grab time for current track
1361                         CDR_getTD((u8)(cdr.CurTrack), cdr.ResultTD);
1362
1363                         cdr.SetSectorPlay[0] = cdr.ResultTD[2];
1364                         cdr.SetSectorPlay[1] = cdr.ResultTD[1];
1365                         cdr.SetSectorPlay[2] = cdr.ResultTD[0];
1366                 }
1367
1368                 StopCdda();
1369                 StopReading();
1370                 break;
1371
1372         case CdlPause:
1373                 /*
1374                    GameShark CD Player: save time for resume
1375
1376                    Twisted Metal - World Tour: don't mix Setloc / CdlPlay cursors
1377                 */
1378
1379                 StopCdda();
1380                 StopReading();
1381                 break;
1382
1383         case CdlReset:
1384         case CdlInit:
1385                 cdr.Seeked = SEEK_DONE;
1386                 StopCdda();
1387                 StopReading();
1388                 break;
1389
1390         case CdlMute:
1391                 cdr.Muted = TRUE;
1392                         // Duke Nukem - Time to Kill
1393                         // - do not directly set cd-xa volume
1394                         //SPU_writeRegister( H_CDLeft, 0x0000 );
1395                         //SPU_writeRegister( H_CDRight, 0x0000 );
1396                 break;
1397
1398         case CdlDemute:
1399                 cdr.Muted = FALSE;
1400
1401                         // Duke Nukem - Time to Kill
1402                         // - do not directly set cd-xa volume
1403                         //SPU_writeRegister( H_CDLeft, 0x7f00 );
1404                         //SPU_writeRegister( H_CDRight, 0x7f00 );
1405                 break;
1406
1407         case CdlSetfilter:
1408                 cdr.File = cdr.Param[0];
1409                 cdr.Channel = cdr.Param[1];
1410                 break;
1411
1412         case CdlSetmode:
1413                 CDR_LOG("cdrWrite1() Log: Setmode %x\n", cdr.Param[0]);
1414
1415                 cdr.Mode = cdr.Param[0];
1416
1417                 // Squaresoft on PlayStation 1998 Collector's CD Vol. 1
1418                 // - fixes choppy movie sound
1419                 if( cdr.Play && (cdr.Mode & MODE_CDDA) == 0 )
1420                         StopCdda();
1421                 break;
1422
1423         case CdlGetTN:
1424                 //AddIrqQueue(cdr.Cmd, 0x800);
1425
1426                 // GameShark CDX CD Player: very long time
1427                 AddIrqQueue(cdr.Cmd, 0x100000);
1428                 break;
1429
1430         case CdlSeekL:
1431         case CdlSeekP:
1432                 // Tomb Raider 2 - reset cdda
1433                 StopCdda();
1434                 StopReading();
1435                 break;
1436
1437         case CdlReadS:
1438                 StopReading();
1439                 cdr.Reading = 2;
1440                 cdr.FirstSector = 1;
1441                 cdr.Readed = 0xff;
1442                 break;
1443
1444         default:
1445                 cdr.ParamC = 0;
1446                 CDR_LOG_I("cdrWrite1() Log: Unknown command: %x\n", cdr.Cmd);
1447                 return;
1448         }
1449 }
1450
1451 unsigned char cdrRead2(void) {
1452         unsigned char ret;
1453
1454         if (cdr.Readed == 0) {
1455                 ret = 0;
1456         } else {
1457                 ret = *pTransfer++;
1458         }
1459
1460         CDR_LOG_IO("cdr r2: %02x\n", ret);
1461         return ret;
1462 }
1463
1464 void cdrWrite2(unsigned char rt) {
1465         CDR_LOG_IO("cdr w2: %02x\n", rt);
1466
1467         switch (cdr.Ctrl & 3) {
1468         case 0:
1469                 if (cdr.ParamC < 8) // FIXME: size and wrapping
1470                         cdr.Param[cdr.ParamC++] = rt;
1471                 return;
1472         case 1:
1473                 cdr.Reg2 = rt;
1474                 setIrq();
1475                 return;
1476         case 2:
1477                 cdr.AttenuatorLeft[0] = rt;
1478                 return;
1479         case 3:
1480                 cdr.AttenuatorRight[0] = rt;
1481                 return;
1482         }
1483 }
1484
1485 unsigned char cdrRead3(void) {
1486         if (cdr.Ctrl & 0x1)
1487                 psxHu8(0x1803) = cdr.Stat | 0xE0;
1488         else
1489                 psxHu8(0x1803) = cdr.Reg2 | 0xE0;
1490
1491         CDR_LOG_IO("cdr r3: %02x\n", psxHu8(0x1803));
1492         return psxHu8(0x1803);
1493 }
1494
1495 void cdrWrite3(unsigned char rt) {
1496         CDR_LOG_IO("cdr w3: %02x\n", rt);
1497
1498         switch (cdr.Ctrl & 3) {
1499         case 0:
1500                 break; // transfer
1501         case 1:
1502                 cdr.Stat &= ~rt;
1503
1504                 if (rt & 0x40)
1505                         cdr.ParamC = 0;
1506                 return;
1507         case 2:
1508                 cdr.AttenuatorLeft[1] = rt;
1509                 return;
1510         case 3:
1511                 if (rt == 0x20)
1512                 CDR_LOG( "CD-XA Volume: %X %X | %X %X\n",
1513                         cdr.AttenuatorLeft[0], cdr.AttenuatorLeft[1],
1514                         cdr.AttenuatorRight[0], cdr.AttenuatorRight[1] );
1515                 return;
1516         }
1517
1518         if ((rt & 0x80) && cdr.Readed == 0) {
1519                 cdr.Readed = 1;
1520                 pTransfer = cdr.Transfer;
1521
1522                 switch (cdr.Mode & 0x30) {
1523                         case MODE_SIZE_2328:
1524                         case 0x00:
1525                                 pTransfer += 12;
1526                                 break;
1527
1528                         case MODE_SIZE_2340:
1529                                 pTransfer += 0;
1530                                 break;
1531
1532                         default:
1533                                 break;
1534                 }
1535         }
1536 }
1537
1538 void psxDma3(u32 madr, u32 bcr, u32 chcr) {
1539         u32 cdsize;
1540         int size;
1541         u8 *ptr;
1542
1543         CDR_LOG("psxDma3() Log: *** DMA 3 *** %x addr = %x size = %x\n", chcr, madr, bcr);
1544
1545         switch (chcr) {
1546                 case 0x11000000:
1547                 case 0x11400100:
1548                         if (cdr.Readed == 0) {
1549                                 CDR_LOG("psxDma3() Log: *** DMA 3 *** NOT READY\n");
1550                                 break;
1551                         }
1552
1553                         cdsize = (bcr & 0xffff) * 4;
1554
1555                         // Ape Escape: bcr = 0001 / 0000
1556                         // - fix boot
1557                         if( cdsize == 0 )
1558                         {
1559                                 switch (cdr.Mode & 0x30) {
1560                                         case 0x00: cdsize = 2048; break;
1561                                         case MODE_SIZE_2328: cdsize = 2328; break;
1562                                         case MODE_SIZE_2340: cdsize = 2340; break;
1563                                 }
1564                         }
1565
1566
1567                         ptr = (u8 *)PSXM(madr);
1568                         if (ptr == NULL) {
1569                                 CDR_LOG("psxDma3() Log: *** DMA 3 *** NULL Pointer!\n");
1570                                 break;
1571                         }
1572
1573                         /*
1574                         GS CDX: Enhancement CD crash
1575                         - Setloc 0:0:0
1576                         - CdlPlay
1577                         - Spams DMA3 and gets buffer overrun
1578                         */
1579                         size = CD_FRAMESIZE_RAW - (pTransfer - cdr.Transfer);
1580                         if (size > cdsize)
1581                                 size = cdsize;
1582                         if (size > 0)
1583                         {
1584                                 memcpy(ptr, pTransfer, size);
1585                         }
1586
1587                         psxCpu->Clear(madr, cdsize / 4);
1588                         pTransfer += cdsize;
1589
1590
1591                         // burst vs normal
1592                         if( chcr == 0x11400100 ) {
1593                                 CDRDMA_INT( (cdsize/4) / 4 );
1594                         }
1595                         else if( chcr == 0x11000000 ) {
1596                                 CDRDMA_INT( (cdsize/4) * 1 );
1597                         }
1598                         return;
1599
1600                 default:
1601                         CDR_LOG("psxDma3() Log: Unknown cddma %x\n", chcr);
1602                         break;
1603         }
1604
1605         HW_DMA3_CHCR &= SWAP32(~0x01000000);
1606         DMA_INTERRUPT(3);
1607 }
1608
1609 void cdrDmaInterrupt()
1610 {
1611         if (HW_DMA3_CHCR & SWAP32(0x01000000))
1612         {
1613                 HW_DMA3_CHCR &= SWAP32(~0x01000000);
1614                 DMA_INTERRUPT(3);
1615         }
1616 }
1617
1618 static void getCdInfo(void)
1619 {
1620         u8 tmp;
1621
1622         CDR_getTN(cdr.ResultTN);
1623         CDR_getTD(0, cdr.SetSectorEnd);
1624         tmp = cdr.SetSectorEnd[0];
1625         cdr.SetSectorEnd[0] = cdr.SetSectorEnd[2];
1626         cdr.SetSectorEnd[2] = tmp;
1627 }
1628
1629 void cdrReset() {
1630         memset(&cdr, 0, sizeof(cdr));
1631         cdr.CurTrack = 1;
1632         cdr.File = 1;
1633         cdr.Channel = 1;
1634         pTransfer = cdr.Transfer;
1635
1636         // BIOS player - default values
1637         cdr.AttenuatorLeft[0] = 0x80;
1638         cdr.AttenuatorLeft[1] = 0x00;
1639         cdr.AttenuatorRight[0] = 0x00;
1640         cdr.AttenuatorRight[1] = 0x80;
1641
1642         getCdInfo();
1643 }
1644
1645 int cdrFreeze(void *f, int Mode) {
1646         u32 tmp;
1647         u8 tmpp[3];
1648
1649         if (Mode == 0 && !Config.Cdda)
1650                 CDR_stop();
1651         
1652         cdr.freeze_ver = 0x63647201;
1653         gzfreeze(&cdr, sizeof(cdr));
1654         
1655         if (Mode == 1) {
1656                 cdr.ParamP = cdr.ParamC;
1657                 tmp = pTransfer - cdr.Transfer;
1658         }
1659
1660         gzfreeze(&tmp, sizeof(tmp));
1661
1662         if (Mode == 0) {
1663                 getCdInfo();
1664
1665                 pTransfer = cdr.Transfer + tmp;
1666
1667                 // read right sub data
1668                 memcpy(tmpp, cdr.Prev, 3);
1669                 cdr.Prev[0]++;
1670                 ReadTrack(tmpp);
1671
1672                 if (cdr.Play) {
1673                         Find_CurTrack(cdr.SetSectorPlay);
1674                         if (!Config.Cdda)
1675                                 CDR_play(cdr.SetSectorPlay);
1676                 }
1677
1678                 if ((cdr.freeze_ver & 0xffffff00) != 0x63647200) {
1679                         // old versions did not latch Reg2, have to fixup..
1680                         if (cdr.Reg2 == 0) {
1681                                 SysPrintf("cdrom: fixing up old savestate\n");
1682                                 cdr.Reg2 = 7;
1683                         }
1684                 }
1685         }
1686
1687         return 0;
1688 }
1689
1690 void LidInterrupt() {
1691         cdr.LidCheck = 0x20; // start checker
1692
1693         getCdInfo();
1694        
1695         StopCdda();
1696         CDRLID_INT( cdReadTime * 3 );
1697
1698         // generate interrupt if none active - open or close
1699         if (cdr.Irq == 0 || cdr.Irq == 0xff) {
1700                 cdr.Ctrl |= 0x80;
1701                 cdr.Stat = NoIntr;
1702                 AddIrqQueue(CdlNop, 0x800);
1703         }
1704 }