summaryrefslogtreecommitdiffstatshomepage
path: root/src/devices/cpu/h8/h8_sci.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'src/devices/cpu/h8/h8_sci.cpp')
-rw-r--r--src/devices/cpu/h8/h8_sci.cpp704
1 files changed, 380 insertions, 324 deletions
diff --git a/src/devices/cpu/h8/h8_sci.cpp b/src/devices/cpu/h8/h8_sci.cpp
index d78eb04f83e..3ec8951a22d 100644
--- a/src/devices/cpu/h8/h8_sci.cpp
+++ b/src/devices/cpu/h8/h8_sci.cpp
@@ -5,27 +5,71 @@
#include "h8_sci.h"
#include "h8.h"
-#include "h8_intc.h"
-// Verbosity level
-// 0 = no messages
-// 1 = transmitted/recieved bytes, reception errors and clock setup
-// 2 = everything but status register reads
-// 3 = everything
-static constexpr int V = 1;
+#define LOG_REGS (1 << 1U) // Register writes
+#define LOG_RREGS (1 << 2U) // Register reads
+#define LOG_RATE (1 << 3U) // Bitrate setting, beware that gk2000 changes it all the time ending up in a massive slowdown, don't leave it active
+#define LOG_DATA (1 << 4U) // Bytes transmitted
+#define LOG_CLOCK (1 << 5U) // Clock and transmission start/stop
+#define LOG_STATE (1 << 6U) // State machine states
+#define LOG_TICK (1 << 7U) // Clock ticks
+//#define VERBOSE (LOG_DATA)
+//#define LOG_OUTPUT_FUNC osd_printf_info
+#include "logmacro.h"
DEFINE_DEVICE_TYPE(H8_SCI, h8_sci_device, "h8_sci", "H8 Serial Communications Interface")
+
+// Clocking:
+// Async mode:
+// The circuit wants 16 events per bit.
+// * Internal clocking: the cpu clock is divided by one of (1, 4, 16, 64) from the cks field of smr
+// then by (brr+1) then by 2.
+// * External clocking: the external clock is supposed to be 16*bitrate.
+// Sync mode:
+// The circuit wants 2 events per bit, a positive and a negative edge.
+// * Internal clocking: the cpu clock is divided by one of (1, 4, 16, 64) from the cks field of smr
+// then by (brr+1) then by 2. Events are then interpreted has been alternatively positive and
+// negative (e.g. another divide-by-two, sync-wise).
+// * External clocking: the external clock is supposed to be at bitrate, both edges are used.
+//
+// Synchronization:
+// Async mode:
+// Both modes use a 4-bits counter incremented on every event (16/bit).
+//
+// * Transmit sets the counter to 0 at transmit start. Output data line changes value
+// on counter == 0. If the clock output is required, clk=1 outside of transmit,
+// clk=0 on counter==0, clk=1 on counter==8.
+//
+// * Receive sets the counter to 0 when the data line initially goes down (start bit)
+// Output line is read on counter==8. It is unknown whether the counter is reset
+// on every data line level change.
+//
+// Sync mode:
+// * Transmit changes the data line on negative edges, the clock line, following positive and
+// negative edge definition, is output as long as transmit is active and is otherwise 1.
+//
+// * Receive reads the data line on positive edges.
+//
+// Framing:
+// Async mode: 1 bit of start at 0, 7 or 8 bits of data, nothing or 1 bit of parity or 1 bit of multiprocessing, 1 or 2 bits of stop at 1.
+// Sync mode: 8 bits of data.
+//
+// Multiprocessing bit is an extra bit which value can be set on transmit in bit zero of ssr.
+// On receive when zero the byte is dropped.
+
+
const char *const h8_sci_device::state_names[] = { "idle", "start", "bit", "parity", "stop", "last-tick" };
-h8_sci_device::h8_sci_device(const machine_config &mconfig, const char *tag, device_t *owner, uint32_t clock) :
+h8_sci_device::h8_sci_device(const machine_config &mconfig, const char *tag, device_t *owner, u32 clock) :
device_t(mconfig, H8_SCI, tag, owner, clock),
m_cpu(*this, finder_base::DUMMY_TAG),
m_intc(*this, finder_base::DUMMY_TAG),
m_external_to_internal_ratio(0), m_internal_to_external_ratio(0), m_sync_timer(nullptr), m_id(0), m_eri_int(0), m_rxi_int(0), m_txi_int(0), m_tei_int(0),
- m_tx_state(0), m_rx_state(0), m_tx_bit(0), m_rx_bit(0), m_clock_state(0), m_tx_parity(0), m_rx_parity(0), m_ext_clock_counter(0), m_clock_mode(clock_mode_t::INTERNAL_ASYNC), m_clock_value(false), m_ext_clock_value(false), m_rx_value(false),
- m_rdr(0), m_tdr(0), m_smr(0), m_scr(0), m_ssr(0), m_brr(0), m_rsr(0), m_tsr(0), m_clock_base(0), m_divider(0)
+ m_tx_state(0), m_rx_state(0), m_tx_bit(0), m_rx_bit(0), m_clock_state(0), m_tx_parity(0), m_rx_parity(0), m_tx_clock_counter(0), m_rx_clock_counter(0),
+ m_clock_mode(INTERNAL_ASYNC), m_ext_clock_value(false), m_rx_value(true),
+ m_rdr(0), m_tdr(0), m_smr(0), m_scr(0), m_ssr(0), m_ssr_read(0), m_brr(0), m_rsr(0), m_tsr(0), m_clock_event(0), m_divider(0)
{
m_external_clock_period = attotime::never;
}
@@ -35,42 +79,49 @@ void h8_sci_device::do_set_external_clock_period(const attotime &period)
m_external_clock_period = period;
}
-void h8_sci_device::smr_w(uint8_t data)
+void h8_sci_device::smr_w(u8 data)
{
m_smr = data;
- if(V>=2) logerror("smr_w %02x %s %c%c%c%s /%d (%06x)\n", data,
- data & SMR_CA ? "sync" : "async",
- data & SMR_CHR ? '7' : '8',
- data & SMR_PE ? data & SMR_OE ? 'o' : 'e' : 'n',
- data & SMR_STOP ? '2' : '1',
- data & SMR_MP ? " mp" : "",
- 1 << 2*(data & SMR_CKS),
- m_cpu->pc());
+
+ LOGMASKED(LOG_REGS, "smr_w %02x %s %c%c%c%s /%d (%06x)\n", data,
+ data & SMR_CA ? "sync" : "async",
+ data & SMR_CHR ? '7' : '8',
+ data & SMR_PE ? data & SMR_OE ? 'o' : 'e' : 'n',
+ data & SMR_STOP ? '2' : '1',
+ data & SMR_MP ? " mp" : "",
+ 1 << 2*(data & SMR_CKS),
+ m_cpu->pc());
+
clock_update();
+
+ sync_rx_start();
}
-uint8_t h8_sci_device::smr_r()
+u8 h8_sci_device::smr_r()
{
- if(V>=2) logerror("smr_r %02x (%06x)\n", m_smr, m_cpu->pc());
+ if(!machine().side_effects_disabled())
+ LOGMASKED(LOG_RREGS, "smr_r %02x (%06x)\n", m_smr, m_cpu->pc());
return m_smr;
}
-void h8_sci_device::brr_w(uint8_t data)
+void h8_sci_device::brr_w(u8 data)
{
m_brr = data;
- if(V>=2) logerror("brr_w %02x (%06x)\n", data, m_cpu->pc());
+ LOGMASKED(LOG_REGS, "brr_w %02x (%06x)\n", m_brr, m_cpu->pc());
clock_update();
}
-uint8_t h8_sci_device::brr_r()
+u8 h8_sci_device::brr_r()
{
- if(V>=2) logerror("brr_r %02x (%06x)\n", m_brr, m_cpu->pc());
+ if(!machine().side_effects_disabled())
+ LOGMASKED(LOG_RREGS, "brr_r %02x (%06x)\n", m_brr, m_cpu->pc());
return m_brr;
}
-bool h8_sci_device::is_sync_start() const
+void h8_sci_device::sync_rx_start()
{
- return (m_smr & SMR_CA) && ((m_scr & (SCR_TE|SCR_RE)) == (SCR_TE|SCR_RE));
+ if(m_rx_state == ST_IDLE && (m_smr & SMR_CA) && (m_scr & SCR_RE) && !(m_scr & SCR_TE) && !has_recv_error())
+ rx_start();
}
bool h8_sci_device::has_recv_error() const
@@ -78,19 +129,19 @@ bool h8_sci_device::has_recv_error() const
return m_ssr & (SSR_ORER|SSR_PER|SSR_FER);
}
-void h8_sci_device::scr_w(uint8_t data)
+void h8_sci_device::scr_w(u8 data)
{
- if(V>=2) logerror("scr_w %02x%s%s%s%s%s%s clk=%d (%06x)\n", data,
- data & SCR_TIE ? " txi" : "",
- data & SCR_RIE ? " rxi" : "",
- data & SCR_TE ? " tx" : "",
- data & SCR_RE ? " rx" : "",
- data & SCR_MPIE ? " mpi" : "",
- data & SCR_TEIE ? " tei" : "",
- data & SCR_CKE,
- m_cpu->pc());
+ LOGMASKED(LOG_REGS, "scr_w %02x%s%s%s%s%s%s clk=%d (%06x)\n", data,
+ data & SCR_TIE ? " txi" : "",
+ data & SCR_RIE ? " rxi" : "",
+ data & SCR_TE ? " tx" : "",
+ data & SCR_RE ? " rx" : "",
+ data & SCR_MPIE ? " mpi" : "",
+ data & SCR_TEIE ? " tei" : "",
+ data & SCR_CKE,
+ m_cpu->pc());
- uint8_t delta = m_scr ^ data;
+ u8 delta = m_scr ^ data;
m_scr = data;
clock_update();
@@ -99,8 +150,8 @@ void h8_sci_device::scr_w(uint8_t data)
clock_stop(CLK_RX);
}
- if((delta & SCR_RE) && (m_scr & SCR_RE) && m_rx_state == ST_IDLE && !has_recv_error() && !is_sync_start())
- rx_start();
+ if((delta & (SCR_RE | SCR_TE)))
+ sync_rx_start();
if((delta & SCR_TIE) && (m_scr & SCR_TIE) && (m_ssr & SSR_TDRE))
m_intc->internal_interrupt(m_txi_int);
if((delta & SCR_TEIE) && (m_scr & SCR_TEIE) && (m_ssr & SSR_TEND))
@@ -111,126 +162,126 @@ void h8_sci_device::scr_w(uint8_t data)
m_intc->internal_interrupt(m_eri_int);
}
-uint8_t h8_sci_device::scr_r()
+u8 h8_sci_device::scr_r()
{
- if(V>=2) logerror("scr_r %02x (%06x)\n", m_scr, m_cpu->pc());
+ if(!machine().side_effects_disabled())
+ LOGMASKED(LOG_RREGS, "scr_r %02x (%06x)\n", m_scr, m_cpu->pc());
return m_scr;
}
-void h8_sci_device::tdr_w(uint8_t data)
+void h8_sci_device::tdr_w(u8 data)
{
- if(V>=2) logerror("tdr_w %02x (%06x)\n", data, m_cpu->pc());
+ LOGMASKED(LOG_REGS, "tdr_w %02x (%06x)\n", data, m_cpu->pc());
m_tdr = data;
- if(m_cpu->access_is_dma()) {
- m_ssr &= ~SSR_TDRE;
+ if((m_cpu->access_is_dma()) && (m_scr & SCR_TE)) {
+ m_ssr &= ~(SSR_TDRE | SSR_TEND);
if(m_tx_state == ST_IDLE)
tx_start();
}
}
-uint8_t h8_sci_device::tdr_r()
+u8 h8_sci_device::tdr_r()
{
- if(V>=2) logerror("tdr_r %02x (%06x)\n", m_tdr, m_cpu->pc());
+ if(!machine().side_effects_disabled())
+ LOGMASKED(LOG_RREGS, "tdr_r %02x (%06x)\n", m_tdr, m_cpu->pc());
return m_tdr;
}
-void h8_sci_device::ssr_w(uint8_t data)
+void h8_sci_device::ssr_w(u8 data)
{
- if(!(m_scr & SCR_TE)) {
- data |= SSR_TDRE;
- m_ssr |= SSR_TDRE;
- }
- if((m_ssr & SSR_TDRE) && !(data & SSR_TDRE))
- m_ssr &= ~SSR_TEND;
- m_ssr = ((m_ssr & ~SSR_MPBT) | (data & SSR_MPBT)) & (data | (SSR_TEND|SSR_MPB|SSR_MPBT));
- if(V>=2) logerror("ssr_w %02x -> %02x (%06x)\n", data, m_ssr, m_cpu->pc());
+ if((m_scr & SCR_TE) && (m_ssr & m_ssr_read & SSR_TDRE) && !(data & SSR_TDRE))
+ m_ssr &= ~(SSR_TDRE | SSR_TEND);
+ m_ssr = (m_ssr & (~m_ssr_read | data | SSR_TDRE | SSR_TEND | SSR_MPB) & ~SSR_MPBT) | (data & SSR_MPBT);
+ LOGMASKED(LOG_REGS, "ssr_w %02x -> %02x (%06x)\n", data, m_ssr, m_cpu->pc());
if(m_tx_state == ST_IDLE && !(m_ssr & SSR_TDRE))
tx_start();
- if((m_scr & SCR_RE) && m_rx_state == ST_IDLE && !has_recv_error() && !is_sync_start())
- rx_start();
+ sync_rx_start();
}
-uint8_t h8_sci_device::ssr_r()
+u8 h8_sci_device::ssr_r()
{
- if(V>=3) logerror("ssr_r %02x (%06x)\n", m_ssr, m_cpu->pc());
+ if(!machine().side_effects_disabled()) {
+ LOGMASKED(LOG_RREGS, "ssr_r %02x (%06x)\n", m_ssr, m_cpu->pc());
+ m_ssr_read = m_ssr;
+ }
return m_ssr;
}
-uint8_t h8_sci_device::rdr_r()
+u8 h8_sci_device::rdr_r()
{
- if(V>=2) logerror("rdr_r %02x (%06x)\n", m_rdr, m_cpu->pc());
- if(m_cpu->access_is_dma())
+ if(!machine().side_effects_disabled())
+ LOGMASKED(LOG_RREGS, "rdr_r %02x (%06x)\n", m_rdr, m_cpu->pc());
+
+ if(!machine().side_effects_disabled() && m_cpu->access_is_dma())
m_ssr &= ~SSR_RDRF;
return m_rdr;
}
-void h8_sci_device::scmr_w(uint8_t data)
+void h8_sci_device::scmr_w(u8 data)
{
- if(V>=2) logerror("scmr_w %02x (%06x)\n", data, m_cpu->pc());
+ LOGMASKED(LOG_REGS, "scmr_w %02x (%06x)\n", data, m_cpu->pc());
}
-uint8_t h8_sci_device::scmr_r()
+u8 h8_sci_device::scmr_r()
{
- if(V>=2) logerror("scmr_r (%06x)\n", m_cpu->pc());
+ if(!machine().side_effects_disabled())
+ LOGMASKED(LOG_RREGS, "scmr_r (%06x)\n", m_cpu->pc());
return 0x00;
}
void h8_sci_device::clock_update()
{
- // Sync: Divider must be the time of a half-period (both edges are used, datarate*2)
- // Async: Divider must be the time of one period (only raising edge used, datarate*16)
-
m_divider = 2 << (2*(m_smr & SMR_CKS));
m_divider *= m_brr+1;
if(m_smr & SMR_CA) {
if(m_scr & SCR_CKE1)
- m_clock_mode = clock_mode_t::EXTERNAL_SYNC;
+ m_clock_mode = EXTERNAL_SYNC;
else
- m_clock_mode = clock_mode_t::INTERNAL_SYNC_OUT;
+ m_clock_mode = INTERNAL_SYNC_OUT;
} else {
if(m_scr & SCR_CKE1)
- m_clock_mode = clock_mode_t::EXTERNAL_ASYNC;
+ m_clock_mode = EXTERNAL_ASYNC;
else if(m_scr & SCR_CKE0)
- m_clock_mode = clock_mode_t::INTERNAL_ASYNC_OUT;
+ m_clock_mode = INTERNAL_ASYNC_OUT;
else
- m_clock_mode = clock_mode_t::INTERNAL_ASYNC;
+ m_clock_mode = INTERNAL_ASYNC;
}
- if(m_clock_mode == clock_mode_t::EXTERNAL_ASYNC && !m_external_clock_period.is_never())
- m_clock_mode = clock_mode_t::EXTERNAL_RATE_ASYNC;
- if(m_clock_mode == clock_mode_t::EXTERNAL_SYNC && !m_external_clock_period.is_never())
- m_clock_mode = clock_mode_t::EXTERNAL_RATE_SYNC;
+ if(m_clock_mode == EXTERNAL_ASYNC && !m_external_clock_period.is_never())
+ m_clock_mode = EXTERNAL_RATE_ASYNC;
+ if(m_clock_mode == EXTERNAL_SYNC && !m_external_clock_period.is_never())
+ m_clock_mode = EXTERNAL_RATE_SYNC;
- if(V>=1) {
+ if(VERBOSE & LOG_RATE) {
std::string new_message;
switch(m_clock_mode) {
- case clock_mode_t::INTERNAL_ASYNC:
- new_message = util::string_format("clock internal at %d Hz, async, bitrate %d bps\n", int(m_cpu->clock() / m_divider), int(m_cpu->clock() / (m_divider*16)));
+ case INTERNAL_ASYNC:
+ new_message = util::string_format("clock internal at %d Hz, async, bitrate %d bps\n", int(m_cpu->system_clock() / m_divider), int(m_cpu->system_clock() / (m_divider*16)));
break;
- case clock_mode_t::INTERNAL_ASYNC_OUT:
- new_message = util::string_format("clock internal at %d Hz, async, bitrate %d bps, output\n", int(m_cpu->clock() / m_divider), int(m_cpu->clock() / (m_divider*16)));
+ case INTERNAL_ASYNC_OUT:
+ new_message = util::string_format("clock internal at %d Hz, async, bitrate %d bps, output\n", int(m_cpu->system_clock() / m_divider), int(m_cpu->system_clock() / (m_divider*16)));
break;
- case clock_mode_t::EXTERNAL_ASYNC:
+ case EXTERNAL_ASYNC:
new_message = "clock external, async\n";
break;
- case clock_mode_t::EXTERNAL_RATE_ASYNC:
- new_message = util::string_format("clock external at %d Hz, async, bitrate %d bps\n", int(m_cpu->clock()*m_internal_to_external_ratio), int(m_cpu->clock()*m_internal_to_external_ratio/16));
+ case EXTERNAL_RATE_ASYNC:
+ new_message = util::string_format("clock external at %d Hz, async, bitrate %d bps\n", int(m_cpu->system_clock()*m_internal_to_external_ratio), int(m_cpu->system_clock()*m_internal_to_external_ratio/16));
break;
- case clock_mode_t::INTERNAL_SYNC_OUT:
- new_message = util::string_format("clock internal at %d Hz, sync, output\n", int(m_cpu->clock() / (m_divider*2)));
+ case INTERNAL_SYNC_OUT:
+ new_message = util::string_format("clock internal at %d Hz, sync, output\n", int(m_cpu->system_clock() / (m_divider*2)));
break;
- case clock_mode_t::EXTERNAL_SYNC:
+ case EXTERNAL_SYNC:
new_message = "clock external, sync\n";
break;
- case clock_mode_t::EXTERNAL_RATE_SYNC:
- new_message = util::string_format("clock external at %d Hz, sync\n", int(m_cpu->clock()*m_internal_to_external_ratio));
+ case EXTERNAL_RATE_SYNC:
+ new_message = util::string_format("clock external at %d Hz, sync\n", int(m_cpu->system_clock()*m_internal_to_external_ratio));
break;
}
if(new_message != m_last_clock_message) {
- logerror(new_message);
+ (LOG_OUTPUT_FUNC)(new_message);
m_last_clock_message = std::move(new_message);
}
}
@@ -244,31 +295,35 @@ void h8_sci_device::device_start()
m_internal_to_external_ratio = 0;
m_external_to_internal_ratio = 0;
} else {
- m_external_to_internal_ratio = (m_external_clock_period*m_cpu->clock()).as_double();
+ m_external_to_internal_ratio = (m_external_clock_period*m_cpu->system_clock()).as_double();
m_internal_to_external_ratio = 1/m_external_to_internal_ratio;
}
+ save_item(NAME(m_tx_state));
+ save_item(NAME(m_rx_state));
+ save_item(NAME(m_tx_bit));
+ save_item(NAME(m_rx_bit));
+ save_item(NAME(m_clock_state));
+ save_item(NAME(m_tx_parity));
+ save_item(NAME(m_rx_parity));
+ save_item(NAME(m_tx_clock_counter));
+ save_item(NAME(m_rx_clock_counter));
+ save_item(NAME(m_clock_mode));
+ save_item(NAME(m_ext_clock_value));
+ save_item(NAME(m_rx_value));
save_item(NAME(m_rdr));
save_item(NAME(m_tdr));
save_item(NAME(m_smr));
save_item(NAME(m_scr));
save_item(NAME(m_ssr));
+ save_item(NAME(m_ssr_read));
save_item(NAME(m_brr));
save_item(NAME(m_rsr));
save_item(NAME(m_tsr));
- save_item(NAME(m_rx_bit));
- save_item(NAME(m_tx_bit));
- save_item(NAME(m_rx_state));
- save_item(NAME(m_tx_state));
- save_item(NAME(m_tx_parity));
- save_item(NAME(m_clock_state));
- save_item(NAME(m_clock_value));
- save_item(NAME(m_clock_base));
+ save_item(NAME(m_clock_event));
+ save_item(NAME(m_clock_step));
save_item(NAME(m_divider));
- save_item(NAME(m_ext_clock_value));
- save_item(NAME(m_ext_clock_counter));
- save_item(NAME(m_cur_sync_time));
}
void h8_sci_device::device_reset()
@@ -286,22 +341,14 @@ void h8_sci_device::device_reset()
m_tx_state = ST_IDLE;
m_rx_state = ST_IDLE;
m_clock_state = 0;
- m_clock_mode = clock_mode_t::INTERNAL_ASYNC;
- m_clock_base = 0;
+ m_clock_mode = INTERNAL_ASYNC;
+ m_clock_event = 0;
clock_update();
- m_clock_value = true;
m_ext_clock_value = true;
- m_ext_clock_counter = 0;
- m_rx_value = true;
- m_cpu->do_sci_clk(m_id, m_clock_value);
+ m_tx_clock_counter = 0;
+ m_rx_clock_counter = 0;
+ m_cpu->do_sci_clk(m_id, 1);
m_cpu->do_sci_tx(m_id, 1);
- m_cur_sync_time = attotime::never;
-}
-
-void h8_sci_device::device_post_load()
-{
- // Set clock_mode correctly as it's not saved
- clock_update();
}
TIMER_CALLBACK_MEMBER(h8_sci_device::sync_tick)
@@ -311,169 +358,87 @@ TIMER_CALLBACK_MEMBER(h8_sci_device::sync_tick)
void h8_sci_device::do_rx_w(int state)
{
+ if(m_cpu->standby()) {
+ m_rx_value = state;
+ return;
+ }
+
+ if(state != m_rx_value && (m_clock_state & CLK_RX))
+ if(m_rx_clock_counter == 1 || m_rx_clock_counter == 15)
+ m_rx_clock_counter = 0;
+
+ if(m_rx_state == ST_IDLE && !(m_smr & SMR_CA) && (m_scr & SCR_RE) && m_rx_value && !state)
+ rx_start();
+
m_rx_value = state;
- if(V>=2) logerror("rx=%d\n", state);
- if(!m_rx_value && !(m_clock_state & CLK_RX) && m_rx_state != ST_IDLE)
- clock_start(CLK_RX);
}
void h8_sci_device::do_clk_w(int state)
{
- if(m_ext_clock_value != state) {
- m_ext_clock_value = state;
- if(m_clock_state) {
- switch(m_clock_mode) {
- case clock_mode_t::EXTERNAL_ASYNC:
- if(m_ext_clock_value) {
- m_ext_clock_counter = (m_ext_clock_counter+1) & 15;
-
- if((m_clock_state & CLK_TX) && m_ext_clock_counter == 0)
- tx_dropped_edge();
- if((m_clock_state & CLK_RX) && m_ext_clock_counter == 8)
- rx_raised_edge();
- }
- break;
-
- case clock_mode_t::EXTERNAL_SYNC:
- if((!m_ext_clock_value) && (m_clock_state & CLK_TX))
- tx_dropped_edge();
-
- else if(m_ext_clock_value && (m_clock_state & CLK_RX))
- rx_raised_edge();
- break;
- default:
- // Do nothing
- break;
- }
- }
+ if(m_ext_clock_value == state)
+ return;
+
+ m_ext_clock_value = state;
+ if(!m_clock_state || m_cpu->standby())
+ return;
+
+ if(m_clock_mode == EXTERNAL_ASYNC) {
+ if(m_clock_state & CLK_TX)
+ tx_async_tick();
+ if(m_clock_state & CLK_RX)
+ rx_async_tick();
+ } else if(m_clock_mode == EXTERNAL_SYNC) {
+ if(m_clock_state & CLK_TX)
+ tx_sync_tick();
+ if(m_clock_state & CLK_RX)
+ rx_sync_tick();
}
}
-uint64_t h8_sci_device::internal_update(uint64_t current_time)
+u64 h8_sci_device::internal_update(u64 current_time)
{
- uint64_t event = 0;
- switch(m_clock_mode) {
- case clock_mode_t::INTERNAL_SYNC_OUT:
- if(m_clock_state || !m_clock_value) {
- uint64_t fp = m_divider*2;
- if(current_time >= m_clock_base) {
- uint64_t delta = current_time - m_clock_base;
- if(delta >= fp) {
- delta -= fp;
- m_clock_base += fp;
- }
- assert(delta < fp);
-
- bool new_clock = delta >= m_divider;
- if(new_clock != m_clock_value) {
- machine().scheduler().synchronize();
- if((!new_clock) && (m_clock_state & CLK_TX))
- tx_dropped_edge();
-
- else if(new_clock && (m_clock_state & CLK_RX))
- rx_raised_edge();
-
- m_clock_value = new_clock;
- if(m_clock_state || m_clock_value)
- m_cpu->do_sci_clk(m_id, m_clock_value);
- }
- }
- event = m_clock_base + (m_clock_value ? fp : m_divider);
- }
- break;
-
- case clock_mode_t::INTERNAL_ASYNC:
- case clock_mode_t::INTERNAL_ASYNC_OUT:
- if(m_clock_state || !m_clock_value) {
- uint64_t fp = m_divider*16;
- if(current_time >= m_clock_base) {
- uint64_t delta = current_time - m_clock_base;
- if(delta >= fp) {
- delta -= fp;
- m_clock_base += fp;
- }
- assert(delta < fp);
- bool new_clock = delta >= m_divider*8;
- if(new_clock != m_clock_value) {
- machine().scheduler().synchronize();
- if((!new_clock) && (m_clock_state & CLK_TX))
- tx_dropped_edge();
-
- else if(new_clock && (m_clock_state & CLK_RX))
- rx_raised_edge();
-
- m_clock_value = new_clock;
- if(m_clock_mode == clock_mode_t::INTERNAL_ASYNC_OUT && (m_clock_state || !m_clock_value))
- m_cpu->do_sci_clk(m_id, m_clock_value);
- }
- }
-
- event = m_clock_base + (m_clock_value ? fp : m_divider*8);
- }
- break;
-
- case clock_mode_t::EXTERNAL_RATE_SYNC:
- if(m_clock_state || !m_clock_value) {
- uint64_t ctime = uint64_t(current_time*m_internal_to_external_ratio*2);
- if(ctime >= m_clock_base) {
- uint64_t delta = ctime - m_clock_base;
- m_clock_base += delta & ~1;
- delta &= 1;
- bool new_clock = delta >= 1;
- if(new_clock != m_clock_value) {
- machine().scheduler().synchronize();
- if((!new_clock) && (m_clock_state & CLK_TX))
- tx_dropped_edge();
-
- else if(new_clock && (m_clock_state & CLK_RX))
- rx_raised_edge();
-
- m_clock_value = new_clock;
- }
- }
+ if(!m_clock_event || current_time < m_clock_event)
+ return m_clock_event;
- event = uint64_t((m_clock_base + (m_clock_value ? 2 : 1))*m_external_to_internal_ratio)+1;
- }
- break;
+ if(m_clock_mode == INTERNAL_ASYNC || m_clock_mode == INTERNAL_ASYNC_OUT || m_clock_mode == EXTERNAL_RATE_ASYNC) {
+ if(m_clock_state & CLK_TX)
+ tx_async_tick();
+ if(m_clock_state & CLK_RX)
+ rx_async_tick();
+ } else if(m_clock_mode == INTERNAL_SYNC_OUT || m_clock_mode == EXTERNAL_RATE_SYNC) {
+ if(m_clock_state & CLK_TX)
+ tx_sync_tick();
+ if(m_clock_state & CLK_RX)
+ rx_sync_tick();
+ }
- case clock_mode_t::EXTERNAL_RATE_ASYNC:
- if(m_clock_state || !m_clock_value) {
- uint64_t ctime = uint64_t(current_time*m_internal_to_external_ratio);
- if(ctime >= m_clock_base) {
- uint64_t delta = ctime - m_clock_base;
- m_clock_base += delta & ~15;
- delta &= 15;
- bool new_clock = delta >= 8;
- if(new_clock != m_clock_value) {
- machine().scheduler().synchronize();
- if((!new_clock) && (m_clock_state & CLK_TX))
- tx_dropped_edge();
-
- else if(new_clock && (m_clock_state & CLK_RX))
- rx_raised_edge();
-
- m_clock_value = new_clock;
- }
- }
+ if(m_clock_state) {
+ if(m_clock_step)
+ m_clock_event += m_clock_step;
+ else if(m_clock_mode == EXTERNAL_RATE_ASYNC || m_clock_mode == EXTERNAL_RATE_SYNC)
+ m_clock_event = u64(u64(m_clock_event * m_internal_to_external_ratio + 1) * m_external_to_internal_ratio + 1);
+ else
+ m_clock_event = 0;
- event = uint64_t((m_clock_base + (m_clock_value ? 16 : 8))*m_external_to_internal_ratio)+1;
+ if(m_clock_event) {
+ if(s64 ticks = m_clock_event - m_cpu->now_as_cycles(); ticks >= 0LL)
+ m_sync_timer->adjust(attotime::from_ticks(ticks, m_cpu->system_clock()));
+ m_cpu->internal_update();
}
- break;
- case clock_mode_t::EXTERNAL_ASYNC:
- case clock_mode_t::EXTERNAL_SYNC:
- break;
- }
- if(event) {
- attotime ctime = machine().time();
- attotime sync_time = attotime::from_ticks(event-10, m_cpu->clock());
- if(m_cur_sync_time != sync_time && sync_time > ctime) {
- m_sync_timer->adjust(sync_time - ctime);
- m_cur_sync_time = sync_time;
- }
+ } else if(!m_clock_state) {
+ m_clock_event = 0;
+ if(m_clock_mode == INTERNAL_ASYNC_OUT || m_clock_mode == INTERNAL_SYNC_OUT)
+ m_cpu->do_sci_clk(m_id, 1);
}
- return event;
+ return m_clock_event;
+}
+
+void h8_sci_device::notify_standby(int state)
+{
+ if(!state && m_clock_event)
+ m_clock_event += m_cpu->total_cycles() - m_cpu->standby_time();
}
void h8_sci_device::clock_start(int mode)
@@ -482,46 +447,55 @@ void h8_sci_device::clock_start(int mode)
if(m_clock_state & mode)
return;
- if(!m_clock_state) {
- machine().scheduler().synchronize();
- m_clock_state = mode;
- switch(m_clock_mode) {
- case clock_mode_t::INTERNAL_ASYNC:
- case clock_mode_t::INTERNAL_ASYNC_OUT:
- case clock_mode_t::INTERNAL_SYNC_OUT:
- if(V>=2) logerror("Starting internal clock\n");
- m_clock_base = m_cpu->total_cycles();
- m_cpu->internal_update();
- break;
+ if(mode == CLK_TX)
+ m_tx_clock_counter = 15;
+ else
+ m_rx_clock_counter = 15;
- case clock_mode_t::EXTERNAL_RATE_ASYNC:
- if(V>=2) logerror("Simulating external clock async\n");
- m_clock_base = uint64_t(m_cpu->total_cycles()*m_internal_to_external_ratio);
- m_cpu->internal_update();
- break;
+ m_clock_state |= mode;
+ if(m_clock_state != mode)
+ return;
- case clock_mode_t::EXTERNAL_RATE_SYNC:
- if(V>=2) logerror("Simulating external clock sync\n");
- m_clock_base = uint64_t(m_cpu->total_cycles()*2*m_internal_to_external_ratio);
- m_cpu->internal_update();
- break;
+ m_clock_step = 0;
- case clock_mode_t::EXTERNAL_ASYNC:
- if(V>=2) logerror("Waiting for external clock async\n");
- m_ext_clock_counter = 15;
- break;
+ switch(m_clock_mode) {
+ case INTERNAL_ASYNC:
+ case INTERNAL_ASYNC_OUT:
+ case INTERNAL_SYNC_OUT: {
+ LOGMASKED(LOG_CLOCK, "Starting internal clock\n");
+ m_clock_step = m_divider;
+ u64 now = mode == CLK_TX ? m_cpu->total_cycles() : m_cpu->now_as_cycles();
+ m_clock_event = (now / m_clock_step + 1) * m_clock_step;
+ m_sync_timer->adjust(attotime::from_ticks(m_clock_event - now, m_cpu->system_clock()));
+ m_cpu->internal_update();
+ break;
+ }
- case clock_mode_t::EXTERNAL_SYNC:
- if(V>=2) logerror("Waiting for external clock sync\n");
- break;
- }
- } else
- m_clock_state |= mode;
+ case EXTERNAL_RATE_ASYNC:
+ case EXTERNAL_RATE_SYNC: {
+ LOGMASKED(LOG_CLOCK, "Simulating external clock\n", m_clock_mode == EXTERNAL_RATE_ASYNC ? "async" : "sync");
+ u64 now = mode == CLK_TX ? m_cpu->total_cycles() : m_cpu->now_as_cycles();
+ m_clock_event = u64(u64(now * m_internal_to_external_ratio + 1) * m_external_to_internal_ratio + 1);
+ m_sync_timer->adjust(attotime::from_ticks(m_clock_event - now, m_cpu->system_clock()));
+ m_cpu->internal_update();
+ break;
+ }
+
+ case EXTERNAL_ASYNC:
+ case EXTERNAL_SYNC:
+ LOGMASKED(LOG_CLOCK, "Waiting for external clock\n");
+ break;
+ }
}
void h8_sci_device::clock_stop(int mode)
{
m_clock_state &= ~mode;
+ if(!m_clock_state) {
+ m_clock_event = 0;
+ m_clock_step = 0;
+ LOGMASKED(LOG_CLOCK, "Stopping clocks\n");
+ }
m_cpu->internal_update();
}
@@ -530,7 +504,7 @@ void h8_sci_device::tx_start()
m_ssr |= SSR_TDRE;
m_tsr = m_tdr;
m_tx_parity = m_smr & SMR_OE ? 0 : 1;
- if(V>=1) logerror("start transmit %02x '%c'\n", m_tsr, m_tsr >= 32 && m_tsr < 127 ? m_tsr : '.');
+ LOGMASKED(LOG_DATA, "start transmit %02x '%c'\n", m_tsr, m_tsr >= 32 && m_tsr < 127 ? m_tsr : '.');
if(m_scr & SCR_TIE)
m_intc->internal_interrupt(m_txi_int);
if(m_smr & SMR_CA) {
@@ -541,13 +515,27 @@ void h8_sci_device::tx_start()
m_tx_bit = 1;
}
clock_start(CLK_TX);
- if(m_rx_state == ST_IDLE && !has_recv_error() && is_sync_start())
+ if(m_rx_state == ST_IDLE && (m_smr & SMR_CA) && (m_scr & SCR_TE) && (m_scr & SCR_RE) && !has_recv_error())
rx_start();
}
-void h8_sci_device::tx_dropped_edge()
+void h8_sci_device::tx_async_tick()
+{
+ m_tx_clock_counter = (m_tx_clock_counter + 1) & 15;
+ LOGMASKED(LOG_TICK, "tx_async_tick %x\n", m_tx_clock_counter);
+ if(m_tx_clock_counter == 0) {
+ tx_async_step();
+
+ if(m_clock_mode == INTERNAL_ASYNC_OUT)
+ m_cpu->do_sci_clk(m_id, 0);
+
+ } else if(m_tx_clock_counter == 8 && m_clock_mode == INTERNAL_ASYNC_OUT)
+ m_cpu->do_sci_clk(m_id, 1);
+}
+
+void h8_sci_device::tx_async_step()
{
- if(V>=2) logerror("tx_dropped_edge state=%s bit=%d\n", state_names[m_tx_state], m_tx_bit);
+ LOGMASKED(LOG_STATE, "tx_async_step state=%s bit=%d\n", state_names[m_tx_state], m_tx_bit);
switch(m_tx_state) {
case ST_START:
m_cpu->do_sci_tx(m_id, false);
@@ -591,7 +579,7 @@ void h8_sci_device::tx_dropped_edge()
m_tx_bit--;
if(!m_tx_bit) {
if(!(m_ssr & SSR_TDRE))
- tx_start();
+ tx_start();
else {
m_tx_state = ST_LAST_TICK;
m_tx_bit = 0;
@@ -604,36 +592,71 @@ void h8_sci_device::tx_dropped_edge()
m_tx_bit = 0;
clock_stop(CLK_TX);
m_cpu->do_sci_tx(m_id, 1);
- m_ssr |= SSR_TEND;
if(m_scr & SCR_TEIE)
m_intc->internal_interrupt(m_tei_int);
// if there's more to send, start the transmitter
if((m_scr & SCR_TE) && !(m_ssr & SSR_TDRE))
tx_start();
+ else
+ m_ssr |= SSR_TEND;
break;
default:
abort();
}
- if(V>=2) logerror(" -> state=%s bit=%d\n", state_names[m_tx_state], m_tx_bit);
+ LOGMASKED(LOG_STATE, " -> state=%s bit=%d\n", state_names[m_tx_state], m_tx_bit);
+}
+
+void h8_sci_device::tx_sync_tick()
+{
+ m_tx_clock_counter = (m_tx_clock_counter + 1) & 1;
+ LOGMASKED(LOG_TICK, "tx_sync_tick %x\n", m_tx_clock_counter);
+ if(m_tx_clock_counter == 0) {
+ tx_sync_step();
+
+ if(m_clock_mode == INTERNAL_SYNC_OUT && m_tx_state != ST_IDLE)
+ m_cpu->do_sci_clk(m_id, 0);
+
+ } else if(m_tx_clock_counter == 1 && m_clock_mode == INTERNAL_SYNC_OUT)
+ m_cpu->do_sci_clk(m_id, 1);
+}
+
+void h8_sci_device::tx_sync_step()
+{
+ LOGMASKED(LOG_STATE, "tx_sync_step bit=%d\n", m_tx_bit);
+ if(!m_tx_bit) {
+ m_tx_state = ST_IDLE;
+ clock_stop(CLK_TX);
+ m_cpu->do_sci_tx(m_id, 1);
+ if(m_scr & SCR_TEIE)
+ m_intc->internal_interrupt(m_tei_int);
+
+ // if there's more to send, start the transmitter
+ if((m_scr & SCR_TE) && !(m_ssr & SSR_TDRE))
+ tx_start();
+ else
+ m_ssr |= SSR_TEND;
+ } else {
+ m_cpu->do_sci_tx(m_id, m_tsr & 1);
+ m_tsr >>= 1;
+ m_tx_bit--;
+ }
}
void h8_sci_device::rx_start()
{
m_rx_parity = m_smr & SMR_OE ? 0 : 1;
m_rsr = 0x00;
- if(V>=2) logerror("start receive\n");
+ LOGMASKED(LOG_STATE, "start receive\n");
if(m_smr & SMR_CA) {
m_rx_state = ST_BIT;
m_rx_bit = 8;
- clock_start(CLK_RX);
} else {
m_rx_state = ST_START;
m_rx_bit = 1;
- if(!m_rx_value)
- clock_start(CLK_RX);
}
+ clock_start(CLK_RX);
}
void h8_sci_device::rx_done()
@@ -641,13 +664,13 @@ void h8_sci_device::rx_done()
if(!(m_ssr & SSR_FER)) {
if((m_smr & SMR_PE) && m_rx_parity) {
m_ssr |= SSR_PER;
- if(V>=1) logerror("Receive parity error\n");
+ LOGMASKED(LOG_DATA, "Receive parity error\n");
} else if(m_ssr & SSR_RDRF) {
m_ssr |= SSR_ORER;
- if(V>=1) logerror("Receive overrun\n");
+ LOGMASKED(LOG_DATA, "Receive overrun\n");
} else {
m_ssr |= SSR_RDRF;
- if(V>=1) logerror("Received %02x '%c'\n", m_rsr, m_rsr >= 32 && m_rsr < 127 ? m_rsr : '.');
+ LOGMASKED(LOG_DATA, "Received %02x '%c'\n", m_rsr, m_rsr >= 32 && m_rsr < 127 ? m_rsr : '.');
m_rdr = m_rsr;
}
}
@@ -657,20 +680,28 @@ void h8_sci_device::rx_done()
else
m_intc->internal_interrupt(m_rxi_int);
}
- if((m_scr & SCR_RE) && !has_recv_error() && !is_sync_start())
- rx_start();
- else {
- clock_stop(CLK_RX);
- m_rx_state = ST_IDLE;
- }
+
+ m_rx_state = ST_IDLE;
+ clock_stop(CLK_RX);
+
+ sync_rx_start();
+}
+
+void h8_sci_device::rx_async_tick()
+{
+ m_rx_clock_counter = (m_rx_clock_counter + 1) & 15;
+ LOGMASKED(LOG_TICK, "rx_async_tick %x\n", m_rx_clock_counter);
+ if(m_rx_clock_counter == 8)
+ rx_async_step();
}
-void h8_sci_device::rx_raised_edge()
+void h8_sci_device::rx_async_step()
{
- if(V>=2) logerror("rx_raised_edge state=%s bit=%d\n", state_names[m_rx_state], m_rx_bit);
+ LOGMASKED(LOG_STATE, "rx_async_step state=%s bit=%d\n", state_names[m_rx_state], m_rx_bit);
switch(m_rx_state) {
case ST_START:
if(m_rx_value) {
+ m_rx_state = ST_IDLE;
clock_stop(CLK_RX);
break;
}
@@ -679,7 +710,6 @@ void h8_sci_device::rx_raised_edge()
break;
case ST_BIT:
- m_rx_parity ^= m_rx_value;
m_rsr >>= 1;
if(m_rx_value) {
m_rx_parity = !m_rx_parity;
@@ -687,9 +717,7 @@ void h8_sci_device::rx_raised_edge()
}
m_rx_bit--;
if(!m_rx_bit) {
- if(m_smr & SMR_CA)
- rx_done();
- else if(m_smr & SMR_PE) {
+ if(m_smr & SMR_PE) {
m_rx_state = ST_PARITY;
m_rx_bit = 1;
} else {
@@ -718,5 +746,33 @@ void h8_sci_device::rx_raised_edge()
default:
abort();
}
- if(V>=2) logerror(" -> state=%s, bit=%d\n", state_names[m_rx_state], m_rx_bit);
+ LOGMASKED(LOG_STATE, " -> state=%s, bit=%d\n", state_names[m_rx_state], m_rx_bit);
+}
+
+void h8_sci_device::rx_sync_tick()
+{
+ m_rx_clock_counter = (m_rx_clock_counter + 1) & 1;
+ LOGMASKED(LOG_TICK, "rx_sync_tick %x\n", m_rx_clock_counter);
+
+ if(m_rx_clock_counter == 0 && m_clock_mode == INTERNAL_SYNC_OUT)
+ m_cpu->do_sci_clk(m_id, 0);
+
+ else if(m_rx_clock_counter == 1) {
+ if(m_clock_mode == INTERNAL_SYNC_OUT)
+ m_cpu->do_sci_clk(m_id, 1);
+
+ rx_sync_step();
+ }
+}
+
+void h8_sci_device::rx_sync_step()
+{
+ LOGMASKED(LOG_STATE, "rx_sync_step bit=%d\n", m_rx_value);
+ m_rsr >>= 1;
+ if(m_rx_value)
+ m_rsr |= 0x80;
+ m_rx_bit--;
+
+ if(!m_rx_bit)
+ rx_done();
}