static void set_mode(const device_config *device, UINT8 data)
{
i8255a_t *i8255a = get_safe_token(device);
i8255a->control = data;
/* group A */
i8255a->output[PORT_A] = 0;
i8255a->input[PORT_A] = 0;
i8255a->ibf[PORT_A] = 0;
i8255a->obf[PORT_A] = 1;
i8255a->inte[PORT_A] = 0;
i8255a->inte1 = 0;
i8255a->inte2 = 0;
if (LOG) logerror("8255A '%s' Group A Mode: %u\n", device->tag, group_mode(i8255a, GROUP_A));
if (LOG) logerror("8255A '%s' Port A Mode: %s\n", device->tag, (port_mode(i8255a, PORT_A) == MODE_OUTPUT) ? "output" : "input");
if (LOG) logerror("8255A '%s' Port C Upper Mode: %s\n", device->tag, (port_c_upper_mode(i8255a) == MODE_OUTPUT) ? "output" : "input");
if (LOG) logerror("8255A '%s' Group B Mode: %u\n", device->tag, group_mode(i8255a, GROUP_B));
if (LOG) logerror("8255A '%s' Port B Mode: %s\n", device->tag, (port_mode(i8255a, PORT_B) == MODE_OUTPUT) ? "output" : "input");
if (LOG) logerror("8255A '%s' Port C Lower Mode: %s\n", device->tag, (port_c_lower_mode(i8255a) == MODE_OUTPUT) ? "output" : "input");
/* group B */
i8255a->output[PORT_B] = 0;
i8255a->input[PORT_B] = 0;
i8255a->ibf[PORT_B] = 0;
i8255a->obf[PORT_B] = 1;
i8255a->inte[PORT_B] = 0;
i8255a->output[PORT_C] = 0;
i8255a->input[PORT_C] = 0;
output_pc(i8255a);
}
static void write_pc(i8255a_t *i8255a, UINT8 data)
{
int changed = 0;
if (group_mode(i8255a, GROUP_A) == MODE_0)
{
/* PC upper */
if (port_c_upper_mode(i8255a) == MODE_OUTPUT)
{
i8255a->output[PORT_C] = (data & 0xf0) | (i8255a->output[PORT_C] & 0x0f);
changed = 1;
}
/* PC lower */
if (port_c_lower_mode(i8255a) == MODE_OUTPUT)
{
i8255a->output[PORT_C] = (i8255a->output[PORT_C] & 0xf0) | (data & 0x0f);
changed = 1;
}
}
if (changed)
{
output_pc(i8255a);
}
}
void i8255_device::set_mode(uint8_t data)
{
m_control = data;
// group A
m_output[PORT_A] = 0;
m_input[PORT_A] = 0;
m_ibf[PORT_A] = 0;
m_obf[PORT_A] = 1;
m_inte[PORT_A] = 0;
m_inte1 = 0;
m_inte2 = 0;
if (port_mode(PORT_A) == MODE_OUTPUT)
{
m_out_pa_cb((offs_t)0, m_output[PORT_A]);
}
else
{
// TTL inputs float high
m_out_pa_cb((offs_t)0, 0xff);
}
if (LOG)
{
logerror("I8255 '%s' Group A Mode: %u\n", tag(), group_mode(GROUP_A));
logerror("I8255 '%s' Port A Mode: %s\n", tag(), (port_mode(PORT_A) == MODE_OUTPUT) ? "output" : "input");
logerror("I8255 '%s' Port C Upper Mode: %s\n", tag(), (port_c_upper_mode() == MODE_OUTPUT) ? "output" : "input");
logerror("I8255 '%s' Group B Mode: %u\n", tag(), group_mode(GROUP_B));
logerror("I8255 '%s' Port B Mode: %s\n", tag(), (port_mode(PORT_B) == MODE_OUTPUT) ? "output" : "input");
logerror("I8255 '%s' Port C Lower Mode: %s\n", tag(), (port_c_lower_mode() == MODE_OUTPUT) ? "output" : "input");
}
// group B
m_output[PORT_B] = 0;
m_input[PORT_B] = 0;
m_ibf[PORT_B] = 0;
m_obf[PORT_B] = 1;
m_inte[PORT_B] = 0;
if (port_mode(PORT_B) == MODE_OUTPUT)
{
m_out_pb_cb((offs_t)0, m_output[PORT_B]);
}
else
{
// TTL inputs float high
m_out_pb_cb((offs_t)0, 0xff);
}
m_output[PORT_C] = 0;
m_input[PORT_C] = 0;
output_pc();
}
void i8255_device::set_mode(uint8_t data)
{
m_control = data;
// group A
m_output[PORT_A] = 0;
m_input[PORT_A] = 0;
m_ibf[PORT_A] = 0;
m_obf[PORT_A] = 1;
m_inte[PORT_A] = 0;
m_inte1 = 0;
m_inte2 = 0;
if (port_mode(PORT_A) == MODE_OUTPUT)
{
m_out_pa_cb((offs_t)0, m_output[PORT_A]);
}
else
{
// TTL inputs floating
m_out_pa_cb((offs_t)0, m_tri_pa_cb(0));
}
LOG("I8255 Group A Mode: %u\n", group_mode(GROUP_A));
LOG("I8255 Port A Mode: %s\n", (port_mode(PORT_A) == MODE_OUTPUT) ? "output" : "input");
LOG("I8255 Port C Upper Mode: %s\n", (port_c_upper_mode() == MODE_OUTPUT) ? "output" : "input");
LOG("I8255 Group B Mode: %u\n", group_mode(GROUP_B));
LOG("I8255 Port B Mode: %s\n", (port_mode(PORT_B) == MODE_OUTPUT) ? "output" : "input");
LOG("I8255 Port C Lower Mode: %s\n", (port_c_lower_mode() == MODE_OUTPUT) ? "output" : "input");
// group B
m_output[PORT_B] = 0;
m_input[PORT_B] = 0;
m_ibf[PORT_B] = 0;
m_obf[PORT_B] = 1;
m_inte[PORT_B] = 0;
if (port_mode(PORT_B) == MODE_OUTPUT)
{
m_out_pb_cb((offs_t)0, m_output[PORT_B]);
}
else
{
// TTL inputs floating
m_out_pb_cb((offs_t)0, m_tri_pb_cb(0));
}
m_output[PORT_C] = 0;
m_input[PORT_C] = 0;
output_pc();
}
void i8255_device::output_pc()
{
uint8_t data = 0;
uint8_t mask = 0;
uint8_t b_mask = 0x0f;
// PC upper
switch (group_mode(GROUP_A))
{
case MODE_0:
if (port_c_upper_mode() == MODE_OUTPUT)
{
mask |= 0xf0;
}
else
{
// TTL inputs float high
data |= 0xf0;
}
break;
case MODE_1:
data |= m_intr[PORT_A] ? 0x08 : 0x00;
if (port_mode(PORT_A) == MODE_OUTPUT)
{
data |= m_obf[PORT_A] ? 0x80 : 0x00;
mask |= 0x30;
}
else
{
data |= m_ibf[PORT_A] ? 0x20 : 0x00;
mask |= 0xc0;
}
break;
case MODE_2:
b_mask = 0x07;
data |= m_intr[PORT_A] ? 0x08 : 0x00;
data |= m_ibf[PORT_A] ? 0x20 : 0x00;
data |= m_obf[PORT_A] ? 0x80 : 0x00;
break;
}
// PC lower
switch (group_mode(GROUP_B))
{
case MODE_0:
if (port_c_lower_mode() == MODE_OUTPUT)
{
mask |= b_mask;
}
else
{
// TTL inputs float high
data |= b_mask;
}
break;
case MODE_1:
data |= m_intr[PORT_B] ? 0x01 : 0x00;
if (port_mode(PORT_B) == MODE_OUTPUT)
{
data |= m_obf[PORT_B] ? 0x02 : 0x00;
}
else
{
data |= m_ibf[PORT_B] ? 0x02 : 0x00;
}
}
data |= m_output[PORT_C] & mask;
m_out_pc_cb((offs_t)0, data);
}
uint8_t i8255_device::read_pc()
{
uint8_t data = 0;
uint8_t mask = 0;
uint8_t b_mask = 0x0f;
// PC upper
switch (group_mode(GROUP_A))
{
case MODE_0:
if (port_c_upper_mode() == MODE_OUTPUT)
{
// read data from output latch
data |= m_output[PORT_C] & 0xf0;
}
else
{
// read data from port
mask |= 0xf0;
}
break;
case MODE_1:
data |= m_intr[PORT_A] ? 0x08 : 0x00;
if (port_mode(PORT_A) == MODE_OUTPUT)
{
data |= m_obf[PORT_A] ? 0x80 : 0x00;
data |= m_inte[PORT_A] ? 0x40 : 0x00;
mask |= 0x30;
}
else
{
data |= m_ibf[PORT_A] ? 0x20 : 0x00;
data |= m_inte[PORT_A] ? 0x10 : 0x00;
mask |= 0xc0;
}
break;
case MODE_2:
b_mask = 0x07;
data |= m_intr[PORT_A] ? 0x08 : 0x00;
data |= m_inte2 ? 0x10 : 0x00;
data |= m_ibf[PORT_A] ? 0x20 : 0x00;
data |= m_inte1 ? 0x40 : 0x00;
data |= m_obf[PORT_A] ? 0x80 : 0x00;
break;
}
// PC lower
switch (group_mode(GROUP_B))
{
case MODE_0:
if (port_c_lower_mode() == MODE_OUTPUT)
{
// read data from output latch
data |= m_output[PORT_C] & b_mask;
}
else
{
// read data from port
mask |= b_mask;
}
break;
case MODE_1:
data |= m_inte[PORT_B] ? 0x04 : 0x00;
data |= m_intr[PORT_B] ? 0x01 : 0x00;
if (port_mode(PORT_B) == MODE_OUTPUT)
{
data |= m_obf[PORT_B] ? 0x02 : 0x00;
}
else
{
data |= m_ibf[PORT_B] ? 0x02 : 0x00;
}
}
if (mask)
{
// read data from port
data |= m_in_pc_cb(0) & mask;
}
return data;
}
static UINT8 read_pc(i8255a_t *i8255a)
{
UINT8 data = 0;
UINT8 mask = 0;
/* PC upper */
switch (group_mode(i8255a, GROUP_A))
{
case MODE_0:
if (port_c_upper_mode(i8255a) == MODE_OUTPUT)
{
/* read data from output latch */
data |= i8255a->output[PORT_C] & 0xf0;
}
else
{
/* read data from port */
mask |= 0xf0;
}
break;
case MODE_1:
data |= i8255a->intr[PORT_A] ? 0x08 : 0x00;
if (port_mode(i8255a, PORT_A) == MODE_OUTPUT)
{
data |= i8255a->obf[PORT_A] ? 0x80 : 0x00;
data |= i8255a->inte[PORT_A] ? 0x40 : 0x00;
mask |= 0x30;
}
else
{
data |= i8255a->ibf[PORT_A] ? 0x20 : 0x00;
data |= i8255a->inte[PORT_A] ? 0x10 : 0x00;
mask |= 0xc0;
}
break;
case MODE_2:
data |= i8255a->intr[PORT_A] ? 0x08 : 0x00;
data |= i8255a->inte2 ? 0x10 : 0x00;
data |= i8255a->ibf[PORT_A] ? 0x20 : 0x00;
data |= i8255a->inte1 ? 0x40 : 0x00;
data |= i8255a->obf[PORT_A] ? 0x80 : 0x00;
break;
}
/* PC lower */
switch (group_mode(i8255a, GROUP_B))
{
case MODE_0:
if (port_c_lower_mode(i8255a) == MODE_OUTPUT)
{
/* read data from output latch */
data |= i8255a->output[PORT_C] & 0x0f;
}
else
{
/* read data from port */
mask |= 0x0f;
}
break;
case MODE_1:
data |= i8255a->inte[PORT_B] ? 0x04 : 0x00;
data |= i8255a->intr[PORT_B] ? 0x01 : 0x00;
if (port_mode(i8255a, PORT_B) == MODE_OUTPUT)
{
data |= i8255a->obf[PORT_B] ? 0x02 : 0x00;
}
else
{
data |= i8255a->ibf[PORT_B] ? 0x02 : 0x00;
}
}
if (mask)
{
/* read data from port */
data |= devcb_call_read8(&i8255a->in_port_func[PORT_C], 0) & mask;
}
return data;
}
static void output_pc(i8255a_t *i8255a)
{
UINT8 data = 0;
UINT8 mask = 0;
/* PC upper */
switch (group_mode(i8255a, GROUP_A))
{
case MODE_0:
if (port_c_upper_mode(i8255a) == MODE_OUTPUT)
{
mask |= 0xf0;
}
break;
case MODE_1:
data |= i8255a->intr[PORT_A] ? 0x08 : 0x00;
if (port_mode(i8255a, PORT_A) == MODE_OUTPUT)
{
data |= i8255a->obf[PORT_A] ? 0x80 : 0x00;
mask |= 0x30;
}
else
{
data |= i8255a->ibf[PORT_A] ? 0x20 : 0x00;
mask |= 0xc0;
}
break;
case MODE_2:
data |= i8255a->intr[PORT_A] ? 0x08 : 0x00;
data |= i8255a->ibf[PORT_A] ? 0x20 : 0x00;
data |= i8255a->obf[PORT_A] ? 0x80 : 0x00;
break;
}
/* PC lower */
switch (group_mode(i8255a, GROUP_B))
{
case MODE_0:
if (port_c_lower_mode(i8255a) == MODE_OUTPUT)
{
mask |= 0x0f;
}
break;
case MODE_1:
data |= i8255a->intr[PORT_B] ? 0x01 : 0x00;
if (port_mode(i8255a, PORT_B) == MODE_OUTPUT)
{
data |= i8255a->obf[PORT_B] ? 0x02 : 0x00;
}
else
{
data |= i8255a->ibf[PORT_B] ? 0x02 : 0x00;
}
}
data |= i8255a->output[PORT_C] & mask;
devcb_call_write8(&i8255a->out_port_func[PORT_C], 0, data);
}
