keyboards/preonic/rev3/matrix.c

   1 #include <stdint.h>
   2 #include <stdbool.h>
   3 #include <string.h>
   4 #include "hal.h"
   5 #include "timer.h"
   6 #include "wait.h"
   7 #include "printf.h"
   8 #include "backlight.h"
   9 #include "matrix.h"
  10 #include "action.h"
  11 #include "keycode.h"
  12 #include <string.h>
  13
  14 /*
  15  *     col: { B11, B10, B2, B1, A7, B0 }
  16  *     row: { A10, A9, A8, B15, C13, C14, C15, A2 }
  17  */
  18 /* matrix state(1:on, 0:off) */
  19 static matrix_row_t matrix[MATRIX_ROWS];
  20 static matrix_col_t matrix_debouncing[MATRIX_COLS];
  21 static bool debouncing = false;
  22 static uint16_t debouncing_time = 0;
  23
  24 static uint8_t encoder_state = 0;
  25 static int8_t encoder_value = 0;
  26 static int8_t encoder_LUT[] = { 0, -1, 1, 0, 1, 0, 0, -1, -1, 0, 0, 1, 0, 1, -1, 0 };
  27
  28 static bool dip_switch[4] = {0, 0, 0, 0};
  29
  30 __attribute__ ((weak))
  31 void matrix_init_user(void) {}
  32
  33 __attribute__ ((weak))
  34 void matrix_scan_user(void) {}
  35
  36 __attribute__ ((weak))
  37 void matrix_init_kb(void) {
  38   matrix_init_user();
  39 }
  40
  41 __attribute__ ((weak))
  42 void matrix_scan_kb(void) {
  43   matrix_scan_user();
  44 }
  45
  46 void matrix_init(void) {
  47     printf("matrix init\n");
  48     //debug_matrix = true;
  49
  50     // dip switch setup
  51     palSetPadMode(GPIOB, 14, PAL_MODE_INPUT_PULLUP);
  52     palSetPadMode(GPIOA, 15, PAL_MODE_INPUT_PULLUP);
  53     palSetPadMode(GPIOA, 10, PAL_MODE_INPUT_PULLUP);
  54     palSetPadMode(GPIOB, 9,  PAL_MODE_INPUT_PULLUP);
  55
  56     // encoder setup
  57     palSetPadMode(GPIOB, 12, PAL_MODE_INPUT_PULLUP);
  58     palSetPadMode(GPIOB, 13, PAL_MODE_INPUT_PULLUP);
  59
  60     encoder_state = (palReadPad(GPIOB, 12) << 0) | (palReadPad(GPIOB, 13) << 1);
  61
  62     // actual matrix setup
  63     palSetPadMode(GPIOB, 11, PAL_MODE_OUTPUT_PUSHPULL);
  64     palSetPadMode(GPIOB, 10, PAL_MODE_OUTPUT_PUSHPULL);
  65     palSetPadMode(GPIOB, 2,  PAL_MODE_OUTPUT_PUSHPULL);
  66     palSetPadMode(GPIOB, 1,  PAL_MODE_OUTPUT_PUSHPULL);
  67     palSetPadMode(GPIOA, 7,  PAL_MODE_OUTPUT_PUSHPULL);
  68     palSetPadMode(GPIOB, 0,  PAL_MODE_OUTPUT_PUSHPULL);
  69
  70     palSetPadMode(GPIOA, 10, PAL_MODE_INPUT_PULLDOWN);
  71     palSetPadMode(GPIOA, 9,  PAL_MODE_INPUT_PULLDOWN);
  72     palSetPadMode(GPIOA, 8,  PAL_MODE_INPUT_PULLDOWN);
  73     palSetPadMode(GPIOB, 15, PAL_MODE_INPUT_PULLDOWN);
  74     palSetPadMode(GPIOC, 13, PAL_MODE_INPUT_PULLDOWN);
  75     palSetPadMode(GPIOC, 14, PAL_MODE_INPUT_PULLDOWN);
  76     palSetPadMode(GPIOC, 15, PAL_MODE_INPUT_PULLDOWN);
  77     palSetPadMode(GPIOA, 2,  PAL_MODE_INPUT_PULLDOWN);
  78     palSetPadMode(GPIOA, 3,  PAL_MODE_INPUT_PULLDOWN);
  79     palSetPadMode(GPIOA, 6,  PAL_MODE_INPUT_PULLDOWN);
  80
  81
  82     memset(matrix, 0, MATRIX_ROWS * sizeof(matrix_row_t));
  83     memset(matrix_debouncing, 0, MATRIX_COLS * sizeof(matrix_col_t));
  84
  85
  86     matrix_init_quantum();
  87 }
  88
  89 __attribute__ ((weak))
  90 void dip_update(uint8_t index, bool active) { }
  91
  92 __attribute__ ((weak))
  93 void encoder_update(bool clockwise) { }
  94
  95 bool last_dip_switch[4] = {0};
  96
  97 #ifndef ENCODER_RESOLUTION
  98   #define ENCODER_RESOLUTION 4
  99 #endif
 100
 101 uint8_t matrix_scan(void) {
 102     // dip switch
 103     dip_switch[0] = !palReadPad(GPIOB, 14);
 104     dip_switch[1] = !palReadPad(GPIOA, 15);
 105     dip_switch[2] = !palReadPad(GPIOA, 10);
 106     dip_switch[3] = !palReadPad(GPIOB, 9);
 107     for (uint8_t i = 0; i < 4; i++) {
 108       if (last_dip_switch[i] ^ dip_switch[i])
 109         dip_update(i, dip_switch[i]);
 110     }
 111     memcpy(last_dip_switch, dip_switch, sizeof(&dip_switch));
 112
 113     // encoder on B12 and B13
 114     encoder_state <<= 2;
 115     encoder_state |= (palReadPad(GPIOB, 12) << 0) | (palReadPad(GPIOB, 13) << 1);
 116     encoder_value += encoder_LUT[encoder_state & 0xF];
 117     if (encoder_value >= ENCODER_RESOLUTION) {
 118         encoder_update(0);
 119     }
 120     if (encoder_value <= -ENCODER_RESOLUTION) { // direction is arbitrary here, but this clockwise
 121         encoder_update(1);
 122     }
 123     encoder_value %= ENCODER_RESOLUTION;
 124
 125     // actual matrix
 126     for (int col = 0; col < MATRIX_COLS; col++) {
 127         matrix_col_t data = 0;
 128
 129         // strobe col { B11, B10, B2, B1, A7, B0 }
 130         switch (col) {
 131             case 0: palSetPad(GPIOB, 11); break;
 132             case 1: palSetPad(GPIOB, 10); break;
 133             case 2: palSetPad(GPIOB, 2); break;
 134             case 3: palSetPad(GPIOB, 1); break;
 135             case 4: palSetPad(GPIOA, 7); break;
 136             case 5: palSetPad(GPIOB, 0); break;
 137         }
 138
 139         // need wait to settle pin state
 140         wait_us(20);
 141
 142         // read row data { A10, A9, A8, B15, C13, C14, C15, A2 }
 143         data = (
 144             (palReadPad(GPIOA, 10) << 0 ) |
 145             (palReadPad(GPIOA, 9)  << 1 ) |
 146             (palReadPad(GPIOA, 8)  << 2 ) |
 147             (palReadPad(GPIOB, 15) << 3 ) |
 148             (palReadPad(GPIOC, 13) << 4 ) |
 149             (palReadPad(GPIOC, 14) << 5 ) |
 150             (palReadPad(GPIOC, 15) << 6 ) |
 151             (palReadPad(GPIOA, 2)  << 7 ) |
 152             (palReadPad(GPIOA, 3)  << 8 ) |
 153             (palReadPad(GPIOA, 6)  << 9 )
 154         );
 155
 156         // unstrobe  col { B11, B10, B2, B1, A7, B0 }
 157         switch (col) {
 158             case 0: palClearPad(GPIOB, 11); break;
 159             case 1: palClearPad(GPIOB, 10); break;
 160             case 2: palClearPad(GPIOB, 2); break;
 161             case 3: palClearPad(GPIOB, 1); break;
 162             case 4: palClearPad(GPIOA, 7); break;
 163             case 5: palClearPad(GPIOB, 0); break;
 164         }
 165
 166         if (matrix_debouncing[col] != data) {
 167             matrix_debouncing[col] = data;
 168             debouncing = true;
 169             debouncing_time = timer_read();
 170         }
 171     }
 172
 173     if (debouncing && timer_elapsed(debouncing_time) > DEBOUNCE) {
 174         for (int row = 0; row < MATRIX_ROWS; row++) {
 175             matrix[row] = 0;
 176             for (int col = 0; col < MATRIX_COLS; col++) {
 177                 matrix[row] |= ((matrix_debouncing[col] & (1 << row) ? 1 : 0) << col);
 178             }
 179         }
 180         debouncing = false;
 181     }
 182
 183     matrix_scan_quantum();
 184
 185     return 1;
 186 }
 187
 188 bool matrix_is_on(uint8_t row, uint8_t col) {
 189     return (matrix[row] & (1<<col));
 190 }
 191
 192 matrix_row_t matrix_get_row(uint8_t row) {
 193     return matrix[row];
 194 }
 195
 196 void matrix_print(void) {
 197     printf("\nr/c 01234567\n");
 198     for (uint8_t row = 0; row < MATRIX_ROWS; row++) {
 199         printf("%X0: ", row);
 200         matrix_row_t data = matrix_get_row(row);
 201         for (int col = 0; col < MATRIX_COLS; col++) {
 202             if (data & (1<<col))
 203                 printf("1");
 204             else
 205                 printf("0");
 206         }
 207         printf("\n");
 208     }
 209 }