#include "scsi_cdrom.h"
#include "../fifo.h"
+#include <algorithm>
+#include <cctype>
+
#define CDDA_OFF 0
#define CDDA_PLAYING 1
#define CDDA_PAUSED 2
-//#define _SCSI_DEBUG_LOG
+
+#define _SCSI_DEBUG_LOG
#define _CDROM_DEBUG_LOG
+
// 0-99 is reserved for SCSI_DEV class
-#define EVENT_CDDA 100
+#define EVENT_CDDA 100
+#define EVENT_CDDA_DELAY_PLAY 101
+#define EVENT_CDROM_SEEK_SCSI 102
+#define EVENT_CDROM_DELAY_INTERRUPT_ON 103
+#define EVENT_CDROM_DELAY_INTERRUPT_OFF 104
+#define EVENT_CDDA_DELAY_STOP 105
void SCSI_CDROM::initialize()
{
mix_loop_num = 0;
}
event_cdda = -1;
+ event_cdda_delay_play = -1;
+ event_delay_interrupt = -1;
cdda_status = CDDA_OFF;
is_cue = false;
current_track = 0;
+ read_sectors = 0;
for(int i = 0; i < 99; i++) {
memset(track_data_path[i], 0x00, _MAX_PATH * sizeof(_TCHAR));
}
void SCSI_CDROM::reset()
{
touch_sound();
+ if(event_delay_interrupt != -1) cancel_event(this, event_delay_interrupt);
+ if(event_cdda_delay_play != -1) cancel_event(this, event_cdda_delay_play);
+ if(event_cdda != -1) cancel_event(this, event_cdda);
+ event_cdda = -1;
+ event_cdda_delay_play = -1;
+ event_delay_interrupt = -1;
SCSI_DEV::reset();
+ read_mode = false;
set_cdda_status(CDDA_OFF);
+ read_sectors = 0;
// Q: Does not seek to track 0? 20181118 K.O
//current_track = 0;
+
+}
+
+void SCSI_CDROM::write_signal(int id, uint32_t data, uint32_t mask)
+{
+ bool _b = ((data & mask) != 0);
+ switch(id) {
+ case SIG_SCSI_CDROM_CDDA_STOP:
+ if(cdda_status != CDDA_OFF) {
+ if(_b) set_cdda_status(CDDA_OFF);
+ }
+ break;
+ case SIG_SCSI_CDROM_CDDA_PLAY:
+ if(cdda_status != CDDA_PLAYING) {
+ if(_b) set_cdda_status(CDDA_PLAYING);
+ }
+ break;
+ case SIG_SCSI_CDROM_CDDA_PAUSE:
+ if(cdda_status != CDDA_PAUSED) {
+ if(_b) set_cdda_status(CDDA_PAUSED);
+ }
+ break;
+ default:
+ SCSI_DEV::write_signal(id, data, mask);
+ break;
+ }
}
uint32_t SCSI_CDROM::read_signal(int id)
void SCSI_CDROM::event_callback(int event_id, int err)
{
switch (event_id) {
+ case EVENT_CDROM_DELAY_INTERRUPT_ON:
+ write_signals(&outputs_done, 0xffffffff);
+ event_delay_interrupt = -1;
+ break;
+ case EVENT_CDROM_DELAY_INTERRUPT_OFF:
+ write_signals(&outputs_done, 0x00000000);
+ event_delay_interrupt = -1;
+ break;
+ case EVENT_CDDA_DELAY_PLAY:
+ if(cdda_status != CDDA_PLAYING) {
+ set_cdda_status(CDDA_PLAYING);
+ }
+ event_cdda_delay_play = -1;
+ break;
+ case EVENT_CDROM_SEEK_SCSI:
+ seek_time = 10.0;
+ event_cdda_delay_play = -1;
+ SCSI_DEV::start_command();
+ break;
case EVENT_CDDA:
+ if(event_cdda_delay_play > -1) return; // WAIT for SEEK COMPLETED
// read 16bit 2ch samples in the cd-da buffer, called 44100 times/sec
+
cdda_sample_l = (int)(int16_t)(cdda_buffer[cdda_buffer_ptr + 0] + cdda_buffer[cdda_buffer_ptr + 1] * 0x100);
cdda_sample_r = (int)(int16_t)(cdda_buffer[cdda_buffer_ptr + 2] + cdda_buffer[cdda_buffer_ptr + 3] * 0x100);
-
+ // ToDo: CLEAR IRQ Line (for PCE)
if((cdda_buffer_ptr += 4) % 2352 == 0) {
// one frame finished
if(++cdda_playing_frame == cdda_end_frame) {
// reached to end frame
#ifdef _CDROM_DEBUG_LOG
- this->out_debug_log(_T("Reaches to the end of track. REPEAT=%s\n"), (cdda_repeat) ? _T("YES") : _T("NO"));
+ this->out_debug_log(_T("Reaches to the end of track.(FRAME %d). START_FRAME=%d END_FRAME=%d REPEAT=%s INTERRUPT=%s\n"),
+ cdda_playing_frame, cdda_start_frame, cdda_end_frame,
+ (cdda_repeat) ? _T("YES") : _T("NO"), (cdda_interrupt) ? _T("YES") : _T("NO"));
#endif
if(cdda_repeat) {
// reload buffer
if(is_cue) {
fio_img->Fclose();
- current_track = 0;
- int trk = get_track(cdda_start_frame);
- //int trk = current_track;
+ //current_track = 0;
+ //int trk = get_track(cdda_start_frame);
+ int trk = current_track;
fio_img->Fseek((cdda_start_frame - toc_table[trk].lba_offset) * 2352, FILEIO_SEEK_SET);
} else {
fio_img->Fseek(cdda_start_frame * 2352, FILEIO_SEEK_SET);
}
- fio_img->Fread(cdda_buffer, sizeof(cdda_buffer), 1);
+ read_sectors = fio_img->Fread(cdda_buffer, 2352 * sizeof(uint8_t) , array_length(cdda_buffer) / 2352);
cdda_buffer_ptr = 0;
cdda_playing_frame = cdda_start_frame;
access = true;
} else {
- // stop
- if(cdda_interrupt) {
- write_signals(&outputs_done, 0xffffffff);
- }
+ // Stop
+ //if(event_cdda_delay_play >= 0) cancel_event(this, event_cdda_delay_play);
set_cdda_status(CDDA_OFF);
+ //register_event(this, EVENT_CDDA_DELAY_STOP, 1000.0, false, &event_cdda_delay_play);
}
- } else if(cdda_buffer_ptr == array_length(cdda_buffer)) {
+ } else if((cdda_buffer_ptr % 2352) == 0) {
// refresh buffer
- fio_img->Fread(cdda_buffer, sizeof(cdda_buffer), 1);
- cdda_buffer_ptr = 0;
- access = true;
+ read_sectors--;
+ if(read_sectors <= 0) {
+ read_sectors = fio_img->Fread(cdda_buffer, 2352 * sizeof(uint8_t), array_length(cdda_buffer) / 2352);
+ cdda_buffer_ptr = 0;
+ access = true;
+ } else {
+ }
}
}
break;
+ case EVENT_CDDA_DELAY_STOP:
+ if(cdda_interrupt) {
+ write_signals(&outputs_done, 0xffffffff);
+ }
+ set_cdda_status(CDDA_OFF);
+ event_cdda_delay_play = -1;
+ break;
default:
SCSI_DEV::event_callback(event_id, err);
break;
}
}
if(cdda_status != CDDA_PLAYING) {
+ //// Notify to release bus.
+ write_signals(&outputs_done, 0x00000000);
+ if(cdda_status == CDDA_OFF) {
+ //get_track_by_track_num(current_track); // Re-Play
+ //memset(cdda_buffer, 0x00, sizeof(cdda_buffer));
+ cdda_playing_frame = cdda_start_frame;
+ get_track(cdda_playing_frame);
+ cdda_buffer_ptr = 0;
+ } else if(cdda_status == CDDA_PAUSED) {
+ // Unpause
+ access = true;
+ }
touch_sound();
set_realtime_render(this, true);
#ifdef _CDROM_DEBUG_LOG
- this->out_debug_log(_T("START Playing CDDA.\n"));
+ this->out_debug_log(_T("Play CDDA from %s.\n"), (cdda_status == CDDA_PAUSED) ? _T("PAUSED") : _T("STOPPED"));
#endif
}
} else {
- //if(status == CDDA_OFF) {
- // if((status != cdda_status) && (is_cue)) {
- // if(fio_img->IsOpened()) fio_img->Fclose();
- // }
- //}
if(event_cdda != -1) {
cancel_event(this, event_cdda);
event_cdda = -1;
}
if(cdda_status == CDDA_PLAYING) {
+ // Notify to release bus.
+ write_signals(&outputs_done, 0x00000000);
+ //if(event_delay_interrupt >= 0) cancel_event(this, event_delay_interrupt);
+ //register_event(this, EVENT_CDROM_DELAY_INTERRUPT_OFF, 1.0e6 / (44100.0 * 2352), false, &event_delay_interrupt);
+ if(status == CDDA_OFF) {
+ memset(cdda_buffer, 0x00, sizeof(cdda_buffer));
+ cdda_buffer_ptr = 0;
+ read_sectors = 0;
+ //if(is_cue) {
+ // if(fio_img->IsOpened()) fio_img->Fclose();
+ //}
+ //current_track = 0;
+ }
touch_sound();
set_realtime_render(this, false);
#ifdef _CDROM_DEBUG_LOG
- this->out_debug_log(_T("STOP Playing CDDA.\n"));
+ this->out_debug_log(_T("%s playing CDDA.\n"), (status == CDDA_PAUSED) ? _T("PAUSE") : _T("STOP"));
#endif
}
}
void SCSI_CDROM::get_track_by_track_num(int track)
{
- if((track <= 0) || (track > track_num)) {
+ if((track <= 0) || (track >= track_num)) {
if(is_cue) {
if(fio_img->IsOpened()) fio_img->Fclose();
}
if((strlen(track_data_path[track - 1]) <= 0) ||
!(fio_img->Fopen(track_data_path[track - 1], FILEIO_READ_BINARY))) {
track = 0;
- }
+ }
} else {
track = 0;
}
current_track = track;
}
-int SCSI_CDROM::get_track(uint32_t lba)
+// Detect only track num.
+int SCSI_CDROM::get_track_noop(uint32_t lba)
{
int track = 0;
-
-// if(is_cue) {
-// for(int i = 1; i <= track_num; i++) {
-// if(lba >= toc_table[i].lba_offset) {
-// track = i;
-// } else {
-// break;
-// }
-// }
-// } else {
- for(int i = 0; i < track_num; i++) {
- if(lba >= toc_table[i].index0) {
- track = i;
- } else {
- break;
- }
+ for(int i = 0; i < track_num; i++) {
+ if(lba >= toc_table[i].index0) {
+ track = i;
+ } else {
+ break;
}
-// }
+ }
+ return track;
+}
+
+int SCSI_CDROM::get_track(uint32_t lba)
+{
+ int track = 0;
+ track = get_track_noop(lba);
if(is_cue) {
get_track_by_track_num(track);
} else {
double SCSI_CDROM::get_seek_time(uint32_t lba)
{
if(fio_img->IsOpened()) {
- uint32_t cur_position = (int)fio_img->Ftell();
- int distance = abs((int)(lba * physical_block_size()) - (int)cur_position);
- double ratio = (double)distance / 333000 / physical_block_size(); // 333000: sectors in media
+ uint32_t cur_position = (uint32_t)fio_img->Ftell();
+ int distance;
+ if(is_cue) {
+ int track = 0;
+ for(int i = 0; i < track_num; i++) {
+ if(lba >= toc_table[i].index0) {
+ track = i;
+ } else {
+ break;
+ }
+ }
+ distance = abs((int)(lba * physical_block_size()) - (int)(cur_position + toc_table[current_track].lba_offset * physical_block_size()));
+ if(track != current_track) {
+ current_track = get_track(lba);
+ }
+ } else {
+ distance = abs((int)(lba * physical_block_size()) - (int)cur_position);
+ }
+ double ratio = ((double)distance / 333000.0) / physical_block_size(); // 333000: sectors in media
return max(10, (int)(400000 * 2 * ratio));
} else {
return 400000; // 400msec
{
touch_sound();
#ifdef _SCSI_DEBUG_LOG
- this->out_debug_log(_T("[SCSI_DEV:ID=%d] Command: #%02x %02x %02x %02x %02x %02x\n"), scsi_id, command[0], command[1], command[2], command[3], command[4], command[5]);
+// this->out_debug_log(_T("[SCSI_DEV:ID=%d] Command: #%02x %02x %02x %02x %02x %02x\n"), scsi_id, command[0], command[1], command[2], command[3], command[4], command[5]);
#endif
switch(command[0]) {
case SCSI_CMD_READ6:
- seek_time = 10;//get_seek_time((command[1] & 0x1f) * 0x10000 + command[2] * 0x100 + command[3]);
+ //seek_time = 10;//get_seek_time((command[1] & 0x1f) * 0x10000 + command[2] * 0x100 + command[3]);
+ seek_time = get_seek_time((command[1] & 0x1f) * 0x10000 + command[2] * 0x100 + command[3]);
set_cdda_status(CDDA_OFF);
+ if(seek_time > 10.0) {
+ if(event_cdda_delay_play >= 0) {
+ cancel_event(this, event_cdda_delay_play);
+ event_cdda_delay_play = -1;
+ }
+ register_event(this, EVENT_CDROM_SEEK_SCSI, seek_time - 10.0, false, &event_cdda_delay_play);
+ return;
+ } else {
+ seek_time = 10.0;
+ }
break;
-
case SCSI_CMD_READ10:
case SCSI_CMD_READ12:
- seek_time = 10;//get_seek_time(command[2] * 0x1000000 + command[3] * 0x10000 + command[4] * 0x100 + command[5]);
+ seek_time = get_seek_time((command[1] & 0x1f) * 0x10000 + command[2] * 0x100 + command[3]);
set_cdda_status(CDDA_OFF);
+ if(seek_time > 10.0) {
+ if(event_cdda_delay_play >= 0) {
+ cancel_event(this, event_cdda_delay_play);
+ event_cdda_delay_play = -1;
+ }
+ register_event(this, EVENT_CDROM_SEEK_SCSI, seek_time - 10.0, false, &event_cdda_delay_play);
+ return;
+ } else {
+ seek_time = 10.0;
+ }
break;
+ case SCSI_CMD_MODE_SEL6:
+ #ifdef _SCSI_DEBUG_LOG
+ this->out_debug_log(_T("[SCSI_DEV:ID=%d] Command: NEC Read Mode Select 6-byte\n"), scsi_id);
+ #endif
+ // start position
+// position = (command[1] & 0x1f) * 0x10000 + command[2] * 0x100 + command[3];
+// position *= physical_block_size();
+ position = 0;
+ // transfer length
+// remain = command[4];// * logical_block_size();
+ remain = 11;
+ if(remain != 0) {
+ // clear data buffer
+ buffer->clear();
+ // change to data in phase
+ set_phase_delay(SCSI_PHASE_DATA_OUT, seek_time);
+ } else {
+ // transfer length is zero, change to status phase
+ set_dat(SCSI_STATUS_GOOD);
+ set_sense_code(SCSI_SENSE_NOSENSE);
+ set_phase_delay(SCSI_PHASE_STATUS, 10.0);
+ }
+ return;
+
case 0xd8:
#ifdef _SCSI_DEBUG_LOG
- this->out_debug_log(_T("[SCSI_DEV:ID=%d] Command: NEC Set Audio Playback Start Position CMD=%02x\n"), scsi_id, ((command[2] == 0) && (command[3] == 0) && (command[4] == 0)) ? 0x00 : command[9]);
+ this->out_debug_log(_T("[SCSI_DEV:ID=%d] Command: NEC Set Audio Playback Start Position CMD=%02x ARG=%02x %02x %02x %02x\n"), scsi_id, command[9], command[2], command[3], command[4], command[5]);
#endif
if(is_device_ready()) {
if(command[2] == 0 && command[3] == 0 && command[4] == 0) {
// stop cd-da if all params are zero
cdda_start_frame = 0;
cdda_end_frame = toc_table[track_num].index0; // end of disc
+ double seek_time = get_seek_time(cdda_end_frame);
if(is_cue) {
get_track_by_track_num(track_num);
}
- set_cdda_status(CDDA_OFF);
+ //set_cdda_status(CDDA_OFF);
+ if(event_cdda_delay_play >= 0) cancel_event(this, event_cdda_delay_play);
+ register_event(this, EVENT_CDDA_DELAY_STOP, (seek_time > 10.0) ? seek_time : 10.0, false, &event_cdda_delay_play);
} else {
uint32_t seek_offset = 0;
switch(command[9] & 0xc0) {
// PCE tries to be clever here and set (start of track + track pregap size) to skip the pregap
// (I guess it wants the TOC to have the real start sector for data tracks and the start of the pregap for audio?)
int track = get_track(cdda_start_frame);
-// if((is_cue) && (track > 1)) {
-// if(cdda_start_frame >= toc_table[track - 1].lba_offset) {
-// cdda_start_frame = cdda_start_frame - toc_table[track - 1].lba_offset;
-// } else {
-// cdda_start_frame = 0;
-// }
-// }
- cdda_start_frame -= toc_table[track].pregap;
-
- if(cdda_start_frame < toc_table[track].index1) {
- cdda_start_frame = toc_table[track].index1; // don't play pregap
+ if(cdda_start_frame >= toc_table[track].pregap) {
+ cdda_start_frame -= toc_table[track].pregap;
+ }
+ if(cdda_start_frame < toc_table[track].index0) {
+ cdda_start_frame = toc_table[track].index0; // don't play pregap
} else if(cdda_start_frame > max_logical_block) {
cdda_start_frame = 0;
}
}
break;
case 0x80:
- if(is_cue) {
- int trk = FROM_BCD(command[2]) - 1;
- get_track_by_track_num(trk);
+ {
+ int8_t track = FROM_BCD(command[2] - 1);
+ cdda_start_frame = toc_table[track].index1;
+ if(cdda_start_frame >= toc_table[track].pregap) {
+ cdda_start_frame -= toc_table[track].pregap;
+ }
}
- cdda_start_frame = toc_table[FROM_BCD(command[2]) - 1].index1;
break;
default:
cdda_start_frame = 0;
// cdda_end_frame = toc_table[track_num].index0; // end of disc
// set_cdda_status(CDDA_OFF);
// } else
+ double delay_time = get_seek_time(cdda_start_frame);
if((command[1] & 3) != 0) {
if((is_cue) && (current_track != track_num)){
get_track_by_track_num(track_num);
}
cdda_end_frame = toc_table[track_num].index0; // end of disc
- set_cdda_status(CDDA_PLAYING);
+ double seek_time = get_seek_time(cdda_start_frame);
+ if(event_cdda_delay_play >= 0) {
+ cancel_event(this, event_cdda_delay_play);
+ event_cdda_delay_play = -1;
+ }
+ //set_cdda_status(CDDA_PLAYING);
+ register_event(this, EVENT_CDROM_SEEK_SCSI, seek_time, false, &event_cdda_delay_play);
} else {
uint32_t _sframe = cdda_start_frame;
- int _trk;
-// if((is_cue) && (current_track > 0)) {
-// _sframe = _sframe + toc_table[current_track].lba_offset;
-// cdda_end_frame = toc_table[get_track(_sframe) + 1].index1; // end of this track
-// } else {
- cdda_end_frame = toc_table[get_track(_sframe) + 1].index1; // end of this track
-// }
+ //cdda_end_frame = toc_table[get_track(_sframe) + 1].index1; // end of this track
+ //cdda_end_frame = toc_table[get_track(_sframe)].index1; // end of this track
set_cdda_status(CDDA_PAUSED);
}
cdda_repeat = false;
cdda_interrupt = ((command[1] & 3) == 2);
// read buffer
- double seek_time = get_seek_time(cdda_start_frame);
+ //double delay_time = 10.0;
+#if 1
if(is_cue) {
- int trk = get_track(cdda_start_frame);
- fio_img->Fseek((cdda_start_frame - toc_table[trk].lba_offset) * 2352, FILEIO_SEEK_SET);
+ //if(cdda_start_frame > 150) cdda_start_frame = cdda_start_frame - 150;
+ fio_img->Fseek((cdda_start_frame - toc_table[current_track].index0) * 2352, FILEIO_SEEK_SET);
} else {
fio_img->Fseek(cdda_start_frame * 2352, FILEIO_SEEK_SET);
}
- fio_img->Fread(cdda_buffer, sizeof(cdda_buffer), 1);
+#endif
+ read_sectors = fio_img->Fread(cdda_buffer, 2352 * sizeof(uint8_t), array_length(cdda_buffer) / 2352);
cdda_buffer_ptr = 0;
cdda_playing_frame = cdda_start_frame;
access = true;
// change to status phase
set_dat(SCSI_STATUS_GOOD);
- set_phase_delay(SCSI_PHASE_STATUS, seek_time);
+ // From Mame 0.203
+ if(event_delay_interrupt >= 0) cancel_event(this, event_delay_interrupt);
+ register_event(this, EVENT_CDROM_DELAY_INTERRUPT_ON, delay_time, false, &event_delay_interrupt);
+ //set_phase_delay(SCSI_PHASE_STATUS, delay_time + 10.0);
+ //write_signals(&outputs_done, 0xffffffff);
+ set_phase_delay(SCSI_PHASE_STATUS, 10.0);
return;
}
}
// change to status phase
set_dat(is_device_ready() ? SCSI_STATUS_GOOD : SCSI_STATUS_CHKCOND);
+ // From Mame 0.203
+ //if(is_device_ready()) write_signals(&outputs_done, 0xffffffff);
set_phase_delay(SCSI_PHASE_STATUS, 10.0);
+
return;
case 0xd9:
this->out_debug_log(_T("[SCSI_DEV:ID=%d] Command: NEC Set Audio Playback End Position CMD=%02x ARG=%02x %02x %02x %02x\n"), scsi_id, command[9], command[2], command[3], command[4], command[5]);
#endif
if(is_device_ready()) {
+
switch(command[9] & 0xc0) {
case 0x00:
cdda_end_frame = (command[3] << 16) | (command[4] << 8) | command[5];
-// if(is_cue) {
-// int track = get_track(cdda_end_frame);
-// if(track > 1) {
-// if(cdda_end_frame >= toc_table[track].lba_offset) {
-// cdda_end_frame = cdda_end_frame - toc_table[track].lba_offset;
-// } else {
-// cdda_end_frame = 0;
-// }
-// }
-// }
break;
case 0x40:
{
uint8_t s = FROM_BCD(command[3]);
uint8_t f = FROM_BCD(command[4]);
cdda_end_frame = f + 75 * (s + m * 60);
- //printf("END FRAME=%d\n", cdda_end_frame);
// PCE tries to be clever here and set (start of track + track pregap size) to skip the pregap
// (I guess it wants the TOC to have the real start sector for data tracks and the start of the pregap for audio?)
- int track =get_track(cdda_end_frame);
-// if((is_cue) && (track > 1)) {
-// if(cdda_end_frame >= toc_table[track - 1].lba_offset) {
-// cdda_end_frame = cdda_end_frame - toc_table[track - 1].lba_offset;
-// } else {
-// cdda_end_frame = 0;
-// }
-// //if(cdda_end_frame >= toc_table[track - 1].lba_size) {
-// // cdda_end_frame = toc_table[track - 1].lba_size - 1;
-// //}
-// //if(toc_table[track - 1].lba_size == 0) cdda_end_frame = 0;
+
+// int track = get_track(cdda_start_frame);
+ int track = current_track;
+ cdda_playing_frame = cdda_start_frame;
+// if(is_cue) {
+// fio_img->Fseek((cdda_start_frame - toc_table[current_track].lba_offset) * 2352, FILEIO_SEEK_SET);
+// } else {
+// fio_img->Fseek(cdda_start_frame * 2352, FILEIO_SEEK_SET);
// }
- if(cdda_end_frame > toc_table[track].index1 && (cdda_end_frame - toc_table[track].pregap) <= toc_table[track].index1) {
- cdda_end_frame = toc_table[track].index1;
+ //read_sectors = fio_img->Fread(cdda_buffer, 2352 * sizeof(uint8_t), array_length(cdda_buffer) / 2352);
+
+ if(cdda_end_frame > toc_table[track + 1].index1 && (cdda_end_frame - toc_table[track].pregap) <= toc_table[track + 1].index1) {
+ cdda_end_frame = toc_table[track + 1].index1;
}
+ cdda_buffer_ptr = 0;
}
break;
case 0x80:
{
int _track = FROM_BCD(command[2]) - 1;
if(_track >= 0) {
- cdda_end_frame = toc_table[_track].index1;
+ cdda_end_frame = toc_table[_track].index0;
if(is_cue) {
- if(_track != current_track) {
+ if(current_track != _track) {
get_track_by_track_num(_track);
+ cdda_start_frame = toc_table[_track].index0;
+ cdda_end_frame = toc_table[_track].lba_size + toc_table[_track].lba_offset;
+ cdda_playing_frame = cdda_start_frame;
+ if(is_cue) {
+ fio_img->Fseek((cdda_start_frame - toc_table[current_track].lba_offset) * 2352, FILEIO_SEEK_SET);
+ } else {
+ fio_img->Fseek(cdda_start_frame * 2352, FILEIO_SEEK_SET);
+ }
+ read_sectors = fio_img->Fread(cdda_buffer, 2352 * sizeof(uint8_t), array_length(cdda_buffer) / 2352);
+ cdda_buffer_ptr = 0;
}
}
}
}
break;
+ default:
+ break; // ToDo
}
if((command[1] & 3) != 0) {
- set_cdda_status(CDDA_PLAYING);
cdda_repeat = ((command[1] & 3) == 1);
- //cdda_repeat = ((command[1] & 1) == 1);
cdda_interrupt = ((command[1] & 3) == 2);
+
+ if(event_cdda_delay_play >= 0) cancel_event(this, event_cdda_delay_play);
+ register_event(this, EVENT_CDDA_DELAY_PLAY, 10.0, false, &event_cdda_delay_play);
+ //set_cdda_status(CDDA_PLAYING);
} else {
set_cdda_status(CDDA_OFF);
+ cdda_start_frame = toc_table[track_num].index0;;
+ cdda_end_frame = toc_table[track_num].index1; // end of disc
+ double seek_time = get_seek_time(cdda_start_frame);
+ //double seek_time = 10.0;
+ get_track_by_track_num(track_num); // END OF DISC
+
+ set_dat(is_device_ready() ? SCSI_STATUS_GOOD : SCSI_STATUS_CHKCOND);
+// if(event_cdda_delay_play >= 0) cancel_event(this, event_cdda_delay_play);
+// register_event(this, EVENT_CDDA_DELAY_STOP, (seek_time > 10.0) ? seek_time : 10.0, false, &event_cdda_delay_play);
+ if(is_device_ready()) {
+ if(event_delay_interrupt >= 0) {
+ cancel_event(this, event_delay_interrupt);
+ event_delay_interrupt = -1;
+ }
+ register_event(this, EVENT_CDROM_DELAY_INTERRUPT_ON, (seek_time > 10.0) ? (seek_time + 10.0) : (10.0 + 10.0), false, &event_delay_interrupt);
+ }
+ set_phase_delay(SCSI_PHASE_STATUS, (seek_time > 10.0) ? (seek_time + 10.0) : (10.0 + 10.0));
+ return;
}
}
// change to status phase
set_dat(is_device_ready() ? SCSI_STATUS_GOOD : SCSI_STATUS_CHKCOND);
+ if(is_device_ready()) {
+ write_signals(&outputs_done, 0xffffffff);
+ //if(event_delay_interrupt >= 0) cancel_event(this, event_delay_interrupt);
+ //register_event(this, EVENT_CDROM_DELAY_INTERRUPT_ON, 10.0, false, &event_delay_interrupt);
+
+ }
set_phase_delay(SCSI_PHASE_STATUS, 10.0);
return;
#endif
if(is_device_ready()) {
if(cdda_status == CDDA_PLAYING) {
- set_cdda_status(CDDA_OFF);
+ set_cdda_status(CDDA_PAUSED);
}
}
- if(is_cue) { // NEC PC-ENGINE ONLY.This expect to be temporally workaround.20181119 K.O
- get_track_by_track_num(2);
- }
// change to status phase
set_dat(is_device_ready() ? SCSI_STATUS_GOOD : SCSI_STATUS_CHKCOND);
+ if(is_device_ready()) write_signals(&outputs_done, 0xffffffff);
set_phase_delay(SCSI_PHASE_STATUS, 10.0);
return;
uint32_t frame = (cdda_status == CDDA_OFF) ? cdda_start_frame : cdda_playing_frame;
uint32_t msf_abs = lba_to_msf_alt(frame);
int track;
- if(is_cue) {
- //track = get_track(frame + ((current_track > 0) ? toc_table[current_track - 1].lba_offset : 0));
- track = current_track;
- } else {
- track = get_track(frame);
+ double delay_time = 10.0;
+ track = current_track;
+ if((cdda_status == CDDA_OFF) && (toc_table[track].is_audio)) { // OK? (or force ERROR) 20181120 K.O
+ //set_cdda_status(CDDA_PLAYING);
+ delay_time = get_seek_time(frame);
+ //delay_time = 10.0;
+ if(event_cdda_delay_play >= 0) {
+ cancel_event(this, event_cdda_delay_play);
+ event_cdda_delay_play = -1;
+ }
+ register_event(this, EVENT_CDDA_DELAY_PLAY, delay_time, false, &event_cdda_delay_play);
}
uint32_t msf_rel = lba_to_msf_alt(frame - toc_table[track].index0);
buffer->clear();
case 0x00: /* Get first and last track numbers */
buffer->write(TO_BCD(1));
buffer->write(TO_BCD(track_num));
+ // PC-8801 CD BIOS invites 4 bytes ?
+ buffer->write(0);
+ buffer->write(0);
break;
case 0x01: /* Get total disk size in MSF format */
{
buffer->write((msf >> 16) & 0xff);
buffer->write((msf >> 8) & 0xff);
buffer->write((msf >> 0) & 0xff);
+ // PC-8801 CD BIOS invites 4 bytes ?
+ buffer->write(0);
}
break;
case 0x02: /* Get track information */
set_phase_delay(SCSI_PHASE_STATUS, 10.0);
}
return;
+ case 0xff:
+ // End of List
+ set_dat(SCSI_STATUS_CHKCOND);
+ return;
}
// start standard command
uint32_t offset = (uint32_t)(position % 2352);
if(is_cue) {
+ // ToDo: Need seek wait.
+ #ifdef _CDROM_DEBUG_LOG
+ this->out_debug_log(_T("Seek to LBA %d\n"), position / 2352);
+ #endif
if(fio_img->Fseek(((long)position - (long)(toc_table[current_track].lba_offset * 2352)), FILEIO_SEEK_SET) != 0) {
set_sense_code(SCSI_SENSE_ILLGLBLKADDR); //SCSI_SENSE_SEEKERR
+ #ifdef _SCSI_DEBUG_LOG
+ this->out_debug_log(_T("[SCSI_DEV:ID=%d] Error on reading (ILLGLBLKADDR) at line %d\n"), scsi_id, __LINE__);
+ #endif
return false;
}
} else {
if(fio_img->Fseek((long)position, FILEIO_SEEK_SET) != 0) {
set_sense_code(SCSI_SENSE_ILLGLBLKADDR); //SCSI_SENSE_SEEKERR
+ #ifdef _SCSI_DEBUG_LOG
+ this->out_debug_log(_T("[SCSI_DEV:ID=%d] Error on reading (ILLGLBLKADDR) at line %d\n"), scsi_id, __LINE__);
+ #endif
return false;
}
}
while(length > 0) {
- uint8_t tmp_buffer[SCSI_BUFFER_SIZE];
- int tmp_length = min(length, (int)sizeof(tmp_buffer));
+ uint8_t tmp_buffer[2352];
+// int tmp_length = min(length, (int)sizeof(tmp_buffer));
+ int tmp_length = 2352 - offset;
if(fio_img->Fread(tmp_buffer, tmp_length, 1) != 1) {
+ #ifdef _SCSI_DEBUG_LOG
+ this->out_debug_log(_T("[SCSI_DEV:ID=%d] Error on reading (ILLGLBLKADDR) at line %d\n"), scsi_id, __LINE__);
+ #endif
+
set_sense_code(SCSI_SENSE_ILLGLBLKADDR); //SCSI_SENSE_NORECORDFND
return false;
}
- for(int i = 0; i < tmp_length && length > 0; i++) {
- if(offset >= 16 && offset < 16 + 2048) {
+ for(int i = 0; i < tmp_length; i++) {
+ if(offset >= 16 && offset < 16 + logical_block_size()) {
int value = tmp_buffer[i];
buffer->write(value);
length--;
}
access = true;
}
+ // Is This right? 20181120 K.O
+ //write_signals(&outputs_done, 0xffffffff); // Maybe don't need "DONE SIGNAL" with reading DATA TRACK. 20181207 K.O
+ set_sense_code(SCSI_SENSE_NOSENSE);
+ return true;
+}
+
+bool SCSI_CDROM::write_buffer(int length)
+{
+ for(int i = 0; i < length; i++) {
+ int value = buffer->read();
+ if(command[0] == SCSI_CMD_MODE_SEL6) {
+ if(i == 4) {
+ #ifdef _SCSI_DEBUG_LOG
+ this->out_debug_log(_T("[SCSI_DEV:ID=%d] NEC Read Mode = %02X\n"), scsi_id, value);
+ #endif
+ read_mode = (value != 0);
+ } else if(i == 10) {
+ #ifdef _SCSI_DEBUG_LOG
+ this->out_debug_log(_T("[SCSI_DEV:ID=%d] NEC Retry Count = %02X\n"), scsi_id, value);
+ #endif
+ }
+ }
+ position++;
+ }
set_sense_code(SCSI_SENSE_NOSENSE);
return true;
}
if(fio_img->IsOpened()) {
fio_img->Fclose();
}
- toc_table[i].index1 = toc_table[i].index1 + max_logical_block;
- if(toc_table[i].index0 == 0) {
- toc_table[i].index0 = toc_table[i].index1 - toc_table[i].pregap;
- } else {
+ if(toc_table[i].index1 != 0) {
toc_table[i].index0 = toc_table[i].index0 + max_logical_block;
- if(toc_table[i].pregap == 0) {
- toc_table[i].pregap = toc_table[i].index1 - toc_table[i].index0;
- }
- }
+ toc_table[i].index1 = toc_table[i].index1 + max_logical_block;
+ if(toc_table[i].index0 != max_logical_block) {
+ if(toc_table[i].pregap == 0) {
+ toc_table[i].pregap = toc_table[i].index1 - toc_table[i].index0;
+ }
+ }
+ } else {
+ toc_table[i].index1 = toc_table[i].index1 + max_logical_block;
+ if(toc_table[i].index0 == 0) {
+ toc_table[i].index0 = toc_table[i].index1 - toc_table[i].pregap;
+ } else {
+ toc_table[i].index0 = toc_table[i].index0 + max_logical_block;
+ if(toc_table[i].pregap == 0) {
+ toc_table[i].pregap = toc_table[i].index1 - toc_table[i].index0;
+ }
+ }
+ }
+ // Even...
+ if(toc_table[i].pregap <= 0) {
+ toc_table[i].pregap = 150; // Default PREGAP must be 2Sec. From OoTake.(Only with PCE? Not with FM-Towns?)
+ }
+
+ _n = 0;
if(strlen(track_data_path[i - 1]) > 0) {
if(fio_img->Fopen(track_data_path[i - 1], FILEIO_READ_BINARY)) {
if((_n = fio_img->FileLength() / 2352) > 0) {
max_logical_block += _n;
+ } else {
+ _n = 0;
}
+ fio_img->Fclose();
}
}
toc_table[i].lba_size = _n;
toc_table[i].lba_offset = max_logical_block - _n;
- #ifdef _CDROM_DEBUG_LOG
+ //#ifdef _CDROM_DEBUG_LOG
this->out_debug_log(_T("TRACK#%02d TYPE=%s PREGAP=%d INDEX0=%d INDEX1=%d LBA_SIZE=%d LBA_OFFSET=%d PATH=%s\n"),
i, (toc_table[i].is_audio) ? _T("AUDIO") : _T("MODE1/2352"),
toc_table[i].pregap, toc_table[i].index0, toc_table[i].index1,
toc_table[i].lba_size, toc_table[i].lba_offset, track_data_path[i - 1]);
- #endif
+ //#endif
}
toc_table[0].index0 = toc_table[0].index1 = toc_table[0].pregap = 0;
// toc_table[track_num].index0 = toc_table[track_num].index1 = max_logical_block;
close();
- // ToDo: Process multi track cue file.Most of CDROMs contain both audio and data and more than 2 tracks.
- // 20181014 K.O
if(check_file_extension(file_path, _T(".cue"))) {
#if 1
is_cue = false;
void SCSI_CDROM::set_volume(int ch, int decibel_l, int decibel_r)
{
- volume_l = decibel_to_volume(decibel_l);
- volume_r = decibel_to_volume(decibel_r);
+ volume_l = decibel_to_volume(decibel_l + 3.0);
+ volume_r = decibel_to_volume(decibel_r + 3.0);
}
void SCSI_CDROM::set_volume(int volume)
volume_m = (int)(1024.0 * (max(0, min(100, volume)) / 100.0));
}
-#define STATE_VERSION 3
+#define STATE_VERSION 4
// Q: If loading state when using another (saved) image? 20181013 K.O
// May need close() and open() (or ...?).
state_fio->StateValue(cdda_sample_l);
state_fio->StateValue(cdda_sample_r);
state_fio->StateValue(event_cdda);
+ state_fio->StateValue(event_cdda_delay_play);
+ state_fio->StateValue(event_delay_interrupt);
+ state_fio->StateValue(read_sectors);
// state_fio->StateValue(mix_loop_num);
+ state_fio->StateValue(read_mode);
state_fio->StateValue(volume_m);
if(loading) {
offset = state_fio->FgetUint32_LE();
OSDN Git Service
