(MESS) apollo: fixed disk and tape DMA, improved logging [Hans Ostermeyer]

This commit is contained in:
R. Belmont 2013-06-28 02:07:12 +00:00
parent bfbd892308
commit 6aae2e2d9c
3 changed files with 63 additions and 13 deletions

View File

@ -336,8 +336,18 @@ inline void am9517a_device::dma_advance()
inline void am9517a_device::end_of_process() inline void am9517a_device::end_of_process()
{ {
// terminal count // terminal count
if (COMMAND_MEM_TO_MEM)
{
m_status |= 1 << 0;
m_status |= 1 << 1;
m_request &= ~(1 << 0);
m_request &= ~(1 << 1);
}
else
{
m_status |= 1 << m_current_channel; m_status |= 1 << m_current_channel;
m_request &= ~(1 << m_current_channel); m_request &= ~(1 << m_current_channel);
}
if (MODE_AUTOINITIALIZE) if (MODE_AUTOINITIALIZE)
{ {
@ -519,6 +529,12 @@ void am9517a_device::execute_run()
m_state = STATE_S0; m_state = STATE_S0;
break; break;
} }
else if (COMMAND_MEM_TO_MEM && BIT(m_request, channel) && ((m_channel[channel].m_mode & 0xc0) == MODE_SINGLE))
{
m_current_channel = m_last_channel = priority[channel];
m_state = STATE_S0;
break;
}
} }
} }
if(m_state == STATE_SI) if(m_state == STATE_SI)
@ -633,6 +649,18 @@ void am9517a_device::execute_run()
case STATE_S24: case STATE_S24:
dma_write(); dma_write();
dma_advance(); dma_advance();
m_current_channel = 0;
m_channel[m_current_channel].m_count--;
if (MODE_ADDRESS_DECREMENT)
{
m_channel[m_current_channel].m_address--;
}
else
{
m_channel[m_current_channel].m_address++;
}
break; break;
} }
@ -767,6 +795,10 @@ WRITE8_MEMBER( am9517a_device::write )
if (BIT(data, 2)) if (BIT(data, 2))
{ {
m_request |= (1 << (channel + 4)); m_request |= (1 << (channel + 4));
if (COMMAND_MEM_TO_MEM)
{
m_request |= (1 << channel);
}
} }
else else
{ {

View File

@ -34,6 +34,9 @@
#define LOG(x) { logerror x; logerror ("\n"); apollo_check_log(); } #define LOG(x) { logerror x; logerror ("\n"); apollo_check_log(); }
#define LOG1(x) { if (VERBOSE > 0) LOG(x) } #define LOG1(x) { if (VERBOSE > 0) LOG(x) }
#define LOG2(x) { if (VERBOSE > 1) LOG(x) } #define LOG2(x) { if (VERBOSE > 1) LOG(x) }
#define CLOG(x) { logerror ("%s - %s: ", apollo_cpu_context(machine().device(MAINCPU)), tag()); LOG(x) }
#define CLOG1(x) { if (VERBOSE > 0) CLOG(x) }
#define CLOG2(x) { if (VERBOSE > 1) CLOG(x) }
#define DLOG(x) { logerror ("%s - %s: ", apollo_cpu_context(device->machine().device(MAINCPU)), device->tag()); LOG(x) } #define DLOG(x) { logerror ("%s - %s: ", apollo_cpu_context(device->machine().device(MAINCPU)), device->tag()); LOG(x) }
#define DLOG1(x) { if (VERBOSE > 0) DLOG(x) } #define DLOG1(x) { if (VERBOSE > 0) DLOG(x) }
#define DLOG2(x) { if (VERBOSE > 1) DLOG(x) } #define DLOG2(x) { if (VERBOSE > 1) DLOG(x) }

View File

@ -375,6 +375,21 @@ WRITE8_MEMBER(apollo_state::apollo_dma_2_w){
} }
READ8_MEMBER(apollo_state::apollo_dma_2_r){ READ8_MEMBER(apollo_state::apollo_dma_2_r){
// Nasty hack (13-06-15 - ost):
// MD self_test will test wrong DMA register and
// mem-to-mem DMA in am9517a.c is often starting much too late (for MD self_test)
// (8237dma.c was always fast enough to omit these problems)
if (offset == 8)
{
switch (space.device().safe_pcbase())
{
case 0x00102e22: // DN3000
case 0x01002f3c: // DN3500
case 0x010029a6: // DN5500
offset = 16;
break;
}
}
UINT8 data = get_device_dma8237_2(&space.device())->read(space, offset / 2); UINT8 data = get_device_dma8237_2(&space.device())->read(space, offset / 2);
SLOG1(("apollo_dma_2_r: reading DMA Controller 2 at offset %02x = %02x", offset/2, data)); SLOG1(("apollo_dma_2_r: reading DMA Controller 2 at offset %02x = %02x", offset/2, data));
return data; return data;
@ -495,7 +510,7 @@ WRITE8_MEMBER(apollo_state::apollo_dma_write_word){
READ8_MEMBER(apollo_state::apollo_dma8237_ctape_dack_r ) { READ8_MEMBER(apollo_state::apollo_dma8237_ctape_dack_r ) {
UINT8 data = sc499_dack_r(&space.machine()); UINT8 data = sc499_dack_r(&space.machine());
// DLOG2(("dma ctape dack read %02x",data)); CLOG2(("dma ctape dack read %02x",data));
// hack for DN3000: select appropriate DMA channel No. // hack for DN3000: select appropriate DMA channel No.
dn3000_dma_channel1 = 1; // 1 = ctape, 2 = floppy dma channel dn3000_dma_channel1 = 1; // 1 = ctape, 2 = floppy dma channel
@ -504,7 +519,7 @@ READ8_MEMBER(apollo_state::apollo_dma8237_ctape_dack_r ) {
} }
WRITE8_MEMBER(apollo_state::apollo_dma8237_ctape_dack_w ) { WRITE8_MEMBER(apollo_state::apollo_dma8237_ctape_dack_w ) {
// DLOG2(("dma ctape dack write %02x", data)); CLOG2(("dma ctape dack write %02x", data));
sc499_dack_w(&space.machine(), data); sc499_dack_w(&space.machine(), data);
// hack for DN3000: select appropriate DMA channel No. // hack for DN3000: select appropriate DMA channel No.
@ -515,7 +530,7 @@ WRITE8_MEMBER(apollo_state::apollo_dma8237_ctape_dack_w ) {
READ8_MEMBER(apollo_state::apollo_dma8237_fdc_dack_r ) { READ8_MEMBER(apollo_state::apollo_dma8237_fdc_dack_r ) {
pc_fdc_at_device *fdc = space.machine().device<pc_fdc_at_device>(APOLLO_FDC_TAG); pc_fdc_at_device *fdc = space.machine().device<pc_fdc_at_device>(APOLLO_FDC_TAG);
UINT8 data = fdc->dma_r(); UINT8 data = fdc->dma_r();
// DLOG2(("dma fdc dack read %02x",data)); CLOG2(("dma fdc dack read %02x",data));
// hack for DN3000: select appropriate DMA channel No. // hack for DN3000: select appropriate DMA channel No.
dn3000_dma_channel1 = 2; // 1 = ctape, 2 = floppy dma channel dn3000_dma_channel1 = 2; // 1 = ctape, 2 = floppy dma channel
@ -525,7 +540,7 @@ READ8_MEMBER(apollo_state::apollo_dma8237_fdc_dack_r ) {
WRITE8_MEMBER(apollo_state::apollo_dma8237_fdc_dack_w ) { WRITE8_MEMBER(apollo_state::apollo_dma8237_fdc_dack_w ) {
pc_fdc_at_device *fdc = space.machine().device<pc_fdc_at_device>(APOLLO_FDC_TAG); pc_fdc_at_device *fdc = space.machine().device<pc_fdc_at_device>(APOLLO_FDC_TAG);
// DLOG2(("dma fdc dack write %02x", data)); CLOG2(("dma fdc dack write %02x", data));
fdc->dma_w(data); fdc->dma_w(data);
// hack for DN3000: select appropriate DMA channel No. // hack for DN3000: select appropriate DMA channel No.
@ -535,35 +550,35 @@ WRITE8_MEMBER(apollo_state::apollo_dma8237_fdc_dack_w ) {
READ8_MEMBER(apollo_state::apollo_dma8237_wdc_dack_r ) { READ8_MEMBER(apollo_state::apollo_dma8237_wdc_dack_r ) {
UINT8 data = 0xff; // omti8621_dack_r(device->machine); UINT8 data = 0xff; // omti8621_dack_r(device->machine);
//DLOG1(("dma wdc dack read %02x (not used, not emulated!)",data)); CLOG1(("dma wdc dack read %02x (not used, not emulated!)",data));
return data; return data;
} }
WRITE8_MEMBER(apollo_state::apollo_dma8237_wdc_dack_w ) { WRITE8_MEMBER(apollo_state::apollo_dma8237_wdc_dack_w ) {
//DLOG1(("dma wdc dack write %02x (not used, not emulated!)", data)); CLOG1(("dma wdc dack write %02x (not used, not emulated!)", data));
// omti8621_dack_w(machine, data); // omti8621_dack_w(machine, data);
} }
WRITE_LINE_MEMBER(apollo_state::apollo_dma8237_out_eop ) { WRITE_LINE_MEMBER(apollo_state::apollo_dma8237_out_eop ) {
pc_fdc_at_device *fdc = machine().device<pc_fdc_at_device>(APOLLO_FDC_TAG); pc_fdc_at_device *fdc = machine().device<pc_fdc_at_device>(APOLLO_FDC_TAG);
//DLOG1(("dma out eop state %02x", state)); CLOG1(("dma out eop state %02x", state));
fdc->tc_w(!state); fdc->tc_w(!state);
sc499_set_tc_state(&machine(), state); sc499_set_tc_state(&machine(), state);
} }
WRITE_LINE_MEMBER(apollo_state::apollo_dma_1_hrq_changed ) { WRITE_LINE_MEMBER(apollo_state::apollo_dma_1_hrq_changed ) {
// DLOG2(("dma 1 hrq changed state %02x", state)); CLOG2(("dma 1 hrq changed state %02x", state));
m_dma8237_2->dreq0_w(state); m_dma8237_1->dreq0_w(state);
/* Assert HLDA */ /* Assert HLDA */
//m_dma8237_1->hack_w(state); m_dma8237_1->hack_w(state);
// cascade mode? // cascade mode?
// i8237_hlda_w(get_device_dma8237_2(device), state); // i8237_hlda_w(get_device_dma8237_2(device), state);
} }
WRITE_LINE_MEMBER(apollo_state::apollo_dma_2_hrq_changed ) { WRITE_LINE_MEMBER(apollo_state::apollo_dma_2_hrq_changed ) {
// DLOG2(("dma 2 hrq changed state %02x", state)); CLOG2(("dma 2 hrq changed state %02x", state));
m_maincpu->set_input_line(INPUT_LINE_HALT, state ? ASSERT_LINE : CLEAR_LINE); m_maincpu->set_input_line(INPUT_LINE_HALT, state ? ASSERT_LINE : CLEAR_LINE);
/* Assert HLDA */ /* Assert HLDA */