cdrom: fix ID
[pcsx_rearmed.git] / libpcsxcore / cdrom.c
... / ...
CommitLineData
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
46cdrStruct cdr;
47static 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
81char *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
92unsigned char Test04[] = { 0 };
93unsigned char Test05[] = { 0 };
94unsigned char Test20[] = { 0x98, 0x06, 0x10, 0xC3 };
95unsigned char Test22[] = { 0x66, 0x6F, 0x72, 0x20, 0x45, 0x75, 0x72, 0x6F };
96unsigned 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
134enum seeked_state {
135 SEEK_PENDING = 0,
136 SEEK_DONE = 1,
137};
138
139static struct CdrStat stat;
140
141static unsigned int msf2sec(const u8 *msf) {
142 return ((msf[0] * 60 + msf[1]) * 75) + msf[2];
143}
144
145// for that weird psemu API..
146static unsigned int fsm2sec(const u8 *msf) {
147 return ((msf[2] * 60 + msf[1]) * 75) + msf[0];
148}
149
150static 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
215static void setIrq(void)
216{
217 if (cdr.Stat & cdr.Reg2)
218 psxHu32ref(0x1070) |= SWAP32((u32)0x4);
219}
220
221void 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
277static 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
383static 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
397static 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
446static 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
490static 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
500static 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
546void 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
601void 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 cdr.Result[0] = cdr.StatP;
945 cdr.Result[1] = 0;
946 cdr.Result[2] = 0;
947 cdr.Result[3] = 0;
948
949 // 0x10 - audio | 0x80 - unlicensed
950 if (CDR_getStatus(&stat) == -1) {
951 cdr.Result[1] = 0x80; // 0x80 leads to the menu in the bios, else loads CD
952 }
953 else {
954 if (stat.Type == 2)
955 cdr.Result[1] |= 0x10;
956 if (CdromId[0] == '\0')
957 cdr.Result[1] |= 0x80;
958 }
959 cdr.Result[0] |= (cdr.Result[1] >> 4) & 0x08;
960
961 strncpy((char *)&cdr.Result[4], "PCSX", 4);
962 cdr.Stat = Complete;
963 break;
964
965 case CdlReset:
966 SetResultSize(1);
967 cdr.StatP = STATUS_ROTATING;
968 cdr.Result[0] = cdr.StatP;
969 cdr.Stat = Acknowledge;
970 break;
971
972 case CdlReadT:
973 SetResultSize(1);
974 cdr.StatP |= STATUS_ROTATING;
975 cdr.Result[0] = cdr.StatP;
976 cdr.Stat = Acknowledge;
977 AddIrqQueue(CdlReadT + 0x20, 0x800);
978 break;
979
980 case CdlReadT + 0x20:
981 SetResultSize(1);
982 cdr.StatP |= STATUS_ROTATING;
983 cdr.Result[0] = cdr.StatP;
984 cdr.Stat = Complete;
985 break;
986
987 case CdlReadToc:
988 SetResultSize(1);
989 cdr.StatP |= STATUS_ROTATING;
990 cdr.Result[0] = cdr.StatP;
991 cdr.Stat = Acknowledge;
992 AddIrqQueue(CdlReadToc + 0x20, cdReadTime * 16);
993 break;
994
995 case CdlReadToc + 0x20:
996 SetResultSize(1);
997 cdr.StatP |= STATUS_ROTATING;
998 cdr.Result[0] = cdr.StatP;
999 cdr.Stat = Complete;
1000 break;
1001
1002 case CdlReadN:
1003 case CdlReadS:
1004 if (!cdr.Reading) return;
1005
1006 // Fighting Force 2 - update subq time immediately
1007 // - fixes new game
1008 Find_CurTrack(cdr.SetSector);
1009 ReadTrack(cdr.SetSector);
1010
1011
1012 // Crusaders of Might and Magic - update getlocl now
1013 // - fixes cutscene speech
1014 {
1015 u8 *buf = CDR_getBuffer();
1016 if (buf != NULL)
1017 memcpy(cdr.Transfer, buf, 8);
1018 }
1019
1020 /*
1021 Duke Nukem: Land of the Babes - seek then delay read for one frame
1022 - fixes cutscenes
1023 C-12 - Final Resistance - doesn't like seek
1024 */
1025
1026 if (cdr.Seeked != SEEK_DONE) {
1027 cdr.StatP |= STATUS_SEEK;
1028 cdr.StatP &= ~STATUS_READ;
1029
1030 // Crusaders of Might and Magic - use short time
1031 // - fix cutscene speech (startup)
1032
1033 // ??? - use more accurate seek time later
1034 CDREAD_INT((cdr.Mode & 0x80) ? (cdReadTime / 2) : cdReadTime * 1);
1035 } else {
1036 cdr.StatP |= STATUS_READ;
1037 cdr.StatP &= ~STATUS_SEEK;
1038
1039 CDREAD_INT((cdr.Mode & 0x80) ? (cdReadTime / 2) : cdReadTime * 1);
1040 }
1041
1042 SetResultSize(1);
1043 cdr.StatP |= STATUS_ROTATING;
1044 cdr.Result[0] = cdr.StatP;
1045 cdr.Stat = Acknowledge;
1046 break;
1047
1048 default:
1049 cdr.Stat = Complete;
1050 break;
1051 }
1052
1053 Check_Shell( Irq );
1054
1055 cdr.ParamC = 0;
1056
1057 setIrq();
1058
1059#ifdef CDR_LOG_CMD_IRQ
1060 SysPrintf("IRQ %d cmd %02x stat %02x: ",
1061 !!(cdr.Stat & cdr.Reg2), Irq, cdr.Stat);
1062 for (i = 0; i < cdr.ResultC; i++)
1063 SysPrintf("%02x ", cdr.Result[i]);
1064 SysPrintf("\n");
1065#endif
1066}
1067
1068#ifdef __ARM_ARCH_7A__
1069 #define ssat32_to_16(v) \
1070 asm("ssat %0,#16,%1" : "=r" (v) : "r" (v))
1071#else
1072 #define ssat32_to_16(v) do { \
1073 if (v < -32768) v = -32768; \
1074 else if (v > 32767) v = 32767; \
1075 } while (0)
1076#endif
1077
1078void cdrAttenuate(s16 *buf, int samples, int stereo)
1079{
1080 int i, l, r;
1081 int ll = cdr.AttenuatorLeftToLeft;
1082 int lr = cdr.AttenuatorLeftToRight;
1083 int rl = cdr.AttenuatorRightToLeft;
1084 int rr = cdr.AttenuatorRightToRight;
1085
1086 if (lr == 0 && rl == 0 && 0x78 <= ll && ll <= 0x88 && 0x78 <= rr && rr <= 0x88)
1087 return;
1088
1089 if (!stereo && ll == 0x40 && lr == 0x40 && rl == 0x40 && rr == 0x40)
1090 return;
1091
1092 if (stereo) {
1093 for (i = 0; i < samples; i++) {
1094 l = buf[i * 2];
1095 r = buf[i * 2 + 1];
1096 l = (l * ll + r * rl) >> 7;
1097 r = (r * rr + l * lr) >> 7;
1098 ssat32_to_16(l);
1099 ssat32_to_16(r);
1100 buf[i * 2] = l;
1101 buf[i * 2 + 1] = r;
1102 }
1103 }
1104 else {
1105 for (i = 0; i < samples; i++) {
1106 l = buf[i];
1107 l = l * (ll + rl) >> 7;
1108 //r = r * (rr + lr) >> 7;
1109 ssat32_to_16(l);
1110 //ssat32_to_16(r);
1111 buf[i] = l;
1112 }
1113 }
1114}
1115
1116void cdrReadInterrupt() {
1117 u8 *buf;
1118
1119 if (!cdr.Reading)
1120 return;
1121
1122 if (cdr.Irq || cdr.Stat) {
1123 CDR_LOG_I("cdrom: read stat hack %02x %x\n", cdr.Irq, cdr.Stat);
1124 CDREAD_INT(0x1000);
1125 return;
1126 }
1127
1128 cdr.OCUP = 1;
1129 SetResultSize(1);
1130 cdr.StatP |= STATUS_READ|STATUS_ROTATING;
1131 cdr.StatP &= ~STATUS_SEEK;
1132 cdr.Result[0] = cdr.StatP;
1133 cdr.Seeked = SEEK_DONE;
1134
1135 ReadTrack(cdr.SetSector);
1136
1137 buf = CDR_getBuffer();
1138 if (buf == NULL)
1139 cdr.RErr = -1;
1140
1141 if (cdr.RErr == -1) {
1142 CDR_LOG_I("cdrReadInterrupt() Log: err\n");
1143 memset(cdr.Transfer, 0, DATA_SIZE);
1144 cdr.Stat = DiskError;
1145 cdr.Result[0] |= STATUS_ERROR;
1146 CDREAD_INT((cdr.Mode & 0x80) ? (cdReadTime / 2) : cdReadTime);
1147 return;
1148 }
1149
1150 memcpy(cdr.Transfer, buf, DATA_SIZE);
1151 CheckPPFCache(cdr.Transfer, cdr.Prev[0], cdr.Prev[1], cdr.Prev[2]);
1152
1153
1154 CDR_LOG("cdrReadInterrupt() Log: cdr.Transfer %x:%x:%x\n", cdr.Transfer[0], cdr.Transfer[1], cdr.Transfer[2]);
1155
1156 if ((!cdr.Muted) && (cdr.Mode & MODE_STRSND) && (!Config.Xa) && (cdr.FirstSector != -1)) { // CD-XA
1157 // Firemen 2: Multi-XA files - briefings, cutscenes
1158 if( cdr.FirstSector == 1 && (cdr.Mode & MODE_SF)==0 ) {
1159 cdr.File = cdr.Transfer[4 + 0];
1160 cdr.Channel = cdr.Transfer[4 + 1];
1161 }
1162
1163 if ((cdr.Transfer[4 + 2] & 0x4) &&
1164 (cdr.Transfer[4 + 1] == cdr.Channel) &&
1165 (cdr.Transfer[4 + 0] == cdr.File)) {
1166 int ret = xa_decode_sector(&cdr.Xa, cdr.Transfer+4, cdr.FirstSector);
1167 if (!ret) {
1168
1169 cdrAttenuate(cdr.Xa.pcm, cdr.Xa.nsamples, cdr.Xa.stereo);
1170 SPU_playADPCMchannel(&cdr.Xa);
1171 cdr.FirstSector = 0;
1172
1173#if 0
1174 // Crash Team Racing: music, speech
1175 // - done using cdda decoded buffer (spu irq)
1176 // - don't do here
1177
1178 // signal ADPCM data ready
1179 setIrq();
1180#endif
1181 }
1182 else cdr.FirstSector = -1;
1183 }
1184 }
1185
1186 cdr.SetSector[2]++;
1187 if (cdr.SetSector[2] == 75) {
1188 cdr.SetSector[2] = 0;
1189 cdr.SetSector[1]++;
1190 if (cdr.SetSector[1] == 60) {
1191 cdr.SetSector[1] = 0;
1192 cdr.SetSector[0]++;
1193 }
1194 }
1195
1196 cdr.Readed = 0;
1197
1198 CDREAD_INT((cdr.Mode & MODE_SPEED) ? (cdReadTime / 2) : cdReadTime);
1199
1200 /*
1201 Croc 2: $40 - only FORM1 (*)
1202 Judge Dredd: $C8 - only FORM1 (*)
1203 Sim Theme Park - no adpcm at all (zero)
1204 */
1205
1206 if (!(cdr.Mode & MODE_STRSND) || !(cdr.Transfer[4+2] & 0x4)) {
1207 cdr.Stat = DataReady;
1208 setIrq();
1209 }
1210
1211 // update for CdlGetlocP
1212 ReadTrack(cdr.SetSector);
1213
1214 Check_Shell(0);
1215}
1216
1217/*
1218cdrRead0:
1219 bit 0,1 - mode
1220 bit 2 - unknown
1221 bit 3 - unknown
1222 bit 4 - unknown
1223 bit 5 - 1 result ready
1224 bit 6 - 1 dma ready
1225 bit 7 - 1 command being processed
1226*/
1227
1228unsigned char cdrRead0(void) {
1229 if (cdr.ResultReady)
1230 cdr.Ctrl |= 0x20;
1231 else
1232 cdr.Ctrl &= ~0x20;
1233
1234 if (cdr.OCUP)
1235 cdr.Ctrl |= 0x40;
1236// else
1237// cdr.Ctrl &= ~0x40;
1238
1239 // What means the 0x10 and the 0x08 bits? I only saw it used by the bios
1240 cdr.Ctrl |= 0x18;
1241
1242 CDR_LOG_IO("cdr r0: %02x\n", cdr.Ctrl);
1243
1244 return psxHu8(0x1800) = cdr.Ctrl;
1245}
1246
1247void cdrWrite0(unsigned char rt) {
1248 CDR_LOG_IO("cdr w0: %02x\n", rt);
1249
1250 cdr.Ctrl = (rt & 3) | (cdr.Ctrl & ~3);
1251}
1252
1253unsigned char cdrRead1(void) {
1254 if ((cdr.ResultP & 0xf) < cdr.ResultC)
1255 psxHu8(0x1801) = cdr.Result[cdr.ResultP & 0xf];
1256 else
1257 psxHu8(0x1801) = 0;
1258 cdr.ResultP++;
1259 if (cdr.ResultP == cdr.ResultC)
1260 cdr.ResultReady = 0;
1261
1262 CDR_LOG_IO("cdr r1: %02x\n", psxHu8(0x1801));
1263
1264 return psxHu8(0x1801);
1265}
1266
1267void cdrWrite1(unsigned char rt) {
1268 u8 set_loc[3];
1269 int i;
1270
1271 CDR_LOG_IO("cdr w1: %02x\n", rt);
1272
1273 switch (cdr.Ctrl & 3) {
1274 case 0:
1275 break;
1276 case 3:
1277 cdr.AttenuatorRightToRightT = rt;
1278 return;
1279 default:
1280 return;
1281 }
1282
1283 cdr.Cmd = rt;
1284 cdr.OCUP = 0;
1285
1286#ifdef CDR_LOG_CMD_IRQ
1287 SysPrintf("CD1 write: %x (%s)", rt, CmdName[rt]);
1288 if (cdr.ParamC) {
1289 SysPrintf(" Param[%d] = {", cdr.ParamC);
1290 for (i = 0; i < cdr.ParamC; i++)
1291 SysPrintf(" %x,", cdr.Param[i]);
1292 SysPrintf("}\n");
1293 } else {
1294 SysPrintf("\n");
1295 }
1296#endif
1297
1298 cdr.ResultReady = 0;
1299 cdr.Ctrl |= 0x80;
1300 // cdr.Stat = NoIntr;
1301 AddIrqQueue(cdr.Cmd, 0x800);
1302
1303 switch (cdr.Cmd) {
1304 case CdlSync:
1305 case CdlNop:
1306 case CdlForward:
1307 case CdlBackward:
1308 case CdlReadT:
1309 case CdlTest:
1310 case CdlID:
1311 case CdlReadToc:
1312 case CdlGetmode:
1313 case CdlGetlocL:
1314 case CdlGetlocP:
1315 case CdlGetTD:
1316 break;
1317
1318 case CdlSetloc:
1319 StopReading();
1320 for (i = 0; i < 3; i++)
1321 set_loc[i] = btoi(cdr.Param[i]);
1322
1323 // FIXME: clean up this SetSector/SetSectorPlay mess,
1324 // there should be single var tracking current sector pos
1325 if (cdr.Play)
1326 i = msf2sec(cdr.SetSectorPlay);
1327 else
1328 i = msf2sec(cdr.SetSector);
1329 i = abs(i - msf2sec(set_loc));
1330 if (i > 16)
1331 cdr.Seeked = SEEK_PENDING;
1332
1333 memcpy(cdr.SetSector, set_loc, 3);
1334 cdr.SetSector[3] = 0;
1335 break;
1336
1337 case CdlPlay:
1338 // Vib Ribbon: try same track again
1339 StopCdda();
1340
1341#if 0
1342 if (!cdr.SetSector[0] & !cdr.SetSector[1] & !cdr.SetSector[2]) {
1343 if (CDR_getTN(cdr.ResultTN) != -1) {
1344 if (cdr.CurTrack > cdr.ResultTN[1])
1345 cdr.CurTrack = cdr.ResultTN[1];
1346 if (CDR_getTD((unsigned char)(cdr.CurTrack), cdr.ResultTD) != -1) {
1347 int tmp = cdr.ResultTD[2];
1348 cdr.ResultTD[2] = cdr.ResultTD[0];
1349 cdr.ResultTD[0] = tmp;
1350 if (!Config.Cdda) CDR_play(cdr.ResultTD);
1351 }
1352 }
1353 }
1354#endif
1355 // Vib Ribbon - decoded buffer IRQ for CDDA reading
1356 // - fixes ribbon timing + music CD mode
1357 //TODO?
1358 //CDRDBUF_INT( PSXCLK / 44100 * 0x100 );
1359
1360 cdr.Play = TRUE;
1361
1362 cdr.StatP |= STATUS_SEEK;
1363 cdr.StatP &= ~STATUS_ROTATING;
1364 break;
1365
1366 case CdlReadN:
1367 StopReading();
1368 cdr.Reading = 1;
1369 cdr.FirstSector = 1;
1370 cdr.Readed = 0xff;
1371 break;
1372
1373 case CdlStandby:
1374 StopCdda();
1375 StopReading();
1376 break;
1377
1378 case CdlStop:
1379 // GameShark CD Player: Reset CDDA to track start
1380 if (cdr.Play) {
1381 // grab time for current track
1382 CDR_getTD((u8)(cdr.CurTrack), cdr.ResultTD);
1383
1384 cdr.SetSectorPlay[0] = cdr.ResultTD[2];
1385 cdr.SetSectorPlay[1] = cdr.ResultTD[1];
1386 cdr.SetSectorPlay[2] = cdr.ResultTD[0];
1387 }
1388
1389 StopCdda();
1390 StopReading();
1391 break;
1392
1393 case CdlPause:
1394 /*
1395 GameShark CD Player: save time for resume
1396
1397 Twisted Metal - World Tour: don't mix Setloc / CdlPlay cursors
1398 */
1399
1400 StopCdda();
1401 StopReading();
1402 break;
1403
1404 case CdlReset:
1405 case CdlInit:
1406 cdr.Seeked = SEEK_DONE;
1407 StopCdda();
1408 StopReading();
1409 break;
1410
1411 case CdlMute:
1412 cdr.Muted = TRUE;
1413 // Duke Nukem - Time to Kill
1414 // - do not directly set cd-xa volume
1415 //SPU_writeRegister( H_CDLeft, 0x0000 );
1416 //SPU_writeRegister( H_CDRight, 0x0000 );
1417 break;
1418
1419 case CdlDemute:
1420 cdr.Muted = FALSE;
1421
1422 // Duke Nukem - Time to Kill
1423 // - do not directly set cd-xa volume
1424 //SPU_writeRegister( H_CDLeft, 0x7f00 );
1425 //SPU_writeRegister( H_CDRight, 0x7f00 );
1426 break;
1427
1428 case CdlSetfilter:
1429 cdr.File = cdr.Param[0];
1430 cdr.Channel = cdr.Param[1];
1431 break;
1432
1433 case CdlSetmode:
1434 CDR_LOG("cdrWrite1() Log: Setmode %x\n", cdr.Param[0]);
1435
1436 cdr.Mode = cdr.Param[0];
1437
1438 // Squaresoft on PlayStation 1998 Collector's CD Vol. 1
1439 // - fixes choppy movie sound
1440 if( cdr.Play && (cdr.Mode & MODE_CDDA) == 0 )
1441 StopCdda();
1442 break;
1443
1444 case CdlGetTN:
1445 //AddIrqQueue(cdr.Cmd, 0x800);
1446
1447 // GameShark CDX CD Player: very long time
1448 AddIrqQueue(cdr.Cmd, 0x100000);
1449 break;
1450
1451 case CdlSeekL:
1452 case CdlSeekP:
1453 // Tomb Raider 2 - reset cdda
1454 StopCdda();
1455 StopReading();
1456 break;
1457
1458 case CdlReadS:
1459 StopReading();
1460 cdr.Reading = 2;
1461 cdr.FirstSector = 1;
1462 cdr.Readed = 0xff;
1463 break;
1464
1465 default:
1466 cdr.ParamC = 0;
1467 CDR_LOG_I("cdrWrite1() Log: Unknown command: %x\n", cdr.Cmd);
1468 return;
1469 }
1470}
1471
1472unsigned char cdrRead2(void) {
1473 unsigned char ret;
1474
1475 if (cdr.Readed == 0) {
1476 ret = 0;
1477 } else {
1478 ret = *pTransfer++;
1479 }
1480
1481 CDR_LOG_IO("cdr r2: %02x\n", ret);
1482 return ret;
1483}
1484
1485void cdrWrite2(unsigned char rt) {
1486 CDR_LOG_IO("cdr w2: %02x\n", rt);
1487
1488 switch (cdr.Ctrl & 3) {
1489 case 0:
1490 if (cdr.ParamC < 8) // FIXME: size and wrapping
1491 cdr.Param[cdr.ParamC++] = rt;
1492 return;
1493 case 1:
1494 cdr.Reg2 = rt;
1495 setIrq();
1496 return;
1497 case 2:
1498 cdr.AttenuatorLeftToLeftT = rt;
1499 return;
1500 case 3:
1501 cdr.AttenuatorRightToLeftT = rt;
1502 return;
1503 }
1504}
1505
1506unsigned char cdrRead3(void) {
1507 if (cdr.Ctrl & 0x1)
1508 psxHu8(0x1803) = cdr.Stat | 0xE0;
1509 else
1510 psxHu8(0x1803) = cdr.Reg2 | 0xE0;
1511
1512 CDR_LOG_IO("cdr r3: %02x\n", psxHu8(0x1803));
1513 return psxHu8(0x1803);
1514}
1515
1516void cdrWrite3(unsigned char rt) {
1517 CDR_LOG_IO("cdr w3: %02x\n", rt);
1518
1519 switch (cdr.Ctrl & 3) {
1520 case 0:
1521 break; // transfer
1522 case 1:
1523 cdr.Stat &= ~rt;
1524
1525 if (rt & 0x40)
1526 cdr.ParamC = 0;
1527 return;
1528 case 2:
1529 cdr.AttenuatorLeftToRightT = rt;
1530 return;
1531 case 3:
1532 if (rt & 0x20) {
1533 memcpy(&cdr.AttenuatorLeftToLeft, &cdr.AttenuatorLeftToLeftT, 4);
1534 CDR_LOG_I("CD-XA Volume: %02x %02x | %02x %02x\n",
1535 cdr.AttenuatorLeftToLeft, cdr.AttenuatorLeftToRight,
1536 cdr.AttenuatorRightToLeft, cdr.AttenuatorRightToRight);
1537 }
1538 return;
1539 }
1540
1541 if ((rt & 0x80) && cdr.Readed == 0) {
1542 cdr.Readed = 1;
1543 pTransfer = cdr.Transfer;
1544
1545 switch (cdr.Mode & 0x30) {
1546 case MODE_SIZE_2328:
1547 case 0x00:
1548 pTransfer += 12;
1549 break;
1550
1551 case MODE_SIZE_2340:
1552 pTransfer += 0;
1553 break;
1554
1555 default:
1556 break;
1557 }
1558 }
1559}
1560
1561void psxDma3(u32 madr, u32 bcr, u32 chcr) {
1562 u32 cdsize;
1563 int size;
1564 u8 *ptr;
1565
1566 CDR_LOG("psxDma3() Log: *** DMA 3 *** %x addr = %x size = %x\n", chcr, madr, bcr);
1567
1568 switch (chcr) {
1569 case 0x11000000:
1570 case 0x11400100:
1571 if (cdr.Readed == 0) {
1572 CDR_LOG("psxDma3() Log: *** DMA 3 *** NOT READY\n");
1573 break;
1574 }
1575
1576 cdsize = (bcr & 0xffff) * 4;
1577
1578 // Ape Escape: bcr = 0001 / 0000
1579 // - fix boot
1580 if( cdsize == 0 )
1581 {
1582 switch (cdr.Mode & 0x30) {
1583 case 0x00: cdsize = 2048; break;
1584 case MODE_SIZE_2328: cdsize = 2328; break;
1585 case MODE_SIZE_2340: cdsize = 2340; break;
1586 }
1587 }
1588
1589
1590 ptr = (u8 *)PSXM(madr);
1591 if (ptr == NULL) {
1592 CDR_LOG("psxDma3() Log: *** DMA 3 *** NULL Pointer!\n");
1593 break;
1594 }
1595
1596 /*
1597 GS CDX: Enhancement CD crash
1598 - Setloc 0:0:0
1599 - CdlPlay
1600 - Spams DMA3 and gets buffer overrun
1601 */
1602 size = CD_FRAMESIZE_RAW - (pTransfer - cdr.Transfer);
1603 if (size > cdsize)
1604 size = cdsize;
1605 if (size > 0)
1606 {
1607 memcpy(ptr, pTransfer, size);
1608 }
1609
1610 psxCpu->Clear(madr, cdsize / 4);
1611 pTransfer += cdsize;
1612
1613
1614 // burst vs normal
1615 if( chcr == 0x11400100 ) {
1616 CDRDMA_INT( (cdsize/4) / 4 );
1617 }
1618 else if( chcr == 0x11000000 ) {
1619 CDRDMA_INT( (cdsize/4) * 1 );
1620 }
1621 return;
1622
1623 default:
1624 CDR_LOG("psxDma3() Log: Unknown cddma %x\n", chcr);
1625 break;
1626 }
1627
1628 HW_DMA3_CHCR &= SWAP32(~0x01000000);
1629 DMA_INTERRUPT(3);
1630}
1631
1632void cdrDmaInterrupt()
1633{
1634 if (HW_DMA3_CHCR & SWAP32(0x01000000))
1635 {
1636 HW_DMA3_CHCR &= SWAP32(~0x01000000);
1637 DMA_INTERRUPT(3);
1638 }
1639}
1640
1641static void getCdInfo(void)
1642{
1643 u8 tmp;
1644
1645 CDR_getTN(cdr.ResultTN);
1646 CDR_getTD(0, cdr.SetSectorEnd);
1647 tmp = cdr.SetSectorEnd[0];
1648 cdr.SetSectorEnd[0] = cdr.SetSectorEnd[2];
1649 cdr.SetSectorEnd[2] = tmp;
1650}
1651
1652void cdrReset() {
1653 memset(&cdr, 0, sizeof(cdr));
1654 cdr.CurTrack = 1;
1655 cdr.File = 1;
1656 cdr.Channel = 1;
1657 pTransfer = cdr.Transfer;
1658
1659 // BIOS player - default values
1660 cdr.AttenuatorLeftToLeft = 0x80;
1661 cdr.AttenuatorLeftToRight = 0x00;
1662 cdr.AttenuatorRightToLeft = 0x00;
1663 cdr.AttenuatorRightToRight = 0x80;
1664
1665 getCdInfo();
1666}
1667
1668int cdrFreeze(void *f, int Mode) {
1669 u32 tmp;
1670 u8 tmpp[3];
1671
1672 if (Mode == 0 && !Config.Cdda)
1673 CDR_stop();
1674
1675 cdr.freeze_ver = 0x63647201;
1676 gzfreeze(&cdr, sizeof(cdr));
1677
1678 if (Mode == 1) {
1679 cdr.ParamP = cdr.ParamC;
1680 tmp = pTransfer - cdr.Transfer;
1681 }
1682
1683 gzfreeze(&tmp, sizeof(tmp));
1684
1685 if (Mode == 0) {
1686 getCdInfo();
1687
1688 pTransfer = cdr.Transfer + tmp;
1689
1690 // read right sub data
1691 memcpy(tmpp, cdr.Prev, 3);
1692 cdr.Prev[0]++;
1693 ReadTrack(tmpp);
1694
1695 if (cdr.Play) {
1696 Find_CurTrack(cdr.SetSectorPlay);
1697 if (!Config.Cdda)
1698 CDR_play(cdr.SetSectorPlay);
1699 }
1700
1701 if ((cdr.freeze_ver & 0xffffff00) != 0x63647200) {
1702 // old versions did not latch Reg2, have to fixup..
1703 if (cdr.Reg2 == 0) {
1704 SysPrintf("cdrom: fixing up old savestate\n");
1705 cdr.Reg2 = 7;
1706 }
1707 }
1708 }
1709
1710 return 0;
1711}
1712
1713void LidInterrupt() {
1714 cdr.LidCheck = 0x20; // start checker
1715
1716 getCdInfo();
1717
1718 StopCdda();
1719 CDRLID_INT( cdReadTime * 3 );
1720
1721 // generate interrupt if none active - open or close
1722 if (cdr.Irq == 0 || cdr.Irq == 0xff) {
1723 cdr.Ctrl |= 0x80;
1724 cdr.Stat = NoIntr;
1725 AddIrqQueue(CdlNop, 0x800);
1726 }
1727}