383 lines
8.1 KiB
C
383 lines
8.1 KiB
C
/*
|
|
Copyright 2018 milestogo
|
|
with elements Copyright 2014 cy384 under a modified BSD license
|
|
building on qmk structure Copyright 2012 Jun Wako <wakojun@gmail.com>
|
|
|
|
This program is free software: you can redistribute it and/or modify
|
|
it under the terms of the GNU General Public License as published by
|
|
the Free Software Foundation, either version 2 of the License, or
|
|
(at your option) any later version.
|
|
|
|
This program is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
GNU General Public License for more details.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with this program. If not, see <http://www.gnu.org/licenses/>.
|
|
*/
|
|
|
|
#include "matrix.h"
|
|
#include "debug.h"
|
|
#include "wait.h"
|
|
#include "uart.h"
|
|
#include "timer.h"
|
|
|
|
|
|
/*
|
|
* Matrix Array usage:
|
|
*
|
|
* ROW: 12(4bits)
|
|
* COL: 8(3bits)
|
|
*
|
|
* +---------+
|
|
* 0|00 ... 07|
|
|
* 1|00 ... 07|
|
|
* :| ... |
|
|
* :| ... |
|
|
* A| |
|
|
* B| |
|
|
* +---------+
|
|
*/
|
|
static uint8_t matrix[MATRIX_ROWS];
|
|
|
|
|
|
// we're going to need a sleep timer
|
|
static uint16_t last_activity ;
|
|
// and a byte to track duplicate up events signalling all keys up.
|
|
static uint16_t last_upKey ;
|
|
// serial device can disconnect. Check every MAXDROP characters.
|
|
static uint16_t disconnect_counter = 0;
|
|
|
|
|
|
// bitmath masks.
|
|
#define KEY_MASK 0b10000000
|
|
#define COL_MASK 0b00000111
|
|
#define ROW_MASK 0b01111000
|
|
|
|
|
|
#define ROW(code) (( code & ROW_MASK ) >>3)
|
|
#define COL(code) ((code & COL_MASK) )
|
|
#define KEYUP(code) ((code & KEY_MASK) >>7 )
|
|
|
|
__attribute__ ((weak))
|
|
void matrix_init_kb(void) {
|
|
matrix_init_user();
|
|
}
|
|
|
|
__attribute__ ((weak))
|
|
void matrix_scan_kb(void) {
|
|
matrix_scan_user();
|
|
}
|
|
|
|
__attribute__ ((weak))
|
|
void matrix_init_user(void) {
|
|
}
|
|
|
|
__attribute__ ((weak))
|
|
void matrix_scan_user(void) {
|
|
}
|
|
|
|
inline
|
|
uint8_t matrix_rows(void)
|
|
{
|
|
return MATRIX_ROWS;
|
|
}
|
|
|
|
inline
|
|
uint8_t matrix_cols(void)
|
|
{
|
|
return MATRIX_COLS;
|
|
}
|
|
|
|
|
|
void pins_init(void) {
|
|
// set pins for pullups, Rts , power &etc.
|
|
|
|
//print ("pins setup\n");
|
|
setPinOutput(VCC_PIN);
|
|
writePinLow(VCC_PIN);
|
|
|
|
#if ( HANDSPRING == 0)
|
|
|
|
#ifdef CY835
|
|
setPinOutput(GND_PIN);
|
|
writePinLow(GND_PIN);
|
|
|
|
setPinOutput(PULLDOWN_PIN);
|
|
writePinLow(PULLDOWN_PIN);
|
|
#endif
|
|
|
|
setPinInput(DCD_PIN);
|
|
setPinInput(RTS_PIN);
|
|
#endif
|
|
|
|
/* check that the other side isn't powered up.
|
|
test=readPin(DCD_PIN);
|
|
xprintf("b%02X:", test);
|
|
test=readPin(RTS_PIN);
|
|
xprintf("%02X\n", test);
|
|
*/
|
|
|
|
}
|
|
|
|
uint8_t rts_reset(void) {
|
|
static uint8_t firstread ;
|
|
/* bounce RTS so device knows it is rebooted */
|
|
|
|
// On boot, we keep rts as input, then switch roles here
|
|
// on leaving sleep, we toggle the same way
|
|
|
|
firstread=readPin(RTS_PIN);
|
|
// printf("r%02X:", firstread);
|
|
|
|
setPinOutput(RTS_PIN);
|
|
|
|
if (firstread) {
|
|
writePinLow(RTS_PIN);
|
|
}
|
|
wait_ms(10);
|
|
writePinHigh(RTS_PIN);
|
|
|
|
|
|
/* the future is Arm
|
|
if (!palReadPad(RTS_PIN_IOPRT))
|
|
{
|
|
wait_ms(10);
|
|
palSetPadMode(RTS_PINn_IOPORT, PinDirectionOutput_PUSHPULL);
|
|
palSetPad(RTS_PORT, RTS_PIN);
|
|
}
|
|
else
|
|
{
|
|
palSetPadMode(RTS_PIN_RTS_PORT, PinDirectionOutput_PUSHPULL);
|
|
palSetPad(RTS_PORT, RTS_PIN);
|
|
palClearPad(RTS_PORT, RTS_PIN);
|
|
wait_ms(10);
|
|
palSetPad(RTS_PORT, RTS_PIN);
|
|
}
|
|
*/
|
|
|
|
|
|
wait_ms(5);
|
|
//print("rts\n");
|
|
return 1;
|
|
}
|
|
|
|
uint8_t get_serial_byte(void) {
|
|
static uint8_t code;
|
|
while(1) {
|
|
code = uart_read();
|
|
if (code) {
|
|
dprintf("%02X ", code);
|
|
return code;
|
|
}
|
|
}
|
|
}
|
|
|
|
uint8_t palm_handshake(void) {
|
|
// assumes something has seen DCD go high, we've toggled RTS
|
|
// and we now need to verify handshake.
|
|
// listen for up to 4 packets before giving up.
|
|
// usually I get the sequence FF FA FD
|
|
static uint8_t codeA=0;
|
|
|
|
for (uint8_t i=0; i < 5; i++) {
|
|
codeA=get_serial_byte();
|
|
if ( 0xFA == codeA) {
|
|
if( 0xFD == get_serial_byte()) {
|
|
return 1;
|
|
}
|
|
}
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
uint8_t palm_reset(void) {
|
|
print("@");
|
|
rts_reset(); // shouldn't need to power cycle.
|
|
|
|
if ( palm_handshake() ) {
|
|
last_activity = timer_read();
|
|
return 1;
|
|
} else {
|
|
print("failed reset");
|
|
return 0;
|
|
}
|
|
|
|
}
|
|
|
|
uint8_t handspring_handshake(void) {
|
|
// should be sent 15 ms after power up.
|
|
// listen for up to 4 packets before giving up.
|
|
static uint8_t codeA=0;
|
|
|
|
for (uint8_t i=0; i < 5; i++) {
|
|
codeA=get_serial_byte();
|
|
if ( 0xF9 == codeA) {
|
|
if( 0xFB == get_serial_byte()) {
|
|
return 1;
|
|
}
|
|
}
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
uint8_t handspring_reset(void) {
|
|
writePinLow(VCC_PIN);
|
|
wait_ms(5);
|
|
writePinHigh(VCC_PIN);
|
|
|
|
if ( handspring_handshake() ) {
|
|
last_activity = timer_read();
|
|
disconnect_counter=0;
|
|
return 1;
|
|
} else {
|
|
print("-HSreset");
|
|
return 0;
|
|
}
|
|
}
|
|
|
|
void matrix_init(void)
|
|
{
|
|
debug_enable = true;
|
|
//debug_matrix =true;
|
|
|
|
uart_init(9600); // arguments all #defined
|
|
|
|
#if (HANDSPRING == 0)
|
|
pins_init(); // set all inputs and outputs.
|
|
#endif
|
|
|
|
print("power up\n");
|
|
writePinHigh(VCC_PIN);
|
|
|
|
// wait for DCD strobe from keyboard - it will do this
|
|
// up to 3 times, then the board needs the RTS toggled to try again
|
|
|
|
#if ( HANDSPRING == 1)
|
|
if ( handspring_handshake() ) {
|
|
last_activity = timer_read();
|
|
} else {
|
|
print("failed handshake");
|
|
wait_ms(1000);
|
|
//BUG /should/ power cycle or toggle RTS & reset, but this usually works.
|
|
}
|
|
|
|
#else /// Palm / HP device with DCD
|
|
while( !readPin(DCD_PIN) ) {;}
|
|
print("dcd\n");
|
|
|
|
rts_reset(); // at this point the keyboard should think all is well.
|
|
|
|
if ( palm_handshake() ) {
|
|
last_activity = timer_read();
|
|
} else {
|
|
print("failed handshake");
|
|
wait_ms(1000);
|
|
//BUG /should/ power cycle or toggle RTS & reset, but this usually works.
|
|
}
|
|
|
|
#endif
|
|
|
|
// initialize matrix state: all keys off
|
|
for (uint8_t i=0; i < MATRIX_ROWS; i++) matrix[i] = 0x00;
|
|
|
|
matrix_init_kb();
|
|
return;
|
|
|
|
|
|
}
|
|
|
|
|
|
uint8_t matrix_scan(void)
|
|
{
|
|
uint8_t code;
|
|
code = uart_read();
|
|
if (!code) {
|
|
/*
|
|
disconnect_counter ++;
|
|
if (disconnect_counter > MAXDROP) {
|
|
// set all keys off
|
|
for (uint8_t i=0; i < MATRIX_ROWS; i++) matrix[i] = 0x00;
|
|
}
|
|
*/
|
|
// check if the keyboard is asleep.
|
|
if (timer_elapsed(last_activity) > SLEEP_TIMEOUT) {
|
|
#if(HANDSPRING ==0 )
|
|
palm_reset();
|
|
#else
|
|
handspring_reset();
|
|
#endif
|
|
return 0;
|
|
}
|
|
|
|
}
|
|
|
|
last_activity = timer_read();
|
|
disconnect_counter=0; // if we are getting serial data, we're connected.
|
|
|
|
dprintf("%02X ", code);
|
|
|
|
switch (code) {
|
|
case 0xFD: // unexpected reset byte 2
|
|
print("rstD ");
|
|
return 0;
|
|
case 0xFA: // unexpected reset
|
|
print("rstA ");
|
|
return 0;
|
|
}
|
|
|
|
if (KEYUP(code)) {
|
|
if (code == last_upKey) {
|
|
// all keys are not pressed.
|
|
// Manual says to disable all modifiers left open now.
|
|
// but that could defeat sticky keys.
|
|
// BUG? dropping this byte.
|
|
last_upKey=0;
|
|
return 0;
|
|
}
|
|
// release
|
|
if (matrix_is_on(ROW(code), COL(code))) {
|
|
matrix[ROW(code)] &= ~(1<<COL(code));
|
|
last_upKey=code;
|
|
}
|
|
} else {
|
|
// press
|
|
if (!matrix_is_on(ROW(code), COL(code))) {
|
|
matrix[ROW(code)] |= (1<<COL(code));
|
|
|
|
}
|
|
}
|
|
|
|
matrix_scan_kb();
|
|
return code;
|
|
}
|
|
|
|
inline
|
|
bool matrix_has_ghost(void)
|
|
{
|
|
return false;
|
|
}
|
|
|
|
inline
|
|
bool matrix_is_on(uint8_t row, uint8_t col)
|
|
{
|
|
return (matrix[row] & (1<<col));
|
|
}
|
|
|
|
inline
|
|
uint8_t matrix_get_row(uint8_t row)
|
|
{
|
|
return matrix[row];
|
|
}
|
|
|
|
void matrix_print(void)
|
|
{
|
|
print("\nr/c 01234567\n");
|
|
for (uint8_t row = 0; row < matrix_rows(); row++) {
|
|
print_hex8(row); print(": ");
|
|
print_bin_reverse8(matrix_get_row(row));
|
|
print("\n");
|
|
}
|
|
}
|