keyboards/planck/rev6/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_row_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
  79
  80     memset(matrix, 0, MATRIX_ROWS * sizeof(matrix_row_t));
  81     memset(matrix_debouncing, 0, MATRIX_COLS * sizeof(matrix_row_t));
  82
  83
  84     matrix_init_quantum();
  85 }
  86
  87 __attribute__ ((weak))
  88 void dip_update(uint8_t index, bool active) { }
  89
  90 __attribute__ ((weak))
  91 void encoder_update(bool clockwise) { }
  92
  93 bool last_dip_switch[4] = {0};
  94
  95 #ifndef ENCODER_RESOLUTION
  96   #define ENCODER_RESOLUTION 4
  97 #endif
  98
  99 uint8_t matrix_scan(void) {
 100     // dip switch
 101     dip_switch[0] = !palReadPad(GPIOB, 14);
 102     dip_switch[1] = !palReadPad(GPIOA, 15);
 103     dip_switch[2] = !palReadPad(GPIOA, 10);
 104     dip_switch[3] = !palReadPad(GPIOB, 9);
 105     for (uint8_t i = 0; i < 4; i++) {
 106       if (last_dip_switch[i] ^ dip_switch[i])
 107         dip_update(i, dip_switch[i]);
 108     }
 109     memcpy(last_dip_switch, dip_switch, sizeof(&dip_switch));
 110
 111     // encoder on B12 and B13
 112     encoder_state <<= 2;
 113     encoder_state |= (palReadPad(GPIOB, 12) << 0) | (palReadPad(GPIOB, 13) << 1);
 114     encoder_value += encoder_LUT[encoder_state & 0xF];
 115     if (encoder_value >= ENCODER_RESOLUTION) {
 116         encoder_update(0);
 117     }
 118     if (encoder_value <= -ENCODER_RESOLUTION) { // direction is arbitrary here, but this clockwise
 119         encoder_update(1);
 120     }
 121     encoder_value %= ENCODER_RESOLUTION;
 122
 123     // actual matrix
 124     for (int col = 0; col < MATRIX_COLS; col++) {
 125         matrix_row_t data = 0;
 126
 127         // strobe col { B11, B10, B2, B1, A7, B0 }
 128         switch (col) {
 129             case 0: palSetPad(GPIOB, 11); break;
 130             case 1: palSetPad(GPIOB, 10); break;
 131             case 2: palSetPad(GPIOB, 2); break;
 132             case 3: palSetPad(GPIOB, 1); break;
 133             case 4: palSetPad(GPIOA, 7); break;
 134             case 5: palSetPad(GPIOB, 0); break;
 135         }
 136
 137         // need wait to settle pin state
 138         wait_us(20);
 139
 140         // read row data { A10, A9, A8, B15, C13, C14, C15, A2 }
 141         data = (
 142             (palReadPad(GPIOA, 10) << 0 ) |
 143             (palReadPad(GPIOA, 9)  << 1 ) |
 144             (palReadPad(GPIOA, 8)  << 2 ) |
 145             (palReadPad(GPIOB, 15) << 3 ) |
 146             (palReadPad(GPIOC, 13) << 4 ) |
 147             (palReadPad(GPIOC, 14) << 5 ) |
 148             (palReadPad(GPIOC, 15) << 6 ) |
 149             (palReadPad(GPIOA, 2)  << 7 )
 150         );
 151
 152         // unstrobe  col { B11, B10, B2, B1, A7, B0 }
 153         switch (col) {
 154             case 0: palClearPad(GPIOB, 11); break;
 155             case 1: palClearPad(GPIOB, 10); break;
 156             case 2: palClearPad(GPIOB, 2); break;
 157             case 3: palClearPad(GPIOB, 1); break;
 158             case 4: palClearPad(GPIOA, 7); break;
 159             case 5: palClearPad(GPIOB, 0); break;
 160         }
 161
 162         if (matrix_debouncing[col] != data) {
 163             matrix_debouncing[col] = data;
 164             debouncing = true;
 165             debouncing_time = timer_read();
 166         }
 167     }
 168
 169     if (debouncing && timer_elapsed(debouncing_time) > DEBOUNCE) {
 170         for (int row = 0; row < MATRIX_ROWS; row++) {
 171             matrix[row] = 0;
 172             for (int col = 0; col < MATRIX_COLS; col++) {
 173                 matrix[row] |= ((matrix_debouncing[col] & (1 << row) ? 1 : 0) << col);
 174             }
 175         }
 176         debouncing = false;
 177     }
 178
 179     matrix_scan_quantum();
 180
 181     return 1;
 182 }
 183
 184 bool matrix_is_on(uint8_t row, uint8_t col) {
 185     return (matrix[row] & (1<<col));
 186 }
 187
 188 matrix_row_t matrix_get_row(uint8_t row) {
 189     return matrix[row];
 190 }
 191
 192 void matrix_print(void) {
 193     printf("\nr/c 01234567\n");
 194     for (uint8_t row = 0; row < MATRIX_ROWS; row++) {
 195         printf("%X0: ", row);
 196         matrix_row_t data = matrix_get_row(row);
 197         for (int col = 0; col < MATRIX_COLS; col++) {
 198             if (data & (1<<col))
 199                 printf("1");
 200             else
 201                 printf("0");
 202         }
 203         printf("\n");
 204     }
 205 }