123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626 |
- /*
- Copyright 2011 Jun Wako <[email protected]>
-
- 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 "keyboard.h"
- #include "matrix.h"
- #include "keymap.h"
- #include "host.h"
- #include "led.h"
- #include "keycode.h"
- #include "timer.h"
- #include "print.h"
- #include "debug.h"
- #include "command.h"
- #include "util.h"
- #ifdef MOUSEKEY_ENABLE
- #include "mousekey.h"
- #endif
-
-
- #define Kdebug(s) do { if (debug_keyboard) debug(s); } while(0)
- #define Kdebug_P(s) do { if (debug_keyboard) debug_P(s); } while(0)
- #define Kdebug_hex(s) do { if (debug_keyboard) debug_hex(s); } while(0)
-
- #define LAYER_DELAY 250
-
- typedef enum keykind {
- NONE,
- FN_DOWN, FN_UP,
- FNK_DOWN, FNK_UP,
- KEY_DOWN, KEY_UP,
- MOD_DOWN, MOD_UP,
- } keykind_t;
-
- typedef enum { IDLE, DELAYING, WAITING, PRESSING } kbdstate_t;
-
-
- #ifdef KEYMAP_DEFAULT_LAYER
- uint8_t default_layer = KEYMAP_DEFAULT_LAYER;
- uint8_t current_layer = KEYMAP_DEFAULT_LAYER;
- #else
- uint8_t default_layer = 0;
- uint8_t current_layer = 0;
- #endif
-
- /* keyboard internal states */
- static kbdstate_t kbdstate = IDLE;
- static uint8_t fn_state_bits = 0;
- static keyrecord_t delayed_fn;
- static keyrecord_t waiting_key;
-
-
- static const char *state_str(kbdstate_t state)
- {
- if (state == IDLE) return PSTR("IDLE");
- if (state == DELAYING) return PSTR("DELAYING");
- if (state == WAITING) return PSTR("WAITING");
- if (state == PRESSING) return PSTR("PRESSING");
- return PSTR("UNKNOWN");
- }
-
- static inline keykind_t get_keykind(uint8_t code, bool pressed)
- {
- if IS_KEY(code) return (pressed ? KEY_DOWN : KEY_UP);
- if IS_MOD(code) return (pressed ? MOD_DOWN : MOD_UP);
- if IS_FN(code) {
- if (keymap_fn_keycode(FN_INDEX(code)))
- return (pressed ? FNK_DOWN : FNK_UP);
- else
- return (pressed ? FN_DOWN : FN_UP);
- }
- if IS_MOUSEKEY(code) return (pressed ? KEY_DOWN : KEY_UP);
- if IS_SYSTEM(code) return (pressed ? KEY_DOWN : KEY_UP);
- if IS_CONSUMER(code) return (pressed ? KEY_DOWN : KEY_UP);
- return NONE;
- }
-
- static void clear_keyboard(void)
- {
- host_clear_keys();
- host_clear_mods();
- host_send_keyboard_report();
-
- host_system_send(0);
- host_consumer_send(0);
-
- #ifdef MOUSEKEY_ENABLE
- mousekey_clear();
- mousekey_send();
- #endif
- }
-
- static void clear_keyboard_but_mods(void)
- {
- host_clear_keys();
- host_send_keyboard_report();
-
- host_system_send(0);
- host_consumer_send(0);
-
- #ifdef MOUSEKEY_ENABLE
- mousekey_clear();
- mousekey_send();
- #endif
- }
-
- static bool anykey_sent_to_host(void)
- {
- return (host_has_anykey() || host_mouse_in_use() ||
- host_last_sysytem_report() || host_last_consumer_report());
- }
-
- static void layer_switch_on(uint8_t code)
- {
- if (!IS_FN(code)) return;
- fn_state_bits |= FN_BIT(code);
- uint8_t new_layer = (fn_state_bits ? keymap_fn_layer(biton(fn_state_bits)) : default_layer);
- if (current_layer != new_layer) {
- Kdebug("Layer Switch(on): "); Kdebug_hex(current_layer);
- Kdebug(" -> "); Kdebug_hex(new_layer); Kdebug("\n");
-
- clear_keyboard_but_mods();
- current_layer = new_layer;
- }
- }
-
- static bool layer_switch_off(uint8_t code)
- {
- if (!IS_FN(code)) return false;
- fn_state_bits &= ~FN_BIT(code);
- uint8_t new_layer = (fn_state_bits ? keymap_fn_layer(biton(fn_state_bits)) : default_layer);
- if (current_layer != new_layer) {
- Kdebug("Layer Switch(off): "); Kdebug_hex(current_layer);
- Kdebug(" -> "); Kdebug_hex(new_layer); Kdebug("\n");
-
- clear_keyboard_but_mods();
- current_layer = new_layer;
- return true;
- }
- return false;
- }
-
- static void register_code(uint8_t code)
- {
- if IS_KEY(code) {
- if (!command_proc(code)) {
- host_add_key(code);
- host_send_keyboard_report();
- }
- }
- else if IS_MOD(code) {
- host_add_mod_bit(MOD_BIT(code));
- host_send_keyboard_report();
- }
- else if IS_FN(code) {
- if (!command_proc(keymap_fn_keycode(FN_INDEX(code)))) {
- host_add_key(keymap_fn_keycode(FN_INDEX(code)));
- host_send_keyboard_report();
- }
- }
- else if IS_MOUSEKEY(code) {
- #ifdef MOUSEKEY_ENABLE
- mousekey_on(code);
- mousekey_send();
- #endif
- }
- else if IS_CONSUMER(code) {
- uint16_t usage = 0;
- switch (code) {
- case KC_AUDIO_MUTE:
- usage = AUDIO_MUTE;
- break;
- case KC_AUDIO_VOL_UP:
- usage = AUDIO_VOL_UP;
- break;
- case KC_AUDIO_VOL_DOWN:
- usage = AUDIO_VOL_DOWN;
- break;
- case KC_MEDIA_NEXT_TRACK:
- usage = TRANSPORT_NEXT_TRACK;
- break;
- case KC_MEDIA_PREV_TRACK:
- usage = TRANSPORT_PREV_TRACK;
- break;
- case KC_MEDIA_STOP:
- usage = TRANSPORT_STOP;
- break;
- case KC_MEDIA_PLAY_PAUSE:
- usage = TRANSPORT_PLAY_PAUSE;
- break;
- case KC_MEDIA_SELECT:
- usage = AL_CC_CONFIG;
- break;
- case KC_MAIL:
- usage = AL_EMAIL;
- break;
- case KC_CALCULATOR:
- usage = AL_CALCULATOR;
- break;
- case KC_MY_COMPUTER:
- usage = AL_LOCAL_BROWSER;
- break;
- case KC_WWW_SEARCH:
- usage = AC_SEARCH;
- break;
- case KC_WWW_HOME:
- usage = AC_HOME;
- break;
- case KC_WWW_BACK:
- usage = AC_BACK;
- break;
- case KC_WWW_FORWARD:
- usage = AC_FORWARD;
- break;
- case KC_WWW_STOP:
- usage = AC_STOP;
- break;
- case KC_WWW_REFRESH:
- usage = AC_REFRESH;
- break;
- case KC_WWW_FAVORITES:
- usage = AC_BOOKMARKS;
- break;
- }
- host_consumer_send(usage);
- }
- else if IS_SYSTEM(code) {
- uint16_t usage = 0;
- switch (code) {
- case KC_SYSTEM_POWER:
- usage = SYSTEM_POWER_DOWN;
- break;
- case KC_SYSTEM_SLEEP:
- usage = SYSTEM_SLEEP;
- break;
- case KC_SYSTEM_WAKE:
- usage = SYSTEM_WAKE_UP;
- break;
- }
- host_system_send(usage);
- }
-
- }
-
- static void unregister_code(uint8_t code)
- {
- if IS_KEY(code) {
- host_del_key(code);
- host_send_keyboard_report();
- }
- else if IS_MOD(code) {
- host_del_mod_bit(MOD_BIT(code));
- host_send_keyboard_report();
- }
- else if IS_FN(code) {
- host_del_key(keymap_fn_keycode(FN_INDEX(code)));
- host_send_keyboard_report();
- }
- else if IS_MOUSEKEY(code) {
- #ifdef MOUSEKEY_ENABLE
- mousekey_off(code);
- mousekey_send();
- #endif
- }
- else if IS_CONSUMER(code) {
- host_consumer_send(0x0000);
- }
- else if IS_SYSTEM(code) {
- host_system_send(0x0000);
- }
- }
-
- /*
- *
- * Event/State|IDLE PRESSING DELAYING[f] WAITING[f,k]
- * -----------+------------------------------------------------------------------
- * Fn Down |(L+) -*1 WAITING(Sk) IDLE(Rf,Ps)*7
- * Up |(L-) IDLE(L-)*8 IDLE(L-)*8 IDLE(L-)*8
- * Fnk Down |DELAYING(Sf)* (Rf) WAITING(Sk) IDLE(Rf,Ps,Rf)
- * Up |(L-) IDLE(L-/Uf)*8 IDLE(Rf,Uf/L-)*3 IDLE(Rf,Ps,Uf/L-)*3
- * Key Down |PRESSING(Rk) (Rk) WAITING(Sk) IDLE(Rf,Ps,Rk)
- * Up |(Uk) IDLE(Uk)*4 (Uk) IDLE(L+,Ps,Pk)/(Uk)*a
- * |
- * Delay |- - IDLE(L+) IDLE(L+,Ps)
- * Magic Key |COMMAND*5
- *
- * *1: ignore Fn if other key is down.
- * *2: register Fnk if any key is pressing
- * *3: register/unregister delayed Fnk and move to IDLE if code == delayed Fnk, else *8
- * *4: if no keys registered to host
- * *5: unregister all keys
- * *6: only if no keys down
- * *7: ignore Fn because Fnk key and stored key are down.
- * *8: move to IDLE if layer switch(off) occurs, else stay at current state
- * *9: repeat key if pressing Fnk twice quickly(move to PRESSING)
- * *a: layer switch and process waiting key and code if code == wainting key, else unregister key
- *
- * States:
- * IDLE: No key is down except modifiers
- * DELAYING: delay layer switch after pressing Fn with alt keycode
- * WAITING: key is pressed during DELAYING
- *
- * Events:
- * Fn: Fn key without alternative keycode
- * Fnk: Fn key with alternative keycode
- * -: ignore
- * Delay: layer switch delay term is elapsed
- *
- * Actions:
- * Rk: register key
- * Uk: unregister key
- * Rf: register Fn(alt keycode)
- * Uf: unregister Fn(alt keycode)
- * Rs: register stored key
- * Us: unregister stored key
- * Sk: Store key(waiting Key)
- * Sf: Store Fn(delayed Fn)
- * Ps: Process stored key
- * Ps: Process key
- * Is: Interpret stored keys in current layer
- * L+: Switch to new layer(*unregister* all keys but modifiers)
- * L-: Switch back to last layer(*unregister* all keys but modifiers)
- * Ld: Switch back to default layer(*unregister* all keys but modifiers)
- */
- #define NEXT(state) do { \
- Kdebug("NEXT: "); Kdebug_P(state_str(kbdstate)); \
- kbdstate = state; \
- Kdebug(" -> "); Kdebug_P(state_str(kbdstate)); Kdebug("\n"); \
- } while (0)
-
- static inline void process_key(keyevent_t event)
- {
- uint8_t code = keymap_get_keycode(current_layer, event.key.row, event.key.col);
- keykind_t kind = get_keykind(code, event.pressed);
-
- uint8_t tmp_mods;
-
- Kdebug("state: "); Kdebug_P(state_str(kbdstate));
- Kdebug(" kind: "); Kdebug_hex(kind);
- Kdebug(" code: "); Kdebug_hex(code);
- if (event.pressed) { Kdebug("d"); } else { Kdebug("u"); }
- Kdebug("\n");
-
- switch (kbdstate) {
- case IDLE:
- switch (kind) {
- case FN_DOWN:
- layer_switch_on(code);
- break;
- case FN_UP:
- layer_switch_off(code);
- break;
- case FNK_DOWN:
- // repeat Fn alt key when press Fn key down, up then down again quickly
- if (KEYEQ(delayed_fn.event.key, event.key) &&
- timer_elapsed(delayed_fn.time) < LAYER_DELAY) {
- register_code(code);
- NEXT(PRESSING);
- } else {
- delayed_fn = (keyrecord_t) {
- .event = event,
- .code = code,
- .mods = keyboard_report->mods,
- .time = timer_read()
- };
- NEXT(DELAYING);
- }
- break;
- case FNK_UP:
- layer_switch_off(code);
- break;
- case KEY_DOWN:
- register_code(code);
- NEXT(PRESSING);
- break;
- case MOD_DOWN:
- register_code(code);
- break;
- case KEY_UP:
- case MOD_UP:
- unregister_code(code);
- break;
- default:
- break;
- }
- break;
- case PRESSING:
- switch (kind) {
- case FN_DOWN:
- // ignored when any key is pressed
- break;
- case FN_UP:
- if (layer_switch_off(code))
- NEXT(IDLE);
- break;
- case FNK_DOWN:
- register_code(code);
- break;
- case FNK_UP:
- if (layer_switch_off(code)) {
- NEXT(IDLE);
- } else {
- unregister_code(code);
- if (!anykey_sent_to_host())
- NEXT(IDLE);
- }
- break;
- case KEY_DOWN:
- case MOD_DOWN:
- register_code(code);
- break;
- case KEY_UP:
- case MOD_UP:
- unregister_code(code);
- if (!anykey_sent_to_host())
- NEXT(IDLE);
- break;
- default:
- break;
- }
- break;
- case DELAYING:
- switch (kind) {
- case FN_DOWN:
- case FNK_DOWN:
- case KEY_DOWN:
- waiting_key = (keyrecord_t) {
- .event = event,
- .code = code,
- .mods = keyboard_report->mods,
- .time = timer_read()
- };
- NEXT(WAITING);
- break;
- case MOD_DOWN:
- register_code(code);
- break;
- case FN_UP:
- if (layer_switch_off(code))
- NEXT(IDLE);
- break;
- case FNK_UP:
- if (code == delayed_fn.code) {
- // type Fn with alt keycode
- // restore the mod status at the time of pressing Fn key
- tmp_mods = keyboard_report->mods;
- host_set_mods(delayed_fn.mods);
- register_code(delayed_fn.code);
- unregister_code(delayed_fn.code);
- host_set_mods(tmp_mods);
- NEXT(IDLE);
- } else {
- if (layer_switch_off(code))
- NEXT(IDLE);
- }
- break;
- case KEY_UP:
- case MOD_UP:
- unregister_code(code);
- break;
- default:
- break;
- }
- break;
- case WAITING:
- switch (kind) {
- case FN_DOWN:
- case FNK_DOWN:
- case KEY_DOWN:
- tmp_mods = keyboard_report->mods;
- host_set_mods(delayed_fn.mods);
- register_code(delayed_fn.code);
- host_set_mods(waiting_key.mods);
- register_code(waiting_key.code);
- host_set_mods(tmp_mods);
- if (kind == FN_DOWN) {
- // ignore Fn
- } else if (kind == FNK_DOWN) {
- register_code(code);
- } else if (kind == KEY_DOWN) {
- register_code(code);
- }
- NEXT(IDLE);
- break;
- case MOD_DOWN:
- register_code(code);
- break;
- case FN_UP:
- if (layer_switch_off(code))
- NEXT(IDLE);
- break;
- case FNK_UP:
- if (code == delayed_fn.code) {
- // alt down, key down, alt up
- tmp_mods = keyboard_report->mods;
- host_set_mods(delayed_fn.mods);
- register_code(delayed_fn.code);
- host_set_mods(waiting_key.mods);
- register_code(waiting_key.code);
- unregister_code(delayed_fn.code);
- host_set_mods(tmp_mods);
- NEXT(IDLE);
- } else {
- if (layer_switch_off(code))
- NEXT(IDLE);
- }
- break;
- case KEY_UP:
- if (code == waiting_key.code) {
- layer_switch_on(delayed_fn.code);
- NEXT(IDLE);
- // process waiting_key
- tmp_mods = keyboard_report->mods;
- host_set_mods(waiting_key.mods);
- process_key(waiting_key.event);
- host_set_mods(tmp_mods);
- process_key(event);
- } else {
- unregister_code(code);
- }
- break;
- case MOD_UP:
- unregister_code(code);
- break;
- default:
- break;
- }
- break;
- }
- }
-
- void keyboard_init(void)
- {
- debug_keyboard = true;
-
- timer_init();
- matrix_init();
- #ifdef PS2_MOUSE_ENABLE
- ps2_mouse_init();
- #endif
- }
-
- void keyboard_task(void)
- {
- static matrix_row_t matrix_prev[MATRIX_ROWS];
- matrix_row_t matrix_row = 0;
- matrix_row_t matrix_change = 0;
-
- matrix_scan();
- for (int r = 0; r < MATRIX_ROWS; r++) {
- matrix_row = matrix_get_row(r);
- matrix_change = matrix_row ^ matrix_prev[r];
- if (matrix_change) {
- if (debug_matrix) matrix_print();
-
- for (int c = 0; c < MATRIX_COLS; c++) {
- if (matrix_change & (1<<c)) {
- process_key((keyevent_t){
- .key = (key_t){ .row = r, .col = c },
- .pressed = (matrix_row & (1<<c))
- });
- // record a processed key
- matrix_prev[r] ^= (1<<c);
- // process a key per task call
- goto MATRIX_LOOP_END;
- }
- }
- }
- }
- MATRIX_LOOP_END:
-
- // layer switch when delay term elapses
- if (kbdstate == DELAYING || kbdstate == WAITING) {
- if (timer_elapsed(delayed_fn.time) > LAYER_DELAY) {
- if (kbdstate == DELAYING) {
- layer_switch_on(delayed_fn.code);
- NEXT(IDLE);
- }
- if (kbdstate == WAITING) {
- layer_switch_on(delayed_fn.code);
- NEXT(IDLE);
- uint8_t tmp_mods = keyboard_report->mods;
- host_set_mods(waiting_key.mods);
- process_key(waiting_key.event);
- host_set_mods(tmp_mods);
- }
- }
- }
-
- #ifdef MOUSEKEY_ENABLE
- // mousekey repeat & acceleration
- mousekey_task();
- #endif
-
- // FAIL SAFE: clear all key if no key down
- if (matrix_change) {
- matrix_row_t is_matrix_on = 0;
- for (int r = 0; r < MATRIX_ROWS; r++) {
- is_matrix_on |= matrix_get_row(r);
- }
- if (!is_matrix_on) {
- Kdebug("FAIL SAFE: clear all keys(default layer).\n");
- clear_keyboard();
- current_layer = default_layer;
- }
- }
-
- return;
- }
-
- void keyboard_set_leds(uint8_t leds)
- {
- led_set(leds);
- }
|