Sprinter/mame
2
0
Fork 0
mirror of https://github.com/holub/mame synced 2025-04-23 17:00:53 +03:00
Code Issues Actions 1 Packages Projects Releases Wiki Activity

hp9845: re-implemented cmd 18 in TACO driver

Browse Source
This commit is contained in:
fulivi 2016-07-05 11:37:19 +02:00
parent ae64748f91
commit 35a95022ff
1 changed files with 26 additions and 30 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

56
src/devices/machine/hp_taco.cpp
View File

@ -1377,35 +1377,32 @@ void hp_taco_device::cmd_fsm(void)
break;
case CMD_SCAN_RECORDS:
// It's probably more correct to implement this to alternate between next data and next gap by using different
// FSM states. It times out sooner if the record being searched for doesn't exist on tape. With the current
// implementation it has to wait until a hole is reached at either end of the tape.
if (m_cmd_state == CMD_PH0) {
// PH0
if (next_data(m_rd_it , m_tape_pos , true)) {
cmd_duration = time_to_target(farthest_end(m_rd_it));
if (m_cmd_state == CMD_PH0 || m_cmd_state == CMD_PH2) {
// PH0 and PH2
if (m_cmd_state == CMD_PH2) {
m_tach_reg++;
if (m_tach_reg == 0) {
// All gaps found, bail out
cmd_duration = attotime::zero;
m_cmd_state = CMD_END;
break;
}
// Set T/O for data
set_data_timeout(true);
m_cmd_state = CMD_PH1;
} else {
// PH1
tape_pos_t target = m_tape_pos;
// Tach. register is incremented at each gap. Command ends when this register goes positive (b15 = 0).
unsigned n_gaps;
if (BIT(m_tach_reg , 15)) {
n_gaps = 0x10000U - m_tach_reg;
m_tach_reg = 0;
} else {
n_gaps = 1;
m_tach_reg++;
}
if (next_n_gap(target, n_gaps, min_gap_size())) {
LOG_0(("%u gaps @%d\n" , n_gaps, target));
cmd_duration = time_to_target(target);
}
m_timeout_timer->reset();
m_cmd_state = CMD_END;
}
if (next_data(m_rd_it , m_tape_pos , true)) {
cmd_duration = time_to_target(farthest_end(m_rd_it));
}
// Set T/O for data
set_data_timeout(true);
m_cmd_state = CMD_PH1;
} else if (m_cmd_state == CMD_PH1) {
// PH1
tape_pos_t target = m_tape_pos;
if (next_n_gap(target, 1, min_gap_size())) {
LOG_0(("Gap @%d (%u to go)\n" , target , 0x10000U - m_tach_reg));
cmd_duration = time_to_target(target);
}
m_timeout_timer->reset();
m_cmd_state = CMD_PH2;
}
break;
@ -1420,8 +1417,7 @@ void hp_taco_device::cmd_fsm(void)
if (next_data(m_rd_it , m_tape_pos , true)) {
cmd_duration = time_to_target(farthest_end(m_rd_it));
}
// Set T/O for data
set_data_timeout(true);
// Apparently this cmd doesn't set no-data T/O
m_cmd_state = CMD_END;
}
break;