2012-05-11 05:01:04 +00:00
/*
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 <stdint.h>
# include <stdbool.h>
# include <avr/io.h>
# include <util/delay.h>
# include "print.h"
# include "debug.h"
# include "util.h"
# include "matrix.h"
/*
* Happy Buckling Keyboard ( IBM Model M mod )
*
* Pin usage :
* COL : PD0 - 7
* ROW : PB0 - 7 , PF4 - 7
*/
# ifndef DEBOUNCE
2013-03-12 07:05:50 +00:00
# define DEBOUNCE 10
2012-05-11 05:01:04 +00:00
# endif
static uint8_t debouncing = DEBOUNCE ;
2013-03-27 08:15:06 +00:00
/* matrix state(1:on, 0:off) */
static matrix_row_t matrix [ MATRIX_ROWS ] ;
static matrix_row_t matrix_debouncing [ MATRIX_ROWS ] ;
2012-05-11 05:01:04 +00:00
# ifdef MATRIX_HAS_GHOST
static bool matrix_has_ghost_in_row ( uint8_t row ) ;
# endif
2013-03-27 08:15:06 +00:00
static matrix_row_t read_cols ( void ) ;
2012-05-11 05:01:04 +00:00
static void unselect_rows ( void ) ;
static void select_row ( uint8_t row ) ;
inline
uint8_t matrix_rows ( void )
{
return MATRIX_ROWS ;
}
inline
uint8_t matrix_cols ( void )
{
return MATRIX_COLS ;
}
void matrix_init ( void )
{
// JTAG disable for PORT F. write JTD bit twice within four cycles.
MCUCR | = ( 1 < < JTD ) ;
MCUCR | = ( 1 < < JTD ) ;
// initialize rows
unselect_rows ( ) ;
// initialize columns to input with pull-up(DDR:0, PORT:1)
DDRD = 0x00 ;
PORTD = 0xFF ;
// initialize matrix state: all keys off
2013-03-27 08:15:06 +00:00
for ( uint8_t i = 0 ; i < MATRIX_ROWS ; i + + ) {
matrix [ i ] = 0 ;
matrix_debouncing [ i ] = 0 ;
}
2012-05-11 05:01:04 +00:00
}
uint8_t matrix_scan ( void )
{
for ( uint8_t i = 0 ; i < MATRIX_ROWS ; i + + ) {
select_row ( i ) ;
_delay_us ( 30 ) ; // without this wait read unstable value.
2013-03-27 08:15:06 +00:00
matrix_row_t cols = read_cols ( ) ;
if ( matrix_debouncing [ i ] ! = cols ) {
matrix_debouncing [ i ] = cols ;
2012-05-11 05:01:04 +00:00
if ( debouncing ) {
2013-03-12 07:05:50 +00:00
debug ( " bounce!: " ) ; debug_hex ( debouncing ) ; debug ( " \n " ) ;
2012-05-11 05:01:04 +00:00
}
debouncing = DEBOUNCE ;
}
2013-03-12 07:05:50 +00:00
unselect_rows ( ) ;
2012-05-11 05:01:04 +00:00
}
if ( debouncing ) {
2013-03-12 07:05:50 +00:00
if ( - - debouncing ) {
_delay_ms ( 1 ) ;
} else {
2013-03-27 08:15:06 +00:00
for ( uint8_t i = 0 ; i < MATRIX_ROWS ; i + + ) {
matrix [ i ] = matrix_debouncing [ i ] ;
}
2013-03-12 07:05:50 +00:00
}
2012-05-11 05:01:04 +00:00
}
return 1 ;
}
bool matrix_is_modified ( void )
{
if ( debouncing ) return false ;
2013-03-12 07:05:50 +00:00
return true ;
2012-05-11 05:01:04 +00:00
}
inline
bool matrix_is_on ( uint8_t row , uint8_t col )
{
2013-03-27 08:15:06 +00:00
return ( matrix [ row ] & ( ( matrix_row_t ) 1 < < col ) ) ;
2012-05-11 05:01:04 +00:00
}
inline
2013-03-27 08:15:06 +00:00
matrix_row_t matrix_get_row ( uint8_t row )
2012-05-11 05:01:04 +00:00
{
return matrix [ row ] ;
}
void matrix_print ( void )
{
print ( " \n r/c 01234567 \n " ) ;
for ( uint8_t row = 0 ; row < matrix_rows ( ) ; row + + ) {
phex ( row ) ; print ( " : " ) ;
pbin_reverse ( matrix_get_row ( row ) ) ;
# ifdef MATRIX_HAS_GHOST
if ( matrix_has_ghost_in_row ( row ) ) {
print ( " <ghost " ) ;
}
# endif
print ( " \n " ) ;
}
}
# ifdef MATRIX_HAS_GHOST
inline
static bool matrix_has_ghost_in_row ( uint8_t row )
{
// no ghost exists in case less than 2 keys on
if ( ( ( matrix [ row ] - 1 ) & matrix [ row ] ) = = 0 )
return false ;
// ghost exists in case same state as other row
for ( uint8_t i = 0 ; i < MATRIX_ROWS ; i + + ) {
2013-03-05 10:18:01 +00:00
if ( i ! = row & & ( matrix [ i ] & matrix [ row ] ) )
2012-05-11 05:01:04 +00:00
return true ;
}
return false ;
}
# endif
inline
2013-03-27 08:15:06 +00:00
static matrix_row_t read_cols ( void )
2012-05-11 05:01:04 +00:00
{
2013-03-12 07:05:50 +00:00
return ~ PIND ;
2012-05-11 05:01:04 +00:00
}
inline
static void unselect_rows ( void )
{
// Hi-Z(DDR:0, PORT:0) to unselect
DDRB & = ~ 0 b11111111 ;
PORTB & = ~ 0 b11111111 ;
DDRF & = ~ 0 b11110000 ;
PORTF & = ~ 0 b11110000 ;
}
inline
static void select_row ( uint8_t row )
{
// Output low(DDR:1, PORT:0) to select
switch ( row ) {
case 0 :
case 1 :
case 2 :
case 3 :
case 4 :
case 5 :
case 6 :
case 7 :
DDRB | = ( 1 < < row ) ;
PORTB & = ~ ( 1 < < row ) ;
break ;
case 8 :
DDRF | = ( 1 < < 4 ) ;
PORTF & = ~ ( 1 < < 4 ) ;
break ;
case 9 :
case 10 :
case 11 :
DDRF | = ( 1 < < ( row - 4 ) ) ;
PORTF & = ~ ( 1 < < ( row - 4 ) ) ;
break ;
}
}