2011-07-20 15:32:52 +00:00
/*
Copyright 2011 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/>.
*/
2010-08-23 06:46:24 +00:00
/*
* scan matrix
*/
2010-10-27 11:51:45 +00:00
# include <stdint.h>
# include <stdbool.h>
2010-08-23 06:46:24 +00:00
# include <avr/io.h>
# include <util/delay.h>
2010-10-27 11:51:45 +00:00
# include "print.h"
2011-09-29 08:08:57 +00:00
# include "debug.h"
2010-10-27 11:51:45 +00:00
# include "util.h"
2011-02-21 14:46:08 +00:00
# include "matrix.h"
2010-08-23 06:46:24 +00:00
2010-09-12 15:00:58 +00:00
2011-01-06 06:18:55 +00:00
# if (MATRIX_COLS > 16)
# error "MATRIX_COLS must not exceed 16"
# endif
# if (MATRIX_ROWS > 255)
# error "MATRIX_ROWS must not exceed 255"
# endif
2011-09-29 08:08:57 +00:00
# ifndef DEBOUNCE
# define DEBOUNCE 0
# endif
static uint8_t debouncing = DEBOUNCE ;
2011-01-06 06:18:55 +00:00
// matrix state buffer(1:on, 0:off)
# if (MATRIX_COLS <= 8)
2010-10-29 06:17:18 +00:00
static uint8_t * matrix ;
static uint8_t * matrix_prev ;
2010-08-23 06:46:24 +00:00
static uint8_t _matrix0 [ MATRIX_ROWS ] ;
static uint8_t _matrix1 [ MATRIX_ROWS ] ;
2011-01-06 06:18:55 +00:00
# else
static uint16_t * matrix ;
static uint16_t * matrix_prev ;
static uint16_t _matrix0 [ MATRIX_ROWS ] ;
static uint16_t _matrix1 [ MATRIX_ROWS ] ;
# endif
# ifdef MATRIX_HAS_GHOST
2010-10-27 11:51:45 +00:00
static bool matrix_has_ghost_in_row ( uint8_t row ) ;
2011-01-06 06:18:55 +00:00
# endif
2010-08-23 06:46:24 +00:00
static uint8_t read_col ( void ) ;
2010-09-12 15:00:58 +00:00
static void unselect_rows ( void ) ;
2010-08-23 06:46:24 +00:00
static void select_row ( uint8_t row ) ;
2010-10-27 11:51:45 +00:00
inline
2011-01-06 06:18:55 +00:00
uint8_t matrix_rows ( void )
2010-10-27 11:51:45 +00:00
{
return MATRIX_ROWS ;
}
inline
2011-01-06 06:18:55 +00:00
uint8_t matrix_cols ( void )
2010-10-27 11:51:45 +00:00
{
return MATRIX_COLS ;
}
2010-08-23 06:46:24 +00:00
void matrix_init ( void )
{
2010-09-12 15:00:58 +00:00
// initialize row and col
unselect_rows ( ) ;
2011-01-02 14:52:13 +00:00
// Input with pull-up(DDR:0, PORT:1)
2010-08-23 06:46:24 +00:00
DDRB = 0x00 ;
PORTB = 0xFF ;
2010-09-12 15:00:58 +00:00
// initialize matrix state: all keys off
2011-01-06 06:18:55 +00:00
for ( uint8_t i = 0 ; i < MATRIX_ROWS ; i + + ) _matrix0 [ i ] = 0x00 ;
for ( uint8_t i = 0 ; i < MATRIX_ROWS ; i + + ) _matrix1 [ i ] = 0x00 ;
2010-08-23 06:46:24 +00:00
matrix = _matrix0 ;
2010-09-12 15:00:58 +00:00
matrix_prev = _matrix1 ;
2010-08-23 06:46:24 +00:00
}
2011-01-06 06:18:55 +00:00
uint8_t matrix_scan ( void )
2010-08-23 06:46:24 +00:00
{
2011-09-29 08:08:57 +00:00
if ( ! debouncing ) {
uint8_t * tmp = matrix_prev ;
matrix_prev = matrix ;
matrix = tmp ;
}
2010-08-23 06:46:24 +00:00
2011-01-06 06:18:55 +00:00
for ( uint8_t i = 0 ; i < MATRIX_ROWS ; i + + ) {
2011-01-02 14:52:13 +00:00
unselect_rows ( ) ;
2010-10-27 11:51:45 +00:00
select_row ( i ) ;
2010-08-23 06:46:24 +00:00
_delay_us ( 30 ) ; // without this wait read unstable value.
2011-09-29 08:08:57 +00:00
if ( matrix [ i ] ! = ( uint8_t ) ~ read_col ( ) ) {
matrix [ i ] = ( uint8_t ) ~ read_col ( ) ;
if ( debouncing ) {
debug ( " bounce!: " ) ; debug_hex ( debouncing ) ; print ( " \n " ) ;
}
debouncing = DEBOUNCE ;
}
2010-08-23 06:46:24 +00:00
}
2011-01-02 14:52:13 +00:00
unselect_rows ( ) ;
2011-09-29 08:08:57 +00:00
if ( debouncing ) {
debouncing - - ;
}
2010-08-23 06:46:24 +00:00
return 1 ;
}
2010-10-27 11:51:45 +00:00
bool matrix_is_modified ( void )
{
2011-09-29 08:08:57 +00:00
if ( debouncing ) return false ;
2011-01-06 06:18:55 +00:00
for ( uint8_t i = 0 ; i < MATRIX_ROWS ; i + + ) {
2011-09-29 08:08:57 +00:00
if ( matrix [ i ] ! = matrix_prev [ i ] ) {
2010-09-12 15:00:58 +00:00
return true ;
2011-09-29 08:08:57 +00:00
}
2010-09-12 15:00:58 +00:00
}
return false ;
}
2011-01-06 06:18:55 +00:00
inline
2010-10-27 11:51:45 +00:00
bool matrix_has_ghost ( void )
{
2011-01-06 06:18:55 +00:00
# ifdef MATRIX_HAS_GHOST
for ( uint8_t i = 0 ; i < MATRIX_ROWS ; i + + ) {
2010-09-12 15:00:58 +00:00
if ( matrix_has_ghost_in_row ( i ) )
return true ;
}
2011-01-06 06:18:55 +00:00
# endif
2010-09-12 15:00:58 +00:00
return false ;
}
2010-10-27 11:51:45 +00:00
inline
2011-01-06 06:18:55 +00:00
bool matrix_is_on ( uint8_t row , uint8_t col )
2010-10-27 11:51:45 +00:00
{
return ( matrix [ row ] & ( 1 < < col ) ) ;
}
inline
2011-01-06 06:18:55 +00:00
# if (MATRIX_COLS <= 8)
uint8_t matrix_get_row ( uint8_t row )
# else
uint16_t matrix_get_row ( uint8_t row )
# endif
2010-10-27 11:51:45 +00:00
{
return matrix [ row ] ;
}
void matrix_print ( void )
{
print ( " \n r/c 01234567 \n " ) ;
2011-01-06 06:18:55 +00:00
for ( uint8_t row = 0 ; row < matrix_rows ( ) ; row + + ) {
2010-10-27 11:51:45 +00:00
phex ( row ) ; print ( " : " ) ;
2011-01-06 06:18:55 +00:00
# if (MATRIX_COLS <= 8)
2010-10-27 11:51:45 +00:00
pbin_reverse ( matrix_get_row ( row ) ) ;
2011-01-06 06:18:55 +00:00
# else
pbin_reverse16 ( matrix_get_row ( row ) ) ;
# endif
# ifdef MATRIX_HAS_GHOST
2010-10-27 11:51:45 +00:00
if ( matrix_has_ghost_in_row ( row ) ) {
print ( " <ghost " ) ;
}
2011-01-06 06:18:55 +00:00
# endif
2010-10-27 11:51:45 +00:00
print ( " \n " ) ;
}
}
2011-01-06 06:18:55 +00:00
uint8_t matrix_key_count ( void )
2010-10-27 11:51:45 +00:00
{
2011-01-06 06:18:55 +00:00
uint8_t count = 0 ;
for ( uint8_t i = 0 ; i < MATRIX_ROWS ; i + + ) {
# if (MATRIX_COLS <= 8)
2010-10-27 11:51:45 +00:00
count + = bitpop ( matrix [ i ] ) ;
2011-01-06 06:18:55 +00:00
# else
count + = bitpop16 ( matrix [ i ] ) ;
# endif
2010-10-27 11:51:45 +00:00
}
return count ;
}
2011-01-06 06:18:55 +00:00
# ifdef MATRIX_HAS_GHOST
inline
2010-10-27 11:51:45 +00:00
static bool matrix_has_ghost_in_row ( uint8_t row )
{
2010-09-12 15:00:58 +00:00
// no ghost exists in case less than 2 keys on
2010-10-27 11:51:45 +00:00
if ( ( ( matrix [ row ] - 1 ) & matrix [ row ] ) = = 0 )
2010-09-12 15:00:58 +00:00
return false ;
// ghost exists in case same state as other row
2011-01-06 06:18:55 +00:00
for ( uint8_t i = 0 ; i < MATRIX_ROWS ; i + + ) {
2010-10-27 11:51:45 +00:00
if ( i ! = row & & ( matrix [ i ] & matrix [ row ] ) = = matrix [ row ] )
return true ;
2010-09-12 15:00:58 +00:00
}
return false ;
}
2011-01-06 06:18:55 +00:00
# endif
2010-09-12 15:00:58 +00:00
2011-01-06 06:18:55 +00:00
inline
2010-08-23 06:46:24 +00:00
static uint8_t read_col ( void )
{
return PINB ;
}
2011-01-06 06:18:55 +00:00
inline
2010-10-27 11:51:45 +00:00
static void unselect_rows ( void )
{
2011-01-02 14:52:13 +00:00
// Hi-Z(DDR:0, PORT:0) to unselect
DDRC & = ~ 0 b11000000 ; // PC: 7,6
PORTC & = ~ 0 b11000000 ;
DDRD & = ~ 0 b11000111 ; // PD: 7,6,2,1,0
PORTD & = ~ 0 b11000111 ;
DDRF & = ~ 0 b11000000 ; // PF: 7,6
PORTF & = ~ 0 b11000000 ;
2010-09-12 15:00:58 +00:00
}
2011-01-06 06:18:55 +00:00
inline
2010-08-23 06:46:24 +00:00
static void select_row ( uint8_t row )
{
2011-01-02 14:52:13 +00:00
// Output low(DDR:1, PORT:0) to select
// row: 0 1 2 3 4 5 6 7 8
// pin: PD0, PC7, PD7, PF6, PD6, PD1, PD2, PC6, PF7
2010-08-23 06:46:24 +00:00
switch ( row ) {
case 0 :
2011-01-02 14:52:13 +00:00
DDRD | = ( 1 < < 0 ) ;
PORTD & = ~ ( 1 < < 0 ) ;
2010-08-23 06:46:24 +00:00
break ;
case 1 :
2011-01-02 14:52:13 +00:00
DDRC | = ( 1 < < 7 ) ;
PORTC & = ~ ( 1 < < 7 ) ;
2010-08-23 06:46:24 +00:00
break ;
case 2 :
2011-01-02 14:52:13 +00:00
DDRD | = ( 1 < < 7 ) ;
PORTD & = ~ ( 1 < < 7 ) ;
2010-08-23 06:46:24 +00:00
break ;
case 3 :
2011-01-02 14:52:13 +00:00
DDRF | = ( 1 < < 6 ) ;
PORTF & = ~ ( 1 < < 6 ) ;
2010-08-23 06:46:24 +00:00
break ;
case 4 :
2011-01-02 14:52:13 +00:00
DDRD | = ( 1 < < 6 ) ;
PORTD & = ~ ( 1 < < 6 ) ;
2010-08-23 06:46:24 +00:00
break ;
case 5 :
2011-01-02 14:52:13 +00:00
DDRD | = ( 1 < < 1 ) ;
PORTD & = ~ ( 1 < < 1 ) ;
2010-08-23 06:46:24 +00:00
break ;
case 6 :
2011-01-02 14:52:13 +00:00
DDRD | = ( 1 < < 2 ) ;
PORTD & = ~ ( 1 < < 2 ) ;
2010-08-23 06:46:24 +00:00
break ;
case 7 :
2011-01-02 14:52:13 +00:00
DDRC | = ( 1 < < 6 ) ;
PORTC & = ~ ( 1 < < 6 ) ;
2010-08-23 06:46:24 +00:00
break ;
case 8 :
2011-01-02 14:52:13 +00:00
DDRF | = ( 1 < < 7 ) ;
PORTF & = ~ ( 1 < < 7 ) ;
2010-08-23 06:46:24 +00:00
break ;
}
}