Fix ibm4704 protocol with using interrupt

example_keyboards
tmk 10 years ago committed by Jun Wako
parent 5ea50bfb30
commit d42aa47809

@ -0,0 +1,53 @@
#ifndef RING_BUFFER_H
#define RING_BUFFER_H
/*--------------------------------------------------------------------
* Ring buffer to store scan codes from keyboard
*------------------------------------------------------------------*/
#define RBUF_SIZE 32
static uint8_t rbuf[RBUF_SIZE];
static uint8_t rbuf_head = 0;
static uint8_t rbuf_tail = 0;
static inline void rbuf_enqueue(uint8_t data)
{
uint8_t sreg = SREG;
cli();
uint8_t next = (rbuf_head + 1) % RBUF_SIZE;
if (next != rbuf_tail) {
rbuf[rbuf_head] = data;
rbuf_head = next;
} else {
print("rbuf: full\n");
}
SREG = sreg;
}
static inline uint8_t rbuf_dequeue(void)
{
uint8_t val = 0;
uint8_t sreg = SREG;
cli();
if (rbuf_head != rbuf_tail) {
val = rbuf[rbuf_tail];
rbuf_tail = (rbuf_tail + 1) % RBUF_SIZE;
}
SREG = sreg;
return val;
}
static inline bool rbuf_has_data(void)
{
uint8_t sreg = SREG;
cli();
bool has_data = (rbuf_head != rbuf_tail);
SREG = sreg;
return has_data;
}
static inline void rbuf_clear(void)
{
uint8_t sreg = SREG;
cli();
rbuf_head = rbuf_tail = 0;
SREG = sreg;
}
#endif /* RING_BUFFER_H */

@ -56,7 +56,6 @@ along with this program. If not, see <http://www.gnu.org/licenses/>.
/* /*
* Pin interrupt * Pin interrupt
*/ */
#ifdef IBM4704_USE_INT
#define IBM4704_INT_INIT() do { \ #define IBM4704_INT_INIT() do { \
EICRA |= ((1<<ISC11) | \ EICRA |= ((1<<ISC11) | \
(0<<ISC10)); \ (0<<ISC10)); \
@ -68,7 +67,6 @@ along with this program. If not, see <http://www.gnu.org/licenses/>.
EIMSK &= ~(1<<INT1); \ EIMSK &= ~(1<<INT1); \
} while (0) } while (0)
#define IBM4704_INT_VECT INT1_vect #define IBM4704_INT_VECT INT1_vect
#endif
#endif #endif

@ -69,41 +69,34 @@ static void enable_break(void)
{ {
uint8_t ret; uint8_t ret;
print("Enable break: "); print("Enable break: ");
// valid scancode: 00-77h // valid scancode: 00-79h
for (uint8_t code = 0; code < 0x78; code++) { for (uint8_t code = 0; code < 0x7A; code++) {
while (ibm4704_send(0x80|code) != 0) { while (ibm4704_send(0x80|code)) _delay_ms(1);
print("z"); // get none when ok, get FD when out of bound
_delay_us(500); _delay_ms(5);
} if ((ret = ibm4704_recv()) != 0xff) {
_delay_us(2000);
ret = ibm4704_recv();
if (ret != 0xff) {
xprintf("c%02X:r%02X ", code, ret); xprintf("c%02X:r%02X ", code, ret);
} }
_delay_us(1000); _delay_ms(1);
} }
_delay_us(1000); _delay_us(1000);
while (ibm4704_send(0xFF) != 0) { _delay_us(500); } // End while (ibm4704_send(0xFF)) { _delay_ms(1); } // End
print("End\n"); print("End\n");
} }
void matrix_init(void) void matrix_init(void)
{ {
uint8_t ret; debug_enable = false;
debug_enable = true;
ibm4704_init(); ibm4704_init();
matrix_clear(); matrix_clear();
// read keyboard id _delay_ms(2000); // wait for starting up debug console
while ((ret = ibm4704_recv()) == 0xFF) {
ibm4704_send(0xFE);
_delay_us(100);
}
_delay_ms(2000); // wait for starting up debug console
print("IBM 4704 converter\n"); print("IBM 4704 converter\n");
xprintf("Keyboard ID: %02X\n", ret); while (ibm4704_send(0xFE)) _delay_ms(1); // resend
_delay_ms(5);
xprintf("Keyboard ID: %02X\n", ibm4704_recv());
enable_break(); enable_break();
} }
@ -116,14 +109,16 @@ uint8_t matrix_scan(void)
if (code==0xFF) { if (code==0xFF) {
// Not receivd // Not receivd
return 0; return 0;
} else if ((code&0x78)==0x78) { } else if ((code&0x7F) >= 0x7A) {
// 0xFF-F8 and 0x7F-78 is not scancode // 0xFF-FA and 0x7F-7A is not scancode
xprintf("Error: %0X\n", code); xprintf("Error: %02X\n", code);
matrix_clear(); matrix_clear();
return 0; return 0;
} else if (code&0x80) { } else if (code&0x80) {
dprintf("%02X\n", code);
matrix_make(code); matrix_make(code);
} else { } else {
dprintf("%02X\n", code);
matrix_break(code); matrix_break(code);
} }
return 1; return 1;

@ -4,6 +4,7 @@ Copyright 2010,2011,2012,2013 Jun WAKO <wakojun@gmail.com>
#include <stdbool.h> #include <stdbool.h>
#include <util/delay.h> #include <util/delay.h>
#include "debug.h" #include "debug.h"
#include "ring_buffer.h"
#include "ibm4704.h" #include "ibm4704.h"
@ -20,7 +21,9 @@ uint8_t ibm4704_error = 0;
void ibm4704_init(void) void ibm4704_init(void)
{ {
inhibit(); IBM4704_INT_INIT();
IBM4704_INT_ON();
idle();
} }
/* /*
@ -47,6 +50,8 @@ uint8_t ibm4704_send(uint8_t data)
bool parity = true; // odd parity bool parity = true; // odd parity
ibm4704_error = 0; ibm4704_error = 0;
IBM4704_INT_OFF();
/* Request to send */ /* Request to send */
idle(); idle();
clock_lo(); clock_lo();
@ -57,7 +62,6 @@ uint8_t ibm4704_send(uint8_t data)
/* Data bit */ /* Data bit */
for (uint8_t i = 0; i < 8; i++) { for (uint8_t i = 0; i < 8; i++) {
WAIT(clock_hi, 100, 0x40+i); WAIT(clock_hi, 100, 0x40+i);
//_delay_us(5);
if (data&(1<<i)) { if (data&(1<<i)) {
parity = !parity; parity = !parity;
data_hi(); data_hi();
@ -79,28 +83,25 @@ uint8_t ibm4704_send(uint8_t data)
/* End */ /* End */
WAIT(data_lo, 100, 0x36); WAIT(data_lo, 100, 0x36);
inhibit(); idle();
_delay_us(200); // wait to recover clock to hi IBM4704_INT_ON();
return 0; return 0;
ERROR: ERROR:
inhibit(); idle();
if (ibm4704_error >= 0x30) { if (ibm4704_error > 0x30) {
xprintf("x%02X ", ibm4704_error); xprintf("S:%02X ", ibm4704_error);
} }
_delay_us(200); // wait to recover clock to hi IBM4704_INT_ON();
return -1; return -1;
} }
/* receive data when host want else inhibit communication */ /* wait forever to receive data */
uint8_t ibm4704_recv_response(void) uint8_t ibm4704_recv_response(void)
{ {
// 250 * 100us(wait start bit in ibm4704_recv) while (!rbuf_has_data()) {
uint8_t data = 0; _delay_ms(1);
uint8_t try = 250; }
do { return rbuf_dequeue();
data = ibm4704_recv();
} while (try-- && ibm4704_error);
return data;
} }
/* /*
@ -121,49 +122,69 @@ Stop bit: Keyboard pulls down Data line to lo after 9th clock.
*/ */
uint8_t ibm4704_recv(void) uint8_t ibm4704_recv(void)
{ {
uint8_t data = 0; if (rbuf_has_data()) {
bool parity = true; // odd parity return rbuf_dequeue();
ibm4704_error = IBM4704_ERR_NONE; } else {
return -1;
idle();
_delay_us(5); // wait for line settles
/* start bit */
WAIT(clock_lo, 100, 0x11); // wait for keyboard to send
WAIT(data_hi, 100, 0x12); // can be delayed that long
WAIT(clock_hi, 100, 0x13); // first rising edge which can take longer
/* data */
for (uint8_t i = 0; i < 8; i++) {
WAIT(clock_hi, 100, 0x20+i);
//_delay_us(5);
if (data_in()) {
parity = !parity;
data |= (1<<i);
}
WAIT(clock_lo, 150, 0x28+i);
} }
}
/* parity */ ISR(IBM4704_INT_VECT)
WAIT(clock_hi, 100, 0x17); {
if (data_in() != parity) { static enum {
ibm4704_error = IBM4704_ERR_PARITY; INIT, START, BIT0, BIT1, BIT2, BIT3, BIT4, BIT5, BIT6, BIT7, PARITY,
goto ERROR; } state = INIT;
} // LSB first
WAIT(clock_lo, 150, 0x18); static uint8_t data = 0;
// Odd parity
/* stop bit */ static uint8_t parity = false;
WAIT(clock_hi, 100, 0x19);
WAIT(data_lo, 1, 0x19);
inhibit(); ibm4704_error = 0;
_delay_us(200); // wait to recover clock to hi // return unless falling edge
return data; if (clock_in()) { goto RETURN; } // why this occurs?
ERROR:
if (ibm4704_error > 0x12) { state++;
xprintf("x%02X ", ibm4704_error); switch (state) {
case START:
// Data:Low
WAIT(data_hi, 10, state);
break;
case BIT0:
case BIT1:
case BIT2:
case BIT3:
case BIT4:
case BIT5:
case BIT6:
case BIT7:
data >>= 1;
if (data_in()) {
data |= 0x80;
parity = !parity;
}
break;
case PARITY:
if (data_in()) {
parity = !parity;
}
if (!parity)
goto ERROR;
rbuf_enqueue(data);
ibm4704_error = IBM4704_ERR_NONE;
goto DONE;
break;
default:
goto ERROR;
} }
inhibit(); goto RETURN;
_delay_us(200); // wait to recover clock to hi ERROR:
return -1; ibm4704_error = state;
while (ibm4704_send(0xFE)) _delay_ms(1); // resend
xprintf("R:%02X\n", data);
DONE:
state = INIT;
data = 0;
parity = false;
RETURN:
return;
} }

Loading…
Cancel
Save